/* GCC MELT GENERATED FILE warmelt-normatch.c - DO NOT EDIT */ /***+ warmelt-normatch without options +***/ #include "melt-run.h" /* used hash from melt-run.h when compiling this file: */ MELT_EXTERN const char meltrun_used_md5_melt[] = MELT_RUN_HASHMD5 /* from melt-run.h */ ; /**** warmelt-normatch declarations ****/ /*************************************************** *** Copyright 2008 - 2013 Free Software Foundation, Inc. Contributed by Basile Starynkevitch 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 . *** ****************************************************/ /* ordinary MELT module */ #define MELT_HAS_INITIAL_ENVIRONMENT 1 /*usual */ struct melt_callframe_st; /*defined in melt-runtime.h */ 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_MATCHALT_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_MATCHALT_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_MATCHALT_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_MATCHALT_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_MATCHALT_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_MATCHALT_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_MATCHALT (meltclosure_ptr_t meltclosp_, 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_); MELT_EXTERN void *melt_start_this_module (void *); /* define different names when debugging or not */ #if MELT_HAVE_DEBUG MELT_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 */ MELT_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_melt_start_this_module_st; void MELT_MODULE_VISIBILITY meltmod__warmelt_normatch__initialmeltchunk_0 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normatch__initialmeltchunk_1 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normatch__initialmeltchunk_2 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normatch__initialmeltchunk_3 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normatch__initialmeltchunk_4 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normatch__initialmeltchunk_5 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normatch__initialmeltchunk_6 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normatch__initialmeltchunk_7 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normatch__initialmeltchunk_8 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normatch__initialmeltchunk_9 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normatch__initialmeltchunk_10 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normatch__initialmeltchunk_11 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normatch__initialmeltchunk_12 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normatch__initialmeltchunk_13 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normatch__initialmeltchunk_14 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normatch__initialmeltchunk_15 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normatch__initialmeltchunk_16 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normatch__initialmeltchunk_17 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normatch__initialmeltchunk_18 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normatch__initialmeltchunk_19 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normatch__initialmeltchunk_20 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normatch__initialmeltchunk_21 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normatch__initialmeltchunk_22 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normatch__initialmeltchunk_23 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normatch__initialmeltchunk_24 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normatch__initialmeltchunk_25 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normatch__initialmeltchunk_26 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normatch__initialmeltchunk_27 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normatch__initialmeltchunk_28 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normatch__initialmeltchunk_29 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normatch__initialmeltchunk_30 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normatch__initialmeltchunk_31 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normatch__initialmeltchunk_32 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normatch__initialmeltchunk_33 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normatch__initialmeltchunk_34 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normatch__forward_or_mark_module_start_frame (struct melt_callframe_st *fp, int marking); #define meltmarking_melt_start_this_module meltmod__warmelt_normatch__forward_or_mark_module_start_frame /**** warmelt-normatch implementations ****/ 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_) { long current_blocklevel_signals_meltrout_1_warmelt_normatch_SCANPAT_ANYRECV_melt = melt_blocklevel_signals; #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_1_warmelt_normatch_SCANPAT_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; #undef MELTFRAM_NBVARPTR #undef MELTFRAM_NBVARNUM #define MELTFRAM_NBVARPTR 16 melt_ptr_t mcfr_varptr[16]; #define MELTFRAM_NBVARNUM 3 long mcfr_varnum[3]; /*others*/ long _spare_; } *meltframptr_ = 0, meltfram__; /*declfrastruct */ #define meltframe meltfram__ /*meltrout_1_warmelt_normatch_SCANPAT_ANYRECV is not initial declstructinit */ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC)) { /*mark for ggc */ int ix = 0; meltframptr_ = (struct frame_meltrout_1_warmelt_normatch_SCANPAT_ANYRECV_st *) meltfirstargp_; /* use arguments output_curframe_declstruct_init */ (void) meltclosp_; (void) meltfirstargp_; (void) meltxargdescr_; (void) meltxargtab_; (void) meltxresdescr_; (void) meltxrestab_; gt_ggc_mx_melt_un (meltframptr_->mcfr_clos); for (ix = 0; ix < 16; ix++) if (meltframptr_->mcfr_varptr[ix]) gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]); return NULL; } /*end markggc */ ; memset (&meltfram__, 0, sizeof (meltfram__)); /* declstructinit plain routine meltrout_1_warmelt_normatch_SCANPAT_ANYRECV nbval 16*/ meltfram__.mcfr_nbvar = 16 /*nbval */ ; meltfram__.mcfr_clos = meltclosp_; meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe; melt_topframe = (struct melt_callframe_st *) &meltfram__; melt_trace_start ("SCANPAT_ANYRECV", meltcallcount); /*getargs*/ /*getarg#0 */ MELT_LOCATION ("warmelt-normatch.melt:86:/ getarg"); /*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ /*^getarg */ if (meltxargdescr_[0] != MELTBPAR_PTR) goto lab_endgetargs; /*_.PSLOC__V3*/ meltfptr[2] = (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL; gcc_assert (melt_discr ((melt_ptr_t) ( /*_.PSLOC__V3*/ meltfptr[2])) != NULL); /*getarg#2 */ /*^getarg */ if (meltxargdescr_[1] != MELTBPAR_PTR) goto lab_endgetargs; /*_.CTYP__V4*/ meltfptr[3] = (meltxargtab_[1].meltbp_aptr) ? (*(meltxargtab_[1].meltbp_aptr)) : NULL; gcc_assert (melt_discr ((melt_ptr_t) ( /*_.CTYP__V4*/ meltfptr[3])) != NULL); /*getarg#3 */ /*^getarg */ if (meltxargdescr_[2] != MELTBPAR_PTR) goto lab_endgetargs; /*_.PCN__V5*/ meltfptr[4] = (meltxargtab_[2].meltbp_aptr) ? (*(meltxargtab_[2].meltbp_aptr)) : NULL; gcc_assert (melt_discr ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4])) != NULL); ; goto lab_endgetargs; lab_endgetargs:; /*body*/ /*^block*/ /*anyblock*/ { #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-normatch.melt:87:/ cppif.then"); /*^block */ /*anyblock */ { { /*^locexp */ /*melt_increment_dbgcounter */ #if MELT_HAVE_DEBUG melt_dbgcounter++; #endif ; } ; MELT_CHECK_SIGNAL (); ; /*_#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:87:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = #ifdef meltcallcount meltcallcount /* the_meltcallcount */ #else 0L #endif /* meltcallcount the_meltcallcount */ ;; MELT_CHECK_SIGNAL (); ; MELT_LOCATION ("warmelt-normatch.melt:87:/ 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 = 87; /*^apply.arg */ argtab[3].meltbp_cstring = "scanpat_anypattern recv"; /*^apply.arg */ argtab[4].meltbp_aptr = (melt_ptr_t *) & /*_.RECV__V2*/ meltfptr[1]; /*_.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 ""), argtab, "", (union meltparam_un *) 0); } ; /*_.IF___V7*/ meltfptr[6] = /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7];; /*epilog */ MELT_LOCATION ("warmelt-normatch.melt:87:/ 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:87:/ quasiblock"); /*_.PROGN___V9*/ meltfptr[7] = /*_.IF___V7*/ meltfptr[6];; /*^compute */ /*_.IFCPP___V6*/ meltfptr[5] = /*_.PROGN___V9*/ meltfptr[7];; /*epilog */ MELT_LOCATION ("warmelt-normatch.melt:87:/ 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 */ ; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-normatch.melt:88:/ cppif.then"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*_#IS_A__L3*/ meltfnum[1] = 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:88:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ /*_.IFELSE___V11*/ meltfptr[7] = ( /*nil */ NULL);; } else { MELT_LOCATION ("warmelt-normatch.melt:88:/ cond.else"); /*^block */ /*anyblock */ { { /*^locexp */ melt_assert_failed (("check pcn"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (88) ? (88) : __LINE__, __FUNCTION__); ; } ; /*clear *//*_.IFELSE___V11*/ meltfptr[7] = 0; /*epilog */ } ; } ; /*^compute */ /*_.IFCPP___V10*/ meltfptr[6] = /*_.IFELSE___V11*/ meltfptr[7];; /*epilog */ MELT_LOCATION ("warmelt-normatch.melt:88:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V11*/ meltfptr[7] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V10*/ meltfptr[6] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION ("warmelt-normatch.melt:89:/ quasiblock"); /*_.MYCLASS__V13*/ meltfptr[12] = ((melt_ptr_t) (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.then */ /*^getslot */ { melt_ptr_t slot = NULL, obj = NULL; obj = (melt_ptr_t) ( /*_.MYCLASS__V13*/ meltfptr[12]) /*=obj*/ ; melt_object_get_field (slot, obj, 1, "NAMED_NAME"); /*_.MYCLASSNAME__V14*/ meltfptr[13] = slot; }; ; } else { /*^cond.else */ /*_.MYCLASSNAME__V14*/ meltfptr[13] = NULL;; } ; { MELT_LOCATION ("warmelt-normatch.melt:91:/ locexp"); melt_error_str ((melt_ptr_t) ( /*_.PSLOC__V3*/ meltfptr[2]), ("unimplemented scan_pattern for any "), (melt_ptr_t) ( /*_.MYCLASSNAME__V14*/ meltfptr[13])); } ; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-normatch.melt:93:/ cppif.then"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^cond */ /*cond */ if (( /*nil */ NULL)) /*then */ { /*^cond.then */ /*_.IFELSE___V16*/ meltfptr[15] = ( /*nil */ NULL);; } else { MELT_LOCATION ("warmelt-normatch.melt:93:/ cond.else"); /*^block */ /*anyblock */ { { /*^locexp */ melt_assert_failed (("catchall scan_pattern unimplemented for any receiver"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (93) ? (93) : __LINE__, __FUNCTION__); ; } ; /*clear *//*_.IFELSE___V16*/ meltfptr[15] = 0; /*epilog */ } ; } ; /*^compute */ /*_.IFCPP___V15*/ meltfptr[14] = /*_.IFELSE___V16*/ meltfptr[15];; /*epilog */ MELT_LOCATION ("warmelt-normatch.melt:93:/ clear"); /*clear *//*_.IFELSE___V16*/ meltfptr[15] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V15*/ meltfptr[14] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; /*^compute */ /*_.LET___V12*/ meltfptr[7] = /*_.IFCPP___V15*/ meltfptr[14];; MELT_LOCATION ("warmelt-normatch.melt:89:/ clear"); /*clear *//*_.MYCLASS__V13*/ meltfptr[12] = 0; /*^clear */ /*clear *//*_.MYCLASSNAME__V14*/ meltfptr[13] = 0; /*^clear */ /*clear *//*_.IFCPP___V15*/ meltfptr[14] = 0; MELT_CHECK_SIGNAL (); ; MELT_LOCATION ("warmelt-normatch.melt:86:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[7];; { MELT_LOCATION ("warmelt-normatch.melt:86:/ locexp"); /*ochecknores compilobj_nrep_return */ #if MELT_HAVE_DEBUG if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) melt_warn_for_no_expected_secondary_results (); /* we warned when secondary results are expected but not returned. */ #endif /*MELT_HAVE_DEBUG */ ; } ; /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ /*^clear */ /*clear *//*_.IFCPP___V6*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_.IFCPP___V10*/ meltfptr[6] = 0; /*^clear */ /*clear *//*_.LET___V12*/ meltfptr[7] = 0; } ; goto labend_rout; labend_rout: melt_trace_end ("SCANPAT_ANYRECV", meltcallcount); MELT_TRACE_EXIT_LOCATION (); melt_blocklevel_signals = current_blocklevel_signals_meltrout_1_warmelt_normatch_SCANPAT_ANYRECV_melt; 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_1_warmelt_normatch_SCANPAT_ANYRECV */ 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_) { long current_blocklevel_signals_meltrout_2_warmelt_normatch_SCANPAT_ANYPATTERN_melt = melt_blocklevel_signals; #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_2_warmelt_normatch_SCANPAT_ANYPATTERN_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; #undef MELTFRAM_NBVARPTR #undef MELTFRAM_NBVARNUM #define MELTFRAM_NBVARPTR 22 melt_ptr_t mcfr_varptr[22]; #define MELTFRAM_NBVARNUM 6 long mcfr_varnum[6]; /*others*/ long _spare_; } *meltframptr_ = 0, meltfram__; /*declfrastruct */ #define meltframe meltfram__ /*meltrout_2_warmelt_normatch_SCANPAT_ANYPATTERN is not initial declstructinit */ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC)) { /*mark for ggc */ int ix = 0; meltframptr_ = (struct frame_meltrout_2_warmelt_normatch_SCANPAT_ANYPATTERN_st *) meltfirstargp_; /* use arguments output_curframe_declstruct_init */ (void) meltclosp_; (void) meltfirstargp_; (void) meltxargdescr_; (void) meltxargtab_; (void) meltxresdescr_; (void) meltxrestab_; gt_ggc_mx_melt_un (meltframptr_->mcfr_clos); for (ix = 0; ix < 22; ix++) if (meltframptr_->mcfr_varptr[ix]) gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]); return NULL; } /*end markggc */ ; memset (&meltfram__, 0, sizeof (meltfram__)); /* declstructinit plain routine meltrout_2_warmelt_normatch_SCANPAT_ANYPATTERN nbval 22*/ meltfram__.mcfr_nbvar = 22 /*nbval */ ; meltfram__.mcfr_clos = meltclosp_; meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe; melt_topframe = (struct melt_callframe_st *) &meltfram__; melt_trace_start ("SCANPAT_ANYPATTERN", meltcallcount); /*getargs*/ /*getarg#0 */ MELT_LOCATION ("warmelt-normatch.melt:101:/ getarg"); /*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ /*^getarg */ if (meltxargdescr_[0] != MELTBPAR_PTR) goto lab_endgetargs; /*_.PSLOC__V3*/ meltfptr[2] = (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL; gcc_assert (melt_discr ((melt_ptr_t) ( /*_.PSLOC__V3*/ meltfptr[2])) != NULL); /*getarg#2 */ /*^getarg */ if (meltxargdescr_[1] != MELTBPAR_PTR) goto lab_endgetargs; /*_.CTYP__V4*/ meltfptr[3] = (meltxargtab_[1].meltbp_aptr) ? (*(meltxargtab_[1].meltbp_aptr)) : NULL; gcc_assert (melt_discr ((melt_ptr_t) ( /*_.CTYP__V4*/ meltfptr[3])) != NULL); /*getarg#3 */ /*^getarg */ if (meltxargdescr_[2] != MELTBPAR_PTR) goto lab_endgetargs; /*_.PCN__V5*/ meltfptr[4] = (meltxargtab_[2].meltbp_aptr) ? (*(meltxargtab_[2].meltbp_aptr)) : NULL; gcc_assert (melt_discr ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4])) != NULL); ; goto lab_endgetargs; lab_endgetargs:; /*body*/ /*^block*/ /*anyblock*/ { #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-normatch.melt:102:/ cppif.then"); /*^block */ /*anyblock */ { { /*^locexp */ /*melt_increment_dbgcounter */ #if MELT_HAVE_DEBUG melt_dbgcounter++; #endif ; } ; MELT_CHECK_SIGNAL (); ; /*_#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:102:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = #ifdef meltcallcount meltcallcount /* the_meltcallcount */ #else 0L #endif /* meltcallcount the_meltcallcount */ ;; MELT_CHECK_SIGNAL (); ; MELT_LOCATION ("warmelt-normatch.melt:102:/ 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 = 102; /*^apply.arg */ argtab[3].meltbp_cstring = "scanpat_anypattern recv"; /*^apply.arg */ argtab[4].meltbp_aptr = (melt_ptr_t *) & /*_.RECV__V2*/ meltfptr[1]; /*_.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 ""), argtab, "", (union meltparam_un *) 0); } ; /*_.IF___V7*/ meltfptr[6] = /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7];; /*epilog */ MELT_LOCATION ("warmelt-normatch.melt:102:/ 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:102:/ quasiblock"); /*_.PROGN___V9*/ meltfptr[7] = /*_.IF___V7*/ meltfptr[6];; /*^compute */ /*_.IFCPP___V6*/ meltfptr[5] = /*_.PROGN___V9*/ meltfptr[7];; /*epilog */ MELT_LOCATION ("warmelt-normatch.melt:102:/ 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 */ ; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-normatch.melt:103:/ cppif.then"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*_#IS_A__L3*/ meltfnum[1] = melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN */ meltfrout->tabval[1])));; MELT_LOCATION ("warmelt-normatch.melt:103:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ /*_.IFELSE___V11*/ meltfptr[7] = ( /*nil */ NULL);; } else { MELT_LOCATION ("warmelt-normatch.melt:103:/ cond.else"); /*^block */ /*anyblock */ { { /*^locexp */ melt_assert_failed (("check recv"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (103) ? (103) : __LINE__, __FUNCTION__); ; } ; /*clear *//*_.IFELSE___V11*/ meltfptr[7] = 0; /*epilog */ } ; } ; /*^compute */ /*_.IFCPP___V10*/ meltfptr[6] = /*_.IFELSE___V11*/ meltfptr[7];; /*epilog */ MELT_LOCATION ("warmelt-normatch.melt:103:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V11*/ meltfptr[7] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V10*/ meltfptr[6] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-normatch.melt:104:/ cppif.then"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*_#IS_A__L4*/ meltfnum[0] = 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:104:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */ { /*^cond.then */ /*_.IFELSE___V13*/ meltfptr[12] = ( /*nil */ NULL);; } else { MELT_LOCATION ("warmelt-normatch.melt:104:/ cond.else"); /*^block */ /*anyblock */ { { /*^locexp */ melt_assert_failed (("check pcn"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (104) ? (104) : __LINE__, __FUNCTION__); ; } ; /*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0; /*epilog */ } ; } ; /*^compute */ /*_.IFCPP___V12*/ meltfptr[7] = /*_.IFELSE___V13*/ meltfptr[12];; /*epilog */ MELT_LOCATION ("warmelt-normatch.melt:104:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V12*/ meltfptr[7] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION ("warmelt-normatch.melt:105:/ quasiblock"); /*_.MYCLASS__V15*/ meltfptr[14] = ((melt_ptr_t) (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.then */ /*^getslot */ { melt_ptr_t slot = NULL, obj = NULL; obj = (melt_ptr_t) ( /*_.MYCLASS__V15*/ meltfptr[14]) /*=obj*/ ; melt_object_get_field (slot, obj, 1, "NAMED_NAME"); /*_.MYCLASSNAME__V16*/ meltfptr[15] = slot; }; ; } else { /*^cond.else */ /*_.MYCLASSNAME__V16*/ meltfptr[15] = NULL;; } ; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-normatch.melt:107:/ cppif.then"); /*^block */ /*anyblock */ { { /*^locexp */ /*melt_increment_dbgcounter */ #if MELT_HAVE_DEBUG melt_dbgcounter++; #endif ; } ; MELT_CHECK_SIGNAL (); ; /*_#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:107:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { /*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] = #ifdef meltcallcount meltcallcount /* the_meltcallcount */ #else 0L #endif /* meltcallcount the_meltcallcount */ ;; MELT_CHECK_SIGNAL (); ; MELT_LOCATION ("warmelt-normatch.melt:107:/ 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 = 107; /*^apply.arg */ argtab[3].meltbp_cstring = "scanpat_anypattern myclass [discrim of recv]"; /*^apply.arg */ argtab[4].meltbp_aptr = (melt_ptr_t *) & /*_.MYCLASS__V15*/ meltfptr[14]; /*_.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:107:/ 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:107:/ quasiblock"); /*_.PROGN___V20*/ meltfptr[18] = /*_.IF___V18*/ meltfptr[17];; /*^compute */ /*_.IFCPP___V17*/ meltfptr[16] = /*_.PROGN___V20*/ meltfptr[18];; /*epilog */ MELT_LOCATION ("warmelt-normatch.melt:107:/ 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-normatch.melt:108:/ locexp"); melt_error_str ((melt_ptr_t) ( /*_.PSLOC__V3*/ meltfptr[2]), ("unimplemented scan_pattern for pattern "), (melt_ptr_t) ( /*_.MYCLASSNAME__V16*/ meltfptr[15])); } ; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-normatch.melt:110:/ cppif.then"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^cond */ /*cond */ if (( /*nil */ NULL)) /*then */ { /*^cond.then */ /*_.IFELSE___V22*/ meltfptr[18] = ( /*nil */ NULL);; } else { MELT_LOCATION ("warmelt-normatch.melt:110:/ cond.else"); /*^block */ /*anyblock */ { { /*^locexp */ melt_assert_failed (("catchall scan_pattern unimplemented for pattern"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (110) ? (110) : __LINE__, __FUNCTION__); ; } ; /*clear *//*_.IFELSE___V22*/ meltfptr[18] = 0; /*epilog */ } ; } ; /*^compute */ /*_.IFCPP___V21*/ meltfptr[17] = /*_.IFELSE___V22*/ meltfptr[18];; /*epilog */ MELT_LOCATION ("warmelt-normatch.melt:110:/ clear"); /*clear *//*_.IFELSE___V22*/ meltfptr[18] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V21*/ meltfptr[17] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; /*^compute */ /*_.LET___V14*/ meltfptr[12] = /*_.IFCPP___V21*/ meltfptr[17];; MELT_LOCATION ("warmelt-normatch.melt:105:/ clear"); /*clear *//*_.MYCLASS__V15*/ meltfptr[14] = 0; /*^clear */ /*clear *//*_.MYCLASSNAME__V16*/ meltfptr[15] = 0; /*^clear */ /*clear *//*_.IFCPP___V17*/ meltfptr[16] = 0; /*^clear */ /*clear *//*_.IFCPP___V21*/ meltfptr[17] = 0; MELT_CHECK_SIGNAL (); ; MELT_LOCATION ("warmelt-normatch.melt:101:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[12];; { MELT_LOCATION ("warmelt-normatch.melt:101:/ locexp"); /*ochecknores compilobj_nrep_return */ #if MELT_HAVE_DEBUG if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) melt_warn_for_no_expected_secondary_results (); /* we warned when secondary results are expected but not returned. */ #endif /*MELT_HAVE_DEBUG */ ; } ; /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ /*^clear */ /*clear *//*_.IFCPP___V6*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_.IFCPP___V10*/ meltfptr[6] = 0; /*^clear */ /*clear *//*_.IFCPP___V12*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.LET___V14*/ meltfptr[12] = 0; } ; goto labend_rout; labend_rout: melt_trace_end ("SCANPAT_ANYPATTERN", meltcallcount); MELT_TRACE_EXIT_LOCATION (); melt_blocklevel_signals = current_blocklevel_signals_meltrout_2_warmelt_normatch_SCANPAT_ANYPATTERN_melt; 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_2_warmelt_normatch_SCANPAT_ANYPATTERN */ 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_) { long current_blocklevel_signals_meltrout_3_warmelt_normatch_SCANPAT_SRCPATVAR_melt = melt_blocklevel_signals; #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_3_warmelt_normatch_SCANPAT_SRCPATVAR_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; #undef MELTFRAM_NBVARPTR #undef MELTFRAM_NBVARNUM #define MELTFRAM_NBVARPTR 37 melt_ptr_t mcfr_varptr[37]; #define MELTFRAM_NBVARNUM 13 long mcfr_varnum[13]; /*others*/ long _spare_; } *meltframptr_ = 0, meltfram__; /*declfrastruct */ #define meltframe meltfram__ /*meltrout_3_warmelt_normatch_SCANPAT_SRCPATVAR is not initial declstructinit */ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC)) { /*mark for ggc */ int ix = 0; meltframptr_ = (struct frame_meltrout_3_warmelt_normatch_SCANPAT_SRCPATVAR_st *) meltfirstargp_; /* use arguments output_curframe_declstruct_init */ (void) meltclosp_; (void) meltfirstargp_; (void) meltxargdescr_; (void) meltxargtab_; (void) meltxresdescr_; (void) meltxrestab_; 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__)); /* declstructinit plain routine meltrout_3_warmelt_normatch_SCANPAT_SRCPATVAR nbval 37*/ meltfram__.mcfr_nbvar = 37 /*nbval */ ; meltfram__.mcfr_clos = meltclosp_; meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe; melt_topframe = (struct melt_callframe_st *) &meltfram__; melt_trace_start ("SCANPAT_SRCPATVAR", meltcallcount); /*getargs*/ /*getarg#0 */ MELT_LOCATION ("warmelt-normatch.melt:117:/ getarg"); /*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ /*^getarg */ if (meltxargdescr_[0] != MELTBPAR_PTR) goto lab_endgetargs; /*_.PSLOC__V3*/ meltfptr[2] = (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL; gcc_assert (melt_discr ((melt_ptr_t) ( /*_.PSLOC__V3*/ meltfptr[2])) != NULL); /*getarg#2 */ /*^getarg */ if (meltxargdescr_[1] != MELTBPAR_PTR) goto lab_endgetargs; /*_.CTYP__V4*/ meltfptr[3] = (meltxargtab_[1].meltbp_aptr) ? (*(meltxargtab_[1].meltbp_aptr)) : NULL; gcc_assert (melt_discr ((melt_ptr_t) ( /*_.CTYP__V4*/ meltfptr[3])) != NULL); /*getarg#3 */ /*^getarg */ if (meltxargdescr_[2] != MELTBPAR_PTR) goto lab_endgetargs; /*_.PCN__V5*/ meltfptr[4] = (meltxargtab_[2].meltbp_aptr) ? (*(meltxargtab_[2].meltbp_aptr)) : NULL; gcc_assert (melt_discr ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4])) != NULL); ; goto lab_endgetargs; lab_endgetargs:; /*body*/ /*^block*/ /*anyblock*/ { #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-normatch.melt:118:/ cppif.then"); /*^block */ /*anyblock */ { { /*^locexp */ /*melt_increment_dbgcounter */ #if MELT_HAVE_DEBUG melt_dbgcounter++; #endif ; } ; MELT_CHECK_SIGNAL (); ; /*_#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:118:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = #ifdef meltcallcount meltcallcount /* the_meltcallcount */ #else 0L #endif /* meltcallcount the_meltcallcount */ ;; MELT_CHECK_SIGNAL (); ; MELT_LOCATION ("warmelt-normatch.melt:118:/ 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 = 118; /*^apply.arg */ argtab[3].meltbp_cstring = "scanpat_srcpatvar recv"; /*^apply.arg */ argtab[4].meltbp_aptr = (melt_ptr_t *) & /*_.RECV__V2*/ meltfptr[1]; /*_.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 ""), argtab, "", (union meltparam_un *) 0); } ; /*_.IF___V7*/ meltfptr[6] = /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7];; /*epilog */ MELT_LOCATION ("warmelt-normatch.melt:118:/ 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:118:/ quasiblock"); /*_.PROGN___V9*/ meltfptr[7] = /*_.IF___V7*/ meltfptr[6];; /*^compute */ /*_.IFCPP___V6*/ meltfptr[5] = /*_.PROGN___V9*/ meltfptr[7];; /*epilog */ MELT_LOCATION ("warmelt-normatch.melt:118:/ 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 */ ; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-normatch.melt:119:/ cppif.then"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*_#IS_A__L3*/ meltfnum[1] = 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:119:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ /*_.IFELSE___V11*/ meltfptr[7] = ( /*nil */ NULL);; } else { MELT_LOCATION ("warmelt-normatch.melt:119:/ cond.else"); /*^block */ /*anyblock */ { { /*^locexp */ melt_assert_failed (("check pcn"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (119) ? (119) : __LINE__, __FUNCTION__); ; } ; /*clear *//*_.IFELSE___V11*/ meltfptr[7] = 0; /*epilog */ } ; } ; /*^compute */ /*_.IFCPP___V10*/ meltfptr[6] = /*_.IFELSE___V11*/ meltfptr[7];; /*epilog */ MELT_LOCATION ("warmelt-normatch.melt:119:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V11*/ meltfptr[7] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V10*/ meltfptr[6] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-normatch.melt:120:/ cppif.then"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*_#IS_A__L4*/ meltfnum[0] = melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_VARIABLE */ meltfrout->tabval[2])));; MELT_LOCATION ("warmelt-normatch.melt:120:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */ { /*^cond.then */ /*_.IFELSE___V13*/ meltfptr[12] = ( /*nil */ NULL);; } else { MELT_LOCATION ("warmelt-normatch.melt:120:/ cond.else"); /*^block */ /*anyblock */ { { /*^locexp */ melt_assert_failed (("check recv"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (120) ? (120) : __LINE__, __FUNCTION__); ; } ; /*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0; /*epilog */ } ; } ; /*^compute */ /*_.IFCPP___V12*/ meltfptr[7] = /*_.IFELSE___V13*/ meltfptr[12];; /*epilog */ MELT_LOCATION ("warmelt-normatch.melt:120:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V12*/ meltfptr[7] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION ("warmelt-normatch.melt:121:/ quasiblock"); /*^getslot */ { melt_ptr_t slot = NULL, obj = NULL; obj = (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]) /*=obj*/ ; melt_object_get_field (slot, obj, 1, "LOCA_LOCATION"); /*_.SLOC__V14*/ meltfptr[12] = slot; }; ; MELT_LOCATION ("warmelt-normatch.melt:122:/ getslot"); { melt_ptr_t slot = NULL, obj = NULL; obj = (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]) /*=obj*/ ; melt_object_get_field (slot, obj, 3, "SPATVAR_SYMB"); /*_.SVAR__V15*/ meltfptr[14] = slot; }; ; MELT_LOCATION ("warmelt-normatch.melt:123:/ getslot"); { melt_ptr_t slot = NULL, obj = NULL; obj = (melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]) /*=obj*/ ; melt_object_get_field (slot, obj, 3, "PCTN_MAPATVAR"); /*_.MAPVAR__V16*/ meltfptr[15] = slot; }; ; MELT_LOCATION ("warmelt-normatch.melt:124:/ getslot"); { melt_ptr_t slot = NULL, obj = NULL; obj = (melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4]) /*=obj*/ ; melt_object_get_field (slot, obj, 10, "PCTN_VARHANDLERS"); /*_.VARHDLERLIST__V17*/ meltfptr[16] = slot; }; ; /*_.MVAR__V18*/ meltfptr[17] = /*mapobject_get */ melt_get_mapobjects ((meltmapobjects_ptr_t) ( /*_.MAPVAR__V16*/ meltfptr[15]), (meltobject_ptr_t) ( /*_.SVAR__V15*/ meltfptr[14]));; MELT_CHECK_SIGNAL (); ; /*^compute */ /*_#NULL__L5*/ meltfnum[1] = (( /*_.MVAR__V18*/ meltfptr[17]) == NULL);; MELT_LOCATION ("warmelt-normatch.melt:127:/ cond"); /*cond */ if ( /*_#NULL__L5*/ meltfnum[1]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { { MELT_LOCATION ("warmelt-normatch.melt:128:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.MAPVAR__V16*/ meltfptr[15]), (meltobject_ptr_t) ( /*_.SVAR__V15*/ meltfptr[14]), (melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1])); } ; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-normatch.melt:129:/ cppif.then"); /*^block */ /*anyblock */ { { /*^locexp */ /*melt_increment_dbgcounter */ #if MELT_HAVE_DEBUG melt_dbgcounter++; #endif ; } ; MELT_CHECK_SIGNAL (); ; /*_#MELT_NEED_DBG__L6*/ 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:129:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[0]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { /*_#THE_MELTCALLCOUNT__L7*/ meltfnum[6] = #ifdef meltcallcount meltcallcount /* the_meltcallcount */ #else 0L #endif /* meltcallcount the_meltcallcount */ ;; MELT_CHECK_SIGNAL (); ; MELT_LOCATION ("warmelt-normatch.melt:129:/ 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 = 129; /*^apply.arg */ argtab[3].meltbp_cstring = "scanpat_srcpatvar return new svar"; /*^apply.arg */ argtab[4].meltbp_aptr = (melt_ptr_t *) & /*_.SVAR__V15*/ meltfptr[14]; /*_.MELT_DEBUG_FUN__V22*/ 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___V21*/ meltfptr[20] = /*_.MELT_DEBUG_FUN__V22*/ meltfptr[21];; /*epilog */ MELT_LOCATION ("warmelt-normatch.melt:129:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[6] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V22*/ meltfptr[21] = 0; } ; } else { /*^cond.else */ /*_.IF___V21*/ meltfptr[20] = NULL;; } ; MELT_LOCATION ("warmelt-normatch.melt:129:/ quasiblock"); /*_.PROGN___V23*/ meltfptr[21] = /*_.IF___V21*/ meltfptr[20];; /*^compute */ /*_.IFCPP___V20*/ meltfptr[19] = /*_.PROGN___V23*/ meltfptr[21];; /*epilog */ MELT_LOCATION ("warmelt-normatch.melt:129:/ clear"); /*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[0] = 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-normatch.melt:130:/ compute"); /*_.MVAR__V18*/ meltfptr[17] = /*_.SETQ___V24*/ meltfptr[20] = /*_.RECV__V2*/ meltfptr[1];; MELT_LOCATION ("warmelt-normatch.melt:127:/ quasiblock"); /*_.PROGN___V25*/ meltfptr[21] = /*_.SETQ___V24*/ meltfptr[20];; /*^compute */ /*_.IFELSE___V19*/ meltfptr[18] = /*_.PROGN___V25*/ meltfptr[21];; /*epilog */ MELT_LOCATION ("warmelt-normatch.melt:127:/ clear"); /*clear *//*_.IFCPP___V20*/ meltfptr[19] = 0; /*^clear */ /*clear *//*_.SETQ___V24*/ meltfptr[20] = 0; /*^clear */ /*clear *//*_.PROGN___V25*/ meltfptr[21] = 0; } ; } else { /*^cond.else */ /*^block */ /*anyblock */ { #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-normatch.melt:133:/ cppif.then"); /*^block */ /*anyblock */ { { /*^locexp */ /*melt_increment_dbgcounter */ #if MELT_HAVE_DEBUG melt_dbgcounter++; #endif ; } ; MELT_CHECK_SIGNAL (); ; /*_#MELT_NEED_DBG__L8*/ 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:133:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L8*/ meltfnum[6]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { /*_#THE_MELTCALLCOUNT__L9*/ meltfnum[0] = #ifdef meltcallcount meltcallcount /* the_meltcallcount */ #else 0L #endif /* meltcallcount the_meltcallcount */ ;; MELT_CHECK_SIGNAL (); ; MELT_LOCATION ("warmelt-normatch.melt:133:/ apply"); /*apply */ { union meltparam_un argtab[5]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L9*/ meltfnum[0]; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-normatch.melt"; /*^apply.arg */ argtab[2].meltbp_long = 133; /*^apply.arg */ argtab[3].meltbp_cstring = "scanpat_srcpatvar return found mvar"; /*^apply.arg */ argtab[4].meltbp_aptr = (melt_ptr_t *) & /*_.MVAR__V18*/ meltfptr[17]; /*_.MELT_DEBUG_FUN__V28*/ 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___V27*/ meltfptr[20] = /*_.MELT_DEBUG_FUN__V28*/ meltfptr[21];; /*epilog */ MELT_LOCATION ("warmelt-normatch.melt:133:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L9*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V28*/ meltfptr[21] = 0; } ; } else { /*^cond.else */ /*_.IF___V27*/ meltfptr[20] = NULL;; } ; MELT_LOCATION ("warmelt-normatch.melt:133:/ quasiblock"); /*_.PROGN___V29*/ meltfptr[21] = /*_.IF___V27*/ meltfptr[20];; /*^compute */ /*_.IFCPP___V26*/ meltfptr[19] = /*_.PROGN___V29*/ meltfptr[21];; /*epilog */ MELT_LOCATION ("warmelt-normatch.melt:133:/ clear"); /*clear *//*_#MELT_NEED_DBG__L8*/ meltfnum[6] = 0; /*^clear */ /*clear *//*_.IF___V27*/ meltfptr[20] = 0; /*^clear */ /*clear *//*_.PROGN___V29*/ meltfptr[21] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V26*/ meltfptr[19] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION ("warmelt-normatch.melt:132:/ quasiblock"); /*_.PROGN___V30*/ meltfptr[20] = /*_.IFCPP___V26*/ meltfptr[19];; /*^compute */ /*_.IFELSE___V19*/ meltfptr[18] = /*_.PROGN___V30*/ meltfptr[20];; /*epilog */ MELT_LOCATION ("warmelt-normatch.melt:127:/ clear"); /*clear *//*_.IFCPP___V26*/ meltfptr[19] = 0; /*^clear */ /*clear *//*_.PROGN___V30*/ meltfptr[20] = 0; } ; } ; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-normatch.melt:135:/ cppif.then"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*_#IS_A__L10*/ meltfnum[0] = melt_is_instance_of ((melt_ptr_t) ( /*_.MVAR__V18*/ meltfptr[17]), (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_VARIABLE */ meltfrout->tabval[2])));; MELT_LOCATION ("warmelt-normatch.melt:135:/ cond"); /*cond */ if ( /*_#IS_A__L10*/ meltfnum[0]) /*then */ { /*^cond.then */ /*_.IFELSE___V32*/ meltfptr[19] = ( /*nil */ NULL);; } else { MELT_LOCATION ("warmelt-normatch.melt:135:/ cond.else"); /*^block */ /*anyblock */ { { /*^locexp */ melt_assert_failed (("check mvar"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (135) ? (135) : __LINE__, __FUNCTION__); ; } ; /*clear *//*_.IFELSE___V32*/ meltfptr[19] = 0; /*epilog */ } ; } ; /*^compute */ /*_.IFCPP___V31*/ meltfptr[21] = /*_.IFELSE___V32*/ meltfptr[19];; /*epilog */ MELT_LOCATION ("warmelt-normatch.melt:135:/ clear"); /*clear *//*_#IS_A__L10*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V32*/ meltfptr[19] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V31*/ meltfptr[21] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION ("warmelt-normatch.melt:136:/ quasiblock"); /*^getslot */ { melt_ptr_t slot = NULL, obj = NULL; obj = (melt_ptr_t) ( /*_.MVAR__V18*/ meltfptr[17]) /*=obj*/ ; melt_object_get_field (slot, obj, 4, "SPATVAR_NBOCC"); /*_.NBOCCBOX__V33*/ meltfptr[20] = slot; }; ; /*_#NBOCC__L11*/ meltfnum[6] = (melt_get_int ((melt_ptr_t) ( /*_.NBOCCBOX__V33*/ meltfptr[20])));; /*^compute */ /*_#I__L12*/ meltfnum[0] = (( /*_#NBOCC__L11*/ meltfnum[6]) + (1));; { MELT_LOCATION ("warmelt-normatch.melt:139:/ locexp"); melt_put_int ((melt_ptr_t) ( /*_.NBOCCBOX__V33*/ meltfptr[20]), ( /*_#I__L12*/ meltfnum[0])); } ; MELT_LOCATION ("warmelt-normatch.melt:136:/ clear"); /*clear *//*_.NBOCCBOX__V33*/ meltfptr[20] = 0; /*^clear */ /*clear *//*_#NBOCC__L11*/ meltfnum[6] = 0; /*^clear */ /*clear *//*_#I__L12*/ meltfnum[0] = 0; /*citerblock FOREACH_IN_LIST */ { /* start foreach_in_list meltcit1__EACHLIST */ for ( /*_.CURPAIR__V34*/ meltfptr[19] = melt_list_first ((melt_ptr_t) /*_.VARHDLERLIST__V17*/ meltfptr[16]); melt_magic_discr ((melt_ptr_t) /*_.CURPAIR__V34*/ meltfptr[19]) == MELTOBMAG_PAIR; /*_.CURPAIR__V34*/ meltfptr[19] = melt_pair_tail ((melt_ptr_t) /*_.CURPAIR__V34*/ meltfptr[19])) { /*_.CURHDLER__V35*/ meltfptr[20] = melt_pair_head ((melt_ptr_t) /*_.CURPAIR__V34*/ meltfptr[19]); MELT_CHECK_SIGNAL (); ; /*_#IS_CLOSURE__L13*/ meltfnum[6] = (melt_magic_discr ((melt_ptr_t) ( /*_.CURHDLER__V35*/ meltfptr[20])) == MELTOBMAG_CLOSURE);; MELT_LOCATION ("warmelt-normatch.melt:143:/ cond"); /*cond */ if ( /*_#IS_CLOSURE__L13*/ meltfnum[6]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; MELT_LOCATION ("warmelt-normatch.melt:144:/ apply"); /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PCN__V5*/ meltfptr[4]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.RECV__V2*/ meltfptr[1]; /*_.CURHDLER__V37*/ meltfptr[36] = melt_apply ((meltclosure_ptr_t) ( /*_.CURHDLER__V35*/ meltfptr[20]), (melt_ptr_t) ( /*_.MVAR__V18*/ meltfptr[17]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*_.IF___V36*/ meltfptr[35] = /*_.CURHDLER__V37*/ meltfptr[36];; /*epilog */ MELT_LOCATION ("warmelt-normatch.melt:143:/ clear"); /*clear *//*_.CURHDLER__V37*/ meltfptr[36] = 0; } ; } else { /*^cond.else */ /*_.IF___V36*/ meltfptr[35] = NULL;; } ; } /* end foreach_in_list meltcit1__EACHLIST */ /*_.CURPAIR__V34*/ meltfptr[19] = NULL; /*_.CURHDLER__V35*/ meltfptr[20] = NULL; /*citerepilog */ MELT_LOCATION ("warmelt-normatch.melt:140:/ clear"); /*clear *//*_.CURPAIR__V34*/ meltfptr[19] = 0; /*^clear */ /*clear *//*_.CURHDLER__V35*/ meltfptr[20] = 0; /*^clear */ /*clear *//*_#IS_CLOSURE__L13*/ meltfnum[6] = 0; /*^clear */ /*clear *//*_.IF___V36*/ meltfptr[35] = 0; } /*endciterblock FOREACH_IN_LIST */ ; MELT_LOCATION ("warmelt-normatch.melt:121:/ clear"); /*clear *//*_.SLOC__V14*/ meltfptr[12] = 0; /*^clear */ /*clear *//*_.SVAR__V15*/ meltfptr[14] = 0; /*^clear */ /*clear *//*_.MAPVAR__V16*/ meltfptr[15] = 0; /*^clear */ /*clear *//*_.VARHDLERLIST__V17*/ meltfptr[16] = 0; /*^clear */ /*clear *//*_.MVAR__V18*/ meltfptr[17] = 0; /*^clear */ /*clear *//*_#NULL__L5*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V19*/ meltfptr[18] = 0; /*^clear */ /*clear *//*_.IFCPP___V31*/ meltfptr[21] = 0; MELT_CHECK_SIGNAL (); ; /*epilog */ MELT_LOCATION ("warmelt-normatch.melt:117:/ clear"); /*clear *//*_.IFCPP___V6*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_.IFCPP___V10*/ meltfptr[6] = 0; /*^clear */ /*clear *//*_.IFCPP___V12*/ meltfptr[7] = 0; } ; goto labend_rout; labend_rout: melt_trace_end ("SCANPAT_SRCPATVAR", meltcallcount); MELT_TRACE_EXIT_LOCATION (); melt_blocklevel_signals = current_blocklevel_signals_meltrout_3_warmelt_normatch_SCANPAT_SRCPATVAR_melt; 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_3_warmelt_normatch_SCANPAT_SRCPATVAR */ 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_) { long current_blocklevel_signals_meltrout_4_warmelt_normatch_SCANPAT_SRCPATJOKER_melt = melt_blocklevel_signals; #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_4_warmelt_normatch_SCANPAT_SRCPATJOKER_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; #undef MELTFRAM_NBVARPTR #undef MELTFRAM_NBVARNUM #define MELTFRAM_NBVARPTR 14 melt_ptr_t mcfr_varptr[14]; #define MELTFRAM_NBVARNUM 4 long mcfr_varnum[4]; /*others*/ long _spare_; } *meltframptr_ = 0, meltfram__; /*declfrastruct */ #define meltframe meltfram__ /*meltrout_4_warmelt_normatch_SCANPAT_SRCPATJOKER is not initial declstructinit */ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC)) { /*mark for ggc */ int ix = 0; meltframptr_ = (struct frame_meltrout_4_warmelt_normatch_SCANPAT_SRCPATJOKER_st *) meltfirstargp_; /* use arguments output_curframe_declstruct_init */ (void) meltclosp_; (void) meltfirstargp_; (void) meltxargdescr_; (void) meltxargtab_; (void) meltxresdescr_; (void) meltxrestab_; gt_ggc_mx_melt_un (meltframptr_->mcfr_clos); 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__)); /* declstructinit plain routine meltrout_4_warmelt_normatch_SCANPAT_SRCPATJOKER nbval 14*/ meltfram__.mcfr_nbvar = 14 /*nbval */ ; meltfram__.mcfr_clos = meltclosp_; meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe; melt_topframe = (struct melt_callframe_st *) &meltfram__; melt_trace_start ("SCANPAT_SRCPATJOKER", meltcallcount); /*getargs*/ /*getarg#0 */ MELT_LOCATION ("warmelt-normatch.melt:151:/ getarg"); /*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ /*^getarg */ if (meltxargdescr_[0] != MELTBPAR_PTR) goto lab_endgetargs; /*_.PSLOC__V3*/ meltfptr[2] = (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL; gcc_assert (melt_discr ((melt_ptr_t) ( /*_.PSLOC__V3*/ meltfptr[2])) != NULL); /*getarg#2 */ /*^getarg */ if (meltxargdescr_[1] != MELTBPAR_PTR) goto lab_endgetargs; /*_.CTYP__V4*/ meltfptr[3] = (meltxargtab_[1].meltbp_aptr) ? (*(meltxargtab_[1].meltbp_aptr)) : NULL; gcc_assert (melt_discr ((melt_ptr_t) ( /*_.CTYP__V4*/ meltfptr[3])) != NULL); /*getarg#3 */ /*^getarg */ if (meltxargdescr_[2] != MELTBPAR_PTR) goto lab_endgetargs; /*_.PCN__V5*/ meltfptr[4] = (meltxargtab_[2].meltbp_aptr) ? (*(meltxargtab_[2].meltbp_aptr)) : NULL; gcc_assert (melt_discr ((melt_ptr_t) ( /*_.PCN__V5*/ meltfptr[4])) != NULL); ; goto lab_endgetargs; lab_endgetargs:; /*body*/ /*^block*/ /*anyblock*/ { #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-normatch.melt:152:/ cppif.then"); /*^block */ /*anyblock */ { { /*^locexp */ /*melt_increment_dbgcounter */ #if MELT_HAVE_DEBUG melt_dbgcounter++; #endif ; } ; MELT_CHECK_SIGNAL (); ; /*_#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:152:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = #ifdef meltcallcount meltcallcount /* the_meltcallcount */ #else 0L #endif /* meltcallcount the_meltcallcount */ ;; MELT_CHECK_SIGNAL (); ; MELT_LOCATION ("warmelt-normatch.melt:152:/ 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 = 152; /*^apply.arg */ argtab[3].meltbp_cstring = "scanpat_srcpatjoker recv"; /*^apply.arg */ argtab[4].meltbp_aptr = (melt_ptr_t *) & /*_.RECV__V2*/ meltfptr[1]; /*_.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 ""), argtab, "", (union meltparam_un *) 0); } ; /*_.IF___V7*/ meltfptr[6] = /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7];; /*epilog */ MELT_LOCATION ("warmelt-normatch.melt:152:/ 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:152:/ quasiblock"); /*_.PROGN___V9*/ meltfptr[7] = /*_.IF___V7*/ meltfptr[6];; /*^compute */ /*_.IFCPP___V6*/ meltfptr[5] = /*_.PROGN___V9*/ meltfptr[7];; /*epilog */ MELT_LOCATION ("warmelt-normatch.melt:152:/ 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 */ ; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-normatch.melt:153:/ cppif.then"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*_#IS_A__L3*/ meltfnum[1] = 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:153:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ /*_.IFELSE___V11*/ meltfptr[7] = ( /*nil */ NULL);; } else { MELT_LOCATION ("warmelt-normatch.melt:153:/ cond.else"); /*^block */ /*anyblock */ { { /*^locexp */ melt_assert_failed (("check pcn"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (153) ? (153) : __LINE__, __FUNCTION__); ; } ; /*clear *//*_.IFELSE___V11*/ meltfptr[7] = 0; /*epilog */ } ; } ; /*^compute */ /*_.IFCPP___V10*/ meltfptr[6] = /*_.IFELSE___V11*/ meltfptr[7];; /*epilog */ MELT_LOCATION ("warmelt-normatch.melt:153:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V11*/ meltfptr[7] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V10*/ meltfptr[6] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-normatch.melt:154:/ cppif.then"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*_#IS_A__L4*/ meltfnum[0] = melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_SOURCE_PATTERN_JOKER_VARIABLE */ meltfrout->tabval[2])));; MELT_LOCATION ("warmelt-normatch.melt:154:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */ { /*^cond.then */ /*_.IFELSE___V13*/ meltfptr[12] = ( /*nil */ NULL);; } else { MELT_LOCATION ("warmelt-normatch.melt:154:/ cond.else"); /*^block */ /*anyblock */ { { /*^locexp */ melt_assert_failed (("check recv"), ("warmelt-normatch.melt") ? ("warmelt-normatch.melt") : __FILE__, (154) ? (154) : __LINE__, __FUNCTION__); ; } ; /*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0; /*epilog */ } ; } ; /*^compute */ /*_.IFCPP___V12*/ meltfptr[7] = /*_.IFELSE___V13*/ meltfptr[12];; /*epilog */ MELT_LOCATION ("warmelt-normatch.melt:154:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V12*/ meltfptr[7] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION ("warmelt-normatch.melt:156:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = NULL;; { MELT_LOCATION ("warmelt-normatch.melt:156:/ locexp"); /*ochecknores compilobj_nrep_return */ #if MELT_HAVE_DEBUG if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) melt_warn_for_no_expected_secondary_results (); /* we warned when secondary results are expected but not returned. */ #endif /*MELT_HAVE_DEBUG */ ; } ; /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_CHECK_SIGNAL (); ; MELT_LOCATION ("warmelt-normatch.melt:151:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = /*_.RETURN___V14*/ meltfptr[12];; { MELT_LOCATION ("warmelt-normatch.melt:151:/ locexp"); /*ochecknores compilobj_nrep_return */ #if MELT_HAVE_DEBUG if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) melt_warn_for_no_expected_secondary_results (); /* we warned when secondary results are expected but not returned. */ #endif /*MELT_HAVE_DEBUG */ ; } ; /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ /*^clear */ /*clear *//*_.IFCPP___V6*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_.IFCPP___V10*/ meltfptr[6] = 0; /*^clear */ /*clear *//*_.IFCPP___V12*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.RETURN___V14*/ meltfptr[12] = 0; } ; goto labend_rout; labend_rout: melt_trace_end ("SCANPAT_SRCPATJOKER", meltcallcount); MELT_TRACE_EXIT_LOCATION (); melt_blocklevel_signals = current_blocklevel_signals_meltrout_4_warmelt_normatch_SCANPAT_SRCPATJOKER_melt; 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_4_warmelt_normatch_SCANPAT_SRCPATJOKER */ /*no syntax testing generated*/ typedef struct frame_melt_start_this_module_st { int mcfr_nbvar; #if MELT_HAVE_DEBUG const char *mcfr_flocs; #else /*!MELT_HAVE_DEBUG */ const char *mcfr_unusedflocs; #endif /*MELT_HAVE_DEBUG */ void (*mcfr_initforwmarkrout) (struct melt_callframe_st *, int); struct excepth_melt_st *mcfr_exh; struct melt_callframe_st *mcfr_prev; #undef MELTFRAM_NBVARPTR #undef MELTFRAM_NBVARNUM #define MELTFRAM_NBVARPTR 1572 melt_ptr_t mcfr_varptr[1572]; /*no varnum*/ #define MELTFRAM_NBVARNUM /*none*/0 /*others*/ long _spare_; } initial_frame_st; static void initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__, char meltpredefinited[]) { #define meltfram__ (*iniframp__) struct cdata_st { struct MELT_OBJECT_STRUCT (3) dsym_1__CLASS_PATTERN_CONTEXT; struct MELT_STRING_STRUCT (21) dstr_2__CLASS_PATTERN_CO; struct MELT_OBJECT_STRUCT (3) dsym_3__CLASS_ROOT; struct MELT_STRING_STRUCT (10) dstr_4__CLASS_ROOT; struct MELT_OBJECT_STRUCT (8) dobj_5__CLASS_PATTERN_CONTEXT; struct MELT_STRING_STRUCT (21) dstr_6__CLASS_PATTERN_CO; struct MELT_MULTIPLE_STRUCT (1) dtup_7__CLASS_PATTERN_CONTEXT; struct MELT_MULTIPLE_STRUCT (11) dtup_8__CLASS_PATTERN_CONTEXT; struct MELT_OBJECT_STRUCT (3) dsym_9__PCTN_NORMCTXT; struct MELT_STRING_STRUCT (13) dstr_10__PCTN_NORMCTXT; struct MELT_OBJECT_STRUCT (4) dobj_11__PCTN_NORMCTXT; struct MELT_STRING_STRUCT (13) dstr_12__PCTN_NORMCTXT; struct MELT_OBJECT_STRUCT (3) dsym_13__PCTN_SRC; struct MELT_STRING_STRUCT (8) dstr_14__PCTN_SRC; struct MELT_OBJECT_STRUCT (4) dobj_15__PCTN_SRC; struct MELT_STRING_STRUCT (8) dstr_16__PCTN_SRC; struct MELT_OBJECT_STRUCT (3) dsym_17__PCTN_ENV; struct MELT_STRING_STRUCT (8) dstr_18__PCTN_ENV; struct MELT_OBJECT_STRUCT (4) dobj_19__PCTN_ENV; struct MELT_STRING_STRUCT (8) dstr_20__PCTN_ENV; struct MELT_OBJECT_STRUCT (3) dsym_21__PCTN_MAPATVAR; struct MELT_STRING_STRUCT (13) dstr_22__PCTN_MAPATVAR; struct MELT_OBJECT_STRUCT (4) dobj_23__PCTN_MAPATVAR; struct MELT_STRING_STRUCT (13) dstr_24__PCTN_MAPATVAR; struct MELT_OBJECT_STRUCT (3) dsym_25__PCTN_MAPATCST; struct MELT_STRING_STRUCT (13) dstr_26__PCTN_MAPATCST; struct MELT_OBJECT_STRUCT (4) dobj_27__PCTN_MAPATCST; struct MELT_STRING_STRUCT (13) dstr_28__PCTN_MAPATCST; struct MELT_OBJECT_STRUCT (3) dsym_29__PCTN_MAPOR; struct MELT_STRING_STRUCT (10) dstr_30__PCTN_MAPOR; struct MELT_OBJECT_STRUCT (4) dobj_31__PCTN_MAPOR; struct MELT_STRING_STRUCT (10) dstr_32__PCTN_MAPOR; struct MELT_OBJECT_STRUCT (3) dsym_33__PCTN_BINDLIST; struct MELT_STRING_STRUCT (13) dstr_34__PCTN_BINDLIST; struct MELT_OBJECT_STRUCT (4) dobj_35__PCTN_BINDLIST; struct MELT_STRING_STRUCT (13) dstr_36__PCTN_BINDLIST; struct MELT_OBJECT_STRUCT (3) dsym_37__PCTN_STUFFMAP; struct MELT_STRING_STRUCT (13) dstr_38__PCTN_STUFFMAP; struct MELT_OBJECT_STRUCT (4) dobj_39__PCTN_STUFFMAP; struct MELT_STRING_STRUCT (13) dstr_40__PCTN_STUFFMAP; struct MELT_OBJECT_STRUCT (3) dsym_41__PCTN_PVARLOCMAP; struct MELT_STRING_STRUCT (15) dstr_42__PCTN_PVARLOCMAP; struct MELT_OBJECT_STRUCT (4) dobj_43__PCTN_PVARLOCMAP; struct MELT_STRING_STRUCT (15) dstr_44__PCTN_PVARLOCMAP; struct MELT_OBJECT_STRUCT (3) dsym_45__PCTN_TESTS; struct MELT_STRING_STRUCT (10) dstr_46__PCTN_TESTS; struct MELT_OBJECT_STRUCT (4) dobj_47__PCTN_TESTS; struct MELT_STRING_STRUCT (10) dstr_48__PCTN_TESTS; struct MELT_OBJECT_STRUCT (3) dsym_49__PCTN_VARHANDLERS; struct MELT_STRING_STRUCT (16) dstr_50__PCTN_VARHANDLERS; struct MELT_OBJECT_STRUCT (4) dobj_51__PCTN_VARHANDLERS; struct MELT_STRING_STRUCT (16) dstr_52__PCTN_VARHANDLERS; struct MELT_OBJECT_STRUCT (3) dsym_53__SCAN_PATTERN; struct MELT_STRING_STRUCT (12) dstr_54__SCAN_PATTERN; struct MELT_OBJECT_STRUCT (3) dsym_55__CLASS_SELECTOR; struct MELT_STRING_STRUCT (14) dstr_56__CLASS_SELECTOR; struct MELT_OBJECT_STRUCT (4) dobj_57__SCAN_PATTERN; struct MELT_STRING_STRUCT (12) dstr_58__SCAN_PATTERN; struct MELT_ROUTINE_STRUCT (3) drout_59__SCANPAT_ANYRECV; struct MELT_CLOSURE_STRUCT (0) dclo_60__SCANPAT_ANYRECV; struct MELT_OBJECT_STRUCT (3) dsym_61__MELT_DEBUG_FUN; struct MELT_STRING_STRUCT (14) dstr_62__MELT_DEBUG_FUN; struct MELT_OBJECT_STRUCT (3) dsym_63__CLASS_NAMED; struct MELT_STRING_STRUCT (11) dstr_64__CLASS_NAMED; struct MELT_OBJECT_STRUCT (3) dsym_65__INSTALL_METHOD; struct MELT_STRING_STRUCT (14) dstr_66__INSTALL_METHOD; struct MELT_OBJECT_STRUCT (3) dsym_67__DISCR_ANY_RECEIVER; struct MELT_STRING_STRUCT (18) dstr_68__DISCR_ANY_RECEIV; struct MELT_ROUTINE_STRUCT (4) drout_69__SCANPAT_ANYPATTERN; struct MELT_CLOSURE_STRUCT (0) dclo_70__SCANPAT_ANYPATTERN; struct MELT_OBJECT_STRUCT (3) dsym_71__CLASS_SOURCE_PATTERN; struct MELT_STRING_STRUCT (20) dstr_72__CLASS_SOURCE_PAT; struct MELT_ROUTINE_STRUCT (3) drout_73__SCANPAT_SRCPATVAR; struct MELT_CLOSURE_STRUCT (0) dclo_74__SCANPAT_SRCPATVAR; struct MELT_OBJECT_STRUCT (3) dsym_75__CLASS_SOURCE_PATTERN_VARIABLE; struct MELT_STRING_STRUCT (29) dstr_76__CLASS_SOURCE_PAT; struct MELT_ROUTINE_STRUCT (3) drout_77__SCANPAT_SRCPATJOKER; struct MELT_CLOSURE_STRUCT (0) dclo_78__SCANPAT_SRCPATJOKER; struct MELT_OBJECT_STRUCT (3) dsym_79__CLASS_SOURCE_PATTERN_JOKER_VARIABLE; struct MELT_STRING_STRUCT (35) dstr_80__CLASS_SOURCE_PAT; struct MELT_ROUTINE_STRUCT (8) drout_81__SCANPAT_SRCPATCONSTANT; struct MELT_CLOSURE_STRUCT (0) dclo_82__SCANPAT_SRCPATCONSTANT; struct MELT_OBJECT_STRUCT (3) dsym_83__CLASS_SOURCE_PATTERN_CONSTANT; struct MELT_STRING_STRUCT (29) dstr_84__CLASS_SOURCE_PAT; struct MELT_OBJECT_STRUCT (3) dsym_85__NORMAL_EXP; struct MELT_STRING_STRUCT (10) dstr_86__NORMAL_EXP; struct MELT_OBJECT_STRUCT (3) dsym_87__LIST_APPEND2LIST; struct MELT_STRING_STRUCT (16) dstr_88__LIST_APPEND2LIST; struct MELT_OBJECT_STRUCT (3) dsym_89__GET_CTYPE; struct MELT_STRING_STRUCT (9) dstr_90__GET_CTYPE; struct MELT_OBJECT_STRUCT (3) dsym_91__CLASS_CTYPE; struct MELT_STRING_STRUCT (11) dstr_92__CLASS_CTYPE; struct MELT_OBJECT_STRUCT (3) dsym_93__CLASS_LOCATED; struct MELT_STRING_STRUCT (13) dstr_94__CLASS_LOCATED; struct MELT_ROUTINE_STRUCT (5) drout_95__SCANPAT_SRCPATCONSTRUCT; struct MELT_CLOSURE_STRUCT (0) dclo_96__SCANPAT_SRCPATCONSTRUCT; struct MELT_OBJECT_STRUCT (3) dsym_97__CLASS_SOURCE_PATTERN_CONSTRUCT; struct MELT_STRING_STRUCT (30) dstr_98__CLASS_SOURCE_PAT; struct MELT_OBJECT_STRUCT (3) dsym_99__CTYPE_VALUE; struct MELT_STRING_STRUCT (11) dstr_100__CTYPE_VALUE; struct MELT_ROUTINE_STRUCT (9) drout_101__SCANPAT_SRCPATOBJECT; struct MELT_CLOSURE_STRUCT (0) dclo_102__SCANPAT_SRCPATOBJECT; struct MELT_OBJECT_STRUCT (3) dsym_103__CLASS_SOURCE_PATTERN_OBJECT; struct MELT_STRING_STRUCT (27) dstr_104__CLASS_SOURCE_PAT; struct MELT_OBJECT_STRUCT (3) dsym_105__CLASS_CLASS; struct MELT_STRING_STRUCT (11) dstr_106__CLASS_CLASS; struct MELT_OBJECT_STRUCT (3) dsym_107__CLASS_SOURCE_FIELD_PATTERN; struct MELT_STRING_STRUCT (26) dstr_108__CLASS_SOURCE_FIE; struct MELT_OBJECT_STRUCT (3) dsym_109__CLASS_FIELD; struct MELT_STRING_STRUCT (11) dstr_110__CLASS_FIELD; struct MELT_ROUTINE_STRUCT (9) drout_111__SCANPAT_SRCPATCOMPOSITE; struct MELT_CLOSURE_STRUCT (0) dclo_112__SCANPAT_SRCPATCOMPOSITE; struct MELT_OBJECT_STRUCT (3) dsym_113__CLASS_SOURCE_PATTERN_COMPOSITE; struct MELT_STRING_STRUCT (30) dstr_114__CLASS_SOURCE_PAT; struct MELT_OBJECT_STRUCT (3) dsym_115__CLASS_ANY_MATCHER; struct MELT_STRING_STRUCT (17) dstr_116__CLASS_ANY_MATCHE; struct MELT_OBJECT_STRUCT (3) dsym_117__CLASS_FORMAL_BINDING; struct MELT_STRING_STRUCT (20) dstr_118__CLASS_FORMAL_BIN; struct MELT_OBJECT_STRUCT (3) dsym_119__NORMALIZE_TUPLE; struct MELT_STRING_STRUCT (15) dstr_120__NORMALIZE_TUPLE; struct MELT_ROUTINE_STRUCT (10) drout_121__SCANPAT_SRCPATOR; struct MELT_CLOSURE_STRUCT (0) dclo_122__SCANPAT_SRCPATOR; struct MELT_OBJECT_STRUCT (3) dsym_123__CLASS_SOURCE_PATTERN_OR; struct MELT_STRING_STRUCT (23) dstr_124__CLASS_SOURCE_PAT; struct MELT_OBJECT_STRUCT (3) dsym_125__DISCR_MAP_OBJECTS; struct MELT_STRING_STRUCT (17) dstr_126__DISCR_MAP_OBJECT; struct MELT_ROUTINE_STRUCT (2) drout_127__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_128__CLASS_SYMBOL; struct MELT_STRING_STRUCT (12) dstr_129__CLASS_SYMBOL; struct MELT_ROUTINE_STRUCT (4) drout_130__SCANPAT_SRCPATAND; struct MELT_CLOSURE_STRUCT (0) dclo_131__SCANPAT_SRCPATAND; struct MELT_OBJECT_STRUCT (3) dsym_132__CLASS_SOURCE_PATTERN_AND; struct MELT_STRING_STRUCT (24) dstr_133__CLASS_SOURCE_PAT; struct MELT_OBJECT_STRUCT (3) dsym_134__NORMAL_PATTERN; struct MELT_STRING_STRUCT (14) dstr_135__NORMAL_PATTERN; struct MELT_OBJECT_STRUCT (4) dobj_136__NORMAL_PATTERN; struct MELT_STRING_STRUCT (14) dstr_137__NORMAL_PATTERN; struct MELT_OBJECT_STRUCT (3) dsym_138__CLASS_NORMAL_OR_VARIABLE; struct MELT_STRING_STRUCT (24) dstr_139__CLASS_NORMAL_OR_; struct MELT_OBJECT_STRUCT (8) dobj_140__CLASS_NORMAL_OR_VARIABLE; struct MELT_STRING_STRUCT (24) dstr_141__CLASS_NORMAL_OR_; struct MELT_MULTIPLE_STRUCT (1) dtup_142__CLASS_NORMAL_OR_VARIABLE; struct MELT_MULTIPLE_STRUCT (4) dtup_143__CLASS_NORMAL_OR_VARIABLE; struct MELT_OBJECT_STRUCT (3) dsym_144__NORVAR_NOREXP; struct MELT_STRING_STRUCT (13) dstr_145__NORVAR_NOREXP; struct MELT_OBJECT_STRUCT (4) dobj_146__NORVAR_NOREXP; struct MELT_STRING_STRUCT (13) dstr_147__NORVAR_NOREXP; struct MELT_OBJECT_STRUCT (3) dsym_148__NORVAR_LOCSYM; struct MELT_STRING_STRUCT (13) dstr_149__NORVAR_LOCSYM; struct MELT_OBJECT_STRUCT (4) dobj_150__NORVAR_LOCSYM; struct MELT_STRING_STRUCT (13) dstr_151__NORVAR_LOCSYM; struct MELT_OBJECT_STRUCT (3) dsym_152__NORVAR_PATVAR; struct MELT_STRING_STRUCT (13) dstr_153__NORVAR_PATVAR; struct MELT_OBJECT_STRUCT (4) dobj_154__NORVAR_PATVAR; struct MELT_STRING_STRUCT (13) dstr_155__NORVAR_PATVAR; struct MELT_OBJECT_STRUCT (3) dsym_156__NORVAR_NREPOR; struct MELT_STRING_STRUCT (13) dstr_157__NORVAR_NREPOR; struct MELT_OBJECT_STRUCT (4) dobj_158__NORVAR_NREPOR; struct MELT_STRING_STRUCT (13) dstr_159__NORVAR_NREPOR; struct MELT_OBJECT_STRUCT (3) dsym_160__CLASS_NORMTESTER_ANY; struct MELT_STRING_STRUCT (20) dstr_161__CLASS_NORMTESTER; struct MELT_OBJECT_STRUCT (3) dsym_162__CLASS_NREP_EXPRESSION; struct MELT_STRING_STRUCT (21) dstr_163__CLASS_NREP_EXPRE; struct MELT_OBJECT_STRUCT (8) dobj_164__CLASS_NORMTESTER_ANY; struct MELT_STRING_STRUCT (20) dstr_165__CLASS_NORMTESTER; struct MELT_MULTIPLE_STRUCT (3) dtup_166__CLASS_NORMTESTER_ANY; struct MELT_MULTIPLE_STRUCT (7) dtup_167__CLASS_NORMTESTER_ANY; struct MELT_OBJECT_STRUCT (3) dsym_168__NTEST_MATCHED; struct MELT_STRING_STRUCT (13) dstr_169__NTEST_MATCHED; struct MELT_OBJECT_STRUCT (4) dobj_170__NTEST_MATCHED; struct MELT_STRING_STRUCT (13) dstr_171__NTEST_MATCHED; struct MELT_OBJECT_STRUCT (3) dsym_172__NTEST_THEN; struct MELT_STRING_STRUCT (10) dstr_173__NTEST_THEN; struct MELT_OBJECT_STRUCT (4) dobj_174__NTEST_THEN; struct MELT_STRING_STRUCT (10) dstr_175__NTEST_THEN; struct MELT_OBJECT_STRUCT (3) dsym_176__NTEST_ELSE; struct MELT_STRING_STRUCT (10) dstr_177__NTEST_ELSE; struct MELT_OBJECT_STRUCT (4) dobj_178__NTEST_ELSE; struct MELT_STRING_STRUCT (10) dstr_179__NTEST_ELSE; struct MELT_OBJECT_STRUCT (3) dsym_180__NTEST_NORMATCH; struct MELT_STRING_STRUCT (14) dstr_181__NTEST_NORMATCH; struct MELT_OBJECT_STRUCT (4) dobj_182__NTEST_NORMATCH; struct MELT_STRING_STRUCT (14) dstr_183__NTEST_NORMATCH; struct MELT_OBJECT_STRUCT (3) dsym_184__NTEST_LOCCLIST; struct MELT_STRING_STRUCT (14) dstr_185__NTEST_LOCCLIST; struct MELT_OBJECT_STRUCT (4) dobj_186__NTEST_LOCCLIST; struct MELT_STRING_STRUCT (14) dstr_187__NTEST_LOCCLIST; struct MELT_OBJECT_STRUCT (3) dsym_188__NTEST_COMEFROM; struct MELT_STRING_STRUCT (14) dstr_189__NTEST_COMEFROM; struct MELT_OBJECT_STRUCT (4) dobj_190__NTEST_COMEFROM; struct MELT_STRING_STRUCT (14) dstr_191__NTEST_COMEFROM; struct MELT_OBJECT_STRUCT (3) dsym_192__CLASS_NORMTESTER_SUCCESS; struct MELT_STRING_STRUCT (24) dstr_193__CLASS_NORMTESTER; struct MELT_OBJECT_STRUCT (8) dobj_194__CLASS_NORMTESTER_SUCCESS; struct MELT_STRING_STRUCT (24) dstr_195__CLASS_NORMTESTER; struct MELT_MULTIPLE_STRUCT (4) dtup_196__CLASS_NORMTESTER_SUCCESS; struct MELT_MULTIPLE_STRUCT (8) dtup_197__CLASS_NORMTESTER_SUCCESS; struct MELT_OBJECT_STRUCT (3) dsym_198__NTSUCCESS_DO; struct MELT_STRING_STRUCT (12) dstr_199__NTSUCCESS_DO; struct MELT_OBJECT_STRUCT (4) dobj_200__NTSUCCESS_DO; struct MELT_STRING_STRUCT (12) dstr_201__NTSUCCESS_DO; struct MELT_OBJECT_STRUCT (3) dsym_202__CLASS_NORMTESTER_OR_CLEAR; struct MELT_STRING_STRUCT (25) dstr_203__CLASS_NORMTESTER; struct MELT_OBJECT_STRUCT (8) dobj_204__CLASS_NORMTESTER_OR_CLEAR; struct MELT_STRING_STRUCT (25) dstr_205__CLASS_NORMTESTER; struct MELT_MULTIPLE_STRUCT (4) dtup_206__CLASS_NORMTESTER_OR_CLEAR; struct MELT_MULTIPLE_STRUCT (8) dtup_207__CLASS_NORMTESTER_OR_CLEAR; struct MELT_OBJECT_STRUCT (3) dsym_208__NTORCLEAR_LOCSYM; struct MELT_STRING_STRUCT (16) dstr_209__NTORCLEAR_LOCSYM; struct MELT_OBJECT_STRUCT (4) dobj_210__NTORCLEAR_LOCSYM; struct MELT_STRING_STRUCT (16) dstr_211__NTORCLEAR_LOCSYM; struct MELT_OBJECT_STRUCT (3) dsym_212__CLASS_NORMTESTER_OR_INITIAL_CLEAR; struct MELT_STRING_STRUCT (33) dstr_213__CLASS_NORMTESTER; struct MELT_OBJECT_STRUCT (8) dobj_214__CLASS_NORMTESTER_OR_INITIAL_CLEAR; struct MELT_STRING_STRUCT (33) dstr_215__CLASS_NORMTESTER; struct MELT_MULTIPLE_STRUCT (5) dtup_216__CLASS_NORMTESTER_OR_INITIAL_CLEAR; struct MELT_MULTIPLE_STRUCT (8) dtup_217__CLASS_NORMTESTER_OR_INITIAL_CLEAR; struct MELT_OBJECT_STRUCT (3) dsym_218__CLASS_NORMTESTER_OR_TRANSMIT; struct MELT_STRING_STRUCT (28) dstr_219__CLASS_NORMTESTER; struct MELT_OBJECT_STRUCT (8) dobj_220__CLASS_NORMTESTER_OR_TRANSMIT; struct MELT_STRING_STRUCT (28) dstr_221__CLASS_NORMTESTER; struct MELT_MULTIPLE_STRUCT (4) dtup_222__CLASS_NORMTESTER_OR_TRANSMIT; struct MELT_MULTIPLE_STRUCT (9) dtup_223__CLASS_NORMTESTER_OR_TRANSMIT; struct MELT_OBJECT_STRUCT (3) dsym_224__NTORTRANSMIT_DST; struct MELT_STRING_STRUCT (16) dstr_225__NTORTRANSMIT_DST; struct MELT_OBJECT_STRUCT (4) dobj_226__NTORTRANSMIT_DST; struct MELT_STRING_STRUCT (16) dstr_227__NTORTRANSMIT_DST; struct MELT_OBJECT_STRUCT (3) dsym_228__NTORTRANSMIT_SRC; struct MELT_STRING_STRUCT (16) dstr_229__NTORTRANSMIT_SRC; struct MELT_OBJECT_STRUCT (4) dobj_230__NTORTRANSMIT_SRC; struct MELT_STRING_STRUCT (16) dstr_231__NTORTRANSMIT_SRC; struct MELT_OBJECT_STRUCT (3) dsym_232__CLASS_NORMTESTER_ANYTESTER; struct MELT_STRING_STRUCT (26) dstr_233__CLASS_NORMTESTER; struct MELT_OBJECT_STRUCT (8) dobj_234__CLASS_NORMTESTER_ANYTESTER; struct MELT_STRING_STRUCT (26) dstr_235__CLASS_NORMTESTER; struct MELT_MULTIPLE_STRUCT (4) dtup_236__CLASS_NORMTESTER_ANYTESTER; struct MELT_MULTIPLE_STRUCT (7) dtup_237__CLASS_NORMTESTER_ANYTESTER; struct MELT_OBJECT_STRUCT (3) dsym_238__CLASS_NORMTESTER_DISJUNCTION; struct MELT_STRING_STRUCT (28) dstr_239__CLASS_NORMTESTER; struct MELT_OBJECT_STRUCT (8) dobj_240__CLASS_NORMTESTER_DISJUNCTION; struct MELT_STRING_STRUCT (28) dstr_241__CLASS_NORMTESTER; struct MELT_MULTIPLE_STRUCT (5) dtup_242__CLASS_NORMTESTER_DISJUNCTION; struct MELT_MULTIPLE_STRUCT (10) dtup_243__CLASS_NORMTESTER_DISJUNCTION; struct MELT_OBJECT_STRUCT (3) dsym_244__NTDISJUNCTS; struct MELT_STRING_STRUCT (11) dstr_245__NTDISJUNCTS; struct MELT_OBJECT_STRUCT (4) dobj_246__NTDISJUNCTS; struct MELT_STRING_STRUCT (11) dstr_247__NTDISJUNCTS; struct MELT_OBJECT_STRUCT (3) dsym_248__NTDISJ_FRESHORVAR; struct MELT_STRING_STRUCT (17) dstr_249__NTDISJ_FRESHORVA; struct MELT_OBJECT_STRUCT (4) dobj_250__NTDISJ_FRESHORVAR; struct MELT_STRING_STRUCT (17) dstr_251__NTDISJ_FRESHORVA; struct MELT_OBJECT_STRUCT (3) dsym_252__NTDISJ_SETORVAR; struct MELT_STRING_STRUCT (15) dstr_253__NTDISJ_SETORVAR; struct MELT_OBJECT_STRUCT (4) dobj_254__NTDISJ_SETORVAR; struct MELT_STRING_STRUCT (15) dstr_255__NTDISJ_SETORVAR; struct MELT_OBJECT_STRUCT (3) dsym_256__CLASS_NORMTESTER_SAME; struct MELT_STRING_STRUCT (21) dstr_257__CLASS_NORMTESTER; struct MELT_OBJECT_STRUCT (8) dobj_258__CLASS_NORMTESTER_SAME; struct MELT_STRING_STRUCT (21) dstr_259__CLASS_NORMTESTER; struct MELT_MULTIPLE_STRUCT (5) dtup_260__CLASS_NORMTESTER_SAME; struct MELT_MULTIPLE_STRUCT (8) dtup_261__CLASS_NORMTESTER_SAME; struct MELT_OBJECT_STRUCT (3) dsym_262__NTSAME_IDENTICAL; struct MELT_STRING_STRUCT (16) dstr_263__NTSAME_IDENTICAL; struct MELT_OBJECT_STRUCT (4) dobj_264__NTSAME_IDENTICAL; struct MELT_STRING_STRUCT (16) dstr_265__NTSAME_IDENTICAL; struct MELT_OBJECT_STRUCT (3) dsym_266__CLASS_NORMTESTER_MATCHER; struct MELT_STRING_STRUCT (24) dstr_267__CLASS_NORMTESTER; struct MELT_OBJECT_STRUCT (8) dobj_268__CLASS_NORMTESTER_MATCHER; struct MELT_STRING_STRUCT (24) dstr_269__CLASS_NORMTESTER; struct MELT_MULTIPLE_STRUCT (5) dtup_270__CLASS_NORMTESTER_MATCHER; struct MELT_MULTIPLE_STRUCT (11) dtup_271__CLASS_NORMTESTER_MATCHER; struct MELT_OBJECT_STRUCT (3) dsym_272__NTMATCH_MATCHER; struct MELT_STRING_STRUCT (15) dstr_273__NTMATCH_MATCHER; struct MELT_OBJECT_STRUCT (4) dobj_274__NTMATCH_MATCHER; struct MELT_STRING_STRUCT (15) dstr_275__NTMATCH_MATCHER; struct MELT_OBJECT_STRUCT (3) dsym_276__NTMATCH_MATNDATA; struct MELT_STRING_STRUCT (16) dstr_277__NTMATCH_MATNDATA; struct MELT_OBJECT_STRUCT (4) dobj_278__NTMATCH_MATNDATA; struct MELT_STRING_STRUCT (16) dstr_279__NTMATCH_MATNDATA; struct MELT_OBJECT_STRUCT (3) dsym_280__NTMATCH_INARGS; struct MELT_STRING_STRUCT (14) dstr_281__NTMATCH_INARGS; struct MELT_OBJECT_STRUCT (4) dobj_282__NTMATCH_INARGS; struct MELT_STRING_STRUCT (14) dstr_283__NTMATCH_INARGS; struct MELT_OBJECT_STRUCT (3) dsym_284__NTMATCH_OUTLOCS; struct MELT_STRING_STRUCT (15) dstr_285__NTMATCH_OUTLOCS; struct MELT_OBJECT_STRUCT (4) dobj_286__NTMATCH_OUTLOCS; struct MELT_STRING_STRUCT (15) dstr_287__NTMATCH_OUTLOCS; struct MELT_OBJECT_STRUCT (3) dsym_288__CLASS_NORMTESTER_INSTANCE; struct MELT_STRING_STRUCT (25) dstr_289__CLASS_NORMTESTER; struct MELT_OBJECT_STRUCT (8) dobj_290__CLASS_NORMTESTER_INSTANCE; struct MELT_STRING_STRUCT (25) dstr_291__CLASS_NORMTESTER; struct MELT_MULTIPLE_STRUCT (5) dtup_292__CLASS_NORMTESTER_INSTANCE; struct MELT_MULTIPLE_STRUCT (9) dtup_293__CLASS_NORMTESTER_INSTANCE; struct MELT_OBJECT_STRUCT (3) dsym_294__NTINST_CLASS; struct MELT_STRING_STRUCT (12) dstr_295__NTINST_CLASS; struct MELT_OBJECT_STRUCT (4) dobj_296__NTINST_CLASS; struct MELT_STRING_STRUCT (12) dstr_297__NTINST_CLASS; struct MELT_OBJECT_STRUCT (3) dsym_298__NTINST_FIELDLOCS; struct MELT_STRING_STRUCT (16) dstr_299__NTINST_FIELDLOCS; struct MELT_OBJECT_STRUCT (4) dobj_300__NTINST_FIELDLOCS; struct MELT_STRING_STRUCT (16) dstr_301__NTINST_FIELDLOCS; struct MELT_OBJECT_STRUCT (3) dsym_302__CLASS_NORMTESTER_TUPLE; struct MELT_STRING_STRUCT (22) dstr_303__CLASS_NORMTESTER; struct MELT_OBJECT_STRUCT (8) dobj_304__CLASS_NORMTESTER_TUPLE; struct MELT_STRING_STRUCT (22) dstr_305__CLASS_NORMTESTER; struct MELT_MULTIPLE_STRUCT (5) dtup_306__CLASS_NORMTESTER_TUPLE; struct MELT_MULTIPLE_STRUCT (8) dtup_307__CLASS_NORMTESTER_TUPLE; struct MELT_OBJECT_STRUCT (3) dsym_308__NTTUPLE_COMPONENTS; struct MELT_STRING_STRUCT (18) dstr_309__NTTUPLE_COMPONEN; struct MELT_OBJECT_STRUCT (4) dobj_310__NTTUPLE_COMPONENTS; struct MELT_STRING_STRUCT (18) dstr_311__NTTUPLE_COMPONEN; struct MELT_OBJECT_STRUCT (3) dsym_312__CLASS_NREP_MATCH; struct MELT_STRING_STRUCT (16) dstr_313__CLASS_NREP_MATCH; struct MELT_OBJECT_STRUCT (3) dsym_314__CLASS_NREP_TYPED_EXPRESSION; struct MELT_STRING_STRUCT (27) dstr_315__CLASS_NREP_TYPED; struct MELT_OBJECT_STRUCT (8) dobj_316__CLASS_NREP_MATCH; struct MELT_STRING_STRUCT (16) dstr_317__CLASS_NREP_MATCH; struct MELT_MULTIPLE_STRUCT (4) dtup_318__CLASS_NREP_MATCH; struct MELT_MULTIPLE_STRUCT (5) dtup_319__CLASS_NREP_MATCH; struct MELT_OBJECT_STRUCT (3) dsym_320__NMATCH_TESTS; struct MELT_STRING_STRUCT (12) dstr_321__NMATCH_TESTS; struct MELT_OBJECT_STRUCT (4) dobj_322__NMATCH_TESTS; struct MELT_STRING_STRUCT (12) dstr_323__NMATCH_TESTS; struct MELT_OBJECT_STRUCT (3) dsym_324__NMATCH_STUFFMAP; struct MELT_STRING_STRUCT (15) dstr_325__NMATCH_STUFFMAP; struct MELT_OBJECT_STRUCT (4) dobj_326__NMATCH_STUFFMAP; struct MELT_STRING_STRUCT (15) dstr_327__NMATCH_STUFFMAP; struct MELT_OBJECT_STRUCT (3) dsym_328__NMATCH_MATCHED; struct MELT_STRING_STRUCT (14) dstr_329__NMATCH_MATCHED; struct MELT_OBJECT_STRUCT (4) dobj_330__NMATCH_MATCHED; struct MELT_STRING_STRUCT (14) dstr_331__NMATCH_MATCHED; struct MELT_ROUTINE_STRUCT (4) drout_332__REGISTER_NEW_NORMTESTER; struct MELT_CLOSURE_STRUCT (0) dclo_333__REGISTER_NEW_NORMTESTER; struct MELT_OBJECT_STRUCT (3) dsym_334__DISCR_LIST; struct MELT_STRING_STRUCT (10) dstr_335__DISCR_LIST; struct MELT_ROUTINE_STRUCT (6) drout_336__PUT_TESTER_THEN; struct MELT_CLOSURE_STRUCT (0) dclo_337__PUT_TESTER_THEN; struct MELT_OBJECT_STRUCT (3) dsym_338__CLASS_REFERENCE; struct MELT_STRING_STRUCT (15) dstr_339__CLASS_REFERENCE; struct MELT_ROUTINE_STRUCT (4) drout_340__SET_NEW_TESTER_LAST_THEN; struct MELT_CLOSURE_STRUCT (0) dclo_341__SET_NEW_TESTER_LAST_THEN; struct MELT_ROUTINE_STRUCT (5) drout_342__SET_NEW_TESTER_ALL_ELSES; struct MELT_CLOSURE_STRUCT (0) dclo_343__SET_NEW_TESTER_ALL_ELSES; struct MELT_ROUTINE_STRUCT (4) drout_344__NORMPAT_ANYRECV; struct MELT_CLOSURE_STRUCT (0) dclo_345__NORMPAT_ANYRECV; struct MELT_ROUTINE_STRUCT (5) drout_346__NORMPAT_ANYPAT; struct MELT_CLOSURE_STRUCT (0) dclo_347__NORMPAT_ANYPAT; struct MELT_ROUTINE_STRUCT (10) drout_348__NORMVARPAT_GENREUSETEST; struct MELT_CLOSURE_STRUCT (0) dclo_349__NORMVARPAT_GENREUSETEST; struct MELT_OBJECT_STRUCT (3) dsym_350__CLASS_NREP_LOCSYMOCC; struct MELT_STRING_STRUCT (20) dstr_351__CLASS_NREP_LOCSY; struct MELT_ROUTINE_STRUCT (2) drout_352__LAMBDA_; struct MELT_ROUTINE_STRUCT (13) drout_353__NORMPAT_VARIABLEPAT; struct MELT_CLOSURE_STRUCT (0) dclo_354__NORMPAT_VARIABLEPAT; struct MELT_OBJECT_STRUCT (3) dsym_355__CLASS_NORMAL_LET_BINDING; struct MELT_STRING_STRUCT (24) dstr_356__CLASS_NORMAL_LET; struct MELT_OBJECT_STRUCT (3) dsym_357__CLASS_NORMALIZATION_CONTEXT; struct MELT_STRING_STRUCT (27) dstr_358__CLASS_NORMALIZAT; struct MELT_OBJECT_STRUCT (3) dsym_359__CLASS_QUASI_CTYPE; struct MELT_STRING_STRUCT (17) dstr_360__CLASS_QUASI_CTYP; struct MELT_ROUTINE_STRUCT (3) drout_361__NORMPAT_JOKERPAT; struct MELT_CLOSURE_STRUCT (0) dclo_362__NORMPAT_JOKERPAT; struct MELT_ROUTINE_STRUCT (36) drout_363__NORMPAT_INSTANCEPAT; struct MELT_CLOSURE_STRUCT (0) dclo_364__NORMPAT_INSTANCEPAT; struct MELT_OBJECT_STRUCT (3) dsym_365__CLASS_SOURCE_PATTERN_INSTANCE; struct MELT_STRING_STRUCT (29) dstr_366__CLASS_SOURCE_PAT; struct MELT_ROUTINE_STRUCT (2) drout_367__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_368__DISCR_MULTIPLE; struct MELT_STRING_STRUCT (14) dstr_369__DISCR_MULTIPLE; struct MELT_ROUTINE_STRUCT (5) drout_370__LAMBDA_; struct meltint_st dint_371__; struct meltint_st dint_372__; struct meltint_st dint_373__; struct MELT_ROUTINE_STRUCT (4) drout_374__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_375__CLASS_NREP_SYMOCC; struct MELT_STRING_STRUCT (17) dstr_376__CLASS_NREP_SYMOC; struct MELT_OBJECT_STRUCT (3) dsym_377__CLASS_LET_BINDING; struct MELT_STRING_STRUCT (17) dstr_378__CLASS_LET_BINDIN; struct MELT_OBJECT_STRUCT (3) dsym_379__CLASS_NREP_UNSAFE_GET_FIELD; struct MELT_STRING_STRUCT (27) dstr_380__CLASS_NREP_UNSAF; struct MELT_OBJECT_STRUCT (3) dsym_381__CLONE_SYMBOL; struct MELT_STRING_STRUCT (12) dstr_382__CLONE_SYMBOL; struct MELT_OBJECT_STRUCT (3) dsym_383__CLASS_TUPLE_COMPONENT_PATTERN; struct MELT_STRING_STRUCT (29) dstr_384__CLASS_TUPLE_COMP; struct MELT_OBJECT_STRUCT (8) dobj_385__CLASS_TUPLE_COMPONENT_PATTERN; struct MELT_STRING_STRUCT (29) dstr_386__CLASS_TUPLE_COMP; struct MELT_MULTIPLE_STRUCT (1) dtup_387__CLASS_TUPLE_COMPONENT_PATTERN; struct MELT_MULTIPLE_STRUCT (2) dtup_388__CLASS_TUPLE_COMPONENT_PATTERN; struct MELT_OBJECT_STRUCT (3) dsym_389__TUPCP_PATTERN; struct MELT_STRING_STRUCT (13) dstr_390__TUPCP_PATTERN; struct MELT_OBJECT_STRUCT (4) dobj_391__TUPCP_PATTERN; struct MELT_STRING_STRUCT (13) dstr_392__TUPCP_PATTERN; struct MELT_OBJECT_STRUCT (3) dsym_393__TUPCP_INDEX; struct MELT_STRING_STRUCT (11) dstr_394__TUPCP_INDEX; struct MELT_OBJECT_STRUCT (4) dobj_395__TUPCP_INDEX; struct MELT_STRING_STRUCT (11) dstr_396__TUPCP_INDEX; struct MELT_ROUTINE_STRUCT (36) drout_397__NORMPAT_TUPLEPAT; struct MELT_CLOSURE_STRUCT (0) dclo_398__NORMPAT_TUPLEPAT; struct MELT_OBJECT_STRUCT (3) dsym_399__CLASS_SOURCE_PATTERN_TUPLE; struct MELT_STRING_STRUCT (26) dstr_400__CLASS_SOURCE_PAT; struct MELT_ROUTINE_STRUCT (2) drout_401__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_402__DISCR_CONSTANT_INTEGER; struct MELT_STRING_STRUCT (22) dstr_403__DISCR_CONSTANT_I; struct MELT_OBJECT_STRUCT (3) dsym_404__LIST_TO_MULTIPLE; struct MELT_STRING_STRUCT (16) dstr_405__LIST_TO_MULTIPLE; struct MELT_ROUTINE_STRUCT (5) drout_406__LAMBDA_; struct meltint_st dint_407__; struct meltint_st dint_408__; struct meltint_st dint_409__; struct MELT_ROUTINE_STRUCT (4) drout_410__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_411__CLASS_NREP_UNSAFE_NTH_COMPONENT; struct MELT_STRING_STRUCT (31) dstr_412__CLASS_NREP_UNSAF; struct MELT_OBJECT_STRUCT (3) dsym_413__NTHCOMP; struct MELT_STRING_STRUCT (7) dstr_414__NTHCOMP; struct MELT_ROUTINE_STRUCT (11) drout_415__NORMPAT_ANDPAT; struct MELT_CLOSURE_STRUCT (0) dclo_416__NORMPAT_ANDPAT; struct MELT_ROUTINE_STRUCT (4) drout_417__LAMBDA_; struct MELT_ROUTINE_STRUCT (33) drout_418__NORMPAT_ORPAT; struct MELT_CLOSURE_STRUCT (0) dclo_419__NORMPAT_ORPAT; struct MELT_OBJECT_STRUCT (3) dsym_420__MAPOBJECT_SORTED_ATTRIBUTE_TUPLE; struct MELT_STRING_STRUCT (32) dstr_421__MAPOBJECT_SORTED; struct MELT_OBJECT_STRUCT (3) dsym_422__MULTIPLE_MAP; struct MELT_STRING_STRUCT (12) dstr_423__MULTIPLE_MAP; struct MELT_ROUTINE_STRUCT (3) drout_424__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_425__CLASS_NREP; struct MELT_STRING_STRUCT (10) dstr_426__CLASS_NREP; struct MELT_ROUTINE_STRUCT (3) drout_427__LAMBDA_; struct MELT_ROUTINE_STRUCT (4) drout_428__LAMBDA_; struct MELT_ROUTINE_STRUCT (42) drout_429__NORMPAT_ANYMATCHPAT; struct MELT_CLOSURE_STRUCT (0) dclo_430__NORMPAT_ANYMATCHPAT; struct MELT_OBJECT_STRUCT (3) dsym_431__CLASS_SOURCE_PATTERN_MATCHER; struct MELT_STRING_STRUCT (28) dstr_432__CLASS_SOURCE_PAT; struct MELT_OBJECT_STRUCT (3) dsym_433__CLASS_ANY_BINDING; struct MELT_STRING_STRUCT (17) dstr_434__CLASS_ANY_BINDIN; struct MELT_OBJECT_STRUCT (3) dsym_435__FIND_ENV; struct MELT_STRING_STRUCT (8) dstr_436__FIND_ENV; struct MELT_OBJECT_STRUCT (3) dsym_437__FRESH_ENV; struct MELT_STRING_STRUCT (9) dstr_438__FRESH_ENV; struct MELT_OBJECT_STRUCT (3) dsym_439__PUT_ENV; struct MELT_STRING_STRUCT (7) dstr_440__PUT_ENV; struct MELT_ROUTINE_STRUCT (2) drout_441__LAMBDA_; struct MELT_ROUTINE_STRUCT (2) drout_442__LAMBDA_; struct MELT_ROUTINE_STRUCT (7) drout_443__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_444__MULTIPLE_TO_LIST; struct MELT_STRING_STRUCT (16) dstr_445__MULTIPLE_TO_LIST; struct MELT_ROUTINE_STRUCT (2) drout_446__LAMBDA_; struct MELT_ROUTINE_STRUCT (11) drout_447__NORMPAT_CONSTPAT; struct MELT_CLOSURE_STRUCT (0) dclo_448__NORMPAT_CONSTPAT; struct MELT_ROUTINE_STRUCT (2) drout_449__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_450__MATCH_GRAPHIC_DOT_PREFIX; struct MELT_STRING_STRUCT (24) dstr_451__MATCH_GRAPHIC_DO; struct MELT_OBJECT_STRUCT (1) dobj_452__MATCH_GRAPHIC_DOT_PREFIX; struct MELT_ROUTINE_STRUCT (4) drout_453__MATCH_GRAPHIC_OPTSET; struct MELT_CLOSURE_STRUCT (0) dclo_454__MATCH_GRAPHIC_OPTSET; struct MELT_OBJECT_STRUCT (3) dsym_455__DISCR_STRING; struct MELT_STRING_STRUCT (12) dstr_456__DISCR_STRING; struct MELT_OBJECT_STRUCT (3) dsym_457__REGISTER_OPTION; struct MELT_STRING_STRUCT (15) dstr_458__REGISTER_OPTION; struct MELT_OBJECT_STRUCT (3) dsym_459__MATCH_GRAPHIC; struct MELT_STRING_STRUCT (13) dstr_460__MATCH_GRAPHIC; struct MELT_STRING_STRUCT (81) dstr_461__Prefix_for_Graph; struct MELT_OBJECT_STRUCT (3) dsym_462__CLASS_MATCH_GRAPHIC; struct MELT_STRING_STRUCT (19) dstr_463__CLASS_MATCH_GRAP; struct MELT_OBJECT_STRUCT (3) dsym_464__CLASS_PROPED; struct MELT_STRING_STRUCT (12) dstr_465__CLASS_PROPED; struct MELT_OBJECT_STRUCT (8) dobj_466__CLASS_MATCH_GRAPHIC; struct MELT_STRING_STRUCT (19) dstr_467__CLASS_MATCH_GRAP; struct MELT_MULTIPLE_STRUCT (2) dtup_468__CLASS_MATCH_GRAPHIC; struct MELT_MULTIPLE_STRUCT (6) dtup_469__CLASS_MATCH_GRAPHIC; struct MELT_OBJECT_STRUCT (3) dsym_470__MCHGX_FILENAME; struct MELT_STRING_STRUCT (14) dstr_471__MCHGX_FILENAME; struct MELT_OBJECT_STRUCT (4) dobj_472__MCHGX_FILENAME; struct MELT_STRING_STRUCT (14) dstr_473__MCHGX_FILENAME; struct MELT_OBJECT_STRUCT (3) dsym_474__MCHGX_NODOUT; struct MELT_STRING_STRUCT (12) dstr_475__MCHGX_NODOUT; struct MELT_OBJECT_STRUCT (4) dobj_476__MCHGX_NODOUT; struct MELT_STRING_STRUCT (12) dstr_477__MCHGX_NODOUT; struct MELT_OBJECT_STRUCT (3) dsym_478__MCHGX_EDGOUT; struct MELT_STRING_STRUCT (12) dstr_479__MCHGX_EDGOUT; struct MELT_OBJECT_STRUCT (4) dobj_480__MCHGX_EDGOUT; struct MELT_STRING_STRUCT (12) dstr_481__MCHGX_EDGOUT; struct MELT_OBJECT_STRUCT (3) dsym_482__MCHGX_DATANAMEMAP; struct MELT_STRING_STRUCT (17) dstr_483__MCHGX_DATANAMEMA; struct MELT_OBJECT_STRUCT (4) dobj_484__MCHGX_DATANAMEMAP; struct MELT_STRING_STRUCT (17) dstr_485__MCHGX_DATANAMEMA; struct MELT_OBJECT_STRUCT (3) dsym_486__MCHGX_STEPNAMEMAP; struct MELT_STRING_STRUCT (17) dstr_487__MCHGX_STEPNAMEMA; struct MELT_OBJECT_STRUCT (4) dobj_488__MCHGX_STEPNAMEMAP; struct MELT_STRING_STRUCT (17) dstr_489__MCHGX_STEPNAMEMA; struct MELT_ROUTINE_STRUCT (2) drout_490__MG_OUT_NODE_NAME; struct MELT_CLOSURE_STRUCT (0) dclo_491__MG_OUT_NODE_NAME; struct MELT_OBJECT_STRUCT (3) dsym_492__MATCHGRAPHIC_LABEL; 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 (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 (41) 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__MATCH_INTER_; struct MELT_STRING_STRUCT (12) dstr_519__MATCH_INTER_; struct MELT_OBJECT_STRUCT (3) dsym_520__CLASS_NREP_CHECKSIGNAL; struct MELT_STRING_STRUCT (22) dstr_521__CLASS_NREP_CHECK; struct MELT_OBJECT_STRUCT (3) dsym_522__CTYPE_VOID; struct MELT_STRING_STRUCT (10) dstr_523__CTYPE_VOID; struct MELT_OBJECT_STRUCT (3) dsym_524__MATCHED_; struct MELT_STRING_STRUCT (9) dstr_525__MATCHED_; struct MELT_OBJECT_STRUCT (3) dsym_526__CLASS_SOURCE_MATCH_CASE; struct MELT_STRING_STRUCT (23) dstr_527__CLASS_SOURCE_MAT; struct MELT_ROUTINE_STRUCT (2) drout_528__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_529__WRAP_NORMAL_LETSEQ; struct MELT_STRING_STRUCT (18) dstr_530__WRAP_NORMAL_LETS; struct MELT_OBJECT_STRUCT (3) dsym_531__MATCHRES_; struct MELT_STRING_STRUCT (9) dstr_532__MATCHRES_; struct MELT_OBJECT_STRUCT (3) dsym_533__CLASS_MATCHING_CONTEXT; struct MELT_STRING_STRUCT (22) dstr_534__CLASS_MATCHING_C; struct MELT_OBJECT_STRUCT (8) dobj_535__CLASS_MATCHING_CONTEXT; struct MELT_STRING_STRUCT (22) dstr_536__CLASS_MATCHING_C; struct MELT_MULTIPLE_STRUCT (1) dtup_537__CLASS_MATCHING_CONTEXT; struct MELT_MULTIPLE_STRUCT (10) dtup_538__CLASS_MATCHING_CONTEXT; struct MELT_OBJECT_STRUCT (3) dsym_539__MCTX_NORMCTXT; struct MELT_STRING_STRUCT (13) dstr_540__MCTX_NORMCTXT; struct MELT_OBJECT_STRUCT (4) dobj_541__MCTX_NORMCTXT; struct MELT_STRING_STRUCT (13) dstr_542__MCTX_NORMCTXT; struct MELT_OBJECT_STRUCT (3) dsym_543__MCTX_SOURCE; struct MELT_STRING_STRUCT (11) dstr_544__MCTX_SOURCE; struct MELT_OBJECT_STRUCT (4) dobj_545__MCTX_SOURCE; struct MELT_STRING_STRUCT (11) dstr_546__MCTX_SOURCE; struct MELT_OBJECT_STRUCT (3) dsym_547__MCTX_NMATCHED; struct MELT_STRING_STRUCT (13) dstr_548__MCTX_NMATCHED; struct MELT_OBJECT_STRUCT (4) dobj_549__MCTX_NMATCHED; struct MELT_STRING_STRUCT (13) dstr_550__MCTX_NMATCHED; struct MELT_OBJECT_STRUCT (3) dsym_551__MCTX_NMATBIND; struct MELT_STRING_STRUCT (13) dstr_552__MCTX_NMATBIND; struct MELT_OBJECT_STRUCT (4) dobj_553__MCTX_NMATBIND; struct MELT_STRING_STRUCT (13) dstr_554__MCTX_NMATBIND; struct MELT_OBJECT_STRUCT (3) dsym_555__MCTX_CASES; struct MELT_STRING_STRUCT (10) dstr_556__MCTX_CASES; struct MELT_OBJECT_STRUCT (4) dobj_557__MCTX_CASES; struct MELT_STRING_STRUCT (10) dstr_558__MCTX_CASES; struct MELT_OBJECT_STRUCT (3) dsym_559__MCTX_ENV; struct MELT_STRING_STRUCT (8) dstr_560__MCTX_ENV; struct MELT_OBJECT_STRUCT (4) dobj_561__MCTX_ENV; struct MELT_STRING_STRUCT (8) dstr_562__MCTX_ENV; struct MELT_OBJECT_STRUCT (3) dsym_563__MCTX_MDATA; struct MELT_STRING_STRUCT (10) dstr_564__MCTX_MDATA; struct MELT_OBJECT_STRUCT (4) dobj_565__MCTX_MDATA; struct MELT_STRING_STRUCT (10) dstr_566__MCTX_MDATA; struct MELT_OBJECT_STRUCT (3) dsym_567__MCTX_VARHANDLERS; struct MELT_STRING_STRUCT (16) dstr_568__MCTX_VARHANDLERS; struct MELT_OBJECT_STRUCT (4) dobj_569__MCTX_VARHANDLERS; struct MELT_STRING_STRUCT (16) dstr_570__MCTX_VARHANDLERS; struct MELT_OBJECT_STRUCT (3) dsym_571__MCTX_FLAGS; struct MELT_STRING_STRUCT (10) dstr_572__MCTX_FLAGS; struct MELT_OBJECT_STRUCT (4) dobj_573__MCTX_FLAGS; struct MELT_STRING_STRUCT (10) dstr_574__MCTX_FLAGS; struct MELT_OBJECT_STRUCT (3) dsym_575__MCTX_ENDLABEL; struct MELT_STRING_STRUCT (13) dstr_576__MCTX_ENDLABEL; struct MELT_OBJECT_STRUCT (4) dobj_577__MCTX_ENDLABEL; struct MELT_STRING_STRUCT (13) dstr_578__MCTX_ENDLABEL; struct MELT_OBJECT_STRUCT (3) dsym_579__CLASS_MATCH_CASE; struct MELT_STRING_STRUCT (16) dstr_580__CLASS_MATCH_CASE; struct MELT_OBJECT_STRUCT (8) dobj_581__CLASS_MATCH_CASE; struct MELT_STRING_STRUCT (16) dstr_582__CLASS_MATCH_CASE; struct MELT_MULTIPLE_STRUCT (2) dtup_583__CLASS_MATCH_CASE; struct MELT_MULTIPLE_STRUCT (5) dtup_584__CLASS_MATCH_CASE; struct MELT_OBJECT_STRUCT (3) dsym_585__MCASE_MCTXT; struct MELT_STRING_STRUCT (11) dstr_586__MCASE_MCTXT; struct MELT_OBJECT_STRUCT (4) dobj_587__MCASE_MCTXT; struct MELT_STRING_STRUCT (11) dstr_588__MCASE_MCTXT; struct MELT_OBJECT_STRUCT (3) dsym_589__MCASE_SOURCE; struct MELT_STRING_STRUCT (12) dstr_590__MCASE_SOURCE; struct MELT_OBJECT_STRUCT (4) dobj_591__MCASE_SOURCE; struct MELT_STRING_STRUCT (12) dstr_592__MCASE_SOURCE; struct MELT_OBJECT_STRUCT (3) dsym_593__MCASE_INDEX; struct MELT_STRING_STRUCT (11) dstr_594__MCASE_INDEX; struct MELT_OBJECT_STRUCT (4) dobj_595__MCASE_INDEX; struct MELT_STRING_STRUCT (11) dstr_596__MCASE_INDEX; struct MELT_OBJECT_STRUCT (3) dsym_597__MCASE_VARMAP; struct MELT_STRING_STRUCT (12) dstr_598__MCASE_VARMAP; struct MELT_OBJECT_STRUCT (4) dobj_599__MCASE_VARMAP; struct MELT_STRING_STRUCT (12) dstr_600__MCASE_VARMAP; struct MELT_OBJECT_STRUCT (3) dsym_601__CLASS_MATCHED_DATA; struct MELT_STRING_STRUCT (18) dstr_602__CLASS_MATCHED_DA; struct MELT_OBJECT_STRUCT (8) dobj_603__CLASS_MATCHED_DATA; struct MELT_STRING_STRUCT (18) dstr_604__CLASS_MATCHED_DA; struct MELT_MULTIPLE_STRUCT (2) dtup_605__CLASS_MATCHED_DATA; struct MELT_MULTIPLE_STRUCT (5) dtup_606__CLASS_MATCHED_DATA; struct MELT_OBJECT_STRUCT (3) dsym_607__MDATA_SYMB; struct MELT_STRING_STRUCT (10) dstr_608__MDATA_SYMB; struct MELT_OBJECT_STRUCT (4) dobj_609__MDATA_SYMB; struct MELT_STRING_STRUCT (10) dstr_610__MDATA_SYMB; struct MELT_OBJECT_STRUCT (3) dsym_611__MDATA_CTYPE; struct MELT_STRING_STRUCT (11) dstr_612__MDATA_CTYPE; struct MELT_OBJECT_STRUCT (4) dobj_613__MDATA_CTYPE; struct MELT_STRING_STRUCT (11) dstr_614__MDATA_CTYPE; struct MELT_OBJECT_STRUCT (3) dsym_615__MDATA_ORIG; struct MELT_STRING_STRUCT (10) dstr_616__MDATA_ORIG; struct MELT_OBJECT_STRUCT (4) dobj_617__MDATA_ORIG; struct MELT_STRING_STRUCT (10) dstr_618__MDATA_ORIG; struct MELT_OBJECT_STRUCT (3) dsym_619__MDATA_STEPS; struct MELT_STRING_STRUCT (11) dstr_620__MDATA_STEPS; struct MELT_OBJECT_STRUCT (4) dobj_621__MDATA_STEPS; struct MELT_STRING_STRUCT (11) dstr_622__MDATA_STEPS; struct MELT_OBJECT_STRUCT (3) dsym_623__CLASS_MATCHED_NORMAL_DATA; struct MELT_STRING_STRUCT (25) dstr_624__CLASS_MATCHED_NO; struct MELT_OBJECT_STRUCT (8) dobj_625__CLASS_MATCHED_NORMAL_DATA; struct MELT_STRING_STRUCT (25) dstr_626__CLASS_MATCHED_NO; struct MELT_MULTIPLE_STRUCT (3) dtup_627__CLASS_MATCHED_NORMAL_DATA; struct MELT_MULTIPLE_STRUCT (5) dtup_628__CLASS_MATCHED_NORMAL_DATA; struct MELT_OBJECT_STRUCT (3) dsym_629__CLASS_MATCHED_BINDING; struct MELT_STRING_STRUCT (21) dstr_630__CLASS_MATCHED_BI; struct MELT_OBJECT_STRUCT (8) dobj_631__CLASS_MATCHED_BINDING; struct MELT_STRING_STRUCT (21) dstr_632__CLASS_MATCHED_BI; struct MELT_MULTIPLE_STRUCT (2) dtup_633__CLASS_MATCHED_BINDING; struct MELT_MULTIPLE_STRUCT (3) dtup_634__CLASS_MATCHED_BINDING; struct MELT_OBJECT_STRUCT (3) dsym_635__MATCHBIND_DATA; struct MELT_STRING_STRUCT (14) dstr_636__MATCHBIND_DATA; struct MELT_OBJECT_STRUCT (4) dobj_637__MATCHBIND_DATA; struct MELT_STRING_STRUCT (14) dstr_638__MATCHBIND_DATA; struct MELT_OBJECT_STRUCT (3) dsym_639__MATCHBIND_NBOCC; struct MELT_STRING_STRUCT (15) dstr_640__MATCHBIND_NBOCC; struct MELT_OBJECT_STRUCT (4) dobj_641__MATCHBIND_NBOCC; struct MELT_STRING_STRUCT (15) dstr_642__MATCHBIND_NBOCC; struct MELT_ROUTINE_STRUCT (6) drout_643__NORMBIND_MATCHBIND; struct MELT_CLOSURE_STRUCT (0) dclo_644__NORMBIND_MATCHBIND; struct MELT_OBJECT_STRUCT (3) dsym_645__NORMALIZE_BINDING; struct MELT_STRING_STRUCT (17) dstr_646__NORMALIZE_BINDIN; struct MELT_OBJECT_STRUCT (3) dsym_647__CLASS_MATCH_FLAG; struct MELT_STRING_STRUCT (16) dstr_648__CLASS_MATCH_FLAG; struct MELT_OBJECT_STRUCT (8) dobj_649__CLASS_MATCH_FLAG; struct MELT_STRING_STRUCT (16) dstr_650__CLASS_MATCH_FLAG; struct MELT_MULTIPLE_STRUCT (3) dtup_651__CLASS_MATCH_FLAG; struct MELT_MULTIPLE_STRUCT (6) dtup_652__CLASS_MATCH_FLAG; struct MELT_OBJECT_STRUCT (3) dsym_653__MFLAG_SPAT; struct MELT_STRING_STRUCT (10) dstr_654__MFLAG_SPAT; struct MELT_OBJECT_STRUCT (4) dobj_655__MFLAG_SPAT; struct MELT_STRING_STRUCT (10) dstr_656__MFLAG_SPAT; struct MELT_OBJECT_STRUCT (3) dsym_657__MFLAG_RANK; struct MELT_STRING_STRUCT (10) dstr_658__MFLAG_RANK; struct MELT_OBJECT_STRUCT (4) dobj_659__MFLAG_RANK; struct MELT_STRING_STRUCT (10) dstr_660__MFLAG_RANK; struct MELT_OBJECT_STRUCT (3) dsym_661__MFLAG_STRING; struct MELT_STRING_STRUCT (12) dstr_662__MFLAG_STRING; struct MELT_OBJECT_STRUCT (4) dobj_663__MFLAG_STRING; struct MELT_STRING_STRUCT (12) dstr_664__MFLAG_STRING; struct MELT_OBJECT_STRUCT (3) dsym_665__MFLAG_SETSTEP; struct MELT_STRING_STRUCT (13) dstr_666__MFLAG_SETSTEP; struct MELT_OBJECT_STRUCT (4) dobj_667__MFLAG_SETSTEP; struct MELT_STRING_STRUCT (13) dstr_668__MFLAG_SETSTEP; struct MELT_OBJECT_STRUCT (3) dsym_669__CLASS_MATCH_STEP; struct MELT_STRING_STRUCT (16) dstr_670__CLASS_MATCH_STEP; struct MELT_OBJECT_STRUCT (8) dobj_671__CLASS_MATCH_STEP; struct MELT_STRING_STRUCT (16) dstr_672__CLASS_MATCH_STEP; struct MELT_MULTIPLE_STRUCT (3) dtup_673__CLASS_MATCH_STEP; struct MELT_MULTIPLE_STRUCT (2) dtup_674__CLASS_MATCH_STEP; struct MELT_OBJECT_STRUCT (3) dsym_675__CLASS_MATCH_STEP_THEN; struct MELT_STRING_STRUCT (21) dstr_676__CLASS_MATCH_STEP; struct MELT_OBJECT_STRUCT (8) dobj_677__CLASS_MATCH_STEP_THEN; struct MELT_STRING_STRUCT (21) dstr_678__CLASS_MATCH_STEP; struct MELT_MULTIPLE_STRUCT (4) dtup_679__CLASS_MATCH_STEP_THEN; struct MELT_MULTIPLE_STRUCT (3) dtup_680__CLASS_MATCH_STEP_THEN; struct MELT_OBJECT_STRUCT (3) dsym_681__MSTEP_THEN; struct MELT_STRING_STRUCT (10) dstr_682__MSTEP_THEN; struct MELT_OBJECT_STRUCT (4) dobj_683__MSTEP_THEN; struct MELT_STRING_STRUCT (10) dstr_684__MSTEP_THEN; struct MELT_OBJECT_STRUCT (3) dsym_685__CLASS_MATCH_STEP_CLEAR; struct MELT_STRING_STRUCT (22) dstr_686__CLASS_MATCH_STEP; struct MELT_OBJECT_STRUCT (8) dobj_687__CLASS_MATCH_STEP_CLEAR; struct MELT_STRING_STRUCT (22) dstr_688__CLASS_MATCH_STEP; struct MELT_MULTIPLE_STRUCT (5) dtup_689__CLASS_MATCH_STEP_CLEAR; struct MELT_MULTIPLE_STRUCT (4) dtup_690__CLASS_MATCH_STEP_CLEAR; struct MELT_OBJECT_STRUCT (3) dsym_691__MSTEP_CLEARDATA; struct MELT_STRING_STRUCT (15) dstr_692__MSTEP_CLEARDATA; struct MELT_OBJECT_STRUCT (4) dobj_693__MSTEP_CLEARDATA; struct MELT_STRING_STRUCT (15) dstr_694__MSTEP_CLEARDATA; struct MELT_OBJECT_STRUCT (3) dsym_695__CLASS_MATCH_STEP_WITH_FLAG; struct MELT_STRING_STRUCT (26) dstr_696__CLASS_MATCH_STEP; struct MELT_OBJECT_STRUCT (8) dobj_697__CLASS_MATCH_STEP_WITH_FLAG; struct MELT_STRING_STRUCT (26) dstr_698__CLASS_MATCH_STEP; struct MELT_MULTIPLE_STRUCT (5) dtup_699__CLASS_MATCH_STEP_WITH_FLAG; struct MELT_MULTIPLE_STRUCT (4) dtup_700__CLASS_MATCH_STEP_WITH_FLAG; struct MELT_OBJECT_STRUCT (3) dsym_701__MSTEP_FLAG; struct MELT_STRING_STRUCT (10) dstr_702__MSTEP_FLAG; struct MELT_OBJECT_STRUCT (4) dobj_703__MSTEP_FLAG; struct MELT_STRING_STRUCT (10) dstr_704__MSTEP_FLAG; struct MELT_OBJECT_STRUCT (3) dsym_705__CLASS_MATCH_STEP_WITH_DATA; struct MELT_STRING_STRUCT (26) dstr_706__CLASS_MATCH_STEP; struct MELT_OBJECT_STRUCT (8) dobj_707__CLASS_MATCH_STEP_WITH_DATA; struct MELT_STRING_STRUCT (26) dstr_708__CLASS_MATCH_STEP; struct MELT_MULTIPLE_STRUCT (5) dtup_709__CLASS_MATCH_STEP_WITH_DATA; struct MELT_MULTIPLE_STRUCT (5) dtup_710__CLASS_MATCH_STEP_WITH_DATA; struct MELT_OBJECT_STRUCT (3) dsym_711__MSTEP_DATA; struct MELT_STRING_STRUCT (10) dstr_712__MSTEP_DATA; struct MELT_OBJECT_STRUCT (4) dobj_713__MSTEP_DATA; struct MELT_STRING_STRUCT (10) dstr_714__MSTEP_DATA; struct MELT_OBJECT_STRUCT (3) dsym_715__MSTEP_INDEX; struct MELT_STRING_STRUCT (11) dstr_716__MSTEP_INDEX; struct MELT_OBJECT_STRUCT (4) dobj_717__MSTEP_INDEX; struct MELT_STRING_STRUCT (11) dstr_718__MSTEP_INDEX; struct MELT_OBJECT_STRUCT (3) dsym_719__CLASS_MATCH_STEP_FLAG_SET; struct MELT_STRING_STRUCT (25) dstr_720__CLASS_MATCH_STEP; struct MELT_OBJECT_STRUCT (8) dobj_721__CLASS_MATCH_STEP_FLAG_SET; struct MELT_STRING_STRUCT (25) dstr_722__CLASS_MATCH_STEP; struct MELT_MULTIPLE_STRUCT (6) dtup_723__CLASS_MATCH_STEP_FLAG_SET; struct MELT_MULTIPLE_STRUCT (4) dtup_724__CLASS_MATCH_STEP_FLAG_SET; struct MELT_OBJECT_STRUCT (3) dsym_725__CLASS_MATCH_STEP_FLAG_OPERATION; struct MELT_STRING_STRUCT (31) dstr_726__CLASS_MATCH_STEP; struct MELT_OBJECT_STRUCT (8) dobj_727__CLASS_MATCH_STEP_FLAG_OPERATION; struct MELT_STRING_STRUCT (31) dstr_728__CLASS_MATCH_STEP; struct MELT_MULTIPLE_STRUCT (6) dtup_729__CLASS_MATCH_STEP_FLAG_OPERATION; struct MELT_MULTIPLE_STRUCT (5) dtup_730__CLASS_MATCH_STEP_FLAG_OPERATION; struct MELT_OBJECT_STRUCT (3) dsym_731__MSTEP_FLAGARGS; struct MELT_STRING_STRUCT (14) dstr_732__MSTEP_FLAGARGS; struct MELT_OBJECT_STRUCT (4) dobj_733__MSTEP_FLAGARGS; struct MELT_STRING_STRUCT (14) dstr_734__MSTEP_FLAGARGS; struct MELT_OBJECT_STRUCT (3) dsym_735__CLASS_MATCH_STEP_FLAG_CONJUNCTION; struct MELT_STRING_STRUCT (33) dstr_736__CLASS_MATCH_STEP; struct MELT_OBJECT_STRUCT (8) dobj_737__CLASS_MATCH_STEP_FLAG_CONJUNCTION; struct MELT_STRING_STRUCT (33) dstr_738__CLASS_MATCH_STEP; struct MELT_MULTIPLE_STRUCT (7) dtup_739__CLASS_MATCH_STEP_FLAG_CONJUNCTION; struct MELT_MULTIPLE_STRUCT (5) dtup_740__CLASS_MATCH_STEP_FLAG_CONJUNCTION; struct MELT_OBJECT_STRUCT (3) dsym_741__CLASS_MATCH_STEP_FLAG_DISJUNCTION; struct MELT_STRING_STRUCT (33) dstr_742__CLASS_MATCH_STEP; struct MELT_OBJECT_STRUCT (8) dobj_743__CLASS_MATCH_STEP_FLAG_DISJUNCTION; struct MELT_STRING_STRUCT (33) dstr_744__CLASS_MATCH_STEP; struct MELT_MULTIPLE_STRUCT (7) dtup_745__CLASS_MATCH_STEP_FLAG_DISJUNCTION; struct MELT_MULTIPLE_STRUCT (5) dtup_746__CLASS_MATCH_STEP_FLAG_DISJUNCTION; struct MELT_OBJECT_STRUCT (3) dsym_747__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG; struct MELT_STRING_STRUCT (34) dstr_748__CLASS_MATCH_STEP; struct MELT_OBJECT_STRUCT (8) dobj_749__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG; struct MELT_STRING_STRUCT (34) dstr_750__CLASS_MATCH_STEP; struct MELT_MULTIPLE_STRUCT (6) dtup_751__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG; struct MELT_MULTIPLE_STRUCT (7) dtup_752__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG; struct MELT_OBJECT_STRUCT (3) dsym_753__MSTEPSUCCESS_VAROCC; struct MELT_STRING_STRUCT (19) dstr_754__MSTEPSUCCESS_VAR; struct MELT_OBJECT_STRUCT (4) dobj_755__MSTEPSUCCESS_VAROCC; struct MELT_STRING_STRUCT (19) dstr_756__MSTEPSUCCESS_VAR; struct MELT_OBJECT_STRUCT (3) dsym_757__MSTEPSUCCESS_BINDS; struct MELT_STRING_STRUCT (18) dstr_758__MSTEPSUCCESS_BIN; struct MELT_OBJECT_STRUCT (4) dobj_759__MSTEPSUCCESS_BINDS; struct MELT_STRING_STRUCT (18) dstr_760__MSTEPSUCCESS_BIN; struct MELT_OBJECT_STRUCT (3) dsym_761__MSTEPSUCCESS_BODY; struct MELT_STRING_STRUCT (17) dstr_762__MSTEPSUCCESS_BOD; struct MELT_OBJECT_STRUCT (4) dobj_763__MSTEPSUCCESS_BODY; struct MELT_STRING_STRUCT (17) dstr_764__MSTEPSUCCESS_BOD; struct MELT_OBJECT_STRUCT (3) dsym_765__CLASS_MATCH_STEP_TEST; struct MELT_STRING_STRUCT (21) dstr_766__CLASS_MATCH_STEP; struct MELT_OBJECT_STRUCT (8) dobj_767__CLASS_MATCH_STEP_TEST; struct MELT_STRING_STRUCT (21) dstr_768__CLASS_MATCH_STEP; struct MELT_MULTIPLE_STRUCT (6) dtup_769__CLASS_MATCH_STEP_TEST; struct MELT_MULTIPLE_STRUCT (6) dtup_770__CLASS_MATCH_STEP_TEST; struct MELT_OBJECT_STRUCT (3) dsym_771__MSTEP_ELSE; struct MELT_STRING_STRUCT (10) dstr_772__MSTEP_ELSE; struct MELT_OBJECT_STRUCT (4) dobj_773__MSTEP_ELSE; struct MELT_STRING_STRUCT (10) dstr_774__MSTEP_ELSE; struct MELT_OBJECT_STRUCT (3) dsym_775__CLASS_MATCH_STEP_TEST_VARIABLE; struct MELT_STRING_STRUCT (30) dstr_776__CLASS_MATCH_STEP; struct MELT_OBJECT_STRUCT (8) dobj_777__CLASS_MATCH_STEP_TEST_VARIABLE; struct MELT_STRING_STRUCT (30) dstr_778__CLASS_MATCH_STEP; struct MELT_MULTIPLE_STRUCT (7) dtup_779__CLASS_MATCH_STEP_TEST_VARIABLE; struct MELT_MULTIPLE_STRUCT (7) dtup_780__CLASS_MATCH_STEP_TEST_VARIABLE; struct MELT_OBJECT_STRUCT (3) dsym_781__MSTEPTESTVAR_DATA; struct MELT_STRING_STRUCT (17) dstr_782__MSTEPTESTVAR_DAT; struct MELT_OBJECT_STRUCT (4) dobj_783__MSTEPTESTVAR_DATA; struct MELT_STRING_STRUCT (17) dstr_784__MSTEPTESTVAR_DAT; struct MELT_OBJECT_STRUCT (3) dsym_785__CLASS_MATCH_STEP_TEST_CONSTANT; struct MELT_STRING_STRUCT (30) dstr_786__CLASS_MATCH_STEP; struct MELT_OBJECT_STRUCT (8) dobj_787__CLASS_MATCH_STEP_TEST_CONSTANT; struct MELT_STRING_STRUCT (30) dstr_788__CLASS_MATCH_STEP; struct MELT_MULTIPLE_STRUCT (7) dtup_789__CLASS_MATCH_STEP_TEST_CONSTANT; struct MELT_MULTIPLE_STRUCT (8) dtup_790__CLASS_MATCH_STEP_TEST_CONSTANT; struct MELT_OBJECT_STRUCT (3) dsym_791__MSTEPTESTCONST_DATA; struct MELT_STRING_STRUCT (19) dstr_792__MSTEPTESTCONST_D; struct MELT_OBJECT_STRUCT (4) dobj_793__MSTEPTESTCONST_DATA; struct MELT_STRING_STRUCT (19) dstr_794__MSTEPTESTCONST_D; struct MELT_OBJECT_STRUCT (3) dsym_795__MSTEPTESTCONST_BIND; struct MELT_STRING_STRUCT (19) dstr_796__MSTEPTESTCONST_B; struct MELT_OBJECT_STRUCT (4) dobj_797__MSTEPTESTCONST_BIND; struct MELT_STRING_STRUCT (19) dstr_798__MSTEPTESTCONST_B; struct MELT_OBJECT_STRUCT (3) dsym_799__CLASS_MATCH_STEP_TEST_GROUP; struct MELT_STRING_STRUCT (27) dstr_800__CLASS_MATCH_STEP; struct MELT_OBJECT_STRUCT (8) dobj_801__CLASS_MATCH_STEP_TEST_GROUP; struct MELT_STRING_STRUCT (27) dstr_802__CLASS_MATCH_STEP; struct MELT_MULTIPLE_STRUCT (7) dtup_803__CLASS_MATCH_STEP_TEST_GROUP; struct MELT_MULTIPLE_STRUCT (9) dtup_804__CLASS_MATCH_STEP_TEST_GROUP; struct MELT_OBJECT_STRUCT (3) dsym_805__MSTGROUP_START; struct MELT_STRING_STRUCT (14) dstr_806__MSTGROUP_START; struct MELT_OBJECT_STRUCT (4) dobj_807__MSTGROUP_START; struct MELT_STRING_STRUCT (14) dstr_808__MSTGROUP_START; struct MELT_OBJECT_STRUCT (3) dsym_809__MSTGROUP_THEN; struct MELT_STRING_STRUCT (13) dstr_810__MSTGROUP_THEN; struct MELT_OBJECT_STRUCT (4) dobj_811__MSTGROUP_THEN; struct MELT_STRING_STRUCT (13) dstr_812__MSTGROUP_THEN; struct MELT_OBJECT_STRUCT (3) dsym_813__MSTGROUP_ELSE; struct MELT_STRING_STRUCT (13) dstr_814__MSTGROUP_ELSE; struct MELT_OBJECT_STRUCT (4) dobj_815__MSTGROUP_ELSE; struct MELT_STRING_STRUCT (13) dstr_816__MSTGROUP_ELSE; struct MELT_OBJECT_STRUCT (3) dsym_817__CLASS_MATCH_STEP_TEST_INSTANCE; struct MELT_STRING_STRUCT (30) dstr_818__CLASS_MATCH_STEP; struct MELT_OBJECT_STRUCT (8) dobj_819__CLASS_MATCH_STEP_TEST_INSTANCE; struct MELT_STRING_STRUCT (30) dstr_820__CLASS_MATCH_STEP; struct MELT_MULTIPLE_STRUCT (7) dtup_821__CLASS_MATCH_STEP_TEST_INSTANCE; struct MELT_MULTIPLE_STRUCT (8) dtup_822__CLASS_MATCH_STEP_TEST_INSTANCE; struct MELT_OBJECT_STRUCT (3) dsym_823__MSTINS_CLASS; struct MELT_STRING_STRUCT (12) dstr_824__MSTINS_CLASS; struct MELT_OBJECT_STRUCT (4) dobj_825__MSTINS_CLASS; struct MELT_STRING_STRUCT (12) dstr_826__MSTINS_CLASS; struct MELT_OBJECT_STRUCT (3) dsym_827__MSTINS_SLOTS; struct MELT_STRING_STRUCT (12) dstr_828__MSTINS_SLOTS; struct MELT_OBJECT_STRUCT (4) dobj_829__MSTINS_SLOTS; struct MELT_STRING_STRUCT (12) dstr_830__MSTINS_SLOTS; struct MELT_OBJECT_STRUCT (3) dsym_831__CLASS_MATCH_STEP_TEST_MULTIPLE; struct MELT_STRING_STRUCT (30) dstr_832__CLASS_MATCH_STEP; struct MELT_OBJECT_STRUCT (8) dobj_833__CLASS_MATCH_STEP_TEST_MULTIPLE; struct MELT_STRING_STRUCT (30) dstr_834__CLASS_MATCH_STEP; struct MELT_MULTIPLE_STRUCT (7) dtup_835__CLASS_MATCH_STEP_TEST_MULTIPLE; struct MELT_MULTIPLE_STRUCT (7) dtup_836__CLASS_MATCH_STEP_TEST_MULTIPLE; struct MELT_OBJECT_STRUCT (3) dsym_837__MSTTUP_COMPONENTS; struct MELT_STRING_STRUCT (17) dstr_838__MSTTUP_COMPONENT; struct MELT_OBJECT_STRUCT (4) dobj_839__MSTTUP_COMPONENTS; struct MELT_STRING_STRUCT (17) dstr_840__MSTTUP_COMPONENT; struct MELT_OBJECT_STRUCT (3) dsym_841__CLASS_MATCH_STEP_TEST_MATCHER; struct MELT_STRING_STRUCT (29) dstr_842__CLASS_MATCH_STEP; struct MELT_OBJECT_STRUCT (8) dobj_843__CLASS_MATCH_STEP_TEST_MATCHER; struct MELT_STRING_STRUCT (29) dstr_844__CLASS_MATCH_STEP; struct MELT_MULTIPLE_STRUCT (7) dtup_845__CLASS_MATCH_STEP_TEST_MATCHER; struct MELT_MULTIPLE_STRUCT (10) dtup_846__CLASS_MATCH_STEP_TEST_MATCHER; struct MELT_OBJECT_STRUCT (3) dsym_847__MSTMA_MATCHER; struct MELT_STRING_STRUCT (13) dstr_848__MSTMA_MATCHER; struct MELT_OBJECT_STRUCT (4) dobj_849__MSTMA_MATCHER; struct MELT_STRING_STRUCT (13) dstr_850__MSTMA_MATCHER; struct MELT_OBJECT_STRUCT (3) dsym_851__MSTMA_BINDS; struct MELT_STRING_STRUCT (11) dstr_852__MSTMA_BINDS; struct MELT_OBJECT_STRUCT (4) dobj_853__MSTMA_BINDS; struct MELT_STRING_STRUCT (11) dstr_854__MSTMA_BINDS; struct MELT_OBJECT_STRUCT (3) dsym_855__MSTMA_INS; struct MELT_STRING_STRUCT (9) dstr_856__MSTMA_INS; struct MELT_OBJECT_STRUCT (4) dobj_857__MSTMA_INS; struct MELT_STRING_STRUCT (9) dstr_858__MSTMA_INS; struct MELT_OBJECT_STRUCT (3) dsym_859__MSTMA_OUTS; struct MELT_STRING_STRUCT (10) dstr_860__MSTMA_OUTS; struct MELT_OBJECT_STRUCT (4) dobj_861__MSTMA_OUTS; struct MELT_STRING_STRUCT (10) dstr_862__MSTMA_OUTS; struct MELT_OBJECT_STRUCT (3) dsym_863__CLASS_NREP_MATCH_FLAG; struct MELT_STRING_STRUCT (21) dstr_864__CLASS_NREP_MATCH; struct MELT_OBJECT_STRUCT (3) dsym_865__CLASS_NREP_SIMPLE; struct MELT_STRING_STRUCT (17) dstr_866__CLASS_NREP_SIMPL; struct MELT_OBJECT_STRUCT (8) dobj_867__CLASS_NREP_MATCH_FLAG; struct MELT_STRING_STRUCT (21) dstr_868__CLASS_NREP_MATCH; struct MELT_MULTIPLE_STRUCT (3) dtup_869__CLASS_NREP_MATCH_FLAG; struct MELT_MULTIPLE_STRUCT (3) dtup_870__CLASS_NREP_MATCH_FLAG; struct MELT_OBJECT_STRUCT (3) dsym_871__NRPFLA_FLAG; struct MELT_STRING_STRUCT (11) dstr_872__NRPFLA_FLAG; struct MELT_OBJECT_STRUCT (4) dobj_873__NRPFLA_FLAG; struct MELT_STRING_STRUCT (11) dstr_874__NRPFLA_FLAG; struct MELT_OBJECT_STRUCT (3) dsym_875__NRPFLA_NMATCH; struct MELT_STRING_STRUCT (13) dstr_876__NRPFLA_NMATCH; struct MELT_OBJECT_STRUCT (4) dobj_877__NRPFLA_NMATCH; struct MELT_STRING_STRUCT (13) dstr_878__NRPFLA_NMATCH; struct MELT_OBJECT_STRUCT (3) dsym_879__CLASS_NREP_MATCHED_DATA; struct MELT_STRING_STRUCT (23) dstr_880__CLASS_NREP_MATCH; struct MELT_OBJECT_STRUCT (8) dobj_881__CLASS_NREP_MATCHED_DATA; struct MELT_STRING_STRUCT (23) dstr_882__CLASS_NREP_MATCH; struct MELT_MULTIPLE_STRUCT (3) dtup_883__CLASS_NREP_MATCHED_DATA; struct MELT_MULTIPLE_STRUCT (4) dtup_884__CLASS_NREP_MATCHED_DATA; struct MELT_OBJECT_STRUCT (3) dsym_885__NRMATD_CTYPE; struct MELT_STRING_STRUCT (12) dstr_886__NRMATD_CTYPE; struct MELT_OBJECT_STRUCT (4) dobj_887__NRMATD_CTYPE; struct MELT_STRING_STRUCT (12) dstr_888__NRMATD_CTYPE; struct MELT_OBJECT_STRUCT (3) dsym_889__NRMATD_MDATA; struct MELT_STRING_STRUCT (12) dstr_890__NRMATD_MDATA; struct MELT_OBJECT_STRUCT (4) dobj_891__NRMATD_MDATA; struct MELT_STRING_STRUCT (12) dstr_892__NRMATD_MDATA; struct MELT_OBJECT_STRUCT (3) dsym_893__NRMATD_RANK; struct MELT_STRING_STRUCT (11) dstr_894__NRMATD_RANK; struct MELT_OBJECT_STRUCT (4) dobj_895__NRMATD_RANK; struct MELT_STRING_STRUCT (11) dstr_896__NRMATD_RANK; struct MELT_ROUTINE_STRUCT (5) drout_897__MAKE_MATCH_FLAG; struct MELT_CLOSURE_STRUCT (0) dclo_898__MAKE_MATCH_FLAG; struct MELT_OBJECT_STRUCT (3) dsym_899__SCAN_SUBPATTERNS; struct MELT_STRING_STRUCT (16) dstr_900__SCAN_SUBPATTERNS; struct MELT_OBJECT_STRUCT (3) dsym_901__RECV; struct MELT_STRING_STRUCT (4) dstr_902__RECV; struct MELT_OBJECT_STRUCT (2) dobj_903; struct MELT_OBJECT_STRUCT (3) dsym_904__FUN; struct MELT_STRING_STRUCT (3) dstr_905__FUN; struct MELT_OBJECT_STRUCT (2) dobj_906; struct MELT_OBJECT_STRUCT (3) dsym_907__CTX; struct MELT_STRING_STRUCT (3) dstr_908__CTX; struct MELT_OBJECT_STRUCT (2) dobj_909; struct MELT_MULTIPLE_STRUCT (3) dtup_910__SCAN_SUBPATTERNS; struct MELT_OBJECT_STRUCT (4) dobj_911__SCAN_SUBPATTERNS; struct MELT_STRING_STRUCT (16) dstr_912__SCAN_SUBPATTERNS; struct MELT_OBJECT_STRUCT (3) dsym_913__SCAN_STEP_DATA; struct MELT_STRING_STRUCT (14) dstr_914__SCAN_STEP_DATA; struct MELT_OBJECT_STRUCT (3) dsym_915__STEP; struct MELT_STRING_STRUCT (4) dstr_916__STEP; struct MELT_OBJECT_STRUCT (2) dobj_917; struct MELT_OBJECT_STRUCT (2) dobj_918; struct MELT_OBJECT_STRUCT (2) dobj_919; struct MELT_MULTIPLE_STRUCT (3) dtup_920__SCAN_STEP_DATA; struct MELT_OBJECT_STRUCT (4) dobj_921__SCAN_STEP_DATA; struct MELT_STRING_STRUCT (14) dstr_922__SCAN_STEP_DATA; struct MELT_OBJECT_STRUCT (3) dsym_923__SCAN_STEP_FLAG; struct MELT_STRING_STRUCT (14) dstr_924__SCAN_STEP_FLAG; struct MELT_OBJECT_STRUCT (2) dobj_925; struct MELT_OBJECT_STRUCT (2) dobj_926; struct MELT_OBJECT_STRUCT (2) dobj_927; struct MELT_MULTIPLE_STRUCT (3) dtup_928__SCAN_STEP_FLAG; struct MELT_OBJECT_STRUCT (4) dobj_929__SCAN_STEP_FLAG; struct MELT_STRING_STRUCT (14) dstr_930__SCAN_STEP_FLAG; struct MELT_ROUTINE_STRUCT (1) drout_931__SCANSUBPAT_ANYRECV; struct MELT_CLOSURE_STRUCT (0) dclo_932__SCANSUBPAT_ANYRECV; struct MELT_ROUTINE_STRUCT (1) drout_933__SCANSTEPDATA_ANYRECV; struct MELT_CLOSURE_STRUCT (0) dclo_934__SCANSTEPDATA_ANYRECV; struct MELT_ROUTINE_STRUCT (1) drout_935__SCANSTEPFLAG_ANYRECV; struct MELT_CLOSURE_STRUCT (0) dclo_936__SCANSTEPFLAG_ANYRECV; struct MELT_ROUTINE_STRUCT (1) drout_937__SCANSUBPAT_NOOP; struct MELT_CLOSURE_STRUCT (0) dclo_938__SCANSUBPAT_NOOP; struct MELT_ROUTINE_STRUCT (1) drout_939__SCANSUBPAT_OR; struct MELT_CLOSURE_STRUCT (0) dclo_940__SCANSUBPAT_OR; struct MELT_ROUTINE_STRUCT (1) drout_941__SCANSUBPAT_AND; struct MELT_CLOSURE_STRUCT (0) dclo_942__SCANSUBPAT_AND; struct MELT_ROUTINE_STRUCT (2) drout_943__SCANSUBPAT_CONSTRUCT; struct MELT_CLOSURE_STRUCT (0) dclo_944__SCANSUBPAT_CONSTRUCT; struct MELT_ROUTINE_STRUCT (2) drout_945__SCANSUBPAT_OBJECT; struct MELT_CLOSURE_STRUCT (0) dclo_946__SCANSUBPAT_OBJECT; struct MELT_ROUTINE_STRUCT (8) drout_947__FILL_MATCHCASE; struct MELT_CLOSURE_STRUCT (0) dclo_948__FILL_MATCHCASE; struct MELT_ROUTINE_STRUCT (4) drout_949__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_950__PUT_THEN_MATCH; struct MELT_STRING_STRUCT (14) dstr_951__PUT_THEN_MATCH; struct MELT_OBJECT_STRUCT (2) dobj_952; struct MELT_OBJECT_STRUCT (3) dsym_953__THENSTEP; struct MELT_STRING_STRUCT (8) dstr_954__THENSTEP; struct MELT_OBJECT_STRUCT (2) dobj_955; struct MELT_MULTIPLE_STRUCT (2) dtup_956__PUT_THEN_MATCH; struct MELT_OBJECT_STRUCT (4) dobj_957__PUT_THEN_MATCH; struct MELT_STRING_STRUCT (14) dstr_958__PUT_THEN_MATCH; struct MELT_ROUTINE_STRUCT (2) drout_959__PUTTHEN_MATCHANY; struct MELT_CLOSURE_STRUCT (0) dclo_960__PUTTHEN_MATCHANY; struct MELT_ROUTINE_STRUCT (3) drout_961__START_STEP; struct MELT_CLOSURE_STRUCT (0) dclo_962__START_STEP; struct MELT_ROUTINE_STRUCT (6) drout_963__PUTTHEN_MATCHTHEN; struct MELT_CLOSURE_STRUCT (0) dclo_964__PUTTHEN_MATCHTHEN; struct MELT_ROUTINE_STRUCT (5) drout_965__PUTTHEN_MATCHGROUP; struct MELT_CLOSURE_STRUCT (0) dclo_966__PUTTHEN_MATCHGROUP; struct MELT_OBJECT_STRUCT (3) dsym_967__PUT_ELSE_MATCH; struct MELT_STRING_STRUCT (14) dstr_968__PUT_ELSE_MATCH; struct MELT_OBJECT_STRUCT (2) dobj_969; struct MELT_OBJECT_STRUCT (3) dsym_970__ELSESTEP; struct MELT_STRING_STRUCT (8) dstr_971__ELSESTEP; struct MELT_OBJECT_STRUCT (2) dobj_972; struct MELT_MULTIPLE_STRUCT (2) dtup_973__PUT_ELSE_MATCH; struct MELT_OBJECT_STRUCT (4) dobj_974__PUT_ELSE_MATCH; struct MELT_STRING_STRUCT (14) dstr_975__PUT_ELSE_MATCH; struct MELT_ROUTINE_STRUCT (2) drout_976__PUTELSE_MATCHANY; struct MELT_CLOSURE_STRUCT (0) dclo_977__PUTELSE_MATCHANY; struct MELT_ROUTINE_STRUCT (5) drout_978__PUTELSE_MATCHSTEPTHEN; struct MELT_CLOSURE_STRUCT (0) dclo_979__PUTELSE_MATCHSTEPTHEN; struct MELT_ROUTINE_STRUCT (6) drout_980__PUTELSE_MATCHTEST; struct MELT_CLOSURE_STRUCT (0) dclo_981__PUTELSE_MATCHTEST; struct MELT_ROUTINE_STRUCT (5) drout_982__PUTELSE_MATCHGROUP; struct MELT_CLOSURE_STRUCT (0) dclo_983__PUTELSE_MATCHGROUP; struct MELT_ROUTINE_STRUCT (2) drout_984__SCANSTEPDATA_TESTINS; struct MELT_CLOSURE_STRUCT (0) dclo_985__SCANSTEPDATA_TESTINS; struct MELT_ROUTINE_STRUCT (2) drout_986__SCANSTEPDATA_TESTTUPLE; struct MELT_CLOSURE_STRUCT (0) dclo_987__SCANSTEPDATA_TESTTUPLE; struct MELT_ROUTINE_STRUCT (1) drout_988__SCANSTEPDATA_TESTWITHFLAG; struct MELT_CLOSURE_STRUCT (0) dclo_989__SCANSTEPDATA_TESTWITHFLAG; struct MELT_ROUTINE_STRUCT (1) drout_990__SCANSTEPDATA_TESTMATCHER; struct MELT_CLOSURE_STRUCT (0) dclo_991__SCANSTEPDATA_TESTMATCHER; struct MELT_ROUTINE_STRUCT (1) drout_992__SCANSTEPFLAG_STEPWITHFLAG; struct MELT_CLOSURE_STRUCT (0) dclo_993__SCANSTEPFLAG_STEPWITHFLAG; struct MELT_ROUTINE_STRUCT (1) drout_994__SCANSTEPFLAG_STEPFLAGOPER; struct MELT_CLOSURE_STRUCT (0) dclo_995__SCANSTEPFLAG_STEPFLAGOPER; struct MELT_ROUTINE_STRUCT (2) drout_996__SCANSTEPFLAG_STEPWITHDATA; struct MELT_CLOSURE_STRUCT (0) dclo_997__SCANSTEPFLAG_STEPWITHDATA; struct MELT_OBJECT_STRUCT (3) dsym_998__TRANSLATE_PATTERN; struct MELT_STRING_STRUCT (17) dstr_999__TRANSLATE_PATTER; struct MELT_OBJECT_STRUCT (2) dobj_1000; struct MELT_OBJECT_STRUCT (3) dsym_1001__MDATA; struct MELT_STRING_STRUCT (5) dstr_1002__MDATA; struct MELT_OBJECT_STRUCT (2) dobj_1003; struct MELT_OBJECT_STRUCT (3) dsym_1004__MCASE; struct MELT_STRING_STRUCT (5) dstr_1005__MCASE; struct MELT_OBJECT_STRUCT (2) dobj_1006; struct MELT_OBJECT_STRUCT (3) dsym_1007__VARMAP; struct MELT_STRING_STRUCT (6) dstr_1008__VARMAP; struct MELT_OBJECT_STRUCT (2) dobj_1009; struct MELT_OBJECT_STRUCT (3) dsym_1010__SLOC; struct MELT_STRING_STRUCT (4) dstr_1011__SLOC; struct MELT_OBJECT_STRUCT (2) dobj_1012; struct MELT_MULTIPLE_STRUCT (5) dtup_1013__TRANSLATE_PATTERN; struct MELT_OBJECT_STRUCT (4) dobj_1014__TRANSLATE_PATTERN; struct MELT_STRING_STRUCT (17) dstr_1015__TRANSLATE_PATTER; struct MELT_ROUTINE_STRUCT (1) drout_1016__TRANSLPAT_ANYRECV; struct MELT_CLOSURE_STRUCT (0) dclo_1017__TRANSLPAT_ANYRECV; struct MELT_ROUTINE_STRUCT (2) drout_1018__TRANSLPAT_JOKERPAT; struct MELT_CLOSURE_STRUCT (0) dclo_1019__TRANSLPAT_JOKERPAT; struct MELT_ROUTINE_STRUCT (13) drout_1020__TRANSLPAT_CONSTPAT; struct MELT_CLOSURE_STRUCT (0) dclo_1021__TRANSLPAT_CONSTPAT; struct MELT_STRING_STRUCT (16) dstr_1022__constant_pattern; struct MELT_ROUTINE_STRUCT (2) drout_1023__TRANSLPAT_LISTPAT; struct MELT_CLOSURE_STRUCT (0) dclo_1024__TRANSLPAT_LISTPAT; struct MELT_OBJECT_STRUCT (3) dsym_1025__CLASS_SOURCE_PATTERN_LIST; struct MELT_STRING_STRUCT (25) dstr_1026__CLASS_SOURCE_PAT; struct MELT_ROUTINE_STRUCT (28) drout_1027__TRANSLPAT_TUPLEPAT; struct MELT_CLOSURE_STRUCT (0) dclo_1028__TRANSLPAT_TUPLEPAT; struct MELT_ROUTINE_STRUCT (5) drout_1029__LAMBDA_; struct meltint_st dint_1030__; struct meltint_st dint_1031__; struct meltint_st dint_1032__; struct MELT_OBJECT_STRUCT (3) dsym_1033__PATUPLECOMP; struct MELT_STRING_STRUCT (11) dstr_1034__PATUPLECOMP; struct MELT_STRING_STRUCT (5) dstr_1035__tuple; struct MELT_ROUTINE_STRUCT (24) drout_1036__TRANSLPAT_INSPAT; struct MELT_CLOSURE_STRUCT (0) dclo_1037__TRANSLPAT_INSPAT; struct MELT_ROUTINE_STRUCT (13) drout_1038__TRANSLPAT_VARPAT; struct MELT_CLOSURE_STRUCT (0) dclo_1039__TRANSLPAT_VARPAT; struct MELT_ROUTINE_STRUCT (15) drout_1040__TRANSLPAT_ANDPAT; struct MELT_CLOSURE_STRUCT (0) dclo_1041__TRANSLPAT_ANDPAT; struct MELT_STRING_STRUCT (3) dstr_1042__and; struct MELT_ROUTINE_STRUCT (26) drout_1043__TRANSLPAT_ORPAT; struct MELT_CLOSURE_STRUCT (0) dclo_1044__TRANSLPAT_ORPAT; struct MELT_STRING_STRUCT (2) dstr_1045__or; struct MELT_ROUTINE_STRUCT (3) drout_1046__LAMBDA_; struct MELT_ROUTINE_STRUCT (0) drout_1047__LAMBDA_; struct MELT_ROUTINE_STRUCT (29) drout_1048__TRANSLPAT_PATMAT; struct MELT_CLOSURE_STRUCT (0) dclo_1049__TRANSLPAT_PATMAT; struct MELT_OBJECT_STRUCT (3) dsym_1050__MATCHGRAPHIC_ALTSTEP; struct MELT_STRING_STRUCT (20) dstr_1051__MATCHGRAPHIC_ALT; struct MELT_OBJECT_STRUCT (4) dobj_1052__MATCHGRAPHIC_ALTSTEP; struct MELT_STRING_STRUCT (20) dstr_1053__MATCHGRAPHIC_ALT; struct MELT_ROUTINE_STRUCT (2) drout_1054__MGALTSTEP_ANY; struct MELT_CLOSURE_STRUCT (0) dclo_1055__MGALTSTEP_ANY; struct MELT_ROUTINE_STRUCT (6) drout_1056__MGALTSTEP_STEPTESTVAR; struct MELT_CLOSURE_STRUCT (0) dclo_1057__MGALTSTEP_STEPTESTVAR; struct MELT_ROUTINE_STRUCT (8) drout_1058__MGALTSTEP_STEPTESTINST; struct MELT_CLOSURE_STRUCT (0) dclo_1059__MGALTSTEP_STEPTESTINST; struct MELT_OBJECT_STRUCT (3) dsym_1060__ADD2OUT; struct MELT_STRING_STRUCT (7) dstr_1061__ADD2OUT; struct MELT_ROUTINE_STRUCT (6) drout_1062__MGALTSTEP_STEPTESTMULT; struct MELT_CLOSURE_STRUCT (0) dclo_1063__MGALTSTEP_STEPTESTMULT; struct MELT_ROUTINE_STRUCT (5) drout_1064__MGALTSTEP_STEPTESTGROUP; struct MELT_CLOSURE_STRUCT (0) dclo_1065__MGALTSTEP_STEPTESTGROUP; struct MELT_ROUTINE_STRUCT (8) drout_1066__MGALTSTEP_STEPTESTMATCHER; struct MELT_CLOSURE_STRUCT (0) dclo_1067__MGALTSTEP_STEPTESTMATCHER; struct MELT_ROUTINE_STRUCT (7) drout_1068__MGALTSTEP_STEPSUCCESS; struct MELT_CLOSURE_STRUCT (0) dclo_1069__MGALTSTEP_STEPSUCCESS; struct MELT_ROUTINE_STRUCT (4) drout_1070__MGALTSTEP_STEPCLEAR; struct MELT_CLOSURE_STRUCT (0) dclo_1071__MGALTSTEP_STEPCLEAR; struct MELT_ROUTINE_STRUCT (6) drout_1072__MGALTSTEP_STEPFLAGSET; struct MELT_CLOSURE_STRUCT (0) dclo_1073__MGALTSTEP_STEPFLAGSET; struct MELT_ROUTINE_STRUCT (7) drout_1074__MGALTSTEP_STEPFLAGOPER; struct MELT_CLOSURE_STRUCT (0) dclo_1075__MGALTSTEP_STEPFLAGOPER; struct MELT_ROUTINE_STRUCT (25) drout_1076__TRANSLATE_MATCHCASE; struct MELT_CLOSURE_STRUCT (0) dclo_1077__TRANSLATE_MATCHCASE; struct MELT_OBJECT_STRUCT (3) dsym_1078__DISCR_INTEGER; struct MELT_STRING_STRUCT (13) dstr_1079__DISCR_INTEGER; struct MELT_ROUTINE_STRUCT (2) drout_1080__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_1081__COMPARE_NAMED_ALPHA; struct MELT_STRING_STRUCT (19) dstr_1082__COMPARE_NAMED_AL; struct MELT_OBJECT_STRUCT (3) dsym_1083__CLASS_NREP_MATCHALT; struct MELT_STRING_STRUCT (19) dstr_1084__CLASS_NREP_MATCH; struct MELT_OBJECT_STRUCT (8) dobj_1085__CLASS_NREP_MATCHALT; struct MELT_STRING_STRUCT (19) dstr_1086__CLASS_NREP_MATCH; struct MELT_MULTIPLE_STRUCT (4) dtup_1087__CLASS_NREP_MATCHALT; struct MELT_MULTIPLE_STRUCT (8) dtup_1088__CLASS_NREP_MATCHALT; struct MELT_OBJECT_STRUCT (3) dsym_1089__NAMATCH_MATCHED; struct MELT_STRING_STRUCT (15) dstr_1090__NAMATCH_MATCHED; struct MELT_OBJECT_STRUCT (4) dobj_1091__NAMATCH_MATCHED; struct MELT_STRING_STRUCT (15) dstr_1092__NAMATCH_MATCHED; struct MELT_OBJECT_STRUCT (3) dsym_1093__NAMATCH_RESULT; struct MELT_STRING_STRUCT (14) dstr_1094__NAMATCH_RESULT; struct MELT_OBJECT_STRUCT (4) dobj_1095__NAMATCH_RESULT; struct MELT_STRING_STRUCT (14) dstr_1096__NAMATCH_RESULT; struct MELT_OBJECT_STRUCT (3) dsym_1097__NAMATCH_BODY; struct MELT_STRING_STRUCT (12) dstr_1098__NAMATCH_BODY; struct MELT_OBJECT_STRUCT (4) dobj_1099__NAMATCH_BODY; struct MELT_STRING_STRUCT (12) dstr_1100__NAMATCH_BODY; struct MELT_OBJECT_STRUCT (3) dsym_1101__NAMATCH_FLAGS; struct MELT_STRING_STRUCT (13) dstr_1102__NAMATCH_FLAGS; struct MELT_OBJECT_STRUCT (4) dobj_1103__NAMATCH_FLAGS; struct MELT_STRING_STRUCT (13) dstr_1104__NAMATCH_FLAGS; struct MELT_OBJECT_STRUCT (3) dsym_1105__NAMATCH_MDATAS; struct MELT_STRING_STRUCT (14) dstr_1106__NAMATCH_MDATAS; struct MELT_OBJECT_STRUCT (4) dobj_1107__NAMATCH_MDATAS; struct MELT_STRING_STRUCT (14) dstr_1108__NAMATCH_MDATAS; struct MELT_OBJECT_STRUCT (3) dsym_1109__NAMATCH_STARTLABEL; struct MELT_STRING_STRUCT (18) dstr_1110__NAMATCH_STARTLAB; struct MELT_OBJECT_STRUCT (4) dobj_1111__NAMATCH_STARTLABEL; struct MELT_STRING_STRUCT (18) dstr_1112__NAMATCH_STARTLAB; struct MELT_OBJECT_STRUCT (3) dsym_1113__CLASS_NREP_MATCH_LABEL; struct MELT_STRING_STRUCT (22) dstr_1114__CLASS_NREP_MATCH; struct MELT_OBJECT_STRUCT (8) dobj_1115__CLASS_NREP_MATCH_LABEL; struct MELT_STRING_STRUCT (22) dstr_1116__CLASS_NREP_MATCH; struct MELT_MULTIPLE_STRUCT (3) dtup_1117__CLASS_NREP_MATCH_LABEL; struct MELT_MULTIPLE_STRUCT (2) dtup_1118__CLASS_NREP_MATCH_LABEL; struct MELT_OBJECT_STRUCT (3) dsym_1119__NMLAB_STEP; struct MELT_STRING_STRUCT (10) dstr_1120__NMLAB_STEP; struct MELT_OBJECT_STRUCT (4) dobj_1121__NMLAB_STEP; struct MELT_STRING_STRUCT (10) dstr_1122__NMLAB_STEP; struct MELT_OBJECT_STRUCT (3) dsym_1123__CLASS_NREP_MATCH_LABEL_END; struct MELT_STRING_STRUCT (26) dstr_1124__CLASS_NREP_MATCH; struct MELT_OBJECT_STRUCT (8) dobj_1125__CLASS_NREP_MATCH_LABEL_END; struct MELT_STRING_STRUCT (26) dstr_1126__CLASS_NREP_MATCH; struct MELT_MULTIPLE_STRUCT (4) dtup_1127__CLASS_NREP_MATCH_LABEL_END; struct MELT_MULTIPLE_STRUCT (2) dtup_1128__CLASS_NREP_MATCH_LABEL_END; struct MELT_OBJECT_STRUCT (3) dsym_1129__CLASS_NREP_MATCH_JUMP; struct MELT_STRING_STRUCT (21) dstr_1130__CLASS_NREP_MATCH; struct MELT_OBJECT_STRUCT (8) dobj_1131__CLASS_NREP_MATCH_JUMP; struct MELT_STRING_STRUCT (21) dstr_1132__CLASS_NREP_MATCH; struct MELT_MULTIPLE_STRUCT (3) dtup_1133__CLASS_NREP_MATCH_JUMP; struct MELT_MULTIPLE_STRUCT (2) dtup_1134__CLASS_NREP_MATCH_JUMP; struct MELT_OBJECT_STRUCT (3) dsym_1135__NMJMP_LABEL; struct MELT_STRING_STRUCT (11) dstr_1136__NMJMP_LABEL; struct MELT_OBJECT_STRUCT (4) dobj_1137__NMJMP_LABEL; struct MELT_STRING_STRUCT (11) dstr_1138__NMJMP_LABEL; struct MELT_OBJECT_STRUCT (3) dsym_1139__CLASS_NREP_MATCH_DATA_ACTION; struct MELT_STRING_STRUCT (28) dstr_1140__CLASS_NREP_MATCH; struct MELT_OBJECT_STRUCT (8) dobj_1141__CLASS_NREP_MATCH_DATA_ACTION; struct MELT_STRING_STRUCT (28) dstr_1142__CLASS_NREP_MATCH; struct MELT_MULTIPLE_STRUCT (3) dtup_1143__CLASS_NREP_MATCH_DATA_ACTION; struct MELT_MULTIPLE_STRUCT (2) dtup_1144__CLASS_NREP_MATCH_DATA_ACTION; struct MELT_OBJECT_STRUCT (3) dsym_1145__NMDAC_DATA; struct MELT_STRING_STRUCT (10) dstr_1146__NMDAC_DATA; struct MELT_OBJECT_STRUCT (4) dobj_1147__NMDAC_DATA; struct MELT_STRING_STRUCT (10) dstr_1148__NMDAC_DATA; struct MELT_OBJECT_STRUCT (3) dsym_1149__CLASS_NREP_MATCH_DATA_INITIALIZER; struct MELT_STRING_STRUCT (33) dstr_1150__CLASS_NREP_MATCH; struct MELT_OBJECT_STRUCT (8) dobj_1151__CLASS_NREP_MATCH_DATA_INITIALIZER; struct MELT_STRING_STRUCT (33) dstr_1152__CLASS_NREP_MATCH; struct MELT_MULTIPLE_STRUCT (4) dtup_1153__CLASS_NREP_MATCH_DATA_INITIALIZER; struct MELT_MULTIPLE_STRUCT (2) dtup_1154__CLASS_NREP_MATCH_DATA_INITIALIZER; struct MELT_OBJECT_STRUCT (3) dsym_1155__CLASS_NREP_MATCH_DATA_CLEAR; struct MELT_STRING_STRUCT (27) dstr_1156__CLASS_NREP_MATCH; struct MELT_OBJECT_STRUCT (8) dobj_1157__CLASS_NREP_MATCH_DATA_CLEAR; struct MELT_STRING_STRUCT (27) dstr_1158__CLASS_NREP_MATCH; struct MELT_MULTIPLE_STRUCT (4) dtup_1159__CLASS_NREP_MATCH_DATA_CLEAR; struct MELT_MULTIPLE_STRUCT (2) dtup_1160__CLASS_NREP_MATCH_DATA_CLEAR; struct MELT_OBJECT_STRUCT (3) dsym_1161__CLASS_NREP_MATCH_DATA_FINALIZER; struct MELT_STRING_STRUCT (31) dstr_1162__CLASS_NREP_MATCH; struct MELT_OBJECT_STRUCT (8) dobj_1163__CLASS_NREP_MATCH_DATA_FINALIZER; struct MELT_STRING_STRUCT (31) dstr_1164__CLASS_NREP_MATCH; struct MELT_MULTIPLE_STRUCT (4) dtup_1165__CLASS_NREP_MATCH_DATA_FINALIZER; struct MELT_MULTIPLE_STRUCT (2) dtup_1166__CLASS_NREP_MATCH_DATA_FINALIZER; struct MELT_OBJECT_STRUCT (3) dsym_1167__CLASS_NREP_JUMP_WHEN_IS_A; struct MELT_STRING_STRUCT (25) dstr_1168__CLASS_NREP_JUMP_; struct MELT_OBJECT_STRUCT (8) dobj_1169__CLASS_NREP_JUMP_WHEN_IS_A; struct MELT_STRING_STRUCT (25) dstr_1170__CLASS_NREP_JUMP_; struct MELT_MULTIPLE_STRUCT (3) dtup_1171__CLASS_NREP_JUMP_WHEN_IS_A; struct MELT_MULTIPLE_STRUCT (4) dtup_1172__CLASS_NREP_JUMP_WHEN_IS_A; struct MELT_OBJECT_STRUCT (3) dsym_1173__NTESTISA_VALUE; struct MELT_STRING_STRUCT (14) dstr_1174__NTESTISA_VALUE; struct MELT_OBJECT_STRUCT (4) dobj_1175__NTESTISA_VALUE; struct MELT_STRING_STRUCT (14) dstr_1176__NTESTISA_VALUE; struct MELT_OBJECT_STRUCT (3) dsym_1177__NTESTISA_CLASS; struct MELT_STRING_STRUCT (14) dstr_1178__NTESTISA_CLASS; struct MELT_OBJECT_STRUCT (4) dobj_1179__NTESTISA_CLASS; struct MELT_STRING_STRUCT (14) dstr_1180__NTESTISA_CLASS; struct MELT_OBJECT_STRUCT (3) dsym_1181__NTESTISA_JUMP; struct MELT_STRING_STRUCT (13) dstr_1182__NTESTISA_JUMP; struct MELT_OBJECT_STRUCT (4) dobj_1183__NTESTISA_JUMP; struct MELT_STRING_STRUCT (13) dstr_1184__NTESTISA_JUMP; struct MELT_OBJECT_STRUCT (3) dsym_1185__CLASS_MATCH_NORMALIZATION_CONTEXT; struct MELT_STRING_STRUCT (33) dstr_1186__CLASS_MATCH_NORM; struct MELT_OBJECT_STRUCT (8) dobj_1187__CLASS_MATCH_NORMALIZATION_CONTEXT; struct MELT_STRING_STRUCT (33) dstr_1188__CLASS_MATCH_NORM; struct MELT_MULTIPLE_STRUCT (1) dtup_1189__CLASS_MATCH_NORMALIZATION_CONTEXT; struct MELT_MULTIPLE_STRUCT (11) dtup_1190__CLASS_MATCH_NORMALIZATION_CONTEXT; struct MELT_OBJECT_STRUCT (3) dsym_1191__MATNORX_RESLOC; struct MELT_STRING_STRUCT (14) dstr_1192__MATNORX_RESLOC; struct MELT_OBJECT_STRUCT (4) dobj_1193__MATNORX_RESLOC; struct MELT_STRING_STRUCT (14) dstr_1194__MATNORX_RESLOC; struct MELT_OBJECT_STRUCT (3) dsym_1195__MATNORX_NMATCH; struct MELT_STRING_STRUCT (14) dstr_1196__MATNORX_NMATCH; struct MELT_OBJECT_STRUCT (4) dobj_1197__MATNORX_NMATCH; struct MELT_STRING_STRUCT (14) dstr_1198__MATNORX_NMATCH; struct MELT_OBJECT_STRUCT (3) dsym_1199__MATNORX_DATAMAP; struct MELT_STRING_STRUCT (15) dstr_1200__MATNORX_DATAMAP; struct MELT_OBJECT_STRUCT (4) dobj_1201__MATNORX_DATAMAP; struct MELT_STRING_STRUCT (15) dstr_1202__MATNORX_DATAMAP; struct MELT_OBJECT_STRUCT (3) dsym_1203__MATNORX_FLAGMAP; struct MELT_STRING_STRUCT (15) dstr_1204__MATNORX_FLAGMAP; struct MELT_OBJECT_STRUCT (4) dobj_1205__MATNORX_FLAGMAP; struct MELT_STRING_STRUCT (15) dstr_1206__MATNORX_FLAGMAP; struct MELT_OBJECT_STRUCT (3) dsym_1207__MATNORX_STEPMAP; struct MELT_STRING_STRUCT (15) dstr_1208__MATNORX_STEPMAP; struct MELT_OBJECT_STRUCT (4) dobj_1209__MATNORX_STEPMAP; struct MELT_STRING_STRUCT (15) dstr_1210__MATNORX_STEPMAP; struct MELT_OBJECT_STRUCT (3) dsym_1211__MATNORX_MDATAQUEUE; struct MELT_STRING_STRUCT (18) dstr_1212__MATNORX_MDATAQUE; struct MELT_OBJECT_STRUCT (4) dobj_1213__MATNORX_MDATAQUEUE; struct MELT_STRING_STRUCT (18) dstr_1214__MATNORX_MDATAQUE; struct MELT_OBJECT_STRUCT (3) dsym_1215__MATNORX_MSTEPQUEUE; struct MELT_STRING_STRUCT (18) dstr_1216__MATNORX_MSTEPQUE; struct MELT_OBJECT_STRUCT (4) dobj_1217__MATNORX_MSTEPQUEUE; struct MELT_STRING_STRUCT (18) dstr_1218__MATNORX_MSTEPQUE; struct MELT_OBJECT_STRUCT (3) dsym_1219__MATNORX_BODYLIST; struct MELT_STRING_STRUCT (16) dstr_1220__MATNORX_BODYLIST; struct MELT_OBJECT_STRUCT (4) dobj_1221__MATNORX_BODYLIST; struct MELT_STRING_STRUCT (16) dstr_1222__MATNORX_BODYLIST; struct MELT_OBJECT_STRUCT (3) dsym_1223__MATNORX_ENDLABEL; struct MELT_STRING_STRUCT (16) dstr_1224__MATNORX_ENDLABEL; struct MELT_OBJECT_STRUCT (4) dobj_1225__MATNORX_ENDLABEL; struct MELT_STRING_STRUCT (16) dstr_1226__MATNORX_ENDLABEL; struct MELT_OBJECT_STRUCT (3) dsym_1227__MATNORX_STARTLABEL; struct MELT_STRING_STRUCT (18) dstr_1228__MATNORX_STARTLAB; struct MELT_OBJECT_STRUCT (4) dobj_1229__MATNORX_STARTLABEL; struct MELT_STRING_STRUCT (18) dstr_1230__MATNORX_STARTLAB; struct MELT_OBJECT_STRUCT (3) dsym_1231__MATNORX_MATCHCTXT; struct MELT_STRING_STRUCT (17) dstr_1232__MATNORX_MATCHCTX; struct MELT_OBJECT_STRUCT (4) dobj_1233__MATNORX_MATCHCTXT; struct MELT_STRING_STRUCT (17) dstr_1234__MATNORX_MATCHCTX; struct MELT_ROUTINE_STRUCT (4) drout_1235__MATCHALT_NORMALIZE_FLAG; struct MELT_CLOSURE_STRUCT (0) dclo_1236__MATCHALT_NORMALIZE_FLAG; struct MELT_OBJECT_STRUCT (3) dsym_1237__NORMALIZE_STEP; struct MELT_STRING_STRUCT (14) dstr_1238__NORMALIZE_STEP; struct MELT_OBJECT_STRUCT (2) dobj_1239; struct MELT_OBJECT_STRUCT (3) dsym_1240__NMCTXT; struct MELT_STRING_STRUCT (6) dstr_1241__NMCTXT; struct MELT_OBJECT_STRUCT (2) dobj_1242; struct MELT_OBJECT_STRUCT (2) dobj_1243; struct MELT_MULTIPLE_STRUCT (3) dtup_1244__NORMALIZE_STEP; struct MELT_OBJECT_STRUCT (4) dobj_1245__NORMALIZE_STEP; struct MELT_STRING_STRUCT (14) dstr_1246__NORMALIZE_STEP; struct MELT_ROUTINE_STRUCT (5) drout_1247__MATCH_DATA_UPDATE_DATA_STEPS_INDEX; struct MELT_CLOSURE_STRUCT (0) dclo_1248__MATCH_DATA_UPDATE_DATA_STEPS_INDEX; struct MELT_ROUTINE_STRUCT (4) drout_1249__MATCH_STEP_INDEX; struct MELT_CLOSURE_STRUCT (0) dclo_1250__MATCH_STEP_INDEX; struct MELT_ROUTINE_STRUCT (13) drout_1251__COMPLETE_NORMSTEP_IF_LAST; struct MELT_CLOSURE_STRUCT (0) dclo_1252__COMPLETE_NORMSTEP_IF_LAST; struct MELT_ROUTINE_STRUCT (3) drout_1253__NORMSTEP_ANYRECV; struct MELT_CLOSURE_STRUCT (0) dclo_1254__NORMSTEP_ANYRECV; struct MELT_ROUTINE_STRUCT (9) drout_1255__NORMSTEP_MFLAGSET; struct MELT_CLOSURE_STRUCT (0) dclo_1256__NORMSTEP_MFLAGSET; struct MELT_OBJECT_STRUCT (3) dsym_1257__CLASS_NREP_SETQ; struct MELT_STRING_STRUCT (15) dstr_1258__CLASS_NREP_SETQ; struct meltint_st dint_1259__; struct MELT_ROUTINE_STRUCT (15) drout_1260__NORMSTEP_MFLAGCONJ; struct MELT_CLOSURE_STRUCT (0) dclo_1261__NORMSTEP_MFLAGCONJ; struct meltint_st dint_1262__; struct MELT_OBJECT_STRUCT (3) dsym_1263__CLASS_NREP_CHUNK; struct MELT_STRING_STRUCT (16) dstr_1264__CLASS_NREP_CHUNK; struct MELT_OBJECT_STRUCT (3) dsym_1265__AND_MATCH_FLAGS; struct MELT_STRING_STRUCT (15) dstr_1266__AND_MATCH_FLAGS; struct MELT_OBJECT_STRUCT (3) dsym_1267__CTYPE_LONG; struct MELT_STRING_STRUCT (10) dstr_1268__CTYPE_LONG; struct MELT_OBJECT_STRUCT (3) dsym_1269__DISCR_VERBATIM_STRING; struct MELT_STRING_STRUCT (21) dstr_1270__DISCR_VERBATIM_S; struct MELT_ROUTINE_STRUCT (21) drout_1271__NORMSTEP_MTESTINSTANCE; struct MELT_CLOSURE_STRUCT (0) dclo_1272__NORMSTEP_MTESTINSTANCE; struct MELT_OBJECT_STRUCT (3) dsym_1273__CLASS_NREP_IFISA; struct MELT_STRING_STRUCT (16) dstr_1274__CLASS_NREP_IFISA; struct MELT_OBJECT_STRUCT (3) dsym_1275__CLASS_NREP_PROGN; struct MELT_STRING_STRUCT (16) dstr_1276__CLASS_NREP_PROGN; struct MELT_ROUTINE_STRUCT (20) drout_1277__NORMSTEP_MTESTMULTIPLE; struct MELT_CLOSURE_STRUCT (0) dclo_1278__NORMSTEP_MTESTMULTIPLE; struct MELT_OBJECT_STRUCT (3) dsym_1279__CLASS_NREP_IFTUPLESIZED; struct MELT_STRING_STRUCT (23) dstr_1280__CLASS_NREP_IFTUP; struct MELT_OBJECT_STRUCT (3) dsym_1281__CLASS_NREP_IFCOMMON; struct MELT_STRING_STRUCT (19) dstr_1282__CLASS_NREP_IFCOM; struct MELT_ROUTINE_STRUCT (9) drout_1283__NORMSTEP_MTESTVAR; struct MELT_CLOSURE_STRUCT (0) dclo_1284__NORMSTEP_MTESTVAR; struct MELT_OBJECT_STRUCT (3) dsym_1285__CLASS_NREP_IFSAME; struct MELT_STRING_STRUCT (17) dstr_1286__CLASS_NREP_IFSAM; struct MELT_ROUTINE_STRUCT (15) drout_1287__NORMSTEP_MGROUP; struct MELT_CLOSURE_STRUCT (0) dclo_1288__NORMSTEP_MGROUP; struct MELT_OBJECT_STRUCT (3) dsym_1289__LIST_MAP; struct MELT_STRING_STRUCT (8) dstr_1290__LIST_MAP; struct MELT_ROUTINE_STRUCT (1) drout_1291__LAMBDA_; struct MELT_ROUTINE_STRUCT (1) drout_1292__LAMBDA_; struct MELT_ROUTINE_STRUCT (1) drout_1293__LAMBDA_; struct MELT_ROUTINE_STRUCT (1) drout_1294__LAMBDA_; struct MELT_ROUTINE_STRUCT (20) drout_1295__NORMSTEP_MSUCCWHENFLAG; struct MELT_CLOSURE_STRUCT (0) dclo_1296__NORMSTEP_MSUCCWHENFLAG; struct MELT_OBJECT_STRUCT (3) dsym_1297__CLASS_NREP_IF; struct MELT_STRING_STRUCT (13) dstr_1298__CLASS_NREP_IF; struct MELT_OBJECT_STRUCT (3) dsym_1299__NORMALIZE_TEST_MATCHER; struct MELT_STRING_STRUCT (22) dstr_1300__NORMALIZE_TEST_M; struct MELT_OBJECT_STRUCT (2) dobj_1301; struct MELT_OBJECT_STRUCT (2) dobj_1302; struct MELT_OBJECT_STRUCT (3) dsym_1303__NDATA; struct MELT_STRING_STRUCT (5) dstr_1304__NDATA; struct MELT_OBJECT_STRUCT (2) dobj_1305; struct MELT_OBJECT_STRUCT (3) dsym_1306__BINDLIST; struct MELT_STRING_STRUCT (8) dstr_1307__BINDLIST; struct MELT_OBJECT_STRUCT (2) dobj_1308; struct MELT_OBJECT_STRUCT (2) dobj_1309; struct MELT_OBJECT_STRUCT (3) dsym_1310__NJELSE; struct MELT_STRING_STRUCT (6) dstr_1311__NJELSE; struct MELT_OBJECT_STRUCT (2) dobj_1312; struct MELT_MULTIPLE_STRUCT (6) dtup_1313__NORMALIZE_TEST_MATCHER; struct MELT_OBJECT_STRUCT (4) dobj_1314__NORMALIZE_TEST_MATCHER; struct MELT_STRING_STRUCT (22) dstr_1315__NORMALIZE_TEST_M; struct MELT_OBJECT_STRUCT (3) dsym_1316__NORMALIZE_FILL_MATCHER; struct MELT_STRING_STRUCT (22) dstr_1317__NORMALIZE_FILL_M; struct MELT_OBJECT_STRUCT (2) dobj_1318; struct MELT_OBJECT_STRUCT (2) dobj_1319; struct MELT_OBJECT_STRUCT (2) dobj_1320; struct MELT_OBJECT_STRUCT (2) dobj_1321; struct MELT_OBJECT_STRUCT (3) dsym_1322__NOUTS; struct MELT_STRING_STRUCT (5) dstr_1323__NOUTS; struct MELT_OBJECT_STRUCT (2) dobj_1324; struct MELT_OBJECT_STRUCT (2) dobj_1325; struct MELT_OBJECT_STRUCT (3) dsym_1326__TESTDATA; struct MELT_STRING_STRUCT (8) dstr_1327__TESTDATA; struct MELT_OBJECT_STRUCT (2) dobj_1328; struct MELT_MULTIPLE_STRUCT (7) dtup_1329__NORMALIZE_FILL_MATCHER; struct MELT_OBJECT_STRUCT (4) dobj_1330__NORMALIZE_FILL_MATCHER; struct MELT_STRING_STRUCT (22) dstr_1331__NORMALIZE_FILL_M; struct MELT_ROUTINE_STRUCT (2) drout_1332__NORMTESTMATCH_CATCHALL; struct MELT_CLOSURE_STRUCT (0) dclo_1333__NORMTESTMATCH_CATCHALL; struct MELT_ROUTINE_STRUCT (2) drout_1334__NORMFILLMATCH_CATCHALL; struct MELT_CLOSURE_STRUCT (0) dclo_1335__NORMFILLMATCH_CATCHALL; struct MELT_ROUTINE_STRUCT (19) drout_1336__NORMTESTMATCH_CMATCHER; struct MELT_CLOSURE_STRUCT (0) dclo_1337__NORMTESTMATCH_CMATCHER; struct MELT_OBJECT_STRUCT (3) dsym_1338__CLASS_CMATCHER; struct MELT_STRING_STRUCT (14) dstr_1339__CLASS_CMATCHER; struct MELT_ROUTINE_STRUCT (8) drout_1340__NORMFILLMATCH_CMATCHER; struct MELT_CLOSURE_STRUCT (0) dclo_1341__NORMFILLMATCH_CMATCHER; struct MELT_ROUTINE_STRUCT (23) drout_1342__NORMSTEP_MTESTMATCHER; struct MELT_CLOSURE_STRUCT (0) dclo_1343__NORMSTEP_MTESTMATCHER; struct MELT_ROUTINE_STRUCT (5) drout_1344__MATCHALT_NORMALIZE_STEP; struct MELT_CLOSURE_STRUCT (0) dclo_1345__MATCHALT_NORMALIZE_STEP; struct MELT_ROUTINE_STRUCT (8) drout_1346__MATCHALT_NORMALIZE_MDATA; struct MELT_CLOSURE_STRUCT (0) dclo_1347__MATCHALT_NORMALIZE_MDATA; struct MELT_ROUTINE_STRUCT (6) drout_1348__MATCHALT_HANDLE_NORMALIZED_MDATA; struct MELT_CLOSURE_STRUCT (0) dclo_1349__MATCHALT_HANDLE_NORMALIZED_MDATA; struct MELT_ROUTINE_STRUCT (10) drout_1350__MATCHALT_MAKE_MATCH_NORMALIZATION_CONTEXT; struct MELT_CLOSURE_STRUCT (0) dclo_1351__MATCHALT_MAKE_MATCH_NORMALIZATION_CONTEXT; struct MELT_OBJECT_STRUCT (3) dsym_1352__MATCHRES; struct MELT_STRING_STRUCT (9) dstr_1353__MATCHRES; struct MELT_ROUTINE_STRUCT (10) drout_1354__MATCHALT_NORMALIZE_MATCH_CONTEXT; struct MELT_CLOSURE_STRUCT (0) dclo_1355__MATCHALT_NORMALIZE_MATCH_CONTEXT; struct MELT_ROUTINE_STRUCT (2) drout_1356__LAMBDA_; struct MELT_ROUTINE_STRUCT (42) drout_1357__NORMEXP_MATCHALT; struct MELT_CLOSURE_STRUCT (0) dclo_1358__NORMEXP_MATCHALT; struct MELT_OBJECT_STRUCT (3) dsym_1359__MATCHALT_INTER_; struct MELT_STRING_STRUCT (15) dstr_1360__MATCHALT_INTER_; struct MELT_OBJECT_STRUCT (3) dsym_1361__MATCHED_DATA; struct MELT_STRING_STRUCT (13) dstr_1362__MATCHED_DATA; struct MELT_ROUTINE_STRUCT (3) drout_1363__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_1364__TRUE; struct MELT_STRING_STRUCT (4) dstr_1365__TRUE; struct MELT_OBJECT_STRUCT (3) dsym_1366__MATCHALTRES_; struct MELT_STRING_STRUCT (12) dstr_1367__MATCHALTRES_; struct MELT_OBJECT_STRUCT (3) dsym_1368__CLASS_SOURCE_MATCHALT; struct MELT_STRING_STRUCT (21) dstr_1369__CLASS_SOURCE_MAT; struct MELT_ROUTINE_STRUCT (6) drout_1370__ALTERNATE_MATCH_OPTSET; struct MELT_CLOSURE_STRUCT (0) dclo_1371__ALTERNATE_MATCH_OPTSET; struct MELT_OBJECT_STRUCT (3) dsym_1372__ALTERNATE_MATCH; struct MELT_STRING_STRUCT (15) dstr_1373__ALTERNATE_MATCH; struct MELT_STRING_STRUCT (50) dstr_1374__exchange_alterna; struct MELT_ROUTINE_STRUCT (41) drout_1375__MG_ALTDRAW_GRAPHVIZ; struct MELT_CLOSURE_STRUCT (0) dclo_1376__MG_ALTDRAW_GRAPHVIZ; struct MELT_ROUTINE_STRUCT (7) drout_1377__LAMBDA_; struct MELT_ROUTINE_STRUCT (11) drout_1378__LAMBDA_; struct MELT_ROUTINE_STRUCT (3) drout_1379__LAMBDA_; struct MELT_ROUTINE_STRUCT (3) drout_1380__LAMBDA_; struct meltint_st dint_1381__; struct meltint_st dint_1382__; struct meltint_st dint_1383__; struct MELT_ROUTINE_STRUCT (3) drout_1384__LAMBDA_; struct meltint_st dint_1385__; struct meltint_st dint_1386__; struct meltint_st dint_1387__; struct MELT_OBJECT_STRUCT (3) dsym_1388__CLASS_NREP_ALTMATCH; struct MELT_STRING_STRUCT (19) dstr_1389__CLASS_NREP_ALTMA; long spare_; } *cdat = NULL; dbgprintf ("start initialize_module_meltdata_warmelt_normatch iniframp__=%p", (void *) iniframp__); (void) meltpredefinited; /* avoid warning if non-used. */ melt_assertmsg ("check module initial frame", iniframp__->mcfr_nbvar == /*minihash */ -815); cdat = (struct cdata_st *) meltgc_allocate (sizeof (*cdat), 0); melt_prohibit_garbcoll = TRUE; /*initial routine predef */ /*initial routine fill */ /*iniobj dsym_1__CLASS_PATTERN_CONTEXT*/ /*uniqueobj*/ if (! /*_.VALDATA___V93*/ meltfptr[92]) /*_.VALDATA___V93*/ meltfptr[92] = (melt_ptr_t) & 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 ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1__CLASS_PATTERN_CONTEXT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1__CLASS_PATTERN_CONTEXT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1__CLASS_PATTERN_CONTEXT.obj_hash = 335003296; cdat->dsym_1__CLASS_PATTERN_CONTEXT.obj_len = 3; /*inistring dstr_2__CLASS_PATTERN_CO*/ /*_.VALSTR___V94*/ meltfptr[93] = (melt_ptr_t) & cdat->dstr_2__CLASS_PATTERN_CO; cdat->dstr_2__CLASS_PATTERN_CO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_2__CLASS_PATTERN_CO.val, "CLASS_PATTERN_CONTEXT", sizeof (cdat->dstr_2__CLASS_PATTERN_CO.val) - 1); cdat->dstr_2__CLASS_PATTERN_CO.val[21] = (char) 0; cdat->dstr_2__CLASS_PATTERN_CO.slen = 21; /*iniobj dsym_3__CLASS_ROOT*/ /*uniqueobj*/ if (! /*_.VALDATA___V95*/ meltfptr[94]) /*_.VALDATA___V95*/ meltfptr[94] = (melt_ptr_t) & cdat->dsym_3__CLASS_ROOT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_3__CLASS_ROOT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_3__CLASS_ROOT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_3__CLASS_ROOT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_3__CLASS_ROOT.obj_hash = 60568825; cdat->dsym_3__CLASS_ROOT.obj_len = 3; /*inistring dstr_4__CLASS_ROOT*/ /*_.VALSTR___V96*/ meltfptr[95] = (melt_ptr_t) & cdat->dstr_4__CLASS_ROOT; cdat->dstr_4__CLASS_ROOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_4__CLASS_ROOT.val, "CLASS_ROOT", sizeof (cdat->dstr_4__CLASS_ROOT.val) - 1); cdat->dstr_4__CLASS_ROOT.val[10] = (char) 0; cdat->dstr_4__CLASS_ROOT.slen = 10; MELT_LOCATION ("warmelt-normatch.melt:34:/ iniobj"); /*iniobj dobj_5__CLASS_PATTERN_CONTEXT*/ /*_.VALDATA___V97*/ meltfptr[96] = (melt_ptr_t) & cdat->dobj_5__CLASS_PATTERN_CONTEXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_5__CLASS_PATTERN_CONTEXT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_5__CLASS_PATTERN_CONTEXT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_5__CLASS_PATTERN_CONTEXT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_5__CLASS_PATTERN_CONTEXT.obj_num = MELTOBMAG_OBJECT; cdat->dobj_5__CLASS_PATTERN_CONTEXT.obj_hash = 144692162; cdat->dobj_5__CLASS_PATTERN_CONTEXT.obj_len = 8; /*inistring dstr_6__CLASS_PATTERN_CO*/ /*_.VALSTR___V98*/ meltfptr[97] = (melt_ptr_t) & cdat->dstr_6__CLASS_PATTERN_CO; cdat->dstr_6__CLASS_PATTERN_CO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_6__CLASS_PATTERN_CO.val, "CLASS_PATTERN_CONTEXT", sizeof (cdat->dstr_6__CLASS_PATTERN_CO.val) - 1); cdat->dstr_6__CLASS_PATTERN_CO.val[21] = (char) 0; cdat->dstr_6__CLASS_PATTERN_CO.slen = 21; /*inimult dtup_7__CLASS_PATTERN_CONTEXT */ /*_.VALTUP___V99*/ meltfptr[98] = (melt_ptr_t) & cdat->dtup_7__CLASS_PATTERN_CONTEXT; cdat->dtup_7__CLASS_PATTERN_CONTEXT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_7__CLASS_PATTERN_CONTEXT.nbval = 1; /*inimult dtup_8__CLASS_PATTERN_CONTEXT */ /*_.VALTUP___V122*/ meltfptr[121] = (melt_ptr_t) & cdat->dtup_8__CLASS_PATTERN_CONTEXT; cdat->dtup_8__CLASS_PATTERN_CONTEXT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_8__CLASS_PATTERN_CONTEXT.nbval = 11; /*iniobj dsym_9__PCTN_NORMCTXT*/ /*uniqueobj*/ if (! /*_.VALDATA___V123*/ meltfptr[122]) /*_.VALDATA___V123*/ meltfptr[122] = (melt_ptr_t) & cdat->dsym_9__PCTN_NORMCTXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_9__PCTN_NORMCTXT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_9__PCTN_NORMCTXT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_9__PCTN_NORMCTXT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_9__PCTN_NORMCTXT.obj_hash = 955957534; cdat->dsym_9__PCTN_NORMCTXT.obj_len = 3; /*inistring dstr_10__PCTN_NORMCTXT*/ /*_.VALSTR___V124*/ meltfptr[123] = (melt_ptr_t) & cdat->dstr_10__PCTN_NORMCTXT; cdat->dstr_10__PCTN_NORMCTXT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_10__PCTN_NORMCTXT.val, "PCTN_NORMCTXT", sizeof (cdat->dstr_10__PCTN_NORMCTXT.val) - 1); cdat->dstr_10__PCTN_NORMCTXT.val[13] = (char) 0; cdat->dstr_10__PCTN_NORMCTXT.slen = 13; /*^iniobj */ /*iniobj dobj_11__PCTN_NORMCTXT*/ /*_.VALDATA___V100*/ meltfptr[99] = (melt_ptr_t) & cdat->dobj_11__PCTN_NORMCTXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_11__PCTN_NORMCTXT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_11__PCTN_NORMCTXT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_11__PCTN_NORMCTXT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_11__PCTN_NORMCTXT.obj_num = 0; cdat->dobj_11__PCTN_NORMCTXT.obj_hash = 157010753; cdat->dobj_11__PCTN_NORMCTXT.obj_len = 4; /*inistring dstr_12__PCTN_NORMCTXT*/ /*_.VALSTR___V101*/ meltfptr[100] = (melt_ptr_t) & cdat->dstr_12__PCTN_NORMCTXT; cdat->dstr_12__PCTN_NORMCTXT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_12__PCTN_NORMCTXT.val, "PCTN_NORMCTXT", sizeof (cdat->dstr_12__PCTN_NORMCTXT.val) - 1); cdat->dstr_12__PCTN_NORMCTXT.val[13] = (char) 0; cdat->dstr_12__PCTN_NORMCTXT.slen = 13; /*iniobj dsym_13__PCTN_SRC*/ /*uniqueobj*/ if (! /*_.VALDATA___V125*/ meltfptr[124]) /*_.VALDATA___V125*/ meltfptr[124] = (melt_ptr_t) & cdat->dsym_13__PCTN_SRC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_13__PCTN_SRC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_13__PCTN_SRC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_13__PCTN_SRC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_13__PCTN_SRC.obj_hash = 902509187; cdat->dsym_13__PCTN_SRC.obj_len = 3; /*inistring dstr_14__PCTN_SRC*/ /*_.VALSTR___V126*/ meltfptr[125] = (melt_ptr_t) & cdat->dstr_14__PCTN_SRC; cdat->dstr_14__PCTN_SRC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_14__PCTN_SRC.val, "PCTN_SRC", sizeof (cdat->dstr_14__PCTN_SRC.val) - 1); cdat->dstr_14__PCTN_SRC.val[8] = (char) 0; cdat->dstr_14__PCTN_SRC.slen = 8; /*^iniobj */ /*iniobj dobj_15__PCTN_SRC*/ /*_.VALDATA___V102*/ meltfptr[101] = (melt_ptr_t) & cdat->dobj_15__PCTN_SRC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_15__PCTN_SRC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_15__PCTN_SRC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_15__PCTN_SRC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_15__PCTN_SRC.obj_num = 1; cdat->dobj_15__PCTN_SRC.obj_hash = 89946328; cdat->dobj_15__PCTN_SRC.obj_len = 4; /*inistring dstr_16__PCTN_SRC*/ /*_.VALSTR___V103*/ meltfptr[102] = (melt_ptr_t) & cdat->dstr_16__PCTN_SRC; cdat->dstr_16__PCTN_SRC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_16__PCTN_SRC.val, "PCTN_SRC", sizeof (cdat->dstr_16__PCTN_SRC.val) - 1); cdat->dstr_16__PCTN_SRC.val[8] = (char) 0; cdat->dstr_16__PCTN_SRC.slen = 8; /*iniobj dsym_17__PCTN_ENV*/ /*uniqueobj*/ if (! /*_.VALDATA___V127*/ meltfptr[126]) /*_.VALDATA___V127*/ meltfptr[126] = (melt_ptr_t) & cdat->dsym_17__PCTN_ENV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_17__PCTN_ENV", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_17__PCTN_ENV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_17__PCTN_ENV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_17__PCTN_ENV.obj_hash = 327113752; cdat->dsym_17__PCTN_ENV.obj_len = 3; /*inistring dstr_18__PCTN_ENV*/ /*_.VALSTR___V128*/ meltfptr[127] = (melt_ptr_t) & cdat->dstr_18__PCTN_ENV; cdat->dstr_18__PCTN_ENV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_18__PCTN_ENV.val, "PCTN_ENV", sizeof (cdat->dstr_18__PCTN_ENV.val) - 1); cdat->dstr_18__PCTN_ENV.val[8] = (char) 0; cdat->dstr_18__PCTN_ENV.slen = 8; /*^iniobj */ /*iniobj dobj_19__PCTN_ENV*/ /*_.VALDATA___V104*/ meltfptr[103] = (melt_ptr_t) & cdat->dobj_19__PCTN_ENV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_19__PCTN_ENV", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_19__PCTN_ENV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_19__PCTN_ENV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_19__PCTN_ENV.obj_num = 2; cdat->dobj_19__PCTN_ENV.obj_hash = 411526040; cdat->dobj_19__PCTN_ENV.obj_len = 4; /*inistring dstr_20__PCTN_ENV*/ /*_.VALSTR___V105*/ meltfptr[104] = (melt_ptr_t) & cdat->dstr_20__PCTN_ENV; cdat->dstr_20__PCTN_ENV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_20__PCTN_ENV.val, "PCTN_ENV", sizeof (cdat->dstr_20__PCTN_ENV.val) - 1); cdat->dstr_20__PCTN_ENV.val[8] = (char) 0; cdat->dstr_20__PCTN_ENV.slen = 8; /*iniobj dsym_21__PCTN_MAPATVAR*/ /*uniqueobj*/ if (! /*_.VALDATA___V129*/ meltfptr[128]) /*_.VALDATA___V129*/ meltfptr[128] = (melt_ptr_t) & cdat->dsym_21__PCTN_MAPATVAR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_21__PCTN_MAPATVAR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_21__PCTN_MAPATVAR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_21__PCTN_MAPATVAR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_21__PCTN_MAPATVAR.obj_hash = 620129723; cdat->dsym_21__PCTN_MAPATVAR.obj_len = 3; /*inistring dstr_22__PCTN_MAPATVAR*/ /*_.VALSTR___V130*/ meltfptr[129] = (melt_ptr_t) & cdat->dstr_22__PCTN_MAPATVAR; cdat->dstr_22__PCTN_MAPATVAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_22__PCTN_MAPATVAR.val, "PCTN_MAPATVAR", sizeof (cdat->dstr_22__PCTN_MAPATVAR.val) - 1); cdat->dstr_22__PCTN_MAPATVAR.val[13] = (char) 0; cdat->dstr_22__PCTN_MAPATVAR.slen = 13; /*^iniobj */ /*iniobj dobj_23__PCTN_MAPATVAR*/ /*_.VALDATA___V106*/ meltfptr[105] = (melt_ptr_t) & cdat->dobj_23__PCTN_MAPATVAR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_23__PCTN_MAPATVAR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_23__PCTN_MAPATVAR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_23__PCTN_MAPATVAR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_23__PCTN_MAPATVAR.obj_num = 3; cdat->dobj_23__PCTN_MAPATVAR.obj_hash = 401488759; cdat->dobj_23__PCTN_MAPATVAR.obj_len = 4; /*inistring dstr_24__PCTN_MAPATVAR*/ /*_.VALSTR___V107*/ meltfptr[106] = (melt_ptr_t) & cdat->dstr_24__PCTN_MAPATVAR; cdat->dstr_24__PCTN_MAPATVAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_24__PCTN_MAPATVAR.val, "PCTN_MAPATVAR", sizeof (cdat->dstr_24__PCTN_MAPATVAR.val) - 1); cdat->dstr_24__PCTN_MAPATVAR.val[13] = (char) 0; cdat->dstr_24__PCTN_MAPATVAR.slen = 13; /*iniobj dsym_25__PCTN_MAPATCST*/ /*uniqueobj*/ if (! /*_.VALDATA___V131*/ meltfptr[130]) /*_.VALDATA___V131*/ meltfptr[130] = (melt_ptr_t) & cdat->dsym_25__PCTN_MAPATCST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_25__PCTN_MAPATCST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_25__PCTN_MAPATCST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_25__PCTN_MAPATCST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_25__PCTN_MAPATCST.obj_hash = 626578931; cdat->dsym_25__PCTN_MAPATCST.obj_len = 3; /*inistring dstr_26__PCTN_MAPATCST*/ /*_.VALSTR___V132*/ meltfptr[131] = (melt_ptr_t) & cdat->dstr_26__PCTN_MAPATCST; cdat->dstr_26__PCTN_MAPATCST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_26__PCTN_MAPATCST.val, "PCTN_MAPATCST", sizeof (cdat->dstr_26__PCTN_MAPATCST.val) - 1); cdat->dstr_26__PCTN_MAPATCST.val[13] = (char) 0; cdat->dstr_26__PCTN_MAPATCST.slen = 13; /*^iniobj */ /*iniobj dobj_27__PCTN_MAPATCST*/ /*_.VALDATA___V108*/ meltfptr[107] = (melt_ptr_t) & cdat->dobj_27__PCTN_MAPATCST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_27__PCTN_MAPATCST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_27__PCTN_MAPATCST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_27__PCTN_MAPATCST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_27__PCTN_MAPATCST.obj_num = 4; cdat->dobj_27__PCTN_MAPATCST.obj_hash = 720767860; cdat->dobj_27__PCTN_MAPATCST.obj_len = 4; /*inistring dstr_28__PCTN_MAPATCST*/ /*_.VALSTR___V109*/ meltfptr[108] = (melt_ptr_t) & cdat->dstr_28__PCTN_MAPATCST; cdat->dstr_28__PCTN_MAPATCST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_28__PCTN_MAPATCST.val, "PCTN_MAPATCST", sizeof (cdat->dstr_28__PCTN_MAPATCST.val) - 1); cdat->dstr_28__PCTN_MAPATCST.val[13] = (char) 0; cdat->dstr_28__PCTN_MAPATCST.slen = 13; /*iniobj dsym_29__PCTN_MAPOR*/ /*uniqueobj*/ if (! /*_.VALDATA___V133*/ meltfptr[132]) /*_.VALDATA___V133*/ meltfptr[132] = (melt_ptr_t) & cdat->dsym_29__PCTN_MAPOR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_29__PCTN_MAPOR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_29__PCTN_MAPOR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_29__PCTN_MAPOR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_29__PCTN_MAPOR.obj_hash = 801056116; cdat->dsym_29__PCTN_MAPOR.obj_len = 3; /*inistring dstr_30__PCTN_MAPOR*/ /*_.VALSTR___V134*/ meltfptr[133] = (melt_ptr_t) & cdat->dstr_30__PCTN_MAPOR; cdat->dstr_30__PCTN_MAPOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_30__PCTN_MAPOR.val, "PCTN_MAPOR", sizeof (cdat->dstr_30__PCTN_MAPOR.val) - 1); cdat->dstr_30__PCTN_MAPOR.val[10] = (char) 0; cdat->dstr_30__PCTN_MAPOR.slen = 10; /*^iniobj */ /*iniobj dobj_31__PCTN_MAPOR*/ /*_.VALDATA___V110*/ meltfptr[109] = (melt_ptr_t) & cdat->dobj_31__PCTN_MAPOR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_31__PCTN_MAPOR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_31__PCTN_MAPOR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_31__PCTN_MAPOR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_31__PCTN_MAPOR.obj_num = 5; cdat->dobj_31__PCTN_MAPOR.obj_hash = 368476447; cdat->dobj_31__PCTN_MAPOR.obj_len = 4; /*inistring dstr_32__PCTN_MAPOR*/ /*_.VALSTR___V111*/ meltfptr[110] = (melt_ptr_t) & cdat->dstr_32__PCTN_MAPOR; cdat->dstr_32__PCTN_MAPOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_32__PCTN_MAPOR.val, "PCTN_MAPOR", sizeof (cdat->dstr_32__PCTN_MAPOR.val) - 1); cdat->dstr_32__PCTN_MAPOR.val[10] = (char) 0; cdat->dstr_32__PCTN_MAPOR.slen = 10; /*iniobj dsym_33__PCTN_BINDLIST*/ /*uniqueobj*/ if (! /*_.VALDATA___V135*/ meltfptr[134]) /*_.VALDATA___V135*/ meltfptr[134] = (melt_ptr_t) & cdat->dsym_33__PCTN_BINDLIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_33__PCTN_BINDLIST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_33__PCTN_BINDLIST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_33__PCTN_BINDLIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_33__PCTN_BINDLIST.obj_hash = 47093239; cdat->dsym_33__PCTN_BINDLIST.obj_len = 3; /*inistring dstr_34__PCTN_BINDLIST*/ /*_.VALSTR___V136*/ meltfptr[135] = (melt_ptr_t) & cdat->dstr_34__PCTN_BINDLIST; cdat->dstr_34__PCTN_BINDLIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_34__PCTN_BINDLIST.val, "PCTN_BINDLIST", sizeof (cdat->dstr_34__PCTN_BINDLIST.val) - 1); cdat->dstr_34__PCTN_BINDLIST.val[13] = (char) 0; cdat->dstr_34__PCTN_BINDLIST.slen = 13; /*^iniobj */ /*iniobj dobj_35__PCTN_BINDLIST*/ /*_.VALDATA___V112*/ meltfptr[111] = (melt_ptr_t) & cdat->dobj_35__PCTN_BINDLIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_35__PCTN_BINDLIST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_35__PCTN_BINDLIST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_35__PCTN_BINDLIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_35__PCTN_BINDLIST.obj_num = 6; cdat->dobj_35__PCTN_BINDLIST.obj_hash = 14625764; cdat->dobj_35__PCTN_BINDLIST.obj_len = 4; /*inistring dstr_36__PCTN_BINDLIST*/ /*_.VALSTR___V113*/ meltfptr[112] = (melt_ptr_t) & cdat->dstr_36__PCTN_BINDLIST; cdat->dstr_36__PCTN_BINDLIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_36__PCTN_BINDLIST.val, "PCTN_BINDLIST", sizeof (cdat->dstr_36__PCTN_BINDLIST.val) - 1); cdat->dstr_36__PCTN_BINDLIST.val[13] = (char) 0; cdat->dstr_36__PCTN_BINDLIST.slen = 13; /*iniobj dsym_37__PCTN_STUFFMAP*/ /*uniqueobj*/ if (! /*_.VALDATA___V137*/ meltfptr[136]) /*_.VALDATA___V137*/ meltfptr[136] = (melt_ptr_t) & cdat->dsym_37__PCTN_STUFFMAP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_37__PCTN_STUFFMAP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_37__PCTN_STUFFMAP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_37__PCTN_STUFFMAP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_37__PCTN_STUFFMAP.obj_hash = 451623960; cdat->dsym_37__PCTN_STUFFMAP.obj_len = 3; /*inistring dstr_38__PCTN_STUFFMAP*/ /*_.VALSTR___V138*/ meltfptr[137] = (melt_ptr_t) & cdat->dstr_38__PCTN_STUFFMAP; cdat->dstr_38__PCTN_STUFFMAP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_38__PCTN_STUFFMAP.val, "PCTN_STUFFMAP", sizeof (cdat->dstr_38__PCTN_STUFFMAP.val) - 1); cdat->dstr_38__PCTN_STUFFMAP.val[13] = (char) 0; cdat->dstr_38__PCTN_STUFFMAP.slen = 13; /*^iniobj */ /*iniobj dobj_39__PCTN_STUFFMAP*/ /*_.VALDATA___V114*/ meltfptr[113] = (melt_ptr_t) & cdat->dobj_39__PCTN_STUFFMAP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_39__PCTN_STUFFMAP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_39__PCTN_STUFFMAP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_39__PCTN_STUFFMAP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_39__PCTN_STUFFMAP.obj_num = 7; cdat->dobj_39__PCTN_STUFFMAP.obj_hash = 443401314; cdat->dobj_39__PCTN_STUFFMAP.obj_len = 4; /*inistring dstr_40__PCTN_STUFFMAP*/ /*_.VALSTR___V115*/ meltfptr[114] = (melt_ptr_t) & cdat->dstr_40__PCTN_STUFFMAP; cdat->dstr_40__PCTN_STUFFMAP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_40__PCTN_STUFFMAP.val, "PCTN_STUFFMAP", sizeof (cdat->dstr_40__PCTN_STUFFMAP.val) - 1); cdat->dstr_40__PCTN_STUFFMAP.val[13] = (char) 0; cdat->dstr_40__PCTN_STUFFMAP.slen = 13; /*iniobj dsym_41__PCTN_PVARLOCMAP*/ /*uniqueobj*/ if (! /*_.VALDATA___V139*/ meltfptr[138]) /*_.VALDATA___V139*/ meltfptr[138] = (melt_ptr_t) & cdat->dsym_41__PCTN_PVARLOCMAP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_41__PCTN_PVARLOCMAP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_41__PCTN_PVARLOCMAP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_41__PCTN_PVARLOCMAP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_41__PCTN_PVARLOCMAP.obj_hash = 662126752; cdat->dsym_41__PCTN_PVARLOCMAP.obj_len = 3; /*inistring dstr_42__PCTN_PVARLOCMAP*/ /*_.VALSTR___V140*/ meltfptr[139] = (melt_ptr_t) & cdat->dstr_42__PCTN_PVARLOCMAP; cdat->dstr_42__PCTN_PVARLOCMAP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_42__PCTN_PVARLOCMAP.val, "PCTN_PVARLOCMAP", sizeof (cdat->dstr_42__PCTN_PVARLOCMAP.val) - 1); cdat->dstr_42__PCTN_PVARLOCMAP.val[15] = (char) 0; cdat->dstr_42__PCTN_PVARLOCMAP.slen = 15; /*^iniobj */ /*iniobj dobj_43__PCTN_PVARLOCMAP*/ /*_.VALDATA___V116*/ meltfptr[115] = (melt_ptr_t) & cdat->dobj_43__PCTN_PVARLOCMAP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_43__PCTN_PVARLOCMAP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_43__PCTN_PVARLOCMAP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_43__PCTN_PVARLOCMAP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_43__PCTN_PVARLOCMAP.obj_num = 8; cdat->dobj_43__PCTN_PVARLOCMAP.obj_hash = 1025540724; cdat->dobj_43__PCTN_PVARLOCMAP.obj_len = 4; /*inistring dstr_44__PCTN_PVARLOCMAP*/ /*_.VALSTR___V117*/ meltfptr[116] = (melt_ptr_t) & cdat->dstr_44__PCTN_PVARLOCMAP; cdat->dstr_44__PCTN_PVARLOCMAP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_44__PCTN_PVARLOCMAP.val, "PCTN_PVARLOCMAP", sizeof (cdat->dstr_44__PCTN_PVARLOCMAP.val) - 1); cdat->dstr_44__PCTN_PVARLOCMAP.val[15] = (char) 0; cdat->dstr_44__PCTN_PVARLOCMAP.slen = 15; /*iniobj dsym_45__PCTN_TESTS*/ /*uniqueobj*/ if (! /*_.VALDATA___V141*/ meltfptr[140]) /*_.VALDATA___V141*/ meltfptr[140] = (melt_ptr_t) & cdat->dsym_45__PCTN_TESTS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_45__PCTN_TESTS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_45__PCTN_TESTS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_45__PCTN_TESTS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_45__PCTN_TESTS.obj_hash = 50241593; cdat->dsym_45__PCTN_TESTS.obj_len = 3; /*inistring dstr_46__PCTN_TESTS*/ /*_.VALSTR___V142*/ meltfptr[141] = (melt_ptr_t) & cdat->dstr_46__PCTN_TESTS; cdat->dstr_46__PCTN_TESTS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_46__PCTN_TESTS.val, "PCTN_TESTS", sizeof (cdat->dstr_46__PCTN_TESTS.val) - 1); cdat->dstr_46__PCTN_TESTS.val[10] = (char) 0; cdat->dstr_46__PCTN_TESTS.slen = 10; /*^iniobj */ /*iniobj dobj_47__PCTN_TESTS*/ /*_.VALDATA___V118*/ meltfptr[117] = (melt_ptr_t) & cdat->dobj_47__PCTN_TESTS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_47__PCTN_TESTS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_47__PCTN_TESTS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_47__PCTN_TESTS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_47__PCTN_TESTS.obj_num = 9; cdat->dobj_47__PCTN_TESTS.obj_hash = 474869856; cdat->dobj_47__PCTN_TESTS.obj_len = 4; /*inistring dstr_48__PCTN_TESTS*/ /*_.VALSTR___V119*/ meltfptr[118] = (melt_ptr_t) & cdat->dstr_48__PCTN_TESTS; cdat->dstr_48__PCTN_TESTS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_48__PCTN_TESTS.val, "PCTN_TESTS", sizeof (cdat->dstr_48__PCTN_TESTS.val) - 1); cdat->dstr_48__PCTN_TESTS.val[10] = (char) 0; cdat->dstr_48__PCTN_TESTS.slen = 10; /*iniobj dsym_49__PCTN_VARHANDLERS*/ /*uniqueobj*/ if (! /*_.VALDATA___V143*/ meltfptr[142]) /*_.VALDATA___V143*/ meltfptr[142] = (melt_ptr_t) & cdat->dsym_49__PCTN_VARHANDLERS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_49__PCTN_VARHANDLERS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_49__PCTN_VARHANDLERS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_49__PCTN_VARHANDLERS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_49__PCTN_VARHANDLERS.obj_hash = 89187476; cdat->dsym_49__PCTN_VARHANDLERS.obj_len = 3; /*inistring dstr_50__PCTN_VARHANDLERS*/ /*_.VALSTR___V144*/ meltfptr[143] = (melt_ptr_t) & cdat->dstr_50__PCTN_VARHANDLERS; cdat->dstr_50__PCTN_VARHANDLERS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_50__PCTN_VARHANDLERS.val, "PCTN_VARHANDLERS", sizeof (cdat->dstr_50__PCTN_VARHANDLERS.val) - 1); cdat->dstr_50__PCTN_VARHANDLERS.val[16] = (char) 0; cdat->dstr_50__PCTN_VARHANDLERS.slen = 16; /*^iniobj */ /*iniobj dobj_51__PCTN_VARHANDLERS*/ /*_.VALDATA___V120*/ meltfptr[119] = (melt_ptr_t) & cdat->dobj_51__PCTN_VARHANDLERS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_51__PCTN_VARHANDLERS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_51__PCTN_VARHANDLERS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_51__PCTN_VARHANDLERS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_51__PCTN_VARHANDLERS.obj_num = 10; cdat->dobj_51__PCTN_VARHANDLERS.obj_hash = 779119154; cdat->dobj_51__PCTN_VARHANDLERS.obj_len = 4; /*inistring dstr_52__PCTN_VARHANDLERS*/ /*_.VALSTR___V121*/ meltfptr[120] = (melt_ptr_t) & cdat->dstr_52__PCTN_VARHANDLERS; cdat->dstr_52__PCTN_VARHANDLERS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_52__PCTN_VARHANDLERS.val, "PCTN_VARHANDLERS", sizeof (cdat->dstr_52__PCTN_VARHANDLERS.val) - 1); cdat->dstr_52__PCTN_VARHANDLERS.val[16] = (char) 0; cdat->dstr_52__PCTN_VARHANDLERS.slen = 16; /*iniobj dsym_53__SCAN_PATTERN*/ /*uniqueobj*/ if (! /*_.VALDATA___V145*/ meltfptr[144]) /*_.VALDATA___V145*/ meltfptr[144] = (melt_ptr_t) & cdat->dsym_53__SCAN_PATTERN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_53__SCAN_PATTERN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_53__SCAN_PATTERN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_53__SCAN_PATTERN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_53__SCAN_PATTERN.obj_hash = 97353985; cdat->dsym_53__SCAN_PATTERN.obj_len = 3; /*inistring dstr_54__SCAN_PATTERN*/ /*_.VALSTR___V146*/ meltfptr[145] = (melt_ptr_t) & cdat->dstr_54__SCAN_PATTERN; cdat->dstr_54__SCAN_PATTERN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_54__SCAN_PATTERN.val, "SCAN_PATTERN", sizeof (cdat->dstr_54__SCAN_PATTERN.val) - 1); cdat->dstr_54__SCAN_PATTERN.val[12] = (char) 0; cdat->dstr_54__SCAN_PATTERN.slen = 12; /*iniobj dsym_55__CLASS_SELECTOR*/ /*uniqueobj*/ if (! /*_.VALDATA___V147*/ meltfptr[146]) /*_.VALDATA___V147*/ meltfptr[146] = (melt_ptr_t) & cdat->dsym_55__CLASS_SELECTOR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_55__CLASS_SELECTOR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_55__CLASS_SELECTOR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_55__CLASS_SELECTOR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_55__CLASS_SELECTOR.obj_hash = 100646971; cdat->dsym_55__CLASS_SELECTOR.obj_len = 3; /*inistring dstr_56__CLASS_SELECTOR*/ /*_.VALSTR___V148*/ meltfptr[147] = (melt_ptr_t) & cdat->dstr_56__CLASS_SELECTOR; cdat->dstr_56__CLASS_SELECTOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_56__CLASS_SELECTOR.val, "CLASS_SELECTOR", sizeof (cdat->dstr_56__CLASS_SELECTOR.val) - 1); cdat->dstr_56__CLASS_SELECTOR.val[14] = (char) 0; cdat->dstr_56__CLASS_SELECTOR.slen = 14; MELT_LOCATION ("warmelt-normatch.melt:78:/ iniobj"); /*iniobj dobj_57__SCAN_PATTERN*/ /*_.VALDATA___V149*/ meltfptr[148] = (melt_ptr_t) & cdat->dobj_57__SCAN_PATTERN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_57__SCAN_PATTERN", melt_magic_discr ((melt_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7])) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_57__SCAN_PATTERN", ((meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]))-> 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 = 386146825; cdat->dobj_57__SCAN_PATTERN.obj_len = 4; /*inistring dstr_58__SCAN_PATTERN*/ /*_.VALSTR___V150*/ meltfptr[149] = (melt_ptr_t) & cdat->dstr_58__SCAN_PATTERN; cdat->dstr_58__SCAN_PATTERN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_58__SCAN_PATTERN.val, "SCAN_PATTERN", sizeof (cdat->dstr_58__SCAN_PATTERN.val) - 1); cdat->dstr_58__SCAN_PATTERN.val[12] = (char) 0; cdat->dstr_58__SCAN_PATTERN.slen = 12; /*inirout drout_59__SCANPAT_ANYRECV */ /*_.VALROUT___V151*/ meltfptr[150] = (melt_ptr_t) & cdat->drout_59__SCANPAT_ANYRECV; cdat->drout_59__SCANPAT_ANYRECV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_59__SCANPAT_ANYRECV.routdescr, "SCANPAT_ANYRECV @warmelt-normatch.melt:86", MELT_ROUTDESCR_LEN - 1); cdat->drout_59__SCANPAT_ANYRECV.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_59__SCANPAT_ANYRECV, meltrout_1_warmelt_normatch_SCANPAT_ANYRECV); /*iniclos dclo_60__SCANPAT_ANYRECV */ /*_.VALCLO___V152*/ meltfptr[151] = (melt_ptr_t) & cdat->dclo_60__SCANPAT_ANYRECV; cdat->dclo_60__SCANPAT_ANYRECV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_60__SCANPAT_ANYRECV.nbval = 0; /*iniobj dsym_61__MELT_DEBUG_FUN*/ /*uniqueobj*/ if (! /*_.VALDATA___V153*/ meltfptr[152]) /*_.VALDATA___V153*/ meltfptr[152] = (melt_ptr_t) & 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 ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_61__MELT_DEBUG_FUN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_61__MELT_DEBUG_FUN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_61__MELT_DEBUG_FUN.obj_hash = 972123377; cdat->dsym_61__MELT_DEBUG_FUN.obj_len = 3; /*inistring dstr_62__MELT_DEBUG_FUN*/ /*_.VALSTR___V154*/ meltfptr[153] = (melt_ptr_t) & cdat->dstr_62__MELT_DEBUG_FUN; cdat->dstr_62__MELT_DEBUG_FUN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_62__MELT_DEBUG_FUN.val, "MELT_DEBUG_FUN", sizeof (cdat->dstr_62__MELT_DEBUG_FUN.val) - 1); cdat->dstr_62__MELT_DEBUG_FUN.val[14] = (char) 0; cdat->dstr_62__MELT_DEBUG_FUN.slen = 14; /*iniobj dsym_63__CLASS_NAMED*/ /*uniqueobj*/ if (! /*_.VALDATA___V155*/ meltfptr[154]) /*_.VALDATA___V155*/ meltfptr[154] = (melt_ptr_t) & cdat->dsym_63__CLASS_NAMED; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_63__CLASS_NAMED", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_63__CLASS_NAMED", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_63__CLASS_NAMED.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_63__CLASS_NAMED.obj_hash = 60407004; cdat->dsym_63__CLASS_NAMED.obj_len = 3; /*inistring dstr_64__CLASS_NAMED*/ /*_.VALSTR___V156*/ meltfptr[155] = (melt_ptr_t) & cdat->dstr_64__CLASS_NAMED; cdat->dstr_64__CLASS_NAMED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_64__CLASS_NAMED.val, "CLASS_NAMED", sizeof (cdat->dstr_64__CLASS_NAMED.val) - 1); cdat->dstr_64__CLASS_NAMED.val[11] = (char) 0; cdat->dstr_64__CLASS_NAMED.slen = 11; /*iniobj dsym_65__INSTALL_METHOD*/ /*uniqueobj*/ if (! /*_.VALDATA___V157*/ meltfptr[156]) /*_.VALDATA___V157*/ meltfptr[156] = (melt_ptr_t) & cdat->dsym_65__INSTALL_METHOD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_65__INSTALL_METHOD", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_65__INSTALL_METHOD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_65__INSTALL_METHOD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_65__INSTALL_METHOD.obj_hash = 680699224; cdat->dsym_65__INSTALL_METHOD.obj_len = 3; /*inistring dstr_66__INSTALL_METHOD*/ /*_.VALSTR___V158*/ meltfptr[157] = (melt_ptr_t) & cdat->dstr_66__INSTALL_METHOD; cdat->dstr_66__INSTALL_METHOD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_66__INSTALL_METHOD.val, "INSTALL_METHOD", sizeof (cdat->dstr_66__INSTALL_METHOD.val) - 1); cdat->dstr_66__INSTALL_METHOD.val[14] = (char) 0; cdat->dstr_66__INSTALL_METHOD.slen = 14; /*iniobj dsym_67__DISCR_ANY_RECEIVER*/ /*uniqueobj*/ if (! /*_.VALDATA___V159*/ meltfptr[158]) /*_.VALDATA___V159*/ meltfptr[158] = (melt_ptr_t) & 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 ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_67__DISCR_ANY_RECEIVER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_67__DISCR_ANY_RECEIVER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_67__DISCR_ANY_RECEIVER.obj_hash = 95947314; cdat->dsym_67__DISCR_ANY_RECEIVER.obj_len = 3; /*inistring dstr_68__DISCR_ANY_RECEIV*/ /*_.VALSTR___V160*/ meltfptr[159] = (melt_ptr_t) & cdat->dstr_68__DISCR_ANY_RECEIV; cdat->dstr_68__DISCR_ANY_RECEIV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_68__DISCR_ANY_RECEIV.val, "DISCR_ANY_RECEIVER", sizeof (cdat->dstr_68__DISCR_ANY_RECEIV.val) - 1); cdat->dstr_68__DISCR_ANY_RECEIV.val[18] = (char) 0; cdat->dstr_68__DISCR_ANY_RECEIV.slen = 18; /*inirout drout_69__SCANPAT_ANYPATTERN */ /*_.VALROUT___V161*/ meltfptr[160] = (melt_ptr_t) & cdat->drout_69__SCANPAT_ANYPATTERN; cdat->drout_69__SCANPAT_ANYPATTERN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_69__SCANPAT_ANYPATTERN.routdescr, "SCANPAT_ANYPATTERN @warmelt-normatch.melt:101", MELT_ROUTDESCR_LEN - 1); cdat->drout_69__SCANPAT_ANYPATTERN.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_69__SCANPAT_ANYPATTERN, meltrout_2_warmelt_normatch_SCANPAT_ANYPATTERN); /*iniclos dclo_70__SCANPAT_ANYPATTERN */ /*_.VALCLO___V162*/ meltfptr[161] = (melt_ptr_t) & cdat->dclo_70__SCANPAT_ANYPATTERN; cdat->dclo_70__SCANPAT_ANYPATTERN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_70__SCANPAT_ANYPATTERN.nbval = 0; /*iniobj dsym_71__CLASS_SOURCE_PATTERN*/ /*uniqueobj*/ if (! /*_.VALDATA___V163*/ meltfptr[162]) /*_.VALDATA___V163*/ meltfptr[162] = (melt_ptr_t) & 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 ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_71__CLASS_SOURCE_PATTERN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_71__CLASS_SOURCE_PATTERN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_71__CLASS_SOURCE_PATTERN.obj_hash = 661483135; cdat->dsym_71__CLASS_SOURCE_PATTERN.obj_len = 3; /*inistring dstr_72__CLASS_SOURCE_PAT*/ /*_.VALSTR___V164*/ meltfptr[163] = (melt_ptr_t) & cdat->dstr_72__CLASS_SOURCE_PAT; cdat->dstr_72__CLASS_SOURCE_PAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_72__CLASS_SOURCE_PAT.val, "CLASS_SOURCE_PATTERN", sizeof (cdat->dstr_72__CLASS_SOURCE_PAT.val) - 1); cdat->dstr_72__CLASS_SOURCE_PAT.val[20] = (char) 0; cdat->dstr_72__CLASS_SOURCE_PAT.slen = 20; /*inirout drout_73__SCANPAT_SRCPATVAR */ /*_.VALROUT___V165*/ meltfptr[164] = (melt_ptr_t) & cdat->drout_73__SCANPAT_SRCPATVAR; cdat->drout_73__SCANPAT_SRCPATVAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_73__SCANPAT_SRCPATVAR.routdescr, "SCANPAT_SRCPATVAR @warmelt-normatch.melt:117", MELT_ROUTDESCR_LEN - 1); cdat->drout_73__SCANPAT_SRCPATVAR.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_73__SCANPAT_SRCPATVAR, meltrout_3_warmelt_normatch_SCANPAT_SRCPATVAR); /*iniclos dclo_74__SCANPAT_SRCPATVAR */ /*_.VALCLO___V166*/ meltfptr[165] = (melt_ptr_t) & cdat->dclo_74__SCANPAT_SRCPATVAR; cdat->dclo_74__SCANPAT_SRCPATVAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_74__SCANPAT_SRCPATVAR.nbval = 0; /*iniobj dsym_75__CLASS_SOURCE_PATTERN_VARIABLE*/ /*uniqueobj*/ if (! /*_.VALDATA___V167*/ meltfptr[166]) /*_.VALDATA___V167*/ meltfptr[166] = (melt_ptr_t) & 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", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_75__CLASS_SOURCE_PATTERN_VARIABLE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_75__CLASS_SOURCE_PATTERN_VARIABLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_75__CLASS_SOURCE_PATTERN_VARIABLE.obj_hash = 852795053; cdat->dsym_75__CLASS_SOURCE_PATTERN_VARIABLE.obj_len = 3; /*inistring dstr_76__CLASS_SOURCE_PAT*/ /*_.VALSTR___V168*/ meltfptr[167] = (melt_ptr_t) & cdat->dstr_76__CLASS_SOURCE_PAT; cdat->dstr_76__CLASS_SOURCE_PAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_76__CLASS_SOURCE_PAT.val, "CLASS_SOURCE_PATTERN_VARIABLE", sizeof (cdat->dstr_76__CLASS_SOURCE_PAT.val) - 1); cdat->dstr_76__CLASS_SOURCE_PAT.val[29] = (char) 0; cdat->dstr_76__CLASS_SOURCE_PAT.slen = 29; /*inirout drout_77__SCANPAT_SRCPATJOKER */ /*_.VALROUT___V169*/ meltfptr[168] = (melt_ptr_t) & cdat->drout_77__SCANPAT_SRCPATJOKER; cdat->drout_77__SCANPAT_SRCPATJOKER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_77__SCANPAT_SRCPATJOKER.routdescr, "SCANPAT_SRCPATJOKER @warmelt-normatch.melt:151", MELT_ROUTDESCR_LEN - 1); cdat->drout_77__SCANPAT_SRCPATJOKER.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_77__SCANPAT_SRCPATJOKER, meltrout_4_warmelt_normatch_SCANPAT_SRCPATJOKER); /*iniclos dclo_78__SCANPAT_SRCPATJOKER */ /*_.VALCLO___V170*/ meltfptr[169] = (melt_ptr_t) & cdat->dclo_78__SCANPAT_SRCPATJOKER; cdat->dclo_78__SCANPAT_SRCPATJOKER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_78__SCANPAT_SRCPATJOKER.nbval = 0; /*iniobj dsym_79__CLASS_SOURCE_PATTERN_JOKER_VARIABLE*/ /*uniqueobj*/ if (! /*_.VALDATA___V171*/ meltfptr[170]) /*_.VALDATA___V171*/ meltfptr[170] = (melt_ptr_t) & cdat->dsym_79__CLASS_SOURCE_PATTERN_JOKER_VARIABLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_79__CLASS_SOURCE_PATTERN_JOKER_VARIABLE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_79__CLASS_SOURCE_PATTERN_JOKER_VARIABLE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_79__CLASS_SOURCE_PATTERN_JOKER_VARIABLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_79__CLASS_SOURCE_PATTERN_JOKER_VARIABLE.obj_hash = 407364272; cdat->dsym_79__CLASS_SOURCE_PATTERN_JOKER_VARIABLE.obj_len = 3; /*inistring dstr_80__CLASS_SOURCE_PAT*/ /*_.VALSTR___V172*/ meltfptr[171] = (melt_ptr_t) & cdat->dstr_80__CLASS_SOURCE_PAT; cdat->dstr_80__CLASS_SOURCE_PAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_80__CLASS_SOURCE_PAT.val, "CLASS_SOURCE_PATTERN_JOKER_VARIABLE", sizeof (cdat->dstr_80__CLASS_SOURCE_PAT.val) - 1); cdat->dstr_80__CLASS_SOURCE_PAT.val[35] = (char) 0; cdat->dstr_80__CLASS_SOURCE_PAT.slen = 35; /*inirout drout_81__SCANPAT_SRCPATCONSTANT */ /*_.VALROUT___V173*/ meltfptr[172] = (melt_ptr_t) & cdat->drout_81__SCANPAT_SRCPATCONSTANT; cdat->drout_81__SCANPAT_SRCPATCONSTANT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_81__SCANPAT_SRCPATCONSTANT.routdescr, "SCANPAT_SRCPATCONSTANT @warmelt-normatch.melt:165", MELT_ROUTDESCR_LEN - 1); cdat->drout_81__SCANPAT_SRCPATCONSTANT.nbval = 8; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_81__SCANPAT_SRCPATCONSTANT, meltrout_5_warmelt_normatch_SCANPAT_SRCPATCONSTANT); /*iniclos dclo_82__SCANPAT_SRCPATCONSTANT */ /*_.VALCLO___V174*/ meltfptr[173] = (melt_ptr_t) & cdat->dclo_82__SCANPAT_SRCPATCONSTANT; cdat->dclo_82__SCANPAT_SRCPATCONSTANT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_82__SCANPAT_SRCPATCONSTANT.nbval = 0; /*iniobj dsym_83__CLASS_SOURCE_PATTERN_CONSTANT*/ /*uniqueobj*/ if (! /*_.VALDATA___V175*/ meltfptr[174]) /*_.VALDATA___V175*/ meltfptr[174] = (melt_ptr_t) & 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", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_83__CLASS_SOURCE_PATTERN_CONSTANT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_83__CLASS_SOURCE_PATTERN_CONSTANT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_83__CLASS_SOURCE_PATTERN_CONSTANT.obj_hash = 527380821; cdat->dsym_83__CLASS_SOURCE_PATTERN_CONSTANT.obj_len = 3; /*inistring dstr_84__CLASS_SOURCE_PAT*/ /*_.VALSTR___V176*/ meltfptr[175] = (melt_ptr_t) & cdat->dstr_84__CLASS_SOURCE_PAT; cdat->dstr_84__CLASS_SOURCE_PAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_84__CLASS_SOURCE_PAT.val, "CLASS_SOURCE_PATTERN_CONSTANT", sizeof (cdat->dstr_84__CLASS_SOURCE_PAT.val) - 1); cdat->dstr_84__CLASS_SOURCE_PAT.val[29] = (char) 0; cdat->dstr_84__CLASS_SOURCE_PAT.slen = 29; /*iniobj dsym_85__NORMAL_EXP*/ /*uniqueobj*/ if (! /*_.VALDATA___V177*/ meltfptr[176]) /*_.VALDATA___V177*/ meltfptr[176] = (melt_ptr_t) & cdat->dsym_85__NORMAL_EXP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_85__NORMAL_EXP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_85__NORMAL_EXP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_85__NORMAL_EXP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_85__NORMAL_EXP.obj_hash = 420282450; cdat->dsym_85__NORMAL_EXP.obj_len = 3; /*inistring dstr_86__NORMAL_EXP*/ /*_.VALSTR___V178*/ meltfptr[177] = (melt_ptr_t) & cdat->dstr_86__NORMAL_EXP; cdat->dstr_86__NORMAL_EXP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_86__NORMAL_EXP.val, "NORMAL_EXP", sizeof (cdat->dstr_86__NORMAL_EXP.val) - 1); cdat->dstr_86__NORMAL_EXP.val[10] = (char) 0; cdat->dstr_86__NORMAL_EXP.slen = 10; /*iniobj dsym_87__LIST_APPEND2LIST*/ /*uniqueobj*/ if (! /*_.VALDATA___V179*/ meltfptr[178]) /*_.VALDATA___V179*/ meltfptr[178] = (melt_ptr_t) & cdat->dsym_87__LIST_APPEND2LIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_87__LIST_APPEND2LIST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_87__LIST_APPEND2LIST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_87__LIST_APPEND2LIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_87__LIST_APPEND2LIST.obj_hash = 744841630; cdat->dsym_87__LIST_APPEND2LIST.obj_len = 3; /*inistring dstr_88__LIST_APPEND2LIST*/ /*_.VALSTR___V180*/ meltfptr[179] = (melt_ptr_t) & cdat->dstr_88__LIST_APPEND2LIST; cdat->dstr_88__LIST_APPEND2LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_88__LIST_APPEND2LIST.val, "LIST_APPEND2LIST", sizeof (cdat->dstr_88__LIST_APPEND2LIST.val) - 1); cdat->dstr_88__LIST_APPEND2LIST.val[16] = (char) 0; cdat->dstr_88__LIST_APPEND2LIST.slen = 16; /*iniobj dsym_89__GET_CTYPE*/ /*uniqueobj*/ if (! /*_.VALDATA___V181*/ meltfptr[180]) /*_.VALDATA___V181*/ meltfptr[180] = (melt_ptr_t) & cdat->dsym_89__GET_CTYPE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_89__GET_CTYPE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_89__GET_CTYPE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_89__GET_CTYPE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_89__GET_CTYPE.obj_hash = 747649571; cdat->dsym_89__GET_CTYPE.obj_len = 3; /*inistring dstr_90__GET_CTYPE*/ /*_.VALSTR___V182*/ meltfptr[181] = (melt_ptr_t) & cdat->dstr_90__GET_CTYPE; cdat->dstr_90__GET_CTYPE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_90__GET_CTYPE.val, "GET_CTYPE", sizeof (cdat->dstr_90__GET_CTYPE.val) - 1); cdat->dstr_90__GET_CTYPE.val[9] = (char) 0; cdat->dstr_90__GET_CTYPE.slen = 9; /*iniobj dsym_91__CLASS_CTYPE*/ /*uniqueobj*/ if (! /*_.VALDATA___V183*/ meltfptr[182]) /*_.VALDATA___V183*/ meltfptr[182] = (melt_ptr_t) & cdat->dsym_91__CLASS_CTYPE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_91__CLASS_CTYPE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_91__CLASS_CTYPE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_91__CLASS_CTYPE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_91__CLASS_CTYPE.obj_hash = 78610803; cdat->dsym_91__CLASS_CTYPE.obj_len = 3; /*inistring dstr_92__CLASS_CTYPE*/ /*_.VALSTR___V184*/ meltfptr[183] = (melt_ptr_t) & cdat->dstr_92__CLASS_CTYPE; cdat->dstr_92__CLASS_CTYPE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_92__CLASS_CTYPE.val, "CLASS_CTYPE", sizeof (cdat->dstr_92__CLASS_CTYPE.val) - 1); cdat->dstr_92__CLASS_CTYPE.val[11] = (char) 0; cdat->dstr_92__CLASS_CTYPE.slen = 11; /*iniobj dsym_93__CLASS_LOCATED*/ /*uniqueobj*/ if (! /*_.VALDATA___V185*/ meltfptr[184]) /*_.VALDATA___V185*/ meltfptr[184] = (melt_ptr_t) & cdat->dsym_93__CLASS_LOCATED; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_93__CLASS_LOCATED", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_93__CLASS_LOCATED", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_93__CLASS_LOCATED.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_93__CLASS_LOCATED.obj_hash = 979003; cdat->dsym_93__CLASS_LOCATED.obj_len = 3; /*inistring dstr_94__CLASS_LOCATED*/ /*_.VALSTR___V186*/ meltfptr[185] = (melt_ptr_t) & cdat->dstr_94__CLASS_LOCATED; cdat->dstr_94__CLASS_LOCATED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_94__CLASS_LOCATED.val, "CLASS_LOCATED", sizeof (cdat->dstr_94__CLASS_LOCATED.val) - 1); cdat->dstr_94__CLASS_LOCATED.val[13] = (char) 0; cdat->dstr_94__CLASS_LOCATED.slen = 13; /*inirout drout_95__SCANPAT_SRCPATCONSTRUCT */ /*_.VALROUT___V187*/ meltfptr[186] = (melt_ptr_t) & cdat->drout_95__SCANPAT_SRCPATCONSTRUCT; cdat->drout_95__SCANPAT_SRCPATCONSTRUCT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_95__SCANPAT_SRCPATCONSTRUCT.routdescr, "SCANPAT_SRCPATCONSTRUCT @warmelt-normatch.melt:217", MELT_ROUTDESCR_LEN - 1); cdat->drout_95__SCANPAT_SRCPATCONSTRUCT.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_95__SCANPAT_SRCPATCONSTRUCT, meltrout_6_warmelt_normatch_SCANPAT_SRCPATCONSTRUCT); /*iniclos dclo_96__SCANPAT_SRCPATCONSTRUCT */ /*_.VALCLO___V188*/ meltfptr[187] = (melt_ptr_t) & cdat->dclo_96__SCANPAT_SRCPATCONSTRUCT; cdat->dclo_96__SCANPAT_SRCPATCONSTRUCT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_96__SCANPAT_SRCPATCONSTRUCT.nbval = 0; /*iniobj dsym_97__CLASS_SOURCE_PATTERN_CONSTRUCT*/ /*uniqueobj*/ if (! /*_.VALDATA___V189*/ meltfptr[188]) /*_.VALDATA___V189*/ meltfptr[188] = (melt_ptr_t) & 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", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_97__CLASS_SOURCE_PATTERN_CONSTRUCT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_97__CLASS_SOURCE_PATTERN_CONSTRUCT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_97__CLASS_SOURCE_PATTERN_CONSTRUCT.obj_hash = 432286397; cdat->dsym_97__CLASS_SOURCE_PATTERN_CONSTRUCT.obj_len = 3; /*inistring dstr_98__CLASS_SOURCE_PAT*/ /*_.VALSTR___V190*/ meltfptr[189] = (melt_ptr_t) & cdat->dstr_98__CLASS_SOURCE_PAT; cdat->dstr_98__CLASS_SOURCE_PAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_98__CLASS_SOURCE_PAT.val, "CLASS_SOURCE_PATTERN_CONSTRUCT", sizeof (cdat->dstr_98__CLASS_SOURCE_PAT.val) - 1); cdat->dstr_98__CLASS_SOURCE_PAT.val[30] = (char) 0; cdat->dstr_98__CLASS_SOURCE_PAT.slen = 30; /*iniobj dsym_99__CTYPE_VALUE*/ /*uniqueobj*/ if (! /*_.VALDATA___V191*/ meltfptr[190]) /*_.VALDATA___V191*/ meltfptr[190] = (melt_ptr_t) & cdat->dsym_99__CTYPE_VALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_99__CTYPE_VALUE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_99__CTYPE_VALUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_99__CTYPE_VALUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_99__CTYPE_VALUE.obj_hash = 11062864; cdat->dsym_99__CTYPE_VALUE.obj_len = 3; /*inistring dstr_100__CTYPE_VALUE*/ /*_.VALSTR___V192*/ meltfptr[191] = (melt_ptr_t) & cdat->dstr_100__CTYPE_VALUE; cdat->dstr_100__CTYPE_VALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_100__CTYPE_VALUE.val, "CTYPE_VALUE", sizeof (cdat->dstr_100__CTYPE_VALUE.val) - 1); cdat->dstr_100__CTYPE_VALUE.val[11] = (char) 0; cdat->dstr_100__CTYPE_VALUE.slen = 11; /*inirout drout_101__SCANPAT_SRCPATOBJECT */ /*_.VALROUT___V193*/ meltfptr[192] = (melt_ptr_t) & cdat->drout_101__SCANPAT_SRCPATOBJECT; cdat->drout_101__SCANPAT_SRCPATOBJECT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_101__SCANPAT_SRCPATOBJECT.routdescr, "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___V194*/ meltfptr[193] = (melt_ptr_t) & cdat->dclo_102__SCANPAT_SRCPATOBJECT; cdat->dclo_102__SCANPAT_SRCPATOBJECT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_102__SCANPAT_SRCPATOBJECT.nbval = 0; /*iniobj dsym_103__CLASS_SOURCE_PATTERN_OBJECT*/ /*uniqueobj*/ if (! /*_.VALDATA___V195*/ meltfptr[194]) /*_.VALDATA___V195*/ meltfptr[194] = (melt_ptr_t) & 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", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_103__CLASS_SOURCE_PATTERN_OBJECT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_103__CLASS_SOURCE_PATTERN_OBJECT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_103__CLASS_SOURCE_PATTERN_OBJECT.obj_hash = 360759812; cdat->dsym_103__CLASS_SOURCE_PATTERN_OBJECT.obj_len = 3; /*inistring dstr_104__CLASS_SOURCE_PAT*/ /*_.VALSTR___V196*/ meltfptr[195] = (melt_ptr_t) & cdat->dstr_104__CLASS_SOURCE_PAT; cdat->dstr_104__CLASS_SOURCE_PAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_104__CLASS_SOURCE_PAT.val, "CLASS_SOURCE_PATTERN_OBJECT", sizeof (cdat->dstr_104__CLASS_SOURCE_PAT. val) - 1); cdat->dstr_104__CLASS_SOURCE_PAT.val[27] = (char) 0; cdat->dstr_104__CLASS_SOURCE_PAT.slen = 27; /*iniobj dsym_105__CLASS_CLASS*/ /*uniqueobj*/ if (! /*_.VALDATA___V197*/ meltfptr[196]) /*_.VALDATA___V197*/ meltfptr[196] = (melt_ptr_t) & cdat->dsym_105__CLASS_CLASS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_105__CLASS_CLASS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_105__CLASS_CLASS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_105__CLASS_CLASS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_105__CLASS_CLASS.obj_hash = 60141292; cdat->dsym_105__CLASS_CLASS.obj_len = 3; /*inistring dstr_106__CLASS_CLASS*/ /*_.VALSTR___V198*/ meltfptr[197] = (melt_ptr_t) & cdat->dstr_106__CLASS_CLASS; cdat->dstr_106__CLASS_CLASS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_106__CLASS_CLASS.val, "CLASS_CLASS", sizeof (cdat->dstr_106__CLASS_CLASS.val) - 1); cdat->dstr_106__CLASS_CLASS.val[11] = (char) 0; cdat->dstr_106__CLASS_CLASS.slen = 11; /*iniobj dsym_107__CLASS_SOURCE_FIELD_PATTERN*/ /*uniqueobj*/ if (! /*_.VALDATA___V199*/ meltfptr[198]) /*_.VALDATA___V199*/ meltfptr[198] = (melt_ptr_t) & 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", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_107__CLASS_SOURCE_FIELD_PATTERN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_107__CLASS_SOURCE_FIELD_PATTERN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_107__CLASS_SOURCE_FIELD_PATTERN.obj_hash = 311715661; cdat->dsym_107__CLASS_SOURCE_FIELD_PATTERN.obj_len = 3; /*inistring dstr_108__CLASS_SOURCE_FIE*/ /*_.VALSTR___V200*/ meltfptr[199] = (melt_ptr_t) & cdat->dstr_108__CLASS_SOURCE_FIE; cdat->dstr_108__CLASS_SOURCE_FIE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_108__CLASS_SOURCE_FIE.val, "CLASS_SOURCE_FIELD_PATTERN", sizeof (cdat->dstr_108__CLASS_SOURCE_FIE. val) - 1); cdat->dstr_108__CLASS_SOURCE_FIE.val[26] = (char) 0; cdat->dstr_108__CLASS_SOURCE_FIE.slen = 26; /*iniobj dsym_109__CLASS_FIELD*/ /*uniqueobj*/ if (! /*_.VALDATA___V201*/ meltfptr[200]) /*_.VALDATA___V201*/ meltfptr[200] = (melt_ptr_t) & cdat->dsym_109__CLASS_FIELD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_109__CLASS_FIELD", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_109__CLASS_FIELD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_109__CLASS_FIELD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_109__CLASS_FIELD.obj_hash = 523073; cdat->dsym_109__CLASS_FIELD.obj_len = 3; /*inistring dstr_110__CLASS_FIELD*/ /*_.VALSTR___V202*/ meltfptr[201] = (melt_ptr_t) & cdat->dstr_110__CLASS_FIELD; cdat->dstr_110__CLASS_FIELD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_110__CLASS_FIELD.val, "CLASS_FIELD", sizeof (cdat->dstr_110__CLASS_FIELD.val) - 1); cdat->dstr_110__CLASS_FIELD.val[11] = (char) 0; cdat->dstr_110__CLASS_FIELD.slen = 11; /*inirout drout_111__SCANPAT_SRCPATCOMPOSITE */ /*_.VALROUT___V203*/ meltfptr[202] = (melt_ptr_t) & cdat->drout_111__SCANPAT_SRCPATCOMPOSITE; cdat->drout_111__SCANPAT_SRCPATCOMPOSITE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_111__SCANPAT_SRCPATCOMPOSITE.routdescr, "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___V204*/ meltfptr[203] = (melt_ptr_t) & cdat->dclo_112__SCANPAT_SRCPATCOMPOSITE; cdat->dclo_112__SCANPAT_SRCPATCOMPOSITE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_112__SCANPAT_SRCPATCOMPOSITE.nbval = 0; /*iniobj dsym_113__CLASS_SOURCE_PATTERN_COMPOSITE*/ /*uniqueobj*/ if (! /*_.VALDATA___V205*/ meltfptr[204]) /*_.VALDATA___V205*/ meltfptr[204] = (melt_ptr_t) & 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", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_113__CLASS_SOURCE_PATTERN_COMPOSITE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_113__CLASS_SOURCE_PATTERN_COMPOSITE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_113__CLASS_SOURCE_PATTERN_COMPOSITE.obj_hash = 479810309; cdat->dsym_113__CLASS_SOURCE_PATTERN_COMPOSITE.obj_len = 3; /*inistring dstr_114__CLASS_SOURCE_PAT*/ /*_.VALSTR___V206*/ meltfptr[205] = (melt_ptr_t) & cdat->dstr_114__CLASS_SOURCE_PAT; cdat->dstr_114__CLASS_SOURCE_PAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_114__CLASS_SOURCE_PAT.val, "CLASS_SOURCE_PATTERN_COMPOSITE", sizeof (cdat->dstr_114__CLASS_SOURCE_PAT. val) - 1); cdat->dstr_114__CLASS_SOURCE_PAT.val[30] = (char) 0; cdat->dstr_114__CLASS_SOURCE_PAT.slen = 30; /*iniobj dsym_115__CLASS_ANY_MATCHER*/ /*uniqueobj*/ if (! /*_.VALDATA___V207*/ meltfptr[206]) /*_.VALDATA___V207*/ meltfptr[206] = (melt_ptr_t) & 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 ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_115__CLASS_ANY_MATCHER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_115__CLASS_ANY_MATCHER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_115__CLASS_ANY_MATCHER.obj_hash = 781265508; cdat->dsym_115__CLASS_ANY_MATCHER.obj_len = 3; /*inistring dstr_116__CLASS_ANY_MATCHE*/ /*_.VALSTR___V208*/ meltfptr[207] = (melt_ptr_t) & cdat->dstr_116__CLASS_ANY_MATCHE; cdat->dstr_116__CLASS_ANY_MATCHE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_116__CLASS_ANY_MATCHE.val, "CLASS_ANY_MATCHER", sizeof (cdat->dstr_116__CLASS_ANY_MATCHE. val) - 1); cdat->dstr_116__CLASS_ANY_MATCHE.val[17] = (char) 0; cdat->dstr_116__CLASS_ANY_MATCHE.slen = 17; /*iniobj dsym_117__CLASS_FORMAL_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V209*/ meltfptr[208]) /*_.VALDATA___V209*/ meltfptr[208] = (melt_ptr_t) & 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 ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_117__CLASS_FORMAL_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_117__CLASS_FORMAL_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_117__CLASS_FORMAL_BINDING.obj_hash = 3733780; cdat->dsym_117__CLASS_FORMAL_BINDING.obj_len = 3; /*inistring dstr_118__CLASS_FORMAL_BIN*/ /*_.VALSTR___V210*/ meltfptr[209] = (melt_ptr_t) & cdat->dstr_118__CLASS_FORMAL_BIN; cdat->dstr_118__CLASS_FORMAL_BIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_118__CLASS_FORMAL_BIN.val, "CLASS_FORMAL_BINDING", sizeof (cdat->dstr_118__CLASS_FORMAL_BIN. val) - 1); cdat->dstr_118__CLASS_FORMAL_BIN.val[20] = (char) 0; cdat->dstr_118__CLASS_FORMAL_BIN.slen = 20; /*iniobj dsym_119__NORMALIZE_TUPLE*/ /*uniqueobj*/ if (! /*_.VALDATA___V211*/ meltfptr[210]) /*_.VALDATA___V211*/ meltfptr[210] = (melt_ptr_t) & cdat->dsym_119__NORMALIZE_TUPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_119__NORMALIZE_TUPLE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_119__NORMALIZE_TUPLE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_119__NORMALIZE_TUPLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_119__NORMALIZE_TUPLE.obj_hash = 805824045; cdat->dsym_119__NORMALIZE_TUPLE.obj_len = 3; /*inistring dstr_120__NORMALIZE_TUPLE*/ /*_.VALSTR___V212*/ meltfptr[211] = (melt_ptr_t) & cdat->dstr_120__NORMALIZE_TUPLE; cdat->dstr_120__NORMALIZE_TUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_120__NORMALIZE_TUPLE.val, "NORMALIZE_TUPLE", sizeof (cdat->dstr_120__NORMALIZE_TUPLE.val) - 1); cdat->dstr_120__NORMALIZE_TUPLE.val[15] = (char) 0; cdat->dstr_120__NORMALIZE_TUPLE.slen = 15; /*inirout drout_121__SCANPAT_SRCPATOR */ /*_.VALROUT___V213*/ meltfptr[212] = (melt_ptr_t) & cdat->drout_121__SCANPAT_SRCPATOR; cdat->drout_121__SCANPAT_SRCPATOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_121__SCANPAT_SRCPATOR.routdescr, "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___V215*/ meltfptr[214] = (melt_ptr_t) & cdat->dclo_122__SCANPAT_SRCPATOR; cdat->dclo_122__SCANPAT_SRCPATOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_122__SCANPAT_SRCPATOR.nbval = 0; /*iniobj dsym_123__CLASS_SOURCE_PATTERN_OR*/ /*uniqueobj*/ if (! /*_.VALDATA___V216*/ meltfptr[215]) /*_.VALDATA___V216*/ meltfptr[215] = (melt_ptr_t) & 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", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_123__CLASS_SOURCE_PATTERN_OR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_123__CLASS_SOURCE_PATTERN_OR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_123__CLASS_SOURCE_PATTERN_OR.obj_hash = 982854125; cdat->dsym_123__CLASS_SOURCE_PATTERN_OR.obj_len = 3; /*inistring dstr_124__CLASS_SOURCE_PAT*/ /*_.VALSTR___V217*/ meltfptr[216] = (melt_ptr_t) & cdat->dstr_124__CLASS_SOURCE_PAT; cdat->dstr_124__CLASS_SOURCE_PAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_124__CLASS_SOURCE_PAT.val, "CLASS_SOURCE_PATTERN_OR", sizeof (cdat->dstr_124__CLASS_SOURCE_PAT. val) - 1); cdat->dstr_124__CLASS_SOURCE_PAT.val[23] = (char) 0; cdat->dstr_124__CLASS_SOURCE_PAT.slen = 23; /*iniobj dsym_125__DISCR_MAP_OBJECTS*/ /*uniqueobj*/ if (! /*_.VALDATA___V218*/ meltfptr[217]) /*_.VALDATA___V218*/ meltfptr[217] = (melt_ptr_t) & 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 ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_125__DISCR_MAP_OBJECTS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_125__DISCR_MAP_OBJECTS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_125__DISCR_MAP_OBJECTS.obj_hash = 217147088; cdat->dsym_125__DISCR_MAP_OBJECTS.obj_len = 3; /*inistring dstr_126__DISCR_MAP_OBJECT*/ /*_.VALSTR___V219*/ meltfptr[218] = (melt_ptr_t) & cdat->dstr_126__DISCR_MAP_OBJECT; cdat->dstr_126__DISCR_MAP_OBJECT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_126__DISCR_MAP_OBJECT.val, "DISCR_MAP_OBJECTS", sizeof (cdat->dstr_126__DISCR_MAP_OBJECT. val) - 1); cdat->dstr_126__DISCR_MAP_OBJECT.val[17] = (char) 0; cdat->dstr_126__DISCR_MAP_OBJECT.slen = 17; /*inirout drout_127__LAMBDA_ */ /*_.VALROUT___V214*/ meltfptr[213] = (melt_ptr_t) & cdat->drout_127__LAMBDA_; cdat->drout_127__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_127__LAMBDA_.routdescr, "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___V220*/ meltfptr[219]) /*_.VALDATA___V220*/ meltfptr[219] = (melt_ptr_t) & cdat->dsym_128__CLASS_SYMBOL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_128__CLASS_SYMBOL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_128__CLASS_SYMBOL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_128__CLASS_SYMBOL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_128__CLASS_SYMBOL.obj_hash = 53524182; cdat->dsym_128__CLASS_SYMBOL.obj_len = 3; /*inistring dstr_129__CLASS_SYMBOL*/ /*_.VALSTR___V221*/ meltfptr[220] = (melt_ptr_t) & cdat->dstr_129__CLASS_SYMBOL; cdat->dstr_129__CLASS_SYMBOL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_129__CLASS_SYMBOL.val, "CLASS_SYMBOL", sizeof (cdat->dstr_129__CLASS_SYMBOL.val) - 1); cdat->dstr_129__CLASS_SYMBOL.val[12] = (char) 0; cdat->dstr_129__CLASS_SYMBOL.slen = 12; /*inirout drout_130__SCANPAT_SRCPATAND */ /*_.VALROUT___V222*/ meltfptr[221] = (melt_ptr_t) & cdat->drout_130__SCANPAT_SRCPATAND; cdat->drout_130__SCANPAT_SRCPATAND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_130__SCANPAT_SRCPATAND.routdescr, "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___V223*/ meltfptr[222] = (melt_ptr_t) & cdat->dclo_131__SCANPAT_SRCPATAND; cdat->dclo_131__SCANPAT_SRCPATAND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_131__SCANPAT_SRCPATAND.nbval = 0; /*iniobj dsym_132__CLASS_SOURCE_PATTERN_AND*/ /*uniqueobj*/ if (! /*_.VALDATA___V224*/ meltfptr[223]) /*_.VALDATA___V224*/ meltfptr[223] = (melt_ptr_t) & 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", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_132__CLASS_SOURCE_PATTERN_AND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_132__CLASS_SOURCE_PATTERN_AND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_132__CLASS_SOURCE_PATTERN_AND.obj_hash = 584373249; cdat->dsym_132__CLASS_SOURCE_PATTERN_AND.obj_len = 3; /*inistring dstr_133__CLASS_SOURCE_PAT*/ /*_.VALSTR___V225*/ meltfptr[224] = (melt_ptr_t) & cdat->dstr_133__CLASS_SOURCE_PAT; cdat->dstr_133__CLASS_SOURCE_PAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_133__CLASS_SOURCE_PAT.val, "CLASS_SOURCE_PATTERN_AND", sizeof (cdat->dstr_133__CLASS_SOURCE_PAT. val) - 1); cdat->dstr_133__CLASS_SOURCE_PAT.val[24] = (char) 0; cdat->dstr_133__CLASS_SOURCE_PAT.slen = 24; /*iniobj dsym_134__NORMAL_PATTERN*/ /*uniqueobj*/ if (! /*_.VALDATA___V226*/ meltfptr[225]) /*_.VALDATA___V226*/ meltfptr[225] = (melt_ptr_t) & cdat->dsym_134__NORMAL_PATTERN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_134__NORMAL_PATTERN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_134__NORMAL_PATTERN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_134__NORMAL_PATTERN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_134__NORMAL_PATTERN.obj_hash = 859540740; cdat->dsym_134__NORMAL_PATTERN.obj_len = 3; /*inistring dstr_135__NORMAL_PATTERN*/ /*_.VALSTR___V227*/ meltfptr[226] = (melt_ptr_t) & cdat->dstr_135__NORMAL_PATTERN; cdat->dstr_135__NORMAL_PATTERN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_135__NORMAL_PATTERN.val, "NORMAL_PATTERN", sizeof (cdat->dstr_135__NORMAL_PATTERN.val) - 1); cdat->dstr_135__NORMAL_PATTERN.val[14] = (char) 0; cdat->dstr_135__NORMAL_PATTERN.slen = 14; MELT_LOCATION ("warmelt-normatch.melt:443:/ iniobj"); /*iniobj dobj_136__NORMAL_PATTERN*/ /*_.VALDATA___V228*/ meltfptr[227] = (melt_ptr_t) & cdat->dobj_136__NORMAL_PATTERN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_136__NORMAL_PATTERN", melt_magic_discr ((melt_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7])) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_136__NORMAL_PATTERN", ((meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]))-> 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 = 234556047; cdat->dobj_136__NORMAL_PATTERN.obj_len = 4; /*inistring dstr_137__NORMAL_PATTERN*/ /*_.VALSTR___V229*/ meltfptr[228] = (melt_ptr_t) & cdat->dstr_137__NORMAL_PATTERN; cdat->dstr_137__NORMAL_PATTERN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_137__NORMAL_PATTERN.val, "NORMAL_PATTERN", sizeof (cdat->dstr_137__NORMAL_PATTERN.val) - 1); cdat->dstr_137__NORMAL_PATTERN.val[14] = (char) 0; cdat->dstr_137__NORMAL_PATTERN.slen = 14; /*iniobj dsym_138__CLASS_NORMAL_OR_VARIABLE*/ /*uniqueobj*/ if (! /*_.VALDATA___V230*/ meltfptr[229]) /*_.VALDATA___V230*/ meltfptr[229] = (melt_ptr_t) & 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", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_138__CLASS_NORMAL_OR_VARIABLE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_138__CLASS_NORMAL_OR_VARIABLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_138__CLASS_NORMAL_OR_VARIABLE.obj_hash = 933279954; cdat->dsym_138__CLASS_NORMAL_OR_VARIABLE.obj_len = 3; /*inistring dstr_139__CLASS_NORMAL_OR_*/ /*_.VALSTR___V231*/ meltfptr[230] = (melt_ptr_t) & cdat->dstr_139__CLASS_NORMAL_OR_; cdat->dstr_139__CLASS_NORMAL_OR_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_139__CLASS_NORMAL_OR_.val, "CLASS_NORMAL_OR_VARIABLE", sizeof (cdat->dstr_139__CLASS_NORMAL_OR_. val) - 1); cdat->dstr_139__CLASS_NORMAL_OR_.val[24] = (char) 0; cdat->dstr_139__CLASS_NORMAL_OR_.slen = 24; MELT_LOCATION ("warmelt-normatch.melt:448:/ iniobj"); /*iniobj dobj_140__CLASS_NORMAL_OR_VARIABLE*/ /*_.VALDATA___V232*/ meltfptr[231] = (melt_ptr_t) & cdat->dobj_140__CLASS_NORMAL_OR_VARIABLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_140__CLASS_NORMAL_OR_VARIABLE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_140__CLASS_NORMAL_OR_VARIABLE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_140__CLASS_NORMAL_OR_VARIABLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_140__CLASS_NORMAL_OR_VARIABLE.obj_num = MELTOBMAG_OBJECT; cdat->dobj_140__CLASS_NORMAL_OR_VARIABLE.obj_hash = 979705781; cdat->dobj_140__CLASS_NORMAL_OR_VARIABLE.obj_len = 8; /*inistring dstr_141__CLASS_NORMAL_OR_*/ /*_.VALSTR___V233*/ meltfptr[232] = (melt_ptr_t) & cdat->dstr_141__CLASS_NORMAL_OR_; cdat->dstr_141__CLASS_NORMAL_OR_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_141__CLASS_NORMAL_OR_.val, "CLASS_NORMAL_OR_VARIABLE", sizeof (cdat->dstr_141__CLASS_NORMAL_OR_. val) - 1); cdat->dstr_141__CLASS_NORMAL_OR_.val[24] = (char) 0; cdat->dstr_141__CLASS_NORMAL_OR_.slen = 24; /*inimult dtup_142__CLASS_NORMAL_OR_VARIABLE */ /*_.VALTUP___V234*/ meltfptr[233] = (melt_ptr_t) & cdat->dtup_142__CLASS_NORMAL_OR_VARIABLE; cdat->dtup_142__CLASS_NORMAL_OR_VARIABLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_142__CLASS_NORMAL_OR_VARIABLE.nbval = 1; /*inimult dtup_143__CLASS_NORMAL_OR_VARIABLE */ /*_.VALTUP___V243*/ meltfptr[242] = (melt_ptr_t) & cdat->dtup_143__CLASS_NORMAL_OR_VARIABLE; cdat->dtup_143__CLASS_NORMAL_OR_VARIABLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_143__CLASS_NORMAL_OR_VARIABLE.nbval = 4; /*iniobj dsym_144__NORVAR_NOREXP*/ /*uniqueobj*/ if (! /*_.VALDATA___V244*/ meltfptr[243]) /*_.VALDATA___V244*/ meltfptr[243] = (melt_ptr_t) & cdat->dsym_144__NORVAR_NOREXP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_144__NORVAR_NOREXP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_144__NORVAR_NOREXP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_144__NORVAR_NOREXP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_144__NORVAR_NOREXP.obj_hash = 889287935; cdat->dsym_144__NORVAR_NOREXP.obj_len = 3; /*inistring dstr_145__NORVAR_NOREXP*/ /*_.VALSTR___V245*/ meltfptr[244] = (melt_ptr_t) & cdat->dstr_145__NORVAR_NOREXP; cdat->dstr_145__NORVAR_NOREXP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_145__NORVAR_NOREXP.val, "NORVAR_NOREXP", sizeof (cdat->dstr_145__NORVAR_NOREXP.val) - 1); cdat->dstr_145__NORVAR_NOREXP.val[13] = (char) 0; cdat->dstr_145__NORVAR_NOREXP.slen = 13; /*^iniobj */ /*iniobj dobj_146__NORVAR_NOREXP*/ /*_.VALDATA___V235*/ meltfptr[234] = (melt_ptr_t) & cdat->dobj_146__NORVAR_NOREXP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_146__NORVAR_NOREXP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_146__NORVAR_NOREXP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_146__NORVAR_NOREXP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_146__NORVAR_NOREXP.obj_num = 0; cdat->dobj_146__NORVAR_NOREXP.obj_hash = 1009515381; cdat->dobj_146__NORVAR_NOREXP.obj_len = 4; /*inistring dstr_147__NORVAR_NOREXP*/ /*_.VALSTR___V236*/ meltfptr[235] = (melt_ptr_t) & cdat->dstr_147__NORVAR_NOREXP; cdat->dstr_147__NORVAR_NOREXP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_147__NORVAR_NOREXP.val, "NORVAR_NOREXP", sizeof (cdat->dstr_147__NORVAR_NOREXP.val) - 1); cdat->dstr_147__NORVAR_NOREXP.val[13] = (char) 0; cdat->dstr_147__NORVAR_NOREXP.slen = 13; /*iniobj dsym_148__NORVAR_LOCSYM*/ /*uniqueobj*/ if (! /*_.VALDATA___V246*/ meltfptr[245]) /*_.VALDATA___V246*/ meltfptr[245] = (melt_ptr_t) & cdat->dsym_148__NORVAR_LOCSYM; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_148__NORVAR_LOCSYM", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_148__NORVAR_LOCSYM", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_148__NORVAR_LOCSYM.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_148__NORVAR_LOCSYM.obj_hash = 529790932; cdat->dsym_148__NORVAR_LOCSYM.obj_len = 3; /*inistring dstr_149__NORVAR_LOCSYM*/ /*_.VALSTR___V247*/ meltfptr[246] = (melt_ptr_t) & cdat->dstr_149__NORVAR_LOCSYM; cdat->dstr_149__NORVAR_LOCSYM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_149__NORVAR_LOCSYM.val, "NORVAR_LOCSYM", sizeof (cdat->dstr_149__NORVAR_LOCSYM.val) - 1); cdat->dstr_149__NORVAR_LOCSYM.val[13] = (char) 0; cdat->dstr_149__NORVAR_LOCSYM.slen = 13; /*^iniobj */ /*iniobj dobj_150__NORVAR_LOCSYM*/ /*_.VALDATA___V237*/ meltfptr[236] = (melt_ptr_t) & cdat->dobj_150__NORVAR_LOCSYM; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_150__NORVAR_LOCSYM", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_150__NORVAR_LOCSYM", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_150__NORVAR_LOCSYM.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_150__NORVAR_LOCSYM.obj_num = 1; cdat->dobj_150__NORVAR_LOCSYM.obj_hash = 405072189; cdat->dobj_150__NORVAR_LOCSYM.obj_len = 4; /*inistring dstr_151__NORVAR_LOCSYM*/ /*_.VALSTR___V238*/ meltfptr[237] = (melt_ptr_t) & cdat->dstr_151__NORVAR_LOCSYM; cdat->dstr_151__NORVAR_LOCSYM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_151__NORVAR_LOCSYM.val, "NORVAR_LOCSYM", sizeof (cdat->dstr_151__NORVAR_LOCSYM.val) - 1); cdat->dstr_151__NORVAR_LOCSYM.val[13] = (char) 0; cdat->dstr_151__NORVAR_LOCSYM.slen = 13; /*iniobj dsym_152__NORVAR_PATVAR*/ /*uniqueobj*/ if (! /*_.VALDATA___V248*/ meltfptr[247]) /*_.VALDATA___V248*/ meltfptr[247] = (melt_ptr_t) & cdat->dsym_152__NORVAR_PATVAR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_152__NORVAR_PATVAR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_152__NORVAR_PATVAR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_152__NORVAR_PATVAR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_152__NORVAR_PATVAR.obj_hash = 12680593; cdat->dsym_152__NORVAR_PATVAR.obj_len = 3; /*inistring dstr_153__NORVAR_PATVAR*/ /*_.VALSTR___V249*/ meltfptr[248] = (melt_ptr_t) & cdat->dstr_153__NORVAR_PATVAR; cdat->dstr_153__NORVAR_PATVAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_153__NORVAR_PATVAR.val, "NORVAR_PATVAR", sizeof (cdat->dstr_153__NORVAR_PATVAR.val) - 1); cdat->dstr_153__NORVAR_PATVAR.val[13] = (char) 0; cdat->dstr_153__NORVAR_PATVAR.slen = 13; /*^iniobj */ /*iniobj dobj_154__NORVAR_PATVAR*/ /*_.VALDATA___V239*/ meltfptr[238] = (melt_ptr_t) & cdat->dobj_154__NORVAR_PATVAR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_154__NORVAR_PATVAR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_154__NORVAR_PATVAR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_154__NORVAR_PATVAR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_154__NORVAR_PATVAR.obj_num = 2; cdat->dobj_154__NORVAR_PATVAR.obj_hash = 570051090; cdat->dobj_154__NORVAR_PATVAR.obj_len = 4; /*inistring dstr_155__NORVAR_PATVAR*/ /*_.VALSTR___V240*/ meltfptr[239] = (melt_ptr_t) & cdat->dstr_155__NORVAR_PATVAR; cdat->dstr_155__NORVAR_PATVAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_155__NORVAR_PATVAR.val, "NORVAR_PATVAR", sizeof (cdat->dstr_155__NORVAR_PATVAR.val) - 1); cdat->dstr_155__NORVAR_PATVAR.val[13] = (char) 0; cdat->dstr_155__NORVAR_PATVAR.slen = 13; /*iniobj dsym_156__NORVAR_NREPOR*/ /*uniqueobj*/ if (! /*_.VALDATA___V250*/ meltfptr[249]) /*_.VALDATA___V250*/ meltfptr[249] = (melt_ptr_t) & cdat->dsym_156__NORVAR_NREPOR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_156__NORVAR_NREPOR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_156__NORVAR_NREPOR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_156__NORVAR_NREPOR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_156__NORVAR_NREPOR.obj_hash = 601225903; cdat->dsym_156__NORVAR_NREPOR.obj_len = 3; /*inistring dstr_157__NORVAR_NREPOR*/ /*_.VALSTR___V251*/ meltfptr[250] = (melt_ptr_t) & cdat->dstr_157__NORVAR_NREPOR; cdat->dstr_157__NORVAR_NREPOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_157__NORVAR_NREPOR.val, "NORVAR_NREPOR", sizeof (cdat->dstr_157__NORVAR_NREPOR.val) - 1); cdat->dstr_157__NORVAR_NREPOR.val[13] = (char) 0; cdat->dstr_157__NORVAR_NREPOR.slen = 13; /*^iniobj */ /*iniobj dobj_158__NORVAR_NREPOR*/ /*_.VALDATA___V241*/ meltfptr[240] = (melt_ptr_t) & cdat->dobj_158__NORVAR_NREPOR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_158__NORVAR_NREPOR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_158__NORVAR_NREPOR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_158__NORVAR_NREPOR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_158__NORVAR_NREPOR.obj_num = 3; cdat->dobj_158__NORVAR_NREPOR.obj_hash = 910928650; cdat->dobj_158__NORVAR_NREPOR.obj_len = 4; /*inistring dstr_159__NORVAR_NREPOR*/ /*_.VALSTR___V242*/ meltfptr[241] = (melt_ptr_t) & cdat->dstr_159__NORVAR_NREPOR; cdat->dstr_159__NORVAR_NREPOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_159__NORVAR_NREPOR.val, "NORVAR_NREPOR", sizeof (cdat->dstr_159__NORVAR_NREPOR.val) - 1); cdat->dstr_159__NORVAR_NREPOR.val[13] = (char) 0; cdat->dstr_159__NORVAR_NREPOR.slen = 13; /*iniobj dsym_160__CLASS_NORMTESTER_ANY*/ /*uniqueobj*/ if (! /*_.VALDATA___V252*/ meltfptr[251]) /*_.VALDATA___V252*/ meltfptr[251] = (melt_ptr_t) & 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 ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_160__CLASS_NORMTESTER_ANY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_160__CLASS_NORMTESTER_ANY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_160__CLASS_NORMTESTER_ANY.obj_hash = 734583955; cdat->dsym_160__CLASS_NORMTESTER_ANY.obj_len = 3; /*inistring dstr_161__CLASS_NORMTESTER*/ /*_.VALSTR___V253*/ meltfptr[252] = (melt_ptr_t) & cdat->dstr_161__CLASS_NORMTESTER; cdat->dstr_161__CLASS_NORMTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_161__CLASS_NORMTESTER.val, "CLASS_NORMTESTER_ANY", sizeof (cdat->dstr_161__CLASS_NORMTESTER. val) - 1); cdat->dstr_161__CLASS_NORMTESTER.val[20] = (char) 0; cdat->dstr_161__CLASS_NORMTESTER.slen = 20; /*iniobj dsym_162__CLASS_NREP_EXPRESSION*/ /*uniqueobj*/ if (! /*_.VALDATA___V254*/ meltfptr[253]) /*_.VALDATA___V254*/ meltfptr[253] = (melt_ptr_t) & cdat->dsym_162__CLASS_NREP_EXPRESSION; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_162__CLASS_NREP_EXPRESSION", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_162__CLASS_NREP_EXPRESSION", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_162__CLASS_NREP_EXPRESSION.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_162__CLASS_NREP_EXPRESSION.obj_hash = 413071326; cdat->dsym_162__CLASS_NREP_EXPRESSION.obj_len = 3; /*inistring dstr_163__CLASS_NREP_EXPRE*/ /*_.VALSTR___V255*/ meltfptr[254] = (melt_ptr_t) & cdat->dstr_163__CLASS_NREP_EXPRE; cdat->dstr_163__CLASS_NREP_EXPRE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_163__CLASS_NREP_EXPRE.val, "CLASS_NREP_EXPRESSION", sizeof (cdat->dstr_163__CLASS_NREP_EXPRE. val) - 1); cdat->dstr_163__CLASS_NREP_EXPRE.val[21] = (char) 0; cdat->dstr_163__CLASS_NREP_EXPRE.slen = 21; MELT_LOCATION ("warmelt-normatch.melt:467:/ iniobj"); /*iniobj dobj_164__CLASS_NORMTESTER_ANY*/ /*_.VALDATA___V256*/ meltfptr[255] = (melt_ptr_t) & cdat->dobj_164__CLASS_NORMTESTER_ANY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_164__CLASS_NORMTESTER_ANY", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_164__CLASS_NORMTESTER_ANY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_164__CLASS_NORMTESTER_ANY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_164__CLASS_NORMTESTER_ANY.obj_num = MELTOBMAG_OBJECT; cdat->dobj_164__CLASS_NORMTESTER_ANY.obj_hash = 565823870; cdat->dobj_164__CLASS_NORMTESTER_ANY.obj_len = 8; /*inistring dstr_165__CLASS_NORMTESTER*/ /*_.VALSTR___V257*/ meltfptr[256] = (melt_ptr_t) & cdat->dstr_165__CLASS_NORMTESTER; cdat->dstr_165__CLASS_NORMTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_165__CLASS_NORMTESTER.val, "CLASS_NORMTESTER_ANY", sizeof (cdat->dstr_165__CLASS_NORMTESTER. val) - 1); cdat->dstr_165__CLASS_NORMTESTER.val[20] = (char) 0; cdat->dstr_165__CLASS_NORMTESTER.slen = 20; /*inimult dtup_166__CLASS_NORMTESTER_ANY */ /*_.VALTUP___V258*/ meltfptr[257] = (melt_ptr_t) & cdat->dtup_166__CLASS_NORMTESTER_ANY; cdat->dtup_166__CLASS_NORMTESTER_ANY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_166__CLASS_NORMTESTER_ANY.nbval = 3; /*inimult dtup_167__CLASS_NORMTESTER_ANY */ /*_.VALTUP___V271*/ meltfptr[270] = (melt_ptr_t) & cdat->dtup_167__CLASS_NORMTESTER_ANY; cdat->dtup_167__CLASS_NORMTESTER_ANY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_167__CLASS_NORMTESTER_ANY.nbval = 7; /*iniobj dsym_168__NTEST_MATCHED*/ /*uniqueobj*/ if (! /*_.VALDATA___V272*/ meltfptr[271]) /*_.VALDATA___V272*/ meltfptr[271] = (melt_ptr_t) & cdat->dsym_168__NTEST_MATCHED; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_168__NTEST_MATCHED", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_168__NTEST_MATCHED", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_168__NTEST_MATCHED.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_168__NTEST_MATCHED.obj_hash = 1046799385; cdat->dsym_168__NTEST_MATCHED.obj_len = 3; /*inistring dstr_169__NTEST_MATCHED*/ /*_.VALSTR___V273*/ meltfptr[272] = (melt_ptr_t) & cdat->dstr_169__NTEST_MATCHED; cdat->dstr_169__NTEST_MATCHED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_169__NTEST_MATCHED.val, "NTEST_MATCHED", sizeof (cdat->dstr_169__NTEST_MATCHED.val) - 1); cdat->dstr_169__NTEST_MATCHED.val[13] = (char) 0; cdat->dstr_169__NTEST_MATCHED.slen = 13; /*^iniobj */ /*iniobj dobj_170__NTEST_MATCHED*/ /*_.VALDATA___V259*/ meltfptr[258] = (melt_ptr_t) & cdat->dobj_170__NTEST_MATCHED; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_170__NTEST_MATCHED", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_170__NTEST_MATCHED", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_170__NTEST_MATCHED.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_170__NTEST_MATCHED.obj_num = 1; cdat->dobj_170__NTEST_MATCHED.obj_hash = 671058546; cdat->dobj_170__NTEST_MATCHED.obj_len = 4; /*inistring dstr_171__NTEST_MATCHED*/ /*_.VALSTR___V260*/ meltfptr[259] = (melt_ptr_t) & cdat->dstr_171__NTEST_MATCHED; cdat->dstr_171__NTEST_MATCHED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_171__NTEST_MATCHED.val, "NTEST_MATCHED", sizeof (cdat->dstr_171__NTEST_MATCHED.val) - 1); cdat->dstr_171__NTEST_MATCHED.val[13] = (char) 0; cdat->dstr_171__NTEST_MATCHED.slen = 13; /*iniobj dsym_172__NTEST_THEN*/ /*uniqueobj*/ if (! /*_.VALDATA___V274*/ meltfptr[273]) /*_.VALDATA___V274*/ meltfptr[273] = (melt_ptr_t) & cdat->dsym_172__NTEST_THEN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_172__NTEST_THEN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_172__NTEST_THEN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_172__NTEST_THEN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_172__NTEST_THEN.obj_hash = 328372042; cdat->dsym_172__NTEST_THEN.obj_len = 3; /*inistring dstr_173__NTEST_THEN*/ /*_.VALSTR___V275*/ meltfptr[274] = (melt_ptr_t) & cdat->dstr_173__NTEST_THEN; cdat->dstr_173__NTEST_THEN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_173__NTEST_THEN.val, "NTEST_THEN", sizeof (cdat->dstr_173__NTEST_THEN.val) - 1); cdat->dstr_173__NTEST_THEN.val[10] = (char) 0; cdat->dstr_173__NTEST_THEN.slen = 10; /*^iniobj */ /*iniobj dobj_174__NTEST_THEN*/ /*_.VALDATA___V261*/ meltfptr[260] = (melt_ptr_t) & cdat->dobj_174__NTEST_THEN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_174__NTEST_THEN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_174__NTEST_THEN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_174__NTEST_THEN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_174__NTEST_THEN.obj_num = 2; cdat->dobj_174__NTEST_THEN.obj_hash = 478161227; cdat->dobj_174__NTEST_THEN.obj_len = 4; /*inistring dstr_175__NTEST_THEN*/ /*_.VALSTR___V262*/ meltfptr[261] = (melt_ptr_t) & cdat->dstr_175__NTEST_THEN; cdat->dstr_175__NTEST_THEN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_175__NTEST_THEN.val, "NTEST_THEN", sizeof (cdat->dstr_175__NTEST_THEN.val) - 1); cdat->dstr_175__NTEST_THEN.val[10] = (char) 0; cdat->dstr_175__NTEST_THEN.slen = 10; /*iniobj dsym_176__NTEST_ELSE*/ /*uniqueobj*/ if (! /*_.VALDATA___V276*/ meltfptr[275]) /*_.VALDATA___V276*/ meltfptr[275] = (melt_ptr_t) & cdat->dsym_176__NTEST_ELSE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_176__NTEST_ELSE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_176__NTEST_ELSE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_176__NTEST_ELSE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_176__NTEST_ELSE.obj_hash = 934170059; cdat->dsym_176__NTEST_ELSE.obj_len = 3; /*inistring dstr_177__NTEST_ELSE*/ /*_.VALSTR___V277*/ meltfptr[276] = (melt_ptr_t) & cdat->dstr_177__NTEST_ELSE; cdat->dstr_177__NTEST_ELSE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_177__NTEST_ELSE.val, "NTEST_ELSE", sizeof (cdat->dstr_177__NTEST_ELSE.val) - 1); cdat->dstr_177__NTEST_ELSE.val[10] = (char) 0; cdat->dstr_177__NTEST_ELSE.slen = 10; /*^iniobj */ /*iniobj dobj_178__NTEST_ELSE*/ /*_.VALDATA___V263*/ meltfptr[262] = (melt_ptr_t) & cdat->dobj_178__NTEST_ELSE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_178__NTEST_ELSE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_178__NTEST_ELSE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_178__NTEST_ELSE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_178__NTEST_ELSE.obj_num = 3; cdat->dobj_178__NTEST_ELSE.obj_hash = 440414477; cdat->dobj_178__NTEST_ELSE.obj_len = 4; /*inistring dstr_179__NTEST_ELSE*/ /*_.VALSTR___V264*/ meltfptr[263] = (melt_ptr_t) & cdat->dstr_179__NTEST_ELSE; cdat->dstr_179__NTEST_ELSE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_179__NTEST_ELSE.val, "NTEST_ELSE", sizeof (cdat->dstr_179__NTEST_ELSE.val) - 1); cdat->dstr_179__NTEST_ELSE.val[10] = (char) 0; cdat->dstr_179__NTEST_ELSE.slen = 10; /*iniobj dsym_180__NTEST_NORMATCH*/ /*uniqueobj*/ if (! /*_.VALDATA___V278*/ meltfptr[277]) /*_.VALDATA___V278*/ meltfptr[277] = (melt_ptr_t) & cdat->dsym_180__NTEST_NORMATCH; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_180__NTEST_NORMATCH", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_180__NTEST_NORMATCH", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_180__NTEST_NORMATCH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_180__NTEST_NORMATCH.obj_hash = 404534751; cdat->dsym_180__NTEST_NORMATCH.obj_len = 3; /*inistring dstr_181__NTEST_NORMATCH*/ /*_.VALSTR___V279*/ meltfptr[278] = (melt_ptr_t) & cdat->dstr_181__NTEST_NORMATCH; cdat->dstr_181__NTEST_NORMATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_181__NTEST_NORMATCH.val, "NTEST_NORMATCH", sizeof (cdat->dstr_181__NTEST_NORMATCH.val) - 1); cdat->dstr_181__NTEST_NORMATCH.val[14] = (char) 0; cdat->dstr_181__NTEST_NORMATCH.slen = 14; /*^iniobj */ /*iniobj dobj_182__NTEST_NORMATCH*/ /*_.VALDATA___V265*/ meltfptr[264] = (melt_ptr_t) & cdat->dobj_182__NTEST_NORMATCH; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_182__NTEST_NORMATCH", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_182__NTEST_NORMATCH", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_182__NTEST_NORMATCH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_182__NTEST_NORMATCH.obj_num = 4; cdat->dobj_182__NTEST_NORMATCH.obj_hash = 989604960; cdat->dobj_182__NTEST_NORMATCH.obj_len = 4; /*inistring dstr_183__NTEST_NORMATCH*/ /*_.VALSTR___V266*/ meltfptr[265] = (melt_ptr_t) & cdat->dstr_183__NTEST_NORMATCH; cdat->dstr_183__NTEST_NORMATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_183__NTEST_NORMATCH.val, "NTEST_NORMATCH", sizeof (cdat->dstr_183__NTEST_NORMATCH.val) - 1); cdat->dstr_183__NTEST_NORMATCH.val[14] = (char) 0; cdat->dstr_183__NTEST_NORMATCH.slen = 14; /*iniobj dsym_184__NTEST_LOCCLIST*/ /*uniqueobj*/ if (! /*_.VALDATA___V280*/ meltfptr[279]) /*_.VALDATA___V280*/ meltfptr[279] = (melt_ptr_t) & cdat->dsym_184__NTEST_LOCCLIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_184__NTEST_LOCCLIST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_184__NTEST_LOCCLIST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_184__NTEST_LOCCLIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_184__NTEST_LOCCLIST.obj_hash = 630512439; cdat->dsym_184__NTEST_LOCCLIST.obj_len = 3; /*inistring dstr_185__NTEST_LOCCLIST*/ /*_.VALSTR___V281*/ meltfptr[280] = (melt_ptr_t) & cdat->dstr_185__NTEST_LOCCLIST; cdat->dstr_185__NTEST_LOCCLIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_185__NTEST_LOCCLIST.val, "NTEST_LOCCLIST", sizeof (cdat->dstr_185__NTEST_LOCCLIST.val) - 1); cdat->dstr_185__NTEST_LOCCLIST.val[14] = (char) 0; cdat->dstr_185__NTEST_LOCCLIST.slen = 14; /*^iniobj */ /*iniobj dobj_186__NTEST_LOCCLIST*/ /*_.VALDATA___V267*/ meltfptr[266] = (melt_ptr_t) & cdat->dobj_186__NTEST_LOCCLIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_186__NTEST_LOCCLIST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_186__NTEST_LOCCLIST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_186__NTEST_LOCCLIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_186__NTEST_LOCCLIST.obj_num = 5; cdat->dobj_186__NTEST_LOCCLIST.obj_hash = 917363797; cdat->dobj_186__NTEST_LOCCLIST.obj_len = 4; /*inistring dstr_187__NTEST_LOCCLIST*/ /*_.VALSTR___V268*/ meltfptr[267] = (melt_ptr_t) & cdat->dstr_187__NTEST_LOCCLIST; cdat->dstr_187__NTEST_LOCCLIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_187__NTEST_LOCCLIST.val, "NTEST_LOCCLIST", sizeof (cdat->dstr_187__NTEST_LOCCLIST.val) - 1); cdat->dstr_187__NTEST_LOCCLIST.val[14] = (char) 0; cdat->dstr_187__NTEST_LOCCLIST.slen = 14; /*iniobj dsym_188__NTEST_COMEFROM*/ /*uniqueobj*/ if (! /*_.VALDATA___V282*/ meltfptr[281]) /*_.VALDATA___V282*/ meltfptr[281] = (melt_ptr_t) & cdat->dsym_188__NTEST_COMEFROM; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_188__NTEST_COMEFROM", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_188__NTEST_COMEFROM", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_188__NTEST_COMEFROM.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_188__NTEST_COMEFROM.obj_hash = 731760530; cdat->dsym_188__NTEST_COMEFROM.obj_len = 3; /*inistring dstr_189__NTEST_COMEFROM*/ /*_.VALSTR___V283*/ meltfptr[282] = (melt_ptr_t) & cdat->dstr_189__NTEST_COMEFROM; cdat->dstr_189__NTEST_COMEFROM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_189__NTEST_COMEFROM.val, "NTEST_COMEFROM", sizeof (cdat->dstr_189__NTEST_COMEFROM.val) - 1); cdat->dstr_189__NTEST_COMEFROM.val[14] = (char) 0; cdat->dstr_189__NTEST_COMEFROM.slen = 14; /*^iniobj */ /*iniobj dobj_190__NTEST_COMEFROM*/ /*_.VALDATA___V269*/ meltfptr[268] = (melt_ptr_t) & cdat->dobj_190__NTEST_COMEFROM; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_190__NTEST_COMEFROM", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_190__NTEST_COMEFROM", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_190__NTEST_COMEFROM.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_190__NTEST_COMEFROM.obj_num = 6; cdat->dobj_190__NTEST_COMEFROM.obj_hash = 241241076; cdat->dobj_190__NTEST_COMEFROM.obj_len = 4; /*inistring dstr_191__NTEST_COMEFROM*/ /*_.VALSTR___V270*/ meltfptr[269] = (melt_ptr_t) & cdat->dstr_191__NTEST_COMEFROM; cdat->dstr_191__NTEST_COMEFROM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_191__NTEST_COMEFROM.val, "NTEST_COMEFROM", sizeof (cdat->dstr_191__NTEST_COMEFROM.val) - 1); cdat->dstr_191__NTEST_COMEFROM.val[14] = (char) 0; cdat->dstr_191__NTEST_COMEFROM.slen = 14; /*iniobj dsym_192__CLASS_NORMTESTER_SUCCESS*/ /*uniqueobj*/ if (! /*_.VALDATA___V284*/ meltfptr[283]) /*_.VALDATA___V284*/ meltfptr[283] = (melt_ptr_t) & cdat->dsym_192__CLASS_NORMTESTER_SUCCESS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_192__CLASS_NORMTESTER_SUCCESS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_192__CLASS_NORMTESTER_SUCCESS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_192__CLASS_NORMTESTER_SUCCESS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_192__CLASS_NORMTESTER_SUCCESS.obj_hash = 1047093940; cdat->dsym_192__CLASS_NORMTESTER_SUCCESS.obj_len = 3; /*inistring dstr_193__CLASS_NORMTESTER*/ /*_.VALSTR___V285*/ meltfptr[284] = (melt_ptr_t) & cdat->dstr_193__CLASS_NORMTESTER; cdat->dstr_193__CLASS_NORMTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_193__CLASS_NORMTESTER.val, "CLASS_NORMTESTER_SUCCESS", sizeof (cdat->dstr_193__CLASS_NORMTESTER. val) - 1); cdat->dstr_193__CLASS_NORMTESTER.val[24] = (char) 0; cdat->dstr_193__CLASS_NORMTESTER.slen = 24; MELT_LOCATION ("warmelt-normatch.melt:482:/ iniobj"); /*iniobj dobj_194__CLASS_NORMTESTER_SUCCESS*/ /*_.VALDATA___V286*/ meltfptr[285] = (melt_ptr_t) & cdat->dobj_194__CLASS_NORMTESTER_SUCCESS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_194__CLASS_NORMTESTER_SUCCESS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_194__CLASS_NORMTESTER_SUCCESS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_194__CLASS_NORMTESTER_SUCCESS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_194__CLASS_NORMTESTER_SUCCESS.obj_num = MELTOBMAG_OBJECT; cdat->dobj_194__CLASS_NORMTESTER_SUCCESS.obj_hash = 412956338; cdat->dobj_194__CLASS_NORMTESTER_SUCCESS.obj_len = 8; /*inistring dstr_195__CLASS_NORMTESTER*/ /*_.VALSTR___V287*/ meltfptr[286] = (melt_ptr_t) & cdat->dstr_195__CLASS_NORMTESTER; cdat->dstr_195__CLASS_NORMTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_195__CLASS_NORMTESTER.val, "CLASS_NORMTESTER_SUCCESS", sizeof (cdat->dstr_195__CLASS_NORMTESTER. val) - 1); cdat->dstr_195__CLASS_NORMTESTER.val[24] = (char) 0; cdat->dstr_195__CLASS_NORMTESTER.slen = 24; /*inimult dtup_196__CLASS_NORMTESTER_SUCCESS */ /*_.VALTUP___V288*/ meltfptr[287] = (melt_ptr_t) & cdat->dtup_196__CLASS_NORMTESTER_SUCCESS; cdat->dtup_196__CLASS_NORMTESTER_SUCCESS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_196__CLASS_NORMTESTER_SUCCESS.nbval = 4; /*inimult dtup_197__CLASS_NORMTESTER_SUCCESS */ /*_.VALTUP___V291*/ meltfptr[290] = (melt_ptr_t) & cdat->dtup_197__CLASS_NORMTESTER_SUCCESS; cdat->dtup_197__CLASS_NORMTESTER_SUCCESS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_197__CLASS_NORMTESTER_SUCCESS.nbval = 8; /*iniobj dsym_198__NTSUCCESS_DO*/ /*uniqueobj*/ if (! /*_.VALDATA___V292*/ meltfptr[291]) /*_.VALDATA___V292*/ meltfptr[291] = (melt_ptr_t) & cdat->dsym_198__NTSUCCESS_DO; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_198__NTSUCCESS_DO", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_198__NTSUCCESS_DO", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_198__NTSUCCESS_DO.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_198__NTSUCCESS_DO.obj_hash = 22391871; cdat->dsym_198__NTSUCCESS_DO.obj_len = 3; /*inistring dstr_199__NTSUCCESS_DO*/ /*_.VALSTR___V293*/ meltfptr[292] = (melt_ptr_t) & cdat->dstr_199__NTSUCCESS_DO; cdat->dstr_199__NTSUCCESS_DO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_199__NTSUCCESS_DO.val, "NTSUCCESS_DO", sizeof (cdat->dstr_199__NTSUCCESS_DO.val) - 1); cdat->dstr_199__NTSUCCESS_DO.val[12] = (char) 0; cdat->dstr_199__NTSUCCESS_DO.slen = 12; /*^iniobj */ /*iniobj dobj_200__NTSUCCESS_DO*/ /*_.VALDATA___V289*/ meltfptr[288] = (melt_ptr_t) & cdat->dobj_200__NTSUCCESS_DO; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_200__NTSUCCESS_DO", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_200__NTSUCCESS_DO", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_200__NTSUCCESS_DO.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_200__NTSUCCESS_DO.obj_num = 7; cdat->dobj_200__NTSUCCESS_DO.obj_hash = 463023549; cdat->dobj_200__NTSUCCESS_DO.obj_len = 4; /*inistring dstr_201__NTSUCCESS_DO*/ /*_.VALSTR___V290*/ meltfptr[289] = (melt_ptr_t) & cdat->dstr_201__NTSUCCESS_DO; cdat->dstr_201__NTSUCCESS_DO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_201__NTSUCCESS_DO.val, "NTSUCCESS_DO", sizeof (cdat->dstr_201__NTSUCCESS_DO.val) - 1); cdat->dstr_201__NTSUCCESS_DO.val[12] = (char) 0; cdat->dstr_201__NTSUCCESS_DO.slen = 12; /*iniobj dsym_202__CLASS_NORMTESTER_OR_CLEAR*/ /*uniqueobj*/ if (! /*_.VALDATA___V294*/ meltfptr[293]) /*_.VALDATA___V294*/ meltfptr[293] = (melt_ptr_t) & 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", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_202__CLASS_NORMTESTER_OR_CLEAR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_202__CLASS_NORMTESTER_OR_CLEAR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_202__CLASS_NORMTESTER_OR_CLEAR.obj_hash = 938184631; cdat->dsym_202__CLASS_NORMTESTER_OR_CLEAR.obj_len = 3; /*inistring dstr_203__CLASS_NORMTESTER*/ /*_.VALSTR___V295*/ meltfptr[294] = (melt_ptr_t) & cdat->dstr_203__CLASS_NORMTESTER; cdat->dstr_203__CLASS_NORMTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_203__CLASS_NORMTESTER.val, "CLASS_NORMTESTER_OR_CLEAR", sizeof (cdat->dstr_203__CLASS_NORMTESTER. val) - 1); cdat->dstr_203__CLASS_NORMTESTER.val[25] = (char) 0; cdat->dstr_203__CLASS_NORMTESTER.slen = 25; MELT_LOCATION ("warmelt-normatch.melt:488:/ iniobj"); /*iniobj dobj_204__CLASS_NORMTESTER_OR_CLEAR*/ /*_.VALDATA___V296*/ meltfptr[295] = (melt_ptr_t) & cdat->dobj_204__CLASS_NORMTESTER_OR_CLEAR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_204__CLASS_NORMTESTER_OR_CLEAR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_204__CLASS_NORMTESTER_OR_CLEAR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_204__CLASS_NORMTESTER_OR_CLEAR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_204__CLASS_NORMTESTER_OR_CLEAR.obj_num = MELTOBMAG_OBJECT; cdat->dobj_204__CLASS_NORMTESTER_OR_CLEAR.obj_hash = 317896435; cdat->dobj_204__CLASS_NORMTESTER_OR_CLEAR.obj_len = 8; /*inistring dstr_205__CLASS_NORMTESTER*/ /*_.VALSTR___V297*/ meltfptr[296] = (melt_ptr_t) & cdat->dstr_205__CLASS_NORMTESTER; cdat->dstr_205__CLASS_NORMTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_205__CLASS_NORMTESTER.val, "CLASS_NORMTESTER_OR_CLEAR", sizeof (cdat->dstr_205__CLASS_NORMTESTER. val) - 1); cdat->dstr_205__CLASS_NORMTESTER.val[25] = (char) 0; cdat->dstr_205__CLASS_NORMTESTER.slen = 25; /*inimult dtup_206__CLASS_NORMTESTER_OR_CLEAR */ /*_.VALTUP___V298*/ meltfptr[297] = (melt_ptr_t) & cdat->dtup_206__CLASS_NORMTESTER_OR_CLEAR; cdat->dtup_206__CLASS_NORMTESTER_OR_CLEAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_206__CLASS_NORMTESTER_OR_CLEAR.nbval = 4; /*inimult dtup_207__CLASS_NORMTESTER_OR_CLEAR */ /*_.VALTUP___V301*/ meltfptr[300] = (melt_ptr_t) & cdat->dtup_207__CLASS_NORMTESTER_OR_CLEAR; cdat->dtup_207__CLASS_NORMTESTER_OR_CLEAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_207__CLASS_NORMTESTER_OR_CLEAR.nbval = 8; /*iniobj dsym_208__NTORCLEAR_LOCSYM*/ /*uniqueobj*/ if (! /*_.VALDATA___V302*/ meltfptr[301]) /*_.VALDATA___V302*/ meltfptr[301] = (melt_ptr_t) & cdat->dsym_208__NTORCLEAR_LOCSYM; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_208__NTORCLEAR_LOCSYM", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_208__NTORCLEAR_LOCSYM", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_208__NTORCLEAR_LOCSYM.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_208__NTORCLEAR_LOCSYM.obj_hash = 310592215; cdat->dsym_208__NTORCLEAR_LOCSYM.obj_len = 3; /*inistring dstr_209__NTORCLEAR_LOCSYM*/ /*_.VALSTR___V303*/ meltfptr[302] = (melt_ptr_t) & cdat->dstr_209__NTORCLEAR_LOCSYM; cdat->dstr_209__NTORCLEAR_LOCSYM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_209__NTORCLEAR_LOCSYM.val, "NTORCLEAR_LOCSYM", sizeof (cdat->dstr_209__NTORCLEAR_LOCSYM. val) - 1); cdat->dstr_209__NTORCLEAR_LOCSYM.val[16] = (char) 0; cdat->dstr_209__NTORCLEAR_LOCSYM.slen = 16; /*^iniobj */ /*iniobj dobj_210__NTORCLEAR_LOCSYM*/ /*_.VALDATA___V299*/ meltfptr[298] = (melt_ptr_t) & cdat->dobj_210__NTORCLEAR_LOCSYM; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_210__NTORCLEAR_LOCSYM", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_210__NTORCLEAR_LOCSYM", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_210__NTORCLEAR_LOCSYM.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_210__NTORCLEAR_LOCSYM.obj_num = 7; cdat->dobj_210__NTORCLEAR_LOCSYM.obj_hash = 751342679; cdat->dobj_210__NTORCLEAR_LOCSYM.obj_len = 4; /*inistring dstr_211__NTORCLEAR_LOCSYM*/ /*_.VALSTR___V300*/ meltfptr[299] = (melt_ptr_t) & cdat->dstr_211__NTORCLEAR_LOCSYM; cdat->dstr_211__NTORCLEAR_LOCSYM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_211__NTORCLEAR_LOCSYM.val, "NTORCLEAR_LOCSYM", sizeof (cdat->dstr_211__NTORCLEAR_LOCSYM. val) - 1); cdat->dstr_211__NTORCLEAR_LOCSYM.val[16] = (char) 0; cdat->dstr_211__NTORCLEAR_LOCSYM.slen = 16; /*iniobj dsym_212__CLASS_NORMTESTER_OR_INITIAL_CLEAR*/ /*uniqueobj*/ if (! /*_.VALDATA___V304*/ meltfptr[303]) /*_.VALDATA___V304*/ meltfptr[303] = (melt_ptr_t) & cdat->dsym_212__CLASS_NORMTESTER_OR_INITIAL_CLEAR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_212__CLASS_NORMTESTER_OR_INITIAL_CLEAR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_212__CLASS_NORMTESTER_OR_INITIAL_CLEAR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_212__CLASS_NORMTESTER_OR_INITIAL_CLEAR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_212__CLASS_NORMTESTER_OR_INITIAL_CLEAR.obj_hash = 610510497; cdat->dsym_212__CLASS_NORMTESTER_OR_INITIAL_CLEAR.obj_len = 3; /*inistring dstr_213__CLASS_NORMTESTER*/ /*_.VALSTR___V305*/ meltfptr[304] = (melt_ptr_t) & cdat->dstr_213__CLASS_NORMTESTER; cdat->dstr_213__CLASS_NORMTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_213__CLASS_NORMTESTER.val, "CLASS_NORMTESTER_OR_INITIAL_CLEAR", sizeof (cdat->dstr_213__CLASS_NORMTESTER. val) - 1); cdat->dstr_213__CLASS_NORMTESTER.val[33] = (char) 0; cdat->dstr_213__CLASS_NORMTESTER.slen = 33; MELT_LOCATION ("warmelt-normatch.melt:494:/ iniobj"); /*iniobj dobj_214__CLASS_NORMTESTER_OR_INITIAL_CLEAR*/ /*_.VALDATA___V306*/ meltfptr[305] = (melt_ptr_t) & cdat->dobj_214__CLASS_NORMTESTER_OR_INITIAL_CLEAR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_214__CLASS_NORMTESTER_OR_INITIAL_CLEAR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_214__CLASS_NORMTESTER_OR_INITIAL_CLEAR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_214__CLASS_NORMTESTER_OR_INITIAL_CLEAR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (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 = 944676892; cdat->dobj_214__CLASS_NORMTESTER_OR_INITIAL_CLEAR.obj_len = 8; /*inistring dstr_215__CLASS_NORMTESTER*/ /*_.VALSTR___V307*/ meltfptr[306] = (melt_ptr_t) & cdat->dstr_215__CLASS_NORMTESTER; cdat->dstr_215__CLASS_NORMTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_215__CLASS_NORMTESTER.val, "CLASS_NORMTESTER_OR_INITIAL_CLEAR", sizeof (cdat->dstr_215__CLASS_NORMTESTER. val) - 1); cdat->dstr_215__CLASS_NORMTESTER.val[33] = (char) 0; cdat->dstr_215__CLASS_NORMTESTER.slen = 33; /*inimult dtup_216__CLASS_NORMTESTER_OR_INITIAL_CLEAR */ /*_.VALTUP___V308*/ meltfptr[307] = (melt_ptr_t) & cdat->dtup_216__CLASS_NORMTESTER_OR_INITIAL_CLEAR; cdat->dtup_216__CLASS_NORMTESTER_OR_INITIAL_CLEAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_216__CLASS_NORMTESTER_OR_INITIAL_CLEAR.nbval = 5; /*inimult dtup_217__CLASS_NORMTESTER_OR_INITIAL_CLEAR */ /*_.VALTUP___V309*/ meltfptr[308] = (melt_ptr_t) & cdat->dtup_217__CLASS_NORMTESTER_OR_INITIAL_CLEAR; cdat->dtup_217__CLASS_NORMTESTER_OR_INITIAL_CLEAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (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___V310*/ meltfptr[309]) /*_.VALDATA___V310*/ meltfptr[309] = (melt_ptr_t) & 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", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_218__CLASS_NORMTESTER_OR_TRANSMIT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_218__CLASS_NORMTESTER_OR_TRANSMIT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_218__CLASS_NORMTESTER_OR_TRANSMIT.obj_hash = 832170664; cdat->dsym_218__CLASS_NORMTESTER_OR_TRANSMIT.obj_len = 3; /*inistring dstr_219__CLASS_NORMTESTER*/ /*_.VALSTR___V311*/ meltfptr[310] = (melt_ptr_t) & cdat->dstr_219__CLASS_NORMTESTER; cdat->dstr_219__CLASS_NORMTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_219__CLASS_NORMTESTER.val, "CLASS_NORMTESTER_OR_TRANSMIT", sizeof (cdat->dstr_219__CLASS_NORMTESTER. val) - 1); cdat->dstr_219__CLASS_NORMTESTER.val[28] = (char) 0; cdat->dstr_219__CLASS_NORMTESTER.slen = 28; MELT_LOCATION ("warmelt-normatch.melt:500:/ iniobj"); /*iniobj dobj_220__CLASS_NORMTESTER_OR_TRANSMIT*/ /*_.VALDATA___V312*/ meltfptr[311] = (melt_ptr_t) & cdat->dobj_220__CLASS_NORMTESTER_OR_TRANSMIT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_220__CLASS_NORMTESTER_OR_TRANSMIT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_220__CLASS_NORMTESTER_OR_TRANSMIT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_220__CLASS_NORMTESTER_OR_TRANSMIT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_220__CLASS_NORMTESTER_OR_TRANSMIT.obj_num = MELTOBMAG_OBJECT; cdat->dobj_220__CLASS_NORMTESTER_OR_TRANSMIT.obj_hash = 771197012; cdat->dobj_220__CLASS_NORMTESTER_OR_TRANSMIT.obj_len = 8; /*inistring dstr_221__CLASS_NORMTESTER*/ /*_.VALSTR___V313*/ meltfptr[312] = (melt_ptr_t) & cdat->dstr_221__CLASS_NORMTESTER; cdat->dstr_221__CLASS_NORMTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_221__CLASS_NORMTESTER.val, "CLASS_NORMTESTER_OR_TRANSMIT", sizeof (cdat->dstr_221__CLASS_NORMTESTER. val) - 1); cdat->dstr_221__CLASS_NORMTESTER.val[28] = (char) 0; cdat->dstr_221__CLASS_NORMTESTER.slen = 28; /*inimult dtup_222__CLASS_NORMTESTER_OR_TRANSMIT */ /*_.VALTUP___V314*/ meltfptr[313] = (melt_ptr_t) & cdat->dtup_222__CLASS_NORMTESTER_OR_TRANSMIT; cdat->dtup_222__CLASS_NORMTESTER_OR_TRANSMIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_222__CLASS_NORMTESTER_OR_TRANSMIT.nbval = 4; /*inimult dtup_223__CLASS_NORMTESTER_OR_TRANSMIT */ /*_.VALTUP___V319*/ meltfptr[318] = (melt_ptr_t) & cdat->dtup_223__CLASS_NORMTESTER_OR_TRANSMIT; cdat->dtup_223__CLASS_NORMTESTER_OR_TRANSMIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_223__CLASS_NORMTESTER_OR_TRANSMIT.nbval = 9; /*iniobj dsym_224__NTORTRANSMIT_DST*/ /*uniqueobj*/ if (! /*_.VALDATA___V320*/ meltfptr[319]) /*_.VALDATA___V320*/ meltfptr[319] = (melt_ptr_t) & cdat->dsym_224__NTORTRANSMIT_DST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_224__NTORTRANSMIT_DST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_224__NTORTRANSMIT_DST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_224__NTORTRANSMIT_DST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_224__NTORTRANSMIT_DST.obj_hash = 925102393; cdat->dsym_224__NTORTRANSMIT_DST.obj_len = 3; /*inistring dstr_225__NTORTRANSMIT_DST*/ /*_.VALSTR___V321*/ meltfptr[320] = (melt_ptr_t) & cdat->dstr_225__NTORTRANSMIT_DST; cdat->dstr_225__NTORTRANSMIT_DST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_225__NTORTRANSMIT_DST.val, "NTORTRANSMIT_DST", sizeof (cdat->dstr_225__NTORTRANSMIT_DST. val) - 1); cdat->dstr_225__NTORTRANSMIT_DST.val[16] = (char) 0; cdat->dstr_225__NTORTRANSMIT_DST.slen = 16; /*^iniobj */ /*iniobj dobj_226__NTORTRANSMIT_DST*/ /*_.VALDATA___V315*/ meltfptr[314] = (melt_ptr_t) & cdat->dobj_226__NTORTRANSMIT_DST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_226__NTORTRANSMIT_DST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_226__NTORTRANSMIT_DST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_226__NTORTRANSMIT_DST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_226__NTORTRANSMIT_DST.obj_num = 7; cdat->dobj_226__NTORTRANSMIT_DST.obj_hash = 582278696; cdat->dobj_226__NTORTRANSMIT_DST.obj_len = 4; /*inistring dstr_227__NTORTRANSMIT_DST*/ /*_.VALSTR___V316*/ meltfptr[315] = (melt_ptr_t) & cdat->dstr_227__NTORTRANSMIT_DST; cdat->dstr_227__NTORTRANSMIT_DST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_227__NTORTRANSMIT_DST.val, "NTORTRANSMIT_DST", sizeof (cdat->dstr_227__NTORTRANSMIT_DST. val) - 1); cdat->dstr_227__NTORTRANSMIT_DST.val[16] = (char) 0; cdat->dstr_227__NTORTRANSMIT_DST.slen = 16; /*iniobj dsym_228__NTORTRANSMIT_SRC*/ /*uniqueobj*/ if (! /*_.VALDATA___V322*/ meltfptr[321]) /*_.VALDATA___V322*/ meltfptr[321] = (melt_ptr_t) & cdat->dsym_228__NTORTRANSMIT_SRC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_228__NTORTRANSMIT_SRC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_228__NTORTRANSMIT_SRC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_228__NTORTRANSMIT_SRC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_228__NTORTRANSMIT_SRC.obj_hash = 987201459; cdat->dsym_228__NTORTRANSMIT_SRC.obj_len = 3; /*inistring dstr_229__NTORTRANSMIT_SRC*/ /*_.VALSTR___V323*/ meltfptr[322] = (melt_ptr_t) & cdat->dstr_229__NTORTRANSMIT_SRC; cdat->dstr_229__NTORTRANSMIT_SRC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_229__NTORTRANSMIT_SRC.val, "NTORTRANSMIT_SRC", sizeof (cdat->dstr_229__NTORTRANSMIT_SRC. val) - 1); cdat->dstr_229__NTORTRANSMIT_SRC.val[16] = (char) 0; cdat->dstr_229__NTORTRANSMIT_SRC.slen = 16; /*^iniobj */ /*iniobj dobj_230__NTORTRANSMIT_SRC*/ /*_.VALDATA___V317*/ meltfptr[316] = (melt_ptr_t) & cdat->dobj_230__NTORTRANSMIT_SRC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_230__NTORTRANSMIT_SRC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_230__NTORTRANSMIT_SRC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_230__NTORTRANSMIT_SRC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_230__NTORTRANSMIT_SRC.obj_num = 8; cdat->dobj_230__NTORTRANSMIT_SRC.obj_hash = 730779827; cdat->dobj_230__NTORTRANSMIT_SRC.obj_len = 4; /*inistring dstr_231__NTORTRANSMIT_SRC*/ /*_.VALSTR___V318*/ meltfptr[317] = (melt_ptr_t) & cdat->dstr_231__NTORTRANSMIT_SRC; cdat->dstr_231__NTORTRANSMIT_SRC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_231__NTORTRANSMIT_SRC.val, "NTORTRANSMIT_SRC", sizeof (cdat->dstr_231__NTORTRANSMIT_SRC. val) - 1); cdat->dstr_231__NTORTRANSMIT_SRC.val[16] = (char) 0; cdat->dstr_231__NTORTRANSMIT_SRC.slen = 16; /*iniobj dsym_232__CLASS_NORMTESTER_ANYTESTER*/ /*uniqueobj*/ if (! /*_.VALDATA___V324*/ meltfptr[323]) /*_.VALDATA___V324*/ meltfptr[323] = (melt_ptr_t) & cdat->dsym_232__CLASS_NORMTESTER_ANYTESTER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_232__CLASS_NORMTESTER_ANYTESTER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_232__CLASS_NORMTESTER_ANYTESTER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_232__CLASS_NORMTESTER_ANYTESTER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_232__CLASS_NORMTESTER_ANYTESTER.obj_hash = 827354043; cdat->dsym_232__CLASS_NORMTESTER_ANYTESTER.obj_len = 3; /*inistring dstr_233__CLASS_NORMTESTER*/ /*_.VALSTR___V325*/ meltfptr[324] = (melt_ptr_t) & cdat->dstr_233__CLASS_NORMTESTER; cdat->dstr_233__CLASS_NORMTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_233__CLASS_NORMTESTER.val, "CLASS_NORMTESTER_ANYTESTER", sizeof (cdat->dstr_233__CLASS_NORMTESTER. val) - 1); cdat->dstr_233__CLASS_NORMTESTER.val[26] = (char) 0; cdat->dstr_233__CLASS_NORMTESTER.slen = 26; MELT_LOCATION ("warmelt-normatch.melt:508:/ iniobj"); /*iniobj dobj_234__CLASS_NORMTESTER_ANYTESTER*/ /*_.VALDATA___V326*/ meltfptr[325] = (melt_ptr_t) & cdat->dobj_234__CLASS_NORMTESTER_ANYTESTER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_234__CLASS_NORMTESTER_ANYTESTER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_234__CLASS_NORMTESTER_ANYTESTER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_234__CLASS_NORMTESTER_ANYTESTER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_234__CLASS_NORMTESTER_ANYTESTER.obj_num = MELTOBMAG_OBJECT; cdat->dobj_234__CLASS_NORMTESTER_ANYTESTER.obj_hash = 1073307511; cdat->dobj_234__CLASS_NORMTESTER_ANYTESTER.obj_len = 8; /*inistring dstr_235__CLASS_NORMTESTER*/ /*_.VALSTR___V327*/ meltfptr[326] = (melt_ptr_t) & cdat->dstr_235__CLASS_NORMTESTER; cdat->dstr_235__CLASS_NORMTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_235__CLASS_NORMTESTER.val, "CLASS_NORMTESTER_ANYTESTER", sizeof (cdat->dstr_235__CLASS_NORMTESTER. val) - 1); cdat->dstr_235__CLASS_NORMTESTER.val[26] = (char) 0; cdat->dstr_235__CLASS_NORMTESTER.slen = 26; /*inimult dtup_236__CLASS_NORMTESTER_ANYTESTER */ /*_.VALTUP___V328*/ meltfptr[327] = (melt_ptr_t) & cdat->dtup_236__CLASS_NORMTESTER_ANYTESTER; cdat->dtup_236__CLASS_NORMTESTER_ANYTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_236__CLASS_NORMTESTER_ANYTESTER.nbval = 4; /*inimult dtup_237__CLASS_NORMTESTER_ANYTESTER */ /*_.VALTUP___V329*/ meltfptr[328] = (melt_ptr_t) & cdat->dtup_237__CLASS_NORMTESTER_ANYTESTER; cdat->dtup_237__CLASS_NORMTESTER_ANYTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_237__CLASS_NORMTESTER_ANYTESTER.nbval = 7; /*iniobj dsym_238__CLASS_NORMTESTER_DISJUNCTION*/ /*uniqueobj*/ if (! /*_.VALDATA___V330*/ meltfptr[329]) /*_.VALDATA___V330*/ meltfptr[329] = (melt_ptr_t) & cdat->dsym_238__CLASS_NORMTESTER_DISJUNCTION; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_238__CLASS_NORMTESTER_DISJUNCTION", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_238__CLASS_NORMTESTER_DISJUNCTION", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_238__CLASS_NORMTESTER_DISJUNCTION.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_238__CLASS_NORMTESTER_DISJUNCTION.obj_hash = 310373634; cdat->dsym_238__CLASS_NORMTESTER_DISJUNCTION.obj_len = 3; /*inistring dstr_239__CLASS_NORMTESTER*/ /*_.VALSTR___V331*/ meltfptr[330] = (melt_ptr_t) & cdat->dstr_239__CLASS_NORMTESTER; cdat->dstr_239__CLASS_NORMTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_239__CLASS_NORMTESTER.val, "CLASS_NORMTESTER_DISJUNCTION", sizeof (cdat->dstr_239__CLASS_NORMTESTER. val) - 1); cdat->dstr_239__CLASS_NORMTESTER.val[28] = (char) 0; cdat->dstr_239__CLASS_NORMTESTER.slen = 28; MELT_LOCATION ("warmelt-normatch.melt:516:/ iniobj"); /*iniobj dobj_240__CLASS_NORMTESTER_DISJUNCTION*/ /*_.VALDATA___V332*/ meltfptr[331] = (melt_ptr_t) & cdat->dobj_240__CLASS_NORMTESTER_DISJUNCTION; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_240__CLASS_NORMTESTER_DISJUNCTION", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_240__CLASS_NORMTESTER_DISJUNCTION", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_240__CLASS_NORMTESTER_DISJUNCTION.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_240__CLASS_NORMTESTER_DISJUNCTION.obj_num = MELTOBMAG_OBJECT; cdat->dobj_240__CLASS_NORMTESTER_DISJUNCTION.obj_hash = 848292933; cdat->dobj_240__CLASS_NORMTESTER_DISJUNCTION.obj_len = 8; /*inistring dstr_241__CLASS_NORMTESTER*/ /*_.VALSTR___V333*/ meltfptr[332] = (melt_ptr_t) & cdat->dstr_241__CLASS_NORMTESTER; cdat->dstr_241__CLASS_NORMTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_241__CLASS_NORMTESTER.val, "CLASS_NORMTESTER_DISJUNCTION", sizeof (cdat->dstr_241__CLASS_NORMTESTER. val) - 1); cdat->dstr_241__CLASS_NORMTESTER.val[28] = (char) 0; cdat->dstr_241__CLASS_NORMTESTER.slen = 28; /*inimult dtup_242__CLASS_NORMTESTER_DISJUNCTION */ /*_.VALTUP___V334*/ meltfptr[333] = (melt_ptr_t) & cdat->dtup_242__CLASS_NORMTESTER_DISJUNCTION; cdat->dtup_242__CLASS_NORMTESTER_DISJUNCTION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_242__CLASS_NORMTESTER_DISJUNCTION.nbval = 5; /*inimult dtup_243__CLASS_NORMTESTER_DISJUNCTION */ /*_.VALTUP___V341*/ meltfptr[340] = (melt_ptr_t) & cdat->dtup_243__CLASS_NORMTESTER_DISJUNCTION; cdat->dtup_243__CLASS_NORMTESTER_DISJUNCTION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_243__CLASS_NORMTESTER_DISJUNCTION.nbval = 10; /*iniobj dsym_244__NTDISJUNCTS*/ /*uniqueobj*/ if (! /*_.VALDATA___V342*/ meltfptr[341]) /*_.VALDATA___V342*/ meltfptr[341] = (melt_ptr_t) & cdat->dsym_244__NTDISJUNCTS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_244__NTDISJUNCTS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_244__NTDISJUNCTS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_244__NTDISJUNCTS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_244__NTDISJUNCTS.obj_hash = 449172471; cdat->dsym_244__NTDISJUNCTS.obj_len = 3; /*inistring dstr_245__NTDISJUNCTS*/ /*_.VALSTR___V343*/ meltfptr[342] = (melt_ptr_t) & cdat->dstr_245__NTDISJUNCTS; cdat->dstr_245__NTDISJUNCTS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_245__NTDISJUNCTS.val, "NTDISJUNCTS", sizeof (cdat->dstr_245__NTDISJUNCTS.val) - 1); cdat->dstr_245__NTDISJUNCTS.val[11] = (char) 0; cdat->dstr_245__NTDISJUNCTS.slen = 11; /*^iniobj */ /*iniobj dobj_246__NTDISJUNCTS*/ /*_.VALDATA___V335*/ meltfptr[334] = (melt_ptr_t) & cdat->dobj_246__NTDISJUNCTS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_246__NTDISJUNCTS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_246__NTDISJUNCTS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_246__NTDISJUNCTS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_246__NTDISJUNCTS.obj_num = 7; cdat->dobj_246__NTDISJUNCTS.obj_hash = 409497518; cdat->dobj_246__NTDISJUNCTS.obj_len = 4; /*inistring dstr_247__NTDISJUNCTS*/ /*_.VALSTR___V336*/ meltfptr[335] = (melt_ptr_t) & cdat->dstr_247__NTDISJUNCTS; cdat->dstr_247__NTDISJUNCTS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_247__NTDISJUNCTS.val, "NTDISJUNCTS", sizeof (cdat->dstr_247__NTDISJUNCTS.val) - 1); cdat->dstr_247__NTDISJUNCTS.val[11] = (char) 0; cdat->dstr_247__NTDISJUNCTS.slen = 11; /*iniobj dsym_248__NTDISJ_FRESHORVAR*/ /*uniqueobj*/ if (! /*_.VALDATA___V344*/ meltfptr[343]) /*_.VALDATA___V344*/ meltfptr[343] = (melt_ptr_t) & cdat->dsym_248__NTDISJ_FRESHORVAR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_248__NTDISJ_FRESHORVAR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_248__NTDISJ_FRESHORVAR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_248__NTDISJ_FRESHORVAR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_248__NTDISJ_FRESHORVAR.obj_hash = 102368765; cdat->dsym_248__NTDISJ_FRESHORVAR.obj_len = 3; /*inistring dstr_249__NTDISJ_FRESHORVA*/ /*_.VALSTR___V345*/ meltfptr[344] = (melt_ptr_t) & cdat->dstr_249__NTDISJ_FRESHORVA; cdat->dstr_249__NTDISJ_FRESHORVA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_249__NTDISJ_FRESHORVA.val, "NTDISJ_FRESHORVAR", sizeof (cdat->dstr_249__NTDISJ_FRESHORVA. val) - 1); cdat->dstr_249__NTDISJ_FRESHORVA.val[17] = (char) 0; cdat->dstr_249__NTDISJ_FRESHORVA.slen = 17; /*^iniobj */ /*iniobj dobj_250__NTDISJ_FRESHORVAR*/ /*_.VALDATA___V337*/ meltfptr[336] = (melt_ptr_t) & cdat->dobj_250__NTDISJ_FRESHORVAR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_250__NTDISJ_FRESHORVAR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_250__NTDISJ_FRESHORVAR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_250__NTDISJ_FRESHORVAR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_250__NTDISJ_FRESHORVAR.obj_num = 8; cdat->dobj_250__NTDISJ_FRESHORVAR.obj_hash = 893877280; cdat->dobj_250__NTDISJ_FRESHORVAR.obj_len = 4; /*inistring dstr_251__NTDISJ_FRESHORVA*/ /*_.VALSTR___V338*/ meltfptr[337] = (melt_ptr_t) & cdat->dstr_251__NTDISJ_FRESHORVA; cdat->dstr_251__NTDISJ_FRESHORVA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_251__NTDISJ_FRESHORVA.val, "NTDISJ_FRESHORVAR", sizeof (cdat->dstr_251__NTDISJ_FRESHORVA. val) - 1); cdat->dstr_251__NTDISJ_FRESHORVA.val[17] = (char) 0; cdat->dstr_251__NTDISJ_FRESHORVA.slen = 17; /*iniobj dsym_252__NTDISJ_SETORVAR*/ /*uniqueobj*/ if (! /*_.VALDATA___V346*/ meltfptr[345]) /*_.VALDATA___V346*/ meltfptr[345] = (melt_ptr_t) & cdat->dsym_252__NTDISJ_SETORVAR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_252__NTDISJ_SETORVAR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_252__NTDISJ_SETORVAR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_252__NTDISJ_SETORVAR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_252__NTDISJ_SETORVAR.obj_hash = 1003721072; cdat->dsym_252__NTDISJ_SETORVAR.obj_len = 3; /*inistring dstr_253__NTDISJ_SETORVAR*/ /*_.VALSTR___V347*/ meltfptr[346] = (melt_ptr_t) & cdat->dstr_253__NTDISJ_SETORVAR; cdat->dstr_253__NTDISJ_SETORVAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_253__NTDISJ_SETORVAR.val, "NTDISJ_SETORVAR", sizeof (cdat->dstr_253__NTDISJ_SETORVAR.val) - 1); cdat->dstr_253__NTDISJ_SETORVAR.val[15] = (char) 0; cdat->dstr_253__NTDISJ_SETORVAR.slen = 15; /*^iniobj */ /*iniobj dobj_254__NTDISJ_SETORVAR*/ /*_.VALDATA___V339*/ meltfptr[338] = (melt_ptr_t) & cdat->dobj_254__NTDISJ_SETORVAR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_254__NTDISJ_SETORVAR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_254__NTDISJ_SETORVAR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_254__NTDISJ_SETORVAR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_254__NTDISJ_SETORVAR.obj_num = 9; cdat->dobj_254__NTDISJ_SETORVAR.obj_hash = 685552461; cdat->dobj_254__NTDISJ_SETORVAR.obj_len = 4; /*inistring dstr_255__NTDISJ_SETORVAR*/ /*_.VALSTR___V340*/ meltfptr[339] = (melt_ptr_t) & cdat->dstr_255__NTDISJ_SETORVAR; cdat->dstr_255__NTDISJ_SETORVAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_255__NTDISJ_SETORVAR.val, "NTDISJ_SETORVAR", sizeof (cdat->dstr_255__NTDISJ_SETORVAR.val) - 1); cdat->dstr_255__NTDISJ_SETORVAR.val[15] = (char) 0; cdat->dstr_255__NTDISJ_SETORVAR.slen = 15; /*iniobj dsym_256__CLASS_NORMTESTER_SAME*/ /*uniqueobj*/ if (! /*_.VALDATA___V348*/ meltfptr[347]) /*_.VALDATA___V348*/ meltfptr[347] = (melt_ptr_t) & cdat->dsym_256__CLASS_NORMTESTER_SAME; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_256__CLASS_NORMTESTER_SAME", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_256__CLASS_NORMTESTER_SAME", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_256__CLASS_NORMTESTER_SAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_256__CLASS_NORMTESTER_SAME.obj_hash = 327155773; cdat->dsym_256__CLASS_NORMTESTER_SAME.obj_len = 3; /*inistring dstr_257__CLASS_NORMTESTER*/ /*_.VALSTR___V349*/ meltfptr[348] = (melt_ptr_t) & cdat->dstr_257__CLASS_NORMTESTER; cdat->dstr_257__CLASS_NORMTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_257__CLASS_NORMTESTER.val, "CLASS_NORMTESTER_SAME", sizeof (cdat->dstr_257__CLASS_NORMTESTER. val) - 1); cdat->dstr_257__CLASS_NORMTESTER.val[21] = (char) 0; cdat->dstr_257__CLASS_NORMTESTER.slen = 21; MELT_LOCATION ("warmelt-normatch.melt:524:/ iniobj"); /*iniobj dobj_258__CLASS_NORMTESTER_SAME*/ /*_.VALDATA___V350*/ meltfptr[349] = (melt_ptr_t) & cdat->dobj_258__CLASS_NORMTESTER_SAME; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_258__CLASS_NORMTESTER_SAME", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_258__CLASS_NORMTESTER_SAME", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_258__CLASS_NORMTESTER_SAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_258__CLASS_NORMTESTER_SAME.obj_num = MELTOBMAG_OBJECT; cdat->dobj_258__CLASS_NORMTESTER_SAME.obj_hash = 480434291; cdat->dobj_258__CLASS_NORMTESTER_SAME.obj_len = 8; /*inistring dstr_259__CLASS_NORMTESTER*/ /*_.VALSTR___V351*/ meltfptr[350] = (melt_ptr_t) & cdat->dstr_259__CLASS_NORMTESTER; cdat->dstr_259__CLASS_NORMTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_259__CLASS_NORMTESTER.val, "CLASS_NORMTESTER_SAME", sizeof (cdat->dstr_259__CLASS_NORMTESTER. val) - 1); cdat->dstr_259__CLASS_NORMTESTER.val[21] = (char) 0; cdat->dstr_259__CLASS_NORMTESTER.slen = 21; /*inimult dtup_260__CLASS_NORMTESTER_SAME */ /*_.VALTUP___V352*/ meltfptr[351] = (melt_ptr_t) & cdat->dtup_260__CLASS_NORMTESTER_SAME; cdat->dtup_260__CLASS_NORMTESTER_SAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_260__CLASS_NORMTESTER_SAME.nbval = 5; /*inimult dtup_261__CLASS_NORMTESTER_SAME */ /*_.VALTUP___V355*/ meltfptr[354] = (melt_ptr_t) & cdat->dtup_261__CLASS_NORMTESTER_SAME; cdat->dtup_261__CLASS_NORMTESTER_SAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_261__CLASS_NORMTESTER_SAME.nbval = 8; /*iniobj dsym_262__NTSAME_IDENTICAL*/ /*uniqueobj*/ if (! /*_.VALDATA___V356*/ meltfptr[355]) /*_.VALDATA___V356*/ meltfptr[355] = (melt_ptr_t) & cdat->dsym_262__NTSAME_IDENTICAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_262__NTSAME_IDENTICAL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_262__NTSAME_IDENTICAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_262__NTSAME_IDENTICAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_262__NTSAME_IDENTICAL.obj_hash = 971859574; cdat->dsym_262__NTSAME_IDENTICAL.obj_len = 3; /*inistring dstr_263__NTSAME_IDENTICAL*/ /*_.VALSTR___V357*/ meltfptr[356] = (melt_ptr_t) & cdat->dstr_263__NTSAME_IDENTICAL; cdat->dstr_263__NTSAME_IDENTICAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_263__NTSAME_IDENTICAL.val, "NTSAME_IDENTICAL", sizeof (cdat->dstr_263__NTSAME_IDENTICAL. val) - 1); cdat->dstr_263__NTSAME_IDENTICAL.val[16] = (char) 0; cdat->dstr_263__NTSAME_IDENTICAL.slen = 16; /*^iniobj */ /*iniobj dobj_264__NTSAME_IDENTICAL*/ /*_.VALDATA___V353*/ meltfptr[352] = (melt_ptr_t) & cdat->dobj_264__NTSAME_IDENTICAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_264__NTSAME_IDENTICAL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_264__NTSAME_IDENTICAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_264__NTSAME_IDENTICAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_264__NTSAME_IDENTICAL.obj_num = 7; cdat->dobj_264__NTSAME_IDENTICAL.obj_hash = 567321072; cdat->dobj_264__NTSAME_IDENTICAL.obj_len = 4; /*inistring dstr_265__NTSAME_IDENTICAL*/ /*_.VALSTR___V354*/ meltfptr[353] = (melt_ptr_t) & cdat->dstr_265__NTSAME_IDENTICAL; cdat->dstr_265__NTSAME_IDENTICAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_265__NTSAME_IDENTICAL.val, "NTSAME_IDENTICAL", sizeof (cdat->dstr_265__NTSAME_IDENTICAL. val) - 1); cdat->dstr_265__NTSAME_IDENTICAL.val[16] = (char) 0; cdat->dstr_265__NTSAME_IDENTICAL.slen = 16; /*iniobj dsym_266__CLASS_NORMTESTER_MATCHER*/ /*uniqueobj*/ if (! /*_.VALDATA___V358*/ meltfptr[357]) /*_.VALDATA___V358*/ meltfptr[357] = (melt_ptr_t) & cdat->dsym_266__CLASS_NORMTESTER_MATCHER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_266__CLASS_NORMTESTER_MATCHER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_266__CLASS_NORMTESTER_MATCHER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_266__CLASS_NORMTESTER_MATCHER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_266__CLASS_NORMTESTER_MATCHER.obj_hash = 274164991; cdat->dsym_266__CLASS_NORMTESTER_MATCHER.obj_len = 3; /*inistring dstr_267__CLASS_NORMTESTER*/ /*_.VALSTR___V359*/ meltfptr[358] = (melt_ptr_t) & cdat->dstr_267__CLASS_NORMTESTER; cdat->dstr_267__CLASS_NORMTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_267__CLASS_NORMTESTER.val, "CLASS_NORMTESTER_MATCHER", sizeof (cdat->dstr_267__CLASS_NORMTESTER. val) - 1); cdat->dstr_267__CLASS_NORMTESTER.val[24] = (char) 0; cdat->dstr_267__CLASS_NORMTESTER.slen = 24; MELT_LOCATION ("warmelt-normatch.melt:530:/ iniobj"); /*iniobj dobj_268__CLASS_NORMTESTER_MATCHER*/ /*_.VALDATA___V360*/ meltfptr[359] = (melt_ptr_t) & cdat->dobj_268__CLASS_NORMTESTER_MATCHER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_268__CLASS_NORMTESTER_MATCHER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_268__CLASS_NORMTESTER_MATCHER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_268__CLASS_NORMTESTER_MATCHER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_268__CLASS_NORMTESTER_MATCHER.obj_num = MELTOBMAG_OBJECT; cdat->dobj_268__CLASS_NORMTESTER_MATCHER.obj_hash = 1018415447; cdat->dobj_268__CLASS_NORMTESTER_MATCHER.obj_len = 8; /*inistring dstr_269__CLASS_NORMTESTER*/ /*_.VALSTR___V361*/ meltfptr[360] = (melt_ptr_t) & cdat->dstr_269__CLASS_NORMTESTER; cdat->dstr_269__CLASS_NORMTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_269__CLASS_NORMTESTER.val, "CLASS_NORMTESTER_MATCHER", sizeof (cdat->dstr_269__CLASS_NORMTESTER. val) - 1); cdat->dstr_269__CLASS_NORMTESTER.val[24] = (char) 0; cdat->dstr_269__CLASS_NORMTESTER.slen = 24; /*inimult dtup_270__CLASS_NORMTESTER_MATCHER */ /*_.VALTUP___V362*/ meltfptr[361] = (melt_ptr_t) & cdat->dtup_270__CLASS_NORMTESTER_MATCHER; cdat->dtup_270__CLASS_NORMTESTER_MATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_270__CLASS_NORMTESTER_MATCHER.nbval = 5; /*inimult dtup_271__CLASS_NORMTESTER_MATCHER */ /*_.VALTUP___V371*/ meltfptr[370] = (melt_ptr_t) & cdat->dtup_271__CLASS_NORMTESTER_MATCHER; cdat->dtup_271__CLASS_NORMTESTER_MATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_271__CLASS_NORMTESTER_MATCHER.nbval = 11; /*iniobj dsym_272__NTMATCH_MATCHER*/ /*uniqueobj*/ if (! /*_.VALDATA___V372*/ meltfptr[371]) /*_.VALDATA___V372*/ meltfptr[371] = (melt_ptr_t) & cdat->dsym_272__NTMATCH_MATCHER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_272__NTMATCH_MATCHER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_272__NTMATCH_MATCHER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_272__NTMATCH_MATCHER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_272__NTMATCH_MATCHER.obj_hash = 692192229; cdat->dsym_272__NTMATCH_MATCHER.obj_len = 3; /*inistring dstr_273__NTMATCH_MATCHER*/ /*_.VALSTR___V373*/ meltfptr[372] = (melt_ptr_t) & cdat->dstr_273__NTMATCH_MATCHER; cdat->dstr_273__NTMATCH_MATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_273__NTMATCH_MATCHER.val, "NTMATCH_MATCHER", sizeof (cdat->dstr_273__NTMATCH_MATCHER.val) - 1); cdat->dstr_273__NTMATCH_MATCHER.val[15] = (char) 0; cdat->dstr_273__NTMATCH_MATCHER.slen = 15; /*^iniobj */ /*iniobj dobj_274__NTMATCH_MATCHER*/ /*_.VALDATA___V363*/ meltfptr[362] = (melt_ptr_t) & cdat->dobj_274__NTMATCH_MATCHER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_274__NTMATCH_MATCHER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_274__NTMATCH_MATCHER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_274__NTMATCH_MATCHER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_274__NTMATCH_MATCHER.obj_num = 7; cdat->dobj_274__NTMATCH_MATCHER.obj_hash = 69066623; cdat->dobj_274__NTMATCH_MATCHER.obj_len = 4; /*inistring dstr_275__NTMATCH_MATCHER*/ /*_.VALSTR___V364*/ meltfptr[363] = (melt_ptr_t) & cdat->dstr_275__NTMATCH_MATCHER; cdat->dstr_275__NTMATCH_MATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_275__NTMATCH_MATCHER.val, "NTMATCH_MATCHER", sizeof (cdat->dstr_275__NTMATCH_MATCHER.val) - 1); cdat->dstr_275__NTMATCH_MATCHER.val[15] = (char) 0; cdat->dstr_275__NTMATCH_MATCHER.slen = 15; /*iniobj dsym_276__NTMATCH_MATNDATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V374*/ meltfptr[373]) /*_.VALDATA___V374*/ meltfptr[373] = (melt_ptr_t) & cdat->dsym_276__NTMATCH_MATNDATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_276__NTMATCH_MATNDATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_276__NTMATCH_MATNDATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_276__NTMATCH_MATNDATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_276__NTMATCH_MATNDATA.obj_hash = 914661871; cdat->dsym_276__NTMATCH_MATNDATA.obj_len = 3; /*inistring dstr_277__NTMATCH_MATNDATA*/ /*_.VALSTR___V375*/ meltfptr[374] = (melt_ptr_t) & cdat->dstr_277__NTMATCH_MATNDATA; cdat->dstr_277__NTMATCH_MATNDATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_277__NTMATCH_MATNDATA.val, "NTMATCH_MATNDATA", sizeof (cdat->dstr_277__NTMATCH_MATNDATA. val) - 1); cdat->dstr_277__NTMATCH_MATNDATA.val[16] = (char) 0; cdat->dstr_277__NTMATCH_MATNDATA.slen = 16; /*^iniobj */ /*iniobj dobj_278__NTMATCH_MATNDATA*/ /*_.VALDATA___V365*/ meltfptr[364] = (melt_ptr_t) & cdat->dobj_278__NTMATCH_MATNDATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_278__NTMATCH_MATNDATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_278__NTMATCH_MATNDATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_278__NTMATCH_MATNDATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_278__NTMATCH_MATNDATA.obj_num = 8; cdat->dobj_278__NTMATCH_MATNDATA.obj_hash = 433599470; cdat->dobj_278__NTMATCH_MATNDATA.obj_len = 4; /*inistring dstr_279__NTMATCH_MATNDATA*/ /*_.VALSTR___V366*/ meltfptr[365] = (melt_ptr_t) & cdat->dstr_279__NTMATCH_MATNDATA; cdat->dstr_279__NTMATCH_MATNDATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_279__NTMATCH_MATNDATA.val, "NTMATCH_MATNDATA", sizeof (cdat->dstr_279__NTMATCH_MATNDATA. val) - 1); cdat->dstr_279__NTMATCH_MATNDATA.val[16] = (char) 0; cdat->dstr_279__NTMATCH_MATNDATA.slen = 16; /*iniobj dsym_280__NTMATCH_INARGS*/ /*uniqueobj*/ if (! /*_.VALDATA___V376*/ meltfptr[375]) /*_.VALDATA___V376*/ meltfptr[375] = (melt_ptr_t) & cdat->dsym_280__NTMATCH_INARGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_280__NTMATCH_INARGS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_280__NTMATCH_INARGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_280__NTMATCH_INARGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_280__NTMATCH_INARGS.obj_hash = 318169338; cdat->dsym_280__NTMATCH_INARGS.obj_len = 3; /*inistring dstr_281__NTMATCH_INARGS*/ /*_.VALSTR___V377*/ meltfptr[376] = (melt_ptr_t) & cdat->dstr_281__NTMATCH_INARGS; cdat->dstr_281__NTMATCH_INARGS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_281__NTMATCH_INARGS.val, "NTMATCH_INARGS", sizeof (cdat->dstr_281__NTMATCH_INARGS.val) - 1); cdat->dstr_281__NTMATCH_INARGS.val[14] = (char) 0; cdat->dstr_281__NTMATCH_INARGS.slen = 14; /*^iniobj */ /*iniobj dobj_282__NTMATCH_INARGS*/ /*_.VALDATA___V367*/ meltfptr[366] = (melt_ptr_t) & cdat->dobj_282__NTMATCH_INARGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_282__NTMATCH_INARGS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_282__NTMATCH_INARGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_282__NTMATCH_INARGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_282__NTMATCH_INARGS.obj_num = 9; cdat->dobj_282__NTMATCH_INARGS.obj_hash = 165710812; cdat->dobj_282__NTMATCH_INARGS.obj_len = 4; /*inistring dstr_283__NTMATCH_INARGS*/ /*_.VALSTR___V368*/ meltfptr[367] = (melt_ptr_t) & cdat->dstr_283__NTMATCH_INARGS; cdat->dstr_283__NTMATCH_INARGS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_283__NTMATCH_INARGS.val, "NTMATCH_INARGS", sizeof (cdat->dstr_283__NTMATCH_INARGS.val) - 1); cdat->dstr_283__NTMATCH_INARGS.val[14] = (char) 0; cdat->dstr_283__NTMATCH_INARGS.slen = 14; /*iniobj dsym_284__NTMATCH_OUTLOCS*/ /*uniqueobj*/ if (! /*_.VALDATA___V378*/ meltfptr[377]) /*_.VALDATA___V378*/ meltfptr[377] = (melt_ptr_t) & cdat->dsym_284__NTMATCH_OUTLOCS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_284__NTMATCH_OUTLOCS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_284__NTMATCH_OUTLOCS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_284__NTMATCH_OUTLOCS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_284__NTMATCH_OUTLOCS.obj_hash = 182554245; cdat->dsym_284__NTMATCH_OUTLOCS.obj_len = 3; /*inistring dstr_285__NTMATCH_OUTLOCS*/ /*_.VALSTR___V379*/ meltfptr[378] = (melt_ptr_t) & cdat->dstr_285__NTMATCH_OUTLOCS; cdat->dstr_285__NTMATCH_OUTLOCS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_285__NTMATCH_OUTLOCS.val, "NTMATCH_OUTLOCS", sizeof (cdat->dstr_285__NTMATCH_OUTLOCS.val) - 1); cdat->dstr_285__NTMATCH_OUTLOCS.val[15] = (char) 0; cdat->dstr_285__NTMATCH_OUTLOCS.slen = 15; /*^iniobj */ /*iniobj dobj_286__NTMATCH_OUTLOCS*/ /*_.VALDATA___V369*/ meltfptr[368] = (melt_ptr_t) & cdat->dobj_286__NTMATCH_OUTLOCS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_286__NTMATCH_OUTLOCS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_286__NTMATCH_OUTLOCS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_286__NTMATCH_OUTLOCS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_286__NTMATCH_OUTLOCS.obj_num = 10; cdat->dobj_286__NTMATCH_OUTLOCS.obj_hash = 105688355; cdat->dobj_286__NTMATCH_OUTLOCS.obj_len = 4; /*inistring dstr_287__NTMATCH_OUTLOCS*/ /*_.VALSTR___V370*/ meltfptr[369] = (melt_ptr_t) & cdat->dstr_287__NTMATCH_OUTLOCS; cdat->dstr_287__NTMATCH_OUTLOCS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_287__NTMATCH_OUTLOCS.val, "NTMATCH_OUTLOCS", sizeof (cdat->dstr_287__NTMATCH_OUTLOCS.val) - 1); cdat->dstr_287__NTMATCH_OUTLOCS.val[15] = (char) 0; cdat->dstr_287__NTMATCH_OUTLOCS.slen = 15; /*iniobj dsym_288__CLASS_NORMTESTER_INSTANCE*/ /*uniqueobj*/ if (! /*_.VALDATA___V380*/ meltfptr[379]) /*_.VALDATA___V380*/ meltfptr[379] = (melt_ptr_t) & cdat->dsym_288__CLASS_NORMTESTER_INSTANCE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_288__CLASS_NORMTESTER_INSTANCE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_288__CLASS_NORMTESTER_INSTANCE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_288__CLASS_NORMTESTER_INSTANCE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_288__CLASS_NORMTESTER_INSTANCE.obj_hash = 927841366; cdat->dsym_288__CLASS_NORMTESTER_INSTANCE.obj_len = 3; /*inistring dstr_289__CLASS_NORMTESTER*/ /*_.VALSTR___V381*/ meltfptr[380] = (melt_ptr_t) & cdat->dstr_289__CLASS_NORMTESTER; cdat->dstr_289__CLASS_NORMTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_289__CLASS_NORMTESTER.val, "CLASS_NORMTESTER_INSTANCE", sizeof (cdat->dstr_289__CLASS_NORMTESTER. val) - 1); cdat->dstr_289__CLASS_NORMTESTER.val[25] = (char) 0; cdat->dstr_289__CLASS_NORMTESTER.slen = 25; MELT_LOCATION ("warmelt-normatch.melt:542:/ iniobj"); /*iniobj dobj_290__CLASS_NORMTESTER_INSTANCE*/ /*_.VALDATA___V382*/ meltfptr[381] = (melt_ptr_t) & cdat->dobj_290__CLASS_NORMTESTER_INSTANCE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_290__CLASS_NORMTESTER_INSTANCE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_290__CLASS_NORMTESTER_INSTANCE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_290__CLASS_NORMTESTER_INSTANCE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_290__CLASS_NORMTESTER_INSTANCE.obj_num = MELTOBMAG_OBJECT; cdat->dobj_290__CLASS_NORMTESTER_INSTANCE.obj_hash = 37246620; cdat->dobj_290__CLASS_NORMTESTER_INSTANCE.obj_len = 8; /*inistring dstr_291__CLASS_NORMTESTER*/ /*_.VALSTR___V383*/ meltfptr[382] = (melt_ptr_t) & cdat->dstr_291__CLASS_NORMTESTER; cdat->dstr_291__CLASS_NORMTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_291__CLASS_NORMTESTER.val, "CLASS_NORMTESTER_INSTANCE", sizeof (cdat->dstr_291__CLASS_NORMTESTER. val) - 1); cdat->dstr_291__CLASS_NORMTESTER.val[25] = (char) 0; cdat->dstr_291__CLASS_NORMTESTER.slen = 25; /*inimult dtup_292__CLASS_NORMTESTER_INSTANCE */ /*_.VALTUP___V384*/ meltfptr[383] = (melt_ptr_t) & cdat->dtup_292__CLASS_NORMTESTER_INSTANCE; cdat->dtup_292__CLASS_NORMTESTER_INSTANCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_292__CLASS_NORMTESTER_INSTANCE.nbval = 5; /*inimult dtup_293__CLASS_NORMTESTER_INSTANCE */ /*_.VALTUP___V389*/ meltfptr[388] = (melt_ptr_t) & cdat->dtup_293__CLASS_NORMTESTER_INSTANCE; cdat->dtup_293__CLASS_NORMTESTER_INSTANCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_293__CLASS_NORMTESTER_INSTANCE.nbval = 9; /*iniobj dsym_294__NTINST_CLASS*/ /*uniqueobj*/ if (! /*_.VALDATA___V390*/ meltfptr[389]) /*_.VALDATA___V390*/ meltfptr[389] = (melt_ptr_t) & cdat->dsym_294__NTINST_CLASS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_294__NTINST_CLASS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_294__NTINST_CLASS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_294__NTINST_CLASS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_294__NTINST_CLASS.obj_hash = 77708690; cdat->dsym_294__NTINST_CLASS.obj_len = 3; /*inistring dstr_295__NTINST_CLASS*/ /*_.VALSTR___V391*/ meltfptr[390] = (melt_ptr_t) & cdat->dstr_295__NTINST_CLASS; cdat->dstr_295__NTINST_CLASS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_295__NTINST_CLASS.val, "NTINST_CLASS", sizeof (cdat->dstr_295__NTINST_CLASS.val) - 1); cdat->dstr_295__NTINST_CLASS.val[12] = (char) 0; cdat->dstr_295__NTINST_CLASS.slen = 12; /*^iniobj */ /*iniobj dobj_296__NTINST_CLASS*/ /*_.VALDATA___V385*/ meltfptr[384] = (melt_ptr_t) & cdat->dobj_296__NTINST_CLASS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_296__NTINST_CLASS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_296__NTINST_CLASS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_296__NTINST_CLASS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_296__NTINST_CLASS.obj_num = 7; cdat->dobj_296__NTINST_CLASS.obj_hash = 569854478; cdat->dobj_296__NTINST_CLASS.obj_len = 4; /*inistring dstr_297__NTINST_CLASS*/ /*_.VALSTR___V386*/ meltfptr[385] = (melt_ptr_t) & cdat->dstr_297__NTINST_CLASS; cdat->dstr_297__NTINST_CLASS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_297__NTINST_CLASS.val, "NTINST_CLASS", sizeof (cdat->dstr_297__NTINST_CLASS.val) - 1); cdat->dstr_297__NTINST_CLASS.val[12] = (char) 0; cdat->dstr_297__NTINST_CLASS.slen = 12; /*iniobj dsym_298__NTINST_FIELDLOCS*/ /*uniqueobj*/ if (! /*_.VALDATA___V392*/ meltfptr[391]) /*_.VALDATA___V392*/ meltfptr[391] = (melt_ptr_t) & cdat->dsym_298__NTINST_FIELDLOCS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_298__NTINST_FIELDLOCS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_298__NTINST_FIELDLOCS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_298__NTINST_FIELDLOCS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_298__NTINST_FIELDLOCS.obj_hash = 909122079; cdat->dsym_298__NTINST_FIELDLOCS.obj_len = 3; /*inistring dstr_299__NTINST_FIELDLOCS*/ /*_.VALSTR___V393*/ meltfptr[392] = (melt_ptr_t) & cdat->dstr_299__NTINST_FIELDLOCS; cdat->dstr_299__NTINST_FIELDLOCS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_299__NTINST_FIELDLOCS.val, "NTINST_FIELDLOCS", sizeof (cdat->dstr_299__NTINST_FIELDLOCS. val) - 1); cdat->dstr_299__NTINST_FIELDLOCS.val[16] = (char) 0; cdat->dstr_299__NTINST_FIELDLOCS.slen = 16; /*^iniobj */ /*iniobj dobj_300__NTINST_FIELDLOCS*/ /*_.VALDATA___V387*/ meltfptr[386] = (melt_ptr_t) & cdat->dobj_300__NTINST_FIELDLOCS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_300__NTINST_FIELDLOCS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_300__NTINST_FIELDLOCS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_300__NTINST_FIELDLOCS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_300__NTINST_FIELDLOCS.obj_num = 8; cdat->dobj_300__NTINST_FIELDLOCS.obj_hash = 486829413; cdat->dobj_300__NTINST_FIELDLOCS.obj_len = 4; /*inistring dstr_301__NTINST_FIELDLOCS*/ /*_.VALSTR___V388*/ meltfptr[387] = (melt_ptr_t) & cdat->dstr_301__NTINST_FIELDLOCS; cdat->dstr_301__NTINST_FIELDLOCS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_301__NTINST_FIELDLOCS.val, "NTINST_FIELDLOCS", sizeof (cdat->dstr_301__NTINST_FIELDLOCS. val) - 1); cdat->dstr_301__NTINST_FIELDLOCS.val[16] = (char) 0; cdat->dstr_301__NTINST_FIELDLOCS.slen = 16; /*iniobj dsym_302__CLASS_NORMTESTER_TUPLE*/ /*uniqueobj*/ if (! /*_.VALDATA___V394*/ meltfptr[393]) /*_.VALDATA___V394*/ meltfptr[393] = (melt_ptr_t) & cdat->dsym_302__CLASS_NORMTESTER_TUPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_302__CLASS_NORMTESTER_TUPLE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_302__CLASS_NORMTESTER_TUPLE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_302__CLASS_NORMTESTER_TUPLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_302__CLASS_NORMTESTER_TUPLE.obj_hash = 138981626; cdat->dsym_302__CLASS_NORMTESTER_TUPLE.obj_len = 3; /*inistring dstr_303__CLASS_NORMTESTER*/ /*_.VALSTR___V395*/ meltfptr[394] = (melt_ptr_t) & cdat->dstr_303__CLASS_NORMTESTER; cdat->dstr_303__CLASS_NORMTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_303__CLASS_NORMTESTER.val, "CLASS_NORMTESTER_TUPLE", sizeof (cdat->dstr_303__CLASS_NORMTESTER. val) - 1); cdat->dstr_303__CLASS_NORMTESTER.val[22] = (char) 0; cdat->dstr_303__CLASS_NORMTESTER.slen = 22; MELT_LOCATION ("warmelt-normatch.melt:551:/ iniobj"); /*iniobj dobj_304__CLASS_NORMTESTER_TUPLE*/ /*_.VALDATA___V396*/ meltfptr[395] = (melt_ptr_t) & cdat->dobj_304__CLASS_NORMTESTER_TUPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_304__CLASS_NORMTESTER_TUPLE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_304__CLASS_NORMTESTER_TUPLE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_304__CLASS_NORMTESTER_TUPLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_304__CLASS_NORMTESTER_TUPLE.obj_num = MELTOBMAG_OBJECT; cdat->dobj_304__CLASS_NORMTESTER_TUPLE.obj_hash = 990255040; cdat->dobj_304__CLASS_NORMTESTER_TUPLE.obj_len = 8; /*inistring dstr_305__CLASS_NORMTESTER*/ /*_.VALSTR___V397*/ meltfptr[396] = (melt_ptr_t) & cdat->dstr_305__CLASS_NORMTESTER; cdat->dstr_305__CLASS_NORMTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_305__CLASS_NORMTESTER.val, "CLASS_NORMTESTER_TUPLE", sizeof (cdat->dstr_305__CLASS_NORMTESTER. val) - 1); cdat->dstr_305__CLASS_NORMTESTER.val[22] = (char) 0; cdat->dstr_305__CLASS_NORMTESTER.slen = 22; /*inimult dtup_306__CLASS_NORMTESTER_TUPLE */ /*_.VALTUP___V398*/ meltfptr[397] = (melt_ptr_t) & cdat->dtup_306__CLASS_NORMTESTER_TUPLE; cdat->dtup_306__CLASS_NORMTESTER_TUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_306__CLASS_NORMTESTER_TUPLE.nbval = 5; /*inimult dtup_307__CLASS_NORMTESTER_TUPLE */ /*_.VALTUP___V401*/ meltfptr[400] = (melt_ptr_t) & cdat->dtup_307__CLASS_NORMTESTER_TUPLE; cdat->dtup_307__CLASS_NORMTESTER_TUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_307__CLASS_NORMTESTER_TUPLE.nbval = 8; /*iniobj dsym_308__NTTUPLE_COMPONENTS*/ /*uniqueobj*/ if (! /*_.VALDATA___V402*/ meltfptr[401]) /*_.VALDATA___V402*/ meltfptr[401] = (melt_ptr_t) & cdat->dsym_308__NTTUPLE_COMPONENTS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_308__NTTUPLE_COMPONENTS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_308__NTTUPLE_COMPONENTS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_308__NTTUPLE_COMPONENTS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_308__NTTUPLE_COMPONENTS.obj_hash = 219081817; cdat->dsym_308__NTTUPLE_COMPONENTS.obj_len = 3; /*inistring dstr_309__NTTUPLE_COMPONEN*/ /*_.VALSTR___V403*/ meltfptr[402] = (melt_ptr_t) & cdat->dstr_309__NTTUPLE_COMPONEN; cdat->dstr_309__NTTUPLE_COMPONEN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_309__NTTUPLE_COMPONEN.val, "NTTUPLE_COMPONENTS", sizeof (cdat->dstr_309__NTTUPLE_COMPONEN. val) - 1); cdat->dstr_309__NTTUPLE_COMPONEN.val[18] = (char) 0; cdat->dstr_309__NTTUPLE_COMPONEN.slen = 18; /*^iniobj */ /*iniobj dobj_310__NTTUPLE_COMPONENTS*/ /*_.VALDATA___V399*/ meltfptr[398] = (melt_ptr_t) & cdat->dobj_310__NTTUPLE_COMPONENTS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_310__NTTUPLE_COMPONENTS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_310__NTTUPLE_COMPONENTS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_310__NTTUPLE_COMPONENTS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_310__NTTUPLE_COMPONENTS.obj_num = 7; cdat->dobj_310__NTTUPLE_COMPONENTS.obj_hash = 991706840; cdat->dobj_310__NTTUPLE_COMPONENTS.obj_len = 4; /*inistring dstr_311__NTTUPLE_COMPONEN*/ /*_.VALSTR___V400*/ meltfptr[399] = (melt_ptr_t) & cdat->dstr_311__NTTUPLE_COMPONEN; cdat->dstr_311__NTTUPLE_COMPONEN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_311__NTTUPLE_COMPONEN.val, "NTTUPLE_COMPONENTS", sizeof (cdat->dstr_311__NTTUPLE_COMPONEN. val) - 1); cdat->dstr_311__NTTUPLE_COMPONEN.val[18] = (char) 0; cdat->dstr_311__NTTUPLE_COMPONEN.slen = 18; /*iniobj dsym_312__CLASS_NREP_MATCH*/ /*uniqueobj*/ if (! /*_.VALDATA___V404*/ meltfptr[403]) /*_.VALDATA___V404*/ meltfptr[403] = (melt_ptr_t) & 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 ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_312__CLASS_NREP_MATCH", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_312__CLASS_NREP_MATCH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_312__CLASS_NREP_MATCH.obj_hash = 624411385; cdat->dsym_312__CLASS_NREP_MATCH.obj_len = 3; /*inistring dstr_313__CLASS_NREP_MATCH*/ /*_.VALSTR___V405*/ meltfptr[404] = (melt_ptr_t) & cdat->dstr_313__CLASS_NREP_MATCH; cdat->dstr_313__CLASS_NREP_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_313__CLASS_NREP_MATCH.val, "CLASS_NREP_MATCH", sizeof (cdat->dstr_313__CLASS_NREP_MATCH. val) - 1); cdat->dstr_313__CLASS_NREP_MATCH.val[16] = (char) 0; cdat->dstr_313__CLASS_NREP_MATCH.slen = 16; /*iniobj dsym_314__CLASS_NREP_TYPED_EXPRESSION*/ /*uniqueobj*/ if (! /*_.VALDATA___V406*/ meltfptr[405]) /*_.VALDATA___V406*/ meltfptr[405] = (melt_ptr_t) & 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", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_314__CLASS_NREP_TYPED_EXPRESSION", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_314__CLASS_NREP_TYPED_EXPRESSION.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_314__CLASS_NREP_TYPED_EXPRESSION.obj_hash = 826853213; cdat->dsym_314__CLASS_NREP_TYPED_EXPRESSION.obj_len = 3; /*inistring dstr_315__CLASS_NREP_TYPED*/ /*_.VALSTR___V407*/ meltfptr[406] = (melt_ptr_t) & cdat->dstr_315__CLASS_NREP_TYPED; cdat->dstr_315__CLASS_NREP_TYPED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_315__CLASS_NREP_TYPED.val, "CLASS_NREP_TYPED_EXPRESSION", sizeof (cdat->dstr_315__CLASS_NREP_TYPED. val) - 1); cdat->dstr_315__CLASS_NREP_TYPED.val[27] = (char) 0; cdat->dstr_315__CLASS_NREP_TYPED.slen = 27; MELT_LOCATION ("warmelt-normatch.melt:559:/ iniobj"); /*iniobj dobj_316__CLASS_NREP_MATCH*/ /*_.VALDATA___V408*/ meltfptr[407] = (melt_ptr_t) & cdat->dobj_316__CLASS_NREP_MATCH; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_316__CLASS_NREP_MATCH", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_316__CLASS_NREP_MATCH", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_316__CLASS_NREP_MATCH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_316__CLASS_NREP_MATCH.obj_num = MELTOBMAG_OBJECT; cdat->dobj_316__CLASS_NREP_MATCH.obj_hash = 291757018; cdat->dobj_316__CLASS_NREP_MATCH.obj_len = 8; /*inistring dstr_317__CLASS_NREP_MATCH*/ /*_.VALSTR___V409*/ meltfptr[408] = (melt_ptr_t) & cdat->dstr_317__CLASS_NREP_MATCH; cdat->dstr_317__CLASS_NREP_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_317__CLASS_NREP_MATCH.val, "CLASS_NREP_MATCH", sizeof (cdat->dstr_317__CLASS_NREP_MATCH. val) - 1); cdat->dstr_317__CLASS_NREP_MATCH.val[16] = (char) 0; cdat->dstr_317__CLASS_NREP_MATCH.slen = 16; /*inimult dtup_318__CLASS_NREP_MATCH */ /*_.VALTUP___V410*/ meltfptr[409] = (melt_ptr_t) & cdat->dtup_318__CLASS_NREP_MATCH; cdat->dtup_318__CLASS_NREP_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_318__CLASS_NREP_MATCH.nbval = 4; /*inimult dtup_319__CLASS_NREP_MATCH */ /*_.VALTUP___V417*/ meltfptr[416] = (melt_ptr_t) & cdat->dtup_319__CLASS_NREP_MATCH; cdat->dtup_319__CLASS_NREP_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_319__CLASS_NREP_MATCH.nbval = 5; /*iniobj dsym_320__NMATCH_TESTS*/ /*uniqueobj*/ if (! /*_.VALDATA___V418*/ meltfptr[417]) /*_.VALDATA___V418*/ meltfptr[417] = (melt_ptr_t) & cdat->dsym_320__NMATCH_TESTS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_320__NMATCH_TESTS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_320__NMATCH_TESTS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_320__NMATCH_TESTS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_320__NMATCH_TESTS.obj_hash = 311029837; cdat->dsym_320__NMATCH_TESTS.obj_len = 3; /*inistring dstr_321__NMATCH_TESTS*/ /*_.VALSTR___V419*/ meltfptr[418] = (melt_ptr_t) & cdat->dstr_321__NMATCH_TESTS; cdat->dstr_321__NMATCH_TESTS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_321__NMATCH_TESTS.val, "NMATCH_TESTS", sizeof (cdat->dstr_321__NMATCH_TESTS.val) - 1); cdat->dstr_321__NMATCH_TESTS.val[12] = (char) 0; cdat->dstr_321__NMATCH_TESTS.slen = 12; /*^iniobj */ /*iniobj dobj_322__NMATCH_TESTS*/ /*_.VALDATA___V411*/ meltfptr[410] = (melt_ptr_t) & cdat->dobj_322__NMATCH_TESTS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_322__NMATCH_TESTS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_322__NMATCH_TESTS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_322__NMATCH_TESTS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_322__NMATCH_TESTS.obj_num = 2; cdat->dobj_322__NMATCH_TESTS.obj_hash = 57880086; cdat->dobj_322__NMATCH_TESTS.obj_len = 4; /*inistring dstr_323__NMATCH_TESTS*/ /*_.VALSTR___V412*/ meltfptr[411] = (melt_ptr_t) & cdat->dstr_323__NMATCH_TESTS; cdat->dstr_323__NMATCH_TESTS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_323__NMATCH_TESTS.val, "NMATCH_TESTS", sizeof (cdat->dstr_323__NMATCH_TESTS.val) - 1); cdat->dstr_323__NMATCH_TESTS.val[12] = (char) 0; cdat->dstr_323__NMATCH_TESTS.slen = 12; /*iniobj dsym_324__NMATCH_STUFFMAP*/ /*uniqueobj*/ if (! /*_.VALDATA___V420*/ meltfptr[419]) /*_.VALDATA___V420*/ meltfptr[419] = (melt_ptr_t) & cdat->dsym_324__NMATCH_STUFFMAP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_324__NMATCH_STUFFMAP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_324__NMATCH_STUFFMAP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_324__NMATCH_STUFFMAP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_324__NMATCH_STUFFMAP.obj_hash = 847313355; cdat->dsym_324__NMATCH_STUFFMAP.obj_len = 3; /*inistring dstr_325__NMATCH_STUFFMAP*/ /*_.VALSTR___V421*/ meltfptr[420] = (melt_ptr_t) & cdat->dstr_325__NMATCH_STUFFMAP; cdat->dstr_325__NMATCH_STUFFMAP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_325__NMATCH_STUFFMAP.val, "NMATCH_STUFFMAP", sizeof (cdat->dstr_325__NMATCH_STUFFMAP.val) - 1); cdat->dstr_325__NMATCH_STUFFMAP.val[15] = (char) 0; cdat->dstr_325__NMATCH_STUFFMAP.slen = 15; /*^iniobj */ /*iniobj dobj_326__NMATCH_STUFFMAP*/ /*_.VALDATA___V413*/ meltfptr[412] = (melt_ptr_t) & cdat->dobj_326__NMATCH_STUFFMAP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_326__NMATCH_STUFFMAP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_326__NMATCH_STUFFMAP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_326__NMATCH_STUFFMAP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_326__NMATCH_STUFFMAP.obj_num = 3; cdat->dobj_326__NMATCH_STUFFMAP.obj_hash = 1009295508; cdat->dobj_326__NMATCH_STUFFMAP.obj_len = 4; /*inistring dstr_327__NMATCH_STUFFMAP*/ /*_.VALSTR___V414*/ meltfptr[413] = (melt_ptr_t) & cdat->dstr_327__NMATCH_STUFFMAP; cdat->dstr_327__NMATCH_STUFFMAP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_327__NMATCH_STUFFMAP.val, "NMATCH_STUFFMAP", sizeof (cdat->dstr_327__NMATCH_STUFFMAP.val) - 1); cdat->dstr_327__NMATCH_STUFFMAP.val[15] = (char) 0; cdat->dstr_327__NMATCH_STUFFMAP.slen = 15; /*iniobj dsym_328__NMATCH_MATCHED*/ /*uniqueobj*/ if (! /*_.VALDATA___V422*/ meltfptr[421]) /*_.VALDATA___V422*/ meltfptr[421] = (melt_ptr_t) & cdat->dsym_328__NMATCH_MATCHED; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_328__NMATCH_MATCHED", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_328__NMATCH_MATCHED", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_328__NMATCH_MATCHED.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_328__NMATCH_MATCHED.obj_hash = 863318223; cdat->dsym_328__NMATCH_MATCHED.obj_len = 3; /*inistring dstr_329__NMATCH_MATCHED*/ /*_.VALSTR___V423*/ meltfptr[422] = (melt_ptr_t) & cdat->dstr_329__NMATCH_MATCHED; cdat->dstr_329__NMATCH_MATCHED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_329__NMATCH_MATCHED.val, "NMATCH_MATCHED", sizeof (cdat->dstr_329__NMATCH_MATCHED.val) - 1); cdat->dstr_329__NMATCH_MATCHED.val[14] = (char) 0; cdat->dstr_329__NMATCH_MATCHED.slen = 14; /*^iniobj */ /*iniobj dobj_330__NMATCH_MATCHED*/ /*_.VALDATA___V415*/ meltfptr[414] = (melt_ptr_t) & cdat->dobj_330__NMATCH_MATCHED; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_330__NMATCH_MATCHED", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_330__NMATCH_MATCHED", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_330__NMATCH_MATCHED.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_330__NMATCH_MATCHED.obj_num = 4; cdat->dobj_330__NMATCH_MATCHED.obj_hash = 234509759; cdat->dobj_330__NMATCH_MATCHED.obj_len = 4; /*inistring dstr_331__NMATCH_MATCHED*/ /*_.VALSTR___V416*/ meltfptr[415] = (melt_ptr_t) & cdat->dstr_331__NMATCH_MATCHED; cdat->dstr_331__NMATCH_MATCHED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_331__NMATCH_MATCHED.val, "NMATCH_MATCHED", sizeof (cdat->dstr_331__NMATCH_MATCHED.val) - 1); cdat->dstr_331__NMATCH_MATCHED.val[14] = (char) 0; cdat->dstr_331__NMATCH_MATCHED.slen = 14; /*inirout drout_332__REGISTER_NEW_NORMTESTER */ /*_.VALROUT___V424*/ meltfptr[423] = (melt_ptr_t) & cdat->drout_332__REGISTER_NEW_NORMTESTER; cdat->drout_332__REGISTER_NEW_NORMTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_332__REGISTER_NEW_NORMTESTER.routdescr, "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___V425*/ meltfptr[424] = (melt_ptr_t) & cdat->dclo_333__REGISTER_NEW_NORMTESTER; cdat->dclo_333__REGISTER_NEW_NORMTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_333__REGISTER_NEW_NORMTESTER.nbval = 0; /*iniobj dsym_334__DISCR_LIST*/ /*uniqueobj*/ if (! /*_.VALDATA___V426*/ meltfptr[425]) /*_.VALDATA___V426*/ meltfptr[425] = (melt_ptr_t) & cdat->dsym_334__DISCR_LIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_334__DISCR_LIST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_334__DISCR_LIST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_334__DISCR_LIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_334__DISCR_LIST.obj_hash = 98407634; cdat->dsym_334__DISCR_LIST.obj_len = 3; /*inistring dstr_335__DISCR_LIST*/ /*_.VALSTR___V427*/ meltfptr[426] = (melt_ptr_t) & cdat->dstr_335__DISCR_LIST; cdat->dstr_335__DISCR_LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_335__DISCR_LIST.val, "DISCR_LIST", sizeof (cdat->dstr_335__DISCR_LIST.val) - 1); cdat->dstr_335__DISCR_LIST.val[10] = (char) 0; cdat->dstr_335__DISCR_LIST.slen = 10; /*inirout drout_336__PUT_TESTER_THEN */ /*_.VALROUT___V428*/ meltfptr[427] = (melt_ptr_t) & cdat->drout_336__PUT_TESTER_THEN; cdat->drout_336__PUT_TESTER_THEN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_336__PUT_TESTER_THEN.routdescr, "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___V431*/ meltfptr[430] = (melt_ptr_t) & cdat->dclo_337__PUT_TESTER_THEN; cdat->dclo_337__PUT_TESTER_THEN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_337__PUT_TESTER_THEN.nbval = 0; /*iniobj dsym_338__CLASS_REFERENCE*/ /*uniqueobj*/ if (! /*_.VALDATA___V432*/ meltfptr[431]) /*_.VALDATA___V432*/ meltfptr[431] = (melt_ptr_t) & cdat->dsym_338__CLASS_REFERENCE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_338__CLASS_REFERENCE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_338__CLASS_REFERENCE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_338__CLASS_REFERENCE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_338__CLASS_REFERENCE.obj_hash = 896623907; cdat->dsym_338__CLASS_REFERENCE.obj_len = 3; /*inistring dstr_339__CLASS_REFERENCE*/ /*_.VALSTR___V433*/ meltfptr[432] = (melt_ptr_t) & cdat->dstr_339__CLASS_REFERENCE; cdat->dstr_339__CLASS_REFERENCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_339__CLASS_REFERENCE.val, "CLASS_REFERENCE", sizeof (cdat->dstr_339__CLASS_REFERENCE.val) - 1); cdat->dstr_339__CLASS_REFERENCE.val[15] = (char) 0; cdat->dstr_339__CLASS_REFERENCE.slen = 15; /*inirout drout_340__SET_NEW_TESTER_LAST_THEN */ /*_.VALROUT___V430*/ meltfptr[429] = (melt_ptr_t) & cdat->drout_340__SET_NEW_TESTER_LAST_THEN; cdat->drout_340__SET_NEW_TESTER_LAST_THEN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_340__SET_NEW_TESTER_LAST_THEN.routdescr, "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___V429*/ meltfptr[428] = (melt_ptr_t) & cdat->dclo_341__SET_NEW_TESTER_LAST_THEN; cdat->dclo_341__SET_NEW_TESTER_LAST_THEN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_341__SET_NEW_TESTER_LAST_THEN.nbval = 0; /*inirout drout_342__SET_NEW_TESTER_ALL_ELSES */ /*_.VALROUT___V434*/ meltfptr[433] = (melt_ptr_t) & cdat->drout_342__SET_NEW_TESTER_ALL_ELSES; cdat->drout_342__SET_NEW_TESTER_ALL_ELSES.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_342__SET_NEW_TESTER_ALL_ELSES.routdescr, "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___V435*/ meltfptr[434] = (melt_ptr_t) & cdat->dclo_343__SET_NEW_TESTER_ALL_ELSES; cdat->dclo_343__SET_NEW_TESTER_ALL_ELSES.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_343__SET_NEW_TESTER_ALL_ELSES.nbval = 0; /*inirout drout_344__NORMPAT_ANYRECV */ /*_.VALROUT___V436*/ meltfptr[435] = (melt_ptr_t) & cdat->drout_344__NORMPAT_ANYRECV; cdat->drout_344__NORMPAT_ANYRECV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_344__NORMPAT_ANYRECV.routdescr, "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___V437*/ meltfptr[436] = (melt_ptr_t) & cdat->dclo_345__NORMPAT_ANYRECV; cdat->dclo_345__NORMPAT_ANYRECV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_345__NORMPAT_ANYRECV.nbval = 0; /*inirout drout_346__NORMPAT_ANYPAT */ /*_.VALROUT___V438*/ meltfptr[437] = (melt_ptr_t) & cdat->drout_346__NORMPAT_ANYPAT; cdat->drout_346__NORMPAT_ANYPAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_346__NORMPAT_ANYPAT.routdescr, "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___V439*/ meltfptr[438] = (melt_ptr_t) & cdat->dclo_347__NORMPAT_ANYPAT; cdat->dclo_347__NORMPAT_ANYPAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_347__NORMPAT_ANYPAT.nbval = 0; /*inirout drout_348__NORMVARPAT_GENREUSETEST */ /*_.VALROUT___V440*/ meltfptr[439] = (melt_ptr_t) & cdat->drout_348__NORMVARPAT_GENREUSETEST; cdat->drout_348__NORMVARPAT_GENREUSETEST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_348__NORMVARPAT_GENREUSETEST.routdescr, "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___V442*/ meltfptr[441] = (melt_ptr_t) & cdat->dclo_349__NORMVARPAT_GENREUSETEST; cdat->dclo_349__NORMVARPAT_GENREUSETEST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_349__NORMVARPAT_GENREUSETEST.nbval = 0; /*iniobj dsym_350__CLASS_NREP_LOCSYMOCC*/ /*uniqueobj*/ if (! /*_.VALDATA___V443*/ meltfptr[442]) /*_.VALDATA___V443*/ meltfptr[442] = (melt_ptr_t) & 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 ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_350__CLASS_NREP_LOCSYMOCC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_350__CLASS_NREP_LOCSYMOCC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_350__CLASS_NREP_LOCSYMOCC.obj_hash = 614887922; cdat->dsym_350__CLASS_NREP_LOCSYMOCC.obj_len = 3; /*inistring dstr_351__CLASS_NREP_LOCSY*/ /*_.VALSTR___V444*/ meltfptr[443] = (melt_ptr_t) & cdat->dstr_351__CLASS_NREP_LOCSY; cdat->dstr_351__CLASS_NREP_LOCSY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_351__CLASS_NREP_LOCSY.val, "CLASS_NREP_LOCSYMOCC", sizeof (cdat->dstr_351__CLASS_NREP_LOCSY. val) - 1); cdat->dstr_351__CLASS_NREP_LOCSY.val[20] = (char) 0; cdat->dstr_351__CLASS_NREP_LOCSY.slen = 20; /*inirout drout_352__LAMBDA_ */ /*_.VALROUT___V441*/ meltfptr[440] = (melt_ptr_t) & cdat->drout_352__LAMBDA_; cdat->drout_352__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_352__LAMBDA_.routdescr, "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___V445*/ meltfptr[444] = (melt_ptr_t) & cdat->drout_353__NORMPAT_VARIABLEPAT; cdat->drout_353__NORMPAT_VARIABLEPAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_353__NORMPAT_VARIABLEPAT.routdescr, "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___V446*/ meltfptr[445] = (melt_ptr_t) & cdat->dclo_354__NORMPAT_VARIABLEPAT; cdat->dclo_354__NORMPAT_VARIABLEPAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_354__NORMPAT_VARIABLEPAT.nbval = 0; /*iniobj dsym_355__CLASS_NORMAL_LET_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V447*/ meltfptr[446]) /*_.VALDATA___V447*/ meltfptr[446] = (melt_ptr_t) & 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", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_355__CLASS_NORMAL_LET_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_355__CLASS_NORMAL_LET_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_355__CLASS_NORMAL_LET_BINDING.obj_hash = 76320742; cdat->dsym_355__CLASS_NORMAL_LET_BINDING.obj_len = 3; /*inistring dstr_356__CLASS_NORMAL_LET*/ /*_.VALSTR___V448*/ meltfptr[447] = (melt_ptr_t) & cdat->dstr_356__CLASS_NORMAL_LET; cdat->dstr_356__CLASS_NORMAL_LET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_356__CLASS_NORMAL_LET.val, "CLASS_NORMAL_LET_BINDING", sizeof (cdat->dstr_356__CLASS_NORMAL_LET. val) - 1); cdat->dstr_356__CLASS_NORMAL_LET.val[24] = (char) 0; cdat->dstr_356__CLASS_NORMAL_LET.slen = 24; /*iniobj dsym_357__CLASS_NORMALIZATION_CONTEXT*/ /*uniqueobj*/ if (! /*_.VALDATA___V449*/ meltfptr[448]) /*_.VALDATA___V449*/ meltfptr[448] = (melt_ptr_t) & cdat->dsym_357__CLASS_NORMALIZATION_CONTEXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_357__CLASS_NORMALIZATION_CONTEXT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_357__CLASS_NORMALIZATION_CONTEXT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_357__CLASS_NORMALIZATION_CONTEXT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_357__CLASS_NORMALIZATION_CONTEXT.obj_hash = 429657178; cdat->dsym_357__CLASS_NORMALIZATION_CONTEXT.obj_len = 3; /*inistring dstr_358__CLASS_NORMALIZAT*/ /*_.VALSTR___V450*/ meltfptr[449] = (melt_ptr_t) & cdat->dstr_358__CLASS_NORMALIZAT; cdat->dstr_358__CLASS_NORMALIZAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_358__CLASS_NORMALIZAT.val, "CLASS_NORMALIZATION_CONTEXT", sizeof (cdat->dstr_358__CLASS_NORMALIZAT. val) - 1); cdat->dstr_358__CLASS_NORMALIZAT.val[27] = (char) 0; cdat->dstr_358__CLASS_NORMALIZAT.slen = 27; /*iniobj dsym_359__CLASS_QUASI_CTYPE*/ /*uniqueobj*/ if (! /*_.VALDATA___V451*/ meltfptr[450]) /*_.VALDATA___V451*/ meltfptr[450] = (melt_ptr_t) & cdat->dsym_359__CLASS_QUASI_CTYPE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_359__CLASS_QUASI_CTYPE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_359__CLASS_QUASI_CTYPE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_359__CLASS_QUASI_CTYPE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_359__CLASS_QUASI_CTYPE.obj_hash = 680718258; cdat->dsym_359__CLASS_QUASI_CTYPE.obj_len = 3; /*inistring dstr_360__CLASS_QUASI_CTYP*/ /*_.VALSTR___V452*/ meltfptr[451] = (melt_ptr_t) & cdat->dstr_360__CLASS_QUASI_CTYP; cdat->dstr_360__CLASS_QUASI_CTYP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_360__CLASS_QUASI_CTYP.val, "CLASS_QUASI_CTYPE", sizeof (cdat->dstr_360__CLASS_QUASI_CTYP. val) - 1); cdat->dstr_360__CLASS_QUASI_CTYP.val[17] = (char) 0; cdat->dstr_360__CLASS_QUASI_CTYP.slen = 17; /*inirout drout_361__NORMPAT_JOKERPAT */ /*_.VALROUT___V453*/ meltfptr[452] = (melt_ptr_t) & cdat->drout_361__NORMPAT_JOKERPAT; cdat->drout_361__NORMPAT_JOKERPAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_361__NORMPAT_JOKERPAT.routdescr, "NORMPAT_JOKERPAT @warmelt-normatch.melt:949", MELT_ROUTDESCR_LEN - 1); cdat->drout_361__NORMPAT_JOKERPAT.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_361__NORMPAT_JOKERPAT, meltrout_21_warmelt_normatch_NORMPAT_JOKERPAT); /*iniclos dclo_362__NORMPAT_JOKERPAT */ /*_.VALCLO___V454*/ meltfptr[453] = (melt_ptr_t) & cdat->dclo_362__NORMPAT_JOKERPAT; cdat->dclo_362__NORMPAT_JOKERPAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_362__NORMPAT_JOKERPAT.nbval = 0; /*inirout drout_363__NORMPAT_INSTANCEPAT */ /*_.VALROUT___V455*/ meltfptr[454] = (melt_ptr_t) & cdat->drout_363__NORMPAT_INSTANCEPAT; cdat->drout_363__NORMPAT_INSTANCEPAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_363__NORMPAT_INSTANCEPAT.routdescr, "NORMPAT_INSTANCEPAT @warmelt-normatch.melt:963", MELT_ROUTDESCR_LEN - 1); cdat->drout_363__NORMPAT_INSTANCEPAT.nbval = 36; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_363__NORMPAT_INSTANCEPAT, meltrout_22_warmelt_normatch_NORMPAT_INSTANCEPAT); /*iniclos dclo_364__NORMPAT_INSTANCEPAT */ /*_.VALCLO___V462*/ meltfptr[461] = (melt_ptr_t) & cdat->dclo_364__NORMPAT_INSTANCEPAT; cdat->dclo_364__NORMPAT_INSTANCEPAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_364__NORMPAT_INSTANCEPAT.nbval = 0; /*iniobj dsym_365__CLASS_SOURCE_PATTERN_INSTANCE*/ /*uniqueobj*/ if (! /*_.VALDATA___V463*/ meltfptr[462]) /*_.VALDATA___V463*/ meltfptr[462] = (melt_ptr_t) & cdat->dsym_365__CLASS_SOURCE_PATTERN_INSTANCE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_365__CLASS_SOURCE_PATTERN_INSTANCE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_365__CLASS_SOURCE_PATTERN_INSTANCE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_365__CLASS_SOURCE_PATTERN_INSTANCE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_365__CLASS_SOURCE_PATTERN_INSTANCE.obj_hash = 835618963; cdat->dsym_365__CLASS_SOURCE_PATTERN_INSTANCE.obj_len = 3; /*inistring dstr_366__CLASS_SOURCE_PAT*/ /*_.VALSTR___V464*/ meltfptr[463] = (melt_ptr_t) & cdat->dstr_366__CLASS_SOURCE_PAT; cdat->dstr_366__CLASS_SOURCE_PAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_366__CLASS_SOURCE_PAT.val, "CLASS_SOURCE_PATTERN_INSTANCE", sizeof (cdat->dstr_366__CLASS_SOURCE_PAT. val) - 1); cdat->dstr_366__CLASS_SOURCE_PAT.val[29] = (char) 0; cdat->dstr_366__CLASS_SOURCE_PAT.slen = 29; /*inirout drout_367__LAMBDA_ */ /*_.VALROUT___V456*/ meltfptr[455] = (melt_ptr_t) & cdat->drout_367__LAMBDA_; cdat->drout_367__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_367__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normatch.melt:997", MELT_ROUTDESCR_LEN - 1); cdat->drout_367__LAMBDA_.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_367__LAMBDA_, meltrout_23_warmelt_normatch_LAMBDA___3__); /*iniobj dsym_368__DISCR_MULTIPLE*/ /*uniqueobj*/ if (! /*_.VALDATA___V465*/ meltfptr[464]) /*_.VALDATA___V465*/ meltfptr[464] = (melt_ptr_t) & cdat->dsym_368__DISCR_MULTIPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_368__DISCR_MULTIPLE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_368__DISCR_MULTIPLE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_368__DISCR_MULTIPLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_368__DISCR_MULTIPLE.obj_hash = 91864583; cdat->dsym_368__DISCR_MULTIPLE.obj_len = 3; /*inistring dstr_369__DISCR_MULTIPLE*/ /*_.VALSTR___V466*/ meltfptr[465] = (melt_ptr_t) & cdat->dstr_369__DISCR_MULTIPLE; cdat->dstr_369__DISCR_MULTIPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_369__DISCR_MULTIPLE.val, "DISCR_MULTIPLE", sizeof (cdat->dstr_369__DISCR_MULTIPLE.val) - 1); cdat->dstr_369__DISCR_MULTIPLE.val[14] = (char) 0; cdat->dstr_369__DISCR_MULTIPLE.slen = 14; /*inirout drout_370__LAMBDA_ */ /*_.VALROUT___V457*/ meltfptr[456] = (melt_ptr_t) & cdat->drout_370__LAMBDA_; cdat->drout_370__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_370__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normatch.melt:1042", MELT_ROUTDESCR_LEN - 1); cdat->drout_370__LAMBDA_.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_370__LAMBDA_, meltrout_24_warmelt_normatch_LAMBDA___4__); /*iniboxint dint_371__ */ /*_.VALBXINT___V458*/ meltfptr[457] = (melt_ptr_t) & cdat->dint_371__; cdat->dint_371__.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CONSTANT_INTEGER)))); cdat->dint_371__.val = 0; /*iniboxint dint_372__ */ /*_.VALBXINT___V459*/ meltfptr[458] = (melt_ptr_t) & cdat->dint_372__; cdat->dint_372__.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CONSTANT_INTEGER)))); cdat->dint_372__.val = 1; /*iniboxint dint_373__ */ /*_.VALBXINT___V460*/ meltfptr[459] = (melt_ptr_t) & cdat->dint_373__; cdat->dint_373__.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CONSTANT_INTEGER)))); cdat->dint_373__.val = -1; /*inirout drout_374__LAMBDA_ */ /*_.VALROUT___V461*/ meltfptr[460] = (melt_ptr_t) & cdat->drout_374__LAMBDA_; cdat->drout_374__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_374__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normatch.melt:1072", MELT_ROUTDESCR_LEN - 1); cdat->drout_374__LAMBDA_.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_374__LAMBDA_, meltrout_25_warmelt_normatch_LAMBDA___5__); /*iniobj dsym_375__CLASS_NREP_SYMOCC*/ /*uniqueobj*/ if (! /*_.VALDATA___V467*/ meltfptr[466]) /*_.VALDATA___V467*/ meltfptr[466] = (melt_ptr_t) & cdat->dsym_375__CLASS_NREP_SYMOCC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_375__CLASS_NREP_SYMOCC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_375__CLASS_NREP_SYMOCC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_375__CLASS_NREP_SYMOCC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_375__CLASS_NREP_SYMOCC.obj_hash = 643883390; cdat->dsym_375__CLASS_NREP_SYMOCC.obj_len = 3; /*inistring dstr_376__CLASS_NREP_SYMOC*/ /*_.VALSTR___V468*/ meltfptr[467] = (melt_ptr_t) & cdat->dstr_376__CLASS_NREP_SYMOC; cdat->dstr_376__CLASS_NREP_SYMOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_376__CLASS_NREP_SYMOC.val, "CLASS_NREP_SYMOCC", sizeof (cdat->dstr_376__CLASS_NREP_SYMOC. val) - 1); cdat->dstr_376__CLASS_NREP_SYMOC.val[17] = (char) 0; cdat->dstr_376__CLASS_NREP_SYMOC.slen = 17; /*iniobj dsym_377__CLASS_LET_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V469*/ meltfptr[468]) /*_.VALDATA___V469*/ meltfptr[468] = (melt_ptr_t) & cdat->dsym_377__CLASS_LET_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_377__CLASS_LET_BINDING", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_377__CLASS_LET_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_377__CLASS_LET_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_377__CLASS_LET_BINDING.obj_hash = 373730517; cdat->dsym_377__CLASS_LET_BINDING.obj_len = 3; /*inistring dstr_378__CLASS_LET_BINDIN*/ /*_.VALSTR___V470*/ meltfptr[469] = (melt_ptr_t) & cdat->dstr_378__CLASS_LET_BINDIN; cdat->dstr_378__CLASS_LET_BINDIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_378__CLASS_LET_BINDIN.val, "CLASS_LET_BINDING", sizeof (cdat->dstr_378__CLASS_LET_BINDIN. val) - 1); cdat->dstr_378__CLASS_LET_BINDIN.val[17] = (char) 0; cdat->dstr_378__CLASS_LET_BINDIN.slen = 17; /*iniobj dsym_379__CLASS_NREP_UNSAFE_GET_FIELD*/ /*uniqueobj*/ if (! /*_.VALDATA___V471*/ meltfptr[470]) /*_.VALDATA___V471*/ meltfptr[470] = (melt_ptr_t) & cdat->dsym_379__CLASS_NREP_UNSAFE_GET_FIELD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_379__CLASS_NREP_UNSAFE_GET_FIELD", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_379__CLASS_NREP_UNSAFE_GET_FIELD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_379__CLASS_NREP_UNSAFE_GET_FIELD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_379__CLASS_NREP_UNSAFE_GET_FIELD.obj_hash = 71587717; cdat->dsym_379__CLASS_NREP_UNSAFE_GET_FIELD.obj_len = 3; /*inistring dstr_380__CLASS_NREP_UNSAF*/ /*_.VALSTR___V472*/ meltfptr[471] = (melt_ptr_t) & cdat->dstr_380__CLASS_NREP_UNSAF; cdat->dstr_380__CLASS_NREP_UNSAF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_380__CLASS_NREP_UNSAF.val, "CLASS_NREP_UNSAFE_GET_FIELD", sizeof (cdat->dstr_380__CLASS_NREP_UNSAF. val) - 1); cdat->dstr_380__CLASS_NREP_UNSAF.val[27] = (char) 0; cdat->dstr_380__CLASS_NREP_UNSAF.slen = 27; /*iniobj dsym_381__CLONE_SYMBOL*/ /*uniqueobj*/ if (! /*_.VALDATA___V473*/ meltfptr[472]) /*_.VALDATA___V473*/ meltfptr[472] = (melt_ptr_t) & cdat->dsym_381__CLONE_SYMBOL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_381__CLONE_SYMBOL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_381__CLONE_SYMBOL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_381__CLONE_SYMBOL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_381__CLONE_SYMBOL.obj_hash = 213258240; cdat->dsym_381__CLONE_SYMBOL.obj_len = 3; /*inistring dstr_382__CLONE_SYMBOL*/ /*_.VALSTR___V474*/ meltfptr[473] = (melt_ptr_t) & cdat->dstr_382__CLONE_SYMBOL; cdat->dstr_382__CLONE_SYMBOL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_382__CLONE_SYMBOL.val, "CLONE_SYMBOL", sizeof (cdat->dstr_382__CLONE_SYMBOL.val) - 1); cdat->dstr_382__CLONE_SYMBOL.val[12] = (char) 0; cdat->dstr_382__CLONE_SYMBOL.slen = 12; /*iniobj dsym_383__CLASS_TUPLE_COMPONENT_PATTERN*/ /*uniqueobj*/ if (! /*_.VALDATA___V475*/ meltfptr[474]) /*_.VALDATA___V475*/ meltfptr[474] = (melt_ptr_t) & cdat->dsym_383__CLASS_TUPLE_COMPONENT_PATTERN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_383__CLASS_TUPLE_COMPONENT_PATTERN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_383__CLASS_TUPLE_COMPONENT_PATTERN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_383__CLASS_TUPLE_COMPONENT_PATTERN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_383__CLASS_TUPLE_COMPONENT_PATTERN.obj_hash = 810401419; cdat->dsym_383__CLASS_TUPLE_COMPONENT_PATTERN.obj_len = 3; /*inistring dstr_384__CLASS_TUPLE_COMP*/ /*_.VALSTR___V476*/ meltfptr[475] = (melt_ptr_t) & cdat->dstr_384__CLASS_TUPLE_COMP; cdat->dstr_384__CLASS_TUPLE_COMP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_384__CLASS_TUPLE_COMP.val, "CLASS_TUPLE_COMPONENT_PATTERN", sizeof (cdat->dstr_384__CLASS_TUPLE_COMP. val) - 1); cdat->dstr_384__CLASS_TUPLE_COMP.val[29] = (char) 0; cdat->dstr_384__CLASS_TUPLE_COMP.slen = 29; MELT_LOCATION ("warmelt-normatch.melt:1150:/ iniobj"); /*iniobj dobj_385__CLASS_TUPLE_COMPONENT_PATTERN*/ /*_.VALDATA___V477*/ meltfptr[476] = (melt_ptr_t) & cdat->dobj_385__CLASS_TUPLE_COMPONENT_PATTERN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_385__CLASS_TUPLE_COMPONENT_PATTERN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_385__CLASS_TUPLE_COMPONENT_PATTERN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_385__CLASS_TUPLE_COMPONENT_PATTERN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_385__CLASS_TUPLE_COMPONENT_PATTERN.obj_num = MELTOBMAG_OBJECT; cdat->dobj_385__CLASS_TUPLE_COMPONENT_PATTERN.obj_hash = 471972073; cdat->dobj_385__CLASS_TUPLE_COMPONENT_PATTERN.obj_len = 8; /*inistring dstr_386__CLASS_TUPLE_COMP*/ /*_.VALSTR___V478*/ meltfptr[477] = (melt_ptr_t) & cdat->dstr_386__CLASS_TUPLE_COMP; cdat->dstr_386__CLASS_TUPLE_COMP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_386__CLASS_TUPLE_COMP.val, "CLASS_TUPLE_COMPONENT_PATTERN", sizeof (cdat->dstr_386__CLASS_TUPLE_COMP. val) - 1); cdat->dstr_386__CLASS_TUPLE_COMP.val[29] = (char) 0; cdat->dstr_386__CLASS_TUPLE_COMP.slen = 29; /*inimult dtup_387__CLASS_TUPLE_COMPONENT_PATTERN */ /*_.VALTUP___V479*/ meltfptr[478] = (melt_ptr_t) & cdat->dtup_387__CLASS_TUPLE_COMPONENT_PATTERN; cdat->dtup_387__CLASS_TUPLE_COMPONENT_PATTERN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_387__CLASS_TUPLE_COMPONENT_PATTERN.nbval = 1; /*inimult dtup_388__CLASS_TUPLE_COMPONENT_PATTERN */ /*_.VALTUP___V484*/ meltfptr[483] = (melt_ptr_t) & cdat->dtup_388__CLASS_TUPLE_COMPONENT_PATTERN; cdat->dtup_388__CLASS_TUPLE_COMPONENT_PATTERN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_388__CLASS_TUPLE_COMPONENT_PATTERN.nbval = 2; /*iniobj dsym_389__TUPCP_PATTERN*/ /*uniqueobj*/ if (! /*_.VALDATA___V485*/ meltfptr[484]) /*_.VALDATA___V485*/ meltfptr[484] = (melt_ptr_t) & cdat->dsym_389__TUPCP_PATTERN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_389__TUPCP_PATTERN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_389__TUPCP_PATTERN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_389__TUPCP_PATTERN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_389__TUPCP_PATTERN.obj_hash = 175740659; cdat->dsym_389__TUPCP_PATTERN.obj_len = 3; /*inistring dstr_390__TUPCP_PATTERN*/ /*_.VALSTR___V486*/ meltfptr[485] = (melt_ptr_t) & cdat->dstr_390__TUPCP_PATTERN; cdat->dstr_390__TUPCP_PATTERN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_390__TUPCP_PATTERN.val, "TUPCP_PATTERN", sizeof (cdat->dstr_390__TUPCP_PATTERN.val) - 1); cdat->dstr_390__TUPCP_PATTERN.val[13] = (char) 0; cdat->dstr_390__TUPCP_PATTERN.slen = 13; /*^iniobj */ /*iniobj dobj_391__TUPCP_PATTERN*/ /*_.VALDATA___V480*/ meltfptr[479] = (melt_ptr_t) & cdat->dobj_391__TUPCP_PATTERN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_391__TUPCP_PATTERN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_391__TUPCP_PATTERN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_391__TUPCP_PATTERN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_391__TUPCP_PATTERN.obj_num = 0; cdat->dobj_391__TUPCP_PATTERN.obj_hash = 889419125; cdat->dobj_391__TUPCP_PATTERN.obj_len = 4; /*inistring dstr_392__TUPCP_PATTERN*/ /*_.VALSTR___V481*/ meltfptr[480] = (melt_ptr_t) & cdat->dstr_392__TUPCP_PATTERN; cdat->dstr_392__TUPCP_PATTERN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_392__TUPCP_PATTERN.val, "TUPCP_PATTERN", sizeof (cdat->dstr_392__TUPCP_PATTERN.val) - 1); cdat->dstr_392__TUPCP_PATTERN.val[13] = (char) 0; cdat->dstr_392__TUPCP_PATTERN.slen = 13; /*iniobj dsym_393__TUPCP_INDEX*/ /*uniqueobj*/ if (! /*_.VALDATA___V487*/ meltfptr[486]) /*_.VALDATA___V487*/ meltfptr[486] = (melt_ptr_t) & cdat->dsym_393__TUPCP_INDEX; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_393__TUPCP_INDEX", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_393__TUPCP_INDEX", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_393__TUPCP_INDEX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_393__TUPCP_INDEX.obj_hash = 743213336; cdat->dsym_393__TUPCP_INDEX.obj_len = 3; /*inistring dstr_394__TUPCP_INDEX*/ /*_.VALSTR___V488*/ meltfptr[487] = (melt_ptr_t) & cdat->dstr_394__TUPCP_INDEX; cdat->dstr_394__TUPCP_INDEX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_394__TUPCP_INDEX.val, "TUPCP_INDEX", sizeof (cdat->dstr_394__TUPCP_INDEX.val) - 1); cdat->dstr_394__TUPCP_INDEX.val[11] = (char) 0; cdat->dstr_394__TUPCP_INDEX.slen = 11; /*^iniobj */ /*iniobj dobj_395__TUPCP_INDEX*/ /*_.VALDATA___V482*/ meltfptr[481] = (melt_ptr_t) & cdat->dobj_395__TUPCP_INDEX; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_395__TUPCP_INDEX", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_395__TUPCP_INDEX", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_395__TUPCP_INDEX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_395__TUPCP_INDEX.obj_num = 1; cdat->dobj_395__TUPCP_INDEX.obj_hash = 468190812; cdat->dobj_395__TUPCP_INDEX.obj_len = 4; /*inistring dstr_396__TUPCP_INDEX*/ /*_.VALSTR___V483*/ meltfptr[482] = (melt_ptr_t) & cdat->dstr_396__TUPCP_INDEX; cdat->dstr_396__TUPCP_INDEX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_396__TUPCP_INDEX.val, "TUPCP_INDEX", sizeof (cdat->dstr_396__TUPCP_INDEX.val) - 1); cdat->dstr_396__TUPCP_INDEX.val[11] = (char) 0; cdat->dstr_396__TUPCP_INDEX.slen = 11; /*inirout drout_397__NORMPAT_TUPLEPAT */ /*_.VALROUT___V489*/ meltfptr[488] = (melt_ptr_t) & cdat->drout_397__NORMPAT_TUPLEPAT; cdat->drout_397__NORMPAT_TUPLEPAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_397__NORMPAT_TUPLEPAT.routdescr, "NORMPAT_TUPLEPAT @warmelt-normatch.melt:1159", MELT_ROUTDESCR_LEN - 1); cdat->drout_397__NORMPAT_TUPLEPAT.nbval = 36; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_397__NORMPAT_TUPLEPAT, meltrout_26_warmelt_normatch_NORMPAT_TUPLEPAT); /*iniclos dclo_398__NORMPAT_TUPLEPAT */ /*_.VALCLO___V498*/ meltfptr[497] = (melt_ptr_t) & cdat->dclo_398__NORMPAT_TUPLEPAT; cdat->dclo_398__NORMPAT_TUPLEPAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_398__NORMPAT_TUPLEPAT.nbval = 0; /*iniobj dsym_399__CLASS_SOURCE_PATTERN_TUPLE*/ /*uniqueobj*/ if (! /*_.VALDATA___V499*/ meltfptr[498]) /*_.VALDATA___V499*/ meltfptr[498] = (melt_ptr_t) & cdat->dsym_399__CLASS_SOURCE_PATTERN_TUPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_399__CLASS_SOURCE_PATTERN_TUPLE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_399__CLASS_SOURCE_PATTERN_TUPLE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_399__CLASS_SOURCE_PATTERN_TUPLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_399__CLASS_SOURCE_PATTERN_TUPLE.obj_hash = 475727285; cdat->dsym_399__CLASS_SOURCE_PATTERN_TUPLE.obj_len = 3; /*inistring dstr_400__CLASS_SOURCE_PAT*/ /*_.VALSTR___V500*/ meltfptr[499] = (melt_ptr_t) & cdat->dstr_400__CLASS_SOURCE_PAT; cdat->dstr_400__CLASS_SOURCE_PAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_400__CLASS_SOURCE_PAT.val, "CLASS_SOURCE_PATTERN_TUPLE", sizeof (cdat->dstr_400__CLASS_SOURCE_PAT. val) - 1); cdat->dstr_400__CLASS_SOURCE_PAT.val[26] = (char) 0; cdat->dstr_400__CLASS_SOURCE_PAT.slen = 26; /*inirout drout_401__LAMBDA_ */ /*_.VALROUT___V490*/ meltfptr[489] = (melt_ptr_t) & cdat->drout_401__LAMBDA_; cdat->drout_401__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_401__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normatch.melt:1190", MELT_ROUTDESCR_LEN - 1); cdat->drout_401__LAMBDA_.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_401__LAMBDA_, meltrout_27_warmelt_normatch_LAMBDA___6__); /*iniobj dsym_402__DISCR_CONSTANT_INTEGER*/ /*uniqueobj*/ if (! /*_.VALDATA___V501*/ meltfptr[500]) /*_.VALDATA___V501*/ meltfptr[500] = (melt_ptr_t) & cdat->dsym_402__DISCR_CONSTANT_INTEGER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_402__DISCR_CONSTANT_INTEGER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_402__DISCR_CONSTANT_INTEGER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_402__DISCR_CONSTANT_INTEGER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_402__DISCR_CONSTANT_INTEGER.obj_hash = 1007078494; cdat->dsym_402__DISCR_CONSTANT_INTEGER.obj_len = 3; /*inistring dstr_403__DISCR_CONSTANT_I*/ /*_.VALSTR___V502*/ meltfptr[501] = (melt_ptr_t) & cdat->dstr_403__DISCR_CONSTANT_I; cdat->dstr_403__DISCR_CONSTANT_I.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_403__DISCR_CONSTANT_I.val, "DISCR_CONSTANT_INTEGER", sizeof (cdat->dstr_403__DISCR_CONSTANT_I. val) - 1); cdat->dstr_403__DISCR_CONSTANT_I.val[22] = (char) 0; cdat->dstr_403__DISCR_CONSTANT_I.slen = 22; /*iniobj dsym_404__LIST_TO_MULTIPLE*/ /*uniqueobj*/ if (! /*_.VALDATA___V503*/ meltfptr[502]) /*_.VALDATA___V503*/ meltfptr[502] = (melt_ptr_t) & cdat->dsym_404__LIST_TO_MULTIPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_404__LIST_TO_MULTIPLE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_404__LIST_TO_MULTIPLE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_404__LIST_TO_MULTIPLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_404__LIST_TO_MULTIPLE.obj_hash = 987171205; cdat->dsym_404__LIST_TO_MULTIPLE.obj_len = 3; /*inistring dstr_405__LIST_TO_MULTIPLE*/ /*_.VALSTR___V504*/ meltfptr[503] = (melt_ptr_t) & cdat->dstr_405__LIST_TO_MULTIPLE; cdat->dstr_405__LIST_TO_MULTIPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_405__LIST_TO_MULTIPLE.val, "LIST_TO_MULTIPLE", sizeof (cdat->dstr_405__LIST_TO_MULTIPLE. val) - 1); cdat->dstr_405__LIST_TO_MULTIPLE.val[16] = (char) 0; cdat->dstr_405__LIST_TO_MULTIPLE.slen = 16; /*inirout drout_406__LAMBDA_ */ /*_.VALROUT___V491*/ meltfptr[490] = (melt_ptr_t) & cdat->drout_406__LAMBDA_; cdat->drout_406__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_406__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normatch.melt:1249", MELT_ROUTDESCR_LEN - 1); cdat->drout_406__LAMBDA_.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_406__LAMBDA_, meltrout_28_warmelt_normatch_LAMBDA___7__); /*iniboxint dint_407__ */ /*_.VALBXINT___V492*/ meltfptr[491] = (melt_ptr_t) & cdat->dint_407__; cdat->dint_407__.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CONSTANT_INTEGER)))); cdat->dint_407__.val = 0; /*iniboxint dint_408__ */ /*_.VALBXINT___V493*/ meltfptr[492] = (melt_ptr_t) & cdat->dint_408__; cdat->dint_408__.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CONSTANT_INTEGER)))); cdat->dint_408__.val = 1; /*iniboxint dint_409__ */ /*_.VALBXINT___V494*/ meltfptr[493] = (melt_ptr_t) & cdat->dint_409__; cdat->dint_409__.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CONSTANT_INTEGER)))); cdat->dint_409__.val = -1; /*inirout drout_410__LAMBDA_ */ /*_.VALROUT___V495*/ meltfptr[494] = (melt_ptr_t) & cdat->drout_410__LAMBDA_; cdat->drout_410__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_410__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normatch.melt:1270", MELT_ROUTDESCR_LEN - 1); cdat->drout_410__LAMBDA_.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_410__LAMBDA_, meltrout_29_warmelt_normatch_LAMBDA___8__); /*iniobj dsym_411__CLASS_NREP_UNSAFE_NTH_COMPONENT*/ /*uniqueobj*/ if (! /*_.VALDATA___V505*/ meltfptr[504]) /*_.VALDATA___V505*/ meltfptr[504] = (melt_ptr_t) & cdat->dsym_411__CLASS_NREP_UNSAFE_NTH_COMPONENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_411__CLASS_NREP_UNSAFE_NTH_COMPONENT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_411__CLASS_NREP_UNSAFE_NTH_COMPONENT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_411__CLASS_NREP_UNSAFE_NTH_COMPONENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_411__CLASS_NREP_UNSAFE_NTH_COMPONENT.obj_hash = 888296044; cdat->dsym_411__CLASS_NREP_UNSAFE_NTH_COMPONENT.obj_len = 3; /*inistring dstr_412__CLASS_NREP_UNSAF*/ /*_.VALSTR___V506*/ meltfptr[505] = (melt_ptr_t) & cdat->dstr_412__CLASS_NREP_UNSAF; cdat->dstr_412__CLASS_NREP_UNSAF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_412__CLASS_NREP_UNSAF.val, "CLASS_NREP_UNSAFE_NTH_COMPONENT", sizeof (cdat->dstr_412__CLASS_NREP_UNSAF. val) - 1); cdat->dstr_412__CLASS_NREP_UNSAF.val[31] = (char) 0; cdat->dstr_412__CLASS_NREP_UNSAF.slen = 31; /*iniobj dsym_413__NTHCOMP*/ /*uniqueobj*/ if (! /*_.VALDATA___V496*/ meltfptr[495]) /*_.VALDATA___V496*/ meltfptr[495] = (melt_ptr_t) & cdat->dsym_413__NTHCOMP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_413__NTHCOMP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_413__NTHCOMP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_413__NTHCOMP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_413__NTHCOMP.obj_hash = 922601096; cdat->dsym_413__NTHCOMP.obj_len = 3; /*inistring dstr_414__NTHCOMP*/ /*_.VALSTR___V497*/ meltfptr[496] = (melt_ptr_t) & cdat->dstr_414__NTHCOMP; cdat->dstr_414__NTHCOMP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_414__NTHCOMP.val, "NTHCOMP", sizeof (cdat->dstr_414__NTHCOMP.val) - 1); cdat->dstr_414__NTHCOMP.val[7] = (char) 0; cdat->dstr_414__NTHCOMP.slen = 7; /*inirout drout_415__NORMPAT_ANDPAT */ /*_.VALROUT___V507*/ meltfptr[506] = (melt_ptr_t) & cdat->drout_415__NORMPAT_ANDPAT; cdat->drout_415__NORMPAT_ANDPAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_415__NORMPAT_ANDPAT.routdescr, "NORMPAT_ANDPAT @warmelt-normatch.melt:1346", MELT_ROUTDESCR_LEN - 1); cdat->drout_415__NORMPAT_ANDPAT.nbval = 11; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_415__NORMPAT_ANDPAT, meltrout_30_warmelt_normatch_NORMPAT_ANDPAT); /*iniclos dclo_416__NORMPAT_ANDPAT */ /*_.VALCLO___V509*/ meltfptr[508] = (melt_ptr_t) & cdat->dclo_416__NORMPAT_ANDPAT; cdat->dclo_416__NORMPAT_ANDPAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_416__NORMPAT_ANDPAT.nbval = 0; /*inirout drout_417__LAMBDA_ */ /*_.VALROUT___V508*/ meltfptr[507] = (melt_ptr_t) & cdat->drout_417__LAMBDA_; cdat->drout_417__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_417__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normatch.melt:1355", MELT_ROUTDESCR_LEN - 1); cdat->drout_417__LAMBDA_.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_417__LAMBDA_, meltrout_31_warmelt_normatch_LAMBDA___9__); /*inirout drout_418__NORMPAT_ORPAT */ /*_.VALROUT___V510*/ meltfptr[509] = (melt_ptr_t) & cdat->drout_418__NORMPAT_ORPAT; cdat->drout_418__NORMPAT_ORPAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_418__NORMPAT_ORPAT.routdescr, "NORMPAT_ORPAT @warmelt-normatch.melt:1395", MELT_ROUTDESCR_LEN - 1); cdat->drout_418__NORMPAT_ORPAT.nbval = 33; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_418__NORMPAT_ORPAT, meltrout_32_warmelt_normatch_NORMPAT_ORPAT); /*iniclos dclo_419__NORMPAT_ORPAT */ /*_.VALCLO___V514*/ meltfptr[513] = (melt_ptr_t) & cdat->dclo_419__NORMPAT_ORPAT; cdat->dclo_419__NORMPAT_ORPAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_419__NORMPAT_ORPAT.nbval = 0; /*iniobj dsym_420__MAPOBJECT_SORTED_ATTRIBUTE_TUPLE*/ /*uniqueobj*/ if (! /*_.VALDATA___V515*/ meltfptr[514]) /*_.VALDATA___V515*/ meltfptr[514] = (melt_ptr_t) & cdat->dsym_420__MAPOBJECT_SORTED_ATTRIBUTE_TUPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_420__MAPOBJECT_SORTED_ATTRIBUTE_TUPLE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_420__MAPOBJECT_SORTED_ATTRIBUTE_TUPLE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_420__MAPOBJECT_SORTED_ATTRIBUTE_TUPLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_420__MAPOBJECT_SORTED_ATTRIBUTE_TUPLE.obj_hash = 966537230; cdat->dsym_420__MAPOBJECT_SORTED_ATTRIBUTE_TUPLE.obj_len = 3; /*inistring dstr_421__MAPOBJECT_SORTED*/ /*_.VALSTR___V516*/ meltfptr[515] = (melt_ptr_t) & cdat->dstr_421__MAPOBJECT_SORTED; cdat->dstr_421__MAPOBJECT_SORTED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_421__MAPOBJECT_SORTED.val, "MAPOBJECT_SORTED_ATTRIBUTE_TUPLE", sizeof (cdat->dstr_421__MAPOBJECT_SORTED. val) - 1); cdat->dstr_421__MAPOBJECT_SORTED.val[32] = (char) 0; cdat->dstr_421__MAPOBJECT_SORTED.slen = 32; /*iniobj dsym_422__MULTIPLE_MAP*/ /*uniqueobj*/ if (! /*_.VALDATA___V517*/ meltfptr[516]) /*_.VALDATA___V517*/ meltfptr[516] = (melt_ptr_t) & cdat->dsym_422__MULTIPLE_MAP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_422__MULTIPLE_MAP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_422__MULTIPLE_MAP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_422__MULTIPLE_MAP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_422__MULTIPLE_MAP.obj_hash = 218301686; cdat->dsym_422__MULTIPLE_MAP.obj_len = 3; /*inistring dstr_423__MULTIPLE_MAP*/ /*_.VALSTR___V518*/ meltfptr[517] = (melt_ptr_t) & cdat->dstr_423__MULTIPLE_MAP; cdat->dstr_423__MULTIPLE_MAP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_423__MULTIPLE_MAP.val, "MULTIPLE_MAP", sizeof (cdat->dstr_423__MULTIPLE_MAP.val) - 1); cdat->dstr_423__MULTIPLE_MAP.val[12] = (char) 0; cdat->dstr_423__MULTIPLE_MAP.slen = 12; /*inirout drout_424__LAMBDA_ */ /*_.VALROUT___V511*/ meltfptr[510] = (melt_ptr_t) & cdat->drout_424__LAMBDA_; cdat->drout_424__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_424__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normatch.melt:1424", MELT_ROUTDESCR_LEN - 1); cdat->drout_424__LAMBDA_.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_424__LAMBDA_, meltrout_33_warmelt_normatch_LAMBDA___10__); /*iniobj dsym_425__CLASS_NREP*/ /*uniqueobj*/ if (! /*_.VALDATA___V519*/ meltfptr[518]) /*_.VALDATA___V519*/ meltfptr[518] = (melt_ptr_t) & cdat->dsym_425__CLASS_NREP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_425__CLASS_NREP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_425__CLASS_NREP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_425__CLASS_NREP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_425__CLASS_NREP.obj_hash = 704846736; cdat->dsym_425__CLASS_NREP.obj_len = 3; /*inistring dstr_426__CLASS_NREP*/ /*_.VALSTR___V520*/ meltfptr[519] = (melt_ptr_t) & cdat->dstr_426__CLASS_NREP; cdat->dstr_426__CLASS_NREP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_426__CLASS_NREP.val, "CLASS_NREP", sizeof (cdat->dstr_426__CLASS_NREP.val) - 1); cdat->dstr_426__CLASS_NREP.val[10] = (char) 0; cdat->dstr_426__CLASS_NREP.slen = 10; /*inirout drout_427__LAMBDA_ */ /*_.VALROUT___V512*/ meltfptr[511] = (melt_ptr_t) & cdat->drout_427__LAMBDA_; cdat->drout_427__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_427__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normatch.melt:1504", MELT_ROUTDESCR_LEN - 1); cdat->drout_427__LAMBDA_.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_427__LAMBDA_, meltrout_34_warmelt_normatch_LAMBDA___11__); /*inirout drout_428__LAMBDA_ */ /*_.VALROUT___V513*/ meltfptr[512] = (melt_ptr_t) & cdat->drout_428__LAMBDA_; cdat->drout_428__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_428__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normatch.melt:1558", 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___V521*/ meltfptr[520] = (melt_ptr_t) & cdat->drout_429__NORMPAT_ANYMATCHPAT; cdat->drout_429__NORMPAT_ANYMATCHPAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_429__NORMPAT_ANYMATCHPAT.routdescr, "NORMPAT_ANYMATCHPAT @warmelt-normatch.melt:1591", 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___V526*/ meltfptr[525] = (melt_ptr_t) & cdat->dclo_430__NORMPAT_ANYMATCHPAT; cdat->dclo_430__NORMPAT_ANYMATCHPAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_430__NORMPAT_ANYMATCHPAT.nbval = 0; /*iniobj dsym_431__CLASS_SOURCE_PATTERN_MATCHER*/ /*uniqueobj*/ if (! /*_.VALDATA___V527*/ meltfptr[526]) /*_.VALDATA___V527*/ meltfptr[526] = (melt_ptr_t) & 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", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_431__CLASS_SOURCE_PATTERN_MATCHER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_431__CLASS_SOURCE_PATTERN_MATCHER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_431__CLASS_SOURCE_PATTERN_MATCHER.obj_hash = 190682059; cdat->dsym_431__CLASS_SOURCE_PATTERN_MATCHER.obj_len = 3; /*inistring dstr_432__CLASS_SOURCE_PAT*/ /*_.VALSTR___V528*/ meltfptr[527] = (melt_ptr_t) & cdat->dstr_432__CLASS_SOURCE_PAT; cdat->dstr_432__CLASS_SOURCE_PAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_432__CLASS_SOURCE_PAT.val, "CLASS_SOURCE_PATTERN_MATCHER", sizeof (cdat->dstr_432__CLASS_SOURCE_PAT. val) - 1); cdat->dstr_432__CLASS_SOURCE_PAT.val[28] = (char) 0; cdat->dstr_432__CLASS_SOURCE_PAT.slen = 28; /*iniobj dsym_433__CLASS_ANY_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V529*/ meltfptr[528]) /*_.VALDATA___V529*/ meltfptr[528] = (melt_ptr_t) & 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 ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_433__CLASS_ANY_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_433__CLASS_ANY_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_433__CLASS_ANY_BINDING.obj_hash = 935770; cdat->dsym_433__CLASS_ANY_BINDING.obj_len = 3; /*inistring dstr_434__CLASS_ANY_BINDIN*/ /*_.VALSTR___V530*/ meltfptr[529] = (melt_ptr_t) & cdat->dstr_434__CLASS_ANY_BINDIN; cdat->dstr_434__CLASS_ANY_BINDIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_434__CLASS_ANY_BINDIN.val, "CLASS_ANY_BINDING", sizeof (cdat->dstr_434__CLASS_ANY_BINDIN. val) - 1); cdat->dstr_434__CLASS_ANY_BINDIN.val[17] = (char) 0; cdat->dstr_434__CLASS_ANY_BINDIN.slen = 17; /*iniobj dsym_435__FIND_ENV*/ /*uniqueobj*/ if (! /*_.VALDATA___V531*/ meltfptr[530]) /*_.VALDATA___V531*/ meltfptr[530] = (melt_ptr_t) & cdat->dsym_435__FIND_ENV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_435__FIND_ENV", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_435__FIND_ENV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_435__FIND_ENV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_435__FIND_ENV.obj_hash = 233459738; cdat->dsym_435__FIND_ENV.obj_len = 3; /*inistring dstr_436__FIND_ENV*/ /*_.VALSTR___V532*/ meltfptr[531] = (melt_ptr_t) & cdat->dstr_436__FIND_ENV; cdat->dstr_436__FIND_ENV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_436__FIND_ENV.val, "FIND_ENV", sizeof (cdat->dstr_436__FIND_ENV.val) - 1); cdat->dstr_436__FIND_ENV.val[8] = (char) 0; cdat->dstr_436__FIND_ENV.slen = 8; /*iniobj dsym_437__FRESH_ENV*/ /*uniqueobj*/ if (! /*_.VALDATA___V533*/ meltfptr[532]) /*_.VALDATA___V533*/ meltfptr[532] = (melt_ptr_t) & cdat->dsym_437__FRESH_ENV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_437__FRESH_ENV", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_437__FRESH_ENV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_437__FRESH_ENV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_437__FRESH_ENV.obj_hash = 1002363940; cdat->dsym_437__FRESH_ENV.obj_len = 3; /*inistring dstr_438__FRESH_ENV*/ /*_.VALSTR___V534*/ meltfptr[533] = (melt_ptr_t) & cdat->dstr_438__FRESH_ENV; cdat->dstr_438__FRESH_ENV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_438__FRESH_ENV.val, "FRESH_ENV", sizeof (cdat->dstr_438__FRESH_ENV.val) - 1); cdat->dstr_438__FRESH_ENV.val[9] = (char) 0; cdat->dstr_438__FRESH_ENV.slen = 9; /*iniobj dsym_439__PUT_ENV*/ /*uniqueobj*/ if (! /*_.VALDATA___V535*/ meltfptr[534]) /*_.VALDATA___V535*/ meltfptr[534] = (melt_ptr_t) & cdat->dsym_439__PUT_ENV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_439__PUT_ENV", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_439__PUT_ENV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_439__PUT_ENV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_439__PUT_ENV.obj_hash = 440202203; cdat->dsym_439__PUT_ENV.obj_len = 3; /*inistring dstr_440__PUT_ENV*/ /*_.VALSTR___V536*/ meltfptr[535] = (melt_ptr_t) & cdat->dstr_440__PUT_ENV; cdat->dstr_440__PUT_ENV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_440__PUT_ENV.val, "PUT_ENV", sizeof (cdat->dstr_440__PUT_ENV.val) - 1); cdat->dstr_440__PUT_ENV.val[7] = (char) 0; cdat->dstr_440__PUT_ENV.slen = 7; /*inirout drout_441__LAMBDA_ */ /*_.VALROUT___V522*/ meltfptr[521] = (melt_ptr_t) & cdat->drout_441__LAMBDA_; cdat->drout_441__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_441__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normatch.melt:1729", 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___V523*/ meltfptr[522] = (melt_ptr_t) & cdat->drout_442__LAMBDA_; cdat->drout_442__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_442__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normatch.melt:1742", 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___V524*/ meltfptr[523] = (melt_ptr_t) & cdat->drout_443__LAMBDA_; cdat->drout_443__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_443__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normatch.melt:1754", 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___V537*/ meltfptr[536]) /*_.VALDATA___V537*/ meltfptr[536] = (melt_ptr_t) & 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 ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_444__MULTIPLE_TO_LIST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_444__MULTIPLE_TO_LIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_444__MULTIPLE_TO_LIST.obj_hash = 622139769; cdat->dsym_444__MULTIPLE_TO_LIST.obj_len = 3; /*inistring dstr_445__MULTIPLE_TO_LIST*/ /*_.VALSTR___V538*/ meltfptr[537] = (melt_ptr_t) & cdat->dstr_445__MULTIPLE_TO_LIST; cdat->dstr_445__MULTIPLE_TO_LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_445__MULTIPLE_TO_LIST.val, "MULTIPLE_TO_LIST", sizeof (cdat->dstr_445__MULTIPLE_TO_LIST. val) - 1); cdat->dstr_445__MULTIPLE_TO_LIST.val[16] = (char) 0; cdat->dstr_445__MULTIPLE_TO_LIST.slen = 16; /*inirout drout_446__LAMBDA_ */ /*_.VALROUT___V525*/ meltfptr[524] = (melt_ptr_t) & cdat->drout_446__LAMBDA_; cdat->drout_446__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_446__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normatch.melt:1825", 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___V539*/ meltfptr[538] = (melt_ptr_t) & cdat->drout_447__NORMPAT_CONSTPAT; cdat->drout_447__NORMPAT_CONSTPAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_447__NORMPAT_CONSTPAT.routdescr, "NORMPAT_CONSTPAT @warmelt-normatch.melt:1851", 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___V541*/ meltfptr[540] = (melt_ptr_t) & cdat->dclo_448__NORMPAT_CONSTPAT; cdat->dclo_448__NORMPAT_CONSTPAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_448__NORMPAT_CONSTPAT.nbval = 0; /*inirout drout_449__LAMBDA_ */ /*_.VALROUT___V540*/ meltfptr[539] = (melt_ptr_t) & cdat->drout_449__LAMBDA_; cdat->drout_449__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_449__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normatch.melt:1885", 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___V542*/ meltfptr[541]) /*_.VALDATA___V542*/ meltfptr[541] = (melt_ptr_t) & 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", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_450__MATCH_GRAPHIC_DOT_PREFIX", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_450__MATCH_GRAPHIC_DOT_PREFIX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_450__MATCH_GRAPHIC_DOT_PREFIX.obj_hash = 949911079; cdat->dsym_450__MATCH_GRAPHIC_DOT_PREFIX.obj_len = 3; /*inistring dstr_451__MATCH_GRAPHIC_DO*/ /*_.VALSTR___V543*/ meltfptr[542] = (melt_ptr_t) & cdat->dstr_451__MATCH_GRAPHIC_DO; cdat->dstr_451__MATCH_GRAPHIC_DO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_451__MATCH_GRAPHIC_DO.val, "MATCH_GRAPHIC_DOT_PREFIX", sizeof (cdat->dstr_451__MATCH_GRAPHIC_DO. val) - 1); cdat->dstr_451__MATCH_GRAPHIC_DO.val[24] = (char) 0; cdat->dstr_451__MATCH_GRAPHIC_DO.slen = 24; MELT_LOCATION ("warmelt-normatch.melt:1927:/ iniobj"); /*iniobj dobj_452__MATCH_GRAPHIC_DOT_PREFIX*/ /*_.VALDATA___V544*/ meltfptr[543] = (melt_ptr_t) & cdat->dobj_452__MATCH_GRAPHIC_DOT_PREFIX; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_452__MATCH_GRAPHIC_DOT_PREFIX", melt_magic_discr ((melt_ptr_t) ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38])) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_452__MATCH_GRAPHIC_DOT_PREFIX", ((meltobject_ptr_t) ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38]))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_452__MATCH_GRAPHIC_DOT_PREFIX.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38]); cdat->dobj_452__MATCH_GRAPHIC_DOT_PREFIX.obj_hash = 467395818; cdat->dobj_452__MATCH_GRAPHIC_DOT_PREFIX.obj_len = 1; /*inirout drout_453__MATCH_GRAPHIC_OPTSET */ /*_.VALROUT___V545*/ meltfptr[544] = (melt_ptr_t) & cdat->drout_453__MATCH_GRAPHIC_OPTSET; cdat->drout_453__MATCH_GRAPHIC_OPTSET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_453__MATCH_GRAPHIC_OPTSET.routdescr, "MATCH_GRAPHIC_OPTSET @warmelt-normatch.melt:1930", 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___V546*/ meltfptr[545] = (melt_ptr_t) & cdat->dclo_454__MATCH_GRAPHIC_OPTSET; cdat->dclo_454__MATCH_GRAPHIC_OPTSET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_454__MATCH_GRAPHIC_OPTSET.nbval = 0; /*iniobj dsym_455__DISCR_STRING*/ /*uniqueobj*/ if (! /*_.VALDATA___V547*/ meltfptr[546]) /*_.VALDATA___V547*/ meltfptr[546] = (melt_ptr_t) & cdat->dsym_455__DISCR_STRING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_455__DISCR_STRING", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_455__DISCR_STRING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_455__DISCR_STRING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_455__DISCR_STRING.obj_hash = 100436219; cdat->dsym_455__DISCR_STRING.obj_len = 3; /*inistring dstr_456__DISCR_STRING*/ /*_.VALSTR___V548*/ meltfptr[547] = (melt_ptr_t) & cdat->dstr_456__DISCR_STRING; cdat->dstr_456__DISCR_STRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_456__DISCR_STRING.val, "DISCR_STRING", sizeof (cdat->dstr_456__DISCR_STRING.val) - 1); cdat->dstr_456__DISCR_STRING.val[12] = (char) 0; cdat->dstr_456__DISCR_STRING.slen = 12; /*iniobj dsym_457__REGISTER_OPTION*/ /*uniqueobj*/ if (! /*_.VALDATA___V549*/ meltfptr[548]) /*_.VALDATA___V549*/ meltfptr[548] = (melt_ptr_t) & cdat->dsym_457__REGISTER_OPTION; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_457__REGISTER_OPTION", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_457__REGISTER_OPTION", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_457__REGISTER_OPTION.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_457__REGISTER_OPTION.obj_hash = 32231349; cdat->dsym_457__REGISTER_OPTION.obj_len = 3; /*inistring dstr_458__REGISTER_OPTION*/ /*_.VALSTR___V550*/ meltfptr[549] = (melt_ptr_t) & cdat->dstr_458__REGISTER_OPTION; cdat->dstr_458__REGISTER_OPTION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_458__REGISTER_OPTION.val, "REGISTER_OPTION", sizeof (cdat->dstr_458__REGISTER_OPTION.val) - 1); cdat->dstr_458__REGISTER_OPTION.val[15] = (char) 0; cdat->dstr_458__REGISTER_OPTION.slen = 15; /*iniobj dsym_459__MATCH_GRAPHIC*/ /*uniqueobj*/ if (! /*_.VALDATA___V551*/ meltfptr[550]) /*_.VALDATA___V551*/ meltfptr[550] = (melt_ptr_t) & cdat->dsym_459__MATCH_GRAPHIC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_459__MATCH_GRAPHIC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_459__MATCH_GRAPHIC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_459__MATCH_GRAPHIC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_459__MATCH_GRAPHIC.obj_hash = 878477646; cdat->dsym_459__MATCH_GRAPHIC.obj_len = 3; /*inistring dstr_460__MATCH_GRAPHIC*/ /*_.VALSTR___V552*/ meltfptr[551] = (melt_ptr_t) & cdat->dstr_460__MATCH_GRAPHIC; cdat->dstr_460__MATCH_GRAPHIC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_460__MATCH_GRAPHIC.val, "MATCH_GRAPHIC", sizeof (cdat->dstr_460__MATCH_GRAPHIC.val) - 1); cdat->dstr_460__MATCH_GRAPHIC.val[13] = (char) 0; cdat->dstr_460__MATCH_GRAPHIC.slen = 13; /*inistring dstr_461__Prefix_for_Graph*/ /*_.VALSTR___V553*/ meltfptr[552] = (melt_ptr_t) & cdat->dstr_461__Prefix_for_Graph; cdat->dstr_461__Prefix_for_Graph.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_461__Prefix_for_Graph.val, "Prefix for Graphviz .dot files generated about match normalization\ when debugging", sizeof (cdat->dstr_461__Prefix_for_Graph.val) - 1); cdat->dstr_461__Prefix_for_Graph.val[81] = (char) 0; cdat->dstr_461__Prefix_for_Graph.slen = 81; /*iniobj dsym_462__CLASS_MATCH_GRAPHIC*/ /*uniqueobj*/ if (! /*_.VALDATA___V554*/ meltfptr[553]) /*_.VALDATA___V554*/ meltfptr[553] = (melt_ptr_t) & 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 ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_462__CLASS_MATCH_GRAPHIC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_462__CLASS_MATCH_GRAPHIC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_462__CLASS_MATCH_GRAPHIC.obj_hash = 324998787; cdat->dsym_462__CLASS_MATCH_GRAPHIC.obj_len = 3; /*inistring dstr_463__CLASS_MATCH_GRAP*/ /*_.VALSTR___V555*/ meltfptr[554] = (melt_ptr_t) & cdat->dstr_463__CLASS_MATCH_GRAP; cdat->dstr_463__CLASS_MATCH_GRAP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_463__CLASS_MATCH_GRAP.val, "CLASS_MATCH_GRAPHIC", sizeof (cdat->dstr_463__CLASS_MATCH_GRAP. val) - 1); cdat->dstr_463__CLASS_MATCH_GRAP.val[19] = (char) 0; cdat->dstr_463__CLASS_MATCH_GRAP.slen = 19; /*iniobj dsym_464__CLASS_PROPED*/ /*uniqueobj*/ if (! /*_.VALDATA___V556*/ meltfptr[555]) /*_.VALDATA___V556*/ meltfptr[555] = (melt_ptr_t) & cdat->dsym_464__CLASS_PROPED; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_464__CLASS_PROPED", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_464__CLASS_PROPED", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_464__CLASS_PROPED.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_464__CLASS_PROPED.obj_hash = 96765023; cdat->dsym_464__CLASS_PROPED.obj_len = 3; /*inistring dstr_465__CLASS_PROPED*/ /*_.VALSTR___V557*/ meltfptr[556] = (melt_ptr_t) & cdat->dstr_465__CLASS_PROPED; cdat->dstr_465__CLASS_PROPED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_465__CLASS_PROPED.val, "CLASS_PROPED", sizeof (cdat->dstr_465__CLASS_PROPED.val) - 1); cdat->dstr_465__CLASS_PROPED.val[12] = (char) 0; cdat->dstr_465__CLASS_PROPED.slen = 12; MELT_LOCATION ("warmelt-normatch.melt:1945:/ iniobj"); /*iniobj dobj_466__CLASS_MATCH_GRAPHIC*/ /*_.VALDATA___V558*/ meltfptr[557] = (melt_ptr_t) & cdat->dobj_466__CLASS_MATCH_GRAPHIC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_466__CLASS_MATCH_GRAPHIC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_466__CLASS_MATCH_GRAPHIC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_466__CLASS_MATCH_GRAPHIC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_466__CLASS_MATCH_GRAPHIC.obj_num = MELTOBMAG_OBJECT; cdat->dobj_466__CLASS_MATCH_GRAPHIC.obj_hash = 48511765; cdat->dobj_466__CLASS_MATCH_GRAPHIC.obj_len = 8; /*inistring dstr_467__CLASS_MATCH_GRAP*/ /*_.VALSTR___V559*/ meltfptr[558] = (melt_ptr_t) & cdat->dstr_467__CLASS_MATCH_GRAP; cdat->dstr_467__CLASS_MATCH_GRAP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_467__CLASS_MATCH_GRAP.val, "CLASS_MATCH_GRAPHIC", sizeof (cdat->dstr_467__CLASS_MATCH_GRAP. val) - 1); cdat->dstr_467__CLASS_MATCH_GRAP.val[19] = (char) 0; cdat->dstr_467__CLASS_MATCH_GRAP.slen = 19; /*inimult dtup_468__CLASS_MATCH_GRAPHIC */ /*_.VALTUP___V560*/ meltfptr[559] = (melt_ptr_t) & cdat->dtup_468__CLASS_MATCH_GRAPHIC; cdat->dtup_468__CLASS_MATCH_GRAPHIC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_468__CLASS_MATCH_GRAPHIC.nbval = 2; /*inimult dtup_469__CLASS_MATCH_GRAPHIC */ /*_.VALTUP___V571*/ meltfptr[570] = (melt_ptr_t) & cdat->dtup_469__CLASS_MATCH_GRAPHIC; cdat->dtup_469__CLASS_MATCH_GRAPHIC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_469__CLASS_MATCH_GRAPHIC.nbval = 6; /*iniobj dsym_470__MCHGX_FILENAME*/ /*uniqueobj*/ if (! /*_.VALDATA___V572*/ meltfptr[571]) /*_.VALDATA___V572*/ meltfptr[571] = (melt_ptr_t) & cdat->dsym_470__MCHGX_FILENAME; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_470__MCHGX_FILENAME", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_470__MCHGX_FILENAME", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_470__MCHGX_FILENAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_470__MCHGX_FILENAME.obj_hash = 400967144; cdat->dsym_470__MCHGX_FILENAME.obj_len = 3; /*inistring dstr_471__MCHGX_FILENAME*/ /*_.VALSTR___V573*/ meltfptr[572] = (melt_ptr_t) & cdat->dstr_471__MCHGX_FILENAME; cdat->dstr_471__MCHGX_FILENAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_471__MCHGX_FILENAME.val, "MCHGX_FILENAME", sizeof (cdat->dstr_471__MCHGX_FILENAME.val) - 1); cdat->dstr_471__MCHGX_FILENAME.val[14] = (char) 0; cdat->dstr_471__MCHGX_FILENAME.slen = 14; /*^iniobj */ /*iniobj dobj_472__MCHGX_FILENAME*/ /*_.VALDATA___V561*/ meltfptr[560] = (melt_ptr_t) & cdat->dobj_472__MCHGX_FILENAME; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_472__MCHGX_FILENAME", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_472__MCHGX_FILENAME", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_472__MCHGX_FILENAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_472__MCHGX_FILENAME.obj_num = 1; cdat->dobj_472__MCHGX_FILENAME.obj_hash = 856032450; cdat->dobj_472__MCHGX_FILENAME.obj_len = 4; /*inistring dstr_473__MCHGX_FILENAME*/ /*_.VALSTR___V562*/ meltfptr[561] = (melt_ptr_t) & cdat->dstr_473__MCHGX_FILENAME; cdat->dstr_473__MCHGX_FILENAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_473__MCHGX_FILENAME.val, "MCHGX_FILENAME", sizeof (cdat->dstr_473__MCHGX_FILENAME.val) - 1); cdat->dstr_473__MCHGX_FILENAME.val[14] = (char) 0; cdat->dstr_473__MCHGX_FILENAME.slen = 14; /*iniobj dsym_474__MCHGX_NODOUT*/ /*uniqueobj*/ if (! /*_.VALDATA___V574*/ meltfptr[573]) /*_.VALDATA___V574*/ meltfptr[573] = (melt_ptr_t) & cdat->dsym_474__MCHGX_NODOUT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_474__MCHGX_NODOUT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_474__MCHGX_NODOUT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_474__MCHGX_NODOUT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_474__MCHGX_NODOUT.obj_hash = 785030616; cdat->dsym_474__MCHGX_NODOUT.obj_len = 3; /*inistring dstr_475__MCHGX_NODOUT*/ /*_.VALSTR___V575*/ meltfptr[574] = (melt_ptr_t) & cdat->dstr_475__MCHGX_NODOUT; cdat->dstr_475__MCHGX_NODOUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_475__MCHGX_NODOUT.val, "MCHGX_NODOUT", sizeof (cdat->dstr_475__MCHGX_NODOUT.val) - 1); cdat->dstr_475__MCHGX_NODOUT.val[12] = (char) 0; cdat->dstr_475__MCHGX_NODOUT.slen = 12; /*^iniobj */ /*iniobj dobj_476__MCHGX_NODOUT*/ /*_.VALDATA___V563*/ meltfptr[562] = (melt_ptr_t) & cdat->dobj_476__MCHGX_NODOUT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_476__MCHGX_NODOUT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_476__MCHGX_NODOUT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_476__MCHGX_NODOUT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_476__MCHGX_NODOUT.obj_num = 2; cdat->dobj_476__MCHGX_NODOUT.obj_hash = 695191415; cdat->dobj_476__MCHGX_NODOUT.obj_len = 4; /*inistring dstr_477__MCHGX_NODOUT*/ /*_.VALSTR___V564*/ meltfptr[563] = (melt_ptr_t) & cdat->dstr_477__MCHGX_NODOUT; cdat->dstr_477__MCHGX_NODOUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_477__MCHGX_NODOUT.val, "MCHGX_NODOUT", sizeof (cdat->dstr_477__MCHGX_NODOUT.val) - 1); cdat->dstr_477__MCHGX_NODOUT.val[12] = (char) 0; cdat->dstr_477__MCHGX_NODOUT.slen = 12; /*iniobj dsym_478__MCHGX_EDGOUT*/ /*uniqueobj*/ if (! /*_.VALDATA___V576*/ meltfptr[575]) /*_.VALDATA___V576*/ meltfptr[575] = (melt_ptr_t) & cdat->dsym_478__MCHGX_EDGOUT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_478__MCHGX_EDGOUT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_478__MCHGX_EDGOUT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_478__MCHGX_EDGOUT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_478__MCHGX_EDGOUT.obj_hash = 947353472; cdat->dsym_478__MCHGX_EDGOUT.obj_len = 3; /*inistring dstr_479__MCHGX_EDGOUT*/ /*_.VALSTR___V577*/ meltfptr[576] = (melt_ptr_t) & cdat->dstr_479__MCHGX_EDGOUT; cdat->dstr_479__MCHGX_EDGOUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_479__MCHGX_EDGOUT.val, "MCHGX_EDGOUT", sizeof (cdat->dstr_479__MCHGX_EDGOUT.val) - 1); cdat->dstr_479__MCHGX_EDGOUT.val[12] = (char) 0; cdat->dstr_479__MCHGX_EDGOUT.slen = 12; /*^iniobj */ /*iniobj dobj_480__MCHGX_EDGOUT*/ /*_.VALDATA___V565*/ meltfptr[564] = (melt_ptr_t) & cdat->dobj_480__MCHGX_EDGOUT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_480__MCHGX_EDGOUT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_480__MCHGX_EDGOUT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_480__MCHGX_EDGOUT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_480__MCHGX_EDGOUT.obj_num = 3; cdat->dobj_480__MCHGX_EDGOUT.obj_hash = 309078792; cdat->dobj_480__MCHGX_EDGOUT.obj_len = 4; /*inistring dstr_481__MCHGX_EDGOUT*/ /*_.VALSTR___V566*/ meltfptr[565] = (melt_ptr_t) & cdat->dstr_481__MCHGX_EDGOUT; cdat->dstr_481__MCHGX_EDGOUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_481__MCHGX_EDGOUT.val, "MCHGX_EDGOUT", sizeof (cdat->dstr_481__MCHGX_EDGOUT.val) - 1); cdat->dstr_481__MCHGX_EDGOUT.val[12] = (char) 0; cdat->dstr_481__MCHGX_EDGOUT.slen = 12; /*iniobj dsym_482__MCHGX_DATANAMEMAP*/ /*uniqueobj*/ if (! /*_.VALDATA___V578*/ meltfptr[577]) /*_.VALDATA___V578*/ meltfptr[577] = (melt_ptr_t) & cdat->dsym_482__MCHGX_DATANAMEMAP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_482__MCHGX_DATANAMEMAP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_482__MCHGX_DATANAMEMAP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_482__MCHGX_DATANAMEMAP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_482__MCHGX_DATANAMEMAP.obj_hash = 607366823; cdat->dsym_482__MCHGX_DATANAMEMAP.obj_len = 3; /*inistring dstr_483__MCHGX_DATANAMEMA*/ /*_.VALSTR___V579*/ meltfptr[578] = (melt_ptr_t) & cdat->dstr_483__MCHGX_DATANAMEMA; cdat->dstr_483__MCHGX_DATANAMEMA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_483__MCHGX_DATANAMEMA.val, "MCHGX_DATANAMEMAP", sizeof (cdat->dstr_483__MCHGX_DATANAMEMA. val) - 1); cdat->dstr_483__MCHGX_DATANAMEMA.val[17] = (char) 0; cdat->dstr_483__MCHGX_DATANAMEMA.slen = 17; /*^iniobj */ /*iniobj dobj_484__MCHGX_DATANAMEMAP*/ /*_.VALDATA___V567*/ meltfptr[566] = (melt_ptr_t) & cdat->dobj_484__MCHGX_DATANAMEMAP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_484__MCHGX_DATANAMEMAP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_484__MCHGX_DATANAMEMAP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_484__MCHGX_DATANAMEMAP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_484__MCHGX_DATANAMEMAP.obj_num = 4; cdat->dobj_484__MCHGX_DATANAMEMAP.obj_hash = 480231655; cdat->dobj_484__MCHGX_DATANAMEMAP.obj_len = 4; /*inistring dstr_485__MCHGX_DATANAMEMA*/ /*_.VALSTR___V568*/ meltfptr[567] = (melt_ptr_t) & cdat->dstr_485__MCHGX_DATANAMEMA; cdat->dstr_485__MCHGX_DATANAMEMA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_485__MCHGX_DATANAMEMA.val, "MCHGX_DATANAMEMAP", sizeof (cdat->dstr_485__MCHGX_DATANAMEMA. val) - 1); cdat->dstr_485__MCHGX_DATANAMEMA.val[17] = (char) 0; cdat->dstr_485__MCHGX_DATANAMEMA.slen = 17; /*iniobj dsym_486__MCHGX_STEPNAMEMAP*/ /*uniqueobj*/ if (! /*_.VALDATA___V580*/ meltfptr[579]) /*_.VALDATA___V580*/ meltfptr[579] = (melt_ptr_t) & cdat->dsym_486__MCHGX_STEPNAMEMAP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_486__MCHGX_STEPNAMEMAP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_486__MCHGX_STEPNAMEMAP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_486__MCHGX_STEPNAMEMAP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_486__MCHGX_STEPNAMEMAP.obj_hash = 431904209; cdat->dsym_486__MCHGX_STEPNAMEMAP.obj_len = 3; /*inistring dstr_487__MCHGX_STEPNAMEMA*/ /*_.VALSTR___V581*/ meltfptr[580] = (melt_ptr_t) & cdat->dstr_487__MCHGX_STEPNAMEMA; cdat->dstr_487__MCHGX_STEPNAMEMA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_487__MCHGX_STEPNAMEMA.val, "MCHGX_STEPNAMEMAP", sizeof (cdat->dstr_487__MCHGX_STEPNAMEMA. val) - 1); cdat->dstr_487__MCHGX_STEPNAMEMA.val[17] = (char) 0; cdat->dstr_487__MCHGX_STEPNAMEMA.slen = 17; /*^iniobj */ /*iniobj dobj_488__MCHGX_STEPNAMEMAP*/ /*_.VALDATA___V569*/ meltfptr[568] = (melt_ptr_t) & cdat->dobj_488__MCHGX_STEPNAMEMAP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_488__MCHGX_STEPNAMEMAP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_488__MCHGX_STEPNAMEMAP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_488__MCHGX_STEPNAMEMAP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_488__MCHGX_STEPNAMEMAP.obj_num = 5; cdat->dobj_488__MCHGX_STEPNAMEMAP.obj_hash = 870901769; cdat->dobj_488__MCHGX_STEPNAMEMAP.obj_len = 4; /*inistring dstr_489__MCHGX_STEPNAMEMA*/ /*_.VALSTR___V570*/ meltfptr[569] = (melt_ptr_t) & cdat->dstr_489__MCHGX_STEPNAMEMA; cdat->dstr_489__MCHGX_STEPNAMEMA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_489__MCHGX_STEPNAMEMA.val, "MCHGX_STEPNAMEMAP", sizeof (cdat->dstr_489__MCHGX_STEPNAMEMA. val) - 1); cdat->dstr_489__MCHGX_STEPNAMEMA.val[17] = (char) 0; cdat->dstr_489__MCHGX_STEPNAMEMA.slen = 17; /*inirout drout_490__MG_OUT_NODE_NAME */ /*_.VALROUT___V582*/ meltfptr[581] = (melt_ptr_t) & cdat->drout_490__MG_OUT_NODE_NAME; cdat->drout_490__MG_OUT_NODE_NAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_490__MG_OUT_NODE_NAME.routdescr, "MG_OUT_NODE_NAME @warmelt-normatch.melt:1959", 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___V583*/ meltfptr[582] = (melt_ptr_t) & cdat->dclo_491__MG_OUT_NODE_NAME; cdat->dclo_491__MG_OUT_NODE_NAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_491__MG_OUT_NODE_NAME.nbval = 0; /*iniobj dsym_492__MATCHGRAPHIC_LABEL*/ /*uniqueobj*/ if (! /*_.VALDATA___V584*/ meltfptr[583]) /*_.VALDATA___V584*/ meltfptr[583] = (melt_ptr_t) & cdat->dsym_492__MATCHGRAPHIC_LABEL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_492__MATCHGRAPHIC_LABEL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_492__MATCHGRAPHIC_LABEL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_492__MATCHGRAPHIC_LABEL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_492__MATCHGRAPHIC_LABEL.obj_hash = 798151454; cdat->dsym_492__MATCHGRAPHIC_LABEL.obj_len = 3; /*inistring dstr_493__MATCHGRAPHIC_LAB*/ /*_.VALSTR___V585*/ meltfptr[584] = (melt_ptr_t) & cdat->dstr_493__MATCHGRAPHIC_LAB; cdat->dstr_493__MATCHGRAPHIC_LAB.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_493__MATCHGRAPHIC_LAB.val, "MATCHGRAPHIC_LABEL", sizeof (cdat->dstr_493__MATCHGRAPHIC_LAB. val) - 1); cdat->dstr_493__MATCHGRAPHIC_LAB.val[18] = (char) 0; cdat->dstr_493__MATCHGRAPHIC_LAB.slen = 18; MELT_LOCATION ("warmelt-normatch.melt:1983:/ iniobj"); /*iniobj dobj_494__MATCHGRAPHIC_LABEL*/ /*_.VALDATA___V586*/ meltfptr[585] = (melt_ptr_t) & cdat->dobj_494__MATCHGRAPHIC_LABEL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_494__MATCHGRAPHIC_LABEL", melt_magic_discr ((melt_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7])) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_494__MATCHGRAPHIC_LABEL", ((meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]))-> 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 = 663109910; cdat->dobj_494__MATCHGRAPHIC_LABEL.obj_len = 4; /*inistring dstr_495__MATCHGRAPHIC_LAB*/ /*_.VALSTR___V587*/ meltfptr[586] = (melt_ptr_t) & cdat->dstr_495__MATCHGRAPHIC_LAB; cdat->dstr_495__MATCHGRAPHIC_LAB.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_495__MATCHGRAPHIC_LAB.val, "MATCHGRAPHIC_LABEL", sizeof (cdat->dstr_495__MATCHGRAPHIC_LAB. val) - 1); cdat->dstr_495__MATCHGRAPHIC_LAB.val[18] = (char) 0; cdat->dstr_495__MATCHGRAPHIC_LAB.slen = 18; /*inirout drout_496__MGLABEL_ANY */ /*_.VALROUT___V588*/ meltfptr[587] = (melt_ptr_t) & cdat->drout_496__MGLABEL_ANY; cdat->drout_496__MGLABEL_ANY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_496__MGLABEL_ANY.routdescr, "MGLABEL_ANY @warmelt-normatch.melt:1985", 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___V589*/ meltfptr[588] = (melt_ptr_t) & cdat->dclo_497__MGLABEL_ANY; cdat->dclo_497__MGLABEL_ANY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_497__MGLABEL_ANY.nbval = 0; /*inirout drout_498__MGLABEL_ANY_TEST */ /*_.VALROUT___V590*/ meltfptr[589] = (melt_ptr_t) & cdat->drout_498__MGLABEL_ANY_TEST; cdat->drout_498__MGLABEL_ANY_TEST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_498__MGLABEL_ANY_TEST.routdescr, "MGLABEL_ANY_TEST @warmelt-normatch.melt:1995", MELT_ROUTDESCR_LEN - 1); 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___V591*/ meltfptr[590] = (melt_ptr_t) & cdat->dclo_499__MGLABEL_ANY_TEST; cdat->dclo_499__MGLABEL_ANY_TEST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_499__MGLABEL_ANY_TEST.nbval = 0; /*iniobj dsym_500__CLASS_CLONED_SYMBOL*/ /*uniqueobj*/ if (! /*_.VALDATA___V592*/ meltfptr[591]) /*_.VALDATA___V592*/ meltfptr[591] = (melt_ptr_t) & cdat->dsym_500__CLASS_CLONED_SYMBOL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_500__CLASS_CLONED_SYMBOL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_500__CLASS_CLONED_SYMBOL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_500__CLASS_CLONED_SYMBOL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_500__CLASS_CLONED_SYMBOL.obj_hash = 933549728; cdat->dsym_500__CLASS_CLONED_SYMBOL.obj_len = 3; /*inistring dstr_501__CLASS_CLONED_SYM*/ /*_.VALSTR___V593*/ meltfptr[592] = (melt_ptr_t) & cdat->dstr_501__CLASS_CLONED_SYM; cdat->dstr_501__CLASS_CLONED_SYM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_501__CLASS_CLONED_SYM.val, "CLASS_CLONED_SYMBOL", sizeof (cdat->dstr_501__CLASS_CLONED_SYM. val) - 1); cdat->dstr_501__CLASS_CLONED_SYM.val[19] = (char) 0; cdat->dstr_501__CLASS_CLONED_SYM.slen = 19; /*inirout drout_502__MGLABEL_INSTANCE_TEST */ /*_.VALROUT___V594*/ meltfptr[593] = (melt_ptr_t) & cdat->drout_502__MGLABEL_INSTANCE_TEST; cdat->drout_502__MGLABEL_INSTANCE_TEST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_502__MGLABEL_INSTANCE_TEST.routdescr, "MGLABEL_INSTANCE_TEST @warmelt-normatch.melt:2055", MELT_ROUTDESCR_LEN - 1); 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___V595*/ meltfptr[594] = (melt_ptr_t) & cdat->dclo_503__MGLABEL_INSTANCE_TEST; cdat->dclo_503__MGLABEL_INSTANCE_TEST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_503__MGLABEL_INSTANCE_TEST.nbval = 0; /*inirout drout_504__MGLABEL_SUCCESS_TEST */ /*_.VALROUT___V596*/ meltfptr[595] = (melt_ptr_t) & cdat->drout_504__MGLABEL_SUCCESS_TEST; cdat->drout_504__MGLABEL_SUCCESS_TEST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_504__MGLABEL_SUCCESS_TEST.routdescr, "MGLABEL_SUCCESS_TEST @warmelt-normatch.melt:2120", MELT_ROUTDESCR_LEN - 1); 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___V597*/ meltfptr[596] = (melt_ptr_t) & cdat->dclo_505__MGLABEL_SUCCESS_TEST; cdat->dclo_505__MGLABEL_SUCCESS_TEST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_505__MGLABEL_SUCCESS_TEST.nbval = 0; /*inirout drout_506__MATCHGRAPHIC_TESTS */ /*_.VALROUT___V598*/ meltfptr[597] = (melt_ptr_t) & cdat->drout_506__MATCHGRAPHIC_TESTS; cdat->drout_506__MATCHGRAPHIC_TESTS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_506__MATCHGRAPHIC_TESTS.routdescr, "MATCHGRAPHIC_TESTS @warmelt-normatch.melt:2160", MELT_ROUTDESCR_LEN - 1); 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___V599*/ meltfptr[598] = (melt_ptr_t) & cdat->dclo_507__MATCHGRAPHIC_TESTS; cdat->dclo_507__MATCHGRAPHIC_TESTS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_507__MATCHGRAPHIC_TESTS.nbval = 0; /*inirout drout_508__MG_DRAW_MATCH_GRAPHVIZ_FILE */ /*_.VALROUT___V600*/ meltfptr[599] = (melt_ptr_t) & cdat->drout_508__MG_DRAW_MATCH_GRAPHVIZ_FILE; cdat->drout_508__MG_DRAW_MATCH_GRAPHVIZ_FILE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_508__MG_DRAW_MATCH_GRAPHVIZ_FILE.routdescr, "MG_DRAW_MATCH_GRAPHVIZ_FILE @warmelt-normatch.melt:2213", MELT_ROUTDESCR_LEN - 1); 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___V601*/ meltfptr[600] = (melt_ptr_t) & cdat->dclo_509__MG_DRAW_MATCH_GRAPHVIZ_FILE; cdat->dclo_509__MG_DRAW_MATCH_GRAPHVIZ_FILE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_509__MG_DRAW_MATCH_GRAPHVIZ_FILE.nbval = 0; /*iniobj dsym_510__DISCR_STRBUF*/ /*uniqueobj*/ if (! /*_.VALDATA___V602*/ meltfptr[601]) /*_.VALDATA___V602*/ meltfptr[601] = (melt_ptr_t) & cdat->dsym_510__DISCR_STRBUF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_510__DISCR_STRBUF", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_510__DISCR_STRBUF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_510__DISCR_STRBUF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_510__DISCR_STRBUF.obj_hash = 492035674; cdat->dsym_510__DISCR_STRBUF.obj_len = 3; /*inistring dstr_511__DISCR_STRBUF*/ /*_.VALSTR___V603*/ meltfptr[602] = (melt_ptr_t) & cdat->dstr_511__DISCR_STRBUF; cdat->dstr_511__DISCR_STRBUF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_511__DISCR_STRBUF.val, "DISCR_STRBUF", sizeof (cdat->dstr_511__DISCR_STRBUF.val) - 1); cdat->dstr_511__DISCR_STRBUF.val[12] = (char) 0; cdat->dstr_511__DISCR_STRBUF.slen = 12; /*inirout drout_512__NORMEXP_MATCH */ /*_.VALROUT___V604*/ meltfptr[603] = (melt_ptr_t) & cdat->drout_512__NORMEXP_MATCH; cdat->drout_512__NORMEXP_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_512__NORMEXP_MATCH.routdescr, "NORMEXP_MATCH @warmelt-normatch.melt:2280", MELT_ROUTDESCR_LEN - 1); cdat->drout_512__NORMEXP_MATCH.nbval = 41; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_512__NORMEXP_MATCH, meltrout_51_warmelt_normatch_NORMEXP_MATCH); /*iniclos dclo_513__NORMEXP_MATCH */ /*_.VALCLO___V612*/ meltfptr[611] = (melt_ptr_t) & cdat->dclo_513__NORMEXP_MATCH; cdat->dclo_513__NORMEXP_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_513__NORMEXP_MATCH.nbval = 0; /*iniobj dsym_514__CLASS_SOURCE_MATCH*/ /*uniqueobj*/ if (! /*_.VALDATA___V613*/ meltfptr[612]) /*_.VALDATA___V613*/ meltfptr[612] = (melt_ptr_t) & cdat->dsym_514__CLASS_SOURCE_MATCH; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_514__CLASS_SOURCE_MATCH", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_514__CLASS_SOURCE_MATCH", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_514__CLASS_SOURCE_MATCH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_514__CLASS_SOURCE_MATCH.obj_hash = 977016819; cdat->dsym_514__CLASS_SOURCE_MATCH.obj_len = 3; /*inistring dstr_515__CLASS_SOURCE_MAT*/ /*_.VALSTR___V614*/ meltfptr[613] = (melt_ptr_t) & cdat->dstr_515__CLASS_SOURCE_MAT; cdat->dstr_515__CLASS_SOURCE_MAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_515__CLASS_SOURCE_MAT.val, "CLASS_SOURCE_MATCH", sizeof (cdat->dstr_515__CLASS_SOURCE_MAT. val) - 1); cdat->dstr_515__CLASS_SOURCE_MAT.val[18] = (char) 0; cdat->dstr_515__CLASS_SOURCE_MAT.slen = 18; /*iniobj dsym_516__CLASS_ENVIRONMENT*/ /*uniqueobj*/ if (! /*_.VALDATA___V615*/ meltfptr[614]) /*_.VALDATA___V615*/ meltfptr[614] = (melt_ptr_t) & cdat->dsym_516__CLASS_ENVIRONMENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_516__CLASS_ENVIRONMENT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_516__CLASS_ENVIRONMENT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_516__CLASS_ENVIRONMENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_516__CLASS_ENVIRONMENT.obj_hash = 59212821; cdat->dsym_516__CLASS_ENVIRONMENT.obj_len = 3; /*inistring dstr_517__CLASS_ENVIRONMEN*/ /*_.VALSTR___V616*/ meltfptr[615] = (melt_ptr_t) & cdat->dstr_517__CLASS_ENVIRONMEN; cdat->dstr_517__CLASS_ENVIRONMEN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_517__CLASS_ENVIRONMEN.val, "CLASS_ENVIRONMENT", sizeof (cdat->dstr_517__CLASS_ENVIRONMEN. val) - 1); cdat->dstr_517__CLASS_ENVIRONMEN.val[17] = (char) 0; cdat->dstr_517__CLASS_ENVIRONMEN.slen = 17; /*iniobj dsym_518__MATCH_INTER_*/ /*uniqueobj*/ if (! /*_.VALDATA___V605*/ meltfptr[604]) /*_.VALDATA___V605*/ meltfptr[604] = (melt_ptr_t) & cdat->dsym_518__MATCH_INTER_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_518__MATCH_INTER_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_518__MATCH_INTER_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_518__MATCH_INTER_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_518__MATCH_INTER_.obj_hash = 479677345; cdat->dsym_518__MATCH_INTER_.obj_len = 3; /*inistring dstr_519__MATCH_INTER_*/ /*_.VALSTR___V606*/ meltfptr[605] = (melt_ptr_t) & cdat->dstr_519__MATCH_INTER_; cdat->dstr_519__MATCH_INTER_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_519__MATCH_INTER_.val, "MATCH_INTER_", sizeof (cdat->dstr_519__MATCH_INTER_.val) - 1); cdat->dstr_519__MATCH_INTER_.val[12] = (char) 0; cdat->dstr_519__MATCH_INTER_.slen = 12; /*iniobj dsym_520__CLASS_NREP_CHECKSIGNAL*/ /*uniqueobj*/ if (! /*_.VALDATA___V617*/ meltfptr[616]) /*_.VALDATA___V617*/ meltfptr[616] = (melt_ptr_t) & cdat->dsym_520__CLASS_NREP_CHECKSIGNAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_520__CLASS_NREP_CHECKSIGNAL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_520__CLASS_NREP_CHECKSIGNAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_520__CLASS_NREP_CHECKSIGNAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_520__CLASS_NREP_CHECKSIGNAL.obj_hash = 33589219; cdat->dsym_520__CLASS_NREP_CHECKSIGNAL.obj_len = 3; /*inistring dstr_521__CLASS_NREP_CHECK*/ /*_.VALSTR___V618*/ meltfptr[617] = (melt_ptr_t) & cdat->dstr_521__CLASS_NREP_CHECK; cdat->dstr_521__CLASS_NREP_CHECK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_521__CLASS_NREP_CHECK.val, "CLASS_NREP_CHECKSIGNAL", sizeof (cdat->dstr_521__CLASS_NREP_CHECK. val) - 1); cdat->dstr_521__CLASS_NREP_CHECK.val[22] = (char) 0; cdat->dstr_521__CLASS_NREP_CHECK.slen = 22; /*iniobj dsym_522__CTYPE_VOID*/ /*uniqueobj*/ if (! /*_.VALDATA___V619*/ meltfptr[618]) /*_.VALDATA___V619*/ meltfptr[618] = (melt_ptr_t) & cdat->dsym_522__CTYPE_VOID; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_522__CTYPE_VOID", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_522__CTYPE_VOID", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_522__CTYPE_VOID.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_522__CTYPE_VOID.obj_hash = 94242002; cdat->dsym_522__CTYPE_VOID.obj_len = 3; /*inistring dstr_523__CTYPE_VOID*/ /*_.VALSTR___V620*/ meltfptr[619] = (melt_ptr_t) & cdat->dstr_523__CTYPE_VOID; cdat->dstr_523__CTYPE_VOID.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_523__CTYPE_VOID.val, "CTYPE_VOID", sizeof (cdat->dstr_523__CTYPE_VOID.val) - 1); cdat->dstr_523__CTYPE_VOID.val[10] = (char) 0; cdat->dstr_523__CTYPE_VOID.slen = 10; /*iniobj dsym_524__MATCHED_*/ /*uniqueobj*/ if (! /*_.VALDATA___V607*/ meltfptr[606]) /*_.VALDATA___V607*/ meltfptr[606] = (melt_ptr_t) & cdat->dsym_524__MATCHED_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_524__MATCHED_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_524__MATCHED_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_524__MATCHED_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_524__MATCHED_.obj_hash = 240251760; cdat->dsym_524__MATCHED_.obj_len = 3; /*inistring dstr_525__MATCHED_*/ /*_.VALSTR___V608*/ meltfptr[607] = (melt_ptr_t) & cdat->dstr_525__MATCHED_; cdat->dstr_525__MATCHED_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_525__MATCHED_.val, "_MATCHED_", sizeof (cdat->dstr_525__MATCHED_.val) - 1); cdat->dstr_525__MATCHED_.val[9] = (char) 0; cdat->dstr_525__MATCHED_.slen = 9; /*iniobj dsym_526__CLASS_SOURCE_MATCH_CASE*/ /*uniqueobj*/ if (! /*_.VALDATA___V621*/ meltfptr[620]) /*_.VALDATA___V621*/ meltfptr[620] = (melt_ptr_t) & cdat->dsym_526__CLASS_SOURCE_MATCH_CASE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_526__CLASS_SOURCE_MATCH_CASE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_526__CLASS_SOURCE_MATCH_CASE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_526__CLASS_SOURCE_MATCH_CASE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_526__CLASS_SOURCE_MATCH_CASE.obj_hash = 625198266; cdat->dsym_526__CLASS_SOURCE_MATCH_CASE.obj_len = 3; /*inistring dstr_527__CLASS_SOURCE_MAT*/ /*_.VALSTR___V622*/ meltfptr[621] = (melt_ptr_t) & cdat->dstr_527__CLASS_SOURCE_MAT; cdat->dstr_527__CLASS_SOURCE_MAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_527__CLASS_SOURCE_MAT.val, "CLASS_SOURCE_MATCH_CASE", sizeof (cdat->dstr_527__CLASS_SOURCE_MAT. val) - 1); cdat->dstr_527__CLASS_SOURCE_MAT.val[23] = (char) 0; cdat->dstr_527__CLASS_SOURCE_MAT.slen = 23; /*inirout drout_528__LAMBDA_ */ /*_.VALROUT___V609*/ meltfptr[608] = (melt_ptr_t) & cdat->drout_528__LAMBDA_; cdat->drout_528__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_528__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normatch.melt:2389", MELT_ROUTDESCR_LEN - 1); cdat->drout_528__LAMBDA_.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_528__LAMBDA_, meltrout_52_warmelt_normatch_LAMBDA___18__); /*iniobj dsym_529__WRAP_NORMAL_LETSEQ*/ /*uniqueobj*/ if (! /*_.VALDATA___V623*/ meltfptr[622]) /*_.VALDATA___V623*/ meltfptr[622] = (melt_ptr_t) & cdat->dsym_529__WRAP_NORMAL_LETSEQ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_529__WRAP_NORMAL_LETSEQ", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_529__WRAP_NORMAL_LETSEQ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_529__WRAP_NORMAL_LETSEQ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_529__WRAP_NORMAL_LETSEQ.obj_hash = 638564573; cdat->dsym_529__WRAP_NORMAL_LETSEQ.obj_len = 3; /*inistring dstr_530__WRAP_NORMAL_LETS*/ /*_.VALSTR___V624*/ meltfptr[623] = (melt_ptr_t) & cdat->dstr_530__WRAP_NORMAL_LETS; cdat->dstr_530__WRAP_NORMAL_LETS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_530__WRAP_NORMAL_LETS.val, "WRAP_NORMAL_LETSEQ", sizeof (cdat->dstr_530__WRAP_NORMAL_LETS. val) - 1); cdat->dstr_530__WRAP_NORMAL_LETS.val[18] = (char) 0; cdat->dstr_530__WRAP_NORMAL_LETS.slen = 18; /*iniobj dsym_531__MATCHRES_*/ /*uniqueobj*/ if (! /*_.VALDATA___V610*/ meltfptr[609]) /*_.VALDATA___V610*/ meltfptr[609] = (melt_ptr_t) & cdat->dsym_531__MATCHRES_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_531__MATCHRES_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_531__MATCHRES_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_531__MATCHRES_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_531__MATCHRES_.obj_hash = 279601250; cdat->dsym_531__MATCHRES_.obj_len = 3; /*inistring dstr_532__MATCHRES_*/ /*_.VALSTR___V611*/ meltfptr[610] = (melt_ptr_t) & cdat->dstr_532__MATCHRES_; cdat->dstr_532__MATCHRES_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_532__MATCHRES_.val, "MATCHRES_", sizeof (cdat->dstr_532__MATCHRES_.val) - 1); cdat->dstr_532__MATCHRES_.val[9] = (char) 0; cdat->dstr_532__MATCHRES_.slen = 9; /*iniobj dsym_533__CLASS_MATCHING_CONTEXT*/ /*uniqueobj*/ if (! /*_.VALDATA___V625*/ meltfptr[624]) /*_.VALDATA___V625*/ meltfptr[624] = (melt_ptr_t) & cdat->dsym_533__CLASS_MATCHING_CONTEXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_533__CLASS_MATCHING_CONTEXT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_533__CLASS_MATCHING_CONTEXT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_533__CLASS_MATCHING_CONTEXT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_533__CLASS_MATCHING_CONTEXT.obj_hash = 304738766; cdat->dsym_533__CLASS_MATCHING_CONTEXT.obj_len = 3; /*inistring dstr_534__CLASS_MATCHING_C*/ /*_.VALSTR___V626*/ meltfptr[625] = (melt_ptr_t) & cdat->dstr_534__CLASS_MATCHING_C; cdat->dstr_534__CLASS_MATCHING_C.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_534__CLASS_MATCHING_C.val, "CLASS_MATCHING_CONTEXT", sizeof (cdat->dstr_534__CLASS_MATCHING_C. val) - 1); cdat->dstr_534__CLASS_MATCHING_C.val[22] = (char) 0; cdat->dstr_534__CLASS_MATCHING_C.slen = 22; MELT_LOCATION ("warmelt-normatch.melt:2623:/ iniobj"); /*iniobj dobj_535__CLASS_MATCHING_CONTEXT*/ /*_.VALDATA___V627*/ meltfptr[626] = (melt_ptr_t) & cdat->dobj_535__CLASS_MATCHING_CONTEXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_535__CLASS_MATCHING_CONTEXT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_535__CLASS_MATCHING_CONTEXT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_535__CLASS_MATCHING_CONTEXT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_535__CLASS_MATCHING_CONTEXT.obj_num = MELTOBMAG_OBJECT; cdat->dobj_535__CLASS_MATCHING_CONTEXT.obj_hash = 508678529; cdat->dobj_535__CLASS_MATCHING_CONTEXT.obj_len = 8; /*inistring dstr_536__CLASS_MATCHING_C*/ /*_.VALSTR___V628*/ meltfptr[627] = (melt_ptr_t) & cdat->dstr_536__CLASS_MATCHING_C; cdat->dstr_536__CLASS_MATCHING_C.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_536__CLASS_MATCHING_C.val, "CLASS_MATCHING_CONTEXT", sizeof (cdat->dstr_536__CLASS_MATCHING_C. val) - 1); cdat->dstr_536__CLASS_MATCHING_C.val[22] = (char) 0; cdat->dstr_536__CLASS_MATCHING_C.slen = 22; /*inimult dtup_537__CLASS_MATCHING_CONTEXT */ /*_.VALTUP___V629*/ meltfptr[628] = (melt_ptr_t) & cdat->dtup_537__CLASS_MATCHING_CONTEXT; cdat->dtup_537__CLASS_MATCHING_CONTEXT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_537__CLASS_MATCHING_CONTEXT.nbval = 1; /*inimult dtup_538__CLASS_MATCHING_CONTEXT */ /*_.VALTUP___V650*/ meltfptr[649] = (melt_ptr_t) & cdat->dtup_538__CLASS_MATCHING_CONTEXT; cdat->dtup_538__CLASS_MATCHING_CONTEXT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_538__CLASS_MATCHING_CONTEXT.nbval = 10; /*iniobj dsym_539__MCTX_NORMCTXT*/ /*uniqueobj*/ if (! /*_.VALDATA___V651*/ meltfptr[650]) /*_.VALDATA___V651*/ meltfptr[650] = (melt_ptr_t) & cdat->dsym_539__MCTX_NORMCTXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_539__MCTX_NORMCTXT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_539__MCTX_NORMCTXT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_539__MCTX_NORMCTXT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_539__MCTX_NORMCTXT.obj_hash = 652151548; cdat->dsym_539__MCTX_NORMCTXT.obj_len = 3; /*inistring dstr_540__MCTX_NORMCTXT*/ /*_.VALSTR___V652*/ meltfptr[651] = (melt_ptr_t) & cdat->dstr_540__MCTX_NORMCTXT; cdat->dstr_540__MCTX_NORMCTXT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_540__MCTX_NORMCTXT.val, "MCTX_NORMCTXT", sizeof (cdat->dstr_540__MCTX_NORMCTXT.val) - 1); cdat->dstr_540__MCTX_NORMCTXT.val[13] = (char) 0; cdat->dstr_540__MCTX_NORMCTXT.slen = 13; /*^iniobj */ /*iniobj dobj_541__MCTX_NORMCTXT*/ /*_.VALDATA___V630*/ meltfptr[629] = (melt_ptr_t) & cdat->dobj_541__MCTX_NORMCTXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_541__MCTX_NORMCTXT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_541__MCTX_NORMCTXT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_541__MCTX_NORMCTXT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_541__MCTX_NORMCTXT.obj_num = 0; cdat->dobj_541__MCTX_NORMCTXT.obj_hash = 930457422; cdat->dobj_541__MCTX_NORMCTXT.obj_len = 4; /*inistring dstr_542__MCTX_NORMCTXT*/ /*_.VALSTR___V631*/ meltfptr[630] = (melt_ptr_t) & cdat->dstr_542__MCTX_NORMCTXT; cdat->dstr_542__MCTX_NORMCTXT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_542__MCTX_NORMCTXT.val, "MCTX_NORMCTXT", sizeof (cdat->dstr_542__MCTX_NORMCTXT.val) - 1); cdat->dstr_542__MCTX_NORMCTXT.val[13] = (char) 0; cdat->dstr_542__MCTX_NORMCTXT.slen = 13; /*iniobj dsym_543__MCTX_SOURCE*/ /*uniqueobj*/ if (! /*_.VALDATA___V653*/ meltfptr[652]) /*_.VALDATA___V653*/ meltfptr[652] = (melt_ptr_t) & cdat->dsym_543__MCTX_SOURCE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_543__MCTX_SOURCE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_543__MCTX_SOURCE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_543__MCTX_SOURCE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_543__MCTX_SOURCE.obj_hash = 818664043; cdat->dsym_543__MCTX_SOURCE.obj_len = 3; /*inistring dstr_544__MCTX_SOURCE*/ /*_.VALSTR___V654*/ meltfptr[653] = (melt_ptr_t) & cdat->dstr_544__MCTX_SOURCE; cdat->dstr_544__MCTX_SOURCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_544__MCTX_SOURCE.val, "MCTX_SOURCE", sizeof (cdat->dstr_544__MCTX_SOURCE.val) - 1); cdat->dstr_544__MCTX_SOURCE.val[11] = (char) 0; cdat->dstr_544__MCTX_SOURCE.slen = 11; /*^iniobj */ /*iniobj dobj_545__MCTX_SOURCE*/ /*_.VALDATA___V632*/ meltfptr[631] = (melt_ptr_t) & cdat->dobj_545__MCTX_SOURCE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_545__MCTX_SOURCE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_545__MCTX_SOURCE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_545__MCTX_SOURCE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_545__MCTX_SOURCE.obj_num = 1; cdat->dobj_545__MCTX_SOURCE.obj_hash = 118035498; cdat->dobj_545__MCTX_SOURCE.obj_len = 4; /*inistring dstr_546__MCTX_SOURCE*/ /*_.VALSTR___V633*/ meltfptr[632] = (melt_ptr_t) & cdat->dstr_546__MCTX_SOURCE; cdat->dstr_546__MCTX_SOURCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_546__MCTX_SOURCE.val, "MCTX_SOURCE", sizeof (cdat->dstr_546__MCTX_SOURCE.val) - 1); cdat->dstr_546__MCTX_SOURCE.val[11] = (char) 0; cdat->dstr_546__MCTX_SOURCE.slen = 11; /*iniobj dsym_547__MCTX_NMATCHED*/ /*uniqueobj*/ if (! /*_.VALDATA___V655*/ meltfptr[654]) /*_.VALDATA___V655*/ meltfptr[654] = (melt_ptr_t) & cdat->dsym_547__MCTX_NMATCHED; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_547__MCTX_NMATCHED", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_547__MCTX_NMATCHED", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_547__MCTX_NMATCHED.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_547__MCTX_NMATCHED.obj_hash = 251741466; cdat->dsym_547__MCTX_NMATCHED.obj_len = 3; /*inistring dstr_548__MCTX_NMATCHED*/ /*_.VALSTR___V656*/ meltfptr[655] = (melt_ptr_t) & cdat->dstr_548__MCTX_NMATCHED; cdat->dstr_548__MCTX_NMATCHED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_548__MCTX_NMATCHED.val, "MCTX_NMATCHED", sizeof (cdat->dstr_548__MCTX_NMATCHED.val) - 1); cdat->dstr_548__MCTX_NMATCHED.val[13] = (char) 0; cdat->dstr_548__MCTX_NMATCHED.slen = 13; /*^iniobj */ /*iniobj dobj_549__MCTX_NMATCHED*/ /*_.VALDATA___V634*/ meltfptr[633] = (melt_ptr_t) & cdat->dobj_549__MCTX_NMATCHED; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_549__MCTX_NMATCHED", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_549__MCTX_NMATCHED", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_549__MCTX_NMATCHED.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_549__MCTX_NMATCHED.obj_num = 2; cdat->dobj_549__MCTX_NMATCHED.obj_hash = 477099835; cdat->dobj_549__MCTX_NMATCHED.obj_len = 4; /*inistring dstr_550__MCTX_NMATCHED*/ /*_.VALSTR___V635*/ meltfptr[634] = (melt_ptr_t) & cdat->dstr_550__MCTX_NMATCHED; cdat->dstr_550__MCTX_NMATCHED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_550__MCTX_NMATCHED.val, "MCTX_NMATCHED", sizeof (cdat->dstr_550__MCTX_NMATCHED.val) - 1); cdat->dstr_550__MCTX_NMATCHED.val[13] = (char) 0; cdat->dstr_550__MCTX_NMATCHED.slen = 13; /*iniobj dsym_551__MCTX_NMATBIND*/ /*uniqueobj*/ if (! /*_.VALDATA___V657*/ meltfptr[656]) /*_.VALDATA___V657*/ meltfptr[656] = (melt_ptr_t) & cdat->dsym_551__MCTX_NMATBIND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_551__MCTX_NMATBIND", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_551__MCTX_NMATBIND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_551__MCTX_NMATBIND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_551__MCTX_NMATBIND.obj_hash = 318013264; cdat->dsym_551__MCTX_NMATBIND.obj_len = 3; /*inistring dstr_552__MCTX_NMATBIND*/ /*_.VALSTR___V658*/ meltfptr[657] = (melt_ptr_t) & cdat->dstr_552__MCTX_NMATBIND; cdat->dstr_552__MCTX_NMATBIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_552__MCTX_NMATBIND.val, "MCTX_NMATBIND", sizeof (cdat->dstr_552__MCTX_NMATBIND.val) - 1); cdat->dstr_552__MCTX_NMATBIND.val[13] = (char) 0; cdat->dstr_552__MCTX_NMATBIND.slen = 13; /*^iniobj */ /*iniobj dobj_553__MCTX_NMATBIND*/ /*_.VALDATA___V636*/ meltfptr[635] = (melt_ptr_t) & cdat->dobj_553__MCTX_NMATBIND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_553__MCTX_NMATBIND", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_553__MCTX_NMATBIND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_553__MCTX_NMATBIND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_553__MCTX_NMATBIND.obj_num = 3; cdat->dobj_553__MCTX_NMATBIND.obj_hash = 493518389; cdat->dobj_553__MCTX_NMATBIND.obj_len = 4; /*inistring dstr_554__MCTX_NMATBIND*/ /*_.VALSTR___V637*/ meltfptr[636] = (melt_ptr_t) & cdat->dstr_554__MCTX_NMATBIND; cdat->dstr_554__MCTX_NMATBIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_554__MCTX_NMATBIND.val, "MCTX_NMATBIND", sizeof (cdat->dstr_554__MCTX_NMATBIND.val) - 1); cdat->dstr_554__MCTX_NMATBIND.val[13] = (char) 0; cdat->dstr_554__MCTX_NMATBIND.slen = 13; /*iniobj dsym_555__MCTX_CASES*/ /*uniqueobj*/ if (! /*_.VALDATA___V659*/ meltfptr[658]) /*_.VALDATA___V659*/ meltfptr[658] = (melt_ptr_t) & cdat->dsym_555__MCTX_CASES; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_555__MCTX_CASES", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_555__MCTX_CASES", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_555__MCTX_CASES.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_555__MCTX_CASES.obj_hash = 1359414; cdat->dsym_555__MCTX_CASES.obj_len = 3; /*inistring dstr_556__MCTX_CASES*/ /*_.VALSTR___V660*/ meltfptr[659] = (melt_ptr_t) & cdat->dstr_556__MCTX_CASES; cdat->dstr_556__MCTX_CASES.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_556__MCTX_CASES.val, "MCTX_CASES", sizeof (cdat->dstr_556__MCTX_CASES.val) - 1); cdat->dstr_556__MCTX_CASES.val[10] = (char) 0; cdat->dstr_556__MCTX_CASES.slen = 10; /*^iniobj */ /*iniobj dobj_557__MCTX_CASES*/ /*_.VALDATA___V638*/ meltfptr[637] = (melt_ptr_t) & cdat->dobj_557__MCTX_CASES; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_557__MCTX_CASES", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_557__MCTX_CASES", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_557__MCTX_CASES.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_557__MCTX_CASES.obj_num = 4; cdat->dobj_557__MCTX_CASES.obj_hash = 205352446; cdat->dobj_557__MCTX_CASES.obj_len = 4; /*inistring dstr_558__MCTX_CASES*/ /*_.VALSTR___V639*/ meltfptr[638] = (melt_ptr_t) & cdat->dstr_558__MCTX_CASES; cdat->dstr_558__MCTX_CASES.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_558__MCTX_CASES.val, "MCTX_CASES", sizeof (cdat->dstr_558__MCTX_CASES.val) - 1); cdat->dstr_558__MCTX_CASES.val[10] = (char) 0; cdat->dstr_558__MCTX_CASES.slen = 10; /*iniobj dsym_559__MCTX_ENV*/ /*uniqueobj*/ if (! /*_.VALDATA___V661*/ meltfptr[660]) /*_.VALDATA___V661*/ meltfptr[660] = (melt_ptr_t) & cdat->dsym_559__MCTX_ENV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_559__MCTX_ENV", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_559__MCTX_ENV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_559__MCTX_ENV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_559__MCTX_ENV.obj_hash = 845670588; cdat->dsym_559__MCTX_ENV.obj_len = 3; /*inistring dstr_560__MCTX_ENV*/ /*_.VALSTR___V662*/ meltfptr[661] = (melt_ptr_t) & cdat->dstr_560__MCTX_ENV; cdat->dstr_560__MCTX_ENV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_560__MCTX_ENV.val, "MCTX_ENV", sizeof (cdat->dstr_560__MCTX_ENV.val) - 1); cdat->dstr_560__MCTX_ENV.val[8] = (char) 0; cdat->dstr_560__MCTX_ENV.slen = 8; /*^iniobj */ /*iniobj dobj_561__MCTX_ENV*/ /*_.VALDATA___V640*/ meltfptr[639] = (melt_ptr_t) & cdat->dobj_561__MCTX_ENV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_561__MCTX_ENV", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_561__MCTX_ENV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_561__MCTX_ENV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_561__MCTX_ENV.obj_num = 5; cdat->dobj_561__MCTX_ENV.obj_hash = 164379126; cdat->dobj_561__MCTX_ENV.obj_len = 4; /*inistring dstr_562__MCTX_ENV*/ /*_.VALSTR___V641*/ meltfptr[640] = (melt_ptr_t) & cdat->dstr_562__MCTX_ENV; cdat->dstr_562__MCTX_ENV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_562__MCTX_ENV.val, "MCTX_ENV", sizeof (cdat->dstr_562__MCTX_ENV.val) - 1); cdat->dstr_562__MCTX_ENV.val[8] = (char) 0; cdat->dstr_562__MCTX_ENV.slen = 8; /*iniobj dsym_563__MCTX_MDATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V663*/ meltfptr[662]) /*_.VALDATA___V663*/ meltfptr[662] = (melt_ptr_t) & cdat->dsym_563__MCTX_MDATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_563__MCTX_MDATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_563__MCTX_MDATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_563__MCTX_MDATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_563__MCTX_MDATA.obj_hash = 370736409; cdat->dsym_563__MCTX_MDATA.obj_len = 3; /*inistring dstr_564__MCTX_MDATA*/ /*_.VALSTR___V664*/ meltfptr[663] = (melt_ptr_t) & cdat->dstr_564__MCTX_MDATA; cdat->dstr_564__MCTX_MDATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_564__MCTX_MDATA.val, "MCTX_MDATA", sizeof (cdat->dstr_564__MCTX_MDATA.val) - 1); cdat->dstr_564__MCTX_MDATA.val[10] = (char) 0; cdat->dstr_564__MCTX_MDATA.slen = 10; /*^iniobj */ /*iniobj dobj_565__MCTX_MDATA*/ /*_.VALDATA___V642*/ meltfptr[641] = (melt_ptr_t) & cdat->dobj_565__MCTX_MDATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_565__MCTX_MDATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_565__MCTX_MDATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_565__MCTX_MDATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_565__MCTX_MDATA.obj_num = 6; cdat->dobj_565__MCTX_MDATA.obj_hash = 421753696; cdat->dobj_565__MCTX_MDATA.obj_len = 4; /*inistring dstr_566__MCTX_MDATA*/ /*_.VALSTR___V643*/ meltfptr[642] = (melt_ptr_t) & cdat->dstr_566__MCTX_MDATA; cdat->dstr_566__MCTX_MDATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_566__MCTX_MDATA.val, "MCTX_MDATA", sizeof (cdat->dstr_566__MCTX_MDATA.val) - 1); cdat->dstr_566__MCTX_MDATA.val[10] = (char) 0; cdat->dstr_566__MCTX_MDATA.slen = 10; /*iniobj dsym_567__MCTX_VARHANDLERS*/ /*uniqueobj*/ if (! /*_.VALDATA___V665*/ meltfptr[664]) /*_.VALDATA___V665*/ meltfptr[664] = (melt_ptr_t) & cdat->dsym_567__MCTX_VARHANDLERS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_567__MCTX_VARHANDLERS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_567__MCTX_VARHANDLERS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_567__MCTX_VARHANDLERS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_567__MCTX_VARHANDLERS.obj_hash = 854846232; cdat->dsym_567__MCTX_VARHANDLERS.obj_len = 3; /*inistring dstr_568__MCTX_VARHANDLERS*/ /*_.VALSTR___V666*/ meltfptr[665] = (melt_ptr_t) & cdat->dstr_568__MCTX_VARHANDLERS; cdat->dstr_568__MCTX_VARHANDLERS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_568__MCTX_VARHANDLERS.val, "MCTX_VARHANDLERS", sizeof (cdat->dstr_568__MCTX_VARHANDLERS. val) - 1); cdat->dstr_568__MCTX_VARHANDLERS.val[16] = (char) 0; cdat->dstr_568__MCTX_VARHANDLERS.slen = 16; /*^iniobj */ /*iniobj dobj_569__MCTX_VARHANDLERS*/ /*_.VALDATA___V644*/ meltfptr[643] = (melt_ptr_t) & cdat->dobj_569__MCTX_VARHANDLERS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_569__MCTX_VARHANDLERS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_569__MCTX_VARHANDLERS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_569__MCTX_VARHANDLERS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_569__MCTX_VARHANDLERS.obj_num = 7; cdat->dobj_569__MCTX_VARHANDLERS.obj_hash = 842561909; cdat->dobj_569__MCTX_VARHANDLERS.obj_len = 4; /*inistring dstr_570__MCTX_VARHANDLERS*/ /*_.VALSTR___V645*/ meltfptr[644] = (melt_ptr_t) & cdat->dstr_570__MCTX_VARHANDLERS; cdat->dstr_570__MCTX_VARHANDLERS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_570__MCTX_VARHANDLERS.val, "MCTX_VARHANDLERS", sizeof (cdat->dstr_570__MCTX_VARHANDLERS. val) - 1); cdat->dstr_570__MCTX_VARHANDLERS.val[16] = (char) 0; cdat->dstr_570__MCTX_VARHANDLERS.slen = 16; /*iniobj dsym_571__MCTX_FLAGS*/ /*uniqueobj*/ if (! /*_.VALDATA___V667*/ meltfptr[666]) /*_.VALDATA___V667*/ meltfptr[666] = (melt_ptr_t) & cdat->dsym_571__MCTX_FLAGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_571__MCTX_FLAGS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_571__MCTX_FLAGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_571__MCTX_FLAGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_571__MCTX_FLAGS.obj_hash = 829770953; cdat->dsym_571__MCTX_FLAGS.obj_len = 3; /*inistring dstr_572__MCTX_FLAGS*/ /*_.VALSTR___V668*/ meltfptr[667] = (melt_ptr_t) & cdat->dstr_572__MCTX_FLAGS; cdat->dstr_572__MCTX_FLAGS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_572__MCTX_FLAGS.val, "MCTX_FLAGS", sizeof (cdat->dstr_572__MCTX_FLAGS.val) - 1); cdat->dstr_572__MCTX_FLAGS.val[10] = (char) 0; cdat->dstr_572__MCTX_FLAGS.slen = 10; /*^iniobj */ /*iniobj dobj_573__MCTX_FLAGS*/ /*_.VALDATA___V646*/ meltfptr[645] = (melt_ptr_t) & cdat->dobj_573__MCTX_FLAGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_573__MCTX_FLAGS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_573__MCTX_FLAGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_573__MCTX_FLAGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_573__MCTX_FLAGS.obj_num = 8; cdat->dobj_573__MCTX_FLAGS.obj_hash = 37197539; cdat->dobj_573__MCTX_FLAGS.obj_len = 4; /*inistring dstr_574__MCTX_FLAGS*/ /*_.VALSTR___V647*/ meltfptr[646] = (melt_ptr_t) & cdat->dstr_574__MCTX_FLAGS; cdat->dstr_574__MCTX_FLAGS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_574__MCTX_FLAGS.val, "MCTX_FLAGS", sizeof (cdat->dstr_574__MCTX_FLAGS.val) - 1); cdat->dstr_574__MCTX_FLAGS.val[10] = (char) 0; cdat->dstr_574__MCTX_FLAGS.slen = 10; /*iniobj dsym_575__MCTX_ENDLABEL*/ /*uniqueobj*/ if (! /*_.VALDATA___V669*/ meltfptr[668]) /*_.VALDATA___V669*/ meltfptr[668] = (melt_ptr_t) & cdat->dsym_575__MCTX_ENDLABEL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_575__MCTX_ENDLABEL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_575__MCTX_ENDLABEL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_575__MCTX_ENDLABEL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_575__MCTX_ENDLABEL.obj_hash = 400133793; cdat->dsym_575__MCTX_ENDLABEL.obj_len = 3; /*inistring dstr_576__MCTX_ENDLABEL*/ /*_.VALSTR___V670*/ meltfptr[669] = (melt_ptr_t) & cdat->dstr_576__MCTX_ENDLABEL; cdat->dstr_576__MCTX_ENDLABEL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_576__MCTX_ENDLABEL.val, "MCTX_ENDLABEL", sizeof (cdat->dstr_576__MCTX_ENDLABEL.val) - 1); cdat->dstr_576__MCTX_ENDLABEL.val[13] = (char) 0; cdat->dstr_576__MCTX_ENDLABEL.slen = 13; /*^iniobj */ /*iniobj dobj_577__MCTX_ENDLABEL*/ /*_.VALDATA___V648*/ meltfptr[647] = (melt_ptr_t) & cdat->dobj_577__MCTX_ENDLABEL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_577__MCTX_ENDLABEL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_577__MCTX_ENDLABEL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_577__MCTX_ENDLABEL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_577__MCTX_ENDLABEL.obj_num = 9; cdat->dobj_577__MCTX_ENDLABEL.obj_hash = 456321663; cdat->dobj_577__MCTX_ENDLABEL.obj_len = 4; /*inistring dstr_578__MCTX_ENDLABEL*/ /*_.VALSTR___V649*/ meltfptr[648] = (melt_ptr_t) & cdat->dstr_578__MCTX_ENDLABEL; cdat->dstr_578__MCTX_ENDLABEL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_578__MCTX_ENDLABEL.val, "MCTX_ENDLABEL", sizeof (cdat->dstr_578__MCTX_ENDLABEL.val) - 1); cdat->dstr_578__MCTX_ENDLABEL.val[13] = (char) 0; cdat->dstr_578__MCTX_ENDLABEL.slen = 13; /*iniobj dsym_579__CLASS_MATCH_CASE*/ /*uniqueobj*/ if (! /*_.VALDATA___V671*/ meltfptr[670]) /*_.VALDATA___V671*/ meltfptr[670] = (melt_ptr_t) & cdat->dsym_579__CLASS_MATCH_CASE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_579__CLASS_MATCH_CASE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_579__CLASS_MATCH_CASE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_579__CLASS_MATCH_CASE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_579__CLASS_MATCH_CASE.obj_hash = 949216192; cdat->dsym_579__CLASS_MATCH_CASE.obj_len = 3; /*inistring dstr_580__CLASS_MATCH_CASE*/ /*_.VALSTR___V672*/ meltfptr[671] = (melt_ptr_t) & cdat->dstr_580__CLASS_MATCH_CASE; cdat->dstr_580__CLASS_MATCH_CASE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_580__CLASS_MATCH_CASE.val, "CLASS_MATCH_CASE", sizeof (cdat->dstr_580__CLASS_MATCH_CASE. val) - 1); cdat->dstr_580__CLASS_MATCH_CASE.val[16] = (char) 0; cdat->dstr_580__CLASS_MATCH_CASE.slen = 16; MELT_LOCATION ("warmelt-normatch.melt:2647:/ iniobj"); /*iniobj dobj_581__CLASS_MATCH_CASE*/ /*_.VALDATA___V673*/ meltfptr[672] = (melt_ptr_t) & cdat->dobj_581__CLASS_MATCH_CASE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_581__CLASS_MATCH_CASE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_581__CLASS_MATCH_CASE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_581__CLASS_MATCH_CASE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_581__CLASS_MATCH_CASE.obj_num = MELTOBMAG_OBJECT; cdat->dobj_581__CLASS_MATCH_CASE.obj_hash = 92712489; cdat->dobj_581__CLASS_MATCH_CASE.obj_len = 8; /*inistring dstr_582__CLASS_MATCH_CASE*/ /*_.VALSTR___V674*/ meltfptr[673] = (melt_ptr_t) & cdat->dstr_582__CLASS_MATCH_CASE; cdat->dstr_582__CLASS_MATCH_CASE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_582__CLASS_MATCH_CASE.val, "CLASS_MATCH_CASE", sizeof (cdat->dstr_582__CLASS_MATCH_CASE. val) - 1); cdat->dstr_582__CLASS_MATCH_CASE.val[16] = (char) 0; cdat->dstr_582__CLASS_MATCH_CASE.slen = 16; /*inimult dtup_583__CLASS_MATCH_CASE */ /*_.VALTUP___V675*/ meltfptr[674] = (melt_ptr_t) & cdat->dtup_583__CLASS_MATCH_CASE; cdat->dtup_583__CLASS_MATCH_CASE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_583__CLASS_MATCH_CASE.nbval = 2; /*inimult dtup_584__CLASS_MATCH_CASE */ /*_.VALTUP___V684*/ meltfptr[683] = (melt_ptr_t) & cdat->dtup_584__CLASS_MATCH_CASE; cdat->dtup_584__CLASS_MATCH_CASE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_584__CLASS_MATCH_CASE.nbval = 5; /*iniobj dsym_585__MCASE_MCTXT*/ /*uniqueobj*/ if (! /*_.VALDATA___V685*/ meltfptr[684]) /*_.VALDATA___V685*/ meltfptr[684] = (melt_ptr_t) & cdat->dsym_585__MCASE_MCTXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_585__MCASE_MCTXT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_585__MCASE_MCTXT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_585__MCASE_MCTXT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_585__MCASE_MCTXT.obj_hash = 149622940; cdat->dsym_585__MCASE_MCTXT.obj_len = 3; /*inistring dstr_586__MCASE_MCTXT*/ /*_.VALSTR___V686*/ meltfptr[685] = (melt_ptr_t) & cdat->dstr_586__MCASE_MCTXT; cdat->dstr_586__MCASE_MCTXT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_586__MCASE_MCTXT.val, "MCASE_MCTXT", sizeof (cdat->dstr_586__MCASE_MCTXT.val) - 1); cdat->dstr_586__MCASE_MCTXT.val[11] = (char) 0; cdat->dstr_586__MCASE_MCTXT.slen = 11; /*^iniobj */ /*iniobj dobj_587__MCASE_MCTXT*/ /*_.VALDATA___V676*/ meltfptr[675] = (melt_ptr_t) & cdat->dobj_587__MCASE_MCTXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_587__MCASE_MCTXT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_587__MCASE_MCTXT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_587__MCASE_MCTXT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_587__MCASE_MCTXT.obj_num = 1; cdat->dobj_587__MCASE_MCTXT.obj_hash = 25184313; cdat->dobj_587__MCASE_MCTXT.obj_len = 4; /*inistring dstr_588__MCASE_MCTXT*/ /*_.VALSTR___V677*/ meltfptr[676] = (melt_ptr_t) & cdat->dstr_588__MCASE_MCTXT; cdat->dstr_588__MCASE_MCTXT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_588__MCASE_MCTXT.val, "MCASE_MCTXT", sizeof (cdat->dstr_588__MCASE_MCTXT.val) - 1); cdat->dstr_588__MCASE_MCTXT.val[11] = (char) 0; cdat->dstr_588__MCASE_MCTXT.slen = 11; /*iniobj dsym_589__MCASE_SOURCE*/ /*uniqueobj*/ if (! /*_.VALDATA___V687*/ meltfptr[686]) /*_.VALDATA___V687*/ meltfptr[686] = (melt_ptr_t) & cdat->dsym_589__MCASE_SOURCE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_589__MCASE_SOURCE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_589__MCASE_SOURCE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_589__MCASE_SOURCE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_589__MCASE_SOURCE.obj_hash = 903506654; cdat->dsym_589__MCASE_SOURCE.obj_len = 3; /*inistring dstr_590__MCASE_SOURCE*/ /*_.VALSTR___V688*/ meltfptr[687] = (melt_ptr_t) & cdat->dstr_590__MCASE_SOURCE; cdat->dstr_590__MCASE_SOURCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_590__MCASE_SOURCE.val, "MCASE_SOURCE", sizeof (cdat->dstr_590__MCASE_SOURCE.val) - 1); cdat->dstr_590__MCASE_SOURCE.val[12] = (char) 0; cdat->dstr_590__MCASE_SOURCE.slen = 12; /*^iniobj */ /*iniobj dobj_591__MCASE_SOURCE*/ /*_.VALDATA___V678*/ meltfptr[677] = (melt_ptr_t) & cdat->dobj_591__MCASE_SOURCE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_591__MCASE_SOURCE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_591__MCASE_SOURCE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_591__MCASE_SOURCE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_591__MCASE_SOURCE.obj_num = 2; cdat->dobj_591__MCASE_SOURCE.obj_hash = 726240006; cdat->dobj_591__MCASE_SOURCE.obj_len = 4; /*inistring dstr_592__MCASE_SOURCE*/ /*_.VALSTR___V679*/ meltfptr[678] = (melt_ptr_t) & cdat->dstr_592__MCASE_SOURCE; cdat->dstr_592__MCASE_SOURCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_592__MCASE_SOURCE.val, "MCASE_SOURCE", sizeof (cdat->dstr_592__MCASE_SOURCE.val) - 1); cdat->dstr_592__MCASE_SOURCE.val[12] = (char) 0; cdat->dstr_592__MCASE_SOURCE.slen = 12; /*iniobj dsym_593__MCASE_INDEX*/ /*uniqueobj*/ if (! /*_.VALDATA___V689*/ meltfptr[688]) /*_.VALDATA___V689*/ meltfptr[688] = (melt_ptr_t) & cdat->dsym_593__MCASE_INDEX; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_593__MCASE_INDEX", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_593__MCASE_INDEX", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_593__MCASE_INDEX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_593__MCASE_INDEX.obj_hash = 411250735; cdat->dsym_593__MCASE_INDEX.obj_len = 3; /*inistring dstr_594__MCASE_INDEX*/ /*_.VALSTR___V690*/ meltfptr[689] = (melt_ptr_t) & cdat->dstr_594__MCASE_INDEX; cdat->dstr_594__MCASE_INDEX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_594__MCASE_INDEX.val, "MCASE_INDEX", sizeof (cdat->dstr_594__MCASE_INDEX.val) - 1); cdat->dstr_594__MCASE_INDEX.val[11] = (char) 0; cdat->dstr_594__MCASE_INDEX.slen = 11; /*^iniobj */ /*iniobj dobj_595__MCASE_INDEX*/ /*_.VALDATA___V680*/ meltfptr[679] = (melt_ptr_t) & cdat->dobj_595__MCASE_INDEX; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_595__MCASE_INDEX", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_595__MCASE_INDEX", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_595__MCASE_INDEX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_595__MCASE_INDEX.obj_num = 3; cdat->dobj_595__MCASE_INDEX.obj_hash = 350785484; cdat->dobj_595__MCASE_INDEX.obj_len = 4; /*inistring dstr_596__MCASE_INDEX*/ /*_.VALSTR___V681*/ meltfptr[680] = (melt_ptr_t) & cdat->dstr_596__MCASE_INDEX; cdat->dstr_596__MCASE_INDEX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_596__MCASE_INDEX.val, "MCASE_INDEX", sizeof (cdat->dstr_596__MCASE_INDEX.val) - 1); cdat->dstr_596__MCASE_INDEX.val[11] = (char) 0; cdat->dstr_596__MCASE_INDEX.slen = 11; /*iniobj dsym_597__MCASE_VARMAP*/ /*uniqueobj*/ if (! /*_.VALDATA___V691*/ meltfptr[690]) /*_.VALDATA___V691*/ meltfptr[690] = (melt_ptr_t) & cdat->dsym_597__MCASE_VARMAP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_597__MCASE_VARMAP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_597__MCASE_VARMAP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_597__MCASE_VARMAP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_597__MCASE_VARMAP.obj_hash = 75227449; cdat->dsym_597__MCASE_VARMAP.obj_len = 3; /*inistring dstr_598__MCASE_VARMAP*/ /*_.VALSTR___V692*/ meltfptr[691] = (melt_ptr_t) & cdat->dstr_598__MCASE_VARMAP; cdat->dstr_598__MCASE_VARMAP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_598__MCASE_VARMAP.val, "MCASE_VARMAP", sizeof (cdat->dstr_598__MCASE_VARMAP.val) - 1); cdat->dstr_598__MCASE_VARMAP.val[12] = (char) 0; cdat->dstr_598__MCASE_VARMAP.slen = 12; /*^iniobj */ /*iniobj dobj_599__MCASE_VARMAP*/ /*_.VALDATA___V682*/ meltfptr[681] = (melt_ptr_t) & cdat->dobj_599__MCASE_VARMAP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_599__MCASE_VARMAP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_599__MCASE_VARMAP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_599__MCASE_VARMAP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_599__MCASE_VARMAP.obj_num = 4; cdat->dobj_599__MCASE_VARMAP.obj_hash = 622010742; cdat->dobj_599__MCASE_VARMAP.obj_len = 4; /*inistring dstr_600__MCASE_VARMAP*/ /*_.VALSTR___V683*/ meltfptr[682] = (melt_ptr_t) & cdat->dstr_600__MCASE_VARMAP; cdat->dstr_600__MCASE_VARMAP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_600__MCASE_VARMAP.val, "MCASE_VARMAP", sizeof (cdat->dstr_600__MCASE_VARMAP.val) - 1); cdat->dstr_600__MCASE_VARMAP.val[12] = (char) 0; cdat->dstr_600__MCASE_VARMAP.slen = 12; /*iniobj dsym_601__CLASS_MATCHED_DATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V693*/ meltfptr[692]) /*_.VALDATA___V693*/ meltfptr[692] = (melt_ptr_t) & cdat->dsym_601__CLASS_MATCHED_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_601__CLASS_MATCHED_DATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_601__CLASS_MATCHED_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_601__CLASS_MATCHED_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_601__CLASS_MATCHED_DATA.obj_hash = 1016753218; cdat->dsym_601__CLASS_MATCHED_DATA.obj_len = 3; /*inistring dstr_602__CLASS_MATCHED_DA*/ /*_.VALSTR___V694*/ meltfptr[693] = (melt_ptr_t) & cdat->dstr_602__CLASS_MATCHED_DA; cdat->dstr_602__CLASS_MATCHED_DA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_602__CLASS_MATCHED_DA.val, "CLASS_MATCHED_DATA", sizeof (cdat->dstr_602__CLASS_MATCHED_DA. val) - 1); cdat->dstr_602__CLASS_MATCHED_DA.val[18] = (char) 0; cdat->dstr_602__CLASS_MATCHED_DA.slen = 18; MELT_LOCATION ("warmelt-normatch.melt:2659:/ iniobj"); /*iniobj dobj_603__CLASS_MATCHED_DATA*/ /*_.VALDATA___V695*/ meltfptr[694] = (melt_ptr_t) & cdat->dobj_603__CLASS_MATCHED_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_603__CLASS_MATCHED_DATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_603__CLASS_MATCHED_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_603__CLASS_MATCHED_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_603__CLASS_MATCHED_DATA.obj_num = MELTOBMAG_OBJECT; cdat->dobj_603__CLASS_MATCHED_DATA.obj_hash = 1069397881; cdat->dobj_603__CLASS_MATCHED_DATA.obj_len = 8; /*inistring dstr_604__CLASS_MATCHED_DA*/ /*_.VALSTR___V696*/ meltfptr[695] = (melt_ptr_t) & cdat->dstr_604__CLASS_MATCHED_DA; cdat->dstr_604__CLASS_MATCHED_DA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_604__CLASS_MATCHED_DA.val, "CLASS_MATCHED_DATA", sizeof (cdat->dstr_604__CLASS_MATCHED_DA. val) - 1); cdat->dstr_604__CLASS_MATCHED_DA.val[18] = (char) 0; cdat->dstr_604__CLASS_MATCHED_DA.slen = 18; /*inimult dtup_605__CLASS_MATCHED_DATA */ /*_.VALTUP___V697*/ meltfptr[696] = (melt_ptr_t) & cdat->dtup_605__CLASS_MATCHED_DATA; cdat->dtup_605__CLASS_MATCHED_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_605__CLASS_MATCHED_DATA.nbval = 2; /*inimult dtup_606__CLASS_MATCHED_DATA */ /*_.VALTUP___V706*/ meltfptr[705] = (melt_ptr_t) & cdat->dtup_606__CLASS_MATCHED_DATA; cdat->dtup_606__CLASS_MATCHED_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_606__CLASS_MATCHED_DATA.nbval = 5; /*iniobj dsym_607__MDATA_SYMB*/ /*uniqueobj*/ if (! /*_.VALDATA___V707*/ meltfptr[706]) /*_.VALDATA___V707*/ meltfptr[706] = (melt_ptr_t) & cdat->dsym_607__MDATA_SYMB; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_607__MDATA_SYMB", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_607__MDATA_SYMB", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_607__MDATA_SYMB.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_607__MDATA_SYMB.obj_hash = 627287042; cdat->dsym_607__MDATA_SYMB.obj_len = 3; /*inistring dstr_608__MDATA_SYMB*/ /*_.VALSTR___V708*/ meltfptr[707] = (melt_ptr_t) & cdat->dstr_608__MDATA_SYMB; cdat->dstr_608__MDATA_SYMB.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_608__MDATA_SYMB.val, "MDATA_SYMB", sizeof (cdat->dstr_608__MDATA_SYMB.val) - 1); cdat->dstr_608__MDATA_SYMB.val[10] = (char) 0; cdat->dstr_608__MDATA_SYMB.slen = 10; /*^iniobj */ /*iniobj dobj_609__MDATA_SYMB*/ /*_.VALDATA___V698*/ meltfptr[697] = (melt_ptr_t) & cdat->dobj_609__MDATA_SYMB; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_609__MDATA_SYMB", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_609__MDATA_SYMB", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_609__MDATA_SYMB.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_609__MDATA_SYMB.obj_num = 1; cdat->dobj_609__MDATA_SYMB.obj_hash = 1038327913; cdat->dobj_609__MDATA_SYMB.obj_len = 4; /*inistring dstr_610__MDATA_SYMB*/ /*_.VALSTR___V699*/ meltfptr[698] = (melt_ptr_t) & cdat->dstr_610__MDATA_SYMB; cdat->dstr_610__MDATA_SYMB.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_610__MDATA_SYMB.val, "MDATA_SYMB", sizeof (cdat->dstr_610__MDATA_SYMB.val) - 1); cdat->dstr_610__MDATA_SYMB.val[10] = (char) 0; cdat->dstr_610__MDATA_SYMB.slen = 10; /*iniobj dsym_611__MDATA_CTYPE*/ /*uniqueobj*/ if (! /*_.VALDATA___V709*/ meltfptr[708]) /*_.VALDATA___V709*/ meltfptr[708] = (melt_ptr_t) & cdat->dsym_611__MDATA_CTYPE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_611__MDATA_CTYPE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_611__MDATA_CTYPE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_611__MDATA_CTYPE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_611__MDATA_CTYPE.obj_hash = 952349489; cdat->dsym_611__MDATA_CTYPE.obj_len = 3; /*inistring dstr_612__MDATA_CTYPE*/ /*_.VALSTR___V710*/ meltfptr[709] = (melt_ptr_t) & cdat->dstr_612__MDATA_CTYPE; cdat->dstr_612__MDATA_CTYPE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_612__MDATA_CTYPE.val, "MDATA_CTYPE", sizeof (cdat->dstr_612__MDATA_CTYPE.val) - 1); cdat->dstr_612__MDATA_CTYPE.val[11] = (char) 0; cdat->dstr_612__MDATA_CTYPE.slen = 11; /*^iniobj */ /*iniobj dobj_613__MDATA_CTYPE*/ /*_.VALDATA___V700*/ meltfptr[699] = (melt_ptr_t) & cdat->dobj_613__MDATA_CTYPE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_613__MDATA_CTYPE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_613__MDATA_CTYPE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_613__MDATA_CTYPE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_613__MDATA_CTYPE.obj_num = 2; cdat->dobj_613__MDATA_CTYPE.obj_hash = 293215284; cdat->dobj_613__MDATA_CTYPE.obj_len = 4; /*inistring dstr_614__MDATA_CTYPE*/ /*_.VALSTR___V701*/ meltfptr[700] = (melt_ptr_t) & cdat->dstr_614__MDATA_CTYPE; cdat->dstr_614__MDATA_CTYPE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_614__MDATA_CTYPE.val, "MDATA_CTYPE", sizeof (cdat->dstr_614__MDATA_CTYPE.val) - 1); cdat->dstr_614__MDATA_CTYPE.val[11] = (char) 0; cdat->dstr_614__MDATA_CTYPE.slen = 11; /*iniobj dsym_615__MDATA_ORIG*/ /*uniqueobj*/ if (! /*_.VALDATA___V711*/ meltfptr[710]) /*_.VALDATA___V711*/ meltfptr[710] = (melt_ptr_t) & cdat->dsym_615__MDATA_ORIG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_615__MDATA_ORIG", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_615__MDATA_ORIG", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_615__MDATA_ORIG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_615__MDATA_ORIG.obj_hash = 608857395; cdat->dsym_615__MDATA_ORIG.obj_len = 3; /*inistring dstr_616__MDATA_ORIG*/ /*_.VALSTR___V712*/ meltfptr[711] = (melt_ptr_t) & cdat->dstr_616__MDATA_ORIG; cdat->dstr_616__MDATA_ORIG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_616__MDATA_ORIG.val, "MDATA_ORIG", sizeof (cdat->dstr_616__MDATA_ORIG.val) - 1); cdat->dstr_616__MDATA_ORIG.val[10] = (char) 0; cdat->dstr_616__MDATA_ORIG.slen = 10; /*^iniobj */ /*iniobj dobj_617__MDATA_ORIG*/ /*_.VALDATA___V702*/ meltfptr[701] = (melt_ptr_t) & cdat->dobj_617__MDATA_ORIG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_617__MDATA_ORIG", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_617__MDATA_ORIG", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_617__MDATA_ORIG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_617__MDATA_ORIG.obj_num = 3; cdat->dobj_617__MDATA_ORIG.obj_hash = 22870722; cdat->dobj_617__MDATA_ORIG.obj_len = 4; /*inistring dstr_618__MDATA_ORIG*/ /*_.VALSTR___V703*/ meltfptr[702] = (melt_ptr_t) & cdat->dstr_618__MDATA_ORIG; cdat->dstr_618__MDATA_ORIG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_618__MDATA_ORIG.val, "MDATA_ORIG", sizeof (cdat->dstr_618__MDATA_ORIG.val) - 1); cdat->dstr_618__MDATA_ORIG.val[10] = (char) 0; cdat->dstr_618__MDATA_ORIG.slen = 10; /*iniobj dsym_619__MDATA_STEPS*/ /*uniqueobj*/ if (! /*_.VALDATA___V713*/ meltfptr[712]) /*_.VALDATA___V713*/ meltfptr[712] = (melt_ptr_t) & cdat->dsym_619__MDATA_STEPS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_619__MDATA_STEPS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_619__MDATA_STEPS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_619__MDATA_STEPS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_619__MDATA_STEPS.obj_hash = 383135857; cdat->dsym_619__MDATA_STEPS.obj_len = 3; /*inistring dstr_620__MDATA_STEPS*/ /*_.VALSTR___V714*/ meltfptr[713] = (melt_ptr_t) & cdat->dstr_620__MDATA_STEPS; cdat->dstr_620__MDATA_STEPS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_620__MDATA_STEPS.val, "MDATA_STEPS", sizeof (cdat->dstr_620__MDATA_STEPS.val) - 1); cdat->dstr_620__MDATA_STEPS.val[11] = (char) 0; cdat->dstr_620__MDATA_STEPS.slen = 11; /*^iniobj */ /*iniobj dobj_621__MDATA_STEPS*/ /*_.VALDATA___V704*/ meltfptr[703] = (melt_ptr_t) & cdat->dobj_621__MDATA_STEPS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_621__MDATA_STEPS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_621__MDATA_STEPS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_621__MDATA_STEPS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_621__MDATA_STEPS.obj_num = 4; cdat->dobj_621__MDATA_STEPS.obj_hash = 408456293; cdat->dobj_621__MDATA_STEPS.obj_len = 4; /*inistring dstr_622__MDATA_STEPS*/ /*_.VALSTR___V705*/ meltfptr[704] = (melt_ptr_t) & cdat->dstr_622__MDATA_STEPS; cdat->dstr_622__MDATA_STEPS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_622__MDATA_STEPS.val, "MDATA_STEPS", sizeof (cdat->dstr_622__MDATA_STEPS.val) - 1); cdat->dstr_622__MDATA_STEPS.val[11] = (char) 0; cdat->dstr_622__MDATA_STEPS.slen = 11; /*iniobj dsym_623__CLASS_MATCHED_NORMAL_DATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V715*/ meltfptr[714]) /*_.VALDATA___V715*/ meltfptr[714] = (melt_ptr_t) & cdat->dsym_623__CLASS_MATCHED_NORMAL_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_623__CLASS_MATCHED_NORMAL_DATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_623__CLASS_MATCHED_NORMAL_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_623__CLASS_MATCHED_NORMAL_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_623__CLASS_MATCHED_NORMAL_DATA.obj_hash = 609456222; cdat->dsym_623__CLASS_MATCHED_NORMAL_DATA.obj_len = 3; /*inistring dstr_624__CLASS_MATCHED_NO*/ /*_.VALSTR___V716*/ meltfptr[715] = (melt_ptr_t) & cdat->dstr_624__CLASS_MATCHED_NO; cdat->dstr_624__CLASS_MATCHED_NO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_624__CLASS_MATCHED_NO.val, "CLASS_MATCHED_NORMAL_DATA", sizeof (cdat->dstr_624__CLASS_MATCHED_NO. val) - 1); cdat->dstr_624__CLASS_MATCHED_NO.val[25] = (char) 0; cdat->dstr_624__CLASS_MATCHED_NO.slen = 25; MELT_LOCATION ("warmelt-normatch.melt:2674:/ iniobj"); /*iniobj dobj_625__CLASS_MATCHED_NORMAL_DATA*/ /*_.VALDATA___V717*/ meltfptr[716] = (melt_ptr_t) & cdat->dobj_625__CLASS_MATCHED_NORMAL_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_625__CLASS_MATCHED_NORMAL_DATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_625__CLASS_MATCHED_NORMAL_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_625__CLASS_MATCHED_NORMAL_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_625__CLASS_MATCHED_NORMAL_DATA.obj_num = MELTOBMAG_OBJECT; cdat->dobj_625__CLASS_MATCHED_NORMAL_DATA.obj_hash = 693967849; cdat->dobj_625__CLASS_MATCHED_NORMAL_DATA.obj_len = 8; /*inistring dstr_626__CLASS_MATCHED_NO*/ /*_.VALSTR___V718*/ meltfptr[717] = (melt_ptr_t) & cdat->dstr_626__CLASS_MATCHED_NO; cdat->dstr_626__CLASS_MATCHED_NO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_626__CLASS_MATCHED_NO.val, "CLASS_MATCHED_NORMAL_DATA", sizeof (cdat->dstr_626__CLASS_MATCHED_NO. val) - 1); cdat->dstr_626__CLASS_MATCHED_NO.val[25] = (char) 0; cdat->dstr_626__CLASS_MATCHED_NO.slen = 25; /*inimult dtup_627__CLASS_MATCHED_NORMAL_DATA */ /*_.VALTUP___V719*/ meltfptr[718] = (melt_ptr_t) & cdat->dtup_627__CLASS_MATCHED_NORMAL_DATA; cdat->dtup_627__CLASS_MATCHED_NORMAL_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_627__CLASS_MATCHED_NORMAL_DATA.nbval = 3; /*inimult dtup_628__CLASS_MATCHED_NORMAL_DATA */ /*_.VALTUP___V720*/ meltfptr[719] = (melt_ptr_t) & cdat->dtup_628__CLASS_MATCHED_NORMAL_DATA; cdat->dtup_628__CLASS_MATCHED_NORMAL_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_628__CLASS_MATCHED_NORMAL_DATA.nbval = 5; /*iniobj dsym_629__CLASS_MATCHED_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V721*/ meltfptr[720]) /*_.VALDATA___V721*/ meltfptr[720] = (melt_ptr_t) & cdat->dsym_629__CLASS_MATCHED_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_629__CLASS_MATCHED_BINDING", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_629__CLASS_MATCHED_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_629__CLASS_MATCHED_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_629__CLASS_MATCHED_BINDING.obj_hash = 747450906; cdat->dsym_629__CLASS_MATCHED_BINDING.obj_len = 3; /*inistring dstr_630__CLASS_MATCHED_BI*/ /*_.VALSTR___V722*/ meltfptr[721] = (melt_ptr_t) & cdat->dstr_630__CLASS_MATCHED_BI; cdat->dstr_630__CLASS_MATCHED_BI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_630__CLASS_MATCHED_BI.val, "CLASS_MATCHED_BINDING", sizeof (cdat->dstr_630__CLASS_MATCHED_BI. val) - 1); cdat->dstr_630__CLASS_MATCHED_BI.val[21] = (char) 0; cdat->dstr_630__CLASS_MATCHED_BI.slen = 21; MELT_LOCATION ("warmelt-normatch.melt:2680:/ iniobj"); /*iniobj dobj_631__CLASS_MATCHED_BINDING*/ /*_.VALDATA___V723*/ meltfptr[722] = (melt_ptr_t) & cdat->dobj_631__CLASS_MATCHED_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_631__CLASS_MATCHED_BINDING", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_631__CLASS_MATCHED_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_631__CLASS_MATCHED_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_631__CLASS_MATCHED_BINDING.obj_num = MELTOBMAG_OBJECT; cdat->dobj_631__CLASS_MATCHED_BINDING.obj_hash = 276110256; cdat->dobj_631__CLASS_MATCHED_BINDING.obj_len = 8; /*inistring dstr_632__CLASS_MATCHED_BI*/ /*_.VALSTR___V724*/ meltfptr[723] = (melt_ptr_t) & cdat->dstr_632__CLASS_MATCHED_BI; cdat->dstr_632__CLASS_MATCHED_BI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_632__CLASS_MATCHED_BI.val, "CLASS_MATCHED_BINDING", sizeof (cdat->dstr_632__CLASS_MATCHED_BI. val) - 1); cdat->dstr_632__CLASS_MATCHED_BI.val[21] = (char) 0; cdat->dstr_632__CLASS_MATCHED_BI.slen = 21; /*inimult dtup_633__CLASS_MATCHED_BINDING */ /*_.VALTUP___V725*/ meltfptr[724] = (melt_ptr_t) & cdat->dtup_633__CLASS_MATCHED_BINDING; cdat->dtup_633__CLASS_MATCHED_BINDING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_633__CLASS_MATCHED_BINDING.nbval = 2; /*inimult dtup_634__CLASS_MATCHED_BINDING */ /*_.VALTUP___V730*/ meltfptr[729] = (melt_ptr_t) & cdat->dtup_634__CLASS_MATCHED_BINDING; cdat->dtup_634__CLASS_MATCHED_BINDING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_634__CLASS_MATCHED_BINDING.nbval = 3; /*iniobj dsym_635__MATCHBIND_DATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V731*/ meltfptr[730]) /*_.VALDATA___V731*/ meltfptr[730] = (melt_ptr_t) & cdat->dsym_635__MATCHBIND_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_635__MATCHBIND_DATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_635__MATCHBIND_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_635__MATCHBIND_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_635__MATCHBIND_DATA.obj_hash = 644146834; cdat->dsym_635__MATCHBIND_DATA.obj_len = 3; /*inistring dstr_636__MATCHBIND_DATA*/ /*_.VALSTR___V732*/ meltfptr[731] = (melt_ptr_t) & cdat->dstr_636__MATCHBIND_DATA; cdat->dstr_636__MATCHBIND_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_636__MATCHBIND_DATA.val, "MATCHBIND_DATA", sizeof (cdat->dstr_636__MATCHBIND_DATA.val) - 1); cdat->dstr_636__MATCHBIND_DATA.val[14] = (char) 0; cdat->dstr_636__MATCHBIND_DATA.slen = 14; /*^iniobj */ /*iniobj dobj_637__MATCHBIND_DATA*/ /*_.VALDATA___V726*/ meltfptr[725] = (melt_ptr_t) & cdat->dobj_637__MATCHBIND_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_637__MATCHBIND_DATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_637__MATCHBIND_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_637__MATCHBIND_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_637__MATCHBIND_DATA.obj_num = 1; cdat->dobj_637__MATCHBIND_DATA.obj_hash = 511685245; cdat->dobj_637__MATCHBIND_DATA.obj_len = 4; /*inistring dstr_638__MATCHBIND_DATA*/ /*_.VALSTR___V727*/ meltfptr[726] = (melt_ptr_t) & cdat->dstr_638__MATCHBIND_DATA; cdat->dstr_638__MATCHBIND_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_638__MATCHBIND_DATA.val, "MATCHBIND_DATA", sizeof (cdat->dstr_638__MATCHBIND_DATA.val) - 1); cdat->dstr_638__MATCHBIND_DATA.val[14] = (char) 0; cdat->dstr_638__MATCHBIND_DATA.slen = 14; /*iniobj dsym_639__MATCHBIND_NBOCC*/ /*uniqueobj*/ if (! /*_.VALDATA___V733*/ meltfptr[732]) /*_.VALDATA___V733*/ meltfptr[732] = (melt_ptr_t) & cdat->dsym_639__MATCHBIND_NBOCC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_639__MATCHBIND_NBOCC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_639__MATCHBIND_NBOCC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_639__MATCHBIND_NBOCC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_639__MATCHBIND_NBOCC.obj_hash = 159965387; cdat->dsym_639__MATCHBIND_NBOCC.obj_len = 3; /*inistring dstr_640__MATCHBIND_NBOCC*/ /*_.VALSTR___V734*/ meltfptr[733] = (melt_ptr_t) & cdat->dstr_640__MATCHBIND_NBOCC; cdat->dstr_640__MATCHBIND_NBOCC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_640__MATCHBIND_NBOCC.val, "MATCHBIND_NBOCC", sizeof (cdat->dstr_640__MATCHBIND_NBOCC.val) - 1); cdat->dstr_640__MATCHBIND_NBOCC.val[15] = (char) 0; cdat->dstr_640__MATCHBIND_NBOCC.slen = 15; /*^iniobj */ /*iniobj dobj_641__MATCHBIND_NBOCC*/ /*_.VALDATA___V728*/ meltfptr[727] = (melt_ptr_t) & cdat->dobj_641__MATCHBIND_NBOCC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_641__MATCHBIND_NBOCC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_641__MATCHBIND_NBOCC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_641__MATCHBIND_NBOCC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_641__MATCHBIND_NBOCC.obj_num = 2; cdat->dobj_641__MATCHBIND_NBOCC.obj_hash = 1031663723; cdat->dobj_641__MATCHBIND_NBOCC.obj_len = 4; /*inistring dstr_642__MATCHBIND_NBOCC*/ /*_.VALSTR___V729*/ meltfptr[728] = (melt_ptr_t) & cdat->dstr_642__MATCHBIND_NBOCC; cdat->dstr_642__MATCHBIND_NBOCC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_642__MATCHBIND_NBOCC.val, "MATCHBIND_NBOCC", sizeof (cdat->dstr_642__MATCHBIND_NBOCC.val) - 1); cdat->dstr_642__MATCHBIND_NBOCC.val[15] = (char) 0; cdat->dstr_642__MATCHBIND_NBOCC.slen = 15; /*inirout drout_643__NORMBIND_MATCHBIND */ /*_.VALROUT___V735*/ meltfptr[734] = (melt_ptr_t) & cdat->drout_643__NORMBIND_MATCHBIND; cdat->drout_643__NORMBIND_MATCHBIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_643__NORMBIND_MATCHBIND.routdescr, "NORMBIND_MATCHBIND @warmelt-normatch.melt:2691", MELT_ROUTDESCR_LEN - 1); cdat->drout_643__NORMBIND_MATCHBIND.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_643__NORMBIND_MATCHBIND, meltrout_53_warmelt_normatch_NORMBIND_MATCHBIND); /*iniclos dclo_644__NORMBIND_MATCHBIND */ /*_.VALCLO___V736*/ meltfptr[735] = (melt_ptr_t) & cdat->dclo_644__NORMBIND_MATCHBIND; cdat->dclo_644__NORMBIND_MATCHBIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_644__NORMBIND_MATCHBIND.nbval = 0; /*iniobj dsym_645__NORMALIZE_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V737*/ meltfptr[736]) /*_.VALDATA___V737*/ meltfptr[736] = (melt_ptr_t) & cdat->dsym_645__NORMALIZE_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_645__NORMALIZE_BINDING", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_645__NORMALIZE_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_645__NORMALIZE_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_645__NORMALIZE_BINDING.obj_hash = 689313377; cdat->dsym_645__NORMALIZE_BINDING.obj_len = 3; /*inistring dstr_646__NORMALIZE_BINDIN*/ /*_.VALSTR___V738*/ meltfptr[737] = (melt_ptr_t) & cdat->dstr_646__NORMALIZE_BINDIN; cdat->dstr_646__NORMALIZE_BINDIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_646__NORMALIZE_BINDIN.val, "NORMALIZE_BINDING", sizeof (cdat->dstr_646__NORMALIZE_BINDIN. val) - 1); cdat->dstr_646__NORMALIZE_BINDIN.val[17] = (char) 0; cdat->dstr_646__NORMALIZE_BINDIN.slen = 17; /*iniobj dsym_647__CLASS_MATCH_FLAG*/ /*uniqueobj*/ if (! /*_.VALDATA___V739*/ meltfptr[738]) /*_.VALDATA___V739*/ meltfptr[738] = (melt_ptr_t) & cdat->dsym_647__CLASS_MATCH_FLAG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_647__CLASS_MATCH_FLAG", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_647__CLASS_MATCH_FLAG", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_647__CLASS_MATCH_FLAG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_647__CLASS_MATCH_FLAG.obj_hash = 1656306; cdat->dsym_647__CLASS_MATCH_FLAG.obj_len = 3; /*inistring dstr_648__CLASS_MATCH_FLAG*/ /*_.VALSTR___V740*/ meltfptr[739] = (melt_ptr_t) & cdat->dstr_648__CLASS_MATCH_FLAG; cdat->dstr_648__CLASS_MATCH_FLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_648__CLASS_MATCH_FLAG.val, "CLASS_MATCH_FLAG", sizeof (cdat->dstr_648__CLASS_MATCH_FLAG. val) - 1); cdat->dstr_648__CLASS_MATCH_FLAG.val[16] = (char) 0; cdat->dstr_648__CLASS_MATCH_FLAG.slen = 16; MELT_LOCATION ("warmelt-normatch.melt:2723:/ iniobj"); /*iniobj dobj_649__CLASS_MATCH_FLAG*/ /*_.VALDATA___V741*/ meltfptr[740] = (melt_ptr_t) & cdat->dobj_649__CLASS_MATCH_FLAG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_649__CLASS_MATCH_FLAG", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_649__CLASS_MATCH_FLAG", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_649__CLASS_MATCH_FLAG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_649__CLASS_MATCH_FLAG.obj_num = MELTOBMAG_OBJECT; cdat->dobj_649__CLASS_MATCH_FLAG.obj_hash = 454088222; cdat->dobj_649__CLASS_MATCH_FLAG.obj_len = 8; /*inistring dstr_650__CLASS_MATCH_FLAG*/ /*_.VALSTR___V742*/ meltfptr[741] = (melt_ptr_t) & cdat->dstr_650__CLASS_MATCH_FLAG; cdat->dstr_650__CLASS_MATCH_FLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_650__CLASS_MATCH_FLAG.val, "CLASS_MATCH_FLAG", sizeof (cdat->dstr_650__CLASS_MATCH_FLAG. val) - 1); cdat->dstr_650__CLASS_MATCH_FLAG.val[16] = (char) 0; cdat->dstr_650__CLASS_MATCH_FLAG.slen = 16; /*inimult dtup_651__CLASS_MATCH_FLAG */ /*_.VALTUP___V743*/ meltfptr[742] = (melt_ptr_t) & cdat->dtup_651__CLASS_MATCH_FLAG; cdat->dtup_651__CLASS_MATCH_FLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_651__CLASS_MATCH_FLAG.nbval = 3; /*inimult dtup_652__CLASS_MATCH_FLAG */ /*_.VALTUP___V752*/ meltfptr[751] = (melt_ptr_t) & cdat->dtup_652__CLASS_MATCH_FLAG; cdat->dtup_652__CLASS_MATCH_FLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_652__CLASS_MATCH_FLAG.nbval = 6; /*iniobj dsym_653__MFLAG_SPAT*/ /*uniqueobj*/ if (! /*_.VALDATA___V753*/ meltfptr[752]) /*_.VALDATA___V753*/ meltfptr[752] = (melt_ptr_t) & cdat->dsym_653__MFLAG_SPAT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_653__MFLAG_SPAT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_653__MFLAG_SPAT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_653__MFLAG_SPAT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_653__MFLAG_SPAT.obj_hash = 62636525; cdat->dsym_653__MFLAG_SPAT.obj_len = 3; /*inistring dstr_654__MFLAG_SPAT*/ /*_.VALSTR___V754*/ meltfptr[753] = (melt_ptr_t) & cdat->dstr_654__MFLAG_SPAT; cdat->dstr_654__MFLAG_SPAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_654__MFLAG_SPAT.val, "MFLAG_SPAT", sizeof (cdat->dstr_654__MFLAG_SPAT.val) - 1); cdat->dstr_654__MFLAG_SPAT.val[10] = (char) 0; cdat->dstr_654__MFLAG_SPAT.slen = 10; /*^iniobj */ /*iniobj dobj_655__MFLAG_SPAT*/ /*_.VALDATA___V744*/ meltfptr[743] = (melt_ptr_t) & cdat->dobj_655__MFLAG_SPAT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_655__MFLAG_SPAT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_655__MFLAG_SPAT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_655__MFLAG_SPAT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_655__MFLAG_SPAT.obj_num = 2; cdat->dobj_655__MFLAG_SPAT.obj_hash = 556049198; cdat->dobj_655__MFLAG_SPAT.obj_len = 4; /*inistring dstr_656__MFLAG_SPAT*/ /*_.VALSTR___V745*/ meltfptr[744] = (melt_ptr_t) & cdat->dstr_656__MFLAG_SPAT; cdat->dstr_656__MFLAG_SPAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_656__MFLAG_SPAT.val, "MFLAG_SPAT", sizeof (cdat->dstr_656__MFLAG_SPAT.val) - 1); cdat->dstr_656__MFLAG_SPAT.val[10] = (char) 0; cdat->dstr_656__MFLAG_SPAT.slen = 10; /*iniobj dsym_657__MFLAG_RANK*/ /*uniqueobj*/ if (! /*_.VALDATA___V755*/ meltfptr[754]) /*_.VALDATA___V755*/ meltfptr[754] = (melt_ptr_t) & cdat->dsym_657__MFLAG_RANK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_657__MFLAG_RANK", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_657__MFLAG_RANK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_657__MFLAG_RANK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_657__MFLAG_RANK.obj_hash = 707610330; cdat->dsym_657__MFLAG_RANK.obj_len = 3; /*inistring dstr_658__MFLAG_RANK*/ /*_.VALSTR___V756*/ meltfptr[755] = (melt_ptr_t) & cdat->dstr_658__MFLAG_RANK; cdat->dstr_658__MFLAG_RANK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_658__MFLAG_RANK.val, "MFLAG_RANK", sizeof (cdat->dstr_658__MFLAG_RANK.val) - 1); cdat->dstr_658__MFLAG_RANK.val[10] = (char) 0; cdat->dstr_658__MFLAG_RANK.slen = 10; /*^iniobj */ /*iniobj dobj_659__MFLAG_RANK*/ /*_.VALDATA___V746*/ meltfptr[745] = (melt_ptr_t) & cdat->dobj_659__MFLAG_RANK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_659__MFLAG_RANK", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_659__MFLAG_RANK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_659__MFLAG_RANK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_659__MFLAG_RANK.obj_num = 3; cdat->dobj_659__MFLAG_RANK.obj_hash = 246209563; cdat->dobj_659__MFLAG_RANK.obj_len = 4; /*inistring dstr_660__MFLAG_RANK*/ /*_.VALSTR___V747*/ meltfptr[746] = (melt_ptr_t) & cdat->dstr_660__MFLAG_RANK; cdat->dstr_660__MFLAG_RANK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_660__MFLAG_RANK.val, "MFLAG_RANK", sizeof (cdat->dstr_660__MFLAG_RANK.val) - 1); cdat->dstr_660__MFLAG_RANK.val[10] = (char) 0; cdat->dstr_660__MFLAG_RANK.slen = 10; /*iniobj dsym_661__MFLAG_STRING*/ /*uniqueobj*/ if (! /*_.VALDATA___V757*/ meltfptr[756]) /*_.VALDATA___V757*/ meltfptr[756] = (melt_ptr_t) & cdat->dsym_661__MFLAG_STRING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_661__MFLAG_STRING", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_661__MFLAG_STRING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_661__MFLAG_STRING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_661__MFLAG_STRING.obj_hash = 984613516; cdat->dsym_661__MFLAG_STRING.obj_len = 3; /*inistring dstr_662__MFLAG_STRING*/ /*_.VALSTR___V758*/ meltfptr[757] = (melt_ptr_t) & cdat->dstr_662__MFLAG_STRING; cdat->dstr_662__MFLAG_STRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_662__MFLAG_STRING.val, "MFLAG_STRING", sizeof (cdat->dstr_662__MFLAG_STRING.val) - 1); cdat->dstr_662__MFLAG_STRING.val[12] = (char) 0; cdat->dstr_662__MFLAG_STRING.slen = 12; /*^iniobj */ /*iniobj dobj_663__MFLAG_STRING*/ /*_.VALDATA___V748*/ meltfptr[747] = (melt_ptr_t) & cdat->dobj_663__MFLAG_STRING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_663__MFLAG_STRING", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_663__MFLAG_STRING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_663__MFLAG_STRING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_663__MFLAG_STRING.obj_num = 4; cdat->dobj_663__MFLAG_STRING.obj_hash = 1034224733; cdat->dobj_663__MFLAG_STRING.obj_len = 4; /*inistring dstr_664__MFLAG_STRING*/ /*_.VALSTR___V749*/ meltfptr[748] = (melt_ptr_t) & cdat->dstr_664__MFLAG_STRING; cdat->dstr_664__MFLAG_STRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_664__MFLAG_STRING.val, "MFLAG_STRING", sizeof (cdat->dstr_664__MFLAG_STRING.val) - 1); cdat->dstr_664__MFLAG_STRING.val[12] = (char) 0; cdat->dstr_664__MFLAG_STRING.slen = 12; /*iniobj dsym_665__MFLAG_SETSTEP*/ /*uniqueobj*/ if (! /*_.VALDATA___V759*/ meltfptr[758]) /*_.VALDATA___V759*/ meltfptr[758] = (melt_ptr_t) & cdat->dsym_665__MFLAG_SETSTEP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_665__MFLAG_SETSTEP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_665__MFLAG_SETSTEP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_665__MFLAG_SETSTEP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_665__MFLAG_SETSTEP.obj_hash = 135121117; cdat->dsym_665__MFLAG_SETSTEP.obj_len = 3; /*inistring dstr_666__MFLAG_SETSTEP*/ /*_.VALSTR___V760*/ meltfptr[759] = (melt_ptr_t) & cdat->dstr_666__MFLAG_SETSTEP; cdat->dstr_666__MFLAG_SETSTEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_666__MFLAG_SETSTEP.val, "MFLAG_SETSTEP", sizeof (cdat->dstr_666__MFLAG_SETSTEP.val) - 1); cdat->dstr_666__MFLAG_SETSTEP.val[13] = (char) 0; cdat->dstr_666__MFLAG_SETSTEP.slen = 13; /*^iniobj */ /*iniobj dobj_667__MFLAG_SETSTEP*/ /*_.VALDATA___V750*/ meltfptr[749] = (melt_ptr_t) & cdat->dobj_667__MFLAG_SETSTEP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_667__MFLAG_SETSTEP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_667__MFLAG_SETSTEP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_667__MFLAG_SETSTEP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_667__MFLAG_SETSTEP.obj_num = 5; cdat->dobj_667__MFLAG_SETSTEP.obj_hash = 625373803; cdat->dobj_667__MFLAG_SETSTEP.obj_len = 4; /*inistring dstr_668__MFLAG_SETSTEP*/ /*_.VALSTR___V751*/ meltfptr[750] = (melt_ptr_t) & cdat->dstr_668__MFLAG_SETSTEP; cdat->dstr_668__MFLAG_SETSTEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_668__MFLAG_SETSTEP.val, "MFLAG_SETSTEP", sizeof (cdat->dstr_668__MFLAG_SETSTEP.val) - 1); cdat->dstr_668__MFLAG_SETSTEP.val[13] = (char) 0; cdat->dstr_668__MFLAG_SETSTEP.slen = 13; /*iniobj dsym_669__CLASS_MATCH_STEP*/ /*uniqueobj*/ if (! /*_.VALDATA___V761*/ meltfptr[760]) /*_.VALDATA___V761*/ meltfptr[760] = (melt_ptr_t) & cdat->dsym_669__CLASS_MATCH_STEP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_669__CLASS_MATCH_STEP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_669__CLASS_MATCH_STEP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_669__CLASS_MATCH_STEP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_669__CLASS_MATCH_STEP.obj_hash = 881977963; cdat->dsym_669__CLASS_MATCH_STEP.obj_len = 3; /*inistring dstr_670__CLASS_MATCH_STEP*/ /*_.VALSTR___V762*/ meltfptr[761] = (melt_ptr_t) & cdat->dstr_670__CLASS_MATCH_STEP; cdat->dstr_670__CLASS_MATCH_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_670__CLASS_MATCH_STEP.val, "CLASS_MATCH_STEP", sizeof (cdat->dstr_670__CLASS_MATCH_STEP. val) - 1); cdat->dstr_670__CLASS_MATCH_STEP.val[16] = (char) 0; cdat->dstr_670__CLASS_MATCH_STEP.slen = 16; MELT_LOCATION ("warmelt-normatch.melt:2739:/ iniobj"); /*iniobj dobj_671__CLASS_MATCH_STEP*/ /*_.VALDATA___V763*/ meltfptr[762] = (melt_ptr_t) & cdat->dobj_671__CLASS_MATCH_STEP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_671__CLASS_MATCH_STEP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_671__CLASS_MATCH_STEP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_671__CLASS_MATCH_STEP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_671__CLASS_MATCH_STEP.obj_num = MELTOBMAG_OBJECT; cdat->dobj_671__CLASS_MATCH_STEP.obj_hash = 333254523; cdat->dobj_671__CLASS_MATCH_STEP.obj_len = 8; /*inistring dstr_672__CLASS_MATCH_STEP*/ /*_.VALSTR___V764*/ meltfptr[763] = (melt_ptr_t) & cdat->dstr_672__CLASS_MATCH_STEP; cdat->dstr_672__CLASS_MATCH_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_672__CLASS_MATCH_STEP.val, "CLASS_MATCH_STEP", sizeof (cdat->dstr_672__CLASS_MATCH_STEP. val) - 1); cdat->dstr_672__CLASS_MATCH_STEP.val[16] = (char) 0; cdat->dstr_672__CLASS_MATCH_STEP.slen = 16; /*inimult dtup_673__CLASS_MATCH_STEP */ /*_.VALTUP___V765*/ meltfptr[764] = (melt_ptr_t) & cdat->dtup_673__CLASS_MATCH_STEP; cdat->dtup_673__CLASS_MATCH_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_673__CLASS_MATCH_STEP.nbval = 3; /*inimult dtup_674__CLASS_MATCH_STEP */ /*_.VALTUP___V766*/ meltfptr[765] = (melt_ptr_t) & cdat->dtup_674__CLASS_MATCH_STEP; cdat->dtup_674__CLASS_MATCH_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_674__CLASS_MATCH_STEP.nbval = 2; /*iniobj dsym_675__CLASS_MATCH_STEP_THEN*/ /*uniqueobj*/ if (! /*_.VALDATA___V767*/ meltfptr[766]) /*_.VALDATA___V767*/ meltfptr[766] = (melt_ptr_t) & cdat->dsym_675__CLASS_MATCH_STEP_THEN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_675__CLASS_MATCH_STEP_THEN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_675__CLASS_MATCH_STEP_THEN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_675__CLASS_MATCH_STEP_THEN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_675__CLASS_MATCH_STEP_THEN.obj_hash = 406042424; cdat->dsym_675__CLASS_MATCH_STEP_THEN.obj_len = 3; /*inistring dstr_676__CLASS_MATCH_STEP*/ /*_.VALSTR___V768*/ meltfptr[767] = (melt_ptr_t) & cdat->dstr_676__CLASS_MATCH_STEP; cdat->dstr_676__CLASS_MATCH_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_676__CLASS_MATCH_STEP.val, "CLASS_MATCH_STEP_THEN", sizeof (cdat->dstr_676__CLASS_MATCH_STEP. val) - 1); cdat->dstr_676__CLASS_MATCH_STEP.val[21] = (char) 0; cdat->dstr_676__CLASS_MATCH_STEP.slen = 21; MELT_LOCATION ("warmelt-normatch.melt:2745:/ iniobj"); /*iniobj dobj_677__CLASS_MATCH_STEP_THEN*/ /*_.VALDATA___V769*/ meltfptr[768] = (melt_ptr_t) & cdat->dobj_677__CLASS_MATCH_STEP_THEN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_677__CLASS_MATCH_STEP_THEN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_677__CLASS_MATCH_STEP_THEN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_677__CLASS_MATCH_STEP_THEN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_677__CLASS_MATCH_STEP_THEN.obj_num = MELTOBMAG_OBJECT; cdat->dobj_677__CLASS_MATCH_STEP_THEN.obj_hash = 793683712; cdat->dobj_677__CLASS_MATCH_STEP_THEN.obj_len = 8; /*inistring dstr_678__CLASS_MATCH_STEP*/ /*_.VALSTR___V770*/ meltfptr[769] = (melt_ptr_t) & cdat->dstr_678__CLASS_MATCH_STEP; cdat->dstr_678__CLASS_MATCH_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_678__CLASS_MATCH_STEP.val, "CLASS_MATCH_STEP_THEN", sizeof (cdat->dstr_678__CLASS_MATCH_STEP. val) - 1); cdat->dstr_678__CLASS_MATCH_STEP.val[21] = (char) 0; cdat->dstr_678__CLASS_MATCH_STEP.slen = 21; /*inimult dtup_679__CLASS_MATCH_STEP_THEN */ /*_.VALTUP___V771*/ meltfptr[770] = (melt_ptr_t) & cdat->dtup_679__CLASS_MATCH_STEP_THEN; cdat->dtup_679__CLASS_MATCH_STEP_THEN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_679__CLASS_MATCH_STEP_THEN.nbval = 4; /*inimult dtup_680__CLASS_MATCH_STEP_THEN */ /*_.VALTUP___V774*/ meltfptr[773] = (melt_ptr_t) & cdat->dtup_680__CLASS_MATCH_STEP_THEN; cdat->dtup_680__CLASS_MATCH_STEP_THEN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_680__CLASS_MATCH_STEP_THEN.nbval = 3; /*iniobj dsym_681__MSTEP_THEN*/ /*uniqueobj*/ if (! /*_.VALDATA___V775*/ meltfptr[774]) /*_.VALDATA___V775*/ meltfptr[774] = (melt_ptr_t) & cdat->dsym_681__MSTEP_THEN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_681__MSTEP_THEN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_681__MSTEP_THEN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_681__MSTEP_THEN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_681__MSTEP_THEN.obj_hash = 328175727; cdat->dsym_681__MSTEP_THEN.obj_len = 3; /*inistring dstr_682__MSTEP_THEN*/ /*_.VALSTR___V776*/ meltfptr[775] = (melt_ptr_t) & cdat->dstr_682__MSTEP_THEN; cdat->dstr_682__MSTEP_THEN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_682__MSTEP_THEN.val, "MSTEP_THEN", sizeof (cdat->dstr_682__MSTEP_THEN.val) - 1); cdat->dstr_682__MSTEP_THEN.val[10] = (char) 0; cdat->dstr_682__MSTEP_THEN.slen = 10; /*^iniobj */ /*iniobj dobj_683__MSTEP_THEN*/ /*_.VALDATA___V772*/ meltfptr[771] = (melt_ptr_t) & cdat->dobj_683__MSTEP_THEN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_683__MSTEP_THEN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_683__MSTEP_THEN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_683__MSTEP_THEN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_683__MSTEP_THEN.obj_num = 2; cdat->dobj_683__MSTEP_THEN.obj_hash = 290094644; cdat->dobj_683__MSTEP_THEN.obj_len = 4; /*inistring dstr_684__MSTEP_THEN*/ /*_.VALSTR___V773*/ meltfptr[772] = (melt_ptr_t) & cdat->dstr_684__MSTEP_THEN; cdat->dstr_684__MSTEP_THEN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_684__MSTEP_THEN.val, "MSTEP_THEN", sizeof (cdat->dstr_684__MSTEP_THEN.val) - 1); cdat->dstr_684__MSTEP_THEN.val[10] = (char) 0; cdat->dstr_684__MSTEP_THEN.slen = 10; /*iniobj dsym_685__CLASS_MATCH_STEP_CLEAR*/ /*uniqueobj*/ if (! /*_.VALDATA___V777*/ meltfptr[776]) /*_.VALDATA___V777*/ meltfptr[776] = (melt_ptr_t) & cdat->dsym_685__CLASS_MATCH_STEP_CLEAR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_685__CLASS_MATCH_STEP_CLEAR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_685__CLASS_MATCH_STEP_CLEAR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_685__CLASS_MATCH_STEP_CLEAR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_685__CLASS_MATCH_STEP_CLEAR.obj_hash = 970042959; cdat->dsym_685__CLASS_MATCH_STEP_CLEAR.obj_len = 3; /*inistring dstr_686__CLASS_MATCH_STEP*/ /*_.VALSTR___V778*/ meltfptr[777] = (melt_ptr_t) & cdat->dstr_686__CLASS_MATCH_STEP; cdat->dstr_686__CLASS_MATCH_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_686__CLASS_MATCH_STEP.val, "CLASS_MATCH_STEP_CLEAR", sizeof (cdat->dstr_686__CLASS_MATCH_STEP. val) - 1); cdat->dstr_686__CLASS_MATCH_STEP.val[22] = (char) 0; cdat->dstr_686__CLASS_MATCH_STEP.slen = 22; MELT_LOCATION ("warmelt-normatch.melt:2752:/ iniobj"); /*iniobj dobj_687__CLASS_MATCH_STEP_CLEAR*/ /*_.VALDATA___V779*/ meltfptr[778] = (melt_ptr_t) & cdat->dobj_687__CLASS_MATCH_STEP_CLEAR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_687__CLASS_MATCH_STEP_CLEAR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_687__CLASS_MATCH_STEP_CLEAR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_687__CLASS_MATCH_STEP_CLEAR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_687__CLASS_MATCH_STEP_CLEAR.obj_num = MELTOBMAG_OBJECT; cdat->dobj_687__CLASS_MATCH_STEP_CLEAR.obj_hash = 322098421; cdat->dobj_687__CLASS_MATCH_STEP_CLEAR.obj_len = 8; /*inistring dstr_688__CLASS_MATCH_STEP*/ /*_.VALSTR___V780*/ meltfptr[779] = (melt_ptr_t) & cdat->dstr_688__CLASS_MATCH_STEP; cdat->dstr_688__CLASS_MATCH_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_688__CLASS_MATCH_STEP.val, "CLASS_MATCH_STEP_CLEAR", sizeof (cdat->dstr_688__CLASS_MATCH_STEP. val) - 1); cdat->dstr_688__CLASS_MATCH_STEP.val[22] = (char) 0; cdat->dstr_688__CLASS_MATCH_STEP.slen = 22; /*inimult dtup_689__CLASS_MATCH_STEP_CLEAR */ /*_.VALTUP___V781*/ meltfptr[780] = (melt_ptr_t) & cdat->dtup_689__CLASS_MATCH_STEP_CLEAR; cdat->dtup_689__CLASS_MATCH_STEP_CLEAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_689__CLASS_MATCH_STEP_CLEAR.nbval = 5; /*inimult dtup_690__CLASS_MATCH_STEP_CLEAR */ /*_.VALTUP___V784*/ meltfptr[783] = (melt_ptr_t) & cdat->dtup_690__CLASS_MATCH_STEP_CLEAR; cdat->dtup_690__CLASS_MATCH_STEP_CLEAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_690__CLASS_MATCH_STEP_CLEAR.nbval = 4; /*iniobj dsym_691__MSTEP_CLEARDATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V785*/ meltfptr[784]) /*_.VALDATA___V785*/ meltfptr[784] = (melt_ptr_t) & cdat->dsym_691__MSTEP_CLEARDATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_691__MSTEP_CLEARDATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_691__MSTEP_CLEARDATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_691__MSTEP_CLEARDATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_691__MSTEP_CLEARDATA.obj_hash = 393837036; cdat->dsym_691__MSTEP_CLEARDATA.obj_len = 3; /*inistring dstr_692__MSTEP_CLEARDATA*/ /*_.VALSTR___V786*/ meltfptr[785] = (melt_ptr_t) & cdat->dstr_692__MSTEP_CLEARDATA; cdat->dstr_692__MSTEP_CLEARDATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_692__MSTEP_CLEARDATA.val, "MSTEP_CLEARDATA", sizeof (cdat->dstr_692__MSTEP_CLEARDATA.val) - 1); cdat->dstr_692__MSTEP_CLEARDATA.val[15] = (char) 0; cdat->dstr_692__MSTEP_CLEARDATA.slen = 15; /*^iniobj */ /*iniobj dobj_693__MSTEP_CLEARDATA*/ /*_.VALDATA___V782*/ meltfptr[781] = (melt_ptr_t) & cdat->dobj_693__MSTEP_CLEARDATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_693__MSTEP_CLEARDATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_693__MSTEP_CLEARDATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_693__MSTEP_CLEARDATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_693__MSTEP_CLEARDATA.obj_num = 3; cdat->dobj_693__MSTEP_CLEARDATA.obj_hash = 500409318; cdat->dobj_693__MSTEP_CLEARDATA.obj_len = 4; /*inistring dstr_694__MSTEP_CLEARDATA*/ /*_.VALSTR___V783*/ meltfptr[782] = (melt_ptr_t) & cdat->dstr_694__MSTEP_CLEARDATA; cdat->dstr_694__MSTEP_CLEARDATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_694__MSTEP_CLEARDATA.val, "MSTEP_CLEARDATA", sizeof (cdat->dstr_694__MSTEP_CLEARDATA.val) - 1); cdat->dstr_694__MSTEP_CLEARDATA.val[15] = (char) 0; cdat->dstr_694__MSTEP_CLEARDATA.slen = 15; /*iniobj dsym_695__CLASS_MATCH_STEP_WITH_FLAG*/ /*uniqueobj*/ if (! /*_.VALDATA___V787*/ meltfptr[786]) /*_.VALDATA___V787*/ meltfptr[786] = (melt_ptr_t) & cdat->dsym_695__CLASS_MATCH_STEP_WITH_FLAG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_695__CLASS_MATCH_STEP_WITH_FLAG", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_695__CLASS_MATCH_STEP_WITH_FLAG", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_695__CLASS_MATCH_STEP_WITH_FLAG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_695__CLASS_MATCH_STEP_WITH_FLAG.obj_hash = 726680601; cdat->dsym_695__CLASS_MATCH_STEP_WITH_FLAG.obj_len = 3; /*inistring dstr_696__CLASS_MATCH_STEP*/ /*_.VALSTR___V788*/ meltfptr[787] = (melt_ptr_t) & cdat->dstr_696__CLASS_MATCH_STEP; cdat->dstr_696__CLASS_MATCH_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_696__CLASS_MATCH_STEP.val, "CLASS_MATCH_STEP_WITH_FLAG", sizeof (cdat->dstr_696__CLASS_MATCH_STEP. val) - 1); cdat->dstr_696__CLASS_MATCH_STEP.val[26] = (char) 0; cdat->dstr_696__CLASS_MATCH_STEP.slen = 26; MELT_LOCATION ("warmelt-normatch.melt:2757:/ iniobj"); /*iniobj dobj_697__CLASS_MATCH_STEP_WITH_FLAG*/ /*_.VALDATA___V789*/ meltfptr[788] = (melt_ptr_t) & cdat->dobj_697__CLASS_MATCH_STEP_WITH_FLAG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_697__CLASS_MATCH_STEP_WITH_FLAG", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_697__CLASS_MATCH_STEP_WITH_FLAG", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_697__CLASS_MATCH_STEP_WITH_FLAG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_697__CLASS_MATCH_STEP_WITH_FLAG.obj_num = MELTOBMAG_OBJECT; cdat->dobj_697__CLASS_MATCH_STEP_WITH_FLAG.obj_hash = 469754464; cdat->dobj_697__CLASS_MATCH_STEP_WITH_FLAG.obj_len = 8; /*inistring dstr_698__CLASS_MATCH_STEP*/ /*_.VALSTR___V790*/ meltfptr[789] = (melt_ptr_t) & cdat->dstr_698__CLASS_MATCH_STEP; cdat->dstr_698__CLASS_MATCH_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_698__CLASS_MATCH_STEP.val, "CLASS_MATCH_STEP_WITH_FLAG", sizeof (cdat->dstr_698__CLASS_MATCH_STEP. val) - 1); cdat->dstr_698__CLASS_MATCH_STEP.val[26] = (char) 0; cdat->dstr_698__CLASS_MATCH_STEP.slen = 26; /*inimult dtup_699__CLASS_MATCH_STEP_WITH_FLAG */ /*_.VALTUP___V791*/ meltfptr[790] = (melt_ptr_t) & cdat->dtup_699__CLASS_MATCH_STEP_WITH_FLAG; cdat->dtup_699__CLASS_MATCH_STEP_WITH_FLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_699__CLASS_MATCH_STEP_WITH_FLAG.nbval = 5; /*inimult dtup_700__CLASS_MATCH_STEP_WITH_FLAG */ /*_.VALTUP___V794*/ meltfptr[793] = (melt_ptr_t) & cdat->dtup_700__CLASS_MATCH_STEP_WITH_FLAG; cdat->dtup_700__CLASS_MATCH_STEP_WITH_FLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_700__CLASS_MATCH_STEP_WITH_FLAG.nbval = 4; /*iniobj dsym_701__MSTEP_FLAG*/ /*uniqueobj*/ if (! /*_.VALDATA___V795*/ meltfptr[794]) /*_.VALDATA___V795*/ meltfptr[794] = (melt_ptr_t) & cdat->dsym_701__MSTEP_FLAG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_701__MSTEP_FLAG", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_701__MSTEP_FLAG", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_701__MSTEP_FLAG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_701__MSTEP_FLAG.obj_hash = 748215355; cdat->dsym_701__MSTEP_FLAG.obj_len = 3; /*inistring dstr_702__MSTEP_FLAG*/ /*_.VALSTR___V796*/ meltfptr[795] = (melt_ptr_t) & cdat->dstr_702__MSTEP_FLAG; cdat->dstr_702__MSTEP_FLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_702__MSTEP_FLAG.val, "MSTEP_FLAG", sizeof (cdat->dstr_702__MSTEP_FLAG.val) - 1); cdat->dstr_702__MSTEP_FLAG.val[10] = (char) 0; cdat->dstr_702__MSTEP_FLAG.slen = 10; /*^iniobj */ /*iniobj dobj_703__MSTEP_FLAG*/ /*_.VALDATA___V792*/ meltfptr[791] = (melt_ptr_t) & cdat->dobj_703__MSTEP_FLAG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_703__MSTEP_FLAG", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_703__MSTEP_FLAG", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_703__MSTEP_FLAG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_703__MSTEP_FLAG.obj_num = 3; cdat->dobj_703__MSTEP_FLAG.obj_hash = 1000033999; cdat->dobj_703__MSTEP_FLAG.obj_len = 4; /*inistring dstr_704__MSTEP_FLAG*/ /*_.VALSTR___V793*/ meltfptr[792] = (melt_ptr_t) & cdat->dstr_704__MSTEP_FLAG; cdat->dstr_704__MSTEP_FLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_704__MSTEP_FLAG.val, "MSTEP_FLAG", sizeof (cdat->dstr_704__MSTEP_FLAG.val) - 1); cdat->dstr_704__MSTEP_FLAG.val[10] = (char) 0; cdat->dstr_704__MSTEP_FLAG.slen = 10; /*iniobj dsym_705__CLASS_MATCH_STEP_WITH_DATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V797*/ meltfptr[796]) /*_.VALDATA___V797*/ meltfptr[796] = (melt_ptr_t) & cdat->dsym_705__CLASS_MATCH_STEP_WITH_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_705__CLASS_MATCH_STEP_WITH_DATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_705__CLASS_MATCH_STEP_WITH_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_705__CLASS_MATCH_STEP_WITH_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_705__CLASS_MATCH_STEP_WITH_DATA.obj_hash = 750906757; cdat->dsym_705__CLASS_MATCH_STEP_WITH_DATA.obj_len = 3; /*inistring dstr_706__CLASS_MATCH_STEP*/ /*_.VALSTR___V798*/ meltfptr[797] = (melt_ptr_t) & cdat->dstr_706__CLASS_MATCH_STEP; cdat->dstr_706__CLASS_MATCH_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_706__CLASS_MATCH_STEP.val, "CLASS_MATCH_STEP_WITH_DATA", sizeof (cdat->dstr_706__CLASS_MATCH_STEP. val) - 1); cdat->dstr_706__CLASS_MATCH_STEP.val[26] = (char) 0; cdat->dstr_706__CLASS_MATCH_STEP.slen = 26; MELT_LOCATION ("warmelt-normatch.melt:2763:/ iniobj"); /*iniobj dobj_707__CLASS_MATCH_STEP_WITH_DATA*/ /*_.VALDATA___V799*/ meltfptr[798] = (melt_ptr_t) & cdat->dobj_707__CLASS_MATCH_STEP_WITH_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_707__CLASS_MATCH_STEP_WITH_DATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_707__CLASS_MATCH_STEP_WITH_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_707__CLASS_MATCH_STEP_WITH_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_707__CLASS_MATCH_STEP_WITH_DATA.obj_num = MELTOBMAG_OBJECT; cdat->dobj_707__CLASS_MATCH_STEP_WITH_DATA.obj_hash = 261833938; cdat->dobj_707__CLASS_MATCH_STEP_WITH_DATA.obj_len = 8; /*inistring dstr_708__CLASS_MATCH_STEP*/ /*_.VALSTR___V800*/ meltfptr[799] = (melt_ptr_t) & cdat->dstr_708__CLASS_MATCH_STEP; cdat->dstr_708__CLASS_MATCH_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_708__CLASS_MATCH_STEP.val, "CLASS_MATCH_STEP_WITH_DATA", sizeof (cdat->dstr_708__CLASS_MATCH_STEP. val) - 1); cdat->dstr_708__CLASS_MATCH_STEP.val[26] = (char) 0; cdat->dstr_708__CLASS_MATCH_STEP.slen = 26; /*inimult dtup_709__CLASS_MATCH_STEP_WITH_DATA */ /*_.VALTUP___V801*/ meltfptr[800] = (melt_ptr_t) & cdat->dtup_709__CLASS_MATCH_STEP_WITH_DATA; cdat->dtup_709__CLASS_MATCH_STEP_WITH_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_709__CLASS_MATCH_STEP_WITH_DATA.nbval = 5; /*inimult dtup_710__CLASS_MATCH_STEP_WITH_DATA */ /*_.VALTUP___V806*/ meltfptr[805] = (melt_ptr_t) & cdat->dtup_710__CLASS_MATCH_STEP_WITH_DATA; cdat->dtup_710__CLASS_MATCH_STEP_WITH_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_710__CLASS_MATCH_STEP_WITH_DATA.nbval = 5; /*iniobj dsym_711__MSTEP_DATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V807*/ meltfptr[806]) /*_.VALDATA___V807*/ meltfptr[806] = (melt_ptr_t) & cdat->dsym_711__MSTEP_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_711__MSTEP_DATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_711__MSTEP_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_711__MSTEP_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_711__MSTEP_DATA.obj_hash = 153671690; cdat->dsym_711__MSTEP_DATA.obj_len = 3; /*inistring dstr_712__MSTEP_DATA*/ /*_.VALSTR___V808*/ meltfptr[807] = (melt_ptr_t) & cdat->dstr_712__MSTEP_DATA; cdat->dstr_712__MSTEP_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_712__MSTEP_DATA.val, "MSTEP_DATA", sizeof (cdat->dstr_712__MSTEP_DATA.val) - 1); cdat->dstr_712__MSTEP_DATA.val[10] = (char) 0; cdat->dstr_712__MSTEP_DATA.slen = 10; /*^iniobj */ /*iniobj dobj_713__MSTEP_DATA*/ /*_.VALDATA___V802*/ meltfptr[801] = (melt_ptr_t) & cdat->dobj_713__MSTEP_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_713__MSTEP_DATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_713__MSTEP_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_713__MSTEP_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_713__MSTEP_DATA.obj_num = 3; cdat->dobj_713__MSTEP_DATA.obj_hash = 599102776; cdat->dobj_713__MSTEP_DATA.obj_len = 4; /*inistring dstr_714__MSTEP_DATA*/ /*_.VALSTR___V803*/ meltfptr[802] = (melt_ptr_t) & cdat->dstr_714__MSTEP_DATA; cdat->dstr_714__MSTEP_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_714__MSTEP_DATA.val, "MSTEP_DATA", sizeof (cdat->dstr_714__MSTEP_DATA.val) - 1); cdat->dstr_714__MSTEP_DATA.val[10] = (char) 0; cdat->dstr_714__MSTEP_DATA.slen = 10; /*iniobj dsym_715__MSTEP_INDEX*/ /*uniqueobj*/ if (! /*_.VALDATA___V809*/ meltfptr[808]) /*_.VALDATA___V809*/ meltfptr[808] = (melt_ptr_t) & cdat->dsym_715__MSTEP_INDEX; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_715__MSTEP_INDEX", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_715__MSTEP_INDEX", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_715__MSTEP_INDEX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_715__MSTEP_INDEX.obj_hash = 858381181; cdat->dsym_715__MSTEP_INDEX.obj_len = 3; /*inistring dstr_716__MSTEP_INDEX*/ /*_.VALSTR___V810*/ meltfptr[809] = (melt_ptr_t) & cdat->dstr_716__MSTEP_INDEX; cdat->dstr_716__MSTEP_INDEX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_716__MSTEP_INDEX.val, "MSTEP_INDEX", sizeof (cdat->dstr_716__MSTEP_INDEX.val) - 1); cdat->dstr_716__MSTEP_INDEX.val[11] = (char) 0; cdat->dstr_716__MSTEP_INDEX.slen = 11; /*^iniobj */ /*iniobj dobj_717__MSTEP_INDEX*/ /*_.VALDATA___V804*/ meltfptr[803] = (melt_ptr_t) & cdat->dobj_717__MSTEP_INDEX; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_717__MSTEP_INDEX", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_717__MSTEP_INDEX", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_717__MSTEP_INDEX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_717__MSTEP_INDEX.obj_num = 4; cdat->dobj_717__MSTEP_INDEX.obj_hash = 439160220; cdat->dobj_717__MSTEP_INDEX.obj_len = 4; /*inistring dstr_718__MSTEP_INDEX*/ /*_.VALSTR___V805*/ meltfptr[804] = (melt_ptr_t) & cdat->dstr_718__MSTEP_INDEX; cdat->dstr_718__MSTEP_INDEX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_718__MSTEP_INDEX.val, "MSTEP_INDEX", sizeof (cdat->dstr_718__MSTEP_INDEX.val) - 1); cdat->dstr_718__MSTEP_INDEX.val[11] = (char) 0; cdat->dstr_718__MSTEP_INDEX.slen = 11; /*iniobj dsym_719__CLASS_MATCH_STEP_FLAG_SET*/ /*uniqueobj*/ if (! /*_.VALDATA___V811*/ meltfptr[810]) /*_.VALDATA___V811*/ meltfptr[810] = (melt_ptr_t) & cdat->dsym_719__CLASS_MATCH_STEP_FLAG_SET; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_719__CLASS_MATCH_STEP_FLAG_SET", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_719__CLASS_MATCH_STEP_FLAG_SET", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_719__CLASS_MATCH_STEP_FLAG_SET.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_719__CLASS_MATCH_STEP_FLAG_SET.obj_hash = 285733198; cdat->dsym_719__CLASS_MATCH_STEP_FLAG_SET.obj_len = 3; /*inistring dstr_720__CLASS_MATCH_STEP*/ /*_.VALSTR___V812*/ meltfptr[811] = (melt_ptr_t) & cdat->dstr_720__CLASS_MATCH_STEP; cdat->dstr_720__CLASS_MATCH_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_720__CLASS_MATCH_STEP.val, "CLASS_MATCH_STEP_FLAG_SET", sizeof (cdat->dstr_720__CLASS_MATCH_STEP. val) - 1); cdat->dstr_720__CLASS_MATCH_STEP.val[25] = (char) 0; cdat->dstr_720__CLASS_MATCH_STEP.slen = 25; MELT_LOCATION ("warmelt-normatch.melt:2775:/ iniobj"); /*iniobj dobj_721__CLASS_MATCH_STEP_FLAG_SET*/ /*_.VALDATA___V813*/ meltfptr[812] = (melt_ptr_t) & cdat->dobj_721__CLASS_MATCH_STEP_FLAG_SET; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_721__CLASS_MATCH_STEP_FLAG_SET", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_721__CLASS_MATCH_STEP_FLAG_SET", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_721__CLASS_MATCH_STEP_FLAG_SET.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_721__CLASS_MATCH_STEP_FLAG_SET.obj_num = MELTOBMAG_OBJECT; cdat->dobj_721__CLASS_MATCH_STEP_FLAG_SET.obj_hash = 1002358017; cdat->dobj_721__CLASS_MATCH_STEP_FLAG_SET.obj_len = 8; /*inistring dstr_722__CLASS_MATCH_STEP*/ /*_.VALSTR___V814*/ meltfptr[813] = (melt_ptr_t) & cdat->dstr_722__CLASS_MATCH_STEP; cdat->dstr_722__CLASS_MATCH_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_722__CLASS_MATCH_STEP.val, "CLASS_MATCH_STEP_FLAG_SET", sizeof (cdat->dstr_722__CLASS_MATCH_STEP. val) - 1); cdat->dstr_722__CLASS_MATCH_STEP.val[25] = (char) 0; cdat->dstr_722__CLASS_MATCH_STEP.slen = 25; /*inimult dtup_723__CLASS_MATCH_STEP_FLAG_SET */ /*_.VALTUP___V815*/ meltfptr[814] = (melt_ptr_t) & cdat->dtup_723__CLASS_MATCH_STEP_FLAG_SET; cdat->dtup_723__CLASS_MATCH_STEP_FLAG_SET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_723__CLASS_MATCH_STEP_FLAG_SET.nbval = 6; /*inimult dtup_724__CLASS_MATCH_STEP_FLAG_SET */ /*_.VALTUP___V816*/ meltfptr[815] = (melt_ptr_t) & cdat->dtup_724__CLASS_MATCH_STEP_FLAG_SET; cdat->dtup_724__CLASS_MATCH_STEP_FLAG_SET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_724__CLASS_MATCH_STEP_FLAG_SET.nbval = 4; /*iniobj dsym_725__CLASS_MATCH_STEP_FLAG_OPERATION*/ /*uniqueobj*/ if (! /*_.VALDATA___V817*/ meltfptr[816]) /*_.VALDATA___V817*/ meltfptr[816] = (melt_ptr_t) & cdat->dsym_725__CLASS_MATCH_STEP_FLAG_OPERATION; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_725__CLASS_MATCH_STEP_FLAG_OPERATION", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_725__CLASS_MATCH_STEP_FLAG_OPERATION", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_725__CLASS_MATCH_STEP_FLAG_OPERATION.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_725__CLASS_MATCH_STEP_FLAG_OPERATION.obj_hash = 541209628; cdat->dsym_725__CLASS_MATCH_STEP_FLAG_OPERATION.obj_len = 3; /*inistring dstr_726__CLASS_MATCH_STEP*/ /*_.VALSTR___V818*/ meltfptr[817] = (melt_ptr_t) & cdat->dstr_726__CLASS_MATCH_STEP; cdat->dstr_726__CLASS_MATCH_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_726__CLASS_MATCH_STEP.val, "CLASS_MATCH_STEP_FLAG_OPERATION", sizeof (cdat->dstr_726__CLASS_MATCH_STEP. val) - 1); cdat->dstr_726__CLASS_MATCH_STEP.val[31] = (char) 0; cdat->dstr_726__CLASS_MATCH_STEP.slen = 31; MELT_LOCATION ("warmelt-normatch.melt:2781:/ iniobj"); /*iniobj dobj_727__CLASS_MATCH_STEP_FLAG_OPERATION*/ /*_.VALDATA___V819*/ meltfptr[818] = (melt_ptr_t) & cdat->dobj_727__CLASS_MATCH_STEP_FLAG_OPERATION; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_727__CLASS_MATCH_STEP_FLAG_OPERATION", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_727__CLASS_MATCH_STEP_FLAG_OPERATION", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_727__CLASS_MATCH_STEP_FLAG_OPERATION.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_727__CLASS_MATCH_STEP_FLAG_OPERATION.obj_num = MELTOBMAG_OBJECT; cdat->dobj_727__CLASS_MATCH_STEP_FLAG_OPERATION.obj_hash = 46422803; cdat->dobj_727__CLASS_MATCH_STEP_FLAG_OPERATION.obj_len = 8; /*inistring dstr_728__CLASS_MATCH_STEP*/ /*_.VALSTR___V820*/ meltfptr[819] = (melt_ptr_t) & cdat->dstr_728__CLASS_MATCH_STEP; cdat->dstr_728__CLASS_MATCH_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_728__CLASS_MATCH_STEP.val, "CLASS_MATCH_STEP_FLAG_OPERATION", sizeof (cdat->dstr_728__CLASS_MATCH_STEP. val) - 1); cdat->dstr_728__CLASS_MATCH_STEP.val[31] = (char) 0; cdat->dstr_728__CLASS_MATCH_STEP.slen = 31; /*inimult dtup_729__CLASS_MATCH_STEP_FLAG_OPERATION */ /*_.VALTUP___V821*/ meltfptr[820] = (melt_ptr_t) & cdat->dtup_729__CLASS_MATCH_STEP_FLAG_OPERATION; cdat->dtup_729__CLASS_MATCH_STEP_FLAG_OPERATION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_729__CLASS_MATCH_STEP_FLAG_OPERATION.nbval = 6; /*inimult dtup_730__CLASS_MATCH_STEP_FLAG_OPERATION */ /*_.VALTUP___V824*/ meltfptr[823] = (melt_ptr_t) & cdat->dtup_730__CLASS_MATCH_STEP_FLAG_OPERATION; cdat->dtup_730__CLASS_MATCH_STEP_FLAG_OPERATION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_730__CLASS_MATCH_STEP_FLAG_OPERATION.nbval = 5; /*iniobj dsym_731__MSTEP_FLAGARGS*/ /*uniqueobj*/ if (! /*_.VALDATA___V825*/ meltfptr[824]) /*_.VALDATA___V825*/ meltfptr[824] = (melt_ptr_t) & cdat->dsym_731__MSTEP_FLAGARGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_731__MSTEP_FLAGARGS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_731__MSTEP_FLAGARGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_731__MSTEP_FLAGARGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_731__MSTEP_FLAGARGS.obj_hash = 645209889; cdat->dsym_731__MSTEP_FLAGARGS.obj_len = 3; /*inistring dstr_732__MSTEP_FLAGARGS*/ /*_.VALSTR___V826*/ meltfptr[825] = (melt_ptr_t) & cdat->dstr_732__MSTEP_FLAGARGS; cdat->dstr_732__MSTEP_FLAGARGS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_732__MSTEP_FLAGARGS.val, "MSTEP_FLAGARGS", sizeof (cdat->dstr_732__MSTEP_FLAGARGS.val) - 1); cdat->dstr_732__MSTEP_FLAGARGS.val[14] = (char) 0; cdat->dstr_732__MSTEP_FLAGARGS.slen = 14; /*^iniobj */ /*iniobj dobj_733__MSTEP_FLAGARGS*/ /*_.VALDATA___V822*/ meltfptr[821] = (melt_ptr_t) & cdat->dobj_733__MSTEP_FLAGARGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_733__MSTEP_FLAGARGS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_733__MSTEP_FLAGARGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_733__MSTEP_FLAGARGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_733__MSTEP_FLAGARGS.obj_num = 4; cdat->dobj_733__MSTEP_FLAGARGS.obj_hash = 768055646; cdat->dobj_733__MSTEP_FLAGARGS.obj_len = 4; /*inistring dstr_734__MSTEP_FLAGARGS*/ /*_.VALSTR___V823*/ meltfptr[822] = (melt_ptr_t) & cdat->dstr_734__MSTEP_FLAGARGS; cdat->dstr_734__MSTEP_FLAGARGS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_734__MSTEP_FLAGARGS.val, "MSTEP_FLAGARGS", sizeof (cdat->dstr_734__MSTEP_FLAGARGS.val) - 1); cdat->dstr_734__MSTEP_FLAGARGS.val[14] = (char) 0; cdat->dstr_734__MSTEP_FLAGARGS.slen = 14; /*iniobj dsym_735__CLASS_MATCH_STEP_FLAG_CONJUNCTION*/ /*uniqueobj*/ if (! /*_.VALDATA___V827*/ meltfptr[826]) /*_.VALDATA___V827*/ meltfptr[826] = (melt_ptr_t) & cdat->dsym_735__CLASS_MATCH_STEP_FLAG_CONJUNCTION; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_735__CLASS_MATCH_STEP_FLAG_CONJUNCTION", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_735__CLASS_MATCH_STEP_FLAG_CONJUNCTION", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_735__CLASS_MATCH_STEP_FLAG_CONJUNCTION.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_735__CLASS_MATCH_STEP_FLAG_CONJUNCTION.obj_hash = 932930679; cdat->dsym_735__CLASS_MATCH_STEP_FLAG_CONJUNCTION.obj_len = 3; /*inistring dstr_736__CLASS_MATCH_STEP*/ /*_.VALSTR___V828*/ meltfptr[827] = (melt_ptr_t) & cdat->dstr_736__CLASS_MATCH_STEP; cdat->dstr_736__CLASS_MATCH_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_736__CLASS_MATCH_STEP.val, "CLASS_MATCH_STEP_FLAG_CONJUNCTION", sizeof (cdat->dstr_736__CLASS_MATCH_STEP. val) - 1); cdat->dstr_736__CLASS_MATCH_STEP.val[33] = (char) 0; cdat->dstr_736__CLASS_MATCH_STEP.slen = 33; MELT_LOCATION ("warmelt-normatch.melt:2786:/ iniobj"); /*iniobj dobj_737__CLASS_MATCH_STEP_FLAG_CONJUNCTION*/ /*_.VALDATA___V829*/ meltfptr[828] = (melt_ptr_t) & cdat->dobj_737__CLASS_MATCH_STEP_FLAG_CONJUNCTION; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_737__CLASS_MATCH_STEP_FLAG_CONJUNCTION", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_737__CLASS_MATCH_STEP_FLAG_CONJUNCTION", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_737__CLASS_MATCH_STEP_FLAG_CONJUNCTION.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_737__CLASS_MATCH_STEP_FLAG_CONJUNCTION.obj_num = MELTOBMAG_OBJECT; cdat->dobj_737__CLASS_MATCH_STEP_FLAG_CONJUNCTION.obj_hash = 115950896; cdat->dobj_737__CLASS_MATCH_STEP_FLAG_CONJUNCTION.obj_len = 8; /*inistring dstr_738__CLASS_MATCH_STEP*/ /*_.VALSTR___V830*/ meltfptr[829] = (melt_ptr_t) & cdat->dstr_738__CLASS_MATCH_STEP; cdat->dstr_738__CLASS_MATCH_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_738__CLASS_MATCH_STEP.val, "CLASS_MATCH_STEP_FLAG_CONJUNCTION", sizeof (cdat->dstr_738__CLASS_MATCH_STEP. val) - 1); cdat->dstr_738__CLASS_MATCH_STEP.val[33] = (char) 0; cdat->dstr_738__CLASS_MATCH_STEP.slen = 33; /*inimult dtup_739__CLASS_MATCH_STEP_FLAG_CONJUNCTION */ /*_.VALTUP___V831*/ meltfptr[830] = (melt_ptr_t) & cdat->dtup_739__CLASS_MATCH_STEP_FLAG_CONJUNCTION; cdat->dtup_739__CLASS_MATCH_STEP_FLAG_CONJUNCTION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_739__CLASS_MATCH_STEP_FLAG_CONJUNCTION.nbval = 7; /*inimult dtup_740__CLASS_MATCH_STEP_FLAG_CONJUNCTION */ /*_.VALTUP___V832*/ meltfptr[831] = (melt_ptr_t) & cdat->dtup_740__CLASS_MATCH_STEP_FLAG_CONJUNCTION; cdat->dtup_740__CLASS_MATCH_STEP_FLAG_CONJUNCTION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_740__CLASS_MATCH_STEP_FLAG_CONJUNCTION.nbval = 5; /*iniobj dsym_741__CLASS_MATCH_STEP_FLAG_DISJUNCTION*/ /*uniqueobj*/ if (! /*_.VALDATA___V833*/ meltfptr[832]) /*_.VALDATA___V833*/ meltfptr[832] = (melt_ptr_t) & cdat->dsym_741__CLASS_MATCH_STEP_FLAG_DISJUNCTION; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_741__CLASS_MATCH_STEP_FLAG_DISJUNCTION", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_741__CLASS_MATCH_STEP_FLAG_DISJUNCTION", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_741__CLASS_MATCH_STEP_FLAG_DISJUNCTION.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_741__CLASS_MATCH_STEP_FLAG_DISJUNCTION.obj_hash = 379854200; cdat->dsym_741__CLASS_MATCH_STEP_FLAG_DISJUNCTION.obj_len = 3; /*inistring dstr_742__CLASS_MATCH_STEP*/ /*_.VALSTR___V834*/ meltfptr[833] = (melt_ptr_t) & cdat->dstr_742__CLASS_MATCH_STEP; cdat->dstr_742__CLASS_MATCH_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_742__CLASS_MATCH_STEP.val, "CLASS_MATCH_STEP_FLAG_DISJUNCTION", sizeof (cdat->dstr_742__CLASS_MATCH_STEP. val) - 1); cdat->dstr_742__CLASS_MATCH_STEP.val[33] = (char) 0; cdat->dstr_742__CLASS_MATCH_STEP.slen = 33; MELT_LOCATION ("warmelt-normatch.melt:2793:/ iniobj"); /*iniobj dobj_743__CLASS_MATCH_STEP_FLAG_DISJUNCTION*/ /*_.VALDATA___V835*/ meltfptr[834] = (melt_ptr_t) & cdat->dobj_743__CLASS_MATCH_STEP_FLAG_DISJUNCTION; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_743__CLASS_MATCH_STEP_FLAG_DISJUNCTION", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_743__CLASS_MATCH_STEP_FLAG_DISJUNCTION", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_743__CLASS_MATCH_STEP_FLAG_DISJUNCTION.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_743__CLASS_MATCH_STEP_FLAG_DISJUNCTION.obj_num = MELTOBMAG_OBJECT; cdat->dobj_743__CLASS_MATCH_STEP_FLAG_DISJUNCTION.obj_hash = 1059996042; cdat->dobj_743__CLASS_MATCH_STEP_FLAG_DISJUNCTION.obj_len = 8; /*inistring dstr_744__CLASS_MATCH_STEP*/ /*_.VALSTR___V836*/ meltfptr[835] = (melt_ptr_t) & cdat->dstr_744__CLASS_MATCH_STEP; cdat->dstr_744__CLASS_MATCH_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_744__CLASS_MATCH_STEP.val, "CLASS_MATCH_STEP_FLAG_DISJUNCTION", sizeof (cdat->dstr_744__CLASS_MATCH_STEP. val) - 1); cdat->dstr_744__CLASS_MATCH_STEP.val[33] = (char) 0; cdat->dstr_744__CLASS_MATCH_STEP.slen = 33; /*inimult dtup_745__CLASS_MATCH_STEP_FLAG_DISJUNCTION */ /*_.VALTUP___V837*/ meltfptr[836] = (melt_ptr_t) & cdat->dtup_745__CLASS_MATCH_STEP_FLAG_DISJUNCTION; cdat->dtup_745__CLASS_MATCH_STEP_FLAG_DISJUNCTION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_745__CLASS_MATCH_STEP_FLAG_DISJUNCTION.nbval = 7; /*inimult dtup_746__CLASS_MATCH_STEP_FLAG_DISJUNCTION */ /*_.VALTUP___V838*/ meltfptr[837] = (melt_ptr_t) & cdat->dtup_746__CLASS_MATCH_STEP_FLAG_DISJUNCTION; cdat->dtup_746__CLASS_MATCH_STEP_FLAG_DISJUNCTION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_746__CLASS_MATCH_STEP_FLAG_DISJUNCTION.nbval = 5; /*iniobj dsym_747__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG*/ /*uniqueobj*/ if (! /*_.VALDATA___V839*/ meltfptr[838]) /*_.VALDATA___V839*/ meltfptr[838] = (melt_ptr_t) & cdat->dsym_747__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_747__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_747__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_747__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_747__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG.obj_hash = 82828474; cdat->dsym_747__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG.obj_len = 3; /*inistring dstr_748__CLASS_MATCH_STEP*/ /*_.VALSTR___V840*/ meltfptr[839] = (melt_ptr_t) & cdat->dstr_748__CLASS_MATCH_STEP; cdat->dstr_748__CLASS_MATCH_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_748__CLASS_MATCH_STEP.val, "CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG", sizeof (cdat->dstr_748__CLASS_MATCH_STEP. val) - 1); cdat->dstr_748__CLASS_MATCH_STEP.val[34] = (char) 0; cdat->dstr_748__CLASS_MATCH_STEP.slen = 34; MELT_LOCATION ("warmelt-normatch.melt:2801:/ iniobj"); /*iniobj dobj_749__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG*/ /*_.VALDATA___V841*/ meltfptr[840] = (melt_ptr_t) & cdat->dobj_749__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_749__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_749__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_749__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_749__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG.obj_num = MELTOBMAG_OBJECT; cdat->dobj_749__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG.obj_hash = 786829966; cdat->dobj_749__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG.obj_len = 8; /*inistring dstr_750__CLASS_MATCH_STEP*/ /*_.VALSTR___V842*/ meltfptr[841] = (melt_ptr_t) & cdat->dstr_750__CLASS_MATCH_STEP; cdat->dstr_750__CLASS_MATCH_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_750__CLASS_MATCH_STEP.val, "CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG", sizeof (cdat->dstr_750__CLASS_MATCH_STEP. val) - 1); cdat->dstr_750__CLASS_MATCH_STEP.val[34] = (char) 0; cdat->dstr_750__CLASS_MATCH_STEP.slen = 34; /*inimult dtup_751__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG */ /*_.VALTUP___V843*/ meltfptr[842] = (melt_ptr_t) & cdat->dtup_751__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG; cdat->dtup_751__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_751__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG.nbval = 6; /*inimult dtup_752__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG */ /*_.VALTUP___V850*/ meltfptr[849] = (melt_ptr_t) & cdat->dtup_752__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG; cdat->dtup_752__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_752__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG.nbval = 7; /*iniobj dsym_753__MSTEPSUCCESS_VAROCC*/ /*uniqueobj*/ if (! /*_.VALDATA___V851*/ meltfptr[850]) /*_.VALDATA___V851*/ meltfptr[850] = (melt_ptr_t) & cdat->dsym_753__MSTEPSUCCESS_VAROCC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_753__MSTEPSUCCESS_VAROCC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_753__MSTEPSUCCESS_VAROCC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_753__MSTEPSUCCESS_VAROCC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_753__MSTEPSUCCESS_VAROCC.obj_hash = 502553316; cdat->dsym_753__MSTEPSUCCESS_VAROCC.obj_len = 3; /*inistring dstr_754__MSTEPSUCCESS_VAR*/ /*_.VALSTR___V852*/ meltfptr[851] = (melt_ptr_t) & cdat->dstr_754__MSTEPSUCCESS_VAR; cdat->dstr_754__MSTEPSUCCESS_VAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_754__MSTEPSUCCESS_VAR.val, "MSTEPSUCCESS_VAROCC", sizeof (cdat->dstr_754__MSTEPSUCCESS_VAR. val) - 1); cdat->dstr_754__MSTEPSUCCESS_VAR.val[19] = (char) 0; cdat->dstr_754__MSTEPSUCCESS_VAR.slen = 19; /*^iniobj */ /*iniobj dobj_755__MSTEPSUCCESS_VAROCC*/ /*_.VALDATA___V844*/ meltfptr[843] = (melt_ptr_t) & cdat->dobj_755__MSTEPSUCCESS_VAROCC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_755__MSTEPSUCCESS_VAROCC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_755__MSTEPSUCCESS_VAROCC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_755__MSTEPSUCCESS_VAROCC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_755__MSTEPSUCCESS_VAROCC.obj_num = 4; cdat->dobj_755__MSTEPSUCCESS_VAROCC.obj_hash = 493602836; cdat->dobj_755__MSTEPSUCCESS_VAROCC.obj_len = 4; /*inistring dstr_756__MSTEPSUCCESS_VAR*/ /*_.VALSTR___V845*/ meltfptr[844] = (melt_ptr_t) & cdat->dstr_756__MSTEPSUCCESS_VAR; cdat->dstr_756__MSTEPSUCCESS_VAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_756__MSTEPSUCCESS_VAR.val, "MSTEPSUCCESS_VAROCC", sizeof (cdat->dstr_756__MSTEPSUCCESS_VAR. val) - 1); cdat->dstr_756__MSTEPSUCCESS_VAR.val[19] = (char) 0; cdat->dstr_756__MSTEPSUCCESS_VAR.slen = 19; /*iniobj dsym_757__MSTEPSUCCESS_BINDS*/ /*uniqueobj*/ if (! /*_.VALDATA___V853*/ meltfptr[852]) /*_.VALDATA___V853*/ meltfptr[852] = (melt_ptr_t) & cdat->dsym_757__MSTEPSUCCESS_BINDS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_757__MSTEPSUCCESS_BINDS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_757__MSTEPSUCCESS_BINDS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_757__MSTEPSUCCESS_BINDS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_757__MSTEPSUCCESS_BINDS.obj_hash = 862501677; cdat->dsym_757__MSTEPSUCCESS_BINDS.obj_len = 3; /*inistring dstr_758__MSTEPSUCCESS_BIN*/ /*_.VALSTR___V854*/ meltfptr[853] = (melt_ptr_t) & cdat->dstr_758__MSTEPSUCCESS_BIN; cdat->dstr_758__MSTEPSUCCESS_BIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_758__MSTEPSUCCESS_BIN.val, "MSTEPSUCCESS_BINDS", sizeof (cdat->dstr_758__MSTEPSUCCESS_BIN. val) - 1); cdat->dstr_758__MSTEPSUCCESS_BIN.val[18] = (char) 0; cdat->dstr_758__MSTEPSUCCESS_BIN.slen = 18; /*^iniobj */ /*iniobj dobj_759__MSTEPSUCCESS_BINDS*/ /*_.VALDATA___V846*/ meltfptr[845] = (melt_ptr_t) & cdat->dobj_759__MSTEPSUCCESS_BINDS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_759__MSTEPSUCCESS_BINDS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_759__MSTEPSUCCESS_BINDS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_759__MSTEPSUCCESS_BINDS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_759__MSTEPSUCCESS_BINDS.obj_num = 5; cdat->dobj_759__MSTEPSUCCESS_BINDS.obj_hash = 841511372; cdat->dobj_759__MSTEPSUCCESS_BINDS.obj_len = 4; /*inistring dstr_760__MSTEPSUCCESS_BIN*/ /*_.VALSTR___V847*/ meltfptr[846] = (melt_ptr_t) & cdat->dstr_760__MSTEPSUCCESS_BIN; cdat->dstr_760__MSTEPSUCCESS_BIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_760__MSTEPSUCCESS_BIN.val, "MSTEPSUCCESS_BINDS", sizeof (cdat->dstr_760__MSTEPSUCCESS_BIN. val) - 1); cdat->dstr_760__MSTEPSUCCESS_BIN.val[18] = (char) 0; cdat->dstr_760__MSTEPSUCCESS_BIN.slen = 18; /*iniobj dsym_761__MSTEPSUCCESS_BODY*/ /*uniqueobj*/ if (! /*_.VALDATA___V855*/ meltfptr[854]) /*_.VALDATA___V855*/ meltfptr[854] = (melt_ptr_t) & cdat->dsym_761__MSTEPSUCCESS_BODY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_761__MSTEPSUCCESS_BODY", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_761__MSTEPSUCCESS_BODY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_761__MSTEPSUCCESS_BODY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_761__MSTEPSUCCESS_BODY.obj_hash = 270381222; cdat->dsym_761__MSTEPSUCCESS_BODY.obj_len = 3; /*inistring dstr_762__MSTEPSUCCESS_BOD*/ /*_.VALSTR___V856*/ meltfptr[855] = (melt_ptr_t) & cdat->dstr_762__MSTEPSUCCESS_BOD; cdat->dstr_762__MSTEPSUCCESS_BOD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_762__MSTEPSUCCESS_BOD.val, "MSTEPSUCCESS_BODY", sizeof (cdat->dstr_762__MSTEPSUCCESS_BOD. val) - 1); cdat->dstr_762__MSTEPSUCCESS_BOD.val[17] = (char) 0; cdat->dstr_762__MSTEPSUCCESS_BOD.slen = 17; /*^iniobj */ /*iniobj dobj_763__MSTEPSUCCESS_BODY*/ /*_.VALDATA___V848*/ meltfptr[847] = (melt_ptr_t) & cdat->dobj_763__MSTEPSUCCESS_BODY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_763__MSTEPSUCCESS_BODY", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_763__MSTEPSUCCESS_BODY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_763__MSTEPSUCCESS_BODY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_763__MSTEPSUCCESS_BODY.obj_num = 6; cdat->dobj_763__MSTEPSUCCESS_BODY.obj_hash = 1011498239; cdat->dobj_763__MSTEPSUCCESS_BODY.obj_len = 4; /*inistring dstr_764__MSTEPSUCCESS_BOD*/ /*_.VALSTR___V849*/ meltfptr[848] = (melt_ptr_t) & cdat->dstr_764__MSTEPSUCCESS_BOD; cdat->dstr_764__MSTEPSUCCESS_BOD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_764__MSTEPSUCCESS_BOD.val, "MSTEPSUCCESS_BODY", sizeof (cdat->dstr_764__MSTEPSUCCESS_BOD. val) - 1); cdat->dstr_764__MSTEPSUCCESS_BOD.val[17] = (char) 0; cdat->dstr_764__MSTEPSUCCESS_BOD.slen = 17; /*iniobj dsym_765__CLASS_MATCH_STEP_TEST*/ /*uniqueobj*/ if (! /*_.VALDATA___V857*/ meltfptr[856]) /*_.VALDATA___V857*/ meltfptr[856] = (melt_ptr_t) & cdat->dsym_765__CLASS_MATCH_STEP_TEST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_765__CLASS_MATCH_STEP_TEST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_765__CLASS_MATCH_STEP_TEST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_765__CLASS_MATCH_STEP_TEST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_765__CLASS_MATCH_STEP_TEST.obj_hash = 899758560; cdat->dsym_765__CLASS_MATCH_STEP_TEST.obj_len = 3; /*inistring dstr_766__CLASS_MATCH_STEP*/ /*_.VALSTR___V858*/ meltfptr[857] = (melt_ptr_t) & cdat->dstr_766__CLASS_MATCH_STEP; cdat->dstr_766__CLASS_MATCH_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_766__CLASS_MATCH_STEP.val, "CLASS_MATCH_STEP_TEST", sizeof (cdat->dstr_766__CLASS_MATCH_STEP. val) - 1); cdat->dstr_766__CLASS_MATCH_STEP.val[21] = (char) 0; cdat->dstr_766__CLASS_MATCH_STEP.slen = 21; MELT_LOCATION ("warmelt-normatch.melt:2813:/ iniobj"); /*iniobj dobj_767__CLASS_MATCH_STEP_TEST*/ /*_.VALDATA___V859*/ meltfptr[858] = (melt_ptr_t) & cdat->dobj_767__CLASS_MATCH_STEP_TEST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_767__CLASS_MATCH_STEP_TEST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_767__CLASS_MATCH_STEP_TEST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_767__CLASS_MATCH_STEP_TEST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_767__CLASS_MATCH_STEP_TEST.obj_num = MELTOBMAG_OBJECT; cdat->dobj_767__CLASS_MATCH_STEP_TEST.obj_hash = 130169198; cdat->dobj_767__CLASS_MATCH_STEP_TEST.obj_len = 8; /*inistring dstr_768__CLASS_MATCH_STEP*/ /*_.VALSTR___V860*/ meltfptr[859] = (melt_ptr_t) & cdat->dstr_768__CLASS_MATCH_STEP; cdat->dstr_768__CLASS_MATCH_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_768__CLASS_MATCH_STEP.val, "CLASS_MATCH_STEP_TEST", sizeof (cdat->dstr_768__CLASS_MATCH_STEP. val) - 1); cdat->dstr_768__CLASS_MATCH_STEP.val[21] = (char) 0; cdat->dstr_768__CLASS_MATCH_STEP.slen = 21; /*inimult dtup_769__CLASS_MATCH_STEP_TEST */ /*_.VALTUP___V861*/ meltfptr[860] = (melt_ptr_t) & cdat->dtup_769__CLASS_MATCH_STEP_TEST; cdat->dtup_769__CLASS_MATCH_STEP_TEST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_769__CLASS_MATCH_STEP_TEST.nbval = 6; /*inimult dtup_770__CLASS_MATCH_STEP_TEST */ /*_.VALTUP___V864*/ meltfptr[863] = (melt_ptr_t) & cdat->dtup_770__CLASS_MATCH_STEP_TEST; cdat->dtup_770__CLASS_MATCH_STEP_TEST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_770__CLASS_MATCH_STEP_TEST.nbval = 6; /*iniobj dsym_771__MSTEP_ELSE*/ /*uniqueobj*/ if (! /*_.VALDATA___V865*/ meltfptr[864]) /*_.VALDATA___V865*/ meltfptr[864] = (melt_ptr_t) & cdat->dsym_771__MSTEP_ELSE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_771__MSTEP_ELSE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_771__MSTEP_ELSE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_771__MSTEP_ELSE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_771__MSTEP_ELSE.obj_hash = 307203514; cdat->dsym_771__MSTEP_ELSE.obj_len = 3; /*inistring dstr_772__MSTEP_ELSE*/ /*_.VALSTR___V866*/ meltfptr[865] = (melt_ptr_t) & cdat->dstr_772__MSTEP_ELSE; cdat->dstr_772__MSTEP_ELSE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_772__MSTEP_ELSE.val, "MSTEP_ELSE", sizeof (cdat->dstr_772__MSTEP_ELSE.val) - 1); cdat->dstr_772__MSTEP_ELSE.val[10] = (char) 0; cdat->dstr_772__MSTEP_ELSE.slen = 10; /*^iniobj */ /*iniobj dobj_773__MSTEP_ELSE*/ /*_.VALDATA___V862*/ meltfptr[861] = (melt_ptr_t) & cdat->dobj_773__MSTEP_ELSE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_773__MSTEP_ELSE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_773__MSTEP_ELSE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_773__MSTEP_ELSE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_773__MSTEP_ELSE.obj_num = 5; cdat->dobj_773__MSTEP_ELSE.obj_hash = 827892106; cdat->dobj_773__MSTEP_ELSE.obj_len = 4; /*inistring dstr_774__MSTEP_ELSE*/ /*_.VALSTR___V863*/ meltfptr[862] = (melt_ptr_t) & cdat->dstr_774__MSTEP_ELSE; cdat->dstr_774__MSTEP_ELSE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_774__MSTEP_ELSE.val, "MSTEP_ELSE", sizeof (cdat->dstr_774__MSTEP_ELSE.val) - 1); cdat->dstr_774__MSTEP_ELSE.val[10] = (char) 0; cdat->dstr_774__MSTEP_ELSE.slen = 10; /*iniobj dsym_775__CLASS_MATCH_STEP_TEST_VARIABLE*/ /*uniqueobj*/ if (! /*_.VALDATA___V867*/ meltfptr[866]) /*_.VALDATA___V867*/ meltfptr[866] = (melt_ptr_t) & cdat->dsym_775__CLASS_MATCH_STEP_TEST_VARIABLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_775__CLASS_MATCH_STEP_TEST_VARIABLE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_775__CLASS_MATCH_STEP_TEST_VARIABLE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_775__CLASS_MATCH_STEP_TEST_VARIABLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_775__CLASS_MATCH_STEP_TEST_VARIABLE.obj_hash = 368352993; cdat->dsym_775__CLASS_MATCH_STEP_TEST_VARIABLE.obj_len = 3; /*inistring dstr_776__CLASS_MATCH_STEP*/ /*_.VALSTR___V868*/ meltfptr[867] = (melt_ptr_t) & cdat->dstr_776__CLASS_MATCH_STEP; cdat->dstr_776__CLASS_MATCH_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_776__CLASS_MATCH_STEP.val, "CLASS_MATCH_STEP_TEST_VARIABLE", sizeof (cdat->dstr_776__CLASS_MATCH_STEP. val) - 1); cdat->dstr_776__CLASS_MATCH_STEP.val[30] = (char) 0; cdat->dstr_776__CLASS_MATCH_STEP.slen = 30; MELT_LOCATION ("warmelt-normatch.melt:2821:/ iniobj"); /*iniobj dobj_777__CLASS_MATCH_STEP_TEST_VARIABLE*/ /*_.VALDATA___V869*/ meltfptr[868] = (melt_ptr_t) & cdat->dobj_777__CLASS_MATCH_STEP_TEST_VARIABLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_777__CLASS_MATCH_STEP_TEST_VARIABLE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_777__CLASS_MATCH_STEP_TEST_VARIABLE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_777__CLASS_MATCH_STEP_TEST_VARIABLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_777__CLASS_MATCH_STEP_TEST_VARIABLE.obj_num = MELTOBMAG_OBJECT; cdat->dobj_777__CLASS_MATCH_STEP_TEST_VARIABLE.obj_hash = 129259575; cdat->dobj_777__CLASS_MATCH_STEP_TEST_VARIABLE.obj_len = 8; /*inistring dstr_778__CLASS_MATCH_STEP*/ /*_.VALSTR___V870*/ meltfptr[869] = (melt_ptr_t) & cdat->dstr_778__CLASS_MATCH_STEP; cdat->dstr_778__CLASS_MATCH_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_778__CLASS_MATCH_STEP.val, "CLASS_MATCH_STEP_TEST_VARIABLE", sizeof (cdat->dstr_778__CLASS_MATCH_STEP. val) - 1); cdat->dstr_778__CLASS_MATCH_STEP.val[30] = (char) 0; cdat->dstr_778__CLASS_MATCH_STEP.slen = 30; /*inimult dtup_779__CLASS_MATCH_STEP_TEST_VARIABLE */ /*_.VALTUP___V871*/ meltfptr[870] = (melt_ptr_t) & cdat->dtup_779__CLASS_MATCH_STEP_TEST_VARIABLE; cdat->dtup_779__CLASS_MATCH_STEP_TEST_VARIABLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_779__CLASS_MATCH_STEP_TEST_VARIABLE.nbval = 7; /*inimult dtup_780__CLASS_MATCH_STEP_TEST_VARIABLE */ /*_.VALTUP___V874*/ meltfptr[873] = (melt_ptr_t) & cdat->dtup_780__CLASS_MATCH_STEP_TEST_VARIABLE; cdat->dtup_780__CLASS_MATCH_STEP_TEST_VARIABLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_780__CLASS_MATCH_STEP_TEST_VARIABLE.nbval = 7; /*iniobj dsym_781__MSTEPTESTVAR_DATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V875*/ meltfptr[874]) /*_.VALDATA___V875*/ meltfptr[874] = (melt_ptr_t) & cdat->dsym_781__MSTEPTESTVAR_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_781__MSTEPTESTVAR_DATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_781__MSTEPTESTVAR_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_781__MSTEPTESTVAR_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_781__MSTEPTESTVAR_DATA.obj_hash = 627308015; cdat->dsym_781__MSTEPTESTVAR_DATA.obj_len = 3; /*inistring dstr_782__MSTEPTESTVAR_DAT*/ /*_.VALSTR___V876*/ meltfptr[875] = (melt_ptr_t) & cdat->dstr_782__MSTEPTESTVAR_DAT; cdat->dstr_782__MSTEPTESTVAR_DAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_782__MSTEPTESTVAR_DAT.val, "MSTEPTESTVAR_DATA", sizeof (cdat->dstr_782__MSTEPTESTVAR_DAT. val) - 1); cdat->dstr_782__MSTEPTESTVAR_DAT.val[17] = (char) 0; cdat->dstr_782__MSTEPTESTVAR_DAT.slen = 17; /*^iniobj */ /*iniobj dobj_783__MSTEPTESTVAR_DATA*/ /*_.VALDATA___V872*/ meltfptr[871] = (melt_ptr_t) & cdat->dobj_783__MSTEPTESTVAR_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_783__MSTEPTESTVAR_DATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_783__MSTEPTESTVAR_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_783__MSTEPTESTVAR_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_783__MSTEPTESTVAR_DATA.obj_num = 6; cdat->dobj_783__MSTEPTESTVAR_DATA.obj_hash = 310722974; cdat->dobj_783__MSTEPTESTVAR_DATA.obj_len = 4; /*inistring dstr_784__MSTEPTESTVAR_DAT*/ /*_.VALSTR___V873*/ meltfptr[872] = (melt_ptr_t) & cdat->dstr_784__MSTEPTESTVAR_DAT; cdat->dstr_784__MSTEPTESTVAR_DAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_784__MSTEPTESTVAR_DAT.val, "MSTEPTESTVAR_DATA", sizeof (cdat->dstr_784__MSTEPTESTVAR_DAT. val) - 1); cdat->dstr_784__MSTEPTESTVAR_DAT.val[17] = (char) 0; cdat->dstr_784__MSTEPTESTVAR_DAT.slen = 17; /*iniobj dsym_785__CLASS_MATCH_STEP_TEST_CONSTANT*/ /*uniqueobj*/ if (! /*_.VALDATA___V877*/ meltfptr[876]) /*_.VALDATA___V877*/ meltfptr[876] = (melt_ptr_t) & cdat->dsym_785__CLASS_MATCH_STEP_TEST_CONSTANT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_785__CLASS_MATCH_STEP_TEST_CONSTANT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_785__CLASS_MATCH_STEP_TEST_CONSTANT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_785__CLASS_MATCH_STEP_TEST_CONSTANT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_785__CLASS_MATCH_STEP_TEST_CONSTANT.obj_hash = 79165585; cdat->dsym_785__CLASS_MATCH_STEP_TEST_CONSTANT.obj_len = 3; /*inistring dstr_786__CLASS_MATCH_STEP*/ /*_.VALSTR___V878*/ meltfptr[877] = (melt_ptr_t) & cdat->dstr_786__CLASS_MATCH_STEP; cdat->dstr_786__CLASS_MATCH_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_786__CLASS_MATCH_STEP.val, "CLASS_MATCH_STEP_TEST_CONSTANT", sizeof (cdat->dstr_786__CLASS_MATCH_STEP. val) - 1); cdat->dstr_786__CLASS_MATCH_STEP.val[30] = (char) 0; cdat->dstr_786__CLASS_MATCH_STEP.slen = 30; MELT_LOCATION ("warmelt-normatch.melt:2827:/ iniobj"); /*iniobj dobj_787__CLASS_MATCH_STEP_TEST_CONSTANT*/ /*_.VALDATA___V879*/ meltfptr[878] = (melt_ptr_t) & cdat->dobj_787__CLASS_MATCH_STEP_TEST_CONSTANT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_787__CLASS_MATCH_STEP_TEST_CONSTANT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_787__CLASS_MATCH_STEP_TEST_CONSTANT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_787__CLASS_MATCH_STEP_TEST_CONSTANT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_787__CLASS_MATCH_STEP_TEST_CONSTANT.obj_num = MELTOBMAG_OBJECT; cdat->dobj_787__CLASS_MATCH_STEP_TEST_CONSTANT.obj_hash = 791038417; cdat->dobj_787__CLASS_MATCH_STEP_TEST_CONSTANT.obj_len = 8; /*inistring dstr_788__CLASS_MATCH_STEP*/ /*_.VALSTR___V880*/ meltfptr[879] = (melt_ptr_t) & cdat->dstr_788__CLASS_MATCH_STEP; cdat->dstr_788__CLASS_MATCH_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_788__CLASS_MATCH_STEP.val, "CLASS_MATCH_STEP_TEST_CONSTANT", sizeof (cdat->dstr_788__CLASS_MATCH_STEP. val) - 1); cdat->dstr_788__CLASS_MATCH_STEP.val[30] = (char) 0; cdat->dstr_788__CLASS_MATCH_STEP.slen = 30; /*inimult dtup_789__CLASS_MATCH_STEP_TEST_CONSTANT */ /*_.VALTUP___V881*/ meltfptr[880] = (melt_ptr_t) & cdat->dtup_789__CLASS_MATCH_STEP_TEST_CONSTANT; cdat->dtup_789__CLASS_MATCH_STEP_TEST_CONSTANT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_789__CLASS_MATCH_STEP_TEST_CONSTANT.nbval = 7; /*inimult dtup_790__CLASS_MATCH_STEP_TEST_CONSTANT */ /*_.VALTUP___V886*/ meltfptr[885] = (melt_ptr_t) & cdat->dtup_790__CLASS_MATCH_STEP_TEST_CONSTANT; cdat->dtup_790__CLASS_MATCH_STEP_TEST_CONSTANT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_790__CLASS_MATCH_STEP_TEST_CONSTANT.nbval = 8; /*iniobj dsym_791__MSTEPTESTCONST_DATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V887*/ meltfptr[886]) /*_.VALDATA___V887*/ meltfptr[886] = (melt_ptr_t) & cdat->dsym_791__MSTEPTESTCONST_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_791__MSTEPTESTCONST_DATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_791__MSTEPTESTCONST_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_791__MSTEPTESTCONST_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_791__MSTEPTESTCONST_DATA.obj_hash = 930515628; cdat->dsym_791__MSTEPTESTCONST_DATA.obj_len = 3; /*inistring dstr_792__MSTEPTESTCONST_D*/ /*_.VALSTR___V888*/ meltfptr[887] = (melt_ptr_t) & cdat->dstr_792__MSTEPTESTCONST_D; cdat->dstr_792__MSTEPTESTCONST_D.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_792__MSTEPTESTCONST_D.val, "MSTEPTESTCONST_DATA", sizeof (cdat->dstr_792__MSTEPTESTCONST_D. val) - 1); cdat->dstr_792__MSTEPTESTCONST_D.val[19] = (char) 0; cdat->dstr_792__MSTEPTESTCONST_D.slen = 19; /*^iniobj */ /*iniobj dobj_793__MSTEPTESTCONST_DATA*/ /*_.VALDATA___V882*/ meltfptr[881] = (melt_ptr_t) & cdat->dobj_793__MSTEPTESTCONST_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_793__MSTEPTESTCONST_DATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_793__MSTEPTESTCONST_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_793__MSTEPTESTCONST_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_793__MSTEPTESTCONST_DATA.obj_num = 6; cdat->dobj_793__MSTEPTESTCONST_DATA.obj_hash = 569953928; cdat->dobj_793__MSTEPTESTCONST_DATA.obj_len = 4; /*inistring dstr_794__MSTEPTESTCONST_D*/ /*_.VALSTR___V883*/ meltfptr[882] = (melt_ptr_t) & cdat->dstr_794__MSTEPTESTCONST_D; cdat->dstr_794__MSTEPTESTCONST_D.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_794__MSTEPTESTCONST_D.val, "MSTEPTESTCONST_DATA", sizeof (cdat->dstr_794__MSTEPTESTCONST_D. val) - 1); cdat->dstr_794__MSTEPTESTCONST_D.val[19] = (char) 0; cdat->dstr_794__MSTEPTESTCONST_D.slen = 19; /*iniobj dsym_795__MSTEPTESTCONST_BIND*/ /*uniqueobj*/ if (! /*_.VALDATA___V889*/ meltfptr[888]) /*_.VALDATA___V889*/ meltfptr[888] = (melt_ptr_t) & cdat->dsym_795__MSTEPTESTCONST_BIND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_795__MSTEPTESTCONST_BIND", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_795__MSTEPTESTCONST_BIND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_795__MSTEPTESTCONST_BIND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_795__MSTEPTESTCONST_BIND.obj_hash = 693178480; cdat->dsym_795__MSTEPTESTCONST_BIND.obj_len = 3; /*inistring dstr_796__MSTEPTESTCONST_B*/ /*_.VALSTR___V890*/ meltfptr[889] = (melt_ptr_t) & cdat->dstr_796__MSTEPTESTCONST_B; cdat->dstr_796__MSTEPTESTCONST_B.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_796__MSTEPTESTCONST_B.val, "MSTEPTESTCONST_BIND", sizeof (cdat->dstr_796__MSTEPTESTCONST_B. val) - 1); cdat->dstr_796__MSTEPTESTCONST_B.val[19] = (char) 0; cdat->dstr_796__MSTEPTESTCONST_B.slen = 19; /*^iniobj */ /*iniobj dobj_797__MSTEPTESTCONST_BIND*/ /*_.VALDATA___V884*/ meltfptr[883] = (melt_ptr_t) & cdat->dobj_797__MSTEPTESTCONST_BIND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_797__MSTEPTESTCONST_BIND", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_797__MSTEPTESTCONST_BIND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_797__MSTEPTESTCONST_BIND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_797__MSTEPTESTCONST_BIND.obj_num = 7; cdat->dobj_797__MSTEPTESTCONST_BIND.obj_hash = 859786212; cdat->dobj_797__MSTEPTESTCONST_BIND.obj_len = 4; /*inistring dstr_798__MSTEPTESTCONST_B*/ /*_.VALSTR___V885*/ meltfptr[884] = (melt_ptr_t) & cdat->dstr_798__MSTEPTESTCONST_B; cdat->dstr_798__MSTEPTESTCONST_B.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_798__MSTEPTESTCONST_B.val, "MSTEPTESTCONST_BIND", sizeof (cdat->dstr_798__MSTEPTESTCONST_B. val) - 1); cdat->dstr_798__MSTEPTESTCONST_B.val[19] = (char) 0; cdat->dstr_798__MSTEPTESTCONST_B.slen = 19; /*iniobj dsym_799__CLASS_MATCH_STEP_TEST_GROUP*/ /*uniqueobj*/ if (! /*_.VALDATA___V891*/ meltfptr[890]) /*_.VALDATA___V891*/ meltfptr[890] = (melt_ptr_t) & cdat->dsym_799__CLASS_MATCH_STEP_TEST_GROUP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_799__CLASS_MATCH_STEP_TEST_GROUP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_799__CLASS_MATCH_STEP_TEST_GROUP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_799__CLASS_MATCH_STEP_TEST_GROUP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_799__CLASS_MATCH_STEP_TEST_GROUP.obj_hash = 536919857; cdat->dsym_799__CLASS_MATCH_STEP_TEST_GROUP.obj_len = 3; /*inistring dstr_800__CLASS_MATCH_STEP*/ /*_.VALSTR___V892*/ meltfptr[891] = (melt_ptr_t) & cdat->dstr_800__CLASS_MATCH_STEP; cdat->dstr_800__CLASS_MATCH_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_800__CLASS_MATCH_STEP.val, "CLASS_MATCH_STEP_TEST_GROUP", sizeof (cdat->dstr_800__CLASS_MATCH_STEP. val) - 1); cdat->dstr_800__CLASS_MATCH_STEP.val[27] = (char) 0; cdat->dstr_800__CLASS_MATCH_STEP.slen = 27; MELT_LOCATION ("warmelt-normatch.melt:2833:/ iniobj"); /*iniobj dobj_801__CLASS_MATCH_STEP_TEST_GROUP*/ /*_.VALDATA___V893*/ meltfptr[892] = (melt_ptr_t) & cdat->dobj_801__CLASS_MATCH_STEP_TEST_GROUP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_801__CLASS_MATCH_STEP_TEST_GROUP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_801__CLASS_MATCH_STEP_TEST_GROUP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_801__CLASS_MATCH_STEP_TEST_GROUP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_801__CLASS_MATCH_STEP_TEST_GROUP.obj_num = MELTOBMAG_OBJECT; cdat->dobj_801__CLASS_MATCH_STEP_TEST_GROUP.obj_hash = 485298697; cdat->dobj_801__CLASS_MATCH_STEP_TEST_GROUP.obj_len = 8; /*inistring dstr_802__CLASS_MATCH_STEP*/ /*_.VALSTR___V894*/ meltfptr[893] = (melt_ptr_t) & cdat->dstr_802__CLASS_MATCH_STEP; cdat->dstr_802__CLASS_MATCH_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_802__CLASS_MATCH_STEP.val, "CLASS_MATCH_STEP_TEST_GROUP", sizeof (cdat->dstr_802__CLASS_MATCH_STEP. val) - 1); cdat->dstr_802__CLASS_MATCH_STEP.val[27] = (char) 0; cdat->dstr_802__CLASS_MATCH_STEP.slen = 27; /*inimult dtup_803__CLASS_MATCH_STEP_TEST_GROUP */ /*_.VALTUP___V895*/ meltfptr[894] = (melt_ptr_t) & cdat->dtup_803__CLASS_MATCH_STEP_TEST_GROUP; cdat->dtup_803__CLASS_MATCH_STEP_TEST_GROUP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_803__CLASS_MATCH_STEP_TEST_GROUP.nbval = 7; /*inimult dtup_804__CLASS_MATCH_STEP_TEST_GROUP */ /*_.VALTUP___V902*/ meltfptr[901] = (melt_ptr_t) & cdat->dtup_804__CLASS_MATCH_STEP_TEST_GROUP; cdat->dtup_804__CLASS_MATCH_STEP_TEST_GROUP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_804__CLASS_MATCH_STEP_TEST_GROUP.nbval = 9; /*iniobj dsym_805__MSTGROUP_START*/ /*uniqueobj*/ if (! /*_.VALDATA___V903*/ meltfptr[902]) /*_.VALDATA___V903*/ meltfptr[902] = (melt_ptr_t) & cdat->dsym_805__MSTGROUP_START; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_805__MSTGROUP_START", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_805__MSTGROUP_START", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_805__MSTGROUP_START.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_805__MSTGROUP_START.obj_hash = 989000551; cdat->dsym_805__MSTGROUP_START.obj_len = 3; /*inistring dstr_806__MSTGROUP_START*/ /*_.VALSTR___V904*/ meltfptr[903] = (melt_ptr_t) & cdat->dstr_806__MSTGROUP_START; cdat->dstr_806__MSTGROUP_START.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_806__MSTGROUP_START.val, "MSTGROUP_START", sizeof (cdat->dstr_806__MSTGROUP_START.val) - 1); cdat->dstr_806__MSTGROUP_START.val[14] = (char) 0; cdat->dstr_806__MSTGROUP_START.slen = 14; /*^iniobj */ /*iniobj dobj_807__MSTGROUP_START*/ /*_.VALDATA___V896*/ meltfptr[895] = (melt_ptr_t) & cdat->dobj_807__MSTGROUP_START; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_807__MSTGROUP_START", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_807__MSTGROUP_START", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_807__MSTGROUP_START.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_807__MSTGROUP_START.obj_num = 6; cdat->dobj_807__MSTGROUP_START.obj_hash = 357078190; cdat->dobj_807__MSTGROUP_START.obj_len = 4; /*inistring dstr_808__MSTGROUP_START*/ /*_.VALSTR___V897*/ meltfptr[896] = (melt_ptr_t) & cdat->dstr_808__MSTGROUP_START; cdat->dstr_808__MSTGROUP_START.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_808__MSTGROUP_START.val, "MSTGROUP_START", sizeof (cdat->dstr_808__MSTGROUP_START.val) - 1); cdat->dstr_808__MSTGROUP_START.val[14] = (char) 0; cdat->dstr_808__MSTGROUP_START.slen = 14; /*iniobj dsym_809__MSTGROUP_THEN*/ /*uniqueobj*/ if (! /*_.VALDATA___V905*/ meltfptr[904]) /*_.VALDATA___V905*/ meltfptr[904] = (melt_ptr_t) & cdat->dsym_809__MSTGROUP_THEN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_809__MSTGROUP_THEN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_809__MSTGROUP_THEN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_809__MSTGROUP_THEN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_809__MSTGROUP_THEN.obj_hash = 156200532; cdat->dsym_809__MSTGROUP_THEN.obj_len = 3; /*inistring dstr_810__MSTGROUP_THEN*/ /*_.VALSTR___V906*/ meltfptr[905] = (melt_ptr_t) & cdat->dstr_810__MSTGROUP_THEN; cdat->dstr_810__MSTGROUP_THEN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_810__MSTGROUP_THEN.val, "MSTGROUP_THEN", sizeof (cdat->dstr_810__MSTGROUP_THEN.val) - 1); cdat->dstr_810__MSTGROUP_THEN.val[13] = (char) 0; cdat->dstr_810__MSTGROUP_THEN.slen = 13; /*^iniobj */ /*iniobj dobj_811__MSTGROUP_THEN*/ /*_.VALDATA___V898*/ meltfptr[897] = (melt_ptr_t) & cdat->dobj_811__MSTGROUP_THEN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_811__MSTGROUP_THEN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_811__MSTGROUP_THEN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_811__MSTGROUP_THEN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_811__MSTGROUP_THEN.obj_num = 7; cdat->dobj_811__MSTGROUP_THEN.obj_hash = 436743737; cdat->dobj_811__MSTGROUP_THEN.obj_len = 4; /*inistring dstr_812__MSTGROUP_THEN*/ /*_.VALSTR___V899*/ meltfptr[898] = (melt_ptr_t) & cdat->dstr_812__MSTGROUP_THEN; cdat->dstr_812__MSTGROUP_THEN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_812__MSTGROUP_THEN.val, "MSTGROUP_THEN", sizeof (cdat->dstr_812__MSTGROUP_THEN.val) - 1); cdat->dstr_812__MSTGROUP_THEN.val[13] = (char) 0; cdat->dstr_812__MSTGROUP_THEN.slen = 13; /*iniobj dsym_813__MSTGROUP_ELSE*/ /*uniqueobj*/ if (! /*_.VALDATA___V907*/ meltfptr[906]) /*_.VALDATA___V907*/ meltfptr[906] = (melt_ptr_t) & cdat->dsym_813__MSTGROUP_ELSE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_813__MSTGROUP_ELSE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_813__MSTGROUP_ELSE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_813__MSTGROUP_ELSE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_813__MSTGROUP_ELSE.obj_hash = 854928951; cdat->dsym_813__MSTGROUP_ELSE.obj_len = 3; /*inistring dstr_814__MSTGROUP_ELSE*/ /*_.VALSTR___V908*/ meltfptr[907] = (melt_ptr_t) & cdat->dstr_814__MSTGROUP_ELSE; cdat->dstr_814__MSTGROUP_ELSE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_814__MSTGROUP_ELSE.val, "MSTGROUP_ELSE", sizeof (cdat->dstr_814__MSTGROUP_ELSE.val) - 1); cdat->dstr_814__MSTGROUP_ELSE.val[13] = (char) 0; cdat->dstr_814__MSTGROUP_ELSE.slen = 13; /*^iniobj */ /*iniobj dobj_815__MSTGROUP_ELSE*/ /*_.VALDATA___V900*/ meltfptr[899] = (melt_ptr_t) & cdat->dobj_815__MSTGROUP_ELSE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_815__MSTGROUP_ELSE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_815__MSTGROUP_ELSE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_815__MSTGROUP_ELSE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_815__MSTGROUP_ELSE.obj_num = 8; cdat->dobj_815__MSTGROUP_ELSE.obj_hash = 439474040; cdat->dobj_815__MSTGROUP_ELSE.obj_len = 4; /*inistring dstr_816__MSTGROUP_ELSE*/ /*_.VALSTR___V901*/ meltfptr[900] = (melt_ptr_t) & cdat->dstr_816__MSTGROUP_ELSE; cdat->dstr_816__MSTGROUP_ELSE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_816__MSTGROUP_ELSE.val, "MSTGROUP_ELSE", sizeof (cdat->dstr_816__MSTGROUP_ELSE.val) - 1); cdat->dstr_816__MSTGROUP_ELSE.val[13] = (char) 0; cdat->dstr_816__MSTGROUP_ELSE.slen = 13; /*iniobj dsym_817__CLASS_MATCH_STEP_TEST_INSTANCE*/ /*uniqueobj*/ if (! /*_.VALDATA___V909*/ meltfptr[908]) /*_.VALDATA___V909*/ meltfptr[908] = (melt_ptr_t) & cdat->dsym_817__CLASS_MATCH_STEP_TEST_INSTANCE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_817__CLASS_MATCH_STEP_TEST_INSTANCE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_817__CLASS_MATCH_STEP_TEST_INSTANCE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_817__CLASS_MATCH_STEP_TEST_INSTANCE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_817__CLASS_MATCH_STEP_TEST_INSTANCE.obj_hash = 601675634; cdat->dsym_817__CLASS_MATCH_STEP_TEST_INSTANCE.obj_len = 3; /*inistring dstr_818__CLASS_MATCH_STEP*/ /*_.VALSTR___V910*/ meltfptr[909] = (melt_ptr_t) & cdat->dstr_818__CLASS_MATCH_STEP; cdat->dstr_818__CLASS_MATCH_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_818__CLASS_MATCH_STEP.val, "CLASS_MATCH_STEP_TEST_INSTANCE", sizeof (cdat->dstr_818__CLASS_MATCH_STEP. val) - 1); cdat->dstr_818__CLASS_MATCH_STEP.val[30] = (char) 0; cdat->dstr_818__CLASS_MATCH_STEP.slen = 30; MELT_LOCATION ("warmelt-normatch.melt:2844:/ iniobj"); /*iniobj dobj_819__CLASS_MATCH_STEP_TEST_INSTANCE*/ /*_.VALDATA___V911*/ meltfptr[910] = (melt_ptr_t) & cdat->dobj_819__CLASS_MATCH_STEP_TEST_INSTANCE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_819__CLASS_MATCH_STEP_TEST_INSTANCE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_819__CLASS_MATCH_STEP_TEST_INSTANCE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_819__CLASS_MATCH_STEP_TEST_INSTANCE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_819__CLASS_MATCH_STEP_TEST_INSTANCE.obj_num = MELTOBMAG_OBJECT; cdat->dobj_819__CLASS_MATCH_STEP_TEST_INSTANCE.obj_hash = 13000168; cdat->dobj_819__CLASS_MATCH_STEP_TEST_INSTANCE.obj_len = 8; /*inistring dstr_820__CLASS_MATCH_STEP*/ /*_.VALSTR___V912*/ meltfptr[911] = (melt_ptr_t) & cdat->dstr_820__CLASS_MATCH_STEP; cdat->dstr_820__CLASS_MATCH_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_820__CLASS_MATCH_STEP.val, "CLASS_MATCH_STEP_TEST_INSTANCE", sizeof (cdat->dstr_820__CLASS_MATCH_STEP. val) - 1); cdat->dstr_820__CLASS_MATCH_STEP.val[30] = (char) 0; cdat->dstr_820__CLASS_MATCH_STEP.slen = 30; /*inimult dtup_821__CLASS_MATCH_STEP_TEST_INSTANCE */ /*_.VALTUP___V913*/ meltfptr[912] = (melt_ptr_t) & cdat->dtup_821__CLASS_MATCH_STEP_TEST_INSTANCE; cdat->dtup_821__CLASS_MATCH_STEP_TEST_INSTANCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_821__CLASS_MATCH_STEP_TEST_INSTANCE.nbval = 7; /*inimult dtup_822__CLASS_MATCH_STEP_TEST_INSTANCE */ /*_.VALTUP___V918*/ meltfptr[917] = (melt_ptr_t) & cdat->dtup_822__CLASS_MATCH_STEP_TEST_INSTANCE; cdat->dtup_822__CLASS_MATCH_STEP_TEST_INSTANCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_822__CLASS_MATCH_STEP_TEST_INSTANCE.nbval = 8; /*iniobj dsym_823__MSTINS_CLASS*/ /*uniqueobj*/ if (! /*_.VALDATA___V919*/ meltfptr[918]) /*_.VALDATA___V919*/ meltfptr[918] = (melt_ptr_t) & cdat->dsym_823__MSTINS_CLASS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_823__MSTINS_CLASS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_823__MSTINS_CLASS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_823__MSTINS_CLASS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_823__MSTINS_CLASS.obj_hash = 992180192; cdat->dsym_823__MSTINS_CLASS.obj_len = 3; /*inistring dstr_824__MSTINS_CLASS*/ /*_.VALSTR___V920*/ meltfptr[919] = (melt_ptr_t) & cdat->dstr_824__MSTINS_CLASS; cdat->dstr_824__MSTINS_CLASS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_824__MSTINS_CLASS.val, "MSTINS_CLASS", sizeof (cdat->dstr_824__MSTINS_CLASS.val) - 1); cdat->dstr_824__MSTINS_CLASS.val[12] = (char) 0; cdat->dstr_824__MSTINS_CLASS.slen = 12; /*^iniobj */ /*iniobj dobj_825__MSTINS_CLASS*/ /*_.VALDATA___V914*/ meltfptr[913] = (melt_ptr_t) & cdat->dobj_825__MSTINS_CLASS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_825__MSTINS_CLASS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_825__MSTINS_CLASS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_825__MSTINS_CLASS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_825__MSTINS_CLASS.obj_num = 6; cdat->dobj_825__MSTINS_CLASS.obj_hash = 55417261; cdat->dobj_825__MSTINS_CLASS.obj_len = 4; /*inistring dstr_826__MSTINS_CLASS*/ /*_.VALSTR___V915*/ meltfptr[914] = (melt_ptr_t) & cdat->dstr_826__MSTINS_CLASS; cdat->dstr_826__MSTINS_CLASS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_826__MSTINS_CLASS.val, "MSTINS_CLASS", sizeof (cdat->dstr_826__MSTINS_CLASS.val) - 1); cdat->dstr_826__MSTINS_CLASS.val[12] = (char) 0; cdat->dstr_826__MSTINS_CLASS.slen = 12; /*iniobj dsym_827__MSTINS_SLOTS*/ /*uniqueobj*/ if (! /*_.VALDATA___V921*/ meltfptr[920]) /*_.VALDATA___V921*/ meltfptr[920] = (melt_ptr_t) & cdat->dsym_827__MSTINS_SLOTS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_827__MSTINS_SLOTS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_827__MSTINS_SLOTS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_827__MSTINS_SLOTS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_827__MSTINS_SLOTS.obj_hash = 625280432; cdat->dsym_827__MSTINS_SLOTS.obj_len = 3; /*inistring dstr_828__MSTINS_SLOTS*/ /*_.VALSTR___V922*/ meltfptr[921] = (melt_ptr_t) & cdat->dstr_828__MSTINS_SLOTS; cdat->dstr_828__MSTINS_SLOTS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_828__MSTINS_SLOTS.val, "MSTINS_SLOTS", sizeof (cdat->dstr_828__MSTINS_SLOTS.val) - 1); cdat->dstr_828__MSTINS_SLOTS.val[12] = (char) 0; cdat->dstr_828__MSTINS_SLOTS.slen = 12; /*^iniobj */ /*iniobj dobj_829__MSTINS_SLOTS*/ /*_.VALDATA___V916*/ meltfptr[915] = (melt_ptr_t) & cdat->dobj_829__MSTINS_SLOTS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_829__MSTINS_SLOTS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_829__MSTINS_SLOTS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_829__MSTINS_SLOTS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_829__MSTINS_SLOTS.obj_num = 7; cdat->dobj_829__MSTINS_SLOTS.obj_hash = 1037797058; cdat->dobj_829__MSTINS_SLOTS.obj_len = 4; /*inistring dstr_830__MSTINS_SLOTS*/ /*_.VALSTR___V917*/ meltfptr[916] = (melt_ptr_t) & cdat->dstr_830__MSTINS_SLOTS; cdat->dstr_830__MSTINS_SLOTS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_830__MSTINS_SLOTS.val, "MSTINS_SLOTS", sizeof (cdat->dstr_830__MSTINS_SLOTS.val) - 1); cdat->dstr_830__MSTINS_SLOTS.val[12] = (char) 0; cdat->dstr_830__MSTINS_SLOTS.slen = 12; /*iniobj dsym_831__CLASS_MATCH_STEP_TEST_MULTIPLE*/ /*uniqueobj*/ if (! /*_.VALDATA___V923*/ meltfptr[922]) /*_.VALDATA___V923*/ meltfptr[922] = (melt_ptr_t) & cdat->dsym_831__CLASS_MATCH_STEP_TEST_MULTIPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_831__CLASS_MATCH_STEP_TEST_MULTIPLE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_831__CLASS_MATCH_STEP_TEST_MULTIPLE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_831__CLASS_MATCH_STEP_TEST_MULTIPLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_831__CLASS_MATCH_STEP_TEST_MULTIPLE.obj_hash = 389135485; cdat->dsym_831__CLASS_MATCH_STEP_TEST_MULTIPLE.obj_len = 3; /*inistring dstr_832__CLASS_MATCH_STEP*/ /*_.VALSTR___V924*/ meltfptr[923] = (melt_ptr_t) & cdat->dstr_832__CLASS_MATCH_STEP; cdat->dstr_832__CLASS_MATCH_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_832__CLASS_MATCH_STEP.val, "CLASS_MATCH_STEP_TEST_MULTIPLE", sizeof (cdat->dstr_832__CLASS_MATCH_STEP. val) - 1); cdat->dstr_832__CLASS_MATCH_STEP.val[30] = (char) 0; cdat->dstr_832__CLASS_MATCH_STEP.slen = 30; MELT_LOCATION ("warmelt-normatch.melt:2852:/ iniobj"); /*iniobj dobj_833__CLASS_MATCH_STEP_TEST_MULTIPLE*/ /*_.VALDATA___V925*/ meltfptr[924] = (melt_ptr_t) & cdat->dobj_833__CLASS_MATCH_STEP_TEST_MULTIPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_833__CLASS_MATCH_STEP_TEST_MULTIPLE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_833__CLASS_MATCH_STEP_TEST_MULTIPLE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_833__CLASS_MATCH_STEP_TEST_MULTIPLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_833__CLASS_MATCH_STEP_TEST_MULTIPLE.obj_num = MELTOBMAG_OBJECT; cdat->dobj_833__CLASS_MATCH_STEP_TEST_MULTIPLE.obj_hash = 260849359; cdat->dobj_833__CLASS_MATCH_STEP_TEST_MULTIPLE.obj_len = 8; /*inistring dstr_834__CLASS_MATCH_STEP*/ /*_.VALSTR___V926*/ meltfptr[925] = (melt_ptr_t) & cdat->dstr_834__CLASS_MATCH_STEP; cdat->dstr_834__CLASS_MATCH_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_834__CLASS_MATCH_STEP.val, "CLASS_MATCH_STEP_TEST_MULTIPLE", sizeof (cdat->dstr_834__CLASS_MATCH_STEP. val) - 1); cdat->dstr_834__CLASS_MATCH_STEP.val[30] = (char) 0; cdat->dstr_834__CLASS_MATCH_STEP.slen = 30; /*inimult dtup_835__CLASS_MATCH_STEP_TEST_MULTIPLE */ /*_.VALTUP___V927*/ meltfptr[926] = (melt_ptr_t) & cdat->dtup_835__CLASS_MATCH_STEP_TEST_MULTIPLE; cdat->dtup_835__CLASS_MATCH_STEP_TEST_MULTIPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_835__CLASS_MATCH_STEP_TEST_MULTIPLE.nbval = 7; /*inimult dtup_836__CLASS_MATCH_STEP_TEST_MULTIPLE */ /*_.VALTUP___V930*/ meltfptr[929] = (melt_ptr_t) & cdat->dtup_836__CLASS_MATCH_STEP_TEST_MULTIPLE; cdat->dtup_836__CLASS_MATCH_STEP_TEST_MULTIPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_836__CLASS_MATCH_STEP_TEST_MULTIPLE.nbval = 7; /*iniobj dsym_837__MSTTUP_COMPONENTS*/ /*uniqueobj*/ if (! /*_.VALDATA___V931*/ meltfptr[930]) /*_.VALDATA___V931*/ meltfptr[930] = (melt_ptr_t) & cdat->dsym_837__MSTTUP_COMPONENTS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_837__MSTTUP_COMPONENTS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_837__MSTTUP_COMPONENTS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_837__MSTTUP_COMPONENTS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_837__MSTTUP_COMPONENTS.obj_hash = 590722293; cdat->dsym_837__MSTTUP_COMPONENTS.obj_len = 3; /*inistring dstr_838__MSTTUP_COMPONENT*/ /*_.VALSTR___V932*/ meltfptr[931] = (melt_ptr_t) & cdat->dstr_838__MSTTUP_COMPONENT; cdat->dstr_838__MSTTUP_COMPONENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_838__MSTTUP_COMPONENT.val, "MSTTUP_COMPONENTS", sizeof (cdat->dstr_838__MSTTUP_COMPONENT. val) - 1); cdat->dstr_838__MSTTUP_COMPONENT.val[17] = (char) 0; cdat->dstr_838__MSTTUP_COMPONENT.slen = 17; /*^iniobj */ /*iniobj dobj_839__MSTTUP_COMPONENTS*/ /*_.VALDATA___V928*/ meltfptr[927] = (melt_ptr_t) & cdat->dobj_839__MSTTUP_COMPONENTS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_839__MSTTUP_COMPONENTS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_839__MSTTUP_COMPONENTS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_839__MSTTUP_COMPONENTS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_839__MSTTUP_COMPONENTS.obj_num = 6; cdat->dobj_839__MSTTUP_COMPONENTS.obj_hash = 54588442; cdat->dobj_839__MSTTUP_COMPONENTS.obj_len = 4; /*inistring dstr_840__MSTTUP_COMPONENT*/ /*_.VALSTR___V929*/ meltfptr[928] = (melt_ptr_t) & cdat->dstr_840__MSTTUP_COMPONENT; cdat->dstr_840__MSTTUP_COMPONENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_840__MSTTUP_COMPONENT.val, "MSTTUP_COMPONENTS", sizeof (cdat->dstr_840__MSTTUP_COMPONENT. val) - 1); cdat->dstr_840__MSTTUP_COMPONENT.val[17] = (char) 0; cdat->dstr_840__MSTTUP_COMPONENT.slen = 17; /*iniobj dsym_841__CLASS_MATCH_STEP_TEST_MATCHER*/ /*uniqueobj*/ if (! /*_.VALDATA___V933*/ meltfptr[932]) /*_.VALDATA___V933*/ meltfptr[932] = (melt_ptr_t) & cdat->dsym_841__CLASS_MATCH_STEP_TEST_MATCHER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_841__CLASS_MATCH_STEP_TEST_MATCHER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_841__CLASS_MATCH_STEP_TEST_MATCHER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_841__CLASS_MATCH_STEP_TEST_MATCHER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_841__CLASS_MATCH_STEP_TEST_MATCHER.obj_hash = 930369137; cdat->dsym_841__CLASS_MATCH_STEP_TEST_MATCHER.obj_len = 3; /*inistring dstr_842__CLASS_MATCH_STEP*/ /*_.VALSTR___V934*/ meltfptr[933] = (melt_ptr_t) & cdat->dstr_842__CLASS_MATCH_STEP; cdat->dstr_842__CLASS_MATCH_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_842__CLASS_MATCH_STEP.val, "CLASS_MATCH_STEP_TEST_MATCHER", sizeof (cdat->dstr_842__CLASS_MATCH_STEP. val) - 1); cdat->dstr_842__CLASS_MATCH_STEP.val[29] = (char) 0; cdat->dstr_842__CLASS_MATCH_STEP.slen = 29; MELT_LOCATION ("warmelt-normatch.melt:2860:/ iniobj"); /*iniobj dobj_843__CLASS_MATCH_STEP_TEST_MATCHER*/ /*_.VALDATA___V935*/ meltfptr[934] = (melt_ptr_t) & cdat->dobj_843__CLASS_MATCH_STEP_TEST_MATCHER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_843__CLASS_MATCH_STEP_TEST_MATCHER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_843__CLASS_MATCH_STEP_TEST_MATCHER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_843__CLASS_MATCH_STEP_TEST_MATCHER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_843__CLASS_MATCH_STEP_TEST_MATCHER.obj_num = MELTOBMAG_OBJECT; cdat->dobj_843__CLASS_MATCH_STEP_TEST_MATCHER.obj_hash = 803184350; cdat->dobj_843__CLASS_MATCH_STEP_TEST_MATCHER.obj_len = 8; /*inistring dstr_844__CLASS_MATCH_STEP*/ /*_.VALSTR___V936*/ meltfptr[935] = (melt_ptr_t) & cdat->dstr_844__CLASS_MATCH_STEP; cdat->dstr_844__CLASS_MATCH_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_844__CLASS_MATCH_STEP.val, "CLASS_MATCH_STEP_TEST_MATCHER", sizeof (cdat->dstr_844__CLASS_MATCH_STEP. val) - 1); cdat->dstr_844__CLASS_MATCH_STEP.val[29] = (char) 0; cdat->dstr_844__CLASS_MATCH_STEP.slen = 29; /*inimult dtup_845__CLASS_MATCH_STEP_TEST_MATCHER */ /*_.VALTUP___V937*/ meltfptr[936] = (melt_ptr_t) & cdat->dtup_845__CLASS_MATCH_STEP_TEST_MATCHER; cdat->dtup_845__CLASS_MATCH_STEP_TEST_MATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_845__CLASS_MATCH_STEP_TEST_MATCHER.nbval = 7; /*inimult dtup_846__CLASS_MATCH_STEP_TEST_MATCHER */ /*_.VALTUP___V946*/ meltfptr[945] = (melt_ptr_t) & cdat->dtup_846__CLASS_MATCH_STEP_TEST_MATCHER; cdat->dtup_846__CLASS_MATCH_STEP_TEST_MATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_846__CLASS_MATCH_STEP_TEST_MATCHER.nbval = 10; /*iniobj dsym_847__MSTMA_MATCHER*/ /*uniqueobj*/ if (! /*_.VALDATA___V947*/ meltfptr[946]) /*_.VALDATA___V947*/ meltfptr[946] = (melt_ptr_t) & cdat->dsym_847__MSTMA_MATCHER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_847__MSTMA_MATCHER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_847__MSTMA_MATCHER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_847__MSTMA_MATCHER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_847__MSTMA_MATCHER.obj_hash = 562919191; cdat->dsym_847__MSTMA_MATCHER.obj_len = 3; /*inistring dstr_848__MSTMA_MATCHER*/ /*_.VALSTR___V948*/ meltfptr[947] = (melt_ptr_t) & cdat->dstr_848__MSTMA_MATCHER; cdat->dstr_848__MSTMA_MATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_848__MSTMA_MATCHER.val, "MSTMA_MATCHER", sizeof (cdat->dstr_848__MSTMA_MATCHER.val) - 1); cdat->dstr_848__MSTMA_MATCHER.val[13] = (char) 0; cdat->dstr_848__MSTMA_MATCHER.slen = 13; /*^iniobj */ /*iniobj dobj_849__MSTMA_MATCHER*/ /*_.VALDATA___V938*/ meltfptr[937] = (melt_ptr_t) & cdat->dobj_849__MSTMA_MATCHER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_849__MSTMA_MATCHER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_849__MSTMA_MATCHER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_849__MSTMA_MATCHER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_849__MSTMA_MATCHER.obj_num = 6; cdat->dobj_849__MSTMA_MATCHER.obj_hash = 579111920; cdat->dobj_849__MSTMA_MATCHER.obj_len = 4; /*inistring dstr_850__MSTMA_MATCHER*/ /*_.VALSTR___V939*/ meltfptr[938] = (melt_ptr_t) & cdat->dstr_850__MSTMA_MATCHER; cdat->dstr_850__MSTMA_MATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_850__MSTMA_MATCHER.val, "MSTMA_MATCHER", sizeof (cdat->dstr_850__MSTMA_MATCHER.val) - 1); cdat->dstr_850__MSTMA_MATCHER.val[13] = (char) 0; cdat->dstr_850__MSTMA_MATCHER.slen = 13; /*iniobj dsym_851__MSTMA_BINDS*/ /*uniqueobj*/ if (! /*_.VALDATA___V949*/ meltfptr[948]) /*_.VALDATA___V949*/ meltfptr[948] = (melt_ptr_t) & cdat->dsym_851__MSTMA_BINDS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_851__MSTMA_BINDS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_851__MSTMA_BINDS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_851__MSTMA_BINDS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_851__MSTMA_BINDS.obj_hash = 713095099; cdat->dsym_851__MSTMA_BINDS.obj_len = 3; /*inistring dstr_852__MSTMA_BINDS*/ /*_.VALSTR___V950*/ meltfptr[949] = (melt_ptr_t) & cdat->dstr_852__MSTMA_BINDS; cdat->dstr_852__MSTMA_BINDS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_852__MSTMA_BINDS.val, "MSTMA_BINDS", sizeof (cdat->dstr_852__MSTMA_BINDS.val) - 1); cdat->dstr_852__MSTMA_BINDS.val[11] = (char) 0; cdat->dstr_852__MSTMA_BINDS.slen = 11; /*^iniobj */ /*iniobj dobj_853__MSTMA_BINDS*/ /*_.VALDATA___V940*/ meltfptr[939] = (melt_ptr_t) & cdat->dobj_853__MSTMA_BINDS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_853__MSTMA_BINDS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_853__MSTMA_BINDS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_853__MSTMA_BINDS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_853__MSTMA_BINDS.obj_num = 7; cdat->dobj_853__MSTMA_BINDS.obj_hash = 878610694; cdat->dobj_853__MSTMA_BINDS.obj_len = 4; /*inistring dstr_854__MSTMA_BINDS*/ /*_.VALSTR___V941*/ meltfptr[940] = (melt_ptr_t) & cdat->dstr_854__MSTMA_BINDS; cdat->dstr_854__MSTMA_BINDS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_854__MSTMA_BINDS.val, "MSTMA_BINDS", sizeof (cdat->dstr_854__MSTMA_BINDS.val) - 1); cdat->dstr_854__MSTMA_BINDS.val[11] = (char) 0; cdat->dstr_854__MSTMA_BINDS.slen = 11; /*iniobj dsym_855__MSTMA_INS*/ /*uniqueobj*/ if (! /*_.VALDATA___V951*/ meltfptr[950]) /*_.VALDATA___V951*/ meltfptr[950] = (melt_ptr_t) & cdat->dsym_855__MSTMA_INS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_855__MSTMA_INS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_855__MSTMA_INS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_855__MSTMA_INS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_855__MSTMA_INS.obj_hash = 508289260; cdat->dsym_855__MSTMA_INS.obj_len = 3; /*inistring dstr_856__MSTMA_INS*/ /*_.VALSTR___V952*/ meltfptr[951] = (melt_ptr_t) & cdat->dstr_856__MSTMA_INS; cdat->dstr_856__MSTMA_INS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_856__MSTMA_INS.val, "MSTMA_INS", sizeof (cdat->dstr_856__MSTMA_INS.val) - 1); cdat->dstr_856__MSTMA_INS.val[9] = (char) 0; cdat->dstr_856__MSTMA_INS.slen = 9; /*^iniobj */ /*iniobj dobj_857__MSTMA_INS*/ /*_.VALDATA___V942*/ meltfptr[941] = (melt_ptr_t) & cdat->dobj_857__MSTMA_INS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_857__MSTMA_INS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_857__MSTMA_INS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_857__MSTMA_INS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_857__MSTMA_INS.obj_num = 8; cdat->dobj_857__MSTMA_INS.obj_hash = 813817445; cdat->dobj_857__MSTMA_INS.obj_len = 4; /*inistring dstr_858__MSTMA_INS*/ /*_.VALSTR___V943*/ meltfptr[942] = (melt_ptr_t) & cdat->dstr_858__MSTMA_INS; cdat->dstr_858__MSTMA_INS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_858__MSTMA_INS.val, "MSTMA_INS", sizeof (cdat->dstr_858__MSTMA_INS.val) - 1); cdat->dstr_858__MSTMA_INS.val[9] = (char) 0; cdat->dstr_858__MSTMA_INS.slen = 9; /*iniobj dsym_859__MSTMA_OUTS*/ /*uniqueobj*/ if (! /*_.VALDATA___V953*/ meltfptr[952]) /*_.VALDATA___V953*/ meltfptr[952] = (melt_ptr_t) & cdat->dsym_859__MSTMA_OUTS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_859__MSTMA_OUTS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_859__MSTMA_OUTS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_859__MSTMA_OUTS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_859__MSTMA_OUTS.obj_hash = 970930840; cdat->dsym_859__MSTMA_OUTS.obj_len = 3; /*inistring dstr_860__MSTMA_OUTS*/ /*_.VALSTR___V954*/ meltfptr[953] = (melt_ptr_t) & cdat->dstr_860__MSTMA_OUTS; cdat->dstr_860__MSTMA_OUTS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_860__MSTMA_OUTS.val, "MSTMA_OUTS", sizeof (cdat->dstr_860__MSTMA_OUTS.val) - 1); cdat->dstr_860__MSTMA_OUTS.val[10] = (char) 0; cdat->dstr_860__MSTMA_OUTS.slen = 10; /*^iniobj */ /*iniobj dobj_861__MSTMA_OUTS*/ /*_.VALDATA___V944*/ meltfptr[943] = (melt_ptr_t) & cdat->dobj_861__MSTMA_OUTS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_861__MSTMA_OUTS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_861__MSTMA_OUTS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_861__MSTMA_OUTS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_861__MSTMA_OUTS.obj_num = 9; cdat->dobj_861__MSTMA_OUTS.obj_hash = 842934703; cdat->dobj_861__MSTMA_OUTS.obj_len = 4; /*inistring dstr_862__MSTMA_OUTS*/ /*_.VALSTR___V945*/ meltfptr[944] = (melt_ptr_t) & cdat->dstr_862__MSTMA_OUTS; cdat->dstr_862__MSTMA_OUTS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_862__MSTMA_OUTS.val, "MSTMA_OUTS", sizeof (cdat->dstr_862__MSTMA_OUTS.val) - 1); cdat->dstr_862__MSTMA_OUTS.val[10] = (char) 0; cdat->dstr_862__MSTMA_OUTS.slen = 10; /*iniobj dsym_863__CLASS_NREP_MATCH_FLAG*/ /*uniqueobj*/ if (! /*_.VALDATA___V955*/ meltfptr[954]) /*_.VALDATA___V955*/ meltfptr[954] = (melt_ptr_t) & cdat->dsym_863__CLASS_NREP_MATCH_FLAG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_863__CLASS_NREP_MATCH_FLAG", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_863__CLASS_NREP_MATCH_FLAG", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_863__CLASS_NREP_MATCH_FLAG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_863__CLASS_NREP_MATCH_FLAG.obj_hash = 479563009; cdat->dsym_863__CLASS_NREP_MATCH_FLAG.obj_len = 3; /*inistring dstr_864__CLASS_NREP_MATCH*/ /*_.VALSTR___V956*/ meltfptr[955] = (melt_ptr_t) & cdat->dstr_864__CLASS_NREP_MATCH; cdat->dstr_864__CLASS_NREP_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_864__CLASS_NREP_MATCH.val, "CLASS_NREP_MATCH_FLAG", sizeof (cdat->dstr_864__CLASS_NREP_MATCH. val) - 1); cdat->dstr_864__CLASS_NREP_MATCH.val[21] = (char) 0; cdat->dstr_864__CLASS_NREP_MATCH.slen = 21; /*iniobj dsym_865__CLASS_NREP_SIMPLE*/ /*uniqueobj*/ if (! /*_.VALDATA___V957*/ meltfptr[956]) /*_.VALDATA___V957*/ meltfptr[956] = (melt_ptr_t) & cdat->dsym_865__CLASS_NREP_SIMPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_865__CLASS_NREP_SIMPLE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_865__CLASS_NREP_SIMPLE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_865__CLASS_NREP_SIMPLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_865__CLASS_NREP_SIMPLE.obj_hash = 945537669; cdat->dsym_865__CLASS_NREP_SIMPLE.obj_len = 3; /*inistring dstr_866__CLASS_NREP_SIMPL*/ /*_.VALSTR___V958*/ meltfptr[957] = (melt_ptr_t) & cdat->dstr_866__CLASS_NREP_SIMPL; cdat->dstr_866__CLASS_NREP_SIMPL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_866__CLASS_NREP_SIMPL.val, "CLASS_NREP_SIMPLE", sizeof (cdat->dstr_866__CLASS_NREP_SIMPL. val) - 1); cdat->dstr_866__CLASS_NREP_SIMPL.val[17] = (char) 0; cdat->dstr_866__CLASS_NREP_SIMPL.slen = 17; MELT_LOCATION ("warmelt-normatch.melt:2872:/ iniobj"); /*iniobj dobj_867__CLASS_NREP_MATCH_FLAG*/ /*_.VALDATA___V959*/ meltfptr[958] = (melt_ptr_t) & cdat->dobj_867__CLASS_NREP_MATCH_FLAG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_867__CLASS_NREP_MATCH_FLAG", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_867__CLASS_NREP_MATCH_FLAG", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_867__CLASS_NREP_MATCH_FLAG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_867__CLASS_NREP_MATCH_FLAG.obj_num = MELTOBMAG_OBJECT; cdat->dobj_867__CLASS_NREP_MATCH_FLAG.obj_hash = 467597671; cdat->dobj_867__CLASS_NREP_MATCH_FLAG.obj_len = 8; /*inistring dstr_868__CLASS_NREP_MATCH*/ /*_.VALSTR___V960*/ meltfptr[959] = (melt_ptr_t) & cdat->dstr_868__CLASS_NREP_MATCH; cdat->dstr_868__CLASS_NREP_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_868__CLASS_NREP_MATCH.val, "CLASS_NREP_MATCH_FLAG", sizeof (cdat->dstr_868__CLASS_NREP_MATCH. val) - 1); cdat->dstr_868__CLASS_NREP_MATCH.val[21] = (char) 0; cdat->dstr_868__CLASS_NREP_MATCH.slen = 21; /*inimult dtup_869__CLASS_NREP_MATCH_FLAG */ /*_.VALTUP___V961*/ meltfptr[960] = (melt_ptr_t) & cdat->dtup_869__CLASS_NREP_MATCH_FLAG; cdat->dtup_869__CLASS_NREP_MATCH_FLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_869__CLASS_NREP_MATCH_FLAG.nbval = 3; /*inimult dtup_870__CLASS_NREP_MATCH_FLAG */ /*_.VALTUP___V966*/ meltfptr[965] = (melt_ptr_t) & cdat->dtup_870__CLASS_NREP_MATCH_FLAG; cdat->dtup_870__CLASS_NREP_MATCH_FLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_870__CLASS_NREP_MATCH_FLAG.nbval = 3; /*iniobj dsym_871__NRPFLA_FLAG*/ /*uniqueobj*/ if (! /*_.VALDATA___V967*/ meltfptr[966]) /*_.VALDATA___V967*/ meltfptr[966] = (melt_ptr_t) & cdat->dsym_871__NRPFLA_FLAG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_871__NRPFLA_FLAG", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_871__NRPFLA_FLAG", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_871__NRPFLA_FLAG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_871__NRPFLA_FLAG.obj_hash = 846944133; cdat->dsym_871__NRPFLA_FLAG.obj_len = 3; /*inistring dstr_872__NRPFLA_FLAG*/ /*_.VALSTR___V968*/ meltfptr[967] = (melt_ptr_t) & cdat->dstr_872__NRPFLA_FLAG; cdat->dstr_872__NRPFLA_FLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_872__NRPFLA_FLAG.val, "NRPFLA_FLAG", sizeof (cdat->dstr_872__NRPFLA_FLAG.val) - 1); cdat->dstr_872__NRPFLA_FLAG.val[11] = (char) 0; cdat->dstr_872__NRPFLA_FLAG.slen = 11; /*^iniobj */ /*iniobj dobj_873__NRPFLA_FLAG*/ /*_.VALDATA___V962*/ meltfptr[961] = (melt_ptr_t) & cdat->dobj_873__NRPFLA_FLAG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_873__NRPFLA_FLAG", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_873__NRPFLA_FLAG", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_873__NRPFLA_FLAG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_873__NRPFLA_FLAG.obj_num = 1; cdat->dobj_873__NRPFLA_FLAG.obj_hash = 901738698; cdat->dobj_873__NRPFLA_FLAG.obj_len = 4; /*inistring dstr_874__NRPFLA_FLAG*/ /*_.VALSTR___V963*/ meltfptr[962] = (melt_ptr_t) & cdat->dstr_874__NRPFLA_FLAG; cdat->dstr_874__NRPFLA_FLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_874__NRPFLA_FLAG.val, "NRPFLA_FLAG", sizeof (cdat->dstr_874__NRPFLA_FLAG.val) - 1); cdat->dstr_874__NRPFLA_FLAG.val[11] = (char) 0; cdat->dstr_874__NRPFLA_FLAG.slen = 11; /*iniobj dsym_875__NRPFLA_NMATCH*/ /*uniqueobj*/ if (! /*_.VALDATA___V969*/ meltfptr[968]) /*_.VALDATA___V969*/ meltfptr[968] = (melt_ptr_t) & cdat->dsym_875__NRPFLA_NMATCH; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_875__NRPFLA_NMATCH", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_875__NRPFLA_NMATCH", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_875__NRPFLA_NMATCH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_875__NRPFLA_NMATCH.obj_hash = 863088082; cdat->dsym_875__NRPFLA_NMATCH.obj_len = 3; /*inistring dstr_876__NRPFLA_NMATCH*/ /*_.VALSTR___V970*/ meltfptr[969] = (melt_ptr_t) & cdat->dstr_876__NRPFLA_NMATCH; cdat->dstr_876__NRPFLA_NMATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_876__NRPFLA_NMATCH.val, "NRPFLA_NMATCH", sizeof (cdat->dstr_876__NRPFLA_NMATCH.val) - 1); cdat->dstr_876__NRPFLA_NMATCH.val[13] = (char) 0; cdat->dstr_876__NRPFLA_NMATCH.slen = 13; /*^iniobj */ /*iniobj dobj_877__NRPFLA_NMATCH*/ /*_.VALDATA___V964*/ meltfptr[963] = (melt_ptr_t) & cdat->dobj_877__NRPFLA_NMATCH; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_877__NRPFLA_NMATCH", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_877__NRPFLA_NMATCH", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_877__NRPFLA_NMATCH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_877__NRPFLA_NMATCH.obj_num = 2; cdat->dobj_877__NRPFLA_NMATCH.obj_hash = 905398741; cdat->dobj_877__NRPFLA_NMATCH.obj_len = 4; /*inistring dstr_878__NRPFLA_NMATCH*/ /*_.VALSTR___V965*/ meltfptr[964] = (melt_ptr_t) & cdat->dstr_878__NRPFLA_NMATCH; cdat->dstr_878__NRPFLA_NMATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_878__NRPFLA_NMATCH.val, "NRPFLA_NMATCH", sizeof (cdat->dstr_878__NRPFLA_NMATCH.val) - 1); cdat->dstr_878__NRPFLA_NMATCH.val[13] = (char) 0; cdat->dstr_878__NRPFLA_NMATCH.slen = 13; /*iniobj dsym_879__CLASS_NREP_MATCHED_DATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V971*/ meltfptr[970]) /*_.VALDATA___V971*/ meltfptr[970] = (melt_ptr_t) & cdat->dsym_879__CLASS_NREP_MATCHED_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_879__CLASS_NREP_MATCHED_DATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_879__CLASS_NREP_MATCHED_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_879__CLASS_NREP_MATCHED_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_879__CLASS_NREP_MATCHED_DATA.obj_hash = 180965645; cdat->dsym_879__CLASS_NREP_MATCHED_DATA.obj_len = 3; /*inistring dstr_880__CLASS_NREP_MATCH*/ /*_.VALSTR___V972*/ meltfptr[971] = (melt_ptr_t) & cdat->dstr_880__CLASS_NREP_MATCH; cdat->dstr_880__CLASS_NREP_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_880__CLASS_NREP_MATCH.val, "CLASS_NREP_MATCHED_DATA", sizeof (cdat->dstr_880__CLASS_NREP_MATCH. val) - 1); cdat->dstr_880__CLASS_NREP_MATCH.val[23] = (char) 0; cdat->dstr_880__CLASS_NREP_MATCH.slen = 23; MELT_LOCATION ("warmelt-normatch.melt:2882:/ iniobj"); /*iniobj dobj_881__CLASS_NREP_MATCHED_DATA*/ /*_.VALDATA___V973*/ meltfptr[972] = (melt_ptr_t) & cdat->dobj_881__CLASS_NREP_MATCHED_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_881__CLASS_NREP_MATCHED_DATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_881__CLASS_NREP_MATCHED_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_881__CLASS_NREP_MATCHED_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_881__CLASS_NREP_MATCHED_DATA.obj_num = MELTOBMAG_OBJECT; cdat->dobj_881__CLASS_NREP_MATCHED_DATA.obj_hash = 470829333; cdat->dobj_881__CLASS_NREP_MATCHED_DATA.obj_len = 8; /*inistring dstr_882__CLASS_NREP_MATCH*/ /*_.VALSTR___V974*/ meltfptr[973] = (melt_ptr_t) & cdat->dstr_882__CLASS_NREP_MATCH; cdat->dstr_882__CLASS_NREP_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_882__CLASS_NREP_MATCH.val, "CLASS_NREP_MATCHED_DATA", sizeof (cdat->dstr_882__CLASS_NREP_MATCH. val) - 1); cdat->dstr_882__CLASS_NREP_MATCH.val[23] = (char) 0; cdat->dstr_882__CLASS_NREP_MATCH.slen = 23; /*inimult dtup_883__CLASS_NREP_MATCHED_DATA */ /*_.VALTUP___V975*/ meltfptr[974] = (melt_ptr_t) & cdat->dtup_883__CLASS_NREP_MATCHED_DATA; cdat->dtup_883__CLASS_NREP_MATCHED_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_883__CLASS_NREP_MATCHED_DATA.nbval = 3; /*inimult dtup_884__CLASS_NREP_MATCHED_DATA */ /*_.VALTUP___V982*/ meltfptr[981] = (melt_ptr_t) & cdat->dtup_884__CLASS_NREP_MATCHED_DATA; cdat->dtup_884__CLASS_NREP_MATCHED_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_884__CLASS_NREP_MATCHED_DATA.nbval = 4; /*iniobj dsym_885__NRMATD_CTYPE*/ /*uniqueobj*/ if (! /*_.VALDATA___V983*/ meltfptr[982]) /*_.VALDATA___V983*/ meltfptr[982] = (melt_ptr_t) & cdat->dsym_885__NRMATD_CTYPE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_885__NRMATD_CTYPE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_885__NRMATD_CTYPE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_885__NRMATD_CTYPE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_885__NRMATD_CTYPE.obj_hash = 366839624; cdat->dsym_885__NRMATD_CTYPE.obj_len = 3; /*inistring dstr_886__NRMATD_CTYPE*/ /*_.VALSTR___V984*/ meltfptr[983] = (melt_ptr_t) & cdat->dstr_886__NRMATD_CTYPE; cdat->dstr_886__NRMATD_CTYPE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_886__NRMATD_CTYPE.val, "NRMATD_CTYPE", sizeof (cdat->dstr_886__NRMATD_CTYPE.val) - 1); cdat->dstr_886__NRMATD_CTYPE.val[12] = (char) 0; cdat->dstr_886__NRMATD_CTYPE.slen = 12; /*^iniobj */ /*iniobj dobj_887__NRMATD_CTYPE*/ /*_.VALDATA___V976*/ meltfptr[975] = (melt_ptr_t) & cdat->dobj_887__NRMATD_CTYPE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_887__NRMATD_CTYPE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_887__NRMATD_CTYPE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_887__NRMATD_CTYPE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_887__NRMATD_CTYPE.obj_num = 1; cdat->dobj_887__NRMATD_CTYPE.obj_hash = 723624778; cdat->dobj_887__NRMATD_CTYPE.obj_len = 4; /*inistring dstr_888__NRMATD_CTYPE*/ /*_.VALSTR___V977*/ meltfptr[976] = (melt_ptr_t) & cdat->dstr_888__NRMATD_CTYPE; cdat->dstr_888__NRMATD_CTYPE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_888__NRMATD_CTYPE.val, "NRMATD_CTYPE", sizeof (cdat->dstr_888__NRMATD_CTYPE.val) - 1); cdat->dstr_888__NRMATD_CTYPE.val[12] = (char) 0; cdat->dstr_888__NRMATD_CTYPE.slen = 12; /*iniobj dsym_889__NRMATD_MDATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V985*/ meltfptr[984]) /*_.VALDATA___V985*/ meltfptr[984] = (melt_ptr_t) & cdat->dsym_889__NRMATD_MDATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_889__NRMATD_MDATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_889__NRMATD_MDATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_889__NRMATD_MDATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_889__NRMATD_MDATA.obj_hash = 224112162; cdat->dsym_889__NRMATD_MDATA.obj_len = 3; /*inistring dstr_890__NRMATD_MDATA*/ /*_.VALSTR___V986*/ meltfptr[985] = (melt_ptr_t) & cdat->dstr_890__NRMATD_MDATA; cdat->dstr_890__NRMATD_MDATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_890__NRMATD_MDATA.val, "NRMATD_MDATA", sizeof (cdat->dstr_890__NRMATD_MDATA.val) - 1); cdat->dstr_890__NRMATD_MDATA.val[12] = (char) 0; cdat->dstr_890__NRMATD_MDATA.slen = 12; /*^iniobj */ /*iniobj dobj_891__NRMATD_MDATA*/ /*_.VALDATA___V978*/ meltfptr[977] = (melt_ptr_t) & cdat->dobj_891__NRMATD_MDATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_891__NRMATD_MDATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_891__NRMATD_MDATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_891__NRMATD_MDATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_891__NRMATD_MDATA.obj_num = 2; cdat->dobj_891__NRMATD_MDATA.obj_hash = 22114868; cdat->dobj_891__NRMATD_MDATA.obj_len = 4; /*inistring dstr_892__NRMATD_MDATA*/ /*_.VALSTR___V979*/ meltfptr[978] = (melt_ptr_t) & cdat->dstr_892__NRMATD_MDATA; cdat->dstr_892__NRMATD_MDATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_892__NRMATD_MDATA.val, "NRMATD_MDATA", sizeof (cdat->dstr_892__NRMATD_MDATA.val) - 1); cdat->dstr_892__NRMATD_MDATA.val[12] = (char) 0; cdat->dstr_892__NRMATD_MDATA.slen = 12; /*iniobj dsym_893__NRMATD_RANK*/ /*uniqueobj*/ if (! /*_.VALDATA___V987*/ meltfptr[986]) /*_.VALDATA___V987*/ meltfptr[986] = (melt_ptr_t) & cdat->dsym_893__NRMATD_RANK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_893__NRMATD_RANK", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_893__NRMATD_RANK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_893__NRMATD_RANK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_893__NRMATD_RANK.obj_hash = 159591483; cdat->dsym_893__NRMATD_RANK.obj_len = 3; /*inistring dstr_894__NRMATD_RANK*/ /*_.VALSTR___V988*/ meltfptr[987] = (melt_ptr_t) & cdat->dstr_894__NRMATD_RANK; cdat->dstr_894__NRMATD_RANK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_894__NRMATD_RANK.val, "NRMATD_RANK", sizeof (cdat->dstr_894__NRMATD_RANK.val) - 1); cdat->dstr_894__NRMATD_RANK.val[11] = (char) 0; cdat->dstr_894__NRMATD_RANK.slen = 11; /*^iniobj */ /*iniobj dobj_895__NRMATD_RANK*/ /*_.VALDATA___V980*/ meltfptr[979] = (melt_ptr_t) & cdat->dobj_895__NRMATD_RANK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_895__NRMATD_RANK", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_895__NRMATD_RANK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_895__NRMATD_RANK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_895__NRMATD_RANK.obj_num = 3; cdat->dobj_895__NRMATD_RANK.obj_hash = 901308467; cdat->dobj_895__NRMATD_RANK.obj_len = 4; /*inistring dstr_896__NRMATD_RANK*/ /*_.VALSTR___V981*/ meltfptr[980] = (melt_ptr_t) & cdat->dstr_896__NRMATD_RANK; cdat->dstr_896__NRMATD_RANK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_896__NRMATD_RANK.val, "NRMATD_RANK", sizeof (cdat->dstr_896__NRMATD_RANK.val) - 1); cdat->dstr_896__NRMATD_RANK.val[11] = (char) 0; cdat->dstr_896__NRMATD_RANK.slen = 11; /*inirout drout_897__MAKE_MATCH_FLAG */ /*_.VALROUT___V989*/ meltfptr[988] = (melt_ptr_t) & cdat->drout_897__MAKE_MATCH_FLAG; cdat->drout_897__MAKE_MATCH_FLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_897__MAKE_MATCH_FLAG.routdescr, "MAKE_MATCH_FLAG @warmelt-normatch.melt:2895", MELT_ROUTDESCR_LEN - 1); cdat->drout_897__MAKE_MATCH_FLAG.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_897__MAKE_MATCH_FLAG, meltrout_54_warmelt_normatch_MAKE_MATCH_FLAG); /*iniclos dclo_898__MAKE_MATCH_FLAG */ /*_.VALCLO___V990*/ meltfptr[989] = (melt_ptr_t) & cdat->dclo_898__MAKE_MATCH_FLAG; cdat->dclo_898__MAKE_MATCH_FLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_898__MAKE_MATCH_FLAG.nbval = 0; /*iniobj dsym_899__SCAN_SUBPATTERNS*/ /*uniqueobj*/ if (! /*_.VALDATA___V991*/ meltfptr[990]) /*_.VALDATA___V991*/ meltfptr[990] = (melt_ptr_t) & cdat->dsym_899__SCAN_SUBPATTERNS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_899__SCAN_SUBPATTERNS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_899__SCAN_SUBPATTERNS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_899__SCAN_SUBPATTERNS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_899__SCAN_SUBPATTERNS.obj_hash = 648386917; cdat->dsym_899__SCAN_SUBPATTERNS.obj_len = 3; /*inistring dstr_900__SCAN_SUBPATTERNS*/ /*_.VALSTR___V992*/ meltfptr[991] = (melt_ptr_t) & cdat->dstr_900__SCAN_SUBPATTERNS; cdat->dstr_900__SCAN_SUBPATTERNS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_900__SCAN_SUBPATTERNS.val, "SCAN_SUBPATTERNS", sizeof (cdat->dstr_900__SCAN_SUBPATTERNS. val) - 1); cdat->dstr_900__SCAN_SUBPATTERNS.val[16] = (char) 0; cdat->dstr_900__SCAN_SUBPATTERNS.slen = 16; /*iniobj dsym_901__RECV*/ /*uniqueobj*/ if (! /*_.VALDATA___V993*/ meltfptr[992]) /*_.VALDATA___V993*/ meltfptr[992] = (melt_ptr_t) & cdat->dsym_901__RECV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_901__RECV", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_901__RECV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_901__RECV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_901__RECV.obj_hash = 10842790; cdat->dsym_901__RECV.obj_len = 3; /*inistring dstr_902__RECV*/ /*_.VALSTR___V994*/ meltfptr[993] = (melt_ptr_t) & cdat->dstr_902__RECV; cdat->dstr_902__RECV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_902__RECV.val, "RECV", sizeof (cdat->dstr_902__RECV.val) - 1); cdat->dstr_902__RECV.val[4] = (char) 0; cdat->dstr_902__RECV.slen = 4; MELT_LOCATION ("warmelt-normatch.melt:2924:/ iniobj"); /*iniobj dobj_903*/ /*_.VALDATA___V995*/ meltfptr[994] = (melt_ptr_t) & cdat->dobj_903; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_903", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_903", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_903.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_903.obj_num = 0; cdat->dobj_903.obj_hash = 795762795; cdat->dobj_903.obj_len = 2; /*iniobj dsym_904__FUN*/ /*uniqueobj*/ if (! /*_.VALDATA___V996*/ meltfptr[995]) /*_.VALDATA___V996*/ meltfptr[995] = (melt_ptr_t) & cdat->dsym_904__FUN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_904__FUN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_904__FUN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_904__FUN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_904__FUN.obj_hash = 46511649; cdat->dsym_904__FUN.obj_len = 3; /*inistring dstr_905__FUN*/ /*_.VALSTR___V997*/ meltfptr[996] = (melt_ptr_t) & cdat->dstr_905__FUN; cdat->dstr_905__FUN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_905__FUN.val, "FUN", sizeof (cdat->dstr_905__FUN.val) - 1); cdat->dstr_905__FUN.val[3] = (char) 0; cdat->dstr_905__FUN.slen = 3; /*^iniobj */ /*iniobj dobj_906*/ /*_.VALDATA___V998*/ meltfptr[997] = (melt_ptr_t) & cdat->dobj_906; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_906", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_906", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_906.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_906.obj_num = 1; cdat->dobj_906.obj_hash = 673653269; cdat->dobj_906.obj_len = 2; /*iniobj dsym_907__CTX*/ /*uniqueobj*/ if (! /*_.VALDATA___V999*/ meltfptr[998]) /*_.VALDATA___V999*/ meltfptr[998] = (melt_ptr_t) & cdat->dsym_907__CTX; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_907__CTX", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_907__CTX", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_907__CTX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_907__CTX.obj_hash = 80453264; cdat->dsym_907__CTX.obj_len = 3; /*inistring dstr_908__CTX*/ /*_.VALSTR___V1000*/ meltfptr[999] = (melt_ptr_t) & cdat->dstr_908__CTX; cdat->dstr_908__CTX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_908__CTX.val, "CTX", sizeof (cdat->dstr_908__CTX.val) - 1); cdat->dstr_908__CTX.val[3] = (char) 0; cdat->dstr_908__CTX.slen = 3; /*^iniobj */ /*iniobj dobj_909*/ /*_.VALDATA___V1001*/ meltfptr[1000] = (melt_ptr_t) & cdat->dobj_909; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_909", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_909", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_909.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_909.obj_num = 2; cdat->dobj_909.obj_hash = 1038269250; cdat->dobj_909.obj_len = 2; /*inimult dtup_910__SCAN_SUBPATTERNS */ /*_.VALTUP___V1002*/ meltfptr[1001] = (melt_ptr_t) & cdat->dtup_910__SCAN_SUBPATTERNS; cdat->dtup_910__SCAN_SUBPATTERNS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_MULTIPLE)))); cdat->dtup_910__SCAN_SUBPATTERNS.nbval = 3; /*^iniobj */ /*iniobj dobj_911__SCAN_SUBPATTERNS*/ /*_.VALDATA___V1003*/ meltfptr[1002] = (melt_ptr_t) & cdat->dobj_911__SCAN_SUBPATTERNS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_911__SCAN_SUBPATTERNS", melt_magic_discr ((melt_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7])) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_911__SCAN_SUBPATTERNS", ((meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_911__SCAN_SUBPATTERNS.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]); cdat->dobj_911__SCAN_SUBPATTERNS.obj_hash = 928457807; cdat->dobj_911__SCAN_SUBPATTERNS.obj_len = 4; /*inistring dstr_912__SCAN_SUBPATTERNS*/ /*_.VALSTR___V1004*/ meltfptr[1003] = (melt_ptr_t) & cdat->dstr_912__SCAN_SUBPATTERNS; cdat->dstr_912__SCAN_SUBPATTERNS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_912__SCAN_SUBPATTERNS.val, "SCAN_SUBPATTERNS", sizeof (cdat->dstr_912__SCAN_SUBPATTERNS. val) - 1); cdat->dstr_912__SCAN_SUBPATTERNS.val[16] = (char) 0; cdat->dstr_912__SCAN_SUBPATTERNS.slen = 16; /*iniobj dsym_913__SCAN_STEP_DATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V1005*/ meltfptr[1004]) /*_.VALDATA___V1005*/ meltfptr[1004] = (melt_ptr_t) & cdat->dsym_913__SCAN_STEP_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_913__SCAN_STEP_DATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_913__SCAN_STEP_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_913__SCAN_STEP_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_913__SCAN_STEP_DATA.obj_hash = 131373921; cdat->dsym_913__SCAN_STEP_DATA.obj_len = 3; /*inistring dstr_914__SCAN_STEP_DATA*/ /*_.VALSTR___V1006*/ meltfptr[1005] = (melt_ptr_t) & cdat->dstr_914__SCAN_STEP_DATA; cdat->dstr_914__SCAN_STEP_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_914__SCAN_STEP_DATA.val, "SCAN_STEP_DATA", sizeof (cdat->dstr_914__SCAN_STEP_DATA.val) - 1); cdat->dstr_914__SCAN_STEP_DATA.val[14] = (char) 0; cdat->dstr_914__SCAN_STEP_DATA.slen = 14; /*iniobj dsym_915__STEP*/ /*uniqueobj*/ if (! /*_.VALDATA___V1007*/ meltfptr[1006]) /*_.VALDATA___V1007*/ meltfptr[1006] = (melt_ptr_t) & cdat->dsym_915__STEP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_915__STEP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_915__STEP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_915__STEP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_915__STEP.obj_hash = 449825866; cdat->dsym_915__STEP.obj_len = 3; /*inistring dstr_916__STEP*/ /*_.VALSTR___V1008*/ meltfptr[1007] = (melt_ptr_t) & cdat->dstr_916__STEP; cdat->dstr_916__STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_916__STEP.val, "STEP", sizeof (cdat->dstr_916__STEP.val) - 1); cdat->dstr_916__STEP.val[4] = (char) 0; cdat->dstr_916__STEP.slen = 4; MELT_LOCATION ("warmelt-normatch.melt:2930:/ iniobj"); /*iniobj dobj_917*/ /*_.VALDATA___V1009*/ meltfptr[1008] = (melt_ptr_t) & cdat->dobj_917; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_917", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_917", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_917.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_917.obj_num = 0; cdat->dobj_917.obj_hash = 1068741875; cdat->dobj_917.obj_len = 2; /*^iniobj */ /*iniobj dobj_918*/ /*_.VALDATA___V1010*/ meltfptr[1009] = (melt_ptr_t) & cdat->dobj_918; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_918", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_918", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_918.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_918.obj_num = 1; cdat->dobj_918.obj_hash = 9279141; cdat->dobj_918.obj_len = 2; /*^iniobj */ /*iniobj dobj_919*/ /*_.VALDATA___V1011*/ meltfptr[1010] = (melt_ptr_t) & cdat->dobj_919; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_919", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_919", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_919.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_919.obj_num = 2; cdat->dobj_919.obj_hash = 502583891; cdat->dobj_919.obj_len = 2; /*inimult dtup_920__SCAN_STEP_DATA */ /*_.VALTUP___V1012*/ meltfptr[1011] = (melt_ptr_t) & cdat->dtup_920__SCAN_STEP_DATA; cdat->dtup_920__SCAN_STEP_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_MULTIPLE)))); cdat->dtup_920__SCAN_STEP_DATA.nbval = 3; /*^iniobj */ /*iniobj dobj_921__SCAN_STEP_DATA*/ /*_.VALDATA___V1013*/ meltfptr[1012] = (melt_ptr_t) & cdat->dobj_921__SCAN_STEP_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_921__SCAN_STEP_DATA", melt_magic_discr ((melt_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7])) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_921__SCAN_STEP_DATA", ((meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_921__SCAN_STEP_DATA.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]); cdat->dobj_921__SCAN_STEP_DATA.obj_hash = 546084297; cdat->dobj_921__SCAN_STEP_DATA.obj_len = 4; /*inistring dstr_922__SCAN_STEP_DATA*/ /*_.VALSTR___V1014*/ meltfptr[1013] = (melt_ptr_t) & cdat->dstr_922__SCAN_STEP_DATA; cdat->dstr_922__SCAN_STEP_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_922__SCAN_STEP_DATA.val, "SCAN_STEP_DATA", sizeof (cdat->dstr_922__SCAN_STEP_DATA.val) - 1); cdat->dstr_922__SCAN_STEP_DATA.val[14] = (char) 0; cdat->dstr_922__SCAN_STEP_DATA.slen = 14; /*iniobj dsym_923__SCAN_STEP_FLAG*/ /*uniqueobj*/ if (! /*_.VALDATA___V1015*/ meltfptr[1014]) /*_.VALDATA___V1015*/ meltfptr[1014] = (melt_ptr_t) & cdat->dsym_923__SCAN_STEP_FLAG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_923__SCAN_STEP_FLAG", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_923__SCAN_STEP_FLAG", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_923__SCAN_STEP_FLAG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_923__SCAN_STEP_FLAG.obj_hash = 630186923; cdat->dsym_923__SCAN_STEP_FLAG.obj_len = 3; /*inistring dstr_924__SCAN_STEP_FLAG*/ /*_.VALSTR___V1016*/ meltfptr[1015] = (melt_ptr_t) & cdat->dstr_924__SCAN_STEP_FLAG; cdat->dstr_924__SCAN_STEP_FLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_924__SCAN_STEP_FLAG.val, "SCAN_STEP_FLAG", sizeof (cdat->dstr_924__SCAN_STEP_FLAG.val) - 1); cdat->dstr_924__SCAN_STEP_FLAG.val[14] = (char) 0; cdat->dstr_924__SCAN_STEP_FLAG.slen = 14; MELT_LOCATION ("warmelt-normatch.melt:2935:/ iniobj"); /*iniobj dobj_925*/ /*_.VALDATA___V1017*/ meltfptr[1016] = (melt_ptr_t) & cdat->dobj_925; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_925", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_925", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_925.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_925.obj_num = 0; cdat->dobj_925.obj_hash = 925266045; cdat->dobj_925.obj_len = 2; /*^iniobj */ /*iniobj dobj_926*/ /*_.VALDATA___V1018*/ meltfptr[1017] = (melt_ptr_t) & cdat->dobj_926; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_926", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_926", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_926.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_926.obj_num = 1; cdat->dobj_926.obj_hash = 58233028; cdat->dobj_926.obj_len = 2; /*^iniobj */ /*iniobj dobj_927*/ /*_.VALDATA___V1019*/ meltfptr[1018] = (melt_ptr_t) & cdat->dobj_927; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_927", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_927", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_927.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_927.obj_num = 2; cdat->dobj_927.obj_hash = 860078732; cdat->dobj_927.obj_len = 2; /*inimult dtup_928__SCAN_STEP_FLAG */ /*_.VALTUP___V1020*/ meltfptr[1019] = (melt_ptr_t) & cdat->dtup_928__SCAN_STEP_FLAG; cdat->dtup_928__SCAN_STEP_FLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_MULTIPLE)))); cdat->dtup_928__SCAN_STEP_FLAG.nbval = 3; /*^iniobj */ /*iniobj dobj_929__SCAN_STEP_FLAG*/ /*_.VALDATA___V1021*/ meltfptr[1020] = (melt_ptr_t) & cdat->dobj_929__SCAN_STEP_FLAG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_929__SCAN_STEP_FLAG", melt_magic_discr ((melt_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7])) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_929__SCAN_STEP_FLAG", ((meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_929__SCAN_STEP_FLAG.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]); cdat->dobj_929__SCAN_STEP_FLAG.obj_hash = 983300516; cdat->dobj_929__SCAN_STEP_FLAG.obj_len = 4; /*inistring dstr_930__SCAN_STEP_FLAG*/ /*_.VALSTR___V1022*/ meltfptr[1021] = (melt_ptr_t) & cdat->dstr_930__SCAN_STEP_FLAG; cdat->dstr_930__SCAN_STEP_FLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_930__SCAN_STEP_FLAG.val, "SCAN_STEP_FLAG", sizeof (cdat->dstr_930__SCAN_STEP_FLAG.val) - 1); cdat->dstr_930__SCAN_STEP_FLAG.val[14] = (char) 0; cdat->dstr_930__SCAN_STEP_FLAG.slen = 14; /*inirout drout_931__SCANSUBPAT_ANYRECV */ /*_.VALROUT___V1023*/ meltfptr[1022] = (melt_ptr_t) & cdat->drout_931__SCANSUBPAT_ANYRECV; cdat->drout_931__SCANSUBPAT_ANYRECV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_931__SCANSUBPAT_ANYRECV.routdescr, "SCANSUBPAT_ANYRECV @warmelt-normatch.melt:2940", MELT_ROUTDESCR_LEN - 1); cdat->drout_931__SCANSUBPAT_ANYRECV.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_931__SCANSUBPAT_ANYRECV, meltrout_55_warmelt_normatch_SCANSUBPAT_ANYRECV); /*iniclos dclo_932__SCANSUBPAT_ANYRECV */ /*_.VALCLO___V1024*/ meltfptr[1023] = (melt_ptr_t) & cdat->dclo_932__SCANSUBPAT_ANYRECV; cdat->dclo_932__SCANSUBPAT_ANYRECV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_932__SCANSUBPAT_ANYRECV.nbval = 0; /*inirout drout_933__SCANSTEPDATA_ANYRECV */ /*_.VALROUT___V1025*/ meltfptr[1024] = (melt_ptr_t) & cdat->drout_933__SCANSTEPDATA_ANYRECV; cdat->drout_933__SCANSTEPDATA_ANYRECV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_933__SCANSTEPDATA_ANYRECV.routdescr, "SCANSTEPDATA_ANYRECV @warmelt-normatch.melt:2948", MELT_ROUTDESCR_LEN - 1); cdat->drout_933__SCANSTEPDATA_ANYRECV.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_933__SCANSTEPDATA_ANYRECV, meltrout_56_warmelt_normatch_SCANSTEPDATA_ANYRECV); /*iniclos dclo_934__SCANSTEPDATA_ANYRECV */ /*_.VALCLO___V1026*/ meltfptr[1025] = (melt_ptr_t) & cdat->dclo_934__SCANSTEPDATA_ANYRECV; cdat->dclo_934__SCANSTEPDATA_ANYRECV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_934__SCANSTEPDATA_ANYRECV.nbval = 0; /*inirout drout_935__SCANSTEPFLAG_ANYRECV */ /*_.VALROUT___V1027*/ meltfptr[1026] = (melt_ptr_t) & cdat->drout_935__SCANSTEPFLAG_ANYRECV; cdat->drout_935__SCANSTEPFLAG_ANYRECV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_935__SCANSTEPFLAG_ANYRECV.routdescr, "SCANSTEPFLAG_ANYRECV @warmelt-normatch.melt:2956", MELT_ROUTDESCR_LEN - 1); cdat->drout_935__SCANSTEPFLAG_ANYRECV.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_935__SCANSTEPFLAG_ANYRECV, meltrout_57_warmelt_normatch_SCANSTEPFLAG_ANYRECV); /*iniclos dclo_936__SCANSTEPFLAG_ANYRECV */ /*_.VALCLO___V1028*/ meltfptr[1027] = (melt_ptr_t) & cdat->dclo_936__SCANSTEPFLAG_ANYRECV; cdat->dclo_936__SCANSTEPFLAG_ANYRECV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_936__SCANSTEPFLAG_ANYRECV.nbval = 0; /*inirout drout_937__SCANSUBPAT_NOOP */ /*_.VALROUT___V1029*/ meltfptr[1028] = (melt_ptr_t) & cdat->drout_937__SCANSUBPAT_NOOP; cdat->drout_937__SCANSUBPAT_NOOP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_937__SCANSUBPAT_NOOP.routdescr, "SCANSUBPAT_NOOP @warmelt-normatch.melt:2964", MELT_ROUTDESCR_LEN - 1); cdat->drout_937__SCANSUBPAT_NOOP.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_937__SCANSUBPAT_NOOP, meltrout_58_warmelt_normatch_SCANSUBPAT_NOOP); /*iniclos dclo_938__SCANSUBPAT_NOOP */ /*_.VALCLO___V1030*/ meltfptr[1029] = (melt_ptr_t) & cdat->dclo_938__SCANSUBPAT_NOOP; cdat->dclo_938__SCANSUBPAT_NOOP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_938__SCANSUBPAT_NOOP.nbval = 0; /*inirout drout_939__SCANSUBPAT_OR */ /*_.VALROUT___V1031*/ meltfptr[1030] = (melt_ptr_t) & cdat->drout_939__SCANSUBPAT_OR; cdat->drout_939__SCANSUBPAT_OR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_939__SCANSUBPAT_OR.routdescr, "SCANSUBPAT_OR @warmelt-normatch.melt:2971", MELT_ROUTDESCR_LEN - 1); cdat->drout_939__SCANSUBPAT_OR.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_939__SCANSUBPAT_OR, meltrout_59_warmelt_normatch_SCANSUBPAT_OR); /*iniclos dclo_940__SCANSUBPAT_OR */ /*_.VALCLO___V1032*/ meltfptr[1031] = (melt_ptr_t) & cdat->dclo_940__SCANSUBPAT_OR; cdat->dclo_940__SCANSUBPAT_OR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_940__SCANSUBPAT_OR.nbval = 0; /*inirout drout_941__SCANSUBPAT_AND */ /*_.VALROUT___V1033*/ meltfptr[1032] = (melt_ptr_t) & cdat->drout_941__SCANSUBPAT_AND; cdat->drout_941__SCANSUBPAT_AND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_941__SCANSUBPAT_AND.routdescr, "SCANSUBPAT_AND @warmelt-normatch.melt:2980", MELT_ROUTDESCR_LEN - 1); cdat->drout_941__SCANSUBPAT_AND.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_941__SCANSUBPAT_AND, meltrout_60_warmelt_normatch_SCANSUBPAT_AND); /*iniclos dclo_942__SCANSUBPAT_AND */ /*_.VALCLO___V1034*/ meltfptr[1033] = (melt_ptr_t) & cdat->dclo_942__SCANSUBPAT_AND; cdat->dclo_942__SCANSUBPAT_AND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_942__SCANSUBPAT_AND.nbval = 0; /*inirout drout_943__SCANSUBPAT_CONSTRUCT */ /*_.VALROUT___V1035*/ meltfptr[1034] = (melt_ptr_t) & cdat->drout_943__SCANSUBPAT_CONSTRUCT; cdat->drout_943__SCANSUBPAT_CONSTRUCT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_943__SCANSUBPAT_CONSTRUCT.routdescr, "SCANSUBPAT_CONSTRUCT @warmelt-normatch.melt:2991", MELT_ROUTDESCR_LEN - 1); cdat->drout_943__SCANSUBPAT_CONSTRUCT.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_943__SCANSUBPAT_CONSTRUCT, meltrout_61_warmelt_normatch_SCANSUBPAT_CONSTRUCT); /*iniclos dclo_944__SCANSUBPAT_CONSTRUCT */ /*_.VALCLO___V1036*/ meltfptr[1035] = (melt_ptr_t) & cdat->dclo_944__SCANSUBPAT_CONSTRUCT; cdat->dclo_944__SCANSUBPAT_CONSTRUCT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_944__SCANSUBPAT_CONSTRUCT.nbval = 0; /*inirout drout_945__SCANSUBPAT_OBJECT */ /*_.VALROUT___V1037*/ meltfptr[1036] = (melt_ptr_t) & cdat->drout_945__SCANSUBPAT_OBJECT; cdat->drout_945__SCANSUBPAT_OBJECT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_945__SCANSUBPAT_OBJECT.routdescr, "SCANSUBPAT_OBJECT @warmelt-normatch.melt:3006", MELT_ROUTDESCR_LEN - 1); cdat->drout_945__SCANSUBPAT_OBJECT.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_945__SCANSUBPAT_OBJECT, meltrout_62_warmelt_normatch_SCANSUBPAT_OBJECT); /*iniclos dclo_946__SCANSUBPAT_OBJECT */ /*_.VALCLO___V1038*/ meltfptr[1037] = (melt_ptr_t) & cdat->dclo_946__SCANSUBPAT_OBJECT; cdat->dclo_946__SCANSUBPAT_OBJECT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_946__SCANSUBPAT_OBJECT.nbval = 0; /*inirout drout_947__FILL_MATCHCASE */ /*_.VALROUT___V1039*/ meltfptr[1038] = (melt_ptr_t) & cdat->drout_947__FILL_MATCHCASE; cdat->drout_947__FILL_MATCHCASE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_947__FILL_MATCHCASE.routdescr, "FILL_MATCHCASE @warmelt-normatch.melt:3017", MELT_ROUTDESCR_LEN - 1); cdat->drout_947__FILL_MATCHCASE.nbval = 8; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_947__FILL_MATCHCASE, meltrout_63_warmelt_normatch_FILL_MATCHCASE); /*iniclos dclo_948__FILL_MATCHCASE */ /*_.VALCLO___V1041*/ meltfptr[1040] = (melt_ptr_t) & cdat->dclo_948__FILL_MATCHCASE; cdat->dclo_948__FILL_MATCHCASE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_948__FILL_MATCHCASE.nbval = 0; /*inirout drout_949__LAMBDA_ */ /*_.VALROUT___V1040*/ meltfptr[1039] = (melt_ptr_t) & cdat->drout_949__LAMBDA_; cdat->drout_949__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_949__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normatch.melt:3028", MELT_ROUTDESCR_LEN - 1); cdat->drout_949__LAMBDA_.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_949__LAMBDA_, meltrout_64_warmelt_normatch_LAMBDA___19__); /*iniobj dsym_950__PUT_THEN_MATCH*/ /*uniqueobj*/ if (! /*_.VALDATA___V1042*/ meltfptr[1041]) /*_.VALDATA___V1042*/ meltfptr[1041] = (melt_ptr_t) & cdat->dsym_950__PUT_THEN_MATCH; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_950__PUT_THEN_MATCH", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_950__PUT_THEN_MATCH", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_950__PUT_THEN_MATCH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_950__PUT_THEN_MATCH.obj_hash = 135654960; cdat->dsym_950__PUT_THEN_MATCH.obj_len = 3; /*inistring dstr_951__PUT_THEN_MATCH*/ /*_.VALSTR___V1043*/ meltfptr[1042] = (melt_ptr_t) & cdat->dstr_951__PUT_THEN_MATCH; cdat->dstr_951__PUT_THEN_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_951__PUT_THEN_MATCH.val, "PUT_THEN_MATCH", sizeof (cdat->dstr_951__PUT_THEN_MATCH.val) - 1); cdat->dstr_951__PUT_THEN_MATCH.val[14] = (char) 0; cdat->dstr_951__PUT_THEN_MATCH.slen = 14; MELT_LOCATION ("warmelt-normatch.melt:3067:/ iniobj"); /*iniobj dobj_952*/ /*_.VALDATA___V1044*/ meltfptr[1043] = (melt_ptr_t) & cdat->dobj_952; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_952", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_952", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_952.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_952.obj_num = 0; cdat->dobj_952.obj_hash = 13897587; cdat->dobj_952.obj_len = 2; /*iniobj dsym_953__THENSTEP*/ /*uniqueobj*/ if (! /*_.VALDATA___V1045*/ meltfptr[1044]) /*_.VALDATA___V1045*/ meltfptr[1044] = (melt_ptr_t) & cdat->dsym_953__THENSTEP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_953__THENSTEP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_953__THENSTEP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_953__THENSTEP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_953__THENSTEP.obj_hash = 296323356; cdat->dsym_953__THENSTEP.obj_len = 3; /*inistring dstr_954__THENSTEP*/ /*_.VALSTR___V1046*/ meltfptr[1045] = (melt_ptr_t) & cdat->dstr_954__THENSTEP; cdat->dstr_954__THENSTEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_954__THENSTEP.val, "THENSTEP", sizeof (cdat->dstr_954__THENSTEP.val) - 1); cdat->dstr_954__THENSTEP.val[8] = (char) 0; cdat->dstr_954__THENSTEP.slen = 8; /*^iniobj */ /*iniobj dobj_955*/ /*_.VALDATA___V1047*/ meltfptr[1046] = (melt_ptr_t) & cdat->dobj_955; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_955", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_955", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_955.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_955.obj_num = 1; cdat->dobj_955.obj_hash = 66563238; cdat->dobj_955.obj_len = 2; /*inimult dtup_956__PUT_THEN_MATCH */ /*_.VALTUP___V1048*/ meltfptr[1047] = (melt_ptr_t) & cdat->dtup_956__PUT_THEN_MATCH; cdat->dtup_956__PUT_THEN_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_MULTIPLE)))); cdat->dtup_956__PUT_THEN_MATCH.nbval = 2; /*^iniobj */ /*iniobj dobj_957__PUT_THEN_MATCH*/ /*_.VALDATA___V1049*/ meltfptr[1048] = (melt_ptr_t) & cdat->dobj_957__PUT_THEN_MATCH; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_957__PUT_THEN_MATCH", melt_magic_discr ((melt_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7])) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_957__PUT_THEN_MATCH", ((meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_957__PUT_THEN_MATCH.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]); cdat->dobj_957__PUT_THEN_MATCH.obj_hash = 486097598; cdat->dobj_957__PUT_THEN_MATCH.obj_len = 4; /*inistring dstr_958__PUT_THEN_MATCH*/ /*_.VALSTR___V1050*/ meltfptr[1049] = (melt_ptr_t) & cdat->dstr_958__PUT_THEN_MATCH; cdat->dstr_958__PUT_THEN_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_958__PUT_THEN_MATCH.val, "PUT_THEN_MATCH", sizeof (cdat->dstr_958__PUT_THEN_MATCH.val) - 1); cdat->dstr_958__PUT_THEN_MATCH.val[14] = (char) 0; cdat->dstr_958__PUT_THEN_MATCH.slen = 14; /*inirout drout_959__PUTTHEN_MATCHANY */ /*_.VALROUT___V1051*/ meltfptr[1050] = (melt_ptr_t) & cdat->drout_959__PUTTHEN_MATCHANY; cdat->drout_959__PUTTHEN_MATCHANY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_959__PUTTHEN_MATCHANY.routdescr, "PUTTHEN_MATCHANY @warmelt-normatch.melt:3072", MELT_ROUTDESCR_LEN - 1); cdat->drout_959__PUTTHEN_MATCHANY.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_959__PUTTHEN_MATCHANY, meltrout_65_warmelt_normatch_PUTTHEN_MATCHANY); /*iniclos dclo_960__PUTTHEN_MATCHANY */ /*_.VALCLO___V1052*/ meltfptr[1051] = (melt_ptr_t) & cdat->dclo_960__PUTTHEN_MATCHANY; cdat->dclo_960__PUTTHEN_MATCHANY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_960__PUTTHEN_MATCHANY.nbval = 0; /*inirout drout_961__START_STEP */ /*_.VALROUT___V1053*/ meltfptr[1052] = (melt_ptr_t) & cdat->drout_961__START_STEP; cdat->drout_961__START_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_961__START_STEP.routdescr, "START_STEP @warmelt-normatch.melt:3081", MELT_ROUTDESCR_LEN - 1); cdat->drout_961__START_STEP.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_961__START_STEP, meltrout_66_warmelt_normatch_START_STEP); /*iniclos dclo_962__START_STEP */ /*_.VALCLO___V1054*/ meltfptr[1053] = (melt_ptr_t) & cdat->dclo_962__START_STEP; cdat->dclo_962__START_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_962__START_STEP.nbval = 0; /*inirout drout_963__PUTTHEN_MATCHTHEN */ /*_.VALROUT___V1055*/ meltfptr[1054] = (melt_ptr_t) & cdat->drout_963__PUTTHEN_MATCHTHEN; cdat->drout_963__PUTTHEN_MATCHTHEN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_963__PUTTHEN_MATCHTHEN.routdescr, "PUTTHEN_MATCHTHEN @warmelt-normatch.melt:3100", MELT_ROUTDESCR_LEN - 1); cdat->drout_963__PUTTHEN_MATCHTHEN.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_963__PUTTHEN_MATCHTHEN, meltrout_67_warmelt_normatch_PUTTHEN_MATCHTHEN); /*iniclos dclo_964__PUTTHEN_MATCHTHEN */ /*_.VALCLO___V1056*/ meltfptr[1055] = (melt_ptr_t) & cdat->dclo_964__PUTTHEN_MATCHTHEN; cdat->dclo_964__PUTTHEN_MATCHTHEN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_964__PUTTHEN_MATCHTHEN.nbval = 0; /*inirout drout_965__PUTTHEN_MATCHGROUP */ /*_.VALROUT___V1057*/ meltfptr[1056] = (melt_ptr_t) & cdat->drout_965__PUTTHEN_MATCHGROUP; cdat->drout_965__PUTTHEN_MATCHGROUP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_965__PUTTHEN_MATCHGROUP.routdescr, "PUTTHEN_MATCHGROUP @warmelt-normatch.melt:3139", MELT_ROUTDESCR_LEN - 1); cdat->drout_965__PUTTHEN_MATCHGROUP.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_965__PUTTHEN_MATCHGROUP, meltrout_68_warmelt_normatch_PUTTHEN_MATCHGROUP); /*iniclos dclo_966__PUTTHEN_MATCHGROUP */ /*_.VALCLO___V1058*/ meltfptr[1057] = (melt_ptr_t) & cdat->dclo_966__PUTTHEN_MATCHGROUP; cdat->dclo_966__PUTTHEN_MATCHGROUP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_966__PUTTHEN_MATCHGROUP.nbval = 0; /*iniobj dsym_967__PUT_ELSE_MATCH*/ /*uniqueobj*/ if (! /*_.VALDATA___V1059*/ meltfptr[1058]) /*_.VALDATA___V1059*/ meltfptr[1058] = (melt_ptr_t) & cdat->dsym_967__PUT_ELSE_MATCH; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_967__PUT_ELSE_MATCH", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_967__PUT_ELSE_MATCH", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_967__PUT_ELSE_MATCH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_967__PUT_ELSE_MATCH.obj_hash = 868738368; cdat->dsym_967__PUT_ELSE_MATCH.obj_len = 3; /*inistring dstr_968__PUT_ELSE_MATCH*/ /*_.VALSTR___V1060*/ meltfptr[1059] = (melt_ptr_t) & cdat->dstr_968__PUT_ELSE_MATCH; cdat->dstr_968__PUT_ELSE_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_968__PUT_ELSE_MATCH.val, "PUT_ELSE_MATCH", sizeof (cdat->dstr_968__PUT_ELSE_MATCH.val) - 1); cdat->dstr_968__PUT_ELSE_MATCH.val[14] = (char) 0; cdat->dstr_968__PUT_ELSE_MATCH.slen = 14; MELT_LOCATION ("warmelt-normatch.melt:3169:/ iniobj"); /*iniobj dobj_969*/ /*_.VALDATA___V1061*/ meltfptr[1060] = (melt_ptr_t) & cdat->dobj_969; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_969", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_969", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_969.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_969.obj_num = 0; cdat->dobj_969.obj_hash = 138431333; cdat->dobj_969.obj_len = 2; /*iniobj dsym_970__ELSESTEP*/ /*uniqueobj*/ if (! /*_.VALDATA___V1062*/ meltfptr[1061]) /*_.VALDATA___V1062*/ meltfptr[1061] = (melt_ptr_t) & cdat->dsym_970__ELSESTEP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_970__ELSESTEP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_970__ELSESTEP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_970__ELSESTEP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_970__ELSESTEP.obj_hash = 680058237; cdat->dsym_970__ELSESTEP.obj_len = 3; /*inistring dstr_971__ELSESTEP*/ /*_.VALSTR___V1063*/ meltfptr[1062] = (melt_ptr_t) & cdat->dstr_971__ELSESTEP; cdat->dstr_971__ELSESTEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_971__ELSESTEP.val, "ELSESTEP", sizeof (cdat->dstr_971__ELSESTEP.val) - 1); cdat->dstr_971__ELSESTEP.val[8] = (char) 0; cdat->dstr_971__ELSESTEP.slen = 8; /*^iniobj */ /*iniobj dobj_972*/ /*_.VALDATA___V1064*/ meltfptr[1063] = (melt_ptr_t) & cdat->dobj_972; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_972", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_972", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_972.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_972.obj_num = 1; cdat->dobj_972.obj_hash = 88948362; cdat->dobj_972.obj_len = 2; /*inimult dtup_973__PUT_ELSE_MATCH */ /*_.VALTUP___V1065*/ meltfptr[1064] = (melt_ptr_t) & cdat->dtup_973__PUT_ELSE_MATCH; cdat->dtup_973__PUT_ELSE_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_MULTIPLE)))); cdat->dtup_973__PUT_ELSE_MATCH.nbval = 2; /*^iniobj */ /*iniobj dobj_974__PUT_ELSE_MATCH*/ /*_.VALDATA___V1066*/ meltfptr[1065] = (melt_ptr_t) & cdat->dobj_974__PUT_ELSE_MATCH; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_974__PUT_ELSE_MATCH", melt_magic_discr ((melt_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7])) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_974__PUT_ELSE_MATCH", ((meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_974__PUT_ELSE_MATCH.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]); cdat->dobj_974__PUT_ELSE_MATCH.obj_hash = 824759647; cdat->dobj_974__PUT_ELSE_MATCH.obj_len = 4; /*inistring dstr_975__PUT_ELSE_MATCH*/ /*_.VALSTR___V1067*/ meltfptr[1066] = (melt_ptr_t) & cdat->dstr_975__PUT_ELSE_MATCH; cdat->dstr_975__PUT_ELSE_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_975__PUT_ELSE_MATCH.val, "PUT_ELSE_MATCH", sizeof (cdat->dstr_975__PUT_ELSE_MATCH.val) - 1); cdat->dstr_975__PUT_ELSE_MATCH.val[14] = (char) 0; cdat->dstr_975__PUT_ELSE_MATCH.slen = 14; /*inirout drout_976__PUTELSE_MATCHANY */ /*_.VALROUT___V1068*/ meltfptr[1067] = (melt_ptr_t) & cdat->drout_976__PUTELSE_MATCHANY; cdat->drout_976__PUTELSE_MATCHANY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_976__PUTELSE_MATCHANY.routdescr, "PUTELSE_MATCHANY @warmelt-normatch.melt:3174", MELT_ROUTDESCR_LEN - 1); cdat->drout_976__PUTELSE_MATCHANY.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_976__PUTELSE_MATCHANY, meltrout_69_warmelt_normatch_PUTELSE_MATCHANY); /*iniclos dclo_977__PUTELSE_MATCHANY */ /*_.VALCLO___V1069*/ meltfptr[1068] = (melt_ptr_t) & cdat->dclo_977__PUTELSE_MATCHANY; cdat->dclo_977__PUTELSE_MATCHANY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_977__PUTELSE_MATCHANY.nbval = 0; /*inirout drout_978__PUTELSE_MATCHSTEPTHEN */ /*_.VALROUT___V1070*/ meltfptr[1069] = (melt_ptr_t) & cdat->drout_978__PUTELSE_MATCHSTEPTHEN; cdat->drout_978__PUTELSE_MATCHSTEPTHEN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_978__PUTELSE_MATCHSTEPTHEN.routdescr, "PUTELSE_MATCHSTEPTHEN @warmelt-normatch.melt:3184", MELT_ROUTDESCR_LEN - 1); cdat->drout_978__PUTELSE_MATCHSTEPTHEN.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_978__PUTELSE_MATCHSTEPTHEN, meltrout_70_warmelt_normatch_PUTELSE_MATCHSTEPTHEN); /*iniclos dclo_979__PUTELSE_MATCHSTEPTHEN */ /*_.VALCLO___V1071*/ meltfptr[1070] = (melt_ptr_t) & cdat->dclo_979__PUTELSE_MATCHSTEPTHEN; cdat->dclo_979__PUTELSE_MATCHSTEPTHEN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_979__PUTELSE_MATCHSTEPTHEN.nbval = 0; /*inirout drout_980__PUTELSE_MATCHTEST */ /*_.VALROUT___V1072*/ meltfptr[1071] = (melt_ptr_t) & cdat->drout_980__PUTELSE_MATCHTEST; cdat->drout_980__PUTELSE_MATCHTEST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_980__PUTELSE_MATCHTEST.routdescr, "PUTELSE_MATCHTEST @warmelt-normatch.melt:3219", MELT_ROUTDESCR_LEN - 1); cdat->drout_980__PUTELSE_MATCHTEST.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_980__PUTELSE_MATCHTEST, meltrout_71_warmelt_normatch_PUTELSE_MATCHTEST); /*iniclos dclo_981__PUTELSE_MATCHTEST */ /*_.VALCLO___V1073*/ meltfptr[1072] = (melt_ptr_t) & cdat->dclo_981__PUTELSE_MATCHTEST; cdat->dclo_981__PUTELSE_MATCHTEST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_981__PUTELSE_MATCHTEST.nbval = 0; /*inirout drout_982__PUTELSE_MATCHGROUP */ /*_.VALROUT___V1074*/ meltfptr[1073] = (melt_ptr_t) & cdat->drout_982__PUTELSE_MATCHGROUP; cdat->drout_982__PUTELSE_MATCHGROUP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_982__PUTELSE_MATCHGROUP.routdescr, "PUTELSE_MATCHGROUP @warmelt-normatch.melt:3273", MELT_ROUTDESCR_LEN - 1); cdat->drout_982__PUTELSE_MATCHGROUP.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_982__PUTELSE_MATCHGROUP, meltrout_72_warmelt_normatch_PUTELSE_MATCHGROUP); /*iniclos dclo_983__PUTELSE_MATCHGROUP */ /*_.VALCLO___V1075*/ meltfptr[1074] = (melt_ptr_t) & cdat->dclo_983__PUTELSE_MATCHGROUP; cdat->dclo_983__PUTELSE_MATCHGROUP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_983__PUTELSE_MATCHGROUP.nbval = 0; /*inirout drout_984__SCANSTEPDATA_TESTINS */ /*_.VALROUT___V1076*/ meltfptr[1075] = (melt_ptr_t) & cdat->drout_984__SCANSTEPDATA_TESTINS; cdat->drout_984__SCANSTEPDATA_TESTINS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_984__SCANSTEPDATA_TESTINS.routdescr, "SCANSTEPDATA_TESTINS @warmelt-normatch.melt:3316", MELT_ROUTDESCR_LEN - 1); cdat->drout_984__SCANSTEPDATA_TESTINS.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_984__SCANSTEPDATA_TESTINS, meltrout_73_warmelt_normatch_SCANSTEPDATA_TESTINS); /*iniclos dclo_985__SCANSTEPDATA_TESTINS */ /*_.VALCLO___V1077*/ meltfptr[1076] = (melt_ptr_t) & cdat->dclo_985__SCANSTEPDATA_TESTINS; cdat->dclo_985__SCANSTEPDATA_TESTINS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_985__SCANSTEPDATA_TESTINS.nbval = 0; /*inirout drout_986__SCANSTEPDATA_TESTTUPLE */ /*_.VALROUT___V1078*/ meltfptr[1077] = (melt_ptr_t) & cdat->drout_986__SCANSTEPDATA_TESTTUPLE; cdat->drout_986__SCANSTEPDATA_TESTTUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_986__SCANSTEPDATA_TESTTUPLE.routdescr, "SCANSTEPDATA_TESTTUPLE @warmelt-normatch.melt:3328", MELT_ROUTDESCR_LEN - 1); cdat->drout_986__SCANSTEPDATA_TESTTUPLE.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_986__SCANSTEPDATA_TESTTUPLE, meltrout_74_warmelt_normatch_SCANSTEPDATA_TESTTUPLE); /*iniclos dclo_987__SCANSTEPDATA_TESTTUPLE */ /*_.VALCLO___V1079*/ meltfptr[1078] = (melt_ptr_t) & cdat->dclo_987__SCANSTEPDATA_TESTTUPLE; cdat->dclo_987__SCANSTEPDATA_TESTTUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_987__SCANSTEPDATA_TESTTUPLE.nbval = 0; /*inirout drout_988__SCANSTEPDATA_TESTWITHFLAG */ /*_.VALROUT___V1080*/ meltfptr[1079] = (melt_ptr_t) & cdat->drout_988__SCANSTEPDATA_TESTWITHFLAG; cdat->drout_988__SCANSTEPDATA_TESTWITHFLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_988__SCANSTEPDATA_TESTWITHFLAG.routdescr, "SCANSTEPDATA_TESTWITHFLAG @warmelt-normatch.melt:3345", MELT_ROUTDESCR_LEN - 1); cdat->drout_988__SCANSTEPDATA_TESTWITHFLAG.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_988__SCANSTEPDATA_TESTWITHFLAG, meltrout_75_warmelt_normatch_SCANSTEPDATA_TESTWITHFLAG); /*iniclos dclo_989__SCANSTEPDATA_TESTWITHFLAG */ /*_.VALCLO___V1081*/ meltfptr[1080] = (melt_ptr_t) & cdat->dclo_989__SCANSTEPDATA_TESTWITHFLAG; cdat->dclo_989__SCANSTEPDATA_TESTWITHFLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_989__SCANSTEPDATA_TESTWITHFLAG.nbval = 0; /*inirout drout_990__SCANSTEPDATA_TESTMATCHER */ /*_.VALROUT___V1082*/ meltfptr[1081] = (melt_ptr_t) & cdat->drout_990__SCANSTEPDATA_TESTMATCHER; cdat->drout_990__SCANSTEPDATA_TESTMATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_990__SCANSTEPDATA_TESTMATCHER.routdescr, "SCANSTEPDATA_TESTMATCHER @warmelt-normatch.melt:3351", MELT_ROUTDESCR_LEN - 1); cdat->drout_990__SCANSTEPDATA_TESTMATCHER.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_990__SCANSTEPDATA_TESTMATCHER, meltrout_76_warmelt_normatch_SCANSTEPDATA_TESTMATCHER); /*iniclos dclo_991__SCANSTEPDATA_TESTMATCHER */ /*_.VALCLO___V1083*/ meltfptr[1082] = (melt_ptr_t) & cdat->dclo_991__SCANSTEPDATA_TESTMATCHER; cdat->dclo_991__SCANSTEPDATA_TESTMATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_991__SCANSTEPDATA_TESTMATCHER.nbval = 0; /*inirout drout_992__SCANSTEPFLAG_STEPWITHFLAG */ /*_.VALROUT___V1084*/ meltfptr[1083] = (melt_ptr_t) & cdat->drout_992__SCANSTEPFLAG_STEPWITHFLAG; cdat->drout_992__SCANSTEPFLAG_STEPWITHFLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_992__SCANSTEPFLAG_STEPWITHFLAG.routdescr, "SCANSTEPFLAG_STEPWITHFLAG @warmelt-normatch.melt:3362", MELT_ROUTDESCR_LEN - 1); cdat->drout_992__SCANSTEPFLAG_STEPWITHFLAG.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_992__SCANSTEPFLAG_STEPWITHFLAG, meltrout_77_warmelt_normatch_SCANSTEPFLAG_STEPWITHFLAG); /*iniclos dclo_993__SCANSTEPFLAG_STEPWITHFLAG */ /*_.VALCLO___V1085*/ meltfptr[1084] = (melt_ptr_t) & cdat->dclo_993__SCANSTEPFLAG_STEPWITHFLAG; cdat->dclo_993__SCANSTEPFLAG_STEPWITHFLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_993__SCANSTEPFLAG_STEPWITHFLAG.nbval = 0; /*inirout drout_994__SCANSTEPFLAG_STEPFLAGOPER */ /*_.VALROUT___V1086*/ meltfptr[1085] = (melt_ptr_t) & cdat->drout_994__SCANSTEPFLAG_STEPFLAGOPER; cdat->drout_994__SCANSTEPFLAG_STEPFLAGOPER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_994__SCANSTEPFLAG_STEPFLAGOPER.routdescr, "SCANSTEPFLAG_STEPFLAGOPER @warmelt-normatch.melt:3371", MELT_ROUTDESCR_LEN - 1); cdat->drout_994__SCANSTEPFLAG_STEPFLAGOPER.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_994__SCANSTEPFLAG_STEPFLAGOPER, meltrout_78_warmelt_normatch_SCANSTEPFLAG_STEPFLAGOPER); /*iniclos dclo_995__SCANSTEPFLAG_STEPFLAGOPER */ /*_.VALCLO___V1087*/ meltfptr[1086] = (melt_ptr_t) & cdat->dclo_995__SCANSTEPFLAG_STEPFLAGOPER; cdat->dclo_995__SCANSTEPFLAG_STEPFLAGOPER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_995__SCANSTEPFLAG_STEPFLAGOPER.nbval = 0; /*inirout drout_996__SCANSTEPFLAG_STEPWITHDATA */ /*_.VALROUT___V1088*/ meltfptr[1087] = (melt_ptr_t) & cdat->drout_996__SCANSTEPFLAG_STEPWITHDATA; cdat->drout_996__SCANSTEPFLAG_STEPWITHDATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_996__SCANSTEPFLAG_STEPWITHDATA.routdescr, "SCANSTEPFLAG_STEPWITHDATA @warmelt-normatch.melt:3389", MELT_ROUTDESCR_LEN - 1); cdat->drout_996__SCANSTEPFLAG_STEPWITHDATA.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_996__SCANSTEPFLAG_STEPWITHDATA, meltrout_79_warmelt_normatch_SCANSTEPFLAG_STEPWITHDATA); /*iniclos dclo_997__SCANSTEPFLAG_STEPWITHDATA */ /*_.VALCLO___V1089*/ meltfptr[1088] = (melt_ptr_t) & cdat->dclo_997__SCANSTEPFLAG_STEPWITHDATA; cdat->dclo_997__SCANSTEPFLAG_STEPWITHDATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_997__SCANSTEPFLAG_STEPWITHDATA.nbval = 0; /*iniobj dsym_998__TRANSLATE_PATTERN*/ /*uniqueobj*/ if (! /*_.VALDATA___V1090*/ meltfptr[1089]) /*_.VALDATA___V1090*/ meltfptr[1089] = (melt_ptr_t) & cdat->dsym_998__TRANSLATE_PATTERN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_998__TRANSLATE_PATTERN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_998__TRANSLATE_PATTERN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_998__TRANSLATE_PATTERN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_998__TRANSLATE_PATTERN.obj_hash = 698900025; cdat->dsym_998__TRANSLATE_PATTERN.obj_len = 3; /*inistring dstr_999__TRANSLATE_PATTER*/ /*_.VALSTR___V1091*/ meltfptr[1090] = (melt_ptr_t) & cdat->dstr_999__TRANSLATE_PATTER; cdat->dstr_999__TRANSLATE_PATTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_999__TRANSLATE_PATTER.val, "TRANSLATE_PATTERN", sizeof (cdat->dstr_999__TRANSLATE_PATTER. val) - 1); cdat->dstr_999__TRANSLATE_PATTER.val[17] = (char) 0; cdat->dstr_999__TRANSLATE_PATTER.slen = 17; MELT_LOCATION ("warmelt-normatch.melt:3398:/ iniobj"); /*iniobj dobj_1000*/ /*_.VALDATA___V1092*/ meltfptr[1091] = (melt_ptr_t) & cdat->dobj_1000; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1000", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1000", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1000.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1000.obj_num = 0; cdat->dobj_1000.obj_hash = 621295607; cdat->dobj_1000.obj_len = 2; /*iniobj dsym_1001__MDATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V1093*/ meltfptr[1092]) /*_.VALDATA___V1093*/ meltfptr[1092] = (melt_ptr_t) & cdat->dsym_1001__MDATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1001__MDATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1001__MDATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1001__MDATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1001__MDATA.obj_hash = 823479688; cdat->dsym_1001__MDATA.obj_len = 3; /*inistring dstr_1002__MDATA*/ /*_.VALSTR___V1094*/ meltfptr[1093] = (melt_ptr_t) & cdat->dstr_1002__MDATA; cdat->dstr_1002__MDATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1002__MDATA.val, "MDATA", sizeof (cdat->dstr_1002__MDATA.val) - 1); cdat->dstr_1002__MDATA.val[5] = (char) 0; cdat->dstr_1002__MDATA.slen = 5; /*^iniobj */ /*iniobj dobj_1003*/ /*_.VALDATA___V1095*/ meltfptr[1094] = (melt_ptr_t) & cdat->dobj_1003; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1003", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1003", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1003.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1003.obj_num = 1; cdat->dobj_1003.obj_hash = 656848995; cdat->dobj_1003.obj_len = 2; /*iniobj dsym_1004__MCASE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1096*/ meltfptr[1095]) /*_.VALDATA___V1096*/ meltfptr[1095] = (melt_ptr_t) & cdat->dsym_1004__MCASE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1004__MCASE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1004__MCASE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1004__MCASE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1004__MCASE.obj_hash = 178696645; cdat->dsym_1004__MCASE.obj_len = 3; /*inistring dstr_1005__MCASE*/ /*_.VALSTR___V1097*/ meltfptr[1096] = (melt_ptr_t) & cdat->dstr_1005__MCASE; cdat->dstr_1005__MCASE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1005__MCASE.val, "MCASE", sizeof (cdat->dstr_1005__MCASE.val) - 1); cdat->dstr_1005__MCASE.val[5] = (char) 0; cdat->dstr_1005__MCASE.slen = 5; /*^iniobj */ /*iniobj dobj_1006*/ /*_.VALDATA___V1098*/ meltfptr[1097] = (melt_ptr_t) & cdat->dobj_1006; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1006", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1006", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1006.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1006.obj_num = 2; cdat->dobj_1006.obj_hash = 638178011; cdat->dobj_1006.obj_len = 2; /*iniobj dsym_1007__VARMAP*/ /*uniqueobj*/ if (! /*_.VALDATA___V1099*/ meltfptr[1098]) /*_.VALDATA___V1099*/ meltfptr[1098] = (melt_ptr_t) & cdat->dsym_1007__VARMAP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1007__VARMAP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1007__VARMAP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1007__VARMAP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1007__VARMAP.obj_hash = 698215800; cdat->dsym_1007__VARMAP.obj_len = 3; /*inistring dstr_1008__VARMAP*/ /*_.VALSTR___V1100*/ meltfptr[1099] = (melt_ptr_t) & cdat->dstr_1008__VARMAP; cdat->dstr_1008__VARMAP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1008__VARMAP.val, "VARMAP", sizeof (cdat->dstr_1008__VARMAP.val) - 1); cdat->dstr_1008__VARMAP.val[6] = (char) 0; cdat->dstr_1008__VARMAP.slen = 6; /*^iniobj */ /*iniobj dobj_1009*/ /*_.VALDATA___V1101*/ meltfptr[1100] = (melt_ptr_t) & cdat->dobj_1009; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1009", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1009", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1009.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1009.obj_num = 3; cdat->dobj_1009.obj_hash = 641636046; cdat->dobj_1009.obj_len = 2; /*iniobj dsym_1010__SLOC*/ /*uniqueobj*/ if (! /*_.VALDATA___V1102*/ meltfptr[1101]) /*_.VALDATA___V1102*/ meltfptr[1101] = (melt_ptr_t) & cdat->dsym_1010__SLOC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1010__SLOC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1010__SLOC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1010__SLOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1010__SLOC.obj_hash = 214022047; cdat->dsym_1010__SLOC.obj_len = 3; /*inistring dstr_1011__SLOC*/ /*_.VALSTR___V1103*/ meltfptr[1102] = (melt_ptr_t) & cdat->dstr_1011__SLOC; cdat->dstr_1011__SLOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1011__SLOC.val, "SLOC", sizeof (cdat->dstr_1011__SLOC.val) - 1); cdat->dstr_1011__SLOC.val[4] = (char) 0; cdat->dstr_1011__SLOC.slen = 4; /*^iniobj */ /*iniobj dobj_1012*/ /*_.VALDATA___V1104*/ meltfptr[1103] = (melt_ptr_t) & cdat->dobj_1012; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1012", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1012", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1012.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1012.obj_num = 4; cdat->dobj_1012.obj_hash = 985979865; cdat->dobj_1012.obj_len = 2; /*inimult dtup_1013__TRANSLATE_PATTERN */ /*_.VALTUP___V1105*/ meltfptr[1104] = (melt_ptr_t) & cdat->dtup_1013__TRANSLATE_PATTERN; cdat->dtup_1013__TRANSLATE_PATTERN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_MULTIPLE)))); cdat->dtup_1013__TRANSLATE_PATTERN.nbval = 5; /*^iniobj */ /*iniobj dobj_1014__TRANSLATE_PATTERN*/ /*_.VALDATA___V1106*/ meltfptr[1105] = (melt_ptr_t) & cdat->dobj_1014__TRANSLATE_PATTERN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1014__TRANSLATE_PATTERN", melt_magic_discr ((melt_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7])) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1014__TRANSLATE_PATTERN", ((meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1014__TRANSLATE_PATTERN.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]); cdat->dobj_1014__TRANSLATE_PATTERN.obj_hash = 671000192; cdat->dobj_1014__TRANSLATE_PATTERN.obj_len = 4; /*inistring dstr_1015__TRANSLATE_PATTER*/ /*_.VALSTR___V1107*/ meltfptr[1106] = (melt_ptr_t) & cdat->dstr_1015__TRANSLATE_PATTER; cdat->dstr_1015__TRANSLATE_PATTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1015__TRANSLATE_PATTER.val, "TRANSLATE_PATTERN", sizeof (cdat->dstr_1015__TRANSLATE_PATTER. val) - 1); cdat->dstr_1015__TRANSLATE_PATTER.val[17] = (char) 0; cdat->dstr_1015__TRANSLATE_PATTER.slen = 17; /*inirout drout_1016__TRANSLPAT_ANYRECV */ /*_.VALROUT___V1108*/ meltfptr[1107] = (melt_ptr_t) & cdat->drout_1016__TRANSLPAT_ANYRECV; cdat->drout_1016__TRANSLPAT_ANYRECV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1016__TRANSLPAT_ANYRECV.routdescr, "TRANSLPAT_ANYRECV @warmelt-normatch.melt:3405", MELT_ROUTDESCR_LEN - 1); cdat->drout_1016__TRANSLPAT_ANYRECV.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1016__TRANSLPAT_ANYRECV, meltrout_80_warmelt_normatch_TRANSLPAT_ANYRECV); /*iniclos dclo_1017__TRANSLPAT_ANYRECV */ /*_.VALCLO___V1109*/ meltfptr[1108] = (melt_ptr_t) & cdat->dclo_1017__TRANSLPAT_ANYRECV; cdat->dclo_1017__TRANSLPAT_ANYRECV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1017__TRANSLPAT_ANYRECV.nbval = 0; /*inirout drout_1018__TRANSLPAT_JOKERPAT */ /*_.VALROUT___V1110*/ meltfptr[1109] = (melt_ptr_t) & cdat->drout_1018__TRANSLPAT_JOKERPAT; cdat->drout_1018__TRANSLPAT_JOKERPAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1018__TRANSLPAT_JOKERPAT.routdescr, "TRANSLPAT_JOKERPAT @warmelt-normatch.melt:3415", MELT_ROUTDESCR_LEN - 1); cdat->drout_1018__TRANSLPAT_JOKERPAT.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1018__TRANSLPAT_JOKERPAT, meltrout_81_warmelt_normatch_TRANSLPAT_JOKERPAT); /*iniclos dclo_1019__TRANSLPAT_JOKERPAT */ /*_.VALCLO___V1111*/ meltfptr[1110] = (melt_ptr_t) & cdat->dclo_1019__TRANSLPAT_JOKERPAT; cdat->dclo_1019__TRANSLPAT_JOKERPAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1019__TRANSLPAT_JOKERPAT.nbval = 0; /*inirout drout_1020__TRANSLPAT_CONSTPAT */ /*_.VALROUT___V1112*/ meltfptr[1111] = (melt_ptr_t) & cdat->drout_1020__TRANSLPAT_CONSTPAT; cdat->drout_1020__TRANSLPAT_CONSTPAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1020__TRANSLPAT_CONSTPAT.routdescr, "TRANSLPAT_CONSTPAT @warmelt-normatch.melt:3423", MELT_ROUTDESCR_LEN - 1); cdat->drout_1020__TRANSLPAT_CONSTPAT.nbval = 13; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1020__TRANSLPAT_CONSTPAT, meltrout_82_warmelt_normatch_TRANSLPAT_CONSTPAT); /*iniclos dclo_1021__TRANSLPAT_CONSTPAT */ /*_.VALCLO___V1114*/ meltfptr[1113] = (melt_ptr_t) & cdat->dclo_1021__TRANSLPAT_CONSTPAT; cdat->dclo_1021__TRANSLPAT_CONSTPAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1021__TRANSLPAT_CONSTPAT.nbval = 0; /*inistring dstr_1022__constant_pattern*/ /*_.VALSTR___V1113*/ meltfptr[1112] = (melt_ptr_t) & cdat->dstr_1022__constant_pattern; cdat->dstr_1022__constant_pattern.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1022__constant_pattern.val, "constant_pattern", sizeof (cdat->dstr_1022__constant_pattern. val) - 1); cdat->dstr_1022__constant_pattern.val[16] = (char) 0; cdat->dstr_1022__constant_pattern.slen = 16; /*inirout drout_1023__TRANSLPAT_LISTPAT */ /*_.VALROUT___V1115*/ meltfptr[1114] = (melt_ptr_t) & cdat->drout_1023__TRANSLPAT_LISTPAT; cdat->drout_1023__TRANSLPAT_LISTPAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1023__TRANSLPAT_LISTPAT.routdescr, "TRANSLPAT_LISTPAT @warmelt-normatch.melt:3477", MELT_ROUTDESCR_LEN - 1); cdat->drout_1023__TRANSLPAT_LISTPAT.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1023__TRANSLPAT_LISTPAT, meltrout_83_warmelt_normatch_TRANSLPAT_LISTPAT); /*iniclos dclo_1024__TRANSLPAT_LISTPAT */ /*_.VALCLO___V1116*/ meltfptr[1115] = (melt_ptr_t) & cdat->dclo_1024__TRANSLPAT_LISTPAT; cdat->dclo_1024__TRANSLPAT_LISTPAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1024__TRANSLPAT_LISTPAT.nbval = 0; /*iniobj dsym_1025__CLASS_SOURCE_PATTERN_LIST*/ /*uniqueobj*/ if (! /*_.VALDATA___V1117*/ meltfptr[1116]) /*_.VALDATA___V1117*/ meltfptr[1116] = (melt_ptr_t) & cdat->dsym_1025__CLASS_SOURCE_PATTERN_LIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1025__CLASS_SOURCE_PATTERN_LIST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1025__CLASS_SOURCE_PATTERN_LIST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1025__CLASS_SOURCE_PATTERN_LIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1025__CLASS_SOURCE_PATTERN_LIST.obj_hash = 725656977; cdat->dsym_1025__CLASS_SOURCE_PATTERN_LIST.obj_len = 3; /*inistring dstr_1026__CLASS_SOURCE_PAT*/ /*_.VALSTR___V1118*/ meltfptr[1117] = (melt_ptr_t) & cdat->dstr_1026__CLASS_SOURCE_PAT; cdat->dstr_1026__CLASS_SOURCE_PAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1026__CLASS_SOURCE_PAT.val, "CLASS_SOURCE_PATTERN_LIST", sizeof (cdat->dstr_1026__CLASS_SOURCE_PAT. val) - 1); cdat->dstr_1026__CLASS_SOURCE_PAT.val[25] = (char) 0; cdat->dstr_1026__CLASS_SOURCE_PAT.slen = 25; /*inirout drout_1027__TRANSLPAT_TUPLEPAT */ /*_.VALROUT___V1119*/ meltfptr[1118] = (melt_ptr_t) & cdat->drout_1027__TRANSLPAT_TUPLEPAT; cdat->drout_1027__TRANSLPAT_TUPLEPAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1027__TRANSLPAT_TUPLEPAT.routdescr, "TRANSLPAT_TUPLEPAT @warmelt-normatch.melt:3488", MELT_ROUTDESCR_LEN - 1); cdat->drout_1027__TRANSLPAT_TUPLEPAT.nbval = 28; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1027__TRANSLPAT_TUPLEPAT, meltrout_84_warmelt_normatch_TRANSLPAT_TUPLEPAT); /*iniclos dclo_1028__TRANSLPAT_TUPLEPAT */ /*_.VALCLO___V1127*/ meltfptr[1126] = (melt_ptr_t) & cdat->dclo_1028__TRANSLPAT_TUPLEPAT; cdat->dclo_1028__TRANSLPAT_TUPLEPAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1028__TRANSLPAT_TUPLEPAT.nbval = 0; /*inirout drout_1029__LAMBDA_ */ /*_.VALROUT___V1120*/ meltfptr[1119] = (melt_ptr_t) & cdat->drout_1029__LAMBDA_; cdat->drout_1029__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1029__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normatch.melt:3517", MELT_ROUTDESCR_LEN - 1); cdat->drout_1029__LAMBDA_.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1029__LAMBDA_, meltrout_85_warmelt_normatch_LAMBDA___20__); /*iniboxint dint_1030__ */ /*_.VALBXINT___V1121*/ meltfptr[1120] = (melt_ptr_t) & cdat->dint_1030__; cdat->dint_1030__.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CONSTANT_INTEGER)))); cdat->dint_1030__.val = 0; /*iniboxint dint_1031__ */ /*_.VALBXINT___V1122*/ meltfptr[1121] = (melt_ptr_t) & cdat->dint_1031__; cdat->dint_1031__.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CONSTANT_INTEGER)))); cdat->dint_1031__.val = 1; /*iniboxint dint_1032__ */ /*_.VALBXINT___V1123*/ meltfptr[1122] = (melt_ptr_t) & cdat->dint_1032__; cdat->dint_1032__.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CONSTANT_INTEGER)))); cdat->dint_1032__.val = -1; /*iniobj dsym_1033__PATUPLECOMP*/ /*uniqueobj*/ if (! /*_.VALDATA___V1124*/ meltfptr[1123]) /*_.VALDATA___V1124*/ meltfptr[1123] = (melt_ptr_t) & cdat->dsym_1033__PATUPLECOMP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1033__PATUPLECOMP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1033__PATUPLECOMP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1033__PATUPLECOMP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1033__PATUPLECOMP.obj_hash = 804526572; cdat->dsym_1033__PATUPLECOMP.obj_len = 3; /*inistring dstr_1034__PATUPLECOMP*/ /*_.VALSTR___V1125*/ meltfptr[1124] = (melt_ptr_t) & cdat->dstr_1034__PATUPLECOMP; cdat->dstr_1034__PATUPLECOMP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1034__PATUPLECOMP.val, "PATUPLECOMP", sizeof (cdat->dstr_1034__PATUPLECOMP.val) - 1); cdat->dstr_1034__PATUPLECOMP.val[11] = (char) 0; cdat->dstr_1034__PATUPLECOMP.slen = 11; /*inistring dstr_1035__tuple*/ /*_.VALSTR___V1126*/ meltfptr[1125] = (melt_ptr_t) & cdat->dstr_1035__tuple; cdat->dstr_1035__tuple.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1035__tuple.val, "tuple", sizeof (cdat->dstr_1035__tuple.val) - 1); cdat->dstr_1035__tuple.val[5] = (char) 0; cdat->dstr_1035__tuple.slen = 5; /*inirout drout_1036__TRANSLPAT_INSPAT */ /*_.VALROUT___V1128*/ meltfptr[1127] = (melt_ptr_t) & cdat->drout_1036__TRANSLPAT_INSPAT; cdat->drout_1036__TRANSLPAT_INSPAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1036__TRANSLPAT_INSPAT.routdescr, "TRANSLPAT_INSPAT @warmelt-normatch.melt:3657", MELT_ROUTDESCR_LEN - 1); cdat->drout_1036__TRANSLPAT_INSPAT.nbval = 24; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1036__TRANSLPAT_INSPAT, meltrout_86_warmelt_normatch_TRANSLPAT_INSPAT); /*iniclos dclo_1037__TRANSLPAT_INSPAT */ /*_.VALCLO___V1129*/ meltfptr[1128] = (melt_ptr_t) & cdat->dclo_1037__TRANSLPAT_INSPAT; cdat->dclo_1037__TRANSLPAT_INSPAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1037__TRANSLPAT_INSPAT.nbval = 0; /*inirout drout_1038__TRANSLPAT_VARPAT */ /*_.VALROUT___V1130*/ meltfptr[1129] = (melt_ptr_t) & cdat->drout_1038__TRANSLPAT_VARPAT; cdat->drout_1038__TRANSLPAT_VARPAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1038__TRANSLPAT_VARPAT.routdescr, "TRANSLPAT_VARPAT @warmelt-normatch.melt:3816", MELT_ROUTDESCR_LEN - 1); cdat->drout_1038__TRANSLPAT_VARPAT.nbval = 13; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1038__TRANSLPAT_VARPAT, meltrout_87_warmelt_normatch_TRANSLPAT_VARPAT); /*iniclos dclo_1039__TRANSLPAT_VARPAT */ /*_.VALCLO___V1131*/ meltfptr[1130] = (melt_ptr_t) & cdat->dclo_1039__TRANSLPAT_VARPAT; cdat->dclo_1039__TRANSLPAT_VARPAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1039__TRANSLPAT_VARPAT.nbval = 0; /*inirout drout_1040__TRANSLPAT_ANDPAT */ /*_.VALROUT___V1132*/ meltfptr[1131] = (melt_ptr_t) & cdat->drout_1040__TRANSLPAT_ANDPAT; cdat->drout_1040__TRANSLPAT_ANDPAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1040__TRANSLPAT_ANDPAT.routdescr, "TRANSLPAT_ANDPAT @warmelt-normatch.melt:3909", MELT_ROUTDESCR_LEN - 1); cdat->drout_1040__TRANSLPAT_ANDPAT.nbval = 15; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1040__TRANSLPAT_ANDPAT, meltrout_88_warmelt_normatch_TRANSLPAT_ANDPAT); /*iniclos dclo_1041__TRANSLPAT_ANDPAT */ /*_.VALCLO___V1134*/ meltfptr[1133] = (melt_ptr_t) & cdat->dclo_1041__TRANSLPAT_ANDPAT; cdat->dclo_1041__TRANSLPAT_ANDPAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1041__TRANSLPAT_ANDPAT.nbval = 0; /*inistring dstr_1042__and*/ /*_.VALSTR___V1133*/ meltfptr[1132] = (melt_ptr_t) & cdat->dstr_1042__and; cdat->dstr_1042__and.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1042__and.val, "and", sizeof (cdat->dstr_1042__and.val) - 1); cdat->dstr_1042__and.val[3] = (char) 0; cdat->dstr_1042__and.slen = 3; /*inirout drout_1043__TRANSLPAT_ORPAT */ /*_.VALROUT___V1135*/ meltfptr[1134] = (melt_ptr_t) & cdat->drout_1043__TRANSLPAT_ORPAT; cdat->drout_1043__TRANSLPAT_ORPAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1043__TRANSLPAT_ORPAT.routdescr, "TRANSLPAT_ORPAT @warmelt-normatch.melt:3993", MELT_ROUTDESCR_LEN - 1); cdat->drout_1043__TRANSLPAT_ORPAT.nbval = 26; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1043__TRANSLPAT_ORPAT, meltrout_89_warmelt_normatch_TRANSLPAT_ORPAT); /*iniclos dclo_1044__TRANSLPAT_ORPAT */ /*_.VALCLO___V1139*/ meltfptr[1138] = (melt_ptr_t) & cdat->dclo_1044__TRANSLPAT_ORPAT; cdat->dclo_1044__TRANSLPAT_ORPAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1044__TRANSLPAT_ORPAT.nbval = 0; /*inistring dstr_1045__or*/ /*_.VALSTR___V1136*/ meltfptr[1135] = (melt_ptr_t) & cdat->dstr_1045__or; cdat->dstr_1045__or.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1045__or.val, "or", sizeof (cdat->dstr_1045__or.val) - 1); cdat->dstr_1045__or.val[2] = (char) 0; cdat->dstr_1045__or.slen = 2; /*inirout drout_1046__LAMBDA_ */ /*_.VALROUT___V1137*/ meltfptr[1136] = (melt_ptr_t) & cdat->drout_1046__LAMBDA_; cdat->drout_1046__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1046__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normatch.melt:4032", MELT_ROUTDESCR_LEN - 1); cdat->drout_1046__LAMBDA_.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1046__LAMBDA_, meltrout_90_warmelt_normatch_LAMBDA___21__); /*inirout drout_1047__LAMBDA_ */ /*_.VALROUT___V1138*/ meltfptr[1137] = (melt_ptr_t) & cdat->drout_1047__LAMBDA_; cdat->drout_1047__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1047__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normatch.melt:4070", MELT_ROUTDESCR_LEN - 1); cdat->drout_1047__LAMBDA_.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1047__LAMBDA_, meltrout_91_warmelt_normatch_LAMBDA___22__); /*inirout drout_1048__TRANSLPAT_PATMAT */ /*_.VALROUT___V1140*/ meltfptr[1139] = (melt_ptr_t) & cdat->drout_1048__TRANSLPAT_PATMAT; cdat->drout_1048__TRANSLPAT_PATMAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1048__TRANSLPAT_PATMAT.routdescr, "TRANSLPAT_PATMAT @warmelt-normatch.melt:4117", MELT_ROUTDESCR_LEN - 1); cdat->drout_1048__TRANSLPAT_PATMAT.nbval = 29; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1048__TRANSLPAT_PATMAT, meltrout_92_warmelt_normatch_TRANSLPAT_PATMAT); /*iniclos dclo_1049__TRANSLPAT_PATMAT */ /*_.VALCLO___V1141*/ meltfptr[1140] = (melt_ptr_t) & cdat->dclo_1049__TRANSLPAT_PATMAT; cdat->dclo_1049__TRANSLPAT_PATMAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1049__TRANSLPAT_PATMAT.nbval = 0; /*iniobj dsym_1050__MATCHGRAPHIC_ALTSTEP*/ /*uniqueobj*/ if (! /*_.VALDATA___V1142*/ meltfptr[1141]) /*_.VALDATA___V1142*/ meltfptr[1141] = (melt_ptr_t) & cdat->dsym_1050__MATCHGRAPHIC_ALTSTEP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1050__MATCHGRAPHIC_ALTSTEP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1050__MATCHGRAPHIC_ALTSTEP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1050__MATCHGRAPHIC_ALTSTEP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1050__MATCHGRAPHIC_ALTSTEP.obj_hash = 562594089; cdat->dsym_1050__MATCHGRAPHIC_ALTSTEP.obj_len = 3; /*inistring dstr_1051__MATCHGRAPHIC_ALT*/ /*_.VALSTR___V1143*/ meltfptr[1142] = (melt_ptr_t) & cdat->dstr_1051__MATCHGRAPHIC_ALT; cdat->dstr_1051__MATCHGRAPHIC_ALT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1051__MATCHGRAPHIC_ALT.val, "MATCHGRAPHIC_ALTSTEP", sizeof (cdat->dstr_1051__MATCHGRAPHIC_ALT. val) - 1); cdat->dstr_1051__MATCHGRAPHIC_ALT.val[20] = (char) 0; cdat->dstr_1051__MATCHGRAPHIC_ALT.slen = 20; MELT_LOCATION ("warmelt-normatch.melt:4340:/ iniobj"); /*iniobj dobj_1052__MATCHGRAPHIC_ALTSTEP*/ /*_.VALDATA___V1144*/ meltfptr[1143] = (melt_ptr_t) & cdat->dobj_1052__MATCHGRAPHIC_ALTSTEP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1052__MATCHGRAPHIC_ALTSTEP", melt_magic_discr ((melt_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7])) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1052__MATCHGRAPHIC_ALTSTEP", ((meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1052__MATCHGRAPHIC_ALTSTEP.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]); cdat->dobj_1052__MATCHGRAPHIC_ALTSTEP.obj_hash = 1010799865; cdat->dobj_1052__MATCHGRAPHIC_ALTSTEP.obj_len = 4; /*inistring dstr_1053__MATCHGRAPHIC_ALT*/ /*_.VALSTR___V1145*/ meltfptr[1144] = (melt_ptr_t) & cdat->dstr_1053__MATCHGRAPHIC_ALT; cdat->dstr_1053__MATCHGRAPHIC_ALT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1053__MATCHGRAPHIC_ALT.val, "MATCHGRAPHIC_ALTSTEP", sizeof (cdat->dstr_1053__MATCHGRAPHIC_ALT. val) - 1); cdat->dstr_1053__MATCHGRAPHIC_ALT.val[20] = (char) 0; cdat->dstr_1053__MATCHGRAPHIC_ALT.slen = 20; /*inirout drout_1054__MGALTSTEP_ANY */ /*_.VALROUT___V1146*/ meltfptr[1145] = (melt_ptr_t) & cdat->drout_1054__MGALTSTEP_ANY; cdat->drout_1054__MGALTSTEP_ANY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1054__MGALTSTEP_ANY.routdescr, "MGALTSTEP_ANY @warmelt-normatch.melt:4344", MELT_ROUTDESCR_LEN - 1); cdat->drout_1054__MGALTSTEP_ANY.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1054__MGALTSTEP_ANY, meltrout_93_warmelt_normatch_MGALTSTEP_ANY); /*iniclos dclo_1055__MGALTSTEP_ANY */ /*_.VALCLO___V1147*/ meltfptr[1146] = (melt_ptr_t) & cdat->dclo_1055__MGALTSTEP_ANY; cdat->dclo_1055__MGALTSTEP_ANY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1055__MGALTSTEP_ANY.nbval = 0; /*inirout drout_1056__MGALTSTEP_STEPTESTVAR */ /*_.VALROUT___V1148*/ meltfptr[1147] = (melt_ptr_t) & cdat->drout_1056__MGALTSTEP_STEPTESTVAR; cdat->drout_1056__MGALTSTEP_STEPTESTVAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1056__MGALTSTEP_STEPTESTVAR.routdescr, "MGALTSTEP_STEPTESTVAR @warmelt-normatch.melt:4355", MELT_ROUTDESCR_LEN - 1); cdat->drout_1056__MGALTSTEP_STEPTESTVAR.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1056__MGALTSTEP_STEPTESTVAR, meltrout_94_warmelt_normatch_MGALTSTEP_STEPTESTVAR); /*iniclos dclo_1057__MGALTSTEP_STEPTESTVAR */ /*_.VALCLO___V1149*/ meltfptr[1148] = (melt_ptr_t) & cdat->dclo_1057__MGALTSTEP_STEPTESTVAR; cdat->dclo_1057__MGALTSTEP_STEPTESTVAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1057__MGALTSTEP_STEPTESTVAR.nbval = 0; /*inirout drout_1058__MGALTSTEP_STEPTESTINST */ /*_.VALROUT___V1150*/ meltfptr[1149] = (melt_ptr_t) & cdat->drout_1058__MGALTSTEP_STEPTESTINST; cdat->drout_1058__MGALTSTEP_STEPTESTINST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1058__MGALTSTEP_STEPTESTINST.routdescr, "MGALTSTEP_STEPTESTINST @warmelt-normatch.melt:4421", MELT_ROUTDESCR_LEN - 1); cdat->drout_1058__MGALTSTEP_STEPTESTINST.nbval = 8; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1058__MGALTSTEP_STEPTESTINST, meltrout_95_warmelt_normatch_MGALTSTEP_STEPTESTINST); /*iniclos dclo_1059__MGALTSTEP_STEPTESTINST */ /*_.VALCLO___V1151*/ meltfptr[1150] = (melt_ptr_t) & cdat->dclo_1059__MGALTSTEP_STEPTESTINST; cdat->dclo_1059__MGALTSTEP_STEPTESTINST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1059__MGALTSTEP_STEPTESTINST.nbval = 0; /*iniobj dsym_1060__ADD2OUT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1152*/ meltfptr[1151]) /*_.VALDATA___V1152*/ meltfptr[1151] = (melt_ptr_t) & cdat->dsym_1060__ADD2OUT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1060__ADD2OUT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1060__ADD2OUT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1060__ADD2OUT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1060__ADD2OUT.obj_hash = 901325062; cdat->dsym_1060__ADD2OUT.obj_len = 3; /*inistring dstr_1061__ADD2OUT*/ /*_.VALSTR___V1153*/ meltfptr[1152] = (melt_ptr_t) & cdat->dstr_1061__ADD2OUT; cdat->dstr_1061__ADD2OUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1061__ADD2OUT.val, "ADD2OUT", sizeof (cdat->dstr_1061__ADD2OUT.val) - 1); cdat->dstr_1061__ADD2OUT.val[7] = (char) 0; cdat->dstr_1061__ADD2OUT.slen = 7; /*inirout drout_1062__MGALTSTEP_STEPTESTMULT */ /*_.VALROUT___V1154*/ meltfptr[1153] = (melt_ptr_t) & cdat->drout_1062__MGALTSTEP_STEPTESTMULT; cdat->drout_1062__MGALTSTEP_STEPTESTMULT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1062__MGALTSTEP_STEPTESTMULT.routdescr, "MGALTSTEP_STEPTESTMULT @warmelt-normatch.melt:4492", MELT_ROUTDESCR_LEN - 1); cdat->drout_1062__MGALTSTEP_STEPTESTMULT.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1062__MGALTSTEP_STEPTESTMULT, meltrout_96_warmelt_normatch_MGALTSTEP_STEPTESTMULT); /*iniclos dclo_1063__MGALTSTEP_STEPTESTMULT */ /*_.VALCLO___V1155*/ meltfptr[1154] = (melt_ptr_t) & cdat->dclo_1063__MGALTSTEP_STEPTESTMULT; cdat->dclo_1063__MGALTSTEP_STEPTESTMULT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1063__MGALTSTEP_STEPTESTMULT.nbval = 0; /*inirout drout_1064__MGALTSTEP_STEPTESTGROUP */ /*_.VALROUT___V1156*/ meltfptr[1155] = (melt_ptr_t) & cdat->drout_1064__MGALTSTEP_STEPTESTGROUP; cdat->drout_1064__MGALTSTEP_STEPTESTGROUP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1064__MGALTSTEP_STEPTESTGROUP.routdescr, "MGALTSTEP_STEPTESTGROUP @warmelt-normatch.melt:4562", MELT_ROUTDESCR_LEN - 1); cdat->drout_1064__MGALTSTEP_STEPTESTGROUP.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1064__MGALTSTEP_STEPTESTGROUP, meltrout_97_warmelt_normatch_MGALTSTEP_STEPTESTGROUP); /*iniclos dclo_1065__MGALTSTEP_STEPTESTGROUP */ /*_.VALCLO___V1157*/ meltfptr[1156] = (melt_ptr_t) & cdat->dclo_1065__MGALTSTEP_STEPTESTGROUP; cdat->dclo_1065__MGALTSTEP_STEPTESTGROUP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1065__MGALTSTEP_STEPTESTGROUP.nbval = 0; /*inirout drout_1066__MGALTSTEP_STEPTESTMATCHER */ /*_.VALROUT___V1158*/ meltfptr[1157] = (melt_ptr_t) & cdat->drout_1066__MGALTSTEP_STEPTESTMATCHER; cdat->drout_1066__MGALTSTEP_STEPTESTMATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1066__MGALTSTEP_STEPTESTMATCHER.routdescr, "MGALTSTEP_STEPTESTMATCHER @warmelt-normatch.melt:4606", MELT_ROUTDESCR_LEN - 1); cdat->drout_1066__MGALTSTEP_STEPTESTMATCHER.nbval = 8; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1066__MGALTSTEP_STEPTESTMATCHER, meltrout_98_warmelt_normatch_MGALTSTEP_STEPTESTMATCHER); /*iniclos dclo_1067__MGALTSTEP_STEPTESTMATCHER */ /*_.VALCLO___V1159*/ meltfptr[1158] = (melt_ptr_t) & cdat->dclo_1067__MGALTSTEP_STEPTESTMATCHER; cdat->dclo_1067__MGALTSTEP_STEPTESTMATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1067__MGALTSTEP_STEPTESTMATCHER.nbval = 0; /*inirout drout_1068__MGALTSTEP_STEPSUCCESS */ /*_.VALROUT___V1160*/ meltfptr[1159] = (melt_ptr_t) & cdat->drout_1068__MGALTSTEP_STEPSUCCESS; cdat->drout_1068__MGALTSTEP_STEPSUCCESS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1068__MGALTSTEP_STEPSUCCESS.routdescr, "MGALTSTEP_STEPSUCCESS @warmelt-normatch.melt:4683", MELT_ROUTDESCR_LEN - 1); cdat->drout_1068__MGALTSTEP_STEPSUCCESS.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1068__MGALTSTEP_STEPSUCCESS, meltrout_99_warmelt_normatch_MGALTSTEP_STEPSUCCESS); /*iniclos dclo_1069__MGALTSTEP_STEPSUCCESS */ /*_.VALCLO___V1161*/ meltfptr[1160] = (melt_ptr_t) & cdat->dclo_1069__MGALTSTEP_STEPSUCCESS; cdat->dclo_1069__MGALTSTEP_STEPSUCCESS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1069__MGALTSTEP_STEPSUCCESS.nbval = 0; /*inirout drout_1070__MGALTSTEP_STEPCLEAR */ /*_.VALROUT___V1162*/ meltfptr[1161] = (melt_ptr_t) & cdat->drout_1070__MGALTSTEP_STEPCLEAR; cdat->drout_1070__MGALTSTEP_STEPCLEAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1070__MGALTSTEP_STEPCLEAR.routdescr, "MGALTSTEP_STEPCLEAR @warmelt-normatch.melt:4752", MELT_ROUTDESCR_LEN - 1); cdat->drout_1070__MGALTSTEP_STEPCLEAR.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1070__MGALTSTEP_STEPCLEAR, meltrout_100_warmelt_normatch_MGALTSTEP_STEPCLEAR); /*iniclos dclo_1071__MGALTSTEP_STEPCLEAR */ /*_.VALCLO___V1163*/ meltfptr[1162] = (melt_ptr_t) & cdat->dclo_1071__MGALTSTEP_STEPCLEAR; cdat->dclo_1071__MGALTSTEP_STEPCLEAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1071__MGALTSTEP_STEPCLEAR.nbval = 0; /*inirout drout_1072__MGALTSTEP_STEPFLAGSET */ /*_.VALROUT___V1164*/ meltfptr[1163] = (melt_ptr_t) & cdat->drout_1072__MGALTSTEP_STEPFLAGSET; cdat->drout_1072__MGALTSTEP_STEPFLAGSET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1072__MGALTSTEP_STEPFLAGSET.routdescr, "MGALTSTEP_STEPFLAGSET @warmelt-normatch.melt:4809", MELT_ROUTDESCR_LEN - 1); cdat->drout_1072__MGALTSTEP_STEPFLAGSET.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1072__MGALTSTEP_STEPFLAGSET, meltrout_101_warmelt_normatch_MGALTSTEP_STEPFLAGSET); /*iniclos dclo_1073__MGALTSTEP_STEPFLAGSET */ /*_.VALCLO___V1165*/ meltfptr[1164] = (melt_ptr_t) & cdat->dclo_1073__MGALTSTEP_STEPFLAGSET; cdat->dclo_1073__MGALTSTEP_STEPFLAGSET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1073__MGALTSTEP_STEPFLAGSET.nbval = 0; /*inirout drout_1074__MGALTSTEP_STEPFLAGOPER */ /*_.VALROUT___V1166*/ meltfptr[1165] = (melt_ptr_t) & cdat->drout_1074__MGALTSTEP_STEPFLAGOPER; cdat->drout_1074__MGALTSTEP_STEPFLAGOPER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1074__MGALTSTEP_STEPFLAGOPER.routdescr, "MGALTSTEP_STEPFLAGOPER @warmelt-normatch.melt:4861", MELT_ROUTDESCR_LEN - 1); cdat->drout_1074__MGALTSTEP_STEPFLAGOPER.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1074__MGALTSTEP_STEPFLAGOPER, meltrout_102_warmelt_normatch_MGALTSTEP_STEPFLAGOPER); /*iniclos dclo_1075__MGALTSTEP_STEPFLAGOPER */ /*_.VALCLO___V1167*/ meltfptr[1166] = (melt_ptr_t) & cdat->dclo_1075__MGALTSTEP_STEPFLAGOPER; cdat->dclo_1075__MGALTSTEP_STEPFLAGOPER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1075__MGALTSTEP_STEPFLAGOPER.nbval = 0; /*inirout drout_1076__TRANSLATE_MATCHCASE */ /*_.VALROUT___V1168*/ meltfptr[1167] = (melt_ptr_t) & cdat->drout_1076__TRANSLATE_MATCHCASE; cdat->drout_1076__TRANSLATE_MATCHCASE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1076__TRANSLATE_MATCHCASE.routdescr, "TRANSLATE_MATCHCASE @warmelt-normatch.melt:4956", MELT_ROUTDESCR_LEN - 1); cdat->drout_1076__TRANSLATE_MATCHCASE.nbval = 25; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1076__TRANSLATE_MATCHCASE, meltrout_103_warmelt_normatch_TRANSLATE_MATCHCASE); /*iniclos dclo_1077__TRANSLATE_MATCHCASE */ /*_.VALCLO___V1170*/ meltfptr[1169] = (melt_ptr_t) & cdat->dclo_1077__TRANSLATE_MATCHCASE; cdat->dclo_1077__TRANSLATE_MATCHCASE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1077__TRANSLATE_MATCHCASE.nbval = 0; /*iniobj dsym_1078__DISCR_INTEGER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1171*/ meltfptr[1170]) /*_.VALDATA___V1171*/ meltfptr[1170] = (melt_ptr_t) & cdat->dsym_1078__DISCR_INTEGER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1078__DISCR_INTEGER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1078__DISCR_INTEGER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1078__DISCR_INTEGER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1078__DISCR_INTEGER.obj_hash = 119182103; cdat->dsym_1078__DISCR_INTEGER.obj_len = 3; /*inistring dstr_1079__DISCR_INTEGER*/ /*_.VALSTR___V1172*/ meltfptr[1171] = (melt_ptr_t) & cdat->dstr_1079__DISCR_INTEGER; cdat->dstr_1079__DISCR_INTEGER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1079__DISCR_INTEGER.val, "DISCR_INTEGER", sizeof (cdat->dstr_1079__DISCR_INTEGER.val) - 1); cdat->dstr_1079__DISCR_INTEGER.val[13] = (char) 0; cdat->dstr_1079__DISCR_INTEGER.slen = 13; /*inirout drout_1080__LAMBDA_ */ /*_.VALROUT___V1169*/ meltfptr[1168] = (melt_ptr_t) & cdat->drout_1080__LAMBDA_; cdat->drout_1080__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1080__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normatch.melt:5041", MELT_ROUTDESCR_LEN - 1); cdat->drout_1080__LAMBDA_.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1080__LAMBDA_, meltrout_104_warmelt_normatch_LAMBDA___23__); /*iniobj dsym_1081__COMPARE_NAMED_ALPHA*/ /*uniqueobj*/ if (! /*_.VALDATA___V1173*/ meltfptr[1172]) /*_.VALDATA___V1173*/ meltfptr[1172] = (melt_ptr_t) & cdat->dsym_1081__COMPARE_NAMED_ALPHA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1081__COMPARE_NAMED_ALPHA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1081__COMPARE_NAMED_ALPHA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1081__COMPARE_NAMED_ALPHA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1081__COMPARE_NAMED_ALPHA.obj_hash = 155514911; cdat->dsym_1081__COMPARE_NAMED_ALPHA.obj_len = 3; /*inistring dstr_1082__COMPARE_NAMED_AL*/ /*_.VALSTR___V1174*/ meltfptr[1173] = (melt_ptr_t) & cdat->dstr_1082__COMPARE_NAMED_AL; cdat->dstr_1082__COMPARE_NAMED_AL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1082__COMPARE_NAMED_AL.val, "COMPARE_NAMED_ALPHA", sizeof (cdat->dstr_1082__COMPARE_NAMED_AL. val) - 1); cdat->dstr_1082__COMPARE_NAMED_AL.val[19] = (char) 0; cdat->dstr_1082__COMPARE_NAMED_AL.slen = 19; /*iniobj dsym_1083__CLASS_NREP_MATCHALT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1175*/ meltfptr[1174]) /*_.VALDATA___V1175*/ meltfptr[1174] = (melt_ptr_t) & cdat->dsym_1083__CLASS_NREP_MATCHALT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1083__CLASS_NREP_MATCHALT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1083__CLASS_NREP_MATCHALT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1083__CLASS_NREP_MATCHALT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1083__CLASS_NREP_MATCHALT.obj_hash = 515251785; cdat->dsym_1083__CLASS_NREP_MATCHALT.obj_len = 3; /*inistring dstr_1084__CLASS_NREP_MATCH*/ /*_.VALSTR___V1176*/ meltfptr[1175] = (melt_ptr_t) & cdat->dstr_1084__CLASS_NREP_MATCH; cdat->dstr_1084__CLASS_NREP_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1084__CLASS_NREP_MATCH.val, "CLASS_NREP_MATCHALT", sizeof (cdat->dstr_1084__CLASS_NREP_MATCH. val) - 1); cdat->dstr_1084__CLASS_NREP_MATCH.val[19] = (char) 0; cdat->dstr_1084__CLASS_NREP_MATCH.slen = 19; MELT_LOCATION ("warmelt-normatch.melt:5068:/ iniobj"); /*iniobj dobj_1085__CLASS_NREP_MATCHALT*/ /*_.VALDATA___V1177*/ meltfptr[1176] = (melt_ptr_t) & cdat->dobj_1085__CLASS_NREP_MATCHALT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1085__CLASS_NREP_MATCHALT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1085__CLASS_NREP_MATCHALT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1085__CLASS_NREP_MATCHALT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_1085__CLASS_NREP_MATCHALT.obj_num = MELTOBMAG_OBJECT; cdat->dobj_1085__CLASS_NREP_MATCHALT.obj_hash = 246866891; cdat->dobj_1085__CLASS_NREP_MATCHALT.obj_len = 8; /*inistring dstr_1086__CLASS_NREP_MATCH*/ /*_.VALSTR___V1178*/ meltfptr[1177] = (melt_ptr_t) & cdat->dstr_1086__CLASS_NREP_MATCH; cdat->dstr_1086__CLASS_NREP_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1086__CLASS_NREP_MATCH.val, "CLASS_NREP_MATCHALT", sizeof (cdat->dstr_1086__CLASS_NREP_MATCH. val) - 1); cdat->dstr_1086__CLASS_NREP_MATCH.val[19] = (char) 0; cdat->dstr_1086__CLASS_NREP_MATCH.slen = 19; /*inimult dtup_1087__CLASS_NREP_MATCHALT */ /*_.VALTUP___V1179*/ meltfptr[1178] = (melt_ptr_t) & cdat->dtup_1087__CLASS_NREP_MATCHALT; cdat->dtup_1087__CLASS_NREP_MATCHALT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_1087__CLASS_NREP_MATCHALT.nbval = 4; /*inimult dtup_1088__CLASS_NREP_MATCHALT */ /*_.VALTUP___V1192*/ meltfptr[1191] = (melt_ptr_t) & cdat->dtup_1088__CLASS_NREP_MATCHALT; cdat->dtup_1088__CLASS_NREP_MATCHALT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_1088__CLASS_NREP_MATCHALT.nbval = 8; /*iniobj dsym_1089__NAMATCH_MATCHED*/ /*uniqueobj*/ if (! /*_.VALDATA___V1193*/ meltfptr[1192]) /*_.VALDATA___V1193*/ meltfptr[1192] = (melt_ptr_t) & cdat->dsym_1089__NAMATCH_MATCHED; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1089__NAMATCH_MATCHED", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1089__NAMATCH_MATCHED", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1089__NAMATCH_MATCHED.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1089__NAMATCH_MATCHED.obj_hash = 262472514; cdat->dsym_1089__NAMATCH_MATCHED.obj_len = 3; /*inistring dstr_1090__NAMATCH_MATCHED*/ /*_.VALSTR___V1194*/ meltfptr[1193] = (melt_ptr_t) & cdat->dstr_1090__NAMATCH_MATCHED; cdat->dstr_1090__NAMATCH_MATCHED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1090__NAMATCH_MATCHED.val, "NAMATCH_MATCHED", sizeof (cdat->dstr_1090__NAMATCH_MATCHED. val) - 1); cdat->dstr_1090__NAMATCH_MATCHED.val[15] = (char) 0; cdat->dstr_1090__NAMATCH_MATCHED.slen = 15; /*^iniobj */ /*iniobj dobj_1091__NAMATCH_MATCHED*/ /*_.VALDATA___V1180*/ meltfptr[1179] = (melt_ptr_t) & cdat->dobj_1091__NAMATCH_MATCHED; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1091__NAMATCH_MATCHED", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1091__NAMATCH_MATCHED", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1091__NAMATCH_MATCHED.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1091__NAMATCH_MATCHED.obj_num = 2; cdat->dobj_1091__NAMATCH_MATCHED.obj_hash = 657071367; cdat->dobj_1091__NAMATCH_MATCHED.obj_len = 4; /*inistring dstr_1092__NAMATCH_MATCHED*/ /*_.VALSTR___V1181*/ meltfptr[1180] = (melt_ptr_t) & cdat->dstr_1092__NAMATCH_MATCHED; cdat->dstr_1092__NAMATCH_MATCHED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1092__NAMATCH_MATCHED.val, "NAMATCH_MATCHED", sizeof (cdat->dstr_1092__NAMATCH_MATCHED. val) - 1); cdat->dstr_1092__NAMATCH_MATCHED.val[15] = (char) 0; cdat->dstr_1092__NAMATCH_MATCHED.slen = 15; /*iniobj dsym_1093__NAMATCH_RESULT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1195*/ meltfptr[1194]) /*_.VALDATA___V1195*/ meltfptr[1194] = (melt_ptr_t) & cdat->dsym_1093__NAMATCH_RESULT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1093__NAMATCH_RESULT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1093__NAMATCH_RESULT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1093__NAMATCH_RESULT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1093__NAMATCH_RESULT.obj_hash = 132418351; cdat->dsym_1093__NAMATCH_RESULT.obj_len = 3; /*inistring dstr_1094__NAMATCH_RESULT*/ /*_.VALSTR___V1196*/ meltfptr[1195] = (melt_ptr_t) & cdat->dstr_1094__NAMATCH_RESULT; cdat->dstr_1094__NAMATCH_RESULT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1094__NAMATCH_RESULT.val, "NAMATCH_RESULT", sizeof (cdat->dstr_1094__NAMATCH_RESULT.val) - 1); cdat->dstr_1094__NAMATCH_RESULT.val[14] = (char) 0; cdat->dstr_1094__NAMATCH_RESULT.slen = 14; /*^iniobj */ /*iniobj dobj_1095__NAMATCH_RESULT*/ /*_.VALDATA___V1182*/ meltfptr[1181] = (melt_ptr_t) & cdat->dobj_1095__NAMATCH_RESULT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1095__NAMATCH_RESULT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1095__NAMATCH_RESULT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1095__NAMATCH_RESULT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1095__NAMATCH_RESULT.obj_num = 3; cdat->dobj_1095__NAMATCH_RESULT.obj_hash = 80280109; cdat->dobj_1095__NAMATCH_RESULT.obj_len = 4; /*inistring dstr_1096__NAMATCH_RESULT*/ /*_.VALSTR___V1183*/ meltfptr[1182] = (melt_ptr_t) & cdat->dstr_1096__NAMATCH_RESULT; cdat->dstr_1096__NAMATCH_RESULT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1096__NAMATCH_RESULT.val, "NAMATCH_RESULT", sizeof (cdat->dstr_1096__NAMATCH_RESULT.val) - 1); cdat->dstr_1096__NAMATCH_RESULT.val[14] = (char) 0; cdat->dstr_1096__NAMATCH_RESULT.slen = 14; /*iniobj dsym_1097__NAMATCH_BODY*/ /*uniqueobj*/ if (! /*_.VALDATA___V1197*/ meltfptr[1196]) /*_.VALDATA___V1197*/ meltfptr[1196] = (melt_ptr_t) & cdat->dsym_1097__NAMATCH_BODY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1097__NAMATCH_BODY", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1097__NAMATCH_BODY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1097__NAMATCH_BODY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1097__NAMATCH_BODY.obj_hash = 620561017; cdat->dsym_1097__NAMATCH_BODY.obj_len = 3; /*inistring dstr_1098__NAMATCH_BODY*/ /*_.VALSTR___V1198*/ meltfptr[1197] = (melt_ptr_t) & cdat->dstr_1098__NAMATCH_BODY; cdat->dstr_1098__NAMATCH_BODY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1098__NAMATCH_BODY.val, "NAMATCH_BODY", sizeof (cdat->dstr_1098__NAMATCH_BODY.val) - 1); cdat->dstr_1098__NAMATCH_BODY.val[12] = (char) 0; cdat->dstr_1098__NAMATCH_BODY.slen = 12; /*^iniobj */ /*iniobj dobj_1099__NAMATCH_BODY*/ /*_.VALDATA___V1184*/ meltfptr[1183] = (melt_ptr_t) & cdat->dobj_1099__NAMATCH_BODY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1099__NAMATCH_BODY", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1099__NAMATCH_BODY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1099__NAMATCH_BODY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1099__NAMATCH_BODY.obj_num = 4; cdat->dobj_1099__NAMATCH_BODY.obj_hash = 924238777; cdat->dobj_1099__NAMATCH_BODY.obj_len = 4; /*inistring dstr_1100__NAMATCH_BODY*/ /*_.VALSTR___V1185*/ meltfptr[1184] = (melt_ptr_t) & cdat->dstr_1100__NAMATCH_BODY; cdat->dstr_1100__NAMATCH_BODY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1100__NAMATCH_BODY.val, "NAMATCH_BODY", sizeof (cdat->dstr_1100__NAMATCH_BODY.val) - 1); cdat->dstr_1100__NAMATCH_BODY.val[12] = (char) 0; cdat->dstr_1100__NAMATCH_BODY.slen = 12; /*iniobj dsym_1101__NAMATCH_FLAGS*/ /*uniqueobj*/ if (! /*_.VALDATA___V1199*/ meltfptr[1198]) /*_.VALDATA___V1199*/ meltfptr[1198] = (melt_ptr_t) & cdat->dsym_1101__NAMATCH_FLAGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1101__NAMATCH_FLAGS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1101__NAMATCH_FLAGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1101__NAMATCH_FLAGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1101__NAMATCH_FLAGS.obj_hash = 162798795; cdat->dsym_1101__NAMATCH_FLAGS.obj_len = 3; /*inistring dstr_1102__NAMATCH_FLAGS*/ /*_.VALSTR___V1200*/ meltfptr[1199] = (melt_ptr_t) & cdat->dstr_1102__NAMATCH_FLAGS; cdat->dstr_1102__NAMATCH_FLAGS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1102__NAMATCH_FLAGS.val, "NAMATCH_FLAGS", sizeof (cdat->dstr_1102__NAMATCH_FLAGS.val) - 1); cdat->dstr_1102__NAMATCH_FLAGS.val[13] = (char) 0; cdat->dstr_1102__NAMATCH_FLAGS.slen = 13; /*^iniobj */ /*iniobj dobj_1103__NAMATCH_FLAGS*/ /*_.VALDATA___V1186*/ meltfptr[1185] = (melt_ptr_t) & cdat->dobj_1103__NAMATCH_FLAGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1103__NAMATCH_FLAGS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1103__NAMATCH_FLAGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1103__NAMATCH_FLAGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1103__NAMATCH_FLAGS.obj_num = 5; cdat->dobj_1103__NAMATCH_FLAGS.obj_hash = 989405762; cdat->dobj_1103__NAMATCH_FLAGS.obj_len = 4; /*inistring dstr_1104__NAMATCH_FLAGS*/ /*_.VALSTR___V1187*/ meltfptr[1186] = (melt_ptr_t) & cdat->dstr_1104__NAMATCH_FLAGS; cdat->dstr_1104__NAMATCH_FLAGS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1104__NAMATCH_FLAGS.val, "NAMATCH_FLAGS", sizeof (cdat->dstr_1104__NAMATCH_FLAGS.val) - 1); cdat->dstr_1104__NAMATCH_FLAGS.val[13] = (char) 0; cdat->dstr_1104__NAMATCH_FLAGS.slen = 13; /*iniobj dsym_1105__NAMATCH_MDATAS*/ /*uniqueobj*/ if (! /*_.VALDATA___V1201*/ meltfptr[1200]) /*_.VALDATA___V1201*/ meltfptr[1200] = (melt_ptr_t) & cdat->dsym_1105__NAMATCH_MDATAS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1105__NAMATCH_MDATAS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1105__NAMATCH_MDATAS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1105__NAMATCH_MDATAS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1105__NAMATCH_MDATAS.obj_hash = 8754036; cdat->dsym_1105__NAMATCH_MDATAS.obj_len = 3; /*inistring dstr_1106__NAMATCH_MDATAS*/ /*_.VALSTR___V1202*/ meltfptr[1201] = (melt_ptr_t) & cdat->dstr_1106__NAMATCH_MDATAS; cdat->dstr_1106__NAMATCH_MDATAS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1106__NAMATCH_MDATAS.val, "NAMATCH_MDATAS", sizeof (cdat->dstr_1106__NAMATCH_MDATAS.val) - 1); cdat->dstr_1106__NAMATCH_MDATAS.val[14] = (char) 0; cdat->dstr_1106__NAMATCH_MDATAS.slen = 14; /*^iniobj */ /*iniobj dobj_1107__NAMATCH_MDATAS*/ /*_.VALDATA___V1188*/ meltfptr[1187] = (melt_ptr_t) & cdat->dobj_1107__NAMATCH_MDATAS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1107__NAMATCH_MDATAS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1107__NAMATCH_MDATAS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1107__NAMATCH_MDATAS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1107__NAMATCH_MDATAS.obj_num = 6; cdat->dobj_1107__NAMATCH_MDATAS.obj_hash = 573177936; cdat->dobj_1107__NAMATCH_MDATAS.obj_len = 4; /*inistring dstr_1108__NAMATCH_MDATAS*/ /*_.VALSTR___V1189*/ meltfptr[1188] = (melt_ptr_t) & cdat->dstr_1108__NAMATCH_MDATAS; cdat->dstr_1108__NAMATCH_MDATAS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1108__NAMATCH_MDATAS.val, "NAMATCH_MDATAS", sizeof (cdat->dstr_1108__NAMATCH_MDATAS.val) - 1); cdat->dstr_1108__NAMATCH_MDATAS.val[14] = (char) 0; cdat->dstr_1108__NAMATCH_MDATAS.slen = 14; /*iniobj dsym_1109__NAMATCH_STARTLABEL*/ /*uniqueobj*/ if (! /*_.VALDATA___V1203*/ meltfptr[1202]) /*_.VALDATA___V1203*/ meltfptr[1202] = (melt_ptr_t) & cdat->dsym_1109__NAMATCH_STARTLABEL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1109__NAMATCH_STARTLABEL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1109__NAMATCH_STARTLABEL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1109__NAMATCH_STARTLABEL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1109__NAMATCH_STARTLABEL.obj_hash = 154904814; cdat->dsym_1109__NAMATCH_STARTLABEL.obj_len = 3; /*inistring dstr_1110__NAMATCH_STARTLAB*/ /*_.VALSTR___V1204*/ meltfptr[1203] = (melt_ptr_t) & cdat->dstr_1110__NAMATCH_STARTLAB; cdat->dstr_1110__NAMATCH_STARTLAB.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1110__NAMATCH_STARTLAB.val, "NAMATCH_STARTLABEL", sizeof (cdat->dstr_1110__NAMATCH_STARTLAB. val) - 1); cdat->dstr_1110__NAMATCH_STARTLAB.val[18] = (char) 0; cdat->dstr_1110__NAMATCH_STARTLAB.slen = 18; /*^iniobj */ /*iniobj dobj_1111__NAMATCH_STARTLABEL*/ /*_.VALDATA___V1190*/ meltfptr[1189] = (melt_ptr_t) & cdat->dobj_1111__NAMATCH_STARTLABEL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1111__NAMATCH_STARTLABEL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1111__NAMATCH_STARTLABEL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1111__NAMATCH_STARTLABEL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1111__NAMATCH_STARTLABEL.obj_num = 7; cdat->dobj_1111__NAMATCH_STARTLABEL.obj_hash = 414545963; cdat->dobj_1111__NAMATCH_STARTLABEL.obj_len = 4; /*inistring dstr_1112__NAMATCH_STARTLAB*/ /*_.VALSTR___V1191*/ meltfptr[1190] = (melt_ptr_t) & cdat->dstr_1112__NAMATCH_STARTLAB; cdat->dstr_1112__NAMATCH_STARTLAB.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1112__NAMATCH_STARTLAB.val, "NAMATCH_STARTLABEL", sizeof (cdat->dstr_1112__NAMATCH_STARTLAB. val) - 1); cdat->dstr_1112__NAMATCH_STARTLAB.val[18] = (char) 0; cdat->dstr_1112__NAMATCH_STARTLAB.slen = 18; /*iniobj dsym_1113__CLASS_NREP_MATCH_LABEL*/ /*uniqueobj*/ if (! /*_.VALDATA___V1205*/ meltfptr[1204]) /*_.VALDATA___V1205*/ meltfptr[1204] = (melt_ptr_t) & cdat->dsym_1113__CLASS_NREP_MATCH_LABEL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1113__CLASS_NREP_MATCH_LABEL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1113__CLASS_NREP_MATCH_LABEL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1113__CLASS_NREP_MATCH_LABEL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1113__CLASS_NREP_MATCH_LABEL.obj_hash = 870271698; cdat->dsym_1113__CLASS_NREP_MATCH_LABEL.obj_len = 3; /*inistring dstr_1114__CLASS_NREP_MATCH*/ /*_.VALSTR___V1206*/ meltfptr[1205] = (melt_ptr_t) & cdat->dstr_1114__CLASS_NREP_MATCH; cdat->dstr_1114__CLASS_NREP_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1114__CLASS_NREP_MATCH.val, "CLASS_NREP_MATCH_LABEL", sizeof (cdat->dstr_1114__CLASS_NREP_MATCH. val) - 1); cdat->dstr_1114__CLASS_NREP_MATCH.val[22] = (char) 0; cdat->dstr_1114__CLASS_NREP_MATCH.slen = 22; MELT_LOCATION ("warmelt-normatch.melt:5086:/ iniobj"); /*iniobj dobj_1115__CLASS_NREP_MATCH_LABEL*/ /*_.VALDATA___V1207*/ meltfptr[1206] = (melt_ptr_t) & cdat->dobj_1115__CLASS_NREP_MATCH_LABEL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1115__CLASS_NREP_MATCH_LABEL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1115__CLASS_NREP_MATCH_LABEL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1115__CLASS_NREP_MATCH_LABEL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_1115__CLASS_NREP_MATCH_LABEL.obj_num = MELTOBMAG_OBJECT; cdat->dobj_1115__CLASS_NREP_MATCH_LABEL.obj_hash = 276653578; cdat->dobj_1115__CLASS_NREP_MATCH_LABEL.obj_len = 8; /*inistring dstr_1116__CLASS_NREP_MATCH*/ /*_.VALSTR___V1208*/ meltfptr[1207] = (melt_ptr_t) & cdat->dstr_1116__CLASS_NREP_MATCH; cdat->dstr_1116__CLASS_NREP_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1116__CLASS_NREP_MATCH.val, "CLASS_NREP_MATCH_LABEL", sizeof (cdat->dstr_1116__CLASS_NREP_MATCH. val) - 1); cdat->dstr_1116__CLASS_NREP_MATCH.val[22] = (char) 0; cdat->dstr_1116__CLASS_NREP_MATCH.slen = 22; /*inimult dtup_1117__CLASS_NREP_MATCH_LABEL */ /*_.VALTUP___V1209*/ meltfptr[1208] = (melt_ptr_t) & cdat->dtup_1117__CLASS_NREP_MATCH_LABEL; cdat->dtup_1117__CLASS_NREP_MATCH_LABEL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_1117__CLASS_NREP_MATCH_LABEL.nbval = 3; /*inimult dtup_1118__CLASS_NREP_MATCH_LABEL */ /*_.VALTUP___V1212*/ meltfptr[1211] = (melt_ptr_t) & cdat->dtup_1118__CLASS_NREP_MATCH_LABEL; cdat->dtup_1118__CLASS_NREP_MATCH_LABEL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_1118__CLASS_NREP_MATCH_LABEL.nbval = 2; /*iniobj dsym_1119__NMLAB_STEP*/ /*uniqueobj*/ if (! /*_.VALDATA___V1213*/ meltfptr[1212]) /*_.VALDATA___V1213*/ meltfptr[1212] = (melt_ptr_t) & cdat->dsym_1119__NMLAB_STEP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1119__NMLAB_STEP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1119__NMLAB_STEP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1119__NMLAB_STEP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1119__NMLAB_STEP.obj_hash = 818074580; cdat->dsym_1119__NMLAB_STEP.obj_len = 3; /*inistring dstr_1120__NMLAB_STEP*/ /*_.VALSTR___V1214*/ meltfptr[1213] = (melt_ptr_t) & cdat->dstr_1120__NMLAB_STEP; cdat->dstr_1120__NMLAB_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1120__NMLAB_STEP.val, "NMLAB_STEP", sizeof (cdat->dstr_1120__NMLAB_STEP.val) - 1); cdat->dstr_1120__NMLAB_STEP.val[10] = (char) 0; cdat->dstr_1120__NMLAB_STEP.slen = 10; /*^iniobj */ /*iniobj dobj_1121__NMLAB_STEP*/ /*_.VALDATA___V1210*/ meltfptr[1209] = (melt_ptr_t) & cdat->dobj_1121__NMLAB_STEP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1121__NMLAB_STEP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1121__NMLAB_STEP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1121__NMLAB_STEP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1121__NMLAB_STEP.obj_num = 1; cdat->dobj_1121__NMLAB_STEP.obj_hash = 416551641; cdat->dobj_1121__NMLAB_STEP.obj_len = 4; /*inistring dstr_1122__NMLAB_STEP*/ /*_.VALSTR___V1211*/ meltfptr[1210] = (melt_ptr_t) & cdat->dstr_1122__NMLAB_STEP; cdat->dstr_1122__NMLAB_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1122__NMLAB_STEP.val, "NMLAB_STEP", sizeof (cdat->dstr_1122__NMLAB_STEP.val) - 1); cdat->dstr_1122__NMLAB_STEP.val[10] = (char) 0; cdat->dstr_1122__NMLAB_STEP.slen = 10; /*iniobj dsym_1123__CLASS_NREP_MATCH_LABEL_END*/ /*uniqueobj*/ if (! /*_.VALDATA___V1215*/ meltfptr[1214]) /*_.VALDATA___V1215*/ meltfptr[1214] = (melt_ptr_t) & cdat->dsym_1123__CLASS_NREP_MATCH_LABEL_END; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1123__CLASS_NREP_MATCH_LABEL_END", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1123__CLASS_NREP_MATCH_LABEL_END", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1123__CLASS_NREP_MATCH_LABEL_END.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1123__CLASS_NREP_MATCH_LABEL_END.obj_hash = 47829039; cdat->dsym_1123__CLASS_NREP_MATCH_LABEL_END.obj_len = 3; /*inistring dstr_1124__CLASS_NREP_MATCH*/ /*_.VALSTR___V1216*/ meltfptr[1215] = (melt_ptr_t) & cdat->dstr_1124__CLASS_NREP_MATCH; cdat->dstr_1124__CLASS_NREP_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1124__CLASS_NREP_MATCH.val, "CLASS_NREP_MATCH_LABEL_END", sizeof (cdat->dstr_1124__CLASS_NREP_MATCH. val) - 1); cdat->dstr_1124__CLASS_NREP_MATCH.val[26] = (char) 0; cdat->dstr_1124__CLASS_NREP_MATCH.slen = 26; MELT_LOCATION ("warmelt-normatch.melt:5093:/ iniobj"); /*iniobj dobj_1125__CLASS_NREP_MATCH_LABEL_END*/ /*_.VALDATA___V1217*/ meltfptr[1216] = (melt_ptr_t) & cdat->dobj_1125__CLASS_NREP_MATCH_LABEL_END; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1125__CLASS_NREP_MATCH_LABEL_END", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1125__CLASS_NREP_MATCH_LABEL_END", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1125__CLASS_NREP_MATCH_LABEL_END.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_1125__CLASS_NREP_MATCH_LABEL_END.obj_num = MELTOBMAG_OBJECT; cdat->dobj_1125__CLASS_NREP_MATCH_LABEL_END.obj_hash = 768927449; cdat->dobj_1125__CLASS_NREP_MATCH_LABEL_END.obj_len = 8; /*inistring dstr_1126__CLASS_NREP_MATCH*/ /*_.VALSTR___V1218*/ meltfptr[1217] = (melt_ptr_t) & cdat->dstr_1126__CLASS_NREP_MATCH; cdat->dstr_1126__CLASS_NREP_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1126__CLASS_NREP_MATCH.val, "CLASS_NREP_MATCH_LABEL_END", sizeof (cdat->dstr_1126__CLASS_NREP_MATCH. val) - 1); cdat->dstr_1126__CLASS_NREP_MATCH.val[26] = (char) 0; cdat->dstr_1126__CLASS_NREP_MATCH.slen = 26; /*inimult dtup_1127__CLASS_NREP_MATCH_LABEL_END */ /*_.VALTUP___V1219*/ meltfptr[1218] = (melt_ptr_t) & cdat->dtup_1127__CLASS_NREP_MATCH_LABEL_END; cdat->dtup_1127__CLASS_NREP_MATCH_LABEL_END.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_1127__CLASS_NREP_MATCH_LABEL_END.nbval = 4; /*inimult dtup_1128__CLASS_NREP_MATCH_LABEL_END */ /*_.VALTUP___V1220*/ meltfptr[1219] = (melt_ptr_t) & cdat->dtup_1128__CLASS_NREP_MATCH_LABEL_END; cdat->dtup_1128__CLASS_NREP_MATCH_LABEL_END.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_1128__CLASS_NREP_MATCH_LABEL_END.nbval = 2; /*iniobj dsym_1129__CLASS_NREP_MATCH_JUMP*/ /*uniqueobj*/ if (! /*_.VALDATA___V1221*/ meltfptr[1220]) /*_.VALDATA___V1221*/ meltfptr[1220] = (melt_ptr_t) & cdat->dsym_1129__CLASS_NREP_MATCH_JUMP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1129__CLASS_NREP_MATCH_JUMP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1129__CLASS_NREP_MATCH_JUMP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1129__CLASS_NREP_MATCH_JUMP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1129__CLASS_NREP_MATCH_JUMP.obj_hash = 677633544; cdat->dsym_1129__CLASS_NREP_MATCH_JUMP.obj_len = 3; /*inistring dstr_1130__CLASS_NREP_MATCH*/ /*_.VALSTR___V1222*/ meltfptr[1221] = (melt_ptr_t) & cdat->dstr_1130__CLASS_NREP_MATCH; cdat->dstr_1130__CLASS_NREP_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1130__CLASS_NREP_MATCH.val, "CLASS_NREP_MATCH_JUMP", sizeof (cdat->dstr_1130__CLASS_NREP_MATCH. val) - 1); cdat->dstr_1130__CLASS_NREP_MATCH.val[21] = (char) 0; cdat->dstr_1130__CLASS_NREP_MATCH.slen = 21; MELT_LOCATION ("warmelt-normatch.melt:5097:/ iniobj"); /*iniobj dobj_1131__CLASS_NREP_MATCH_JUMP*/ /*_.VALDATA___V1223*/ meltfptr[1222] = (melt_ptr_t) & cdat->dobj_1131__CLASS_NREP_MATCH_JUMP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1131__CLASS_NREP_MATCH_JUMP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1131__CLASS_NREP_MATCH_JUMP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1131__CLASS_NREP_MATCH_JUMP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_1131__CLASS_NREP_MATCH_JUMP.obj_num = MELTOBMAG_OBJECT; cdat->dobj_1131__CLASS_NREP_MATCH_JUMP.obj_hash = 583518671; cdat->dobj_1131__CLASS_NREP_MATCH_JUMP.obj_len = 8; /*inistring dstr_1132__CLASS_NREP_MATCH*/ /*_.VALSTR___V1224*/ meltfptr[1223] = (melt_ptr_t) & cdat->dstr_1132__CLASS_NREP_MATCH; cdat->dstr_1132__CLASS_NREP_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1132__CLASS_NREP_MATCH.val, "CLASS_NREP_MATCH_JUMP", sizeof (cdat->dstr_1132__CLASS_NREP_MATCH. val) - 1); cdat->dstr_1132__CLASS_NREP_MATCH.val[21] = (char) 0; cdat->dstr_1132__CLASS_NREP_MATCH.slen = 21; /*inimult dtup_1133__CLASS_NREP_MATCH_JUMP */ /*_.VALTUP___V1225*/ meltfptr[1224] = (melt_ptr_t) & cdat->dtup_1133__CLASS_NREP_MATCH_JUMP; cdat->dtup_1133__CLASS_NREP_MATCH_JUMP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_1133__CLASS_NREP_MATCH_JUMP.nbval = 3; /*inimult dtup_1134__CLASS_NREP_MATCH_JUMP */ /*_.VALTUP___V1228*/ meltfptr[1227] = (melt_ptr_t) & cdat->dtup_1134__CLASS_NREP_MATCH_JUMP; cdat->dtup_1134__CLASS_NREP_MATCH_JUMP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_1134__CLASS_NREP_MATCH_JUMP.nbval = 2; /*iniobj dsym_1135__NMJMP_LABEL*/ /*uniqueobj*/ if (! /*_.VALDATA___V1229*/ meltfptr[1228]) /*_.VALDATA___V1229*/ meltfptr[1228] = (melt_ptr_t) & cdat->dsym_1135__NMJMP_LABEL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1135__NMJMP_LABEL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1135__NMJMP_LABEL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1135__NMJMP_LABEL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1135__NMJMP_LABEL.obj_hash = 589800906; cdat->dsym_1135__NMJMP_LABEL.obj_len = 3; /*inistring dstr_1136__NMJMP_LABEL*/ /*_.VALSTR___V1230*/ meltfptr[1229] = (melt_ptr_t) & cdat->dstr_1136__NMJMP_LABEL; cdat->dstr_1136__NMJMP_LABEL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1136__NMJMP_LABEL.val, "NMJMP_LABEL", sizeof (cdat->dstr_1136__NMJMP_LABEL.val) - 1); cdat->dstr_1136__NMJMP_LABEL.val[11] = (char) 0; cdat->dstr_1136__NMJMP_LABEL.slen = 11; /*^iniobj */ /*iniobj dobj_1137__NMJMP_LABEL*/ /*_.VALDATA___V1226*/ meltfptr[1225] = (melt_ptr_t) & cdat->dobj_1137__NMJMP_LABEL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1137__NMJMP_LABEL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1137__NMJMP_LABEL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1137__NMJMP_LABEL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1137__NMJMP_LABEL.obj_num = 1; cdat->dobj_1137__NMJMP_LABEL.obj_hash = 685212492; cdat->dobj_1137__NMJMP_LABEL.obj_len = 4; /*inistring dstr_1138__NMJMP_LABEL*/ /*_.VALSTR___V1227*/ meltfptr[1226] = (melt_ptr_t) & cdat->dstr_1138__NMJMP_LABEL; cdat->dstr_1138__NMJMP_LABEL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1138__NMJMP_LABEL.val, "NMJMP_LABEL", sizeof (cdat->dstr_1138__NMJMP_LABEL.val) - 1); cdat->dstr_1138__NMJMP_LABEL.val[11] = (char) 0; cdat->dstr_1138__NMJMP_LABEL.slen = 11; /*iniobj dsym_1139__CLASS_NREP_MATCH_DATA_ACTION*/ /*uniqueobj*/ if (! /*_.VALDATA___V1231*/ meltfptr[1230]) /*_.VALDATA___V1231*/ meltfptr[1230] = (melt_ptr_t) & cdat->dsym_1139__CLASS_NREP_MATCH_DATA_ACTION; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1139__CLASS_NREP_MATCH_DATA_ACTION", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1139__CLASS_NREP_MATCH_DATA_ACTION", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1139__CLASS_NREP_MATCH_DATA_ACTION.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1139__CLASS_NREP_MATCH_DATA_ACTION.obj_hash = 238202196; cdat->dsym_1139__CLASS_NREP_MATCH_DATA_ACTION.obj_len = 3; /*inistring dstr_1140__CLASS_NREP_MATCH*/ /*_.VALSTR___V1232*/ meltfptr[1231] = (melt_ptr_t) & cdat->dstr_1140__CLASS_NREP_MATCH; cdat->dstr_1140__CLASS_NREP_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1140__CLASS_NREP_MATCH.val, "CLASS_NREP_MATCH_DATA_ACTION", sizeof (cdat->dstr_1140__CLASS_NREP_MATCH. val) - 1); cdat->dstr_1140__CLASS_NREP_MATCH.val[28] = (char) 0; cdat->dstr_1140__CLASS_NREP_MATCH.slen = 28; MELT_LOCATION ("warmelt-normatch.melt:5103:/ iniobj"); /*iniobj dobj_1141__CLASS_NREP_MATCH_DATA_ACTION*/ /*_.VALDATA___V1233*/ meltfptr[1232] = (melt_ptr_t) & cdat->dobj_1141__CLASS_NREP_MATCH_DATA_ACTION; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1141__CLASS_NREP_MATCH_DATA_ACTION", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1141__CLASS_NREP_MATCH_DATA_ACTION", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1141__CLASS_NREP_MATCH_DATA_ACTION.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_1141__CLASS_NREP_MATCH_DATA_ACTION.obj_num = MELTOBMAG_OBJECT; cdat->dobj_1141__CLASS_NREP_MATCH_DATA_ACTION.obj_hash = 2386279; cdat->dobj_1141__CLASS_NREP_MATCH_DATA_ACTION.obj_len = 8; /*inistring dstr_1142__CLASS_NREP_MATCH*/ /*_.VALSTR___V1234*/ meltfptr[1233] = (melt_ptr_t) & cdat->dstr_1142__CLASS_NREP_MATCH; cdat->dstr_1142__CLASS_NREP_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1142__CLASS_NREP_MATCH.val, "CLASS_NREP_MATCH_DATA_ACTION", sizeof (cdat->dstr_1142__CLASS_NREP_MATCH. val) - 1); cdat->dstr_1142__CLASS_NREP_MATCH.val[28] = (char) 0; cdat->dstr_1142__CLASS_NREP_MATCH.slen = 28; /*inimult dtup_1143__CLASS_NREP_MATCH_DATA_ACTION */ /*_.VALTUP___V1235*/ meltfptr[1234] = (melt_ptr_t) & cdat->dtup_1143__CLASS_NREP_MATCH_DATA_ACTION; cdat->dtup_1143__CLASS_NREP_MATCH_DATA_ACTION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_1143__CLASS_NREP_MATCH_DATA_ACTION.nbval = 3; /*inimult dtup_1144__CLASS_NREP_MATCH_DATA_ACTION */ /*_.VALTUP___V1238*/ meltfptr[1237] = (melt_ptr_t) & cdat->dtup_1144__CLASS_NREP_MATCH_DATA_ACTION; cdat->dtup_1144__CLASS_NREP_MATCH_DATA_ACTION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_1144__CLASS_NREP_MATCH_DATA_ACTION.nbval = 2; /*iniobj dsym_1145__NMDAC_DATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V1239*/ meltfptr[1238]) /*_.VALDATA___V1239*/ meltfptr[1238] = (melt_ptr_t) & cdat->dsym_1145__NMDAC_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1145__NMDAC_DATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1145__NMDAC_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1145__NMDAC_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1145__NMDAC_DATA.obj_hash = 309058146; cdat->dsym_1145__NMDAC_DATA.obj_len = 3; /*inistring dstr_1146__NMDAC_DATA*/ /*_.VALSTR___V1240*/ meltfptr[1239] = (melt_ptr_t) & cdat->dstr_1146__NMDAC_DATA; cdat->dstr_1146__NMDAC_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1146__NMDAC_DATA.val, "NMDAC_DATA", sizeof (cdat->dstr_1146__NMDAC_DATA.val) - 1); cdat->dstr_1146__NMDAC_DATA.val[10] = (char) 0; cdat->dstr_1146__NMDAC_DATA.slen = 10; /*^iniobj */ /*iniobj dobj_1147__NMDAC_DATA*/ /*_.VALDATA___V1236*/ meltfptr[1235] = (melt_ptr_t) & cdat->dobj_1147__NMDAC_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1147__NMDAC_DATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1147__NMDAC_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1147__NMDAC_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1147__NMDAC_DATA.obj_num = 1; cdat->dobj_1147__NMDAC_DATA.obj_hash = 418005848; cdat->dobj_1147__NMDAC_DATA.obj_len = 4; /*inistring dstr_1148__NMDAC_DATA*/ /*_.VALSTR___V1237*/ meltfptr[1236] = (melt_ptr_t) & cdat->dstr_1148__NMDAC_DATA; cdat->dstr_1148__NMDAC_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1148__NMDAC_DATA.val, "NMDAC_DATA", sizeof (cdat->dstr_1148__NMDAC_DATA.val) - 1); cdat->dstr_1148__NMDAC_DATA.val[10] = (char) 0; cdat->dstr_1148__NMDAC_DATA.slen = 10; /*iniobj dsym_1149__CLASS_NREP_MATCH_DATA_INITIALIZER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1241*/ meltfptr[1240]) /*_.VALDATA___V1241*/ meltfptr[1240] = (melt_ptr_t) & cdat->dsym_1149__CLASS_NREP_MATCH_DATA_INITIALIZER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1149__CLASS_NREP_MATCH_DATA_INITIALIZER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1149__CLASS_NREP_MATCH_DATA_INITIALIZER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1149__CLASS_NREP_MATCH_DATA_INITIALIZER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1149__CLASS_NREP_MATCH_DATA_INITIALIZER.obj_hash = 853828553; cdat->dsym_1149__CLASS_NREP_MATCH_DATA_INITIALIZER.obj_len = 3; /*inistring dstr_1150__CLASS_NREP_MATCH*/ /*_.VALSTR___V1242*/ meltfptr[1241] = (melt_ptr_t) & cdat->dstr_1150__CLASS_NREP_MATCH; cdat->dstr_1150__CLASS_NREP_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1150__CLASS_NREP_MATCH.val, "CLASS_NREP_MATCH_DATA_INITIALIZER", sizeof (cdat->dstr_1150__CLASS_NREP_MATCH. val) - 1); cdat->dstr_1150__CLASS_NREP_MATCH.val[33] = (char) 0; cdat->dstr_1150__CLASS_NREP_MATCH.slen = 33; MELT_LOCATION ("warmelt-normatch.melt:5109:/ iniobj"); /*iniobj dobj_1151__CLASS_NREP_MATCH_DATA_INITIALIZER*/ /*_.VALDATA___V1243*/ meltfptr[1242] = (melt_ptr_t) & cdat->dobj_1151__CLASS_NREP_MATCH_DATA_INITIALIZER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1151__CLASS_NREP_MATCH_DATA_INITIALIZER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1151__CLASS_NREP_MATCH_DATA_INITIALIZER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1151__CLASS_NREP_MATCH_DATA_INITIALIZER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_1151__CLASS_NREP_MATCH_DATA_INITIALIZER.obj_num = MELTOBMAG_OBJECT; cdat->dobj_1151__CLASS_NREP_MATCH_DATA_INITIALIZER.obj_hash = 811452784; cdat->dobj_1151__CLASS_NREP_MATCH_DATA_INITIALIZER.obj_len = 8; /*inistring dstr_1152__CLASS_NREP_MATCH*/ /*_.VALSTR___V1244*/ meltfptr[1243] = (melt_ptr_t) & cdat->dstr_1152__CLASS_NREP_MATCH; cdat->dstr_1152__CLASS_NREP_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1152__CLASS_NREP_MATCH.val, "CLASS_NREP_MATCH_DATA_INITIALIZER", sizeof (cdat->dstr_1152__CLASS_NREP_MATCH. val) - 1); cdat->dstr_1152__CLASS_NREP_MATCH.val[33] = (char) 0; cdat->dstr_1152__CLASS_NREP_MATCH.slen = 33; /*inimult dtup_1153__CLASS_NREP_MATCH_DATA_INITIALIZER */ /*_.VALTUP___V1245*/ meltfptr[1244] = (melt_ptr_t) & cdat->dtup_1153__CLASS_NREP_MATCH_DATA_INITIALIZER; cdat->dtup_1153__CLASS_NREP_MATCH_DATA_INITIALIZER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_1153__CLASS_NREP_MATCH_DATA_INITIALIZER.nbval = 4; /*inimult dtup_1154__CLASS_NREP_MATCH_DATA_INITIALIZER */ /*_.VALTUP___V1246*/ meltfptr[1245] = (melt_ptr_t) & cdat->dtup_1154__CLASS_NREP_MATCH_DATA_INITIALIZER; cdat->dtup_1154__CLASS_NREP_MATCH_DATA_INITIALIZER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_1154__CLASS_NREP_MATCH_DATA_INITIALIZER.nbval = 2; /*iniobj dsym_1155__CLASS_NREP_MATCH_DATA_CLEAR*/ /*uniqueobj*/ if (! /*_.VALDATA___V1247*/ meltfptr[1246]) /*_.VALDATA___V1247*/ meltfptr[1246] = (melt_ptr_t) & cdat->dsym_1155__CLASS_NREP_MATCH_DATA_CLEAR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1155__CLASS_NREP_MATCH_DATA_CLEAR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1155__CLASS_NREP_MATCH_DATA_CLEAR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1155__CLASS_NREP_MATCH_DATA_CLEAR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1155__CLASS_NREP_MATCH_DATA_CLEAR.obj_hash = 569100648; cdat->dsym_1155__CLASS_NREP_MATCH_DATA_CLEAR.obj_len = 3; /*inistring dstr_1156__CLASS_NREP_MATCH*/ /*_.VALSTR___V1248*/ meltfptr[1247] = (melt_ptr_t) & cdat->dstr_1156__CLASS_NREP_MATCH; cdat->dstr_1156__CLASS_NREP_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1156__CLASS_NREP_MATCH.val, "CLASS_NREP_MATCH_DATA_CLEAR", sizeof (cdat->dstr_1156__CLASS_NREP_MATCH. val) - 1); cdat->dstr_1156__CLASS_NREP_MATCH.val[27] = (char) 0; cdat->dstr_1156__CLASS_NREP_MATCH.slen = 27; MELT_LOCATION ("warmelt-normatch.melt:5116:/ iniobj"); /*iniobj dobj_1157__CLASS_NREP_MATCH_DATA_CLEAR*/ /*_.VALDATA___V1249*/ meltfptr[1248] = (melt_ptr_t) & cdat->dobj_1157__CLASS_NREP_MATCH_DATA_CLEAR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1157__CLASS_NREP_MATCH_DATA_CLEAR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1157__CLASS_NREP_MATCH_DATA_CLEAR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1157__CLASS_NREP_MATCH_DATA_CLEAR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_1157__CLASS_NREP_MATCH_DATA_CLEAR.obj_num = MELTOBMAG_OBJECT; cdat->dobj_1157__CLASS_NREP_MATCH_DATA_CLEAR.obj_hash = 1017543583; cdat->dobj_1157__CLASS_NREP_MATCH_DATA_CLEAR.obj_len = 8; /*inistring dstr_1158__CLASS_NREP_MATCH*/ /*_.VALSTR___V1250*/ meltfptr[1249] = (melt_ptr_t) & cdat->dstr_1158__CLASS_NREP_MATCH; cdat->dstr_1158__CLASS_NREP_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1158__CLASS_NREP_MATCH.val, "CLASS_NREP_MATCH_DATA_CLEAR", sizeof (cdat->dstr_1158__CLASS_NREP_MATCH. val) - 1); cdat->dstr_1158__CLASS_NREP_MATCH.val[27] = (char) 0; cdat->dstr_1158__CLASS_NREP_MATCH.slen = 27; /*inimult dtup_1159__CLASS_NREP_MATCH_DATA_CLEAR */ /*_.VALTUP___V1251*/ meltfptr[1250] = (melt_ptr_t) & cdat->dtup_1159__CLASS_NREP_MATCH_DATA_CLEAR; cdat->dtup_1159__CLASS_NREP_MATCH_DATA_CLEAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_1159__CLASS_NREP_MATCH_DATA_CLEAR.nbval = 4; /*inimult dtup_1160__CLASS_NREP_MATCH_DATA_CLEAR */ /*_.VALTUP___V1252*/ meltfptr[1251] = (melt_ptr_t) & cdat->dtup_1160__CLASS_NREP_MATCH_DATA_CLEAR; cdat->dtup_1160__CLASS_NREP_MATCH_DATA_CLEAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_1160__CLASS_NREP_MATCH_DATA_CLEAR.nbval = 2; /*iniobj dsym_1161__CLASS_NREP_MATCH_DATA_FINALIZER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1253*/ meltfptr[1252]) /*_.VALDATA___V1253*/ meltfptr[1252] = (melt_ptr_t) & cdat->dsym_1161__CLASS_NREP_MATCH_DATA_FINALIZER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1161__CLASS_NREP_MATCH_DATA_FINALIZER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1161__CLASS_NREP_MATCH_DATA_FINALIZER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1161__CLASS_NREP_MATCH_DATA_FINALIZER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1161__CLASS_NREP_MATCH_DATA_FINALIZER.obj_hash = 1028831781; cdat->dsym_1161__CLASS_NREP_MATCH_DATA_FINALIZER.obj_len = 3; /*inistring dstr_1162__CLASS_NREP_MATCH*/ /*_.VALSTR___V1254*/ meltfptr[1253] = (melt_ptr_t) & cdat->dstr_1162__CLASS_NREP_MATCH; cdat->dstr_1162__CLASS_NREP_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1162__CLASS_NREP_MATCH.val, "CLASS_NREP_MATCH_DATA_FINALIZER", sizeof (cdat->dstr_1162__CLASS_NREP_MATCH. val) - 1); cdat->dstr_1162__CLASS_NREP_MATCH.val[31] = (char) 0; cdat->dstr_1162__CLASS_NREP_MATCH.slen = 31; MELT_LOCATION ("warmelt-normatch.melt:5123:/ iniobj"); /*iniobj dobj_1163__CLASS_NREP_MATCH_DATA_FINALIZER*/ /*_.VALDATA___V1255*/ meltfptr[1254] = (melt_ptr_t) & cdat->dobj_1163__CLASS_NREP_MATCH_DATA_FINALIZER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1163__CLASS_NREP_MATCH_DATA_FINALIZER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1163__CLASS_NREP_MATCH_DATA_FINALIZER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1163__CLASS_NREP_MATCH_DATA_FINALIZER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_1163__CLASS_NREP_MATCH_DATA_FINALIZER.obj_num = MELTOBMAG_OBJECT; cdat->dobj_1163__CLASS_NREP_MATCH_DATA_FINALIZER.obj_hash = 613891091; cdat->dobj_1163__CLASS_NREP_MATCH_DATA_FINALIZER.obj_len = 8; /*inistring dstr_1164__CLASS_NREP_MATCH*/ /*_.VALSTR___V1256*/ meltfptr[1255] = (melt_ptr_t) & cdat->dstr_1164__CLASS_NREP_MATCH; cdat->dstr_1164__CLASS_NREP_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1164__CLASS_NREP_MATCH.val, "CLASS_NREP_MATCH_DATA_FINALIZER", sizeof (cdat->dstr_1164__CLASS_NREP_MATCH. val) - 1); cdat->dstr_1164__CLASS_NREP_MATCH.val[31] = (char) 0; cdat->dstr_1164__CLASS_NREP_MATCH.slen = 31; /*inimult dtup_1165__CLASS_NREP_MATCH_DATA_FINALIZER */ /*_.VALTUP___V1257*/ meltfptr[1256] = (melt_ptr_t) & cdat->dtup_1165__CLASS_NREP_MATCH_DATA_FINALIZER; cdat->dtup_1165__CLASS_NREP_MATCH_DATA_FINALIZER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_1165__CLASS_NREP_MATCH_DATA_FINALIZER.nbval = 4; /*inimult dtup_1166__CLASS_NREP_MATCH_DATA_FINALIZER */ /*_.VALTUP___V1258*/ meltfptr[1257] = (melt_ptr_t) & cdat->dtup_1166__CLASS_NREP_MATCH_DATA_FINALIZER; cdat->dtup_1166__CLASS_NREP_MATCH_DATA_FINALIZER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_1166__CLASS_NREP_MATCH_DATA_FINALIZER.nbval = 2; /*iniobj dsym_1167__CLASS_NREP_JUMP_WHEN_IS_A*/ /*uniqueobj*/ if (! /*_.VALDATA___V1259*/ meltfptr[1258]) /*_.VALDATA___V1259*/ meltfptr[1258] = (melt_ptr_t) & cdat->dsym_1167__CLASS_NREP_JUMP_WHEN_IS_A; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1167__CLASS_NREP_JUMP_WHEN_IS_A", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1167__CLASS_NREP_JUMP_WHEN_IS_A", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1167__CLASS_NREP_JUMP_WHEN_IS_A.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1167__CLASS_NREP_JUMP_WHEN_IS_A.obj_hash = 92344462; cdat->dsym_1167__CLASS_NREP_JUMP_WHEN_IS_A.obj_len = 3; /*inistring dstr_1168__CLASS_NREP_JUMP_*/ /*_.VALSTR___V1260*/ meltfptr[1259] = (melt_ptr_t) & cdat->dstr_1168__CLASS_NREP_JUMP_; cdat->dstr_1168__CLASS_NREP_JUMP_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1168__CLASS_NREP_JUMP_.val, "CLASS_NREP_JUMP_WHEN_IS_A", sizeof (cdat->dstr_1168__CLASS_NREP_JUMP_. val) - 1); cdat->dstr_1168__CLASS_NREP_JUMP_.val[25] = (char) 0; cdat->dstr_1168__CLASS_NREP_JUMP_.slen = 25; MELT_LOCATION ("warmelt-normatch.melt:5131:/ iniobj"); /*iniobj dobj_1169__CLASS_NREP_JUMP_WHEN_IS_A*/ /*_.VALDATA___V1261*/ meltfptr[1260] = (melt_ptr_t) & cdat->dobj_1169__CLASS_NREP_JUMP_WHEN_IS_A; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1169__CLASS_NREP_JUMP_WHEN_IS_A", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1169__CLASS_NREP_JUMP_WHEN_IS_A", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1169__CLASS_NREP_JUMP_WHEN_IS_A.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_1169__CLASS_NREP_JUMP_WHEN_IS_A.obj_num = MELTOBMAG_OBJECT; cdat->dobj_1169__CLASS_NREP_JUMP_WHEN_IS_A.obj_hash = 989249871; cdat->dobj_1169__CLASS_NREP_JUMP_WHEN_IS_A.obj_len = 8; /*inistring dstr_1170__CLASS_NREP_JUMP_*/ /*_.VALSTR___V1262*/ meltfptr[1261] = (melt_ptr_t) & cdat->dstr_1170__CLASS_NREP_JUMP_; cdat->dstr_1170__CLASS_NREP_JUMP_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1170__CLASS_NREP_JUMP_.val, "CLASS_NREP_JUMP_WHEN_IS_A", sizeof (cdat->dstr_1170__CLASS_NREP_JUMP_. val) - 1); cdat->dstr_1170__CLASS_NREP_JUMP_.val[25] = (char) 0; cdat->dstr_1170__CLASS_NREP_JUMP_.slen = 25; /*inimult dtup_1171__CLASS_NREP_JUMP_WHEN_IS_A */ /*_.VALTUP___V1263*/ meltfptr[1262] = (melt_ptr_t) & cdat->dtup_1171__CLASS_NREP_JUMP_WHEN_IS_A; cdat->dtup_1171__CLASS_NREP_JUMP_WHEN_IS_A.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_1171__CLASS_NREP_JUMP_WHEN_IS_A.nbval = 3; /*inimult dtup_1172__CLASS_NREP_JUMP_WHEN_IS_A */ /*_.VALTUP___V1270*/ meltfptr[1269] = (melt_ptr_t) & cdat->dtup_1172__CLASS_NREP_JUMP_WHEN_IS_A; cdat->dtup_1172__CLASS_NREP_JUMP_WHEN_IS_A.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_1172__CLASS_NREP_JUMP_WHEN_IS_A.nbval = 4; /*iniobj dsym_1173__NTESTISA_VALUE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1271*/ meltfptr[1270]) /*_.VALDATA___V1271*/ meltfptr[1270] = (melt_ptr_t) & cdat->dsym_1173__NTESTISA_VALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1173__NTESTISA_VALUE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1173__NTESTISA_VALUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1173__NTESTISA_VALUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1173__NTESTISA_VALUE.obj_hash = 935519465; cdat->dsym_1173__NTESTISA_VALUE.obj_len = 3; /*inistring dstr_1174__NTESTISA_VALUE*/ /*_.VALSTR___V1272*/ meltfptr[1271] = (melt_ptr_t) & cdat->dstr_1174__NTESTISA_VALUE; cdat->dstr_1174__NTESTISA_VALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1174__NTESTISA_VALUE.val, "NTESTISA_VALUE", sizeof (cdat->dstr_1174__NTESTISA_VALUE.val) - 1); cdat->dstr_1174__NTESTISA_VALUE.val[14] = (char) 0; cdat->dstr_1174__NTESTISA_VALUE.slen = 14; /*^iniobj */ /*iniobj dobj_1175__NTESTISA_VALUE*/ /*_.VALDATA___V1264*/ meltfptr[1263] = (melt_ptr_t) & cdat->dobj_1175__NTESTISA_VALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1175__NTESTISA_VALUE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1175__NTESTISA_VALUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1175__NTESTISA_VALUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1175__NTESTISA_VALUE.obj_num = 1; cdat->dobj_1175__NTESTISA_VALUE.obj_hash = 676834082; cdat->dobj_1175__NTESTISA_VALUE.obj_len = 4; /*inistring dstr_1176__NTESTISA_VALUE*/ /*_.VALSTR___V1265*/ meltfptr[1264] = (melt_ptr_t) & cdat->dstr_1176__NTESTISA_VALUE; cdat->dstr_1176__NTESTISA_VALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1176__NTESTISA_VALUE.val, "NTESTISA_VALUE", sizeof (cdat->dstr_1176__NTESTISA_VALUE.val) - 1); cdat->dstr_1176__NTESTISA_VALUE.val[14] = (char) 0; cdat->dstr_1176__NTESTISA_VALUE.slen = 14; /*iniobj dsym_1177__NTESTISA_CLASS*/ /*uniqueobj*/ if (! /*_.VALDATA___V1273*/ meltfptr[1272]) /*_.VALDATA___V1273*/ meltfptr[1272] = (melt_ptr_t) & cdat->dsym_1177__NTESTISA_CLASS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1177__NTESTISA_CLASS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1177__NTESTISA_CLASS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1177__NTESTISA_CLASS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1177__NTESTISA_CLASS.obj_hash = 446855945; cdat->dsym_1177__NTESTISA_CLASS.obj_len = 3; /*inistring dstr_1178__NTESTISA_CLASS*/ /*_.VALSTR___V1274*/ meltfptr[1273] = (melt_ptr_t) & cdat->dstr_1178__NTESTISA_CLASS; cdat->dstr_1178__NTESTISA_CLASS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1178__NTESTISA_CLASS.val, "NTESTISA_CLASS", sizeof (cdat->dstr_1178__NTESTISA_CLASS.val) - 1); cdat->dstr_1178__NTESTISA_CLASS.val[14] = (char) 0; cdat->dstr_1178__NTESTISA_CLASS.slen = 14; /*^iniobj */ /*iniobj dobj_1179__NTESTISA_CLASS*/ /*_.VALDATA___V1266*/ meltfptr[1265] = (melt_ptr_t) & cdat->dobj_1179__NTESTISA_CLASS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1179__NTESTISA_CLASS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1179__NTESTISA_CLASS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1179__NTESTISA_CLASS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1179__NTESTISA_CLASS.obj_num = 2; cdat->dobj_1179__NTESTISA_CLASS.obj_hash = 130794578; cdat->dobj_1179__NTESTISA_CLASS.obj_len = 4; /*inistring dstr_1180__NTESTISA_CLASS*/ /*_.VALSTR___V1267*/ meltfptr[1266] = (melt_ptr_t) & cdat->dstr_1180__NTESTISA_CLASS; cdat->dstr_1180__NTESTISA_CLASS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1180__NTESTISA_CLASS.val, "NTESTISA_CLASS", sizeof (cdat->dstr_1180__NTESTISA_CLASS.val) - 1); cdat->dstr_1180__NTESTISA_CLASS.val[14] = (char) 0; cdat->dstr_1180__NTESTISA_CLASS.slen = 14; /*iniobj dsym_1181__NTESTISA_JUMP*/ /*uniqueobj*/ if (! /*_.VALDATA___V1275*/ meltfptr[1274]) /*_.VALDATA___V1275*/ meltfptr[1274] = (melt_ptr_t) & cdat->dsym_1181__NTESTISA_JUMP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1181__NTESTISA_JUMP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1181__NTESTISA_JUMP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1181__NTESTISA_JUMP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1181__NTESTISA_JUMP.obj_hash = 36616436; cdat->dsym_1181__NTESTISA_JUMP.obj_len = 3; /*inistring dstr_1182__NTESTISA_JUMP*/ /*_.VALSTR___V1276*/ meltfptr[1275] = (melt_ptr_t) & cdat->dstr_1182__NTESTISA_JUMP; cdat->dstr_1182__NTESTISA_JUMP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1182__NTESTISA_JUMP.val, "NTESTISA_JUMP", sizeof (cdat->dstr_1182__NTESTISA_JUMP.val) - 1); cdat->dstr_1182__NTESTISA_JUMP.val[13] = (char) 0; cdat->dstr_1182__NTESTISA_JUMP.slen = 13; /*^iniobj */ /*iniobj dobj_1183__NTESTISA_JUMP*/ /*_.VALDATA___V1268*/ meltfptr[1267] = (melt_ptr_t) & cdat->dobj_1183__NTESTISA_JUMP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1183__NTESTISA_JUMP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1183__NTESTISA_JUMP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1183__NTESTISA_JUMP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1183__NTESTISA_JUMP.obj_num = 3; cdat->dobj_1183__NTESTISA_JUMP.obj_hash = 734982354; cdat->dobj_1183__NTESTISA_JUMP.obj_len = 4; /*inistring dstr_1184__NTESTISA_JUMP*/ /*_.VALSTR___V1269*/ meltfptr[1268] = (melt_ptr_t) & cdat->dstr_1184__NTESTISA_JUMP; cdat->dstr_1184__NTESTISA_JUMP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1184__NTESTISA_JUMP.val, "NTESTISA_JUMP", sizeof (cdat->dstr_1184__NTESTISA_JUMP.val) - 1); cdat->dstr_1184__NTESTISA_JUMP.val[13] = (char) 0; cdat->dstr_1184__NTESTISA_JUMP.slen = 13; /*iniobj dsym_1185__CLASS_MATCH_NORMALIZATION_CONTEXT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1277*/ meltfptr[1276]) /*_.VALDATA___V1277*/ meltfptr[1276] = (melt_ptr_t) & cdat->dsym_1185__CLASS_MATCH_NORMALIZATION_CONTEXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1185__CLASS_MATCH_NORMALIZATION_CONTEXT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1185__CLASS_MATCH_NORMALIZATION_CONTEXT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1185__CLASS_MATCH_NORMALIZATION_CONTEXT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1185__CLASS_MATCH_NORMALIZATION_CONTEXT.obj_hash = 153403683; cdat->dsym_1185__CLASS_MATCH_NORMALIZATION_CONTEXT.obj_len = 3; /*inistring dstr_1186__CLASS_MATCH_NORM*/ /*_.VALSTR___V1278*/ meltfptr[1277] = (melt_ptr_t) & cdat->dstr_1186__CLASS_MATCH_NORM; cdat->dstr_1186__CLASS_MATCH_NORM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1186__CLASS_MATCH_NORM.val, "CLASS_MATCH_NORMALIZATION_CONTEXT", sizeof (cdat->dstr_1186__CLASS_MATCH_NORM. val) - 1); cdat->dstr_1186__CLASS_MATCH_NORM.val[33] = (char) 0; cdat->dstr_1186__CLASS_MATCH_NORM.slen = 33; MELT_LOCATION ("warmelt-normatch.melt:5142:/ iniobj"); /*iniobj dobj_1187__CLASS_MATCH_NORMALIZATION_CONTEXT*/ /*_.VALDATA___V1279*/ meltfptr[1278] = (melt_ptr_t) & cdat->dobj_1187__CLASS_MATCH_NORMALIZATION_CONTEXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1187__CLASS_MATCH_NORMALIZATION_CONTEXT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1187__CLASS_MATCH_NORMALIZATION_CONTEXT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1187__CLASS_MATCH_NORMALIZATION_CONTEXT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_1187__CLASS_MATCH_NORMALIZATION_CONTEXT.obj_num = MELTOBMAG_OBJECT; cdat->dobj_1187__CLASS_MATCH_NORMALIZATION_CONTEXT.obj_hash = 396078182; cdat->dobj_1187__CLASS_MATCH_NORMALIZATION_CONTEXT.obj_len = 8; /*inistring dstr_1188__CLASS_MATCH_NORM*/ /*_.VALSTR___V1280*/ meltfptr[1279] = (melt_ptr_t) & cdat->dstr_1188__CLASS_MATCH_NORM; cdat->dstr_1188__CLASS_MATCH_NORM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1188__CLASS_MATCH_NORM.val, "CLASS_MATCH_NORMALIZATION_CONTEXT", sizeof (cdat->dstr_1188__CLASS_MATCH_NORM. val) - 1); cdat->dstr_1188__CLASS_MATCH_NORM.val[33] = (char) 0; cdat->dstr_1188__CLASS_MATCH_NORM.slen = 33; /*inimult dtup_1189__CLASS_MATCH_NORMALIZATION_CONTEXT */ /*_.VALTUP___V1281*/ meltfptr[1280] = (melt_ptr_t) & cdat->dtup_1189__CLASS_MATCH_NORMALIZATION_CONTEXT; cdat->dtup_1189__CLASS_MATCH_NORMALIZATION_CONTEXT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_1189__CLASS_MATCH_NORMALIZATION_CONTEXT.nbval = 1; /*inimult dtup_1190__CLASS_MATCH_NORMALIZATION_CONTEXT */ /*_.VALTUP___V1304*/ meltfptr[1303] = (melt_ptr_t) & cdat->dtup_1190__CLASS_MATCH_NORMALIZATION_CONTEXT; cdat->dtup_1190__CLASS_MATCH_NORMALIZATION_CONTEXT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_1190__CLASS_MATCH_NORMALIZATION_CONTEXT.nbval = 11; /*iniobj dsym_1191__MATNORX_RESLOC*/ /*uniqueobj*/ if (! /*_.VALDATA___V1305*/ meltfptr[1304]) /*_.VALDATA___V1305*/ meltfptr[1304] = (melt_ptr_t) & cdat->dsym_1191__MATNORX_RESLOC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1191__MATNORX_RESLOC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1191__MATNORX_RESLOC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1191__MATNORX_RESLOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1191__MATNORX_RESLOC.obj_hash = 570941571; cdat->dsym_1191__MATNORX_RESLOC.obj_len = 3; /*inistring dstr_1192__MATNORX_RESLOC*/ /*_.VALSTR___V1306*/ meltfptr[1305] = (melt_ptr_t) & cdat->dstr_1192__MATNORX_RESLOC; cdat->dstr_1192__MATNORX_RESLOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1192__MATNORX_RESLOC.val, "MATNORX_RESLOC", sizeof (cdat->dstr_1192__MATNORX_RESLOC.val) - 1); cdat->dstr_1192__MATNORX_RESLOC.val[14] = (char) 0; cdat->dstr_1192__MATNORX_RESLOC.slen = 14; /*^iniobj */ /*iniobj dobj_1193__MATNORX_RESLOC*/ /*_.VALDATA___V1282*/ meltfptr[1281] = (melt_ptr_t) & cdat->dobj_1193__MATNORX_RESLOC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1193__MATNORX_RESLOC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1193__MATNORX_RESLOC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1193__MATNORX_RESLOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1193__MATNORX_RESLOC.obj_num = 0; cdat->dobj_1193__MATNORX_RESLOC.obj_hash = 281410118; cdat->dobj_1193__MATNORX_RESLOC.obj_len = 4; /*inistring dstr_1194__MATNORX_RESLOC*/ /*_.VALSTR___V1283*/ meltfptr[1282] = (melt_ptr_t) & cdat->dstr_1194__MATNORX_RESLOC; cdat->dstr_1194__MATNORX_RESLOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1194__MATNORX_RESLOC.val, "MATNORX_RESLOC", sizeof (cdat->dstr_1194__MATNORX_RESLOC.val) - 1); cdat->dstr_1194__MATNORX_RESLOC.val[14] = (char) 0; cdat->dstr_1194__MATNORX_RESLOC.slen = 14; /*iniobj dsym_1195__MATNORX_NMATCH*/ /*uniqueobj*/ if (! /*_.VALDATA___V1307*/ meltfptr[1306]) /*_.VALDATA___V1307*/ meltfptr[1306] = (melt_ptr_t) & cdat->dsym_1195__MATNORX_NMATCH; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1195__MATNORX_NMATCH", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1195__MATNORX_NMATCH", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1195__MATNORX_NMATCH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1195__MATNORX_NMATCH.obj_hash = 653687349; cdat->dsym_1195__MATNORX_NMATCH.obj_len = 3; /*inistring dstr_1196__MATNORX_NMATCH*/ /*_.VALSTR___V1308*/ meltfptr[1307] = (melt_ptr_t) & cdat->dstr_1196__MATNORX_NMATCH; cdat->dstr_1196__MATNORX_NMATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1196__MATNORX_NMATCH.val, "MATNORX_NMATCH", sizeof (cdat->dstr_1196__MATNORX_NMATCH.val) - 1); cdat->dstr_1196__MATNORX_NMATCH.val[14] = (char) 0; cdat->dstr_1196__MATNORX_NMATCH.slen = 14; /*^iniobj */ /*iniobj dobj_1197__MATNORX_NMATCH*/ /*_.VALDATA___V1284*/ meltfptr[1283] = (melt_ptr_t) & cdat->dobj_1197__MATNORX_NMATCH; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1197__MATNORX_NMATCH", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1197__MATNORX_NMATCH", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1197__MATNORX_NMATCH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1197__MATNORX_NMATCH.obj_num = 1; cdat->dobj_1197__MATNORX_NMATCH.obj_hash = 384219420; cdat->dobj_1197__MATNORX_NMATCH.obj_len = 4; /*inistring dstr_1198__MATNORX_NMATCH*/ /*_.VALSTR___V1285*/ meltfptr[1284] = (melt_ptr_t) & cdat->dstr_1198__MATNORX_NMATCH; cdat->dstr_1198__MATNORX_NMATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1198__MATNORX_NMATCH.val, "MATNORX_NMATCH", sizeof (cdat->dstr_1198__MATNORX_NMATCH.val) - 1); cdat->dstr_1198__MATNORX_NMATCH.val[14] = (char) 0; cdat->dstr_1198__MATNORX_NMATCH.slen = 14; /*iniobj dsym_1199__MATNORX_DATAMAP*/ /*uniqueobj*/ if (! /*_.VALDATA___V1309*/ meltfptr[1308]) /*_.VALDATA___V1309*/ meltfptr[1308] = (melt_ptr_t) & cdat->dsym_1199__MATNORX_DATAMAP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1199__MATNORX_DATAMAP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1199__MATNORX_DATAMAP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1199__MATNORX_DATAMAP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1199__MATNORX_DATAMAP.obj_hash = 268079278; cdat->dsym_1199__MATNORX_DATAMAP.obj_len = 3; /*inistring dstr_1200__MATNORX_DATAMAP*/ /*_.VALSTR___V1310*/ meltfptr[1309] = (melt_ptr_t) & cdat->dstr_1200__MATNORX_DATAMAP; cdat->dstr_1200__MATNORX_DATAMAP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1200__MATNORX_DATAMAP.val, "MATNORX_DATAMAP", sizeof (cdat->dstr_1200__MATNORX_DATAMAP. val) - 1); cdat->dstr_1200__MATNORX_DATAMAP.val[15] = (char) 0; cdat->dstr_1200__MATNORX_DATAMAP.slen = 15; /*^iniobj */ /*iniobj dobj_1201__MATNORX_DATAMAP*/ /*_.VALDATA___V1286*/ meltfptr[1285] = (melt_ptr_t) & cdat->dobj_1201__MATNORX_DATAMAP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1201__MATNORX_DATAMAP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1201__MATNORX_DATAMAP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1201__MATNORX_DATAMAP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1201__MATNORX_DATAMAP.obj_num = 2; cdat->dobj_1201__MATNORX_DATAMAP.obj_hash = 658619560; cdat->dobj_1201__MATNORX_DATAMAP.obj_len = 4; /*inistring dstr_1202__MATNORX_DATAMAP*/ /*_.VALSTR___V1287*/ meltfptr[1286] = (melt_ptr_t) & cdat->dstr_1202__MATNORX_DATAMAP; cdat->dstr_1202__MATNORX_DATAMAP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1202__MATNORX_DATAMAP.val, "MATNORX_DATAMAP", sizeof (cdat->dstr_1202__MATNORX_DATAMAP. val) - 1); cdat->dstr_1202__MATNORX_DATAMAP.val[15] = (char) 0; cdat->dstr_1202__MATNORX_DATAMAP.slen = 15; /*iniobj dsym_1203__MATNORX_FLAGMAP*/ /*uniqueobj*/ if (! /*_.VALDATA___V1311*/ meltfptr[1310]) /*_.VALDATA___V1311*/ meltfptr[1310] = (melt_ptr_t) & cdat->dsym_1203__MATNORX_FLAGMAP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1203__MATNORX_FLAGMAP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1203__MATNORX_FLAGMAP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1203__MATNORX_FLAGMAP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1203__MATNORX_FLAGMAP.obj_hash = 841099985; cdat->dsym_1203__MATNORX_FLAGMAP.obj_len = 3; /*inistring dstr_1204__MATNORX_FLAGMAP*/ /*_.VALSTR___V1312*/ meltfptr[1311] = (melt_ptr_t) & cdat->dstr_1204__MATNORX_FLAGMAP; cdat->dstr_1204__MATNORX_FLAGMAP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1204__MATNORX_FLAGMAP.val, "MATNORX_FLAGMAP", sizeof (cdat->dstr_1204__MATNORX_FLAGMAP. val) - 1); cdat->dstr_1204__MATNORX_FLAGMAP.val[15] = (char) 0; cdat->dstr_1204__MATNORX_FLAGMAP.slen = 15; /*^iniobj */ /*iniobj dobj_1205__MATNORX_FLAGMAP*/ /*_.VALDATA___V1288*/ meltfptr[1287] = (melt_ptr_t) & cdat->dobj_1205__MATNORX_FLAGMAP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1205__MATNORX_FLAGMAP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1205__MATNORX_FLAGMAP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1205__MATNORX_FLAGMAP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1205__MATNORX_FLAGMAP.obj_num = 3; cdat->dobj_1205__MATNORX_FLAGMAP.obj_hash = 285303114; cdat->dobj_1205__MATNORX_FLAGMAP.obj_len = 4; /*inistring dstr_1206__MATNORX_FLAGMAP*/ /*_.VALSTR___V1289*/ meltfptr[1288] = (melt_ptr_t) & cdat->dstr_1206__MATNORX_FLAGMAP; cdat->dstr_1206__MATNORX_FLAGMAP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1206__MATNORX_FLAGMAP.val, "MATNORX_FLAGMAP", sizeof (cdat->dstr_1206__MATNORX_FLAGMAP. val) - 1); cdat->dstr_1206__MATNORX_FLAGMAP.val[15] = (char) 0; cdat->dstr_1206__MATNORX_FLAGMAP.slen = 15; /*iniobj dsym_1207__MATNORX_STEPMAP*/ /*uniqueobj*/ if (! /*_.VALDATA___V1313*/ meltfptr[1312]) /*_.VALDATA___V1313*/ meltfptr[1312] = (melt_ptr_t) & cdat->dsym_1207__MATNORX_STEPMAP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1207__MATNORX_STEPMAP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1207__MATNORX_STEPMAP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1207__MATNORX_STEPMAP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1207__MATNORX_STEPMAP.obj_hash = 10097940; cdat->dsym_1207__MATNORX_STEPMAP.obj_len = 3; /*inistring dstr_1208__MATNORX_STEPMAP*/ /*_.VALSTR___V1314*/ meltfptr[1313] = (melt_ptr_t) & cdat->dstr_1208__MATNORX_STEPMAP; cdat->dstr_1208__MATNORX_STEPMAP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1208__MATNORX_STEPMAP.val, "MATNORX_STEPMAP", sizeof (cdat->dstr_1208__MATNORX_STEPMAP. val) - 1); cdat->dstr_1208__MATNORX_STEPMAP.val[15] = (char) 0; cdat->dstr_1208__MATNORX_STEPMAP.slen = 15; /*^iniobj */ /*iniobj dobj_1209__MATNORX_STEPMAP*/ /*_.VALDATA___V1290*/ meltfptr[1289] = (melt_ptr_t) & cdat->dobj_1209__MATNORX_STEPMAP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1209__MATNORX_STEPMAP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1209__MATNORX_STEPMAP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1209__MATNORX_STEPMAP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1209__MATNORX_STEPMAP.obj_num = 4; cdat->dobj_1209__MATNORX_STEPMAP.obj_hash = 26803910; cdat->dobj_1209__MATNORX_STEPMAP.obj_len = 4; /*inistring dstr_1210__MATNORX_STEPMAP*/ /*_.VALSTR___V1291*/ meltfptr[1290] = (melt_ptr_t) & cdat->dstr_1210__MATNORX_STEPMAP; cdat->dstr_1210__MATNORX_STEPMAP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1210__MATNORX_STEPMAP.val, "MATNORX_STEPMAP", sizeof (cdat->dstr_1210__MATNORX_STEPMAP. val) - 1); cdat->dstr_1210__MATNORX_STEPMAP.val[15] = (char) 0; cdat->dstr_1210__MATNORX_STEPMAP.slen = 15; /*iniobj dsym_1211__MATNORX_MDATAQUEUE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1315*/ meltfptr[1314]) /*_.VALDATA___V1315*/ meltfptr[1314] = (melt_ptr_t) & cdat->dsym_1211__MATNORX_MDATAQUEUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1211__MATNORX_MDATAQUEUE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1211__MATNORX_MDATAQUEUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1211__MATNORX_MDATAQUEUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1211__MATNORX_MDATAQUEUE.obj_hash = 210790519; cdat->dsym_1211__MATNORX_MDATAQUEUE.obj_len = 3; /*inistring dstr_1212__MATNORX_MDATAQUE*/ /*_.VALSTR___V1316*/ meltfptr[1315] = (melt_ptr_t) & cdat->dstr_1212__MATNORX_MDATAQUE; cdat->dstr_1212__MATNORX_MDATAQUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1212__MATNORX_MDATAQUE.val, "MATNORX_MDATAQUEUE", sizeof (cdat->dstr_1212__MATNORX_MDATAQUE. val) - 1); cdat->dstr_1212__MATNORX_MDATAQUE.val[18] = (char) 0; cdat->dstr_1212__MATNORX_MDATAQUE.slen = 18; /*^iniobj */ /*iniobj dobj_1213__MATNORX_MDATAQUEUE*/ /*_.VALDATA___V1292*/ meltfptr[1291] = (melt_ptr_t) & cdat->dobj_1213__MATNORX_MDATAQUEUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1213__MATNORX_MDATAQUEUE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1213__MATNORX_MDATAQUEUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1213__MATNORX_MDATAQUEUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1213__MATNORX_MDATAQUEUE.obj_num = 5; cdat->dobj_1213__MATNORX_MDATAQUEUE.obj_hash = 303019399; cdat->dobj_1213__MATNORX_MDATAQUEUE.obj_len = 4; /*inistring dstr_1214__MATNORX_MDATAQUE*/ /*_.VALSTR___V1293*/ meltfptr[1292] = (melt_ptr_t) & cdat->dstr_1214__MATNORX_MDATAQUE; cdat->dstr_1214__MATNORX_MDATAQUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1214__MATNORX_MDATAQUE.val, "MATNORX_MDATAQUEUE", sizeof (cdat->dstr_1214__MATNORX_MDATAQUE. val) - 1); cdat->dstr_1214__MATNORX_MDATAQUE.val[18] = (char) 0; cdat->dstr_1214__MATNORX_MDATAQUE.slen = 18; /*iniobj dsym_1215__MATNORX_MSTEPQUEUE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1317*/ meltfptr[1316]) /*_.VALDATA___V1317*/ meltfptr[1316] = (melt_ptr_t) & cdat->dsym_1215__MATNORX_MSTEPQUEUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1215__MATNORX_MSTEPQUEUE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1215__MATNORX_MSTEPQUEUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1215__MATNORX_MSTEPQUEUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1215__MATNORX_MSTEPQUEUE.obj_hash = 826146579; cdat->dsym_1215__MATNORX_MSTEPQUEUE.obj_len = 3; /*inistring dstr_1216__MATNORX_MSTEPQUE*/ /*_.VALSTR___V1318*/ meltfptr[1317] = (melt_ptr_t) & cdat->dstr_1216__MATNORX_MSTEPQUE; cdat->dstr_1216__MATNORX_MSTEPQUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1216__MATNORX_MSTEPQUE.val, "MATNORX_MSTEPQUEUE", sizeof (cdat->dstr_1216__MATNORX_MSTEPQUE. val) - 1); cdat->dstr_1216__MATNORX_MSTEPQUE.val[18] = (char) 0; cdat->dstr_1216__MATNORX_MSTEPQUE.slen = 18; /*^iniobj */ /*iniobj dobj_1217__MATNORX_MSTEPQUEUE*/ /*_.VALDATA___V1294*/ meltfptr[1293] = (melt_ptr_t) & cdat->dobj_1217__MATNORX_MSTEPQUEUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1217__MATNORX_MSTEPQUEUE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1217__MATNORX_MSTEPQUEUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1217__MATNORX_MSTEPQUEUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1217__MATNORX_MSTEPQUEUE.obj_num = 6; cdat->dobj_1217__MATNORX_MSTEPQUEUE.obj_hash = 1070675442; cdat->dobj_1217__MATNORX_MSTEPQUEUE.obj_len = 4; /*inistring dstr_1218__MATNORX_MSTEPQUE*/ /*_.VALSTR___V1295*/ meltfptr[1294] = (melt_ptr_t) & cdat->dstr_1218__MATNORX_MSTEPQUE; cdat->dstr_1218__MATNORX_MSTEPQUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1218__MATNORX_MSTEPQUE.val, "MATNORX_MSTEPQUEUE", sizeof (cdat->dstr_1218__MATNORX_MSTEPQUE. val) - 1); cdat->dstr_1218__MATNORX_MSTEPQUE.val[18] = (char) 0; cdat->dstr_1218__MATNORX_MSTEPQUE.slen = 18; /*iniobj dsym_1219__MATNORX_BODYLIST*/ /*uniqueobj*/ if (! /*_.VALDATA___V1319*/ meltfptr[1318]) /*_.VALDATA___V1319*/ meltfptr[1318] = (melt_ptr_t) & cdat->dsym_1219__MATNORX_BODYLIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1219__MATNORX_BODYLIST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1219__MATNORX_BODYLIST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1219__MATNORX_BODYLIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1219__MATNORX_BODYLIST.obj_hash = 620183979; cdat->dsym_1219__MATNORX_BODYLIST.obj_len = 3; /*inistring dstr_1220__MATNORX_BODYLIST*/ /*_.VALSTR___V1320*/ meltfptr[1319] = (melt_ptr_t) & cdat->dstr_1220__MATNORX_BODYLIST; cdat->dstr_1220__MATNORX_BODYLIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1220__MATNORX_BODYLIST.val, "MATNORX_BODYLIST", sizeof (cdat->dstr_1220__MATNORX_BODYLIST. val) - 1); cdat->dstr_1220__MATNORX_BODYLIST.val[16] = (char) 0; cdat->dstr_1220__MATNORX_BODYLIST.slen = 16; /*^iniobj */ /*iniobj dobj_1221__MATNORX_BODYLIST*/ /*_.VALDATA___V1296*/ meltfptr[1295] = (melt_ptr_t) & cdat->dobj_1221__MATNORX_BODYLIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1221__MATNORX_BODYLIST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1221__MATNORX_BODYLIST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1221__MATNORX_BODYLIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1221__MATNORX_BODYLIST.obj_num = 7; cdat->dobj_1221__MATNORX_BODYLIST.obj_hash = 459718011; cdat->dobj_1221__MATNORX_BODYLIST.obj_len = 4; /*inistring dstr_1222__MATNORX_BODYLIST*/ /*_.VALSTR___V1297*/ meltfptr[1296] = (melt_ptr_t) & cdat->dstr_1222__MATNORX_BODYLIST; cdat->dstr_1222__MATNORX_BODYLIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1222__MATNORX_BODYLIST.val, "MATNORX_BODYLIST", sizeof (cdat->dstr_1222__MATNORX_BODYLIST. val) - 1); cdat->dstr_1222__MATNORX_BODYLIST.val[16] = (char) 0; cdat->dstr_1222__MATNORX_BODYLIST.slen = 16; /*iniobj dsym_1223__MATNORX_ENDLABEL*/ /*uniqueobj*/ if (! /*_.VALDATA___V1321*/ meltfptr[1320]) /*_.VALDATA___V1321*/ meltfptr[1320] = (melt_ptr_t) & cdat->dsym_1223__MATNORX_ENDLABEL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1223__MATNORX_ENDLABEL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1223__MATNORX_ENDLABEL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1223__MATNORX_ENDLABEL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1223__MATNORX_ENDLABEL.obj_hash = 492054617; cdat->dsym_1223__MATNORX_ENDLABEL.obj_len = 3; /*inistring dstr_1224__MATNORX_ENDLABEL*/ /*_.VALSTR___V1322*/ meltfptr[1321] = (melt_ptr_t) & cdat->dstr_1224__MATNORX_ENDLABEL; cdat->dstr_1224__MATNORX_ENDLABEL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1224__MATNORX_ENDLABEL.val, "MATNORX_ENDLABEL", sizeof (cdat->dstr_1224__MATNORX_ENDLABEL. val) - 1); cdat->dstr_1224__MATNORX_ENDLABEL.val[16] = (char) 0; cdat->dstr_1224__MATNORX_ENDLABEL.slen = 16; /*^iniobj */ /*iniobj dobj_1225__MATNORX_ENDLABEL*/ /*_.VALDATA___V1298*/ meltfptr[1297] = (melt_ptr_t) & cdat->dobj_1225__MATNORX_ENDLABEL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1225__MATNORX_ENDLABEL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1225__MATNORX_ENDLABEL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1225__MATNORX_ENDLABEL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1225__MATNORX_ENDLABEL.obj_num = 8; cdat->dobj_1225__MATNORX_ENDLABEL.obj_hash = 959958617; cdat->dobj_1225__MATNORX_ENDLABEL.obj_len = 4; /*inistring dstr_1226__MATNORX_ENDLABEL*/ /*_.VALSTR___V1299*/ meltfptr[1298] = (melt_ptr_t) & cdat->dstr_1226__MATNORX_ENDLABEL; cdat->dstr_1226__MATNORX_ENDLABEL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1226__MATNORX_ENDLABEL.val, "MATNORX_ENDLABEL", sizeof (cdat->dstr_1226__MATNORX_ENDLABEL. val) - 1); cdat->dstr_1226__MATNORX_ENDLABEL.val[16] = (char) 0; cdat->dstr_1226__MATNORX_ENDLABEL.slen = 16; /*iniobj dsym_1227__MATNORX_STARTLABEL*/ /*uniqueobj*/ if (! /*_.VALDATA___V1323*/ meltfptr[1322]) /*_.VALDATA___V1323*/ meltfptr[1322] = (melt_ptr_t) & cdat->dsym_1227__MATNORX_STARTLABEL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1227__MATNORX_STARTLABEL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1227__MATNORX_STARTLABEL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1227__MATNORX_STARTLABEL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1227__MATNORX_STARTLABEL.obj_hash = 309874631; cdat->dsym_1227__MATNORX_STARTLABEL.obj_len = 3; /*inistring dstr_1228__MATNORX_STARTLAB*/ /*_.VALSTR___V1324*/ meltfptr[1323] = (melt_ptr_t) & cdat->dstr_1228__MATNORX_STARTLAB; cdat->dstr_1228__MATNORX_STARTLAB.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1228__MATNORX_STARTLAB.val, "MATNORX_STARTLABEL", sizeof (cdat->dstr_1228__MATNORX_STARTLAB. val) - 1); cdat->dstr_1228__MATNORX_STARTLAB.val[18] = (char) 0; cdat->dstr_1228__MATNORX_STARTLAB.slen = 18; /*^iniobj */ /*iniobj dobj_1229__MATNORX_STARTLABEL*/ /*_.VALDATA___V1300*/ meltfptr[1299] = (melt_ptr_t) & cdat->dobj_1229__MATNORX_STARTLABEL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1229__MATNORX_STARTLABEL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1229__MATNORX_STARTLABEL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1229__MATNORX_STARTLABEL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1229__MATNORX_STARTLABEL.obj_num = 9; cdat->dobj_1229__MATNORX_STARTLABEL.obj_hash = 938501311; cdat->dobj_1229__MATNORX_STARTLABEL.obj_len = 4; /*inistring dstr_1230__MATNORX_STARTLAB*/ /*_.VALSTR___V1301*/ meltfptr[1300] = (melt_ptr_t) & cdat->dstr_1230__MATNORX_STARTLAB; cdat->dstr_1230__MATNORX_STARTLAB.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1230__MATNORX_STARTLAB.val, "MATNORX_STARTLABEL", sizeof (cdat->dstr_1230__MATNORX_STARTLAB. val) - 1); cdat->dstr_1230__MATNORX_STARTLAB.val[18] = (char) 0; cdat->dstr_1230__MATNORX_STARTLAB.slen = 18; /*iniobj dsym_1231__MATNORX_MATCHCTXT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1325*/ meltfptr[1324]) /*_.VALDATA___V1325*/ meltfptr[1324] = (melt_ptr_t) & cdat->dsym_1231__MATNORX_MATCHCTXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1231__MATNORX_MATCHCTXT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1231__MATNORX_MATCHCTXT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1231__MATNORX_MATCHCTXT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1231__MATNORX_MATCHCTXT.obj_hash = 28112038; cdat->dsym_1231__MATNORX_MATCHCTXT.obj_len = 3; /*inistring dstr_1232__MATNORX_MATCHCTX*/ /*_.VALSTR___V1326*/ meltfptr[1325] = (melt_ptr_t) & cdat->dstr_1232__MATNORX_MATCHCTX; cdat->dstr_1232__MATNORX_MATCHCTX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1232__MATNORX_MATCHCTX.val, "MATNORX_MATCHCTXT", sizeof (cdat->dstr_1232__MATNORX_MATCHCTX. val) - 1); cdat->dstr_1232__MATNORX_MATCHCTX.val[17] = (char) 0; cdat->dstr_1232__MATNORX_MATCHCTX.slen = 17; /*^iniobj */ /*iniobj dobj_1233__MATNORX_MATCHCTXT*/ /*_.VALDATA___V1302*/ meltfptr[1301] = (melt_ptr_t) & cdat->dobj_1233__MATNORX_MATCHCTXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1233__MATNORX_MATCHCTXT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1233__MATNORX_MATCHCTXT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1233__MATNORX_MATCHCTXT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1233__MATNORX_MATCHCTXT.obj_num = 10; cdat->dobj_1233__MATNORX_MATCHCTXT.obj_hash = 1029646265; cdat->dobj_1233__MATNORX_MATCHCTXT.obj_len = 4; /*inistring dstr_1234__MATNORX_MATCHCTX*/ /*_.VALSTR___V1303*/ meltfptr[1302] = (melt_ptr_t) & cdat->dstr_1234__MATNORX_MATCHCTX; cdat->dstr_1234__MATNORX_MATCHCTX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1234__MATNORX_MATCHCTX.val, "MATNORX_MATCHCTXT", sizeof (cdat->dstr_1234__MATNORX_MATCHCTX. val) - 1); cdat->dstr_1234__MATNORX_MATCHCTX.val[17] = (char) 0; cdat->dstr_1234__MATNORX_MATCHCTX.slen = 17; /*inirout drout_1235__MATCHALT_NORMALIZE_FLAG */ /*_.VALROUT___V1327*/ meltfptr[1326] = (melt_ptr_t) & cdat->drout_1235__MATCHALT_NORMALIZE_FLAG; cdat->drout_1235__MATCHALT_NORMALIZE_FLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1235__MATCHALT_NORMALIZE_FLAG.routdescr, "MATCHALT_NORMALIZE_FLAG @warmelt-normatch.melt:5175", MELT_ROUTDESCR_LEN - 1); cdat->drout_1235__MATCHALT_NORMALIZE_FLAG.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1235__MATCHALT_NORMALIZE_FLAG, meltrout_105_warmelt_normatch_MATCHALT_NORMALIZE_FLAG); /*iniclos dclo_1236__MATCHALT_NORMALIZE_FLAG */ /*_.VALCLO___V1328*/ meltfptr[1327] = (melt_ptr_t) & cdat->dclo_1236__MATCHALT_NORMALIZE_FLAG; cdat->dclo_1236__MATCHALT_NORMALIZE_FLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1236__MATCHALT_NORMALIZE_FLAG.nbval = 0; /*iniobj dsym_1237__NORMALIZE_STEP*/ /*uniqueobj*/ if (! /*_.VALDATA___V1329*/ meltfptr[1328]) /*_.VALDATA___V1329*/ meltfptr[1328] = (melt_ptr_t) & cdat->dsym_1237__NORMALIZE_STEP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1237__NORMALIZE_STEP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1237__NORMALIZE_STEP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1237__NORMALIZE_STEP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1237__NORMALIZE_STEP.obj_hash = 652642247; cdat->dsym_1237__NORMALIZE_STEP.obj_len = 3; /*inistring dstr_1238__NORMALIZE_STEP*/ /*_.VALSTR___V1330*/ meltfptr[1329] = (melt_ptr_t) & cdat->dstr_1238__NORMALIZE_STEP; cdat->dstr_1238__NORMALIZE_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1238__NORMALIZE_STEP.val, "NORMALIZE_STEP", sizeof (cdat->dstr_1238__NORMALIZE_STEP.val) - 1); cdat->dstr_1238__NORMALIZE_STEP.val[14] = (char) 0; cdat->dstr_1238__NORMALIZE_STEP.slen = 14; MELT_LOCATION ("warmelt-normatch.melt:5198:/ iniobj"); /*iniobj dobj_1239*/ /*_.VALDATA___V1331*/ meltfptr[1330] = (melt_ptr_t) & cdat->dobj_1239; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1239", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1239", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1239.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1239.obj_num = 0; cdat->dobj_1239.obj_hash = 1065504778; cdat->dobj_1239.obj_len = 2; /*iniobj dsym_1240__NMCTXT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1332*/ meltfptr[1331]) /*_.VALDATA___V1332*/ meltfptr[1331] = (melt_ptr_t) & cdat->dsym_1240__NMCTXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1240__NMCTXT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1240__NMCTXT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1240__NMCTXT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1240__NMCTXT.obj_hash = 286565616; cdat->dsym_1240__NMCTXT.obj_len = 3; /*inistring dstr_1241__NMCTXT*/ /*_.VALSTR___V1333*/ meltfptr[1332] = (melt_ptr_t) & cdat->dstr_1241__NMCTXT; cdat->dstr_1241__NMCTXT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1241__NMCTXT.val, "NMCTXT", sizeof (cdat->dstr_1241__NMCTXT.val) - 1); cdat->dstr_1241__NMCTXT.val[6] = (char) 0; cdat->dstr_1241__NMCTXT.slen = 6; /*^iniobj */ /*iniobj dobj_1242*/ /*_.VALDATA___V1334*/ meltfptr[1333] = (melt_ptr_t) & cdat->dobj_1242; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1242", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1242", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1242.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1242.obj_num = 1; cdat->dobj_1242.obj_hash = 785338279; cdat->dobj_1242.obj_len = 2; /*^iniobj */ /*iniobj dobj_1243*/ /*_.VALDATA___V1335*/ meltfptr[1334] = (melt_ptr_t) & cdat->dobj_1243; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1243", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1243", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1243.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1243.obj_num = 2; cdat->dobj_1243.obj_hash = 122020928; cdat->dobj_1243.obj_len = 2; /*inimult dtup_1244__NORMALIZE_STEP */ /*_.VALTUP___V1336*/ meltfptr[1335] = (melt_ptr_t) & cdat->dtup_1244__NORMALIZE_STEP; cdat->dtup_1244__NORMALIZE_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_MULTIPLE)))); cdat->dtup_1244__NORMALIZE_STEP.nbval = 3; /*^iniobj */ /*iniobj dobj_1245__NORMALIZE_STEP*/ /*_.VALDATA___V1337*/ meltfptr[1336] = (melt_ptr_t) & cdat->dobj_1245__NORMALIZE_STEP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1245__NORMALIZE_STEP", melt_magic_discr ((melt_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7])) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1245__NORMALIZE_STEP", ((meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1245__NORMALIZE_STEP.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]); cdat->dobj_1245__NORMALIZE_STEP.obj_hash = 861967055; cdat->dobj_1245__NORMALIZE_STEP.obj_len = 4; /*inistring dstr_1246__NORMALIZE_STEP*/ /*_.VALSTR___V1338*/ meltfptr[1337] = (melt_ptr_t) & cdat->dstr_1246__NORMALIZE_STEP; cdat->dstr_1246__NORMALIZE_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1246__NORMALIZE_STEP.val, "NORMALIZE_STEP", sizeof (cdat->dstr_1246__NORMALIZE_STEP.val) - 1); cdat->dstr_1246__NORMALIZE_STEP.val[14] = (char) 0; cdat->dstr_1246__NORMALIZE_STEP.slen = 14; /*inirout drout_1247__MATCH_DATA_UPDATE_DATA_STEPS_INDEX */ /*_.VALROUT___V1339*/ meltfptr[1338] = (melt_ptr_t) & cdat->drout_1247__MATCH_DATA_UPDATE_DATA_STEPS_INDEX; cdat->drout_1247__MATCH_DATA_UPDATE_DATA_STEPS_INDEX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1247__MATCH_DATA_UPDATE_DATA_STEPS_INDEX.routdescr, "MATCH_DATA_UPDATE_DATA_STEPS_INDEX @warmelt-normatch.melt:5207", MELT_ROUTDESCR_LEN - 1); cdat->drout_1247__MATCH_DATA_UPDATE_DATA_STEPS_INDEX.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat-> drout_1247__MATCH_DATA_UPDATE_DATA_STEPS_INDEX, meltrout_106_warmelt_normatch_MATCH_DATA_UPDATE_DATA_STEPS_INDEX); /*iniclos dclo_1248__MATCH_DATA_UPDATE_DATA_STEPS_INDEX */ /*_.VALCLO___V1340*/ meltfptr[1339] = (melt_ptr_t) & cdat->dclo_1248__MATCH_DATA_UPDATE_DATA_STEPS_INDEX; cdat->dclo_1248__MATCH_DATA_UPDATE_DATA_STEPS_INDEX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1248__MATCH_DATA_UPDATE_DATA_STEPS_INDEX.nbval = 0; /*inirout drout_1249__MATCH_STEP_INDEX */ /*_.VALROUT___V1341*/ meltfptr[1340] = (melt_ptr_t) & cdat->drout_1249__MATCH_STEP_INDEX; cdat->drout_1249__MATCH_STEP_INDEX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1249__MATCH_STEP_INDEX.routdescr, "MATCH_STEP_INDEX @warmelt-normatch.melt:5242", MELT_ROUTDESCR_LEN - 1); cdat->drout_1249__MATCH_STEP_INDEX.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1249__MATCH_STEP_INDEX, meltrout_107_warmelt_normatch_MATCH_STEP_INDEX); /*iniclos dclo_1250__MATCH_STEP_INDEX */ /*_.VALCLO___V1342*/ meltfptr[1341] = (melt_ptr_t) & cdat->dclo_1250__MATCH_STEP_INDEX; cdat->dclo_1250__MATCH_STEP_INDEX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1250__MATCH_STEP_INDEX.nbval = 0; /*inirout drout_1251__COMPLETE_NORMSTEP_IF_LAST */ /*_.VALROUT___V1343*/ meltfptr[1342] = (melt_ptr_t) & cdat->drout_1251__COMPLETE_NORMSTEP_IF_LAST; cdat->drout_1251__COMPLETE_NORMSTEP_IF_LAST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1251__COMPLETE_NORMSTEP_IF_LAST.routdescr, "COMPLETE_NORMSTEP_IF_LAST @warmelt-normatch.melt:5268", MELT_ROUTDESCR_LEN - 1); cdat->drout_1251__COMPLETE_NORMSTEP_IF_LAST.nbval = 13; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1251__COMPLETE_NORMSTEP_IF_LAST, meltrout_108_warmelt_normatch_COMPLETE_NORMSTEP_IF_LAST); /*iniclos dclo_1252__COMPLETE_NORMSTEP_IF_LAST */ /*_.VALCLO___V1344*/ meltfptr[1343] = (melt_ptr_t) & cdat->dclo_1252__COMPLETE_NORMSTEP_IF_LAST; cdat->dclo_1252__COMPLETE_NORMSTEP_IF_LAST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1252__COMPLETE_NORMSTEP_IF_LAST.nbval = 0; /*inirout drout_1253__NORMSTEP_ANYRECV */ /*_.VALROUT___V1345*/ meltfptr[1344] = (melt_ptr_t) & cdat->drout_1253__NORMSTEP_ANYRECV; cdat->drout_1253__NORMSTEP_ANYRECV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1253__NORMSTEP_ANYRECV.routdescr, "NORMSTEP_ANYRECV @warmelt-normatch.melt:5347", MELT_ROUTDESCR_LEN - 1); cdat->drout_1253__NORMSTEP_ANYRECV.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1253__NORMSTEP_ANYRECV, meltrout_109_warmelt_normatch_NORMSTEP_ANYRECV); /*iniclos dclo_1254__NORMSTEP_ANYRECV */ /*_.VALCLO___V1346*/ meltfptr[1345] = (melt_ptr_t) & cdat->dclo_1254__NORMSTEP_ANYRECV; cdat->dclo_1254__NORMSTEP_ANYRECV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1254__NORMSTEP_ANYRECV.nbval = 0; /*inirout drout_1255__NORMSTEP_MFLAGSET */ /*_.VALROUT___V1347*/ meltfptr[1346] = (melt_ptr_t) & cdat->drout_1255__NORMSTEP_MFLAGSET; cdat->drout_1255__NORMSTEP_MFLAGSET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1255__NORMSTEP_MFLAGSET.routdescr, "NORMSTEP_MFLAGSET @warmelt-normatch.melt:5360", MELT_ROUTDESCR_LEN - 1); cdat->drout_1255__NORMSTEP_MFLAGSET.nbval = 9; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1255__NORMSTEP_MFLAGSET, meltrout_110_warmelt_normatch_NORMSTEP_MFLAGSET); /*iniclos dclo_1256__NORMSTEP_MFLAGSET */ /*_.VALCLO___V1351*/ meltfptr[1350] = (melt_ptr_t) & cdat->dclo_1256__NORMSTEP_MFLAGSET; cdat->dclo_1256__NORMSTEP_MFLAGSET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1256__NORMSTEP_MFLAGSET.nbval = 0; /*iniobj dsym_1257__CLASS_NREP_SETQ*/ /*uniqueobj*/ if (! /*_.VALDATA___V1352*/ meltfptr[1351]) /*_.VALDATA___V1352*/ meltfptr[1351] = (melt_ptr_t) & cdat->dsym_1257__CLASS_NREP_SETQ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1257__CLASS_NREP_SETQ", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1257__CLASS_NREP_SETQ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1257__CLASS_NREP_SETQ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1257__CLASS_NREP_SETQ.obj_hash = 314084823; cdat->dsym_1257__CLASS_NREP_SETQ.obj_len = 3; /*inistring dstr_1258__CLASS_NREP_SETQ*/ /*_.VALSTR___V1353*/ meltfptr[1352] = (melt_ptr_t) & cdat->dstr_1258__CLASS_NREP_SETQ; cdat->dstr_1258__CLASS_NREP_SETQ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1258__CLASS_NREP_SETQ.val, "CLASS_NREP_SETQ", sizeof (cdat->dstr_1258__CLASS_NREP_SETQ. val) - 1); cdat->dstr_1258__CLASS_NREP_SETQ.val[15] = (char) 0; cdat->dstr_1258__CLASS_NREP_SETQ.slen = 15; /*iniboxint dint_1259__ */ /*_.VALBXINT___V1350*/ meltfptr[1349] = (melt_ptr_t) & cdat->dint_1259__; cdat->dint_1259__.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CONSTANT_INTEGER)))); cdat->dint_1259__.val = 1; /*inirout drout_1260__NORMSTEP_MFLAGCONJ */ /*_.VALROUT___V1354*/ meltfptr[1353] = (melt_ptr_t) & cdat->drout_1260__NORMSTEP_MFLAGCONJ; cdat->drout_1260__NORMSTEP_MFLAGCONJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1260__NORMSTEP_MFLAGCONJ.routdescr, "NORMSTEP_MFLAGCONJ @warmelt-normatch.melt:5384", MELT_ROUTDESCR_LEN - 1); cdat->drout_1260__NORMSTEP_MFLAGCONJ.nbval = 15; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1260__NORMSTEP_MFLAGCONJ, meltrout_111_warmelt_normatch_NORMSTEP_MFLAGCONJ); /*iniclos dclo_1261__NORMSTEP_MFLAGCONJ */ /*_.VALCLO___V1358*/ meltfptr[1357] = (melt_ptr_t) & cdat->dclo_1261__NORMSTEP_MFLAGCONJ; cdat->dclo_1261__NORMSTEP_MFLAGCONJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1261__NORMSTEP_MFLAGCONJ.nbval = 0; /*iniboxint dint_1262__ */ /*_.VALBXINT___V1355*/ meltfptr[1354] = (melt_ptr_t) & cdat->dint_1262__; cdat->dint_1262__.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CONSTANT_INTEGER)))); cdat->dint_1262__.val = 0; /*iniobj dsym_1263__CLASS_NREP_CHUNK*/ /*uniqueobj*/ if (! /*_.VALDATA___V1359*/ meltfptr[1358]) /*_.VALDATA___V1359*/ meltfptr[1358] = (melt_ptr_t) & cdat->dsym_1263__CLASS_NREP_CHUNK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1263__CLASS_NREP_CHUNK", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1263__CLASS_NREP_CHUNK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1263__CLASS_NREP_CHUNK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1263__CLASS_NREP_CHUNK.obj_hash = 877025959; cdat->dsym_1263__CLASS_NREP_CHUNK.obj_len = 3; /*inistring dstr_1264__CLASS_NREP_CHUNK*/ /*_.VALSTR___V1360*/ meltfptr[1359] = (melt_ptr_t) & cdat->dstr_1264__CLASS_NREP_CHUNK; cdat->dstr_1264__CLASS_NREP_CHUNK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1264__CLASS_NREP_CHUNK.val, "CLASS_NREP_CHUNK", sizeof (cdat->dstr_1264__CLASS_NREP_CHUNK. val) - 1); cdat->dstr_1264__CLASS_NREP_CHUNK.val[16] = (char) 0; cdat->dstr_1264__CLASS_NREP_CHUNK.slen = 16; /*iniobj dsym_1265__AND_MATCH_FLAGS*/ /*uniqueobj*/ if (! /*_.VALDATA___V1356*/ meltfptr[1355]) /*_.VALDATA___V1356*/ meltfptr[1355] = (melt_ptr_t) & cdat->dsym_1265__AND_MATCH_FLAGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1265__AND_MATCH_FLAGS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1265__AND_MATCH_FLAGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1265__AND_MATCH_FLAGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1265__AND_MATCH_FLAGS.obj_hash = 812433766; cdat->dsym_1265__AND_MATCH_FLAGS.obj_len = 3; /*inistring dstr_1266__AND_MATCH_FLAGS*/ /*_.VALSTR___V1357*/ meltfptr[1356] = (melt_ptr_t) & cdat->dstr_1266__AND_MATCH_FLAGS; cdat->dstr_1266__AND_MATCH_FLAGS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1266__AND_MATCH_FLAGS.val, "AND_MATCH_FLAGS", sizeof (cdat->dstr_1266__AND_MATCH_FLAGS. val) - 1); cdat->dstr_1266__AND_MATCH_FLAGS.val[15] = (char) 0; cdat->dstr_1266__AND_MATCH_FLAGS.slen = 15; /*iniobj dsym_1267__CTYPE_LONG*/ /*uniqueobj*/ if (! /*_.VALDATA___V1361*/ meltfptr[1360]) /*_.VALDATA___V1361*/ meltfptr[1360] = (melt_ptr_t) & cdat->dsym_1267__CTYPE_LONG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1267__CTYPE_LONG", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1267__CTYPE_LONG", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1267__CTYPE_LONG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1267__CTYPE_LONG.obj_hash = 64180850; cdat->dsym_1267__CTYPE_LONG.obj_len = 3; /*inistring dstr_1268__CTYPE_LONG*/ /*_.VALSTR___V1362*/ meltfptr[1361] = (melt_ptr_t) & cdat->dstr_1268__CTYPE_LONG; cdat->dstr_1268__CTYPE_LONG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1268__CTYPE_LONG.val, "CTYPE_LONG", sizeof (cdat->dstr_1268__CTYPE_LONG.val) - 1); cdat->dstr_1268__CTYPE_LONG.val[10] = (char) 0; cdat->dstr_1268__CTYPE_LONG.slen = 10; /*iniobj dsym_1269__DISCR_VERBATIM_STRING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1363*/ meltfptr[1362]) /*_.VALDATA___V1363*/ meltfptr[1362] = (melt_ptr_t) & cdat->dsym_1269__DISCR_VERBATIM_STRING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1269__DISCR_VERBATIM_STRING", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1269__DISCR_VERBATIM_STRING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1269__DISCR_VERBATIM_STRING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1269__DISCR_VERBATIM_STRING.obj_hash = 258402049; cdat->dsym_1269__DISCR_VERBATIM_STRING.obj_len = 3; /*inistring dstr_1270__DISCR_VERBATIM_S*/ /*_.VALSTR___V1364*/ meltfptr[1363] = (melt_ptr_t) & cdat->dstr_1270__DISCR_VERBATIM_S; cdat->dstr_1270__DISCR_VERBATIM_S.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1270__DISCR_VERBATIM_S.val, "DISCR_VERBATIM_STRING", sizeof (cdat->dstr_1270__DISCR_VERBATIM_S. val) - 1); cdat->dstr_1270__DISCR_VERBATIM_S.val[21] = (char) 0; cdat->dstr_1270__DISCR_VERBATIM_S.slen = 21; /*inirout drout_1271__NORMSTEP_MTESTINSTANCE */ /*_.VALROUT___V1365*/ meltfptr[1364] = (melt_ptr_t) & cdat->drout_1271__NORMSTEP_MTESTINSTANCE; cdat->drout_1271__NORMSTEP_MTESTINSTANCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1271__NORMSTEP_MTESTINSTANCE.routdescr, "NORMSTEP_MTESTINSTANCE @warmelt-normatch.melt:5447", MELT_ROUTDESCR_LEN - 1); cdat->drout_1271__NORMSTEP_MTESTINSTANCE.nbval = 21; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1271__NORMSTEP_MTESTINSTANCE, meltrout_112_warmelt_normatch_NORMSTEP_MTESTINSTANCE); /*iniclos dclo_1272__NORMSTEP_MTESTINSTANCE */ /*_.VALCLO___V1368*/ meltfptr[1367] = (melt_ptr_t) & cdat->dclo_1272__NORMSTEP_MTESTINSTANCE; cdat->dclo_1272__NORMSTEP_MTESTINSTANCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1272__NORMSTEP_MTESTINSTANCE.nbval = 0; /*iniobj dsym_1273__CLASS_NREP_IFISA*/ /*uniqueobj*/ if (! /*_.VALDATA___V1369*/ meltfptr[1368]) /*_.VALDATA___V1369*/ meltfptr[1368] = (melt_ptr_t) & cdat->dsym_1273__CLASS_NREP_IFISA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1273__CLASS_NREP_IFISA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1273__CLASS_NREP_IFISA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1273__CLASS_NREP_IFISA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1273__CLASS_NREP_IFISA.obj_hash = 974189077; cdat->dsym_1273__CLASS_NREP_IFISA.obj_len = 3; /*inistring dstr_1274__CLASS_NREP_IFISA*/ /*_.VALSTR___V1370*/ meltfptr[1369] = (melt_ptr_t) & cdat->dstr_1274__CLASS_NREP_IFISA; cdat->dstr_1274__CLASS_NREP_IFISA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1274__CLASS_NREP_IFISA.val, "CLASS_NREP_IFISA", sizeof (cdat->dstr_1274__CLASS_NREP_IFISA. val) - 1); cdat->dstr_1274__CLASS_NREP_IFISA.val[16] = (char) 0; cdat->dstr_1274__CLASS_NREP_IFISA.slen = 16; /*iniobj dsym_1275__CLASS_NREP_PROGN*/ /*uniqueobj*/ if (! /*_.VALDATA___V1371*/ meltfptr[1370]) /*_.VALDATA___V1371*/ meltfptr[1370] = (melt_ptr_t) & cdat->dsym_1275__CLASS_NREP_PROGN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1275__CLASS_NREP_PROGN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1275__CLASS_NREP_PROGN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1275__CLASS_NREP_PROGN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1275__CLASS_NREP_PROGN.obj_hash = 378668026; cdat->dsym_1275__CLASS_NREP_PROGN.obj_len = 3; /*inistring dstr_1276__CLASS_NREP_PROGN*/ /*_.VALSTR___V1372*/ meltfptr[1371] = (melt_ptr_t) & cdat->dstr_1276__CLASS_NREP_PROGN; cdat->dstr_1276__CLASS_NREP_PROGN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1276__CLASS_NREP_PROGN.val, "CLASS_NREP_PROGN", sizeof (cdat->dstr_1276__CLASS_NREP_PROGN. val) - 1); cdat->dstr_1276__CLASS_NREP_PROGN.val[16] = (char) 0; cdat->dstr_1276__CLASS_NREP_PROGN.slen = 16; /*inirout drout_1277__NORMSTEP_MTESTMULTIPLE */ /*_.VALROUT___V1373*/ meltfptr[1372] = (melt_ptr_t) & cdat->drout_1277__NORMSTEP_MTESTMULTIPLE; cdat->drout_1277__NORMSTEP_MTESTMULTIPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1277__NORMSTEP_MTESTMULTIPLE.routdescr, "NORMSTEP_MTESTMULTIPLE @warmelt-normatch.melt:5558", MELT_ROUTDESCR_LEN - 1); cdat->drout_1277__NORMSTEP_MTESTMULTIPLE.nbval = 20; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1277__NORMSTEP_MTESTMULTIPLE, meltrout_113_warmelt_normatch_NORMSTEP_MTESTMULTIPLE); /*iniclos dclo_1278__NORMSTEP_MTESTMULTIPLE */ /*_.VALCLO___V1374*/ meltfptr[1373] = (melt_ptr_t) & cdat->dclo_1278__NORMSTEP_MTESTMULTIPLE; cdat->dclo_1278__NORMSTEP_MTESTMULTIPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1278__NORMSTEP_MTESTMULTIPLE.nbval = 0; /*iniobj dsym_1279__CLASS_NREP_IFTUPLESIZED*/ /*uniqueobj*/ if (! /*_.VALDATA___V1375*/ meltfptr[1374]) /*_.VALDATA___V1375*/ meltfptr[1374] = (melt_ptr_t) & cdat->dsym_1279__CLASS_NREP_IFTUPLESIZED; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1279__CLASS_NREP_IFTUPLESIZED", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1279__CLASS_NREP_IFTUPLESIZED", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1279__CLASS_NREP_IFTUPLESIZED.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1279__CLASS_NREP_IFTUPLESIZED.obj_hash = 768158499; cdat->dsym_1279__CLASS_NREP_IFTUPLESIZED.obj_len = 3; /*inistring dstr_1280__CLASS_NREP_IFTUP*/ /*_.VALSTR___V1376*/ meltfptr[1375] = (melt_ptr_t) & cdat->dstr_1280__CLASS_NREP_IFTUP; cdat->dstr_1280__CLASS_NREP_IFTUP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1280__CLASS_NREP_IFTUP.val, "CLASS_NREP_IFTUPLESIZED", sizeof (cdat->dstr_1280__CLASS_NREP_IFTUP. val) - 1); cdat->dstr_1280__CLASS_NREP_IFTUP.val[23] = (char) 0; cdat->dstr_1280__CLASS_NREP_IFTUP.slen = 23; /*iniobj dsym_1281__CLASS_NREP_IFCOMMON*/ /*uniqueobj*/ if (! /*_.VALDATA___V1377*/ meltfptr[1376]) /*_.VALDATA___V1377*/ meltfptr[1376] = (melt_ptr_t) & cdat->dsym_1281__CLASS_NREP_IFCOMMON; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1281__CLASS_NREP_IFCOMMON", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1281__CLASS_NREP_IFCOMMON", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1281__CLASS_NREP_IFCOMMON.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1281__CLASS_NREP_IFCOMMON.obj_hash = 334041360; cdat->dsym_1281__CLASS_NREP_IFCOMMON.obj_len = 3; /*inistring dstr_1282__CLASS_NREP_IFCOM*/ /*_.VALSTR___V1378*/ meltfptr[1377] = (melt_ptr_t) & cdat->dstr_1282__CLASS_NREP_IFCOM; cdat->dstr_1282__CLASS_NREP_IFCOM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1282__CLASS_NREP_IFCOM.val, "CLASS_NREP_IFCOMMON", sizeof (cdat->dstr_1282__CLASS_NREP_IFCOM. val) - 1); cdat->dstr_1282__CLASS_NREP_IFCOM.val[19] = (char) 0; cdat->dstr_1282__CLASS_NREP_IFCOM.slen = 19; /*inirout drout_1283__NORMSTEP_MTESTVAR */ /*_.VALROUT___V1379*/ meltfptr[1378] = (melt_ptr_t) & cdat->drout_1283__NORMSTEP_MTESTVAR; cdat->drout_1283__NORMSTEP_MTESTVAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1283__NORMSTEP_MTESTVAR.routdescr, "NORMSTEP_MTESTVAR @warmelt-normatch.melt:5667", MELT_ROUTDESCR_LEN - 1); cdat->drout_1283__NORMSTEP_MTESTVAR.nbval = 9; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1283__NORMSTEP_MTESTVAR, meltrout_114_warmelt_normatch_NORMSTEP_MTESTVAR); /*iniclos dclo_1284__NORMSTEP_MTESTVAR */ /*_.VALCLO___V1380*/ meltfptr[1379] = (melt_ptr_t) & cdat->dclo_1284__NORMSTEP_MTESTVAR; cdat->dclo_1284__NORMSTEP_MTESTVAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1284__NORMSTEP_MTESTVAR.nbval = 0; /*iniobj dsym_1285__CLASS_NREP_IFSAME*/ /*uniqueobj*/ if (! /*_.VALDATA___V1381*/ meltfptr[1380]) /*_.VALDATA___V1381*/ meltfptr[1380] = (melt_ptr_t) & cdat->dsym_1285__CLASS_NREP_IFSAME; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1285__CLASS_NREP_IFSAME", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1285__CLASS_NREP_IFSAME", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1285__CLASS_NREP_IFSAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1285__CLASS_NREP_IFSAME.obj_hash = 280475710; cdat->dsym_1285__CLASS_NREP_IFSAME.obj_len = 3; /*inistring dstr_1286__CLASS_NREP_IFSAM*/ /*_.VALSTR___V1382*/ meltfptr[1381] = (melt_ptr_t) & cdat->dstr_1286__CLASS_NREP_IFSAM; cdat->dstr_1286__CLASS_NREP_IFSAM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1286__CLASS_NREP_IFSAM.val, "CLASS_NREP_IFSAME", sizeof (cdat->dstr_1286__CLASS_NREP_IFSAM. val) - 1); cdat->dstr_1286__CLASS_NREP_IFSAM.val[17] = (char) 0; cdat->dstr_1286__CLASS_NREP_IFSAM.slen = 17; /*inirout drout_1287__NORMSTEP_MGROUP */ /*_.VALROUT___V1383*/ meltfptr[1382] = (melt_ptr_t) & cdat->drout_1287__NORMSTEP_MGROUP; cdat->drout_1287__NORMSTEP_MGROUP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1287__NORMSTEP_MGROUP.routdescr, "NORMSTEP_MGROUP @warmelt-normatch.melt:5744", MELT_ROUTDESCR_LEN - 1); cdat->drout_1287__NORMSTEP_MGROUP.nbval = 15; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1287__NORMSTEP_MGROUP, meltrout_115_warmelt_normatch_NORMSTEP_MGROUP); /*iniclos dclo_1288__NORMSTEP_MGROUP */ /*_.VALCLO___V1388*/ meltfptr[1387] = (melt_ptr_t) & cdat->dclo_1288__NORMSTEP_MGROUP; cdat->dclo_1288__NORMSTEP_MGROUP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1288__NORMSTEP_MGROUP.nbval = 0; /*iniobj dsym_1289__LIST_MAP*/ /*uniqueobj*/ if (! /*_.VALDATA___V1389*/ meltfptr[1388]) /*_.VALDATA___V1389*/ meltfptr[1388] = (melt_ptr_t) & cdat->dsym_1289__LIST_MAP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1289__LIST_MAP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1289__LIST_MAP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1289__LIST_MAP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1289__LIST_MAP.obj_hash = 941133477; cdat->dsym_1289__LIST_MAP.obj_len = 3; /*inistring dstr_1290__LIST_MAP*/ /*_.VALSTR___V1390*/ meltfptr[1389] = (melt_ptr_t) & cdat->dstr_1290__LIST_MAP; cdat->dstr_1290__LIST_MAP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1290__LIST_MAP.val, "LIST_MAP", sizeof (cdat->dstr_1290__LIST_MAP.val) - 1); cdat->dstr_1290__LIST_MAP.val[8] = (char) 0; cdat->dstr_1290__LIST_MAP.slen = 8; /*inirout drout_1291__LAMBDA_ */ /*_.VALROUT___V1384*/ meltfptr[1383] = (melt_ptr_t) & cdat->drout_1291__LAMBDA_; cdat->drout_1291__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1291__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normatch.melt:5767", MELT_ROUTDESCR_LEN - 1); cdat->drout_1291__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1291__LAMBDA_, meltrout_116_warmelt_normatch_LAMBDA___24__); /*inirout drout_1292__LAMBDA_ */ /*_.VALROUT___V1385*/ meltfptr[1384] = (melt_ptr_t) & cdat->drout_1292__LAMBDA_; cdat->drout_1292__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1292__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normatch.melt:5770", MELT_ROUTDESCR_LEN - 1); cdat->drout_1292__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1292__LAMBDA_, meltrout_117_warmelt_normatch_LAMBDA___25__); /*inirout drout_1293__LAMBDA_ */ /*_.VALROUT___V1386*/ meltfptr[1385] = (melt_ptr_t) & cdat->drout_1293__LAMBDA_; cdat->drout_1293__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1293__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normatch.melt:5783", MELT_ROUTDESCR_LEN - 1); cdat->drout_1293__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1293__LAMBDA_, meltrout_118_warmelt_normatch_LAMBDA___26__); /*inirout drout_1294__LAMBDA_ */ /*_.VALROUT___V1387*/ meltfptr[1386] = (melt_ptr_t) & cdat->drout_1294__LAMBDA_; cdat->drout_1294__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1294__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normatch.melt:5786", MELT_ROUTDESCR_LEN - 1); cdat->drout_1294__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1294__LAMBDA_, meltrout_119_warmelt_normatch_LAMBDA___27__); /*inirout drout_1295__NORMSTEP_MSUCCWHENFLAG */ /*_.VALROUT___V1391*/ meltfptr[1390] = (melt_ptr_t) & cdat->drout_1295__NORMSTEP_MSUCCWHENFLAG; cdat->drout_1295__NORMSTEP_MSUCCWHENFLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1295__NORMSTEP_MSUCCWHENFLAG.routdescr, "NORMSTEP_MSUCCWHENFLAG @warmelt-normatch.melt:5812", MELT_ROUTDESCR_LEN - 1); cdat->drout_1295__NORMSTEP_MSUCCWHENFLAG.nbval = 20; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1295__NORMSTEP_MSUCCWHENFLAG, meltrout_120_warmelt_normatch_NORMSTEP_MSUCCWHENFLAG); /*iniclos dclo_1296__NORMSTEP_MSUCCWHENFLAG */ /*_.VALCLO___V1392*/ meltfptr[1391] = (melt_ptr_t) & cdat->dclo_1296__NORMSTEP_MSUCCWHENFLAG; cdat->dclo_1296__NORMSTEP_MSUCCWHENFLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1296__NORMSTEP_MSUCCWHENFLAG.nbval = 0; /*iniobj dsym_1297__CLASS_NREP_IF*/ /*uniqueobj*/ if (! /*_.VALDATA___V1393*/ meltfptr[1392]) /*_.VALDATA___V1393*/ meltfptr[1392] = (melt_ptr_t) & cdat->dsym_1297__CLASS_NREP_IF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1297__CLASS_NREP_IF", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1297__CLASS_NREP_IF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1297__CLASS_NREP_IF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1297__CLASS_NREP_IF.obj_hash = 942597626; cdat->dsym_1297__CLASS_NREP_IF.obj_len = 3; /*inistring dstr_1298__CLASS_NREP_IF*/ /*_.VALSTR___V1394*/ meltfptr[1393] = (melt_ptr_t) & cdat->dstr_1298__CLASS_NREP_IF; cdat->dstr_1298__CLASS_NREP_IF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1298__CLASS_NREP_IF.val, "CLASS_NREP_IF", sizeof (cdat->dstr_1298__CLASS_NREP_IF.val) - 1); cdat->dstr_1298__CLASS_NREP_IF.val[13] = (char) 0; cdat->dstr_1298__CLASS_NREP_IF.slen = 13; /*iniobj dsym_1299__NORMALIZE_TEST_MATCHER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1395*/ meltfptr[1394]) /*_.VALDATA___V1395*/ meltfptr[1394] = (melt_ptr_t) & cdat->dsym_1299__NORMALIZE_TEST_MATCHER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1299__NORMALIZE_TEST_MATCHER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1299__NORMALIZE_TEST_MATCHER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1299__NORMALIZE_TEST_MATCHER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1299__NORMALIZE_TEST_MATCHER.obj_hash = 542434886; cdat->dsym_1299__NORMALIZE_TEST_MATCHER.obj_len = 3; /*inistring dstr_1300__NORMALIZE_TEST_M*/ /*_.VALSTR___V1396*/ meltfptr[1395] = (melt_ptr_t) & cdat->dstr_1300__NORMALIZE_TEST_M; cdat->dstr_1300__NORMALIZE_TEST_M.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1300__NORMALIZE_TEST_M.val, "NORMALIZE_TEST_MATCHER", sizeof (cdat->dstr_1300__NORMALIZE_TEST_M. val) - 1); cdat->dstr_1300__NORMALIZE_TEST_M.val[22] = (char) 0; cdat->dstr_1300__NORMALIZE_TEST_M.slen = 22; MELT_LOCATION ("warmelt-normatch.melt:5909:/ iniobj"); /*iniobj dobj_1301*/ /*_.VALDATA___V1397*/ meltfptr[1396] = (melt_ptr_t) & cdat->dobj_1301; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1301", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1301", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1301.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1301.obj_num = 0; cdat->dobj_1301.obj_hash = 277414752; cdat->dobj_1301.obj_len = 2; /*^iniobj */ /*iniobj dobj_1302*/ /*_.VALDATA___V1398*/ meltfptr[1397] = (melt_ptr_t) & cdat->dobj_1302; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1302", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1302", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1302.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1302.obj_num = 1; cdat->dobj_1302.obj_hash = 654433459; cdat->dobj_1302.obj_len = 2; /*iniobj dsym_1303__NDATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V1399*/ meltfptr[1398]) /*_.VALDATA___V1399*/ meltfptr[1398] = (melt_ptr_t) & cdat->dsym_1303__NDATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1303__NDATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1303__NDATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1303__NDATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1303__NDATA.obj_hash = 755248787; cdat->dsym_1303__NDATA.obj_len = 3; /*inistring dstr_1304__NDATA*/ /*_.VALSTR___V1400*/ meltfptr[1399] = (melt_ptr_t) & cdat->dstr_1304__NDATA; cdat->dstr_1304__NDATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1304__NDATA.val, "NDATA", sizeof (cdat->dstr_1304__NDATA.val) - 1); cdat->dstr_1304__NDATA.val[5] = (char) 0; cdat->dstr_1304__NDATA.slen = 5; /*^iniobj */ /*iniobj dobj_1305*/ /*_.VALDATA___V1401*/ meltfptr[1400] = (melt_ptr_t) & cdat->dobj_1305; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1305", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1305", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1305.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1305.obj_num = 2; cdat->dobj_1305.obj_hash = 862609010; cdat->dobj_1305.obj_len = 2; /*iniobj dsym_1306__BINDLIST*/ /*uniqueobj*/ if (! /*_.VALDATA___V1402*/ meltfptr[1401]) /*_.VALDATA___V1402*/ meltfptr[1401] = (melt_ptr_t) & cdat->dsym_1306__BINDLIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1306__BINDLIST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1306__BINDLIST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1306__BINDLIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1306__BINDLIST.obj_hash = 32425359; cdat->dsym_1306__BINDLIST.obj_len = 3; /*inistring dstr_1307__BINDLIST*/ /*_.VALSTR___V1403*/ meltfptr[1402] = (melt_ptr_t) & cdat->dstr_1307__BINDLIST; cdat->dstr_1307__BINDLIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1307__BINDLIST.val, "BINDLIST", sizeof (cdat->dstr_1307__BINDLIST.val) - 1); cdat->dstr_1307__BINDLIST.val[8] = (char) 0; cdat->dstr_1307__BINDLIST.slen = 8; /*^iniobj */ /*iniobj dobj_1308*/ /*_.VALDATA___V1404*/ meltfptr[1403] = (melt_ptr_t) & cdat->dobj_1308; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1308", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1308", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1308.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1308.obj_num = 3; cdat->dobj_1308.obj_hash = 130603728; cdat->dobj_1308.obj_len = 2; /*^iniobj */ /*iniobj dobj_1309*/ /*_.VALDATA___V1405*/ meltfptr[1404] = (melt_ptr_t) & cdat->dobj_1309; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1309", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1309", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1309.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1309.obj_num = 4; cdat->dobj_1309.obj_hash = 134602123; cdat->dobj_1309.obj_len = 2; /*iniobj dsym_1310__NJELSE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1406*/ meltfptr[1405]) /*_.VALDATA___V1406*/ meltfptr[1405] = (melt_ptr_t) & cdat->dsym_1310__NJELSE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1310__NJELSE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1310__NJELSE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1310__NJELSE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1310__NJELSE.obj_hash = 11456410; cdat->dsym_1310__NJELSE.obj_len = 3; /*inistring dstr_1311__NJELSE*/ /*_.VALSTR___V1407*/ meltfptr[1406] = (melt_ptr_t) & cdat->dstr_1311__NJELSE; cdat->dstr_1311__NJELSE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1311__NJELSE.val, "NJELSE", sizeof (cdat->dstr_1311__NJELSE.val) - 1); cdat->dstr_1311__NJELSE.val[6] = (char) 0; cdat->dstr_1311__NJELSE.slen = 6; /*^iniobj */ /*iniobj dobj_1312*/ /*_.VALDATA___V1408*/ meltfptr[1407] = (melt_ptr_t) & cdat->dobj_1312; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1312", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1312", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1312.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1312.obj_num = 5; cdat->dobj_1312.obj_hash = 578354858; cdat->dobj_1312.obj_len = 2; /*inimult dtup_1313__NORMALIZE_TEST_MATCHER */ /*_.VALTUP___V1409*/ meltfptr[1408] = (melt_ptr_t) & cdat->dtup_1313__NORMALIZE_TEST_MATCHER; cdat->dtup_1313__NORMALIZE_TEST_MATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_MULTIPLE)))); cdat->dtup_1313__NORMALIZE_TEST_MATCHER.nbval = 6; /*^iniobj */ /*iniobj dobj_1314__NORMALIZE_TEST_MATCHER*/ /*_.VALDATA___V1410*/ meltfptr[1409] = (melt_ptr_t) & cdat->dobj_1314__NORMALIZE_TEST_MATCHER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1314__NORMALIZE_TEST_MATCHER", melt_magic_discr ((melt_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7])) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1314__NORMALIZE_TEST_MATCHER", ((meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1314__NORMALIZE_TEST_MATCHER.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]); cdat->dobj_1314__NORMALIZE_TEST_MATCHER.obj_hash = 621282945; cdat->dobj_1314__NORMALIZE_TEST_MATCHER.obj_len = 4; /*inistring dstr_1315__NORMALIZE_TEST_M*/ /*_.VALSTR___V1411*/ meltfptr[1410] = (melt_ptr_t) & cdat->dstr_1315__NORMALIZE_TEST_M; cdat->dstr_1315__NORMALIZE_TEST_M.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1315__NORMALIZE_TEST_M.val, "NORMALIZE_TEST_MATCHER", sizeof (cdat->dstr_1315__NORMALIZE_TEST_M. val) - 1); cdat->dstr_1315__NORMALIZE_TEST_M.val[22] = (char) 0; cdat->dstr_1315__NORMALIZE_TEST_M.slen = 22; /*iniobj dsym_1316__NORMALIZE_FILL_MATCHER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1412*/ meltfptr[1411]) /*_.VALDATA___V1412*/ meltfptr[1411] = (melt_ptr_t) & cdat->dsym_1316__NORMALIZE_FILL_MATCHER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1316__NORMALIZE_FILL_MATCHER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1316__NORMALIZE_FILL_MATCHER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1316__NORMALIZE_FILL_MATCHER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1316__NORMALIZE_FILL_MATCHER.obj_hash = 989223923; cdat->dsym_1316__NORMALIZE_FILL_MATCHER.obj_len = 3; /*inistring dstr_1317__NORMALIZE_FILL_M*/ /*_.VALSTR___V1413*/ meltfptr[1412] = (melt_ptr_t) & cdat->dstr_1317__NORMALIZE_FILL_M; cdat->dstr_1317__NORMALIZE_FILL_M.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1317__NORMALIZE_FILL_M.val, "NORMALIZE_FILL_MATCHER", sizeof (cdat->dstr_1317__NORMALIZE_FILL_M. val) - 1); cdat->dstr_1317__NORMALIZE_FILL_M.val[22] = (char) 0; cdat->dstr_1317__NORMALIZE_FILL_M.slen = 22; MELT_LOCATION ("warmelt-normatch.melt:5913:/ iniobj"); /*iniobj dobj_1318*/ /*_.VALDATA___V1414*/ meltfptr[1413] = (melt_ptr_t) & cdat->dobj_1318; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1318", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1318", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1318.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1318.obj_num = 0; cdat->dobj_1318.obj_hash = 1015132385; cdat->dobj_1318.obj_len = 2; /*^iniobj */ /*iniobj dobj_1319*/ /*_.VALDATA___V1415*/ meltfptr[1414] = (melt_ptr_t) & cdat->dobj_1319; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1319", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1319", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1319.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1319.obj_num = 1; cdat->dobj_1319.obj_hash = 681975356; cdat->dobj_1319.obj_len = 2; /*^iniobj */ /*iniobj dobj_1320*/ /*_.VALDATA___V1416*/ meltfptr[1415] = (melt_ptr_t) & cdat->dobj_1320; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1320", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1320", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1320.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1320.obj_num = 2; cdat->dobj_1320.obj_hash = 131380362; cdat->dobj_1320.obj_len = 2; /*^iniobj */ /*iniobj dobj_1321*/ /*_.VALDATA___V1417*/ meltfptr[1416] = (melt_ptr_t) & cdat->dobj_1321; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1321", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1321", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1321.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1321.obj_num = 3; cdat->dobj_1321.obj_hash = 1038390202; cdat->dobj_1321.obj_len = 2; /*iniobj dsym_1322__NOUTS*/ /*uniqueobj*/ if (! /*_.VALDATA___V1418*/ meltfptr[1417]) /*_.VALDATA___V1418*/ meltfptr[1417] = (melt_ptr_t) & cdat->dsym_1322__NOUTS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1322__NOUTS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1322__NOUTS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1322__NOUTS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1322__NOUTS.obj_hash = 270932121; cdat->dsym_1322__NOUTS.obj_len = 3; /*inistring dstr_1323__NOUTS*/ /*_.VALSTR___V1419*/ meltfptr[1418] = (melt_ptr_t) & cdat->dstr_1323__NOUTS; cdat->dstr_1323__NOUTS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1323__NOUTS.val, "NOUTS", sizeof (cdat->dstr_1323__NOUTS.val) - 1); cdat->dstr_1323__NOUTS.val[5] = (char) 0; cdat->dstr_1323__NOUTS.slen = 5; /*^iniobj */ /*iniobj dobj_1324*/ /*_.VALDATA___V1420*/ meltfptr[1419] = (melt_ptr_t) & cdat->dobj_1324; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1324", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1324", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1324.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1324.obj_num = 4; cdat->dobj_1324.obj_hash = 1062977382; cdat->dobj_1324.obj_len = 2; /*^iniobj */ /*iniobj dobj_1325*/ /*_.VALDATA___V1421*/ meltfptr[1420] = (melt_ptr_t) & cdat->dobj_1325; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1325", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1325", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1325.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1325.obj_num = 5; cdat->dobj_1325.obj_hash = 576782411; cdat->dobj_1325.obj_len = 2; /*iniobj dsym_1326__TESTDATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V1422*/ meltfptr[1421]) /*_.VALDATA___V1422*/ meltfptr[1421] = (melt_ptr_t) & cdat->dsym_1326__TESTDATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1326__TESTDATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1326__TESTDATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1326__TESTDATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1326__TESTDATA.obj_hash = 419943850; cdat->dsym_1326__TESTDATA.obj_len = 3; /*inistring dstr_1327__TESTDATA*/ /*_.VALSTR___V1423*/ meltfptr[1422] = (melt_ptr_t) & cdat->dstr_1327__TESTDATA; cdat->dstr_1327__TESTDATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1327__TESTDATA.val, "TESTDATA", sizeof (cdat->dstr_1327__TESTDATA.val) - 1); cdat->dstr_1327__TESTDATA.val[8] = (char) 0; cdat->dstr_1327__TESTDATA.slen = 8; /*^iniobj */ /*iniobj dobj_1328*/ /*_.VALDATA___V1424*/ meltfptr[1423] = (melt_ptr_t) & cdat->dobj_1328; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1328", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1328", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1328.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1328.obj_num = 6; cdat->dobj_1328.obj_hash = 159061503; cdat->dobj_1328.obj_len = 2; /*inimult dtup_1329__NORMALIZE_FILL_MATCHER */ /*_.VALTUP___V1425*/ meltfptr[1424] = (melt_ptr_t) & cdat->dtup_1329__NORMALIZE_FILL_MATCHER; cdat->dtup_1329__NORMALIZE_FILL_MATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_MULTIPLE)))); cdat->dtup_1329__NORMALIZE_FILL_MATCHER.nbval = 7; /*^iniobj */ /*iniobj dobj_1330__NORMALIZE_FILL_MATCHER*/ /*_.VALDATA___V1426*/ meltfptr[1425] = (melt_ptr_t) & cdat->dobj_1330__NORMALIZE_FILL_MATCHER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1330__NORMALIZE_FILL_MATCHER", melt_magic_discr ((melt_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7])) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1330__NORMALIZE_FILL_MATCHER", ((meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1330__NORMALIZE_FILL_MATCHER.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V8*/ meltfptr[7]); cdat->dobj_1330__NORMALIZE_FILL_MATCHER.obj_hash = 250602611; cdat->dobj_1330__NORMALIZE_FILL_MATCHER.obj_len = 4; /*inistring dstr_1331__NORMALIZE_FILL_M*/ /*_.VALSTR___V1427*/ meltfptr[1426] = (melt_ptr_t) & cdat->dstr_1331__NORMALIZE_FILL_M; cdat->dstr_1331__NORMALIZE_FILL_M.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1331__NORMALIZE_FILL_M.val, "NORMALIZE_FILL_MATCHER", sizeof (cdat->dstr_1331__NORMALIZE_FILL_M. val) - 1); cdat->dstr_1331__NORMALIZE_FILL_M.val[22] = (char) 0; cdat->dstr_1331__NORMALIZE_FILL_M.slen = 22; /*inirout drout_1332__NORMTESTMATCH_CATCHALL */ /*_.VALROUT___V1428*/ meltfptr[1427] = (melt_ptr_t) & cdat->drout_1332__NORMTESTMATCH_CATCHALL; cdat->drout_1332__NORMTESTMATCH_CATCHALL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1332__NORMTESTMATCH_CATCHALL.routdescr, "NORMTESTMATCH_CATCHALL @warmelt-normatch.melt:5917", MELT_ROUTDESCR_LEN - 1); cdat->drout_1332__NORMTESTMATCH_CATCHALL.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1332__NORMTESTMATCH_CATCHALL, meltrout_121_warmelt_normatch_NORMTESTMATCH_CATCHALL); /*iniclos dclo_1333__NORMTESTMATCH_CATCHALL */ /*_.VALCLO___V1429*/ meltfptr[1428] = (melt_ptr_t) & cdat->dclo_1333__NORMTESTMATCH_CATCHALL; cdat->dclo_1333__NORMTESTMATCH_CATCHALL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1333__NORMTESTMATCH_CATCHALL.nbval = 0; /*inirout drout_1334__NORMFILLMATCH_CATCHALL */ /*_.VALROUT___V1430*/ meltfptr[1429] = (melt_ptr_t) & cdat->drout_1334__NORMFILLMATCH_CATCHALL; cdat->drout_1334__NORMFILLMATCH_CATCHALL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1334__NORMFILLMATCH_CATCHALL.routdescr, "NORMFILLMATCH_CATCHALL @warmelt-normatch.melt:5931", MELT_ROUTDESCR_LEN - 1); cdat->drout_1334__NORMFILLMATCH_CATCHALL.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1334__NORMFILLMATCH_CATCHALL, meltrout_122_warmelt_normatch_NORMFILLMATCH_CATCHALL); /*iniclos dclo_1335__NORMFILLMATCH_CATCHALL */ /*_.VALCLO___V1431*/ meltfptr[1430] = (melt_ptr_t) & cdat->dclo_1335__NORMFILLMATCH_CATCHALL; cdat->dclo_1335__NORMFILLMATCH_CATCHALL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1335__NORMFILLMATCH_CATCHALL.nbval = 0; /*inirout drout_1336__NORMTESTMATCH_CMATCHER */ /*_.VALROUT___V1432*/ meltfptr[1431] = (melt_ptr_t) & cdat->drout_1336__NORMTESTMATCH_CMATCHER; cdat->drout_1336__NORMTESTMATCH_CMATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1336__NORMTESTMATCH_CMATCHER.routdescr, "NORMTESTMATCH_CMATCHER @warmelt-normatch.melt:5943", MELT_ROUTDESCR_LEN - 1); cdat->drout_1336__NORMTESTMATCH_CMATCHER.nbval = 19; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1336__NORMTESTMATCH_CMATCHER, meltrout_123_warmelt_normatch_NORMTESTMATCH_CMATCHER); /*iniclos dclo_1337__NORMTESTMATCH_CMATCHER */ /*_.VALCLO___V1433*/ meltfptr[1432] = (melt_ptr_t) & cdat->dclo_1337__NORMTESTMATCH_CMATCHER; cdat->dclo_1337__NORMTESTMATCH_CMATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1337__NORMTESTMATCH_CMATCHER.nbval = 0; /*iniobj dsym_1338__CLASS_CMATCHER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1434*/ meltfptr[1433]) /*_.VALDATA___V1434*/ meltfptr[1433] = (melt_ptr_t) & cdat->dsym_1338__CLASS_CMATCHER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1338__CLASS_CMATCHER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1338__CLASS_CMATCHER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1338__CLASS_CMATCHER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1338__CLASS_CMATCHER.obj_hash = 544975672; cdat->dsym_1338__CLASS_CMATCHER.obj_len = 3; /*inistring dstr_1339__CLASS_CMATCHER*/ /*_.VALSTR___V1435*/ meltfptr[1434] = (melt_ptr_t) & cdat->dstr_1339__CLASS_CMATCHER; cdat->dstr_1339__CLASS_CMATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1339__CLASS_CMATCHER.val, "CLASS_CMATCHER", sizeof (cdat->dstr_1339__CLASS_CMATCHER.val) - 1); cdat->dstr_1339__CLASS_CMATCHER.val[14] = (char) 0; cdat->dstr_1339__CLASS_CMATCHER.slen = 14; /*inirout drout_1340__NORMFILLMATCH_CMATCHER */ /*_.VALROUT___V1436*/ meltfptr[1435] = (melt_ptr_t) & cdat->drout_1340__NORMFILLMATCH_CMATCHER; cdat->drout_1340__NORMFILLMATCH_CMATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1340__NORMFILLMATCH_CMATCHER.routdescr, "NORMFILLMATCH_CMATCHER @warmelt-normatch.melt:6028", MELT_ROUTDESCR_LEN - 1); cdat->drout_1340__NORMFILLMATCH_CMATCHER.nbval = 8; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1340__NORMFILLMATCH_CMATCHER, meltrout_124_warmelt_normatch_NORMFILLMATCH_CMATCHER); /*iniclos dclo_1341__NORMFILLMATCH_CMATCHER */ /*_.VALCLO___V1437*/ meltfptr[1436] = (melt_ptr_t) & cdat->dclo_1341__NORMFILLMATCH_CMATCHER; cdat->dclo_1341__NORMFILLMATCH_CMATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1341__NORMFILLMATCH_CMATCHER.nbval = 0; /*inirout drout_1342__NORMSTEP_MTESTMATCHER */ /*_.VALROUT___V1438*/ meltfptr[1437] = (melt_ptr_t) & cdat->drout_1342__NORMSTEP_MTESTMATCHER; cdat->drout_1342__NORMSTEP_MTESTMATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1342__NORMSTEP_MTESTMATCHER.routdescr, "NORMSTEP_MTESTMATCHER @warmelt-normatch.melt:6104", MELT_ROUTDESCR_LEN - 1); cdat->drout_1342__NORMSTEP_MTESTMATCHER.nbval = 23; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1342__NORMSTEP_MTESTMATCHER, meltrout_125_warmelt_normatch_NORMSTEP_MTESTMATCHER); /*iniclos dclo_1343__NORMSTEP_MTESTMATCHER */ /*_.VALCLO___V1439*/ meltfptr[1438] = (melt_ptr_t) & cdat->dclo_1343__NORMSTEP_MTESTMATCHER; cdat->dclo_1343__NORMSTEP_MTESTMATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1343__NORMSTEP_MTESTMATCHER.nbval = 0; /*inirout drout_1344__MATCHALT_NORMALIZE_STEP */ /*_.VALROUT___V1349*/ meltfptr[1348] = (melt_ptr_t) & cdat->drout_1344__MATCHALT_NORMALIZE_STEP; cdat->drout_1344__MATCHALT_NORMALIZE_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1344__MATCHALT_NORMALIZE_STEP.routdescr, "MATCHALT_NORMALIZE_STEP @warmelt-normatch.melt:6265", MELT_ROUTDESCR_LEN - 1); cdat->drout_1344__MATCHALT_NORMALIZE_STEP.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1344__MATCHALT_NORMALIZE_STEP, meltrout_126_warmelt_normatch_MATCHALT_NORMALIZE_STEP); /*iniclos dclo_1345__MATCHALT_NORMALIZE_STEP */ /*_.VALCLO___V1348*/ meltfptr[1347] = (melt_ptr_t) & cdat->dclo_1345__MATCHALT_NORMALIZE_STEP; cdat->dclo_1345__MATCHALT_NORMALIZE_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1345__MATCHALT_NORMALIZE_STEP.nbval = 0; /*inirout drout_1346__MATCHALT_NORMALIZE_MDATA */ /*_.VALROUT___V1367*/ meltfptr[1366] = (melt_ptr_t) & cdat->drout_1346__MATCHALT_NORMALIZE_MDATA; cdat->drout_1346__MATCHALT_NORMALIZE_MDATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1346__MATCHALT_NORMALIZE_MDATA.routdescr, "MATCHALT_NORMALIZE_MDATA @warmelt-normatch.melt:6301", MELT_ROUTDESCR_LEN - 1); cdat->drout_1346__MATCHALT_NORMALIZE_MDATA.nbval = 8; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1346__MATCHALT_NORMALIZE_MDATA, meltrout_127_warmelt_normatch_MATCHALT_NORMALIZE_MDATA); /*iniclos dclo_1347__MATCHALT_NORMALIZE_MDATA */ /*_.VALCLO___V1366*/ meltfptr[1365] = (melt_ptr_t) & cdat->dclo_1347__MATCHALT_NORMALIZE_MDATA; cdat->dclo_1347__MATCHALT_NORMALIZE_MDATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1347__MATCHALT_NORMALIZE_MDATA.nbval = 0; /*inirout drout_1348__MATCHALT_HANDLE_NORMALIZED_MDATA */ /*_.VALROUT___V1440*/ meltfptr[1439] = (melt_ptr_t) & cdat->drout_1348__MATCHALT_HANDLE_NORMALIZED_MDATA; cdat->drout_1348__MATCHALT_HANDLE_NORMALIZED_MDATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1348__MATCHALT_HANDLE_NORMALIZED_MDATA.routdescr, "MATCHALT_HANDLE_NORMALIZED_MDATA @warmelt-normatch.melt:6361", MELT_ROUTDESCR_LEN - 1); cdat->drout_1348__MATCHALT_HANDLE_NORMALIZED_MDATA.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat-> drout_1348__MATCHALT_HANDLE_NORMALIZED_MDATA, meltrout_128_warmelt_normatch_MATCHALT_HANDLE_NORMALIZED_MDATA); /*iniclos dclo_1349__MATCHALT_HANDLE_NORMALIZED_MDATA */ /*_.VALCLO___V1441*/ meltfptr[1440] = (melt_ptr_t) & cdat->dclo_1349__MATCHALT_HANDLE_NORMALIZED_MDATA; cdat->dclo_1349__MATCHALT_HANDLE_NORMALIZED_MDATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1349__MATCHALT_HANDLE_NORMALIZED_MDATA.nbval = 0; /*inirout drout_1350__MATCHALT_MAKE_MATCH_NORMALIZATION_CONTEXT */ /*_.VALROUT___V1442*/ meltfptr[1441] = (melt_ptr_t) & cdat-> drout_1350__MATCHALT_MAKE_MATCH_NORMALIZATION_CONTEXT; cdat->drout_1350__MATCHALT_MAKE_MATCH_NORMALIZATION_CONTEXT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1350__MATCHALT_MAKE_MATCH_NORMALIZATION_CONTEXT. routdescr, "MATCHALT_MAKE_MATCH_NORMALIZATION_CONTEXT @warmelt-normatch.melt:6398", MELT_ROUTDESCR_LEN - 1); cdat->drout_1350__MATCHALT_MAKE_MATCH_NORMALIZATION_CONTEXT.nbval = 10; MELT_ROUTINE_SET_ROUTCODE (&cdat-> drout_1350__MATCHALT_MAKE_MATCH_NORMALIZATION_CONTEXT, meltrout_129_warmelt_normatch_MATCHALT_MAKE_MATCH_NORMALIZATION_CONTEXT); /*iniclos dclo_1351__MATCHALT_MAKE_MATCH_NORMALIZATION_CONTEXT */ /*_.VALCLO___V1445*/ meltfptr[1444] = (melt_ptr_t) & cdat->dclo_1351__MATCHALT_MAKE_MATCH_NORMALIZATION_CONTEXT; cdat->dclo_1351__MATCHALT_MAKE_MATCH_NORMALIZATION_CONTEXT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1351__MATCHALT_MAKE_MATCH_NORMALIZATION_CONTEXT.nbval = 0; /*iniobj dsym_1352__MATCHRES*/ /*uniqueobj*/ if (! /*_.VALDATA___V1443*/ meltfptr[1442]) /*_.VALDATA___V1443*/ meltfptr[1442] = (melt_ptr_t) & cdat->dsym_1352__MATCHRES; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1352__MATCHRES", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1352__MATCHRES", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1352__MATCHRES.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1352__MATCHRES.obj_hash = 204120466; cdat->dsym_1352__MATCHRES.obj_len = 3; /*inistring dstr_1353__MATCHRES*/ /*_.VALSTR___V1444*/ meltfptr[1443] = (melt_ptr_t) & cdat->dstr_1353__MATCHRES; cdat->dstr_1353__MATCHRES.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1353__MATCHRES.val, "_MATCHRES", sizeof (cdat->dstr_1353__MATCHRES.val) - 1); cdat->dstr_1353__MATCHRES.val[9] = (char) 0; cdat->dstr_1353__MATCHRES.slen = 9; /*inirout drout_1354__MATCHALT_NORMALIZE_MATCH_CONTEXT */ /*_.VALROUT___V1446*/ meltfptr[1445] = (melt_ptr_t) & cdat->drout_1354__MATCHALT_NORMALIZE_MATCH_CONTEXT; cdat->drout_1354__MATCHALT_NORMALIZE_MATCH_CONTEXT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1354__MATCHALT_NORMALIZE_MATCH_CONTEXT.routdescr, "MATCHALT_NORMALIZE_MATCH_CONTEXT @warmelt-normatch.melt:6462", MELT_ROUTDESCR_LEN - 1); cdat->drout_1354__MATCHALT_NORMALIZE_MATCH_CONTEXT.nbval = 10; MELT_ROUTINE_SET_ROUTCODE (&cdat-> drout_1354__MATCHALT_NORMALIZE_MATCH_CONTEXT, meltrout_130_warmelt_normatch_MATCHALT_NORMALIZE_MATCH_CONTEXT); /*iniclos dclo_1355__MATCHALT_NORMALIZE_MATCH_CONTEXT */ /*_.VALCLO___V1448*/ meltfptr[1447] = (melt_ptr_t) & cdat->dclo_1355__MATCHALT_NORMALIZE_MATCH_CONTEXT; cdat->dclo_1355__MATCHALT_NORMALIZE_MATCH_CONTEXT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1355__MATCHALT_NORMALIZE_MATCH_CONTEXT.nbval = 0; /*inirout drout_1356__LAMBDA_ */ /*_.VALROUT___V1447*/ meltfptr[1446] = (melt_ptr_t) & cdat->drout_1356__LAMBDA_; cdat->drout_1356__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1356__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normatch.melt:6511", MELT_ROUTDESCR_LEN - 1); cdat->drout_1356__LAMBDA_.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1356__LAMBDA_, meltrout_131_warmelt_normatch_LAMBDA___28__); /*inirout drout_1357__NORMEXP_MATCHALT */ /*_.VALROUT___V1449*/ meltfptr[1448] = (melt_ptr_t) & cdat->drout_1357__NORMEXP_MATCHALT; cdat->drout_1357__NORMEXP_MATCHALT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1357__NORMEXP_MATCHALT.routdescr, "NORMEXP_MATCHALT @warmelt-normatch.melt:6545", MELT_ROUTDESCR_LEN - 1); cdat->drout_1357__NORMEXP_MATCHALT.nbval = 42; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1357__NORMEXP_MATCHALT, meltrout_132_warmelt_normatch_NORMEXP_MATCHALT); /*iniclos dclo_1358__NORMEXP_MATCHALT */ /*_.VALCLO___V1472*/ meltfptr[1471] = (melt_ptr_t) & cdat->dclo_1358__NORMEXP_MATCHALT; cdat->dclo_1358__NORMEXP_MATCHALT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1358__NORMEXP_MATCHALT.nbval = 0; /*iniobj dsym_1359__MATCHALT_INTER_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1450*/ meltfptr[1449]) /*_.VALDATA___V1450*/ meltfptr[1449] = (melt_ptr_t) & cdat->dsym_1359__MATCHALT_INTER_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1359__MATCHALT_INTER_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1359__MATCHALT_INTER_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1359__MATCHALT_INTER_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1359__MATCHALT_INTER_.obj_hash = 999261840; cdat->dsym_1359__MATCHALT_INTER_.obj_len = 3; /*inistring dstr_1360__MATCHALT_INTER_*/ /*_.VALSTR___V1451*/ meltfptr[1450] = (melt_ptr_t) & cdat->dstr_1360__MATCHALT_INTER_; cdat->dstr_1360__MATCHALT_INTER_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1360__MATCHALT_INTER_.val, "MATCHALT_INTER_", sizeof (cdat->dstr_1360__MATCHALT_INTER_. val) - 1); cdat->dstr_1360__MATCHALT_INTER_.val[15] = (char) 0; cdat->dstr_1360__MATCHALT_INTER_.slen = 15; /*iniobj dsym_1361__MATCHED_DATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V1452*/ meltfptr[1451]) /*_.VALDATA___V1452*/ meltfptr[1451] = (melt_ptr_t) & cdat->dsym_1361__MATCHED_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1361__MATCHED_DATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1361__MATCHED_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1361__MATCHED_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1361__MATCHED_DATA.obj_hash = 689390853; cdat->dsym_1361__MATCHED_DATA.obj_len = 3; /*inistring dstr_1362__MATCHED_DATA*/ /*_.VALSTR___V1453*/ meltfptr[1452] = (melt_ptr_t) & cdat->dstr_1362__MATCHED_DATA; cdat->dstr_1362__MATCHED_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1362__MATCHED_DATA.val, "_MATCHED_DATA", sizeof (cdat->dstr_1362__MATCHED_DATA.val) - 1); cdat->dstr_1362__MATCHED_DATA.val[13] = (char) 0; cdat->dstr_1362__MATCHED_DATA.slen = 13; /*inirout drout_1363__LAMBDA_ */ /*_.VALROUT___V1467*/ meltfptr[1466] = (melt_ptr_t) & cdat->drout_1363__LAMBDA_; cdat->drout_1363__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1363__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normatch.melt:6725", MELT_ROUTDESCR_LEN - 1); cdat->drout_1363__LAMBDA_.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1363__LAMBDA_, meltrout_133_warmelt_normatch_LAMBDA___29__); /*iniobj dsym_1364__TRUE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1468*/ meltfptr[1467]) /*_.VALDATA___V1468*/ meltfptr[1467] = (melt_ptr_t) & cdat->dsym_1364__TRUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1364__TRUE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_KEYWORD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1364__TRUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_KEYWORD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1364__TRUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_KEYWORD)))); cdat->dsym_1364__TRUE.obj_hash = 576485513; cdat->dsym_1364__TRUE.obj_len = 3; /*inistring dstr_1365__TRUE*/ /*_.VALSTR___V1469*/ meltfptr[1468] = (melt_ptr_t) & cdat->dstr_1365__TRUE; cdat->dstr_1365__TRUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1365__TRUE.val, "TRUE", sizeof (cdat->dstr_1365__TRUE.val) - 1); cdat->dstr_1365__TRUE.val[4] = (char) 0; cdat->dstr_1365__TRUE.slen = 4; /*iniobj dsym_1366__MATCHALTRES_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1470*/ meltfptr[1469]) /*_.VALDATA___V1470*/ meltfptr[1469] = (melt_ptr_t) & cdat->dsym_1366__MATCHALTRES_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1366__MATCHALTRES_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1366__MATCHALTRES_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1366__MATCHALTRES_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1366__MATCHALTRES_.obj_hash = 690579771; cdat->dsym_1366__MATCHALTRES_.obj_len = 3; /*inistring dstr_1367__MATCHALTRES_*/ /*_.VALSTR___V1471*/ meltfptr[1470] = (melt_ptr_t) & cdat->dstr_1367__MATCHALTRES_; cdat->dstr_1367__MATCHALTRES_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1367__MATCHALTRES_.val, "MATCHALTRES_", sizeof (cdat->dstr_1367__MATCHALTRES_.val) - 1); cdat->dstr_1367__MATCHALTRES_.val[12] = (char) 0; cdat->dstr_1367__MATCHALTRES_.slen = 12; /*iniobj dsym_1368__CLASS_SOURCE_MATCHALT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1473*/ meltfptr[1472]) /*_.VALDATA___V1473*/ meltfptr[1472] = (melt_ptr_t) & cdat->dsym_1368__CLASS_SOURCE_MATCHALT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1368__CLASS_SOURCE_MATCHALT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1368__CLASS_SOURCE_MATCHALT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1368__CLASS_SOURCE_MATCHALT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1368__CLASS_SOURCE_MATCHALT.obj_hash = 267909297; cdat->dsym_1368__CLASS_SOURCE_MATCHALT.obj_len = 3; /*inistring dstr_1369__CLASS_SOURCE_MAT*/ /*_.VALSTR___V1474*/ meltfptr[1473] = (melt_ptr_t) & cdat->dstr_1369__CLASS_SOURCE_MAT; cdat->dstr_1369__CLASS_SOURCE_MAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1369__CLASS_SOURCE_MAT.val, "CLASS_SOURCE_MATCHALT", sizeof (cdat->dstr_1369__CLASS_SOURCE_MAT. val) - 1); cdat->dstr_1369__CLASS_SOURCE_MAT.val[21] = (char) 0; cdat->dstr_1369__CLASS_SOURCE_MAT.slen = 21; /*inirout drout_1370__ALTERNATE_MATCH_OPTSET */ /*_.VALROUT___V1475*/ meltfptr[1474] = (melt_ptr_t) & cdat->drout_1370__ALTERNATE_MATCH_OPTSET; cdat->drout_1370__ALTERNATE_MATCH_OPTSET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1370__ALTERNATE_MATCH_OPTSET.routdescr, "ALTERNATE_MATCH_OPTSET @warmelt-normatch.melt:6809", MELT_ROUTDESCR_LEN - 1); cdat->drout_1370__ALTERNATE_MATCH_OPTSET.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1370__ALTERNATE_MATCH_OPTSET, meltrout_134_warmelt_normatch_ALTERNATE_MATCH_OPTSET); /*iniclos dclo_1371__ALTERNATE_MATCH_OPTSET */ /*_.VALCLO___V1476*/ meltfptr[1475] = (melt_ptr_t) & cdat->dclo_1371__ALTERNATE_MATCH_OPTSET; cdat->dclo_1371__ALTERNATE_MATCH_OPTSET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1371__ALTERNATE_MATCH_OPTSET.nbval = 0; /*iniobj dsym_1372__ALTERNATE_MATCH*/ /*uniqueobj*/ if (! /*_.VALDATA___V1477*/ meltfptr[1476]) /*_.VALDATA___V1477*/ meltfptr[1476] = (melt_ptr_t) & cdat->dsym_1372__ALTERNATE_MATCH; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1372__ALTERNATE_MATCH", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1372__ALTERNATE_MATCH", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1372__ALTERNATE_MATCH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1372__ALTERNATE_MATCH.obj_hash = 241789071; cdat->dsym_1372__ALTERNATE_MATCH.obj_len = 3; /*inistring dstr_1373__ALTERNATE_MATCH*/ /*_.VALSTR___V1478*/ meltfptr[1477] = (melt_ptr_t) & cdat->dstr_1373__ALTERNATE_MATCH; cdat->dstr_1373__ALTERNATE_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1373__ALTERNATE_MATCH.val, "ALTERNATE_MATCH", sizeof (cdat->dstr_1373__ALTERNATE_MATCH. val) - 1); cdat->dstr_1373__ALTERNATE_MATCH.val[15] = (char) 0; cdat->dstr_1373__ALTERNATE_MATCH.slen = 15; /*inistring dstr_1374__exchange_alterna*/ /*_.VALSTR___V1479*/ meltfptr[1478] = (melt_ptr_t) & cdat->dstr_1374__exchange_alterna; cdat->dstr_1374__exchange_alterna.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1374__exchange_alterna.val, "exchange alternate pattern-matching implementation", sizeof (cdat->dstr_1374__exchange_alterna. val) - 1); cdat->dstr_1374__exchange_alterna.val[50] = (char) 0; cdat->dstr_1374__exchange_alterna.slen = 50; /*inirout drout_1375__MG_ALTDRAW_GRAPHVIZ */ /*_.VALROUT___V1455*/ meltfptr[1454] = (melt_ptr_t) & cdat->drout_1375__MG_ALTDRAW_GRAPHVIZ; cdat->drout_1375__MG_ALTDRAW_GRAPHVIZ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1375__MG_ALTDRAW_GRAPHVIZ.routdescr, "MG_ALTDRAW_GRAPHVIZ @warmelt-normatch.melt:6828", MELT_ROUTDESCR_LEN - 1); cdat->drout_1375__MG_ALTDRAW_GRAPHVIZ.nbval = 41; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1375__MG_ALTDRAW_GRAPHVIZ, meltrout_135_warmelt_normatch_MG_ALTDRAW_GRAPHVIZ); /*iniclos dclo_1376__MG_ALTDRAW_GRAPHVIZ */ /*_.VALCLO___V1454*/ meltfptr[1453] = (melt_ptr_t) & cdat->dclo_1376__MG_ALTDRAW_GRAPHVIZ; cdat->dclo_1376__MG_ALTDRAW_GRAPHVIZ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1376__MG_ALTDRAW_GRAPHVIZ.nbval = 0; /*inirout drout_1377__LAMBDA_ */ /*_.VALROUT___V1456*/ meltfptr[1455] = (melt_ptr_t) & cdat->drout_1377__LAMBDA_; cdat->drout_1377__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1377__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normatch.melt:6866", MELT_ROUTDESCR_LEN - 1); cdat->drout_1377__LAMBDA_.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1377__LAMBDA_, meltrout_136_warmelt_normatch_LAMBDA___30__); /*inirout drout_1378__LAMBDA_ */ /*_.VALROUT___V1457*/ meltfptr[1456] = (melt_ptr_t) & cdat->drout_1378__LAMBDA_; cdat->drout_1378__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1378__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normatch.melt:6899", MELT_ROUTDESCR_LEN - 1); cdat->drout_1378__LAMBDA_.nbval = 11; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1378__LAMBDA_, meltrout_137_warmelt_normatch_LAMBDA___31__); /*inirout drout_1379__LAMBDA_ */ /*_.VALROUT___V1458*/ meltfptr[1457] = (melt_ptr_t) & cdat->drout_1379__LAMBDA_; cdat->drout_1379__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1379__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normatch.melt:6935", MELT_ROUTDESCR_LEN - 1); cdat->drout_1379__LAMBDA_.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1379__LAMBDA_, meltrout_138_warmelt_normatch_LAMBDA___32__); /*inirout drout_1380__LAMBDA_ */ /*_.VALROUT___V1459*/ meltfptr[1458] = (melt_ptr_t) & cdat->drout_1380__LAMBDA_; cdat->drout_1380__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1380__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normatch.melt:6975", MELT_ROUTDESCR_LEN - 1); cdat->drout_1380__LAMBDA_.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1380__LAMBDA_, meltrout_139_warmelt_normatch_LAMBDA___33__); /*iniboxint dint_1381__ */ /*_.VALBXINT___V1460*/ meltfptr[1459] = (melt_ptr_t) & cdat->dint_1381__; cdat->dint_1381__.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CONSTANT_INTEGER)))); cdat->dint_1381__.val = -1; /*iniboxint dint_1382__ */ /*_.VALBXINT___V1461*/ meltfptr[1460] = (melt_ptr_t) & cdat->dint_1382__; cdat->dint_1382__.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CONSTANT_INTEGER)))); cdat->dint_1382__.val = 1; /*iniboxint dint_1383__ */ /*_.VALBXINT___V1462*/ meltfptr[1461] = (melt_ptr_t) & cdat->dint_1383__; cdat->dint_1383__.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CONSTANT_INTEGER)))); cdat->dint_1383__.val = 0; /*inirout drout_1384__LAMBDA_ */ /*_.VALROUT___V1463*/ meltfptr[1462] = (melt_ptr_t) & cdat->drout_1384__LAMBDA_; cdat->drout_1384__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1384__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normatch.melt:6994", MELT_ROUTDESCR_LEN - 1); cdat->drout_1384__LAMBDA_.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1384__LAMBDA_, meltrout_140_warmelt_normatch_LAMBDA___34__); /*iniboxint dint_1385__ */ /*_.VALBXINT___V1464*/ meltfptr[1463] = (melt_ptr_t) & cdat->dint_1385__; cdat->dint_1385__.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CONSTANT_INTEGER)))); cdat->dint_1385__.val = -1; /*iniboxint dint_1386__ */ /*_.VALBXINT___V1465*/ meltfptr[1464] = (melt_ptr_t) & cdat->dint_1386__; cdat->dint_1386__.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CONSTANT_INTEGER)))); cdat->dint_1386__.val = 1; /*iniboxint dint_1387__ */ /*_.VALBXINT___V1466*/ meltfptr[1465] = (melt_ptr_t) & cdat->dint_1387__; cdat->dint_1387__.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CONSTANT_INTEGER)))); cdat->dint_1387__.val = 0; /*iniobj dsym_1388__CLASS_NREP_ALTMATCH*/ /*uniqueobj*/ if (! /*_.VALDATA___V1480*/ meltfptr[1479]) /*_.VALDATA___V1480*/ meltfptr[1479] = (melt_ptr_t) & cdat->dsym_1388__CLASS_NREP_ALTMATCH; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1388__CLASS_NREP_ALTMATCH", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1388__CLASS_NREP_ALTMATCH", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1388__CLASS_NREP_ALTMATCH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1388__CLASS_NREP_ALTMATCH.obj_hash = 373164524; cdat->dsym_1388__CLASS_NREP_ALTMATCH.obj_len = 3; /*inistring dstr_1389__CLASS_NREP_ALTMA*/ /*_.VALSTR___V1481*/ meltfptr[1480] = (melt_ptr_t) & cdat->dstr_1389__CLASS_NREP_ALTMA; cdat->dstr_1389__CLASS_NREP_ALTMA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1389__CLASS_NREP_ALTMA.val, "CLASS_NREP_ALTMATCH", sizeof (cdat->dstr_1389__CLASS_NREP_ALTMA. val) - 1); cdat->dstr_1389__CLASS_NREP_ALTMA.val[19] = (char) 0; cdat->dstr_1389__CLASS_NREP_ALTMA.slen = 19; cdat = NULL; melt_prohibit_garbcoll = FALSE; #undef meltfram__ } /*end initialize_module_meltdata_warmelt_normatch */ #if MELT_HAVE_DEBUG const char meltmodule_warmelt_normatch__melt_have_debug_enabled[] = "MELT module warmelt-normatch have debug enabled"; #else /*!MELT_HAVE_DEBUG */ const char meltmodule_warmelt_normatch__melt_have_debug_disabled[] = "MELT module warmelt-normatch have debug disabled"; #endif /*MELT_HAVE_DEBUG */ void * melt_start_this_module (void *modargp_) { char meltpredefinited[MELTGLOB__LASTGLOB + 8]; #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 initial_frame_st meltfram__; /*declfrastruct */ #define meltframe meltfram__ /*melt_start_this_module is initial declstructinit */ memset (&meltfram__, 0, sizeof (meltfram__)); /* declstructinit initial routine melt_start_this_module minihash 815*/ meltfram__.mcfr_nbvar = -815 /*minihash */ ; ((struct melt_callframe_st *) &meltfram__)->mcfr_forwmarkrout = meltmarking_melt_start_this_module; 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 */ -815; ((struct melt_callframe_st *) &meltfram__)->mcfr_forwmarkrout = meltmod__warmelt_normatch__forward_or_mark_module_start_frame; /**COMMENT: get previous environment **/ ; /*^compute */ /*_.PREVENV___V4*/ meltfptr[3] = /*getprevenv */ (melt_ptr_t) modargp_; /*^comment */ /**COMMENT: compute boxloc **/ ; /*^cond */ /*cond */ if ( /*_.CONTENV___V2*/ meltfptr[1] || melt_object_length ((melt_ptr_t) MELT_PREDEF (INITIAL_SYSTEM_DATA)) < MELTFIELD_SYSDATA_CONT_FRESH_ENV) /*then */ { } else { /*^cond.else */ /*^block */ /*com.block:compute fresh module environment */ { /*^comment */ /**COMMENT: start computing boxloc **/ ; ; /*^getslot */ { melt_ptr_t slot = NULL, obj = NULL; obj = (melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (INITIAL_SYSTEM_DATA)))) /*=obj*/ ; melt_object_get_field (slot, obj, 3, "SYSDATA_CONT_FRESH_ENV"); /*_.FRESHENV___V3*/ meltfptr[2] = slot; }; ; /*^compute */ /*checkfreshenv */ if (( /*_.PREVENV___V4*/ meltfptr[3]) && melt_magic_discr ((melt_ptr_t) ( /*_.FRESHENV___V3*/ meltfptr[2])) != MELTOBMAG_CLOSURE) warning (0, "MELT corruption: bad FRESH_ENV @%p in system data <%s:%d>", (void *) ( /*_.FRESHENV___V3*/ meltfptr[2]), __FILE__, __LINE__);;; /*^apply */ /*apply */ { /*_.CONTENV___V2*/ meltfptr[1] = melt_apply ((meltclosure_ptr_t) ( /*_.FRESHENV___V3*/ meltfptr[2]), (melt_ptr_t) ( /*_.PREVENV___V4*/ meltfptr[3]), (""), (union meltparam_un *) 0, "", (union meltparam_un *) 0); } ; } /*com.end block:compute fresh module environment */ ; } /*^comment */ /**COMMENT: get symbols & keywords **/ ; /*^getnamedsymbol */ /*getnamedsym:CLASS_PATTERN_CONTEXT */ { melt_ptr_t sy_CLASS_PATTERN_CONTEXT = meltgc_named_symbol ("CLASS_PATTERN_CONTEXT", MELT_GET); if (sy_CLASS_PATTERN_CONTEXT && NULL == /*_.VALDATA___V93*/ meltfptr[92]) /*_.VALDATA___V93*/ meltfptr[92] = (melt_ptr_t) sy_CLASS_PATTERN_CONTEXT; } /*^getnamedsymbol */ /*getnamedsym:CLASS_ROOT */ { melt_ptr_t sy_CLASS_ROOT = meltgc_named_symbol ("CLASS_ROOT", MELT_GET); if (sy_CLASS_ROOT && NULL == /*_.VALDATA___V95*/ meltfptr[94]) /*_.VALDATA___V95*/ meltfptr[94] = (melt_ptr_t) sy_CLASS_ROOT; } /*^getnamedsymbol */ /*getnamedsym:PCTN_NORMCTXT */ { melt_ptr_t sy_PCTN_NORMCTXT = meltgc_named_symbol ("PCTN_NORMCTXT", MELT_GET); if (sy_PCTN_NORMCTXT && NULL == /*_.VALDATA___V123*/ meltfptr[122]) /*_.VALDATA___V123*/ meltfptr[122] = (melt_ptr_t) sy_PCTN_NORMCTXT; } /*^getnamedsymbol */ /*getnamedsym:PCTN_SRC */ { melt_ptr_t sy_PCTN_SRC = meltgc_named_symbol ("PCTN_SRC", MELT_GET); if (sy_PCTN_SRC && NULL == /*_.VALDATA___V125*/ meltfptr[124]) /*_.VALDATA___V125*/ meltfptr[124] = (melt_ptr_t) sy_PCTN_SRC; } /*^getnamedsymbol */ /*getnamedsym:PCTN_ENV */ { melt_ptr_t sy_PCTN_ENV = meltgc_named_symbol ("PCTN_ENV", MELT_GET); if (sy_PCTN_ENV && NULL == /*_.VALDATA___V127*/ meltfptr[126]) /*_.VALDATA___V127*/ meltfptr[126] = (melt_ptr_t) sy_PCTN_ENV; } /*^getnamedsymbol */ /*getnamedsym:PCTN_MAPATVAR */ { melt_ptr_t sy_PCTN_MAPATVAR = meltgc_named_symbol ("PCTN_MAPATVAR", MELT_GET); if (sy_PCTN_MAPATVAR && NULL == /*_.VALDATA___V129*/ meltfptr[128]) /*_.VALDATA___V129*/ meltfptr[128] = (melt_ptr_t) sy_PCTN_MAPATVAR; } /*^getnamedsymbol */ /*getnamedsym:PCTN_MAPATCST */ { melt_ptr_t sy_PCTN_MAPATCST = meltgc_named_symbol ("PCTN_MAPATCST", MELT_GET); if (sy_PCTN_MAPATCST && NULL == /*_.VALDATA___V131*/ meltfptr[130]) /*_.VALDATA___V131*/ meltfptr[130] = (melt_ptr_t) sy_PCTN_MAPATCST; } /*^getnamedsymbol */ /*getnamedsym:PCTN_MAPOR */ { melt_ptr_t sy_PCTN_MAPOR = meltgc_named_symbol ("PCTN_MAPOR", MELT_GET); if (sy_PCTN_MAPOR && NULL == /*_.VALDATA___V133*/ meltfptr[132]) /*_.VALDATA___V133*/ meltfptr[132] = (melt_ptr_t) sy_PCTN_MAPOR; } /*^getnamedsymbol */ /*getnamedsym:PCTN_BINDLIST */ { melt_ptr_t sy_PCTN_BINDLIST = meltgc_named_symbol ("PCTN_BINDLIST", MELT_GET); if (sy_PCTN_BINDLIST && NULL == /*_.VALDATA___V135*/ meltfptr[134]) /*_.VALDATA___V135*/ meltfptr[134] = (melt_ptr_t) sy_PCTN_BINDLIST; } /*^getnamedsymbol */ /*getnamedsym:PCTN_STUFFMAP */ { melt_ptr_t sy_PCTN_STUFFMAP = meltgc_named_symbol ("PCTN_STUFFMAP", MELT_GET); if (sy_PCTN_STUFFMAP && NULL == /*_.VALDATA___V137*/ meltfptr[136]) /*_.VALDATA___V137*/ meltfptr[136] = (melt_ptr_t) sy_PCTN_STUFFMAP; } /*^getnamedsymbol */ /*getnamedsym:PCTN_PVARLOCMAP */ { melt_ptr_t sy_PCTN_PVARLOCMAP = meltgc_named_symbol ("PCTN_PVARLOCMAP", MELT_GET); if (sy_PCTN_PVARLOCMAP && NULL == /*_.VALDATA___V139*/ meltfptr[138]) /*_.VALDATA___V139*/ meltfptr[138] = (melt_ptr_t) sy_PCTN_PVARLOCMAP; } /*^getnamedsymbol */ /*getnamedsym:PCTN_TESTS */ { melt_ptr_t sy_PCTN_TESTS = meltgc_named_symbol ("PCTN_TESTS", MELT_GET); if (sy_PCTN_TESTS && NULL == /*_.VALDATA___V141*/ meltfptr[140]) /*_.VALDATA___V141*/ meltfptr[140] = (melt_ptr_t) sy_PCTN_TESTS; } /*^getnamedsymbol */ /*getnamedsym:PCTN_VARHANDLERS */ { melt_ptr_t sy_PCTN_VARHANDLERS = meltgc_named_symbol ("PCTN_VARHANDLERS", MELT_GET); if (sy_PCTN_VARHANDLERS && NULL == /*_.VALDATA___V143*/ meltfptr[142]) /*_.VALDATA___V143*/ meltfptr[142] = (melt_ptr_t) sy_PCTN_VARHANDLERS; } /*^getnamedsymbol */ /*getnamedsym:SCAN_PATTERN */ { melt_ptr_t sy_SCAN_PATTERN = meltgc_named_symbol ("SCAN_PATTERN", MELT_GET); if (sy_SCAN_PATTERN && NULL == /*_.VALDATA___V145*/ meltfptr[144]) /*_.VALDATA___V145*/ meltfptr[144] = (melt_ptr_t) sy_SCAN_PATTERN; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SELECTOR */ { melt_ptr_t sy_CLASS_SELECTOR = meltgc_named_symbol ("CLASS_SELECTOR", MELT_GET); if (sy_CLASS_SELECTOR && NULL == /*_.VALDATA___V147*/ meltfptr[146]) /*_.VALDATA___V147*/ meltfptr[146] = (melt_ptr_t) sy_CLASS_SELECTOR; } /*^getnamedsymbol */ /*getnamedsym:MELT_DEBUG_FUN */ { melt_ptr_t sy_MELT_DEBUG_FUN = meltgc_named_symbol ("MELT_DEBUG_FUN", MELT_GET); if (sy_MELT_DEBUG_FUN && NULL == /*_.VALDATA___V153*/ meltfptr[152]) /*_.VALDATA___V153*/ meltfptr[152] = (melt_ptr_t) sy_MELT_DEBUG_FUN; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NAMED */ { melt_ptr_t sy_CLASS_NAMED = meltgc_named_symbol ("CLASS_NAMED", MELT_GET); if (sy_CLASS_NAMED && NULL == /*_.VALDATA___V155*/ meltfptr[154]) /*_.VALDATA___V155*/ meltfptr[154] = (melt_ptr_t) sy_CLASS_NAMED; } /*^getnamedsymbol */ /*getnamedsym:INSTALL_METHOD */ { melt_ptr_t sy_INSTALL_METHOD = meltgc_named_symbol ("INSTALL_METHOD", MELT_GET); if (sy_INSTALL_METHOD && NULL == /*_.VALDATA___V157*/ meltfptr[156]) /*_.VALDATA___V157*/ meltfptr[156] = (melt_ptr_t) sy_INSTALL_METHOD; } /*^getnamedsymbol */ /*getnamedsym:DISCR_ANY_RECEIVER */ { melt_ptr_t sy_DISCR_ANY_RECEIVER = meltgc_named_symbol ("DISCR_ANY_RECEIVER", MELT_GET); if (sy_DISCR_ANY_RECEIVER && NULL == /*_.VALDATA___V159*/ meltfptr[158]) /*_.VALDATA___V159*/ meltfptr[158] = (melt_ptr_t) sy_DISCR_ANY_RECEIVER; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_PATTERN */ { melt_ptr_t sy_CLASS_SOURCE_PATTERN = meltgc_named_symbol ("CLASS_SOURCE_PATTERN", MELT_GET); if (sy_CLASS_SOURCE_PATTERN && NULL == /*_.VALDATA___V163*/ meltfptr[162]) /*_.VALDATA___V163*/ meltfptr[162] = (melt_ptr_t) sy_CLASS_SOURCE_PATTERN; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_PATTERN_VARIABLE */ { 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___V167*/ meltfptr[166]) /*_.VALDATA___V167*/ meltfptr[166] = (melt_ptr_t) sy_CLASS_SOURCE_PATTERN_VARIABLE; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_PATTERN_JOKER_VARIABLE */ { 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___V171*/ meltfptr[170]) /*_.VALDATA___V171*/ meltfptr[170] = (melt_ptr_t) sy_CLASS_SOURCE_PATTERN_JOKER_VARIABLE; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_PATTERN_CONSTANT */ { 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___V175*/ meltfptr[174]) /*_.VALDATA___V175*/ meltfptr[174] = (melt_ptr_t) sy_CLASS_SOURCE_PATTERN_CONSTANT; } /*^getnamedsymbol */ /*getnamedsym:NORMAL_EXP */ { melt_ptr_t sy_NORMAL_EXP = meltgc_named_symbol ("NORMAL_EXP", MELT_GET); if (sy_NORMAL_EXP && NULL == /*_.VALDATA___V177*/ meltfptr[176]) /*_.VALDATA___V177*/ meltfptr[176] = (melt_ptr_t) sy_NORMAL_EXP; } /*^getnamedsymbol */ /*getnamedsym:LIST_APPEND2LIST */ { melt_ptr_t sy_LIST_APPEND2LIST = meltgc_named_symbol ("LIST_APPEND2LIST", MELT_GET); if (sy_LIST_APPEND2LIST && NULL == /*_.VALDATA___V179*/ meltfptr[178]) /*_.VALDATA___V179*/ meltfptr[178] = (melt_ptr_t) sy_LIST_APPEND2LIST; } /*^getnamedsymbol */ /*getnamedsym:GET_CTYPE */ { melt_ptr_t sy_GET_CTYPE = meltgc_named_symbol ("GET_CTYPE", MELT_GET); if (sy_GET_CTYPE && NULL == /*_.VALDATA___V181*/ meltfptr[180]) /*_.VALDATA___V181*/ meltfptr[180] = (melt_ptr_t) sy_GET_CTYPE; } /*^getnamedsymbol */ /*getnamedsym:CLASS_CTYPE */ { melt_ptr_t sy_CLASS_CTYPE = meltgc_named_symbol ("CLASS_CTYPE", MELT_GET); if (sy_CLASS_CTYPE && NULL == /*_.VALDATA___V183*/ meltfptr[182]) /*_.VALDATA___V183*/ meltfptr[182] = (melt_ptr_t) sy_CLASS_CTYPE; } /*^getnamedsymbol */ /*getnamedsym:CLASS_LOCATED */ { melt_ptr_t sy_CLASS_LOCATED = meltgc_named_symbol ("CLASS_LOCATED", MELT_GET); if (sy_CLASS_LOCATED && NULL == /*_.VALDATA___V185*/ meltfptr[184]) /*_.VALDATA___V185*/ meltfptr[184] = (melt_ptr_t) sy_CLASS_LOCATED; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_PATTERN_CONSTRUCT */ { 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___V189*/ meltfptr[188]) /*_.VALDATA___V189*/ meltfptr[188] = (melt_ptr_t) sy_CLASS_SOURCE_PATTERN_CONSTRUCT; } /*^getnamedsymbol */ /*getnamedsym:CTYPE_VALUE */ { melt_ptr_t sy_CTYPE_VALUE = meltgc_named_symbol ("CTYPE_VALUE", MELT_GET); if (sy_CTYPE_VALUE && NULL == /*_.VALDATA___V191*/ meltfptr[190]) /*_.VALDATA___V191*/ meltfptr[190] = (melt_ptr_t) sy_CTYPE_VALUE; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_PATTERN_OBJECT */ { 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___V195*/ meltfptr[194]) /*_.VALDATA___V195*/ meltfptr[194] = (melt_ptr_t) sy_CLASS_SOURCE_PATTERN_OBJECT; } /*^getnamedsymbol */ /*getnamedsym:CLASS_CLASS */ { melt_ptr_t sy_CLASS_CLASS = meltgc_named_symbol ("CLASS_CLASS", MELT_GET); if (sy_CLASS_CLASS && NULL == /*_.VALDATA___V197*/ meltfptr[196]) /*_.VALDATA___V197*/ meltfptr[196] = (melt_ptr_t) sy_CLASS_CLASS; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_FIELD_PATTERN */ { 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___V199*/ meltfptr[198]) /*_.VALDATA___V199*/ meltfptr[198] = (melt_ptr_t) sy_CLASS_SOURCE_FIELD_PATTERN; } /*^getnamedsymbol */ /*getnamedsym:CLASS_FIELD */ { melt_ptr_t sy_CLASS_FIELD = meltgc_named_symbol ("CLASS_FIELD", MELT_GET); if (sy_CLASS_FIELD && NULL == /*_.VALDATA___V201*/ meltfptr[200]) /*_.VALDATA___V201*/ meltfptr[200] = (melt_ptr_t) sy_CLASS_FIELD; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_PATTERN_COMPOSITE */ { 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___V205*/ meltfptr[204]) /*_.VALDATA___V205*/ meltfptr[204] = (melt_ptr_t) sy_CLASS_SOURCE_PATTERN_COMPOSITE; } /*^getnamedsymbol */ /*getnamedsym:CLASS_ANY_MATCHER */ { melt_ptr_t sy_CLASS_ANY_MATCHER = meltgc_named_symbol ("CLASS_ANY_MATCHER", MELT_GET); if (sy_CLASS_ANY_MATCHER && NULL == /*_.VALDATA___V207*/ meltfptr[206]) /*_.VALDATA___V207*/ meltfptr[206] = (melt_ptr_t) sy_CLASS_ANY_MATCHER; } /*^getnamedsymbol */ /*getnamedsym:CLASS_FORMAL_BINDING */ { melt_ptr_t sy_CLASS_FORMAL_BINDING = meltgc_named_symbol ("CLASS_FORMAL_BINDING", MELT_GET); if (sy_CLASS_FORMAL_BINDING && NULL == /*_.VALDATA___V209*/ meltfptr[208]) /*_.VALDATA___V209*/ meltfptr[208] = (melt_ptr_t) sy_CLASS_FORMAL_BINDING; } /*^getnamedsymbol */ /*getnamedsym:NORMALIZE_TUPLE */ { melt_ptr_t sy_NORMALIZE_TUPLE = meltgc_named_symbol ("NORMALIZE_TUPLE", MELT_GET); if (sy_NORMALIZE_TUPLE && NULL == /*_.VALDATA___V211*/ meltfptr[210]) /*_.VALDATA___V211*/ meltfptr[210] = (melt_ptr_t) sy_NORMALIZE_TUPLE; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_PATTERN_OR */ { 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___V216*/ meltfptr[215]) /*_.VALDATA___V216*/ meltfptr[215] = (melt_ptr_t) sy_CLASS_SOURCE_PATTERN_OR; } /*^getnamedsymbol */ /*getnamedsym:DISCR_MAP_OBJECTS */ { melt_ptr_t sy_DISCR_MAP_OBJECTS = meltgc_named_symbol ("DISCR_MAP_OBJECTS", MELT_GET); if (sy_DISCR_MAP_OBJECTS && NULL == /*_.VALDATA___V218*/ meltfptr[217]) /*_.VALDATA___V218*/ meltfptr[217] = (melt_ptr_t) sy_DISCR_MAP_OBJECTS; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SYMBOL */ { melt_ptr_t sy_CLASS_SYMBOL = meltgc_named_symbol ("CLASS_SYMBOL", MELT_GET); if (sy_CLASS_SYMBOL && NULL == /*_.VALDATA___V220*/ meltfptr[219]) /*_.VALDATA___V220*/ meltfptr[219] = (melt_ptr_t) sy_CLASS_SYMBOL; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_PATTERN_AND */ { 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___V224*/ meltfptr[223]) /*_.VALDATA___V224*/ meltfptr[223] = (melt_ptr_t) sy_CLASS_SOURCE_PATTERN_AND; } /*^getnamedsymbol */ /*getnamedsym:NORMAL_PATTERN */ { melt_ptr_t sy_NORMAL_PATTERN = meltgc_named_symbol ("NORMAL_PATTERN", MELT_GET); if (sy_NORMAL_PATTERN && NULL == /*_.VALDATA___V226*/ meltfptr[225]) /*_.VALDATA___V226*/ meltfptr[225] = (melt_ptr_t) sy_NORMAL_PATTERN; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NORMAL_OR_VARIABLE */ { 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___V230*/ meltfptr[229]) /*_.VALDATA___V230*/ meltfptr[229] = (melt_ptr_t) sy_CLASS_NORMAL_OR_VARIABLE; } /*^getnamedsymbol */ /*getnamedsym:NORVAR_NOREXP */ { melt_ptr_t sy_NORVAR_NOREXP = meltgc_named_symbol ("NORVAR_NOREXP", MELT_GET); if (sy_NORVAR_NOREXP && NULL == /*_.VALDATA___V244*/ meltfptr[243]) /*_.VALDATA___V244*/ meltfptr[243] = (melt_ptr_t) sy_NORVAR_NOREXP; } /*^getnamedsymbol */ /*getnamedsym:NORVAR_LOCSYM */ { melt_ptr_t sy_NORVAR_LOCSYM = meltgc_named_symbol ("NORVAR_LOCSYM", MELT_GET); if (sy_NORVAR_LOCSYM && NULL == /*_.VALDATA___V246*/ meltfptr[245]) /*_.VALDATA___V246*/ meltfptr[245] = (melt_ptr_t) sy_NORVAR_LOCSYM; } /*^getnamedsymbol */ /*getnamedsym:NORVAR_PATVAR */ { melt_ptr_t sy_NORVAR_PATVAR = meltgc_named_symbol ("NORVAR_PATVAR", MELT_GET); if (sy_NORVAR_PATVAR && NULL == /*_.VALDATA___V248*/ meltfptr[247]) /*_.VALDATA___V248*/ meltfptr[247] = (melt_ptr_t) sy_NORVAR_PATVAR; } /*^getnamedsymbol */ /*getnamedsym:NORVAR_NREPOR */ { melt_ptr_t sy_NORVAR_NREPOR = meltgc_named_symbol ("NORVAR_NREPOR", MELT_GET); if (sy_NORVAR_NREPOR && NULL == /*_.VALDATA___V250*/ meltfptr[249]) /*_.VALDATA___V250*/ meltfptr[249] = (melt_ptr_t) sy_NORVAR_NREPOR; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NORMTESTER_ANY */ { melt_ptr_t sy_CLASS_NORMTESTER_ANY = meltgc_named_symbol ("CLASS_NORMTESTER_ANY", MELT_GET); if (sy_CLASS_NORMTESTER_ANY && NULL == /*_.VALDATA___V252*/ meltfptr[251]) /*_.VALDATA___V252*/ meltfptr[251] = (melt_ptr_t) sy_CLASS_NORMTESTER_ANY; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_EXPRESSION */ { melt_ptr_t sy_CLASS_NREP_EXPRESSION = meltgc_named_symbol ("CLASS_NREP_EXPRESSION", MELT_GET); if (sy_CLASS_NREP_EXPRESSION && NULL == /*_.VALDATA___V254*/ meltfptr[253]) /*_.VALDATA___V254*/ meltfptr[253] = (melt_ptr_t) sy_CLASS_NREP_EXPRESSION; } /*^getnamedsymbol */ /*getnamedsym:NTEST_MATCHED */ { melt_ptr_t sy_NTEST_MATCHED = meltgc_named_symbol ("NTEST_MATCHED", MELT_GET); if (sy_NTEST_MATCHED && NULL == /*_.VALDATA___V272*/ meltfptr[271]) /*_.VALDATA___V272*/ meltfptr[271] = (melt_ptr_t) sy_NTEST_MATCHED; } /*^getnamedsymbol */ /*getnamedsym:NTEST_THEN */ { melt_ptr_t sy_NTEST_THEN = meltgc_named_symbol ("NTEST_THEN", MELT_GET); if (sy_NTEST_THEN && NULL == /*_.VALDATA___V274*/ meltfptr[273]) /*_.VALDATA___V274*/ meltfptr[273] = (melt_ptr_t) sy_NTEST_THEN; } /*^getnamedsymbol */ /*getnamedsym:NTEST_ELSE */ { melt_ptr_t sy_NTEST_ELSE = meltgc_named_symbol ("NTEST_ELSE", MELT_GET); if (sy_NTEST_ELSE && NULL == /*_.VALDATA___V276*/ meltfptr[275]) /*_.VALDATA___V276*/ meltfptr[275] = (melt_ptr_t) sy_NTEST_ELSE; } /*^getnamedsymbol */ /*getnamedsym:NTEST_NORMATCH */ { melt_ptr_t sy_NTEST_NORMATCH = meltgc_named_symbol ("NTEST_NORMATCH", MELT_GET); if (sy_NTEST_NORMATCH && NULL == /*_.VALDATA___V278*/ meltfptr[277]) /*_.VALDATA___V278*/ meltfptr[277] = (melt_ptr_t) sy_NTEST_NORMATCH; } /*^getnamedsymbol */ /*getnamedsym:NTEST_LOCCLIST */ { melt_ptr_t sy_NTEST_LOCCLIST = meltgc_named_symbol ("NTEST_LOCCLIST", MELT_GET); if (sy_NTEST_LOCCLIST && NULL == /*_.VALDATA___V280*/ meltfptr[279]) /*_.VALDATA___V280*/ meltfptr[279] = (melt_ptr_t) sy_NTEST_LOCCLIST; } /*^getnamedsymbol */ /*getnamedsym:NTEST_COMEFROM */ { melt_ptr_t sy_NTEST_COMEFROM = meltgc_named_symbol ("NTEST_COMEFROM", MELT_GET); if (sy_NTEST_COMEFROM && NULL == /*_.VALDATA___V282*/ meltfptr[281]) /*_.VALDATA___V282*/ meltfptr[281] = (melt_ptr_t) sy_NTEST_COMEFROM; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NORMTESTER_SUCCESS */ { melt_ptr_t sy_CLASS_NORMTESTER_SUCCESS = meltgc_named_symbol ("CLASS_NORMTESTER_SUCCESS", MELT_GET); if (sy_CLASS_NORMTESTER_SUCCESS && NULL == /*_.VALDATA___V284*/ meltfptr[283]) /*_.VALDATA___V284*/ meltfptr[283] = (melt_ptr_t) sy_CLASS_NORMTESTER_SUCCESS; } /*^getnamedsymbol */ /*getnamedsym:NTSUCCESS_DO */ { melt_ptr_t sy_NTSUCCESS_DO = meltgc_named_symbol ("NTSUCCESS_DO", MELT_GET); if (sy_NTSUCCESS_DO && NULL == /*_.VALDATA___V292*/ meltfptr[291]) /*_.VALDATA___V292*/ meltfptr[291] = (melt_ptr_t) sy_NTSUCCESS_DO; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NORMTESTER_OR_CLEAR */ { 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___V294*/ meltfptr[293]) /*_.VALDATA___V294*/ meltfptr[293] = (melt_ptr_t) sy_CLASS_NORMTESTER_OR_CLEAR; } /*^getnamedsymbol */ /*getnamedsym:NTORCLEAR_LOCSYM */ { melt_ptr_t sy_NTORCLEAR_LOCSYM = meltgc_named_symbol ("NTORCLEAR_LOCSYM", MELT_GET); if (sy_NTORCLEAR_LOCSYM && NULL == /*_.VALDATA___V302*/ meltfptr[301]) /*_.VALDATA___V302*/ meltfptr[301] = (melt_ptr_t) sy_NTORCLEAR_LOCSYM; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NORMTESTER_OR_INITIAL_CLEAR */ { 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___V304*/ meltfptr[303]) /*_.VALDATA___V304*/ meltfptr[303] = (melt_ptr_t) sy_CLASS_NORMTESTER_OR_INITIAL_CLEAR; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NORMTESTER_OR_TRANSMIT */ { 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___V310*/ meltfptr[309]) /*_.VALDATA___V310*/ meltfptr[309] = (melt_ptr_t) sy_CLASS_NORMTESTER_OR_TRANSMIT; } /*^getnamedsymbol */ /*getnamedsym:NTORTRANSMIT_DST */ { melt_ptr_t sy_NTORTRANSMIT_DST = meltgc_named_symbol ("NTORTRANSMIT_DST", MELT_GET); if (sy_NTORTRANSMIT_DST && NULL == /*_.VALDATA___V320*/ meltfptr[319]) /*_.VALDATA___V320*/ meltfptr[319] = (melt_ptr_t) sy_NTORTRANSMIT_DST; } /*^getnamedsymbol */ /*getnamedsym:NTORTRANSMIT_SRC */ { melt_ptr_t sy_NTORTRANSMIT_SRC = meltgc_named_symbol ("NTORTRANSMIT_SRC", MELT_GET); if (sy_NTORTRANSMIT_SRC && NULL == /*_.VALDATA___V322*/ meltfptr[321]) /*_.VALDATA___V322*/ meltfptr[321] = (melt_ptr_t) sy_NTORTRANSMIT_SRC; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NORMTESTER_ANYTESTER */ { melt_ptr_t sy_CLASS_NORMTESTER_ANYTESTER = meltgc_named_symbol ("CLASS_NORMTESTER_ANYTESTER", MELT_GET); if (sy_CLASS_NORMTESTER_ANYTESTER && NULL == /*_.VALDATA___V324*/ meltfptr[323]) /*_.VALDATA___V324*/ meltfptr[323] = (melt_ptr_t) sy_CLASS_NORMTESTER_ANYTESTER; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NORMTESTER_DISJUNCTION */ { melt_ptr_t sy_CLASS_NORMTESTER_DISJUNCTION = meltgc_named_symbol ("CLASS_NORMTESTER_DISJUNCTION", MELT_GET); if (sy_CLASS_NORMTESTER_DISJUNCTION && NULL == /*_.VALDATA___V330*/ meltfptr[329]) /*_.VALDATA___V330*/ meltfptr[329] = (melt_ptr_t) sy_CLASS_NORMTESTER_DISJUNCTION; } /*^getnamedsymbol */ /*getnamedsym:NTDISJUNCTS */ { melt_ptr_t sy_NTDISJUNCTS = meltgc_named_symbol ("NTDISJUNCTS", MELT_GET); if (sy_NTDISJUNCTS && NULL == /*_.VALDATA___V342*/ meltfptr[341]) /*_.VALDATA___V342*/ meltfptr[341] = (melt_ptr_t) sy_NTDISJUNCTS; } /*^getnamedsymbol */ /*getnamedsym:NTDISJ_FRESHORVAR */ { melt_ptr_t sy_NTDISJ_FRESHORVAR = meltgc_named_symbol ("NTDISJ_FRESHORVAR", MELT_GET); if (sy_NTDISJ_FRESHORVAR && NULL == /*_.VALDATA___V344*/ meltfptr[343]) /*_.VALDATA___V344*/ meltfptr[343] = (melt_ptr_t) sy_NTDISJ_FRESHORVAR; } /*^getnamedsymbol */ /*getnamedsym:NTDISJ_SETORVAR */ { melt_ptr_t sy_NTDISJ_SETORVAR = meltgc_named_symbol ("NTDISJ_SETORVAR", MELT_GET); if (sy_NTDISJ_SETORVAR && NULL == /*_.VALDATA___V346*/ meltfptr[345]) /*_.VALDATA___V346*/ meltfptr[345] = (melt_ptr_t) sy_NTDISJ_SETORVAR; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NORMTESTER_SAME */ { melt_ptr_t sy_CLASS_NORMTESTER_SAME = meltgc_named_symbol ("CLASS_NORMTESTER_SAME", MELT_GET); if (sy_CLASS_NORMTESTER_SAME && NULL == /*_.VALDATA___V348*/ meltfptr[347]) /*_.VALDATA___V348*/ meltfptr[347] = (melt_ptr_t) sy_CLASS_NORMTESTER_SAME; } /*^getnamedsymbol */ /*getnamedsym:NTSAME_IDENTICAL */ { melt_ptr_t sy_NTSAME_IDENTICAL = meltgc_named_symbol ("NTSAME_IDENTICAL", MELT_GET); if (sy_NTSAME_IDENTICAL && NULL == /*_.VALDATA___V356*/ meltfptr[355]) /*_.VALDATA___V356*/ meltfptr[355] = (melt_ptr_t) sy_NTSAME_IDENTICAL; } /*^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___V358*/ meltfptr[357]) /*_.VALDATA___V358*/ meltfptr[357] = (melt_ptr_t) sy_CLASS_NORMTESTER_MATCHER; } /*^getnamedsymbol */ /*getnamedsym:NTMATCH_MATCHER */ { melt_ptr_t sy_NTMATCH_MATCHER = meltgc_named_symbol ("NTMATCH_MATCHER", MELT_GET); if (sy_NTMATCH_MATCHER && NULL == /*_.VALDATA___V372*/ meltfptr[371]) /*_.VALDATA___V372*/ meltfptr[371] = (melt_ptr_t) sy_NTMATCH_MATCHER; } /*^getnamedsymbol */ /*getnamedsym:NTMATCH_MATNDATA */ { melt_ptr_t sy_NTMATCH_MATNDATA = meltgc_named_symbol ("NTMATCH_MATNDATA", MELT_GET); if (sy_NTMATCH_MATNDATA && NULL == /*_.VALDATA___V374*/ meltfptr[373]) /*_.VALDATA___V374*/ meltfptr[373] = (melt_ptr_t) sy_NTMATCH_MATNDATA; } /*^getnamedsymbol */ /*getnamedsym:NTMATCH_INARGS */ { melt_ptr_t sy_NTMATCH_INARGS = meltgc_named_symbol ("NTMATCH_INARGS", MELT_GET); if (sy_NTMATCH_INARGS && NULL == /*_.VALDATA___V376*/ meltfptr[375]) /*_.VALDATA___V376*/ meltfptr[375] = (melt_ptr_t) sy_NTMATCH_INARGS; } /*^getnamedsymbol */ /*getnamedsym:NTMATCH_OUTLOCS */ { melt_ptr_t sy_NTMATCH_OUTLOCS = meltgc_named_symbol ("NTMATCH_OUTLOCS", MELT_GET); if (sy_NTMATCH_OUTLOCS && NULL == /*_.VALDATA___V378*/ meltfptr[377]) /*_.VALDATA___V378*/ meltfptr[377] = (melt_ptr_t) sy_NTMATCH_OUTLOCS; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NORMTESTER_INSTANCE */ { melt_ptr_t sy_CLASS_NORMTESTER_INSTANCE = meltgc_named_symbol ("CLASS_NORMTESTER_INSTANCE", MELT_GET); if (sy_CLASS_NORMTESTER_INSTANCE && NULL == /*_.VALDATA___V380*/ meltfptr[379]) /*_.VALDATA___V380*/ meltfptr[379] = (melt_ptr_t) sy_CLASS_NORMTESTER_INSTANCE; } /*^getnamedsymbol */ /*getnamedsym:NTINST_CLASS */ { melt_ptr_t sy_NTINST_CLASS = meltgc_named_symbol ("NTINST_CLASS", MELT_GET); if (sy_NTINST_CLASS && NULL == /*_.VALDATA___V390*/ meltfptr[389]) /*_.VALDATA___V390*/ meltfptr[389] = (melt_ptr_t) sy_NTINST_CLASS; } /*^getnamedsymbol */ /*getnamedsym:NTINST_FIELDLOCS */ { melt_ptr_t sy_NTINST_FIELDLOCS = meltgc_named_symbol ("NTINST_FIELDLOCS", MELT_GET); if (sy_NTINST_FIELDLOCS && NULL == /*_.VALDATA___V392*/ meltfptr[391]) /*_.VALDATA___V392*/ meltfptr[391] = (melt_ptr_t) sy_NTINST_FIELDLOCS; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NORMTESTER_TUPLE */ { melt_ptr_t sy_CLASS_NORMTESTER_TUPLE = meltgc_named_symbol ("CLASS_NORMTESTER_TUPLE", MELT_GET); if (sy_CLASS_NORMTESTER_TUPLE && NULL == /*_.VALDATA___V394*/ meltfptr[393]) /*_.VALDATA___V394*/ meltfptr[393] = (melt_ptr_t) sy_CLASS_NORMTESTER_TUPLE; } /*^getnamedsymbol */ /*getnamedsym:NTTUPLE_COMPONENTS */ { melt_ptr_t sy_NTTUPLE_COMPONENTS = meltgc_named_symbol ("NTTUPLE_COMPONENTS", MELT_GET); if (sy_NTTUPLE_COMPONENTS && NULL == /*_.VALDATA___V402*/ meltfptr[401]) /*_.VALDATA___V402*/ meltfptr[401] = (melt_ptr_t) sy_NTTUPLE_COMPONENTS; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_MATCH */ { melt_ptr_t sy_CLASS_NREP_MATCH = meltgc_named_symbol ("CLASS_NREP_MATCH", MELT_GET); if (sy_CLASS_NREP_MATCH && NULL == /*_.VALDATA___V404*/ meltfptr[403]) /*_.VALDATA___V404*/ meltfptr[403] = (melt_ptr_t) sy_CLASS_NREP_MATCH; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_TYPED_EXPRESSION */ { 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___V406*/ meltfptr[405]) /*_.VALDATA___V406*/ meltfptr[405] = (melt_ptr_t) sy_CLASS_NREP_TYPED_EXPRESSION; } /*^getnamedsymbol */ /*getnamedsym:NMATCH_TESTS */ { melt_ptr_t sy_NMATCH_TESTS = meltgc_named_symbol ("NMATCH_TESTS", MELT_GET); if (sy_NMATCH_TESTS && NULL == /*_.VALDATA___V418*/ meltfptr[417]) /*_.VALDATA___V418*/ meltfptr[417] = (melt_ptr_t) sy_NMATCH_TESTS; } /*^getnamedsymbol */ /*getnamedsym:NMATCH_STUFFMAP */ { melt_ptr_t sy_NMATCH_STUFFMAP = meltgc_named_symbol ("NMATCH_STUFFMAP", MELT_GET); if (sy_NMATCH_STUFFMAP && NULL == /*_.VALDATA___V420*/ meltfptr[419]) /*_.VALDATA___V420*/ meltfptr[419] = (melt_ptr_t) sy_NMATCH_STUFFMAP; } /*^getnamedsymbol */ /*getnamedsym:NMATCH_MATCHED */ { melt_ptr_t sy_NMATCH_MATCHED = meltgc_named_symbol ("NMATCH_MATCHED", MELT_GET); if (sy_NMATCH_MATCHED && NULL == /*_.VALDATA___V422*/ meltfptr[421]) /*_.VALDATA___V422*/ meltfptr[421] = (melt_ptr_t) sy_NMATCH_MATCHED; } /*^getnamedsymbol */ /*getnamedsym:DISCR_LIST */ { melt_ptr_t sy_DISCR_LIST = meltgc_named_symbol ("DISCR_LIST", MELT_GET); if (sy_DISCR_LIST && NULL == /*_.VALDATA___V426*/ meltfptr[425]) /*_.VALDATA___V426*/ meltfptr[425] = (melt_ptr_t) sy_DISCR_LIST; } /*^getnamedsymbol */ /*getnamedsym:CLASS_REFERENCE */ { melt_ptr_t sy_CLASS_REFERENCE = meltgc_named_symbol ("CLASS_REFERENCE", MELT_GET); if (sy_CLASS_REFERENCE && NULL == /*_.VALDATA___V432*/ meltfptr[431]) /*_.VALDATA___V432*/ meltfptr[431] = (melt_ptr_t) sy_CLASS_REFERENCE; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_LOCSYMOCC */ { melt_ptr_t sy_CLASS_NREP_LOCSYMOCC = meltgc_named_symbol ("CLASS_NREP_LOCSYMOCC", MELT_GET); if (sy_CLASS_NREP_LOCSYMOCC && NULL == /*_.VALDATA___V443*/ meltfptr[442]) /*_.VALDATA___V443*/ meltfptr[442] = (melt_ptr_t) sy_CLASS_NREP_LOCSYMOCC; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NORMAL_LET_BINDING */ { 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___V447*/ meltfptr[446]) /*_.VALDATA___V447*/ meltfptr[446] = (melt_ptr_t) sy_CLASS_NORMAL_LET_BINDING; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NORMALIZATION_CONTEXT */ { melt_ptr_t sy_CLASS_NORMALIZATION_CONTEXT = meltgc_named_symbol ("CLASS_NORMALIZATION_CONTEXT", MELT_GET); if (sy_CLASS_NORMALIZATION_CONTEXT && NULL == /*_.VALDATA___V449*/ meltfptr[448]) /*_.VALDATA___V449*/ meltfptr[448] = (melt_ptr_t) sy_CLASS_NORMALIZATION_CONTEXT; } /*^getnamedsymbol */ /*getnamedsym:CLASS_QUASI_CTYPE */ { melt_ptr_t sy_CLASS_QUASI_CTYPE = meltgc_named_symbol ("CLASS_QUASI_CTYPE", MELT_GET); if (sy_CLASS_QUASI_CTYPE && NULL == /*_.VALDATA___V451*/ meltfptr[450]) /*_.VALDATA___V451*/ meltfptr[450] = (melt_ptr_t) sy_CLASS_QUASI_CTYPE; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_PATTERN_INSTANCE */ { 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___V463*/ meltfptr[462]) /*_.VALDATA___V463*/ meltfptr[462] = (melt_ptr_t) sy_CLASS_SOURCE_PATTERN_INSTANCE; } /*^getnamedsymbol */ /*getnamedsym:DISCR_MULTIPLE */ { melt_ptr_t sy_DISCR_MULTIPLE = meltgc_named_symbol ("DISCR_MULTIPLE", MELT_GET); if (sy_DISCR_MULTIPLE && NULL == /*_.VALDATA___V465*/ meltfptr[464]) /*_.VALDATA___V465*/ meltfptr[464] = (melt_ptr_t) sy_DISCR_MULTIPLE; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_SYMOCC */ { melt_ptr_t sy_CLASS_NREP_SYMOCC = meltgc_named_symbol ("CLASS_NREP_SYMOCC", MELT_GET); if (sy_CLASS_NREP_SYMOCC && NULL == /*_.VALDATA___V467*/ meltfptr[466]) /*_.VALDATA___V467*/ meltfptr[466] = (melt_ptr_t) sy_CLASS_NREP_SYMOCC; } /*^getnamedsymbol */ /*getnamedsym:CLASS_LET_BINDING */ { melt_ptr_t sy_CLASS_LET_BINDING = meltgc_named_symbol ("CLASS_LET_BINDING", MELT_GET); if (sy_CLASS_LET_BINDING && NULL == /*_.VALDATA___V469*/ meltfptr[468]) /*_.VALDATA___V469*/ meltfptr[468] = (melt_ptr_t) sy_CLASS_LET_BINDING; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_UNSAFE_GET_FIELD */ { 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___V471*/ meltfptr[470]) /*_.VALDATA___V471*/ meltfptr[470] = (melt_ptr_t) sy_CLASS_NREP_UNSAFE_GET_FIELD; } /*^getnamedsymbol */ /*getnamedsym:CLONE_SYMBOL */ { melt_ptr_t sy_CLONE_SYMBOL = meltgc_named_symbol ("CLONE_SYMBOL", MELT_GET); if (sy_CLONE_SYMBOL && NULL == /*_.VALDATA___V473*/ meltfptr[472]) /*_.VALDATA___V473*/ meltfptr[472] = (melt_ptr_t) sy_CLONE_SYMBOL; } /*^getnamedsymbol */ /*getnamedsym:CLASS_TUPLE_COMPONENT_PATTERN */ { 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___V475*/ meltfptr[474]) /*_.VALDATA___V475*/ meltfptr[474] = (melt_ptr_t) sy_CLASS_TUPLE_COMPONENT_PATTERN; } /*^getnamedsymbol */ /*getnamedsym:TUPCP_PATTERN */ { melt_ptr_t sy_TUPCP_PATTERN = meltgc_named_symbol ("TUPCP_PATTERN", MELT_GET); if (sy_TUPCP_PATTERN && NULL == /*_.VALDATA___V485*/ meltfptr[484]) /*_.VALDATA___V485*/ meltfptr[484] = (melt_ptr_t) sy_TUPCP_PATTERN; } /*^getnamedsymbol */ /*getnamedsym:TUPCP_INDEX */ { melt_ptr_t sy_TUPCP_INDEX = meltgc_named_symbol ("TUPCP_INDEX", MELT_GET); if (sy_TUPCP_INDEX && NULL == /*_.VALDATA___V487*/ meltfptr[486]) /*_.VALDATA___V487*/ meltfptr[486] = (melt_ptr_t) sy_TUPCP_INDEX; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_PATTERN_TUPLE */ { 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___V499*/ meltfptr[498]) /*_.VALDATA___V499*/ meltfptr[498] = (melt_ptr_t) sy_CLASS_SOURCE_PATTERN_TUPLE; } /*^getnamedsymbol */ /*getnamedsym:DISCR_CONSTANT_INTEGER */ { melt_ptr_t sy_DISCR_CONSTANT_INTEGER = meltgc_named_symbol ("DISCR_CONSTANT_INTEGER", MELT_GET); if (sy_DISCR_CONSTANT_INTEGER && NULL == /*_.VALDATA___V501*/ meltfptr[500]) /*_.VALDATA___V501*/ meltfptr[500] = (melt_ptr_t) sy_DISCR_CONSTANT_INTEGER; } /*^getnamedsymbol */ /*getnamedsym:LIST_TO_MULTIPLE */ { melt_ptr_t sy_LIST_TO_MULTIPLE = meltgc_named_symbol ("LIST_TO_MULTIPLE", MELT_GET); if (sy_LIST_TO_MULTIPLE && NULL == /*_.VALDATA___V503*/ meltfptr[502]) /*_.VALDATA___V503*/ meltfptr[502] = (melt_ptr_t) sy_LIST_TO_MULTIPLE; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_UNSAFE_NTH_COMPONENT */ { 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___V505*/ meltfptr[504]) /*_.VALDATA___V505*/ meltfptr[504] = (melt_ptr_t) sy_CLASS_NREP_UNSAFE_NTH_COMPONENT; } /*^getnamedsymbol */ /*getnamedsym:NTHCOMP */ { melt_ptr_t sy_NTHCOMP = meltgc_named_symbol ("NTHCOMP", MELT_GET); if (sy_NTHCOMP && NULL == /*_.VALDATA___V496*/ meltfptr[495]) /*_.VALDATA___V496*/ meltfptr[495] = (melt_ptr_t) sy_NTHCOMP; } /*^getnamedsymbol */ /*getnamedsym:MAPOBJECT_SORTED_ATTRIBUTE_TUPLE */ { 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___V515*/ meltfptr[514]) /*_.VALDATA___V515*/ meltfptr[514] = (melt_ptr_t) sy_MAPOBJECT_SORTED_ATTRIBUTE_TUPLE; } /*^getnamedsymbol */ /*getnamedsym:MULTIPLE_MAP */ { melt_ptr_t sy_MULTIPLE_MAP = meltgc_named_symbol ("MULTIPLE_MAP", MELT_GET); if (sy_MULTIPLE_MAP && NULL == /*_.VALDATA___V517*/ meltfptr[516]) /*_.VALDATA___V517*/ meltfptr[516] = (melt_ptr_t) sy_MULTIPLE_MAP; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP */ { melt_ptr_t sy_CLASS_NREP = meltgc_named_symbol ("CLASS_NREP", MELT_GET); if (sy_CLASS_NREP && NULL == /*_.VALDATA___V519*/ meltfptr[518]) /*_.VALDATA___V519*/ meltfptr[518] = (melt_ptr_t) sy_CLASS_NREP; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_PATTERN_MATCHER */ { 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___V527*/ meltfptr[526]) /*_.VALDATA___V527*/ meltfptr[526] = (melt_ptr_t) sy_CLASS_SOURCE_PATTERN_MATCHER; } /*^getnamedsymbol */ /*getnamedsym:CLASS_ANY_BINDING */ { melt_ptr_t sy_CLASS_ANY_BINDING = meltgc_named_symbol ("CLASS_ANY_BINDING", MELT_GET); if (sy_CLASS_ANY_BINDING && NULL == /*_.VALDATA___V529*/ meltfptr[528]) /*_.VALDATA___V529*/ meltfptr[528] = (melt_ptr_t) sy_CLASS_ANY_BINDING; } /*^getnamedsymbol */ /*getnamedsym:FIND_ENV */ { melt_ptr_t sy_FIND_ENV = meltgc_named_symbol ("FIND_ENV", MELT_GET); if (sy_FIND_ENV && NULL == /*_.VALDATA___V531*/ meltfptr[530]) /*_.VALDATA___V531*/ meltfptr[530] = (melt_ptr_t) sy_FIND_ENV; } /*^getnamedsymbol */ /*getnamedsym:FRESH_ENV */ { melt_ptr_t sy_FRESH_ENV = meltgc_named_symbol ("FRESH_ENV", MELT_GET); if (sy_FRESH_ENV && NULL == /*_.VALDATA___V533*/ meltfptr[532]) /*_.VALDATA___V533*/ meltfptr[532] = (melt_ptr_t) sy_FRESH_ENV; } /*^getnamedsymbol */ /*getnamedsym:PUT_ENV */ { melt_ptr_t sy_PUT_ENV = meltgc_named_symbol ("PUT_ENV", MELT_GET); if (sy_PUT_ENV && NULL == /*_.VALDATA___V535*/ meltfptr[534]) /*_.VALDATA___V535*/ meltfptr[534] = (melt_ptr_t) sy_PUT_ENV; } /*^getnamedsymbol */ /*getnamedsym:MULTIPLE_TO_LIST */ { melt_ptr_t sy_MULTIPLE_TO_LIST = meltgc_named_symbol ("MULTIPLE_TO_LIST", MELT_GET); if (sy_MULTIPLE_TO_LIST && NULL == /*_.VALDATA___V537*/ meltfptr[536]) /*_.VALDATA___V537*/ meltfptr[536] = (melt_ptr_t) sy_MULTIPLE_TO_LIST; } /*^getnamedsymbol */ /*getnamedsym:MATCH_GRAPHIC_DOT_PREFIX */ { 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___V542*/ meltfptr[541]) /*_.VALDATA___V542*/ meltfptr[541] = (melt_ptr_t) sy_MATCH_GRAPHIC_DOT_PREFIX; } /*^getnamedsymbol */ /*getnamedsym:DISCR_STRING */ { melt_ptr_t sy_DISCR_STRING = meltgc_named_symbol ("DISCR_STRING", MELT_GET); if (sy_DISCR_STRING && NULL == /*_.VALDATA___V547*/ meltfptr[546]) /*_.VALDATA___V547*/ meltfptr[546] = (melt_ptr_t) sy_DISCR_STRING; } /*^getnamedsymbol */ /*getnamedsym:REGISTER_OPTION */ { melt_ptr_t sy_REGISTER_OPTION = meltgc_named_symbol ("REGISTER_OPTION", MELT_GET); if (sy_REGISTER_OPTION && NULL == /*_.VALDATA___V549*/ meltfptr[548]) /*_.VALDATA___V549*/ meltfptr[548] = (melt_ptr_t) sy_REGISTER_OPTION; } /*^getnamedsymbol */ /*getnamedsym:MATCH_GRAPHIC */ { melt_ptr_t sy_MATCH_GRAPHIC = meltgc_named_symbol ("MATCH_GRAPHIC", MELT_GET); if (sy_MATCH_GRAPHIC && NULL == /*_.VALDATA___V551*/ meltfptr[550]) /*_.VALDATA___V551*/ meltfptr[550] = (melt_ptr_t) sy_MATCH_GRAPHIC; } /*^getnamedsymbol */ /*getnamedsym:CLASS_MATCH_GRAPHIC */ { melt_ptr_t sy_CLASS_MATCH_GRAPHIC = meltgc_named_symbol ("CLASS_MATCH_GRAPHIC", MELT_GET); if (sy_CLASS_MATCH_GRAPHIC && NULL == /*_.VALDATA___V554*/ meltfptr[553]) /*_.VALDATA___V554*/ meltfptr[553] = (melt_ptr_t) sy_CLASS_MATCH_GRAPHIC; } /*^getnamedsymbol */ /*getnamedsym:CLASS_PROPED */ { melt_ptr_t sy_CLASS_PROPED = meltgc_named_symbol ("CLASS_PROPED", MELT_GET); if (sy_CLASS_PROPED && NULL == /*_.VALDATA___V556*/ meltfptr[555]) /*_.VALDATA___V556*/ meltfptr[555] = (melt_ptr_t) sy_CLASS_PROPED; } /*^getnamedsymbol */ /*getnamedsym:MCHGX_FILENAME */ { melt_ptr_t sy_MCHGX_FILENAME = meltgc_named_symbol ("MCHGX_FILENAME", MELT_GET); if (sy_MCHGX_FILENAME && NULL == /*_.VALDATA___V572*/ meltfptr[571]) /*_.VALDATA___V572*/ meltfptr[571] = (melt_ptr_t) sy_MCHGX_FILENAME; } /*^getnamedsymbol */ /*getnamedsym:MCHGX_NODOUT */ { melt_ptr_t sy_MCHGX_NODOUT = meltgc_named_symbol ("MCHGX_NODOUT", MELT_GET); if (sy_MCHGX_NODOUT && NULL == /*_.VALDATA___V574*/ meltfptr[573]) /*_.VALDATA___V574*/ meltfptr[573] = (melt_ptr_t) sy_MCHGX_NODOUT; } /*^getnamedsymbol */ /*getnamedsym:MCHGX_EDGOUT */ { melt_ptr_t sy_MCHGX_EDGOUT = meltgc_named_symbol ("MCHGX_EDGOUT", MELT_GET); if (sy_MCHGX_EDGOUT && NULL == /*_.VALDATA___V576*/ meltfptr[575]) /*_.VALDATA___V576*/ meltfptr[575] = (melt_ptr_t) sy_MCHGX_EDGOUT; } /*^getnamedsymbol */ /*getnamedsym:MCHGX_DATANAMEMAP */ { melt_ptr_t sy_MCHGX_DATANAMEMAP = meltgc_named_symbol ("MCHGX_DATANAMEMAP", MELT_GET); if (sy_MCHGX_DATANAMEMAP && NULL == /*_.VALDATA___V578*/ meltfptr[577]) /*_.VALDATA___V578*/ meltfptr[577] = (melt_ptr_t) sy_MCHGX_DATANAMEMAP; } /*^getnamedsymbol */ /*getnamedsym:MCHGX_STEPNAMEMAP */ { melt_ptr_t sy_MCHGX_STEPNAMEMAP = meltgc_named_symbol ("MCHGX_STEPNAMEMAP", MELT_GET); if (sy_MCHGX_STEPNAMEMAP && NULL == /*_.VALDATA___V580*/ meltfptr[579]) /*_.VALDATA___V580*/ meltfptr[579] = (melt_ptr_t) sy_MCHGX_STEPNAMEMAP; } /*^getnamedsymbol */ /*getnamedsym:MATCHGRAPHIC_LABEL */ { melt_ptr_t sy_MATCHGRAPHIC_LABEL = meltgc_named_symbol ("MATCHGRAPHIC_LABEL", MELT_GET); if (sy_MATCHGRAPHIC_LABEL && NULL == /*_.VALDATA___V584*/ meltfptr[583]) /*_.VALDATA___V584*/ meltfptr[583] = (melt_ptr_t) sy_MATCHGRAPHIC_LABEL; } /*^getnamedsymbol */ /*getnamedsym:CLASS_CLONED_SYMBOL */ { melt_ptr_t sy_CLASS_CLONED_SYMBOL = meltgc_named_symbol ("CLASS_CLONED_SYMBOL", MELT_GET); if (sy_CLASS_CLONED_SYMBOL && NULL == /*_.VALDATA___V592*/ meltfptr[591]) /*_.VALDATA___V592*/ meltfptr[591] = (melt_ptr_t) sy_CLASS_CLONED_SYMBOL; } /*^getnamedsymbol */ /*getnamedsym:DISCR_STRBUF */ { melt_ptr_t sy_DISCR_STRBUF = meltgc_named_symbol ("DISCR_STRBUF", MELT_GET); if (sy_DISCR_STRBUF && NULL == /*_.VALDATA___V602*/ meltfptr[601]) /*_.VALDATA___V602*/ meltfptr[601] = (melt_ptr_t) sy_DISCR_STRBUF; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_MATCH */ { melt_ptr_t sy_CLASS_SOURCE_MATCH = meltgc_named_symbol ("CLASS_SOURCE_MATCH", MELT_GET); if (sy_CLASS_SOURCE_MATCH && NULL == /*_.VALDATA___V613*/ meltfptr[612]) /*_.VALDATA___V613*/ meltfptr[612] = (melt_ptr_t) sy_CLASS_SOURCE_MATCH; } /*^getnamedsymbol */ /*getnamedsym:CLASS_ENVIRONMENT */ { melt_ptr_t sy_CLASS_ENVIRONMENT = meltgc_named_symbol ("CLASS_ENVIRONMENT", MELT_GET); if (sy_CLASS_ENVIRONMENT && NULL == /*_.VALDATA___V615*/ meltfptr[614]) /*_.VALDATA___V615*/ meltfptr[614] = (melt_ptr_t) sy_CLASS_ENVIRONMENT; } /*^getnamedsymbol */ /*getnamedsym:MATCH_INTER_ */ { melt_ptr_t sy_MATCH_INTER_ = meltgc_named_symbol ("MATCH_INTER_", MELT_GET); if (sy_MATCH_INTER_ && NULL == /*_.VALDATA___V605*/ meltfptr[604]) /*_.VALDATA___V605*/ meltfptr[604] = (melt_ptr_t) sy_MATCH_INTER_; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_CHECKSIGNAL */ { melt_ptr_t sy_CLASS_NREP_CHECKSIGNAL = meltgc_named_symbol ("CLASS_NREP_CHECKSIGNAL", MELT_GET); if (sy_CLASS_NREP_CHECKSIGNAL && NULL == /*_.VALDATA___V617*/ meltfptr[616]) /*_.VALDATA___V617*/ meltfptr[616] = (melt_ptr_t) sy_CLASS_NREP_CHECKSIGNAL; } /*^getnamedsymbol */ /*getnamedsym:CTYPE_VOID */ { melt_ptr_t sy_CTYPE_VOID = meltgc_named_symbol ("CTYPE_VOID", MELT_GET); if (sy_CTYPE_VOID && NULL == /*_.VALDATA___V619*/ meltfptr[618]) /*_.VALDATA___V619*/ meltfptr[618] = (melt_ptr_t) sy_CTYPE_VOID; } /*^getnamedsymbol */ /*getnamedsym:_MATCHED_ */ { melt_ptr_t sy_MATCHED_ = meltgc_named_symbol ("_MATCHED_", MELT_GET); if (sy_MATCHED_ && NULL == /*_.VALDATA___V607*/ meltfptr[606]) /*_.VALDATA___V607*/ meltfptr[606] = (melt_ptr_t) sy_MATCHED_; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_MATCH_CASE */ { 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___V621*/ meltfptr[620]) /*_.VALDATA___V621*/ meltfptr[620] = (melt_ptr_t) sy_CLASS_SOURCE_MATCH_CASE; } /*^getnamedsymbol */ /*getnamedsym:WRAP_NORMAL_LETSEQ */ { melt_ptr_t sy_WRAP_NORMAL_LETSEQ = meltgc_named_symbol ("WRAP_NORMAL_LETSEQ", MELT_GET); if (sy_WRAP_NORMAL_LETSEQ && NULL == /*_.VALDATA___V623*/ meltfptr[622]) /*_.VALDATA___V623*/ meltfptr[622] = (melt_ptr_t) sy_WRAP_NORMAL_LETSEQ; } /*^getnamedsymbol */ /*getnamedsym:MATCHRES_ */ { melt_ptr_t sy_MATCHRES_ = meltgc_named_symbol ("MATCHRES_", MELT_GET); if (sy_MATCHRES_ && NULL == /*_.VALDATA___V610*/ meltfptr[609]) /*_.VALDATA___V610*/ meltfptr[609] = (melt_ptr_t) sy_MATCHRES_; } /*^getnamedsymbol */ /*getnamedsym:CLASS_MATCHING_CONTEXT */ { melt_ptr_t sy_CLASS_MATCHING_CONTEXT = meltgc_named_symbol ("CLASS_MATCHING_CONTEXT", MELT_GET); if (sy_CLASS_MATCHING_CONTEXT && NULL == /*_.VALDATA___V625*/ meltfptr[624]) /*_.VALDATA___V625*/ meltfptr[624] = (melt_ptr_t) sy_CLASS_MATCHING_CONTEXT; } /*^getnamedsymbol */ /*getnamedsym:MCTX_NORMCTXT */ { melt_ptr_t sy_MCTX_NORMCTXT = meltgc_named_symbol ("MCTX_NORMCTXT", MELT_GET); if (sy_MCTX_NORMCTXT && NULL == /*_.VALDATA___V651*/ meltfptr[650]) /*_.VALDATA___V651*/ meltfptr[650] = (melt_ptr_t) sy_MCTX_NORMCTXT; } /*^getnamedsymbol */ /*getnamedsym:MCTX_SOURCE */ { melt_ptr_t sy_MCTX_SOURCE = meltgc_named_symbol ("MCTX_SOURCE", MELT_GET); if (sy_MCTX_SOURCE && NULL == /*_.VALDATA___V653*/ meltfptr[652]) /*_.VALDATA___V653*/ meltfptr[652] = (melt_ptr_t) sy_MCTX_SOURCE; } /*^getnamedsymbol */ /*getnamedsym:MCTX_NMATCHED */ { melt_ptr_t sy_MCTX_NMATCHED = meltgc_named_symbol ("MCTX_NMATCHED", MELT_GET); if (sy_MCTX_NMATCHED && NULL == /*_.VALDATA___V655*/ meltfptr[654]) /*_.VALDATA___V655*/ meltfptr[654] = (melt_ptr_t) sy_MCTX_NMATCHED; } /*^getnamedsymbol */ /*getnamedsym:MCTX_NMATBIND */ { melt_ptr_t sy_MCTX_NMATBIND = meltgc_named_symbol ("MCTX_NMATBIND", MELT_GET); if (sy_MCTX_NMATBIND && NULL == /*_.VALDATA___V657*/ meltfptr[656]) /*_.VALDATA___V657*/ meltfptr[656] = (melt_ptr_t) sy_MCTX_NMATBIND; } /*^getnamedsymbol */ /*getnamedsym:MCTX_CASES */ { melt_ptr_t sy_MCTX_CASES = meltgc_named_symbol ("MCTX_CASES", MELT_GET); if (sy_MCTX_CASES && NULL == /*_.VALDATA___V659*/ meltfptr[658]) /*_.VALDATA___V659*/ meltfptr[658] = (melt_ptr_t) sy_MCTX_CASES; } /*^getnamedsymbol */ /*getnamedsym:MCTX_ENV */ { melt_ptr_t sy_MCTX_ENV = meltgc_named_symbol ("MCTX_ENV", MELT_GET); if (sy_MCTX_ENV && NULL == /*_.VALDATA___V661*/ meltfptr[660]) /*_.VALDATA___V661*/ meltfptr[660] = (melt_ptr_t) sy_MCTX_ENV; } /*^getnamedsymbol */ /*getnamedsym:MCTX_MDATA */ { melt_ptr_t sy_MCTX_MDATA = meltgc_named_symbol ("MCTX_MDATA", MELT_GET); if (sy_MCTX_MDATA && NULL == /*_.VALDATA___V663*/ meltfptr[662]) /*_.VALDATA___V663*/ meltfptr[662] = (melt_ptr_t) sy_MCTX_MDATA; } /*^getnamedsymbol */ /*getnamedsym:MCTX_VARHANDLERS */ { melt_ptr_t sy_MCTX_VARHANDLERS = meltgc_named_symbol ("MCTX_VARHANDLERS", MELT_GET); if (sy_MCTX_VARHANDLERS && NULL == /*_.VALDATA___V665*/ meltfptr[664]) /*_.VALDATA___V665*/ meltfptr[664] = (melt_ptr_t) sy_MCTX_VARHANDLERS; } /*^getnamedsymbol */ /*getnamedsym:MCTX_FLAGS */ { melt_ptr_t sy_MCTX_FLAGS = meltgc_named_symbol ("MCTX_FLAGS", MELT_GET); if (sy_MCTX_FLAGS && NULL == /*_.VALDATA___V667*/ meltfptr[666]) /*_.VALDATA___V667*/ meltfptr[666] = (melt_ptr_t) sy_MCTX_FLAGS; } /*^getnamedsymbol */ /*getnamedsym:MCTX_ENDLABEL */ { melt_ptr_t sy_MCTX_ENDLABEL = meltgc_named_symbol ("MCTX_ENDLABEL", MELT_GET); if (sy_MCTX_ENDLABEL && NULL == /*_.VALDATA___V669*/ meltfptr[668]) /*_.VALDATA___V669*/ meltfptr[668] = (melt_ptr_t) sy_MCTX_ENDLABEL; } /*^getnamedsymbol */ /*getnamedsym:CLASS_MATCH_CASE */ { melt_ptr_t sy_CLASS_MATCH_CASE = meltgc_named_symbol ("CLASS_MATCH_CASE", MELT_GET); if (sy_CLASS_MATCH_CASE && NULL == /*_.VALDATA___V671*/ meltfptr[670]) /*_.VALDATA___V671*/ meltfptr[670] = (melt_ptr_t) sy_CLASS_MATCH_CASE; } /*^getnamedsymbol */ /*getnamedsym:MCASE_MCTXT */ { melt_ptr_t sy_MCASE_MCTXT = meltgc_named_symbol ("MCASE_MCTXT", MELT_GET); if (sy_MCASE_MCTXT && NULL == /*_.VALDATA___V685*/ meltfptr[684]) /*_.VALDATA___V685*/ meltfptr[684] = (melt_ptr_t) sy_MCASE_MCTXT; } /*^getnamedsymbol */ /*getnamedsym:MCASE_SOURCE */ { melt_ptr_t sy_MCASE_SOURCE = meltgc_named_symbol ("MCASE_SOURCE", MELT_GET); if (sy_MCASE_SOURCE && NULL == /*_.VALDATA___V687*/ meltfptr[686]) /*_.VALDATA___V687*/ meltfptr[686] = (melt_ptr_t) sy_MCASE_SOURCE; } /*^getnamedsymbol */ /*getnamedsym:MCASE_INDEX */ { melt_ptr_t sy_MCASE_INDEX = meltgc_named_symbol ("MCASE_INDEX", MELT_GET); if (sy_MCASE_INDEX && NULL == /*_.VALDATA___V689*/ meltfptr[688]) /*_.VALDATA___V689*/ meltfptr[688] = (melt_ptr_t) sy_MCASE_INDEX; } /*^getnamedsymbol */ /*getnamedsym:MCASE_VARMAP */ { melt_ptr_t sy_MCASE_VARMAP = meltgc_named_symbol ("MCASE_VARMAP", MELT_GET); if (sy_MCASE_VARMAP && NULL == /*_.VALDATA___V691*/ meltfptr[690]) /*_.VALDATA___V691*/ meltfptr[690] = (melt_ptr_t) sy_MCASE_VARMAP; } /*^getnamedsymbol */ /*getnamedsym:CLASS_MATCHED_DATA */ { melt_ptr_t sy_CLASS_MATCHED_DATA = meltgc_named_symbol ("CLASS_MATCHED_DATA", MELT_GET); if (sy_CLASS_MATCHED_DATA && NULL == /*_.VALDATA___V693*/ meltfptr[692]) /*_.VALDATA___V693*/ meltfptr[692] = (melt_ptr_t) sy_CLASS_MATCHED_DATA; } /*^getnamedsymbol */ /*getnamedsym:MDATA_SYMB */ { melt_ptr_t sy_MDATA_SYMB = meltgc_named_symbol ("MDATA_SYMB", MELT_GET); if (sy_MDATA_SYMB && NULL == /*_.VALDATA___V707*/ meltfptr[706]) /*_.VALDATA___V707*/ meltfptr[706] = (melt_ptr_t) sy_MDATA_SYMB; } /*^getnamedsymbol */ /*getnamedsym:MDATA_CTYPE */ { melt_ptr_t sy_MDATA_CTYPE = meltgc_named_symbol ("MDATA_CTYPE", MELT_GET); if (sy_MDATA_CTYPE && NULL == /*_.VALDATA___V709*/ meltfptr[708]) /*_.VALDATA___V709*/ meltfptr[708] = (melt_ptr_t) sy_MDATA_CTYPE; } /*^getnamedsymbol */ /*getnamedsym:MDATA_ORIG */ { melt_ptr_t sy_MDATA_ORIG = meltgc_named_symbol ("MDATA_ORIG", MELT_GET); if (sy_MDATA_ORIG && NULL == /*_.VALDATA___V711*/ meltfptr[710]) /*_.VALDATA___V711*/ meltfptr[710] = (melt_ptr_t) sy_MDATA_ORIG; } /*^getnamedsymbol */ /*getnamedsym:MDATA_STEPS */ { melt_ptr_t sy_MDATA_STEPS = meltgc_named_symbol ("MDATA_STEPS", MELT_GET); if (sy_MDATA_STEPS && NULL == /*_.VALDATA___V713*/ meltfptr[712]) /*_.VALDATA___V713*/ meltfptr[712] = (melt_ptr_t) sy_MDATA_STEPS; } /*^getnamedsymbol */ /*getnamedsym:CLASS_MATCHED_NORMAL_DATA */ { 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___V715*/ meltfptr[714]) /*_.VALDATA___V715*/ meltfptr[714] = (melt_ptr_t) sy_CLASS_MATCHED_NORMAL_DATA; } /*^getnamedsymbol */ /*getnamedsym:CLASS_MATCHED_BINDING */ { melt_ptr_t sy_CLASS_MATCHED_BINDING = meltgc_named_symbol ("CLASS_MATCHED_BINDING", MELT_GET); if (sy_CLASS_MATCHED_BINDING && NULL == /*_.VALDATA___V721*/ meltfptr[720]) /*_.VALDATA___V721*/ meltfptr[720] = (melt_ptr_t) sy_CLASS_MATCHED_BINDING; } /*^getnamedsymbol */ /*getnamedsym:MATCHBIND_DATA */ { melt_ptr_t sy_MATCHBIND_DATA = meltgc_named_symbol ("MATCHBIND_DATA", MELT_GET); if (sy_MATCHBIND_DATA && NULL == /*_.VALDATA___V731*/ meltfptr[730]) /*_.VALDATA___V731*/ meltfptr[730] = (melt_ptr_t) sy_MATCHBIND_DATA; } /*^getnamedsymbol */ /*getnamedsym:MATCHBIND_NBOCC */ { melt_ptr_t sy_MATCHBIND_NBOCC = meltgc_named_symbol ("MATCHBIND_NBOCC", MELT_GET); if (sy_MATCHBIND_NBOCC && NULL == /*_.VALDATA___V733*/ meltfptr[732]) /*_.VALDATA___V733*/ meltfptr[732] = (melt_ptr_t) sy_MATCHBIND_NBOCC; } /*^getnamedsymbol */ /*getnamedsym:NORMALIZE_BINDING */ { melt_ptr_t sy_NORMALIZE_BINDING = meltgc_named_symbol ("NORMALIZE_BINDING", MELT_GET); if (sy_NORMALIZE_BINDING && NULL == /*_.VALDATA___V737*/ meltfptr[736]) /*_.VALDATA___V737*/ meltfptr[736] = (melt_ptr_t) sy_NORMALIZE_BINDING; } /*^getnamedsymbol */ /*getnamedsym:CLASS_MATCH_FLAG */ { melt_ptr_t sy_CLASS_MATCH_FLAG = meltgc_named_symbol ("CLASS_MATCH_FLAG", MELT_GET); if (sy_CLASS_MATCH_FLAG && NULL == /*_.VALDATA___V739*/ meltfptr[738]) /*_.VALDATA___V739*/ meltfptr[738] = (melt_ptr_t) sy_CLASS_MATCH_FLAG; } /*^getnamedsymbol */ /*getnamedsym:MFLAG_SPAT */ { melt_ptr_t sy_MFLAG_SPAT = meltgc_named_symbol ("MFLAG_SPAT", MELT_GET); if (sy_MFLAG_SPAT && NULL == /*_.VALDATA___V753*/ meltfptr[752]) /*_.VALDATA___V753*/ meltfptr[752] = (melt_ptr_t) sy_MFLAG_SPAT; } /*^getnamedsymbol */ /*getnamedsym:MFLAG_RANK */ { melt_ptr_t sy_MFLAG_RANK = meltgc_named_symbol ("MFLAG_RANK", MELT_GET); if (sy_MFLAG_RANK && NULL == /*_.VALDATA___V755*/ meltfptr[754]) /*_.VALDATA___V755*/ meltfptr[754] = (melt_ptr_t) sy_MFLAG_RANK; } /*^getnamedsymbol */ /*getnamedsym:MFLAG_STRING */ { melt_ptr_t sy_MFLAG_STRING = meltgc_named_symbol ("MFLAG_STRING", MELT_GET); if (sy_MFLAG_STRING && NULL == /*_.VALDATA___V757*/ meltfptr[756]) /*_.VALDATA___V757*/ meltfptr[756] = (melt_ptr_t) sy_MFLAG_STRING; } /*^getnamedsymbol */ /*getnamedsym:MFLAG_SETSTEP */ { melt_ptr_t sy_MFLAG_SETSTEP = meltgc_named_symbol ("MFLAG_SETSTEP", MELT_GET); if (sy_MFLAG_SETSTEP && NULL == /*_.VALDATA___V759*/ meltfptr[758]) /*_.VALDATA___V759*/ meltfptr[758] = (melt_ptr_t) sy_MFLAG_SETSTEP; } /*^getnamedsymbol */ /*getnamedsym:CLASS_MATCH_STEP */ { melt_ptr_t sy_CLASS_MATCH_STEP = meltgc_named_symbol ("CLASS_MATCH_STEP", MELT_GET); if (sy_CLASS_MATCH_STEP && NULL == /*_.VALDATA___V761*/ meltfptr[760]) /*_.VALDATA___V761*/ meltfptr[760] = (melt_ptr_t) sy_CLASS_MATCH_STEP; } /*^getnamedsymbol */ /*getnamedsym:CLASS_MATCH_STEP_THEN */ { 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___V767*/ meltfptr[766]) /*_.VALDATA___V767*/ meltfptr[766] = (melt_ptr_t) sy_CLASS_MATCH_STEP_THEN; } /*^getnamedsymbol */ /*getnamedsym:MSTEP_THEN */ { melt_ptr_t sy_MSTEP_THEN = meltgc_named_symbol ("MSTEP_THEN", MELT_GET); if (sy_MSTEP_THEN && NULL == /*_.VALDATA___V775*/ meltfptr[774]) /*_.VALDATA___V775*/ meltfptr[774] = (melt_ptr_t) sy_MSTEP_THEN; } /*^getnamedsymbol */ /*getnamedsym:CLASS_MATCH_STEP_CLEAR */ { 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___V777*/ meltfptr[776]) /*_.VALDATA___V777*/ meltfptr[776] = (melt_ptr_t) sy_CLASS_MATCH_STEP_CLEAR; } /*^getnamedsymbol */ /*getnamedsym:MSTEP_CLEARDATA */ { melt_ptr_t sy_MSTEP_CLEARDATA = meltgc_named_symbol ("MSTEP_CLEARDATA", MELT_GET); if (sy_MSTEP_CLEARDATA && NULL == /*_.VALDATA___V785*/ meltfptr[784]) /*_.VALDATA___V785*/ meltfptr[784] = (melt_ptr_t) sy_MSTEP_CLEARDATA; } /*^getnamedsymbol */ /*getnamedsym:CLASS_MATCH_STEP_WITH_FLAG */ { 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___V787*/ meltfptr[786]) /*_.VALDATA___V787*/ meltfptr[786] = (melt_ptr_t) sy_CLASS_MATCH_STEP_WITH_FLAG; } /*^getnamedsymbol */ /*getnamedsym:MSTEP_FLAG */ { melt_ptr_t sy_MSTEP_FLAG = meltgc_named_symbol ("MSTEP_FLAG", MELT_GET); if (sy_MSTEP_FLAG && NULL == /*_.VALDATA___V795*/ meltfptr[794]) /*_.VALDATA___V795*/ meltfptr[794] = (melt_ptr_t) sy_MSTEP_FLAG; } /*^getnamedsymbol */ /*getnamedsym:CLASS_MATCH_STEP_WITH_DATA */ { 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___V797*/ meltfptr[796]) /*_.VALDATA___V797*/ meltfptr[796] = (melt_ptr_t) sy_CLASS_MATCH_STEP_WITH_DATA; } /*^getnamedsymbol */ /*getnamedsym:MSTEP_DATA */ { melt_ptr_t sy_MSTEP_DATA = meltgc_named_symbol ("MSTEP_DATA", MELT_GET); if (sy_MSTEP_DATA && NULL == /*_.VALDATA___V807*/ meltfptr[806]) /*_.VALDATA___V807*/ meltfptr[806] = (melt_ptr_t) sy_MSTEP_DATA; } /*^getnamedsymbol */ /*getnamedsym:MSTEP_INDEX */ { melt_ptr_t sy_MSTEP_INDEX = meltgc_named_symbol ("MSTEP_INDEX", MELT_GET); if (sy_MSTEP_INDEX && NULL == /*_.VALDATA___V809*/ meltfptr[808]) /*_.VALDATA___V809*/ meltfptr[808] = (melt_ptr_t) sy_MSTEP_INDEX; } /*^getnamedsymbol */ /*getnamedsym:CLASS_MATCH_STEP_FLAG_SET */ { 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___V811*/ meltfptr[810]) /*_.VALDATA___V811*/ meltfptr[810] = (melt_ptr_t) sy_CLASS_MATCH_STEP_FLAG_SET; } /*^getnamedsymbol */ /*getnamedsym:CLASS_MATCH_STEP_FLAG_OPERATION */ { 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___V817*/ meltfptr[816]) /*_.VALDATA___V817*/ meltfptr[816] = (melt_ptr_t) sy_CLASS_MATCH_STEP_FLAG_OPERATION; } /*^getnamedsymbol */ /*getnamedsym:MSTEP_FLAGARGS */ { melt_ptr_t sy_MSTEP_FLAGARGS = meltgc_named_symbol ("MSTEP_FLAGARGS", MELT_GET); if (sy_MSTEP_FLAGARGS && NULL == /*_.VALDATA___V825*/ meltfptr[824]) /*_.VALDATA___V825*/ meltfptr[824] = (melt_ptr_t) sy_MSTEP_FLAGARGS; } /*^getnamedsymbol */ /*getnamedsym:CLASS_MATCH_STEP_FLAG_CONJUNCTION */ { 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___V827*/ meltfptr[826]) /*_.VALDATA___V827*/ meltfptr[826] = (melt_ptr_t) sy_CLASS_MATCH_STEP_FLAG_CONJUNCTION; } /*^getnamedsymbol */ /*getnamedsym:CLASS_MATCH_STEP_FLAG_DISJUNCTION */ { 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___V833*/ meltfptr[832]) /*_.VALDATA___V833*/ meltfptr[832] = (melt_ptr_t) sy_CLASS_MATCH_STEP_FLAG_DISJUNCTION; } /*^getnamedsymbol */ /*getnamedsym:CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG */ { 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___V839*/ meltfptr[838]) /*_.VALDATA___V839*/ meltfptr[838] = (melt_ptr_t) sy_CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG; } /*^getnamedsymbol */ /*getnamedsym:MSTEPSUCCESS_VAROCC */ { melt_ptr_t sy_MSTEPSUCCESS_VAROCC = meltgc_named_symbol ("MSTEPSUCCESS_VAROCC", MELT_GET); if (sy_MSTEPSUCCESS_VAROCC && NULL == /*_.VALDATA___V851*/ meltfptr[850]) /*_.VALDATA___V851*/ meltfptr[850] = (melt_ptr_t) sy_MSTEPSUCCESS_VAROCC; } /*^getnamedsymbol */ /*getnamedsym:MSTEPSUCCESS_BINDS */ { melt_ptr_t sy_MSTEPSUCCESS_BINDS = meltgc_named_symbol ("MSTEPSUCCESS_BINDS", MELT_GET); if (sy_MSTEPSUCCESS_BINDS && NULL == /*_.VALDATA___V853*/ meltfptr[852]) /*_.VALDATA___V853*/ meltfptr[852] = (melt_ptr_t) sy_MSTEPSUCCESS_BINDS; } /*^getnamedsymbol */ /*getnamedsym:MSTEPSUCCESS_BODY */ { melt_ptr_t sy_MSTEPSUCCESS_BODY = meltgc_named_symbol ("MSTEPSUCCESS_BODY", MELT_GET); if (sy_MSTEPSUCCESS_BODY && NULL == /*_.VALDATA___V855*/ meltfptr[854]) /*_.VALDATA___V855*/ meltfptr[854] = (melt_ptr_t) sy_MSTEPSUCCESS_BODY; } /*^getnamedsymbol */ /*getnamedsym:CLASS_MATCH_STEP_TEST */ { 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___V857*/ meltfptr[856]) /*_.VALDATA___V857*/ meltfptr[856] = (melt_ptr_t) sy_CLASS_MATCH_STEP_TEST; } /*^getnamedsymbol */ /*getnamedsym:MSTEP_ELSE */ { melt_ptr_t sy_MSTEP_ELSE = meltgc_named_symbol ("MSTEP_ELSE", MELT_GET); if (sy_MSTEP_ELSE && NULL == /*_.VALDATA___V865*/ meltfptr[864]) /*_.VALDATA___V865*/ meltfptr[864] = (melt_ptr_t) sy_MSTEP_ELSE; } /*^getnamedsymbol */ /*getnamedsym:CLASS_MATCH_STEP_TEST_VARIABLE */ { 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___V867*/ meltfptr[866]) /*_.VALDATA___V867*/ meltfptr[866] = (melt_ptr_t) sy_CLASS_MATCH_STEP_TEST_VARIABLE; } /*^getnamedsymbol */ /*getnamedsym:MSTEPTESTVAR_DATA */ { melt_ptr_t sy_MSTEPTESTVAR_DATA = meltgc_named_symbol ("MSTEPTESTVAR_DATA", MELT_GET); if (sy_MSTEPTESTVAR_DATA && NULL == /*_.VALDATA___V875*/ meltfptr[874]) /*_.VALDATA___V875*/ meltfptr[874] = (melt_ptr_t) sy_MSTEPTESTVAR_DATA; } /*^getnamedsymbol */ /*getnamedsym:CLASS_MATCH_STEP_TEST_CONSTANT */ { 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___V877*/ meltfptr[876]) /*_.VALDATA___V877*/ meltfptr[876] = (melt_ptr_t) sy_CLASS_MATCH_STEP_TEST_CONSTANT; } /*^getnamedsymbol */ /*getnamedsym:MSTEPTESTCONST_DATA */ { melt_ptr_t sy_MSTEPTESTCONST_DATA = meltgc_named_symbol ("MSTEPTESTCONST_DATA", MELT_GET); if (sy_MSTEPTESTCONST_DATA && NULL == /*_.VALDATA___V887*/ meltfptr[886]) /*_.VALDATA___V887*/ meltfptr[886] = (melt_ptr_t) sy_MSTEPTESTCONST_DATA; } /*^getnamedsymbol */ /*getnamedsym:MSTEPTESTCONST_BIND */ { melt_ptr_t sy_MSTEPTESTCONST_BIND = meltgc_named_symbol ("MSTEPTESTCONST_BIND", MELT_GET); if (sy_MSTEPTESTCONST_BIND && NULL == /*_.VALDATA___V889*/ meltfptr[888]) /*_.VALDATA___V889*/ meltfptr[888] = (melt_ptr_t) sy_MSTEPTESTCONST_BIND; } /*^getnamedsymbol */ /*getnamedsym:CLASS_MATCH_STEP_TEST_GROUP */ { 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___V891*/ meltfptr[890]) /*_.VALDATA___V891*/ meltfptr[890] = (melt_ptr_t) sy_CLASS_MATCH_STEP_TEST_GROUP; } /*^getnamedsymbol */ /*getnamedsym:MSTGROUP_START */ { melt_ptr_t sy_MSTGROUP_START = meltgc_named_symbol ("MSTGROUP_START", MELT_GET); if (sy_MSTGROUP_START && NULL == /*_.VALDATA___V903*/ meltfptr[902]) /*_.VALDATA___V903*/ meltfptr[902] = (melt_ptr_t) sy_MSTGROUP_START; } /*^getnamedsymbol */ /*getnamedsym:MSTGROUP_THEN */ { melt_ptr_t sy_MSTGROUP_THEN = meltgc_named_symbol ("MSTGROUP_THEN", MELT_GET); if (sy_MSTGROUP_THEN && NULL == /*_.VALDATA___V905*/ meltfptr[904]) /*_.VALDATA___V905*/ meltfptr[904] = (melt_ptr_t) sy_MSTGROUP_THEN; } /*^getnamedsymbol */ /*getnamedsym:MSTGROUP_ELSE */ { melt_ptr_t sy_MSTGROUP_ELSE = meltgc_named_symbol ("MSTGROUP_ELSE", MELT_GET); if (sy_MSTGROUP_ELSE && NULL == /*_.VALDATA___V907*/ meltfptr[906]) /*_.VALDATA___V907*/ meltfptr[906] = (melt_ptr_t) sy_MSTGROUP_ELSE; } /*^getnamedsymbol */ /*getnamedsym:CLASS_MATCH_STEP_TEST_INSTANCE */ { 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___V909*/ meltfptr[908]) /*_.VALDATA___V909*/ meltfptr[908] = (melt_ptr_t) sy_CLASS_MATCH_STEP_TEST_INSTANCE; } /*^getnamedsymbol */ /*getnamedsym:MSTINS_CLASS */ { melt_ptr_t sy_MSTINS_CLASS = meltgc_named_symbol ("MSTINS_CLASS", MELT_GET); if (sy_MSTINS_CLASS && NULL == /*_.VALDATA___V919*/ meltfptr[918]) /*_.VALDATA___V919*/ meltfptr[918] = (melt_ptr_t) sy_MSTINS_CLASS; } /*^getnamedsymbol */ /*getnamedsym:MSTINS_SLOTS */ { melt_ptr_t sy_MSTINS_SLOTS = meltgc_named_symbol ("MSTINS_SLOTS", MELT_GET); if (sy_MSTINS_SLOTS && NULL == /*_.VALDATA___V921*/ meltfptr[920]) /*_.VALDATA___V921*/ meltfptr[920] = (melt_ptr_t) sy_MSTINS_SLOTS; } /*^getnamedsymbol */ /*getnamedsym:CLASS_MATCH_STEP_TEST_MULTIPLE */ { 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___V923*/ meltfptr[922]) /*_.VALDATA___V923*/ meltfptr[922] = (melt_ptr_t) sy_CLASS_MATCH_STEP_TEST_MULTIPLE; } /*^getnamedsymbol */ /*getnamedsym:MSTTUP_COMPONENTS */ { melt_ptr_t sy_MSTTUP_COMPONENTS = meltgc_named_symbol ("MSTTUP_COMPONENTS", MELT_GET); if (sy_MSTTUP_COMPONENTS && NULL == /*_.VALDATA___V931*/ meltfptr[930]) /*_.VALDATA___V931*/ meltfptr[930] = (melt_ptr_t) sy_MSTTUP_COMPONENTS; } /*^getnamedsymbol */ /*getnamedsym:CLASS_MATCH_STEP_TEST_MATCHER */ { 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___V933*/ meltfptr[932]) /*_.VALDATA___V933*/ meltfptr[932] = (melt_ptr_t) sy_CLASS_MATCH_STEP_TEST_MATCHER; } /*^getnamedsymbol */ /*getnamedsym:MSTMA_MATCHER */ { melt_ptr_t sy_MSTMA_MATCHER = meltgc_named_symbol ("MSTMA_MATCHER", MELT_GET); if (sy_MSTMA_MATCHER && NULL == /*_.VALDATA___V947*/ meltfptr[946]) /*_.VALDATA___V947*/ meltfptr[946] = (melt_ptr_t) sy_MSTMA_MATCHER; } /*^getnamedsymbol */ /*getnamedsym:MSTMA_BINDS */ { melt_ptr_t sy_MSTMA_BINDS = meltgc_named_symbol ("MSTMA_BINDS", MELT_GET); if (sy_MSTMA_BINDS && NULL == /*_.VALDATA___V949*/ meltfptr[948]) /*_.VALDATA___V949*/ meltfptr[948] = (melt_ptr_t) sy_MSTMA_BINDS; } /*^getnamedsymbol */ /*getnamedsym:MSTMA_INS */ { melt_ptr_t sy_MSTMA_INS = meltgc_named_symbol ("MSTMA_INS", MELT_GET); if (sy_MSTMA_INS && NULL == /*_.VALDATA___V951*/ meltfptr[950]) /*_.VALDATA___V951*/ meltfptr[950] = (melt_ptr_t) sy_MSTMA_INS; } /*^getnamedsymbol */ /*getnamedsym:MSTMA_OUTS */ { melt_ptr_t sy_MSTMA_OUTS = meltgc_named_symbol ("MSTMA_OUTS", MELT_GET); if (sy_MSTMA_OUTS && NULL == /*_.VALDATA___V953*/ meltfptr[952]) /*_.VALDATA___V953*/ meltfptr[952] = (melt_ptr_t) sy_MSTMA_OUTS; } /*^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___V955*/ meltfptr[954]) /*_.VALDATA___V955*/ meltfptr[954] = (melt_ptr_t) sy_CLASS_NREP_MATCH_FLAG; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_SIMPLE */ { melt_ptr_t sy_CLASS_NREP_SIMPLE = meltgc_named_symbol ("CLASS_NREP_SIMPLE", MELT_GET); if (sy_CLASS_NREP_SIMPLE && NULL == /*_.VALDATA___V957*/ meltfptr[956]) /*_.VALDATA___V957*/ meltfptr[956] = (melt_ptr_t) sy_CLASS_NREP_SIMPLE; } /*^getnamedsymbol */ /*getnamedsym:NRPFLA_FLAG */ { melt_ptr_t sy_NRPFLA_FLAG = meltgc_named_symbol ("NRPFLA_FLAG", MELT_GET); if (sy_NRPFLA_FLAG && NULL == /*_.VALDATA___V967*/ meltfptr[966]) /*_.VALDATA___V967*/ meltfptr[966] = (melt_ptr_t) sy_NRPFLA_FLAG; } /*^getnamedsymbol */ /*getnamedsym:NRPFLA_NMATCH */ { melt_ptr_t sy_NRPFLA_NMATCH = meltgc_named_symbol ("NRPFLA_NMATCH", MELT_GET); if (sy_NRPFLA_NMATCH && NULL == /*_.VALDATA___V969*/ meltfptr[968]) /*_.VALDATA___V969*/ meltfptr[968] = (melt_ptr_t) sy_NRPFLA_NMATCH; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_MATCHED_DATA */ { 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___V971*/ meltfptr[970]) /*_.VALDATA___V971*/ meltfptr[970] = (melt_ptr_t) sy_CLASS_NREP_MATCHED_DATA; } /*^getnamedsymbol */ /*getnamedsym:NRMATD_CTYPE */ { melt_ptr_t sy_NRMATD_CTYPE = meltgc_named_symbol ("NRMATD_CTYPE", MELT_GET); if (sy_NRMATD_CTYPE && NULL == /*_.VALDATA___V983*/ meltfptr[982]) /*_.VALDATA___V983*/ meltfptr[982] = (melt_ptr_t) sy_NRMATD_CTYPE; } /*^getnamedsymbol */ /*getnamedsym:NRMATD_MDATA */ { melt_ptr_t sy_NRMATD_MDATA = meltgc_named_symbol ("NRMATD_MDATA", MELT_GET); if (sy_NRMATD_MDATA && NULL == /*_.VALDATA___V985*/ meltfptr[984]) /*_.VALDATA___V985*/ meltfptr[984] = (melt_ptr_t) sy_NRMATD_MDATA; } /*^getnamedsymbol */ /*getnamedsym:NRMATD_RANK */ { melt_ptr_t sy_NRMATD_RANK = meltgc_named_symbol ("NRMATD_RANK", MELT_GET); if (sy_NRMATD_RANK && NULL == /*_.VALDATA___V987*/ meltfptr[986]) /*_.VALDATA___V987*/ meltfptr[986] = (melt_ptr_t) sy_NRMATD_RANK; } /*^getnamedsymbol */ /*getnamedsym:SCAN_SUBPATTERNS */ { melt_ptr_t sy_SCAN_SUBPATTERNS = meltgc_named_symbol ("SCAN_SUBPATTERNS", MELT_GET); if (sy_SCAN_SUBPATTERNS && NULL == /*_.VALDATA___V991*/ meltfptr[990]) /*_.VALDATA___V991*/ meltfptr[990] = (melt_ptr_t) sy_SCAN_SUBPATTERNS; } /*^getnamedsymbol */ /*getnamedsym:RECV */ { melt_ptr_t sy_RECV = meltgc_named_symbol ("RECV", MELT_GET); if (sy_RECV && NULL == /*_.VALDATA___V993*/ meltfptr[992]) /*_.VALDATA___V993*/ meltfptr[992] = (melt_ptr_t) sy_RECV; } /*^getnamedsymbol */ /*getnamedsym:FUN */ { melt_ptr_t sy_FUN = meltgc_named_symbol ("FUN", MELT_GET); if (sy_FUN && NULL == /*_.VALDATA___V996*/ meltfptr[995]) /*_.VALDATA___V996*/ meltfptr[995] = (melt_ptr_t) sy_FUN; } /*^getnamedsymbol */ /*getnamedsym:CTX */ { melt_ptr_t sy_CTX = meltgc_named_symbol ("CTX", MELT_GET); if (sy_CTX && NULL == /*_.VALDATA___V999*/ meltfptr[998]) /*_.VALDATA___V999*/ meltfptr[998] = (melt_ptr_t) sy_CTX; } /*^getnamedsymbol */ /*getnamedsym:SCAN_STEP_DATA */ { melt_ptr_t sy_SCAN_STEP_DATA = meltgc_named_symbol ("SCAN_STEP_DATA", MELT_GET); if (sy_SCAN_STEP_DATA && NULL == /*_.VALDATA___V1005*/ meltfptr[1004]) /*_.VALDATA___V1005*/ meltfptr[1004] = (melt_ptr_t) sy_SCAN_STEP_DATA; } /*^getnamedsymbol */ /*getnamedsym:STEP */ { melt_ptr_t sy_STEP = meltgc_named_symbol ("STEP", MELT_GET); if (sy_STEP && NULL == /*_.VALDATA___V1007*/ meltfptr[1006]) /*_.VALDATA___V1007*/ meltfptr[1006] = (melt_ptr_t) sy_STEP; } /*^getnamedsymbol */ /*getnamedsym:SCAN_STEP_FLAG */ { melt_ptr_t sy_SCAN_STEP_FLAG = meltgc_named_symbol ("SCAN_STEP_FLAG", MELT_GET); if (sy_SCAN_STEP_FLAG && NULL == /*_.VALDATA___V1015*/ meltfptr[1014]) /*_.VALDATA___V1015*/ meltfptr[1014] = (melt_ptr_t) sy_SCAN_STEP_FLAG; } /*^getnamedsymbol */ /*getnamedsym:PUT_THEN_MATCH */ { melt_ptr_t sy_PUT_THEN_MATCH = meltgc_named_symbol ("PUT_THEN_MATCH", MELT_GET); if (sy_PUT_THEN_MATCH && NULL == /*_.VALDATA___V1042*/ meltfptr[1041]) /*_.VALDATA___V1042*/ meltfptr[1041] = (melt_ptr_t) sy_PUT_THEN_MATCH; } /*^getnamedsymbol */ /*getnamedsym:THENSTEP */ { melt_ptr_t sy_THENSTEP = meltgc_named_symbol ("THENSTEP", MELT_GET); if (sy_THENSTEP && NULL == /*_.VALDATA___V1045*/ meltfptr[1044]) /*_.VALDATA___V1045*/ meltfptr[1044] = (melt_ptr_t) sy_THENSTEP; } /*^getnamedsymbol */ /*getnamedsym:PUT_ELSE_MATCH */ { melt_ptr_t sy_PUT_ELSE_MATCH = meltgc_named_symbol ("PUT_ELSE_MATCH", MELT_GET); if (sy_PUT_ELSE_MATCH && NULL == /*_.VALDATA___V1059*/ meltfptr[1058]) /*_.VALDATA___V1059*/ meltfptr[1058] = (melt_ptr_t) sy_PUT_ELSE_MATCH; } /*^getnamedsymbol */ /*getnamedsym:ELSESTEP */ { melt_ptr_t sy_ELSESTEP = meltgc_named_symbol ("ELSESTEP", MELT_GET); if (sy_ELSESTEP && NULL == /*_.VALDATA___V1062*/ meltfptr[1061]) /*_.VALDATA___V1062*/ meltfptr[1061] = (melt_ptr_t) sy_ELSESTEP; } /*^getnamedsymbol */ /*getnamedsym:TRANSLATE_PATTERN */ { melt_ptr_t sy_TRANSLATE_PATTERN = meltgc_named_symbol ("TRANSLATE_PATTERN", MELT_GET); if (sy_TRANSLATE_PATTERN && NULL == /*_.VALDATA___V1090*/ meltfptr[1089]) /*_.VALDATA___V1090*/ meltfptr[1089] = (melt_ptr_t) sy_TRANSLATE_PATTERN; } /*^getnamedsymbol */ /*getnamedsym:MDATA */ { melt_ptr_t sy_MDATA = meltgc_named_symbol ("MDATA", MELT_GET); if (sy_MDATA && NULL == /*_.VALDATA___V1093*/ meltfptr[1092]) /*_.VALDATA___V1093*/ meltfptr[1092] = (melt_ptr_t) sy_MDATA; } /*^getnamedsymbol */ /*getnamedsym:MCASE */ { melt_ptr_t sy_MCASE = meltgc_named_symbol ("MCASE", MELT_GET); if (sy_MCASE && NULL == /*_.VALDATA___V1096*/ meltfptr[1095]) /*_.VALDATA___V1096*/ meltfptr[1095] = (melt_ptr_t) sy_MCASE; } /*^getnamedsymbol */ /*getnamedsym:VARMAP */ { melt_ptr_t sy_VARMAP = meltgc_named_symbol ("VARMAP", MELT_GET); if (sy_VARMAP && NULL == /*_.VALDATA___V1099*/ meltfptr[1098]) /*_.VALDATA___V1099*/ meltfptr[1098] = (melt_ptr_t) sy_VARMAP; } /*^getnamedsymbol */ /*getnamedsym:SLOC */ { melt_ptr_t sy_SLOC = meltgc_named_symbol ("SLOC", MELT_GET); if (sy_SLOC && NULL == /*_.VALDATA___V1102*/ meltfptr[1101]) /*_.VALDATA___V1102*/ meltfptr[1101] = (melt_ptr_t) sy_SLOC; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_PATTERN_LIST */ { 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___V1117*/ meltfptr[1116]) /*_.VALDATA___V1117*/ meltfptr[1116] = (melt_ptr_t) sy_CLASS_SOURCE_PATTERN_LIST; } /*^getnamedsymbol */ /*getnamedsym:PATUPLECOMP */ { melt_ptr_t sy_PATUPLECOMP = meltgc_named_symbol ("PATUPLECOMP", MELT_GET); if (sy_PATUPLECOMP && NULL == /*_.VALDATA___V1124*/ meltfptr[1123]) /*_.VALDATA___V1124*/ meltfptr[1123] = (melt_ptr_t) sy_PATUPLECOMP; } /*^getnamedsymbol */ /*getnamedsym:MATCHGRAPHIC_ALTSTEP */ { melt_ptr_t sy_MATCHGRAPHIC_ALTSTEP = meltgc_named_symbol ("MATCHGRAPHIC_ALTSTEP", MELT_GET); if (sy_MATCHGRAPHIC_ALTSTEP && NULL == /*_.VALDATA___V1142*/ meltfptr[1141]) /*_.VALDATA___V1142*/ meltfptr[1141] = (melt_ptr_t) sy_MATCHGRAPHIC_ALTSTEP; } /*^getnamedsymbol */ /*getnamedsym:ADD2OUT */ { melt_ptr_t sy_ADD2OUT = meltgc_named_symbol ("ADD2OUT", MELT_GET); if (sy_ADD2OUT && NULL == /*_.VALDATA___V1152*/ meltfptr[1151]) /*_.VALDATA___V1152*/ meltfptr[1151] = (melt_ptr_t) sy_ADD2OUT; } /*^getnamedsymbol */ /*getnamedsym:DISCR_INTEGER */ { melt_ptr_t sy_DISCR_INTEGER = meltgc_named_symbol ("DISCR_INTEGER", MELT_GET); if (sy_DISCR_INTEGER && NULL == /*_.VALDATA___V1171*/ meltfptr[1170]) /*_.VALDATA___V1171*/ meltfptr[1170] = (melt_ptr_t) sy_DISCR_INTEGER; } /*^getnamedsymbol */ /*getnamedsym:COMPARE_NAMED_ALPHA */ { melt_ptr_t sy_COMPARE_NAMED_ALPHA = meltgc_named_symbol ("COMPARE_NAMED_ALPHA", MELT_GET); if (sy_COMPARE_NAMED_ALPHA && NULL == /*_.VALDATA___V1173*/ meltfptr[1172]) /*_.VALDATA___V1173*/ meltfptr[1172] = (melt_ptr_t) sy_COMPARE_NAMED_ALPHA; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_MATCHALT */ { melt_ptr_t sy_CLASS_NREP_MATCHALT = meltgc_named_symbol ("CLASS_NREP_MATCHALT", MELT_GET); if (sy_CLASS_NREP_MATCHALT && NULL == /*_.VALDATA___V1175*/ meltfptr[1174]) /*_.VALDATA___V1175*/ meltfptr[1174] = (melt_ptr_t) sy_CLASS_NREP_MATCHALT; } /*^getnamedsymbol */ /*getnamedsym:NAMATCH_MATCHED */ { melt_ptr_t sy_NAMATCH_MATCHED = meltgc_named_symbol ("NAMATCH_MATCHED", MELT_GET); if (sy_NAMATCH_MATCHED && NULL == /*_.VALDATA___V1193*/ meltfptr[1192]) /*_.VALDATA___V1193*/ meltfptr[1192] = (melt_ptr_t) sy_NAMATCH_MATCHED; } /*^getnamedsymbol */ /*getnamedsym:NAMATCH_RESULT */ { melt_ptr_t sy_NAMATCH_RESULT = meltgc_named_symbol ("NAMATCH_RESULT", MELT_GET); if (sy_NAMATCH_RESULT && NULL == /*_.VALDATA___V1195*/ meltfptr[1194]) /*_.VALDATA___V1195*/ meltfptr[1194] = (melt_ptr_t) sy_NAMATCH_RESULT; } /*^getnamedsymbol */ /*getnamedsym:NAMATCH_BODY */ { melt_ptr_t sy_NAMATCH_BODY = meltgc_named_symbol ("NAMATCH_BODY", MELT_GET); if (sy_NAMATCH_BODY && NULL == /*_.VALDATA___V1197*/ meltfptr[1196]) /*_.VALDATA___V1197*/ meltfptr[1196] = (melt_ptr_t) sy_NAMATCH_BODY; } /*^getnamedsymbol */ /*getnamedsym:NAMATCH_FLAGS */ { melt_ptr_t sy_NAMATCH_FLAGS = meltgc_named_symbol ("NAMATCH_FLAGS", MELT_GET); if (sy_NAMATCH_FLAGS && NULL == /*_.VALDATA___V1199*/ meltfptr[1198]) /*_.VALDATA___V1199*/ meltfptr[1198] = (melt_ptr_t) sy_NAMATCH_FLAGS; } /*^getnamedsymbol */ /*getnamedsym:NAMATCH_MDATAS */ { melt_ptr_t sy_NAMATCH_MDATAS = meltgc_named_symbol ("NAMATCH_MDATAS", MELT_GET); if (sy_NAMATCH_MDATAS && NULL == /*_.VALDATA___V1201*/ meltfptr[1200]) /*_.VALDATA___V1201*/ meltfptr[1200] = (melt_ptr_t) sy_NAMATCH_MDATAS; } /*^getnamedsymbol */ /*getnamedsym:NAMATCH_STARTLABEL */ { melt_ptr_t sy_NAMATCH_STARTLABEL = meltgc_named_symbol ("NAMATCH_STARTLABEL", MELT_GET); if (sy_NAMATCH_STARTLABEL && NULL == /*_.VALDATA___V1203*/ meltfptr[1202]) /*_.VALDATA___V1203*/ meltfptr[1202] = (melt_ptr_t) sy_NAMATCH_STARTLABEL; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_MATCH_LABEL */ { 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___V1205*/ meltfptr[1204]) /*_.VALDATA___V1205*/ meltfptr[1204] = (melt_ptr_t) sy_CLASS_NREP_MATCH_LABEL; } /*^getnamedsymbol */ /*getnamedsym:NMLAB_STEP */ { melt_ptr_t sy_NMLAB_STEP = meltgc_named_symbol ("NMLAB_STEP", MELT_GET); if (sy_NMLAB_STEP && NULL == /*_.VALDATA___V1213*/ meltfptr[1212]) /*_.VALDATA___V1213*/ meltfptr[1212] = (melt_ptr_t) sy_NMLAB_STEP; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_MATCH_LABEL_END */ { 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___V1215*/ meltfptr[1214]) /*_.VALDATA___V1215*/ meltfptr[1214] = (melt_ptr_t) sy_CLASS_NREP_MATCH_LABEL_END; } /*^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___V1221*/ meltfptr[1220]) /*_.VALDATA___V1221*/ meltfptr[1220] = (melt_ptr_t) sy_CLASS_NREP_MATCH_JUMP; } /*^getnamedsymbol */ /*getnamedsym:NMJMP_LABEL */ { melt_ptr_t sy_NMJMP_LABEL = meltgc_named_symbol ("NMJMP_LABEL", MELT_GET); if (sy_NMJMP_LABEL && NULL == /*_.VALDATA___V1229*/ meltfptr[1228]) /*_.VALDATA___V1229*/ meltfptr[1228] = (melt_ptr_t) sy_NMJMP_LABEL; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_MATCH_DATA_ACTION */ { 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___V1231*/ meltfptr[1230]) /*_.VALDATA___V1231*/ meltfptr[1230] = (melt_ptr_t) sy_CLASS_NREP_MATCH_DATA_ACTION; } /*^getnamedsymbol */ /*getnamedsym:NMDAC_DATA */ { melt_ptr_t sy_NMDAC_DATA = meltgc_named_symbol ("NMDAC_DATA", MELT_GET); if (sy_NMDAC_DATA && NULL == /*_.VALDATA___V1239*/ meltfptr[1238]) /*_.VALDATA___V1239*/ meltfptr[1238] = (melt_ptr_t) sy_NMDAC_DATA; } /*^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___V1241*/ meltfptr[1240]) /*_.VALDATA___V1241*/ meltfptr[1240] = (melt_ptr_t) sy_CLASS_NREP_MATCH_DATA_INITIALIZER; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_MATCH_DATA_CLEAR */ { 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___V1247*/ meltfptr[1246]) /*_.VALDATA___V1247*/ meltfptr[1246] = (melt_ptr_t) sy_CLASS_NREP_MATCH_DATA_CLEAR; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_MATCH_DATA_FINALIZER */ { 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___V1253*/ meltfptr[1252]) /*_.VALDATA___V1253*/ meltfptr[1252] = (melt_ptr_t) sy_CLASS_NREP_MATCH_DATA_FINALIZER; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_JUMP_WHEN_IS_A */ { 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___V1259*/ meltfptr[1258]) /*_.VALDATA___V1259*/ meltfptr[1258] = (melt_ptr_t) sy_CLASS_NREP_JUMP_WHEN_IS_A; } /*^getnamedsymbol */ /*getnamedsym:NTESTISA_VALUE */ { melt_ptr_t sy_NTESTISA_VALUE = meltgc_named_symbol ("NTESTISA_VALUE", MELT_GET); if (sy_NTESTISA_VALUE && NULL == /*_.VALDATA___V1271*/ meltfptr[1270]) /*_.VALDATA___V1271*/ meltfptr[1270] = (melt_ptr_t) sy_NTESTISA_VALUE; } /*^getnamedsymbol */ /*getnamedsym:NTESTISA_CLASS */ { melt_ptr_t sy_NTESTISA_CLASS = meltgc_named_symbol ("NTESTISA_CLASS", MELT_GET); if (sy_NTESTISA_CLASS && NULL == /*_.VALDATA___V1273*/ meltfptr[1272]) /*_.VALDATA___V1273*/ meltfptr[1272] = (melt_ptr_t) sy_NTESTISA_CLASS; } /*^getnamedsymbol */ /*getnamedsym:NTESTISA_JUMP */ { melt_ptr_t sy_NTESTISA_JUMP = meltgc_named_symbol ("NTESTISA_JUMP", MELT_GET); if (sy_NTESTISA_JUMP && NULL == /*_.VALDATA___V1275*/ meltfptr[1274]) /*_.VALDATA___V1275*/ meltfptr[1274] = (melt_ptr_t) sy_NTESTISA_JUMP; } /*^getnamedsymbol */ /*getnamedsym:CLASS_MATCH_NORMALIZATION_CONTEXT */ { 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___V1277*/ meltfptr[1276]) /*_.VALDATA___V1277*/ meltfptr[1276] = (melt_ptr_t) sy_CLASS_MATCH_NORMALIZATION_CONTEXT; } /*^getnamedsymbol */ /*getnamedsym:MATNORX_RESLOC */ { melt_ptr_t sy_MATNORX_RESLOC = meltgc_named_symbol ("MATNORX_RESLOC", MELT_GET); if (sy_MATNORX_RESLOC && NULL == /*_.VALDATA___V1305*/ meltfptr[1304]) /*_.VALDATA___V1305*/ meltfptr[1304] = (melt_ptr_t) sy_MATNORX_RESLOC; } /*^getnamedsymbol */ /*getnamedsym:MATNORX_NMATCH */ { melt_ptr_t sy_MATNORX_NMATCH = meltgc_named_symbol ("MATNORX_NMATCH", MELT_GET); if (sy_MATNORX_NMATCH && NULL == /*_.VALDATA___V1307*/ meltfptr[1306]) /*_.VALDATA___V1307*/ meltfptr[1306] = (melt_ptr_t) sy_MATNORX_NMATCH; } /*^getnamedsymbol */ /*getnamedsym:MATNORX_DATAMAP */ { melt_ptr_t sy_MATNORX_DATAMAP = meltgc_named_symbol ("MATNORX_DATAMAP", MELT_GET); if (sy_MATNORX_DATAMAP && NULL == /*_.VALDATA___V1309*/ meltfptr[1308]) /*_.VALDATA___V1309*/ meltfptr[1308] = (melt_ptr_t) sy_MATNORX_DATAMAP; } /*^getnamedsymbol */ /*getnamedsym:MATNORX_FLAGMAP */ { melt_ptr_t sy_MATNORX_FLAGMAP = meltgc_named_symbol ("MATNORX_FLAGMAP", MELT_GET); if (sy_MATNORX_FLAGMAP && NULL == /*_.VALDATA___V1311*/ meltfptr[1310]) /*_.VALDATA___V1311*/ meltfptr[1310] = (melt_ptr_t) sy_MATNORX_FLAGMAP; } /*^getnamedsymbol */ /*getnamedsym:MATNORX_STEPMAP */ { melt_ptr_t sy_MATNORX_STEPMAP = meltgc_named_symbol ("MATNORX_STEPMAP", MELT_GET); if (sy_MATNORX_STEPMAP && NULL == /*_.VALDATA___V1313*/ meltfptr[1312]) /*_.VALDATA___V1313*/ meltfptr[1312] = (melt_ptr_t) sy_MATNORX_STEPMAP; } /*^getnamedsymbol */ /*getnamedsym:MATNORX_MDATAQUEUE */ { melt_ptr_t sy_MATNORX_MDATAQUEUE = meltgc_named_symbol ("MATNORX_MDATAQUEUE", MELT_GET); if (sy_MATNORX_MDATAQUEUE && NULL == /*_.VALDATA___V1315*/ meltfptr[1314]) /*_.VALDATA___V1315*/ meltfptr[1314] = (melt_ptr_t) sy_MATNORX_MDATAQUEUE; } /*^getnamedsymbol */ /*getnamedsym:MATNORX_MSTEPQUEUE */ { melt_ptr_t sy_MATNORX_MSTEPQUEUE = meltgc_named_symbol ("MATNORX_MSTEPQUEUE", MELT_GET); if (sy_MATNORX_MSTEPQUEUE && NULL == /*_.VALDATA___V1317*/ meltfptr[1316]) /*_.VALDATA___V1317*/ meltfptr[1316] = (melt_ptr_t) sy_MATNORX_MSTEPQUEUE; } /*^getnamedsymbol */ /*getnamedsym:MATNORX_BODYLIST */ { melt_ptr_t sy_MATNORX_BODYLIST = meltgc_named_symbol ("MATNORX_BODYLIST", MELT_GET); if (sy_MATNORX_BODYLIST && NULL == /*_.VALDATA___V1319*/ meltfptr[1318]) /*_.VALDATA___V1319*/ meltfptr[1318] = (melt_ptr_t) sy_MATNORX_BODYLIST; } /*^getnamedsymbol */ /*getnamedsym:MATNORX_ENDLABEL */ { melt_ptr_t sy_MATNORX_ENDLABEL = meltgc_named_symbol ("MATNORX_ENDLABEL", MELT_GET); if (sy_MATNORX_ENDLABEL && NULL == /*_.VALDATA___V1321*/ meltfptr[1320]) /*_.VALDATA___V1321*/ meltfptr[1320] = (melt_ptr_t) sy_MATNORX_ENDLABEL; } /*^getnamedsymbol */ /*getnamedsym:MATNORX_STARTLABEL */ { melt_ptr_t sy_MATNORX_STARTLABEL = meltgc_named_symbol ("MATNORX_STARTLABEL", MELT_GET); if (sy_MATNORX_STARTLABEL && NULL == /*_.VALDATA___V1323*/ meltfptr[1322]) /*_.VALDATA___V1323*/ meltfptr[1322] = (melt_ptr_t) sy_MATNORX_STARTLABEL; } /*^getnamedsymbol */ /*getnamedsym:MATNORX_MATCHCTXT */ { melt_ptr_t sy_MATNORX_MATCHCTXT = meltgc_named_symbol ("MATNORX_MATCHCTXT", MELT_GET); if (sy_MATNORX_MATCHCTXT && NULL == /*_.VALDATA___V1325*/ meltfptr[1324]) /*_.VALDATA___V1325*/ meltfptr[1324] = (melt_ptr_t) sy_MATNORX_MATCHCTXT; } /*^getnamedsymbol */ /*getnamedsym:NORMALIZE_STEP */ { melt_ptr_t sy_NORMALIZE_STEP = meltgc_named_symbol ("NORMALIZE_STEP", MELT_GET); if (sy_NORMALIZE_STEP && NULL == /*_.VALDATA___V1329*/ meltfptr[1328]) /*_.VALDATA___V1329*/ meltfptr[1328] = (melt_ptr_t) sy_NORMALIZE_STEP; } /*^getnamedsymbol */ /*getnamedsym:NMCTXT */ { melt_ptr_t sy_NMCTXT = meltgc_named_symbol ("NMCTXT", MELT_GET); if (sy_NMCTXT && NULL == /*_.VALDATA___V1332*/ meltfptr[1331]) /*_.VALDATA___V1332*/ meltfptr[1331] = (melt_ptr_t) sy_NMCTXT; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_SETQ */ { melt_ptr_t sy_CLASS_NREP_SETQ = meltgc_named_symbol ("CLASS_NREP_SETQ", MELT_GET); if (sy_CLASS_NREP_SETQ && NULL == /*_.VALDATA___V1352*/ meltfptr[1351]) /*_.VALDATA___V1352*/ meltfptr[1351] = (melt_ptr_t) sy_CLASS_NREP_SETQ; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_CHUNK */ { melt_ptr_t sy_CLASS_NREP_CHUNK = meltgc_named_symbol ("CLASS_NREP_CHUNK", MELT_GET); if (sy_CLASS_NREP_CHUNK && NULL == /*_.VALDATA___V1359*/ meltfptr[1358]) /*_.VALDATA___V1359*/ meltfptr[1358] = (melt_ptr_t) sy_CLASS_NREP_CHUNK; } /*^getnamedsymbol */ /*getnamedsym:AND_MATCH_FLAGS */ { melt_ptr_t sy_AND_MATCH_FLAGS = meltgc_named_symbol ("AND_MATCH_FLAGS", MELT_GET); if (sy_AND_MATCH_FLAGS && NULL == /*_.VALDATA___V1356*/ meltfptr[1355]) /*_.VALDATA___V1356*/ meltfptr[1355] = (melt_ptr_t) sy_AND_MATCH_FLAGS; } /*^getnamedsymbol */ /*getnamedsym:CTYPE_LONG */ { melt_ptr_t sy_CTYPE_LONG = meltgc_named_symbol ("CTYPE_LONG", MELT_GET); if (sy_CTYPE_LONG && NULL == /*_.VALDATA___V1361*/ meltfptr[1360]) /*_.VALDATA___V1361*/ meltfptr[1360] = (melt_ptr_t) sy_CTYPE_LONG; } /*^getnamedsymbol */ /*getnamedsym:DISCR_VERBATIM_STRING */ { melt_ptr_t sy_DISCR_VERBATIM_STRING = meltgc_named_symbol ("DISCR_VERBATIM_STRING", MELT_GET); if (sy_DISCR_VERBATIM_STRING && NULL == /*_.VALDATA___V1363*/ meltfptr[1362]) /*_.VALDATA___V1363*/ meltfptr[1362] = (melt_ptr_t) sy_DISCR_VERBATIM_STRING; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_IFISA */ { melt_ptr_t sy_CLASS_NREP_IFISA = meltgc_named_symbol ("CLASS_NREP_IFISA", MELT_GET); if (sy_CLASS_NREP_IFISA && NULL == /*_.VALDATA___V1369*/ meltfptr[1368]) /*_.VALDATA___V1369*/ meltfptr[1368] = (melt_ptr_t) sy_CLASS_NREP_IFISA; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_PROGN */ { melt_ptr_t sy_CLASS_NREP_PROGN = meltgc_named_symbol ("CLASS_NREP_PROGN", MELT_GET); if (sy_CLASS_NREP_PROGN && NULL == /*_.VALDATA___V1371*/ meltfptr[1370]) /*_.VALDATA___V1371*/ meltfptr[1370] = (melt_ptr_t) sy_CLASS_NREP_PROGN; } /*^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___V1375*/ meltfptr[1374]) /*_.VALDATA___V1375*/ meltfptr[1374] = (melt_ptr_t) 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___V1377*/ meltfptr[1376]) /*_.VALDATA___V1377*/ meltfptr[1376] = (melt_ptr_t) 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___V1381*/ meltfptr[1380]) /*_.VALDATA___V1381*/ meltfptr[1380] = (melt_ptr_t) sy_CLASS_NREP_IFSAME; } /*^getnamedsymbol */ /*getnamedsym:LIST_MAP */ { melt_ptr_t sy_LIST_MAP = meltgc_named_symbol ("LIST_MAP", MELT_GET); if (sy_LIST_MAP && NULL == /*_.VALDATA___V1389*/ meltfptr[1388]) /*_.VALDATA___V1389*/ meltfptr[1388] = (melt_ptr_t) sy_LIST_MAP; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_IF */ { melt_ptr_t sy_CLASS_NREP_IF = meltgc_named_symbol ("CLASS_NREP_IF", MELT_GET); if (sy_CLASS_NREP_IF && NULL == /*_.VALDATA___V1393*/ meltfptr[1392]) /*_.VALDATA___V1393*/ meltfptr[1392] = (melt_ptr_t) sy_CLASS_NREP_IF; } /*^getnamedsymbol */ /*getnamedsym:NORMALIZE_TEST_MATCHER */ { melt_ptr_t sy_NORMALIZE_TEST_MATCHER = meltgc_named_symbol ("NORMALIZE_TEST_MATCHER", MELT_GET); if (sy_NORMALIZE_TEST_MATCHER && NULL == /*_.VALDATA___V1395*/ meltfptr[1394]) /*_.VALDATA___V1395*/ meltfptr[1394] = (melt_ptr_t) sy_NORMALIZE_TEST_MATCHER; } /*^getnamedsymbol */ /*getnamedsym:NDATA */ { melt_ptr_t sy_NDATA = meltgc_named_symbol ("NDATA", MELT_GET); if (sy_NDATA && NULL == /*_.VALDATA___V1399*/ meltfptr[1398]) /*_.VALDATA___V1399*/ meltfptr[1398] = (melt_ptr_t) sy_NDATA; } /*^getnamedsymbol */ /*getnamedsym:BINDLIST */ { melt_ptr_t sy_BINDLIST = meltgc_named_symbol ("BINDLIST", MELT_GET); if (sy_BINDLIST && NULL == /*_.VALDATA___V1402*/ meltfptr[1401]) /*_.VALDATA___V1402*/ meltfptr[1401] = (melt_ptr_t) sy_BINDLIST; } /*^getnamedsymbol */ /*getnamedsym:NJELSE */ { melt_ptr_t sy_NJELSE = meltgc_named_symbol ("NJELSE", MELT_GET); if (sy_NJELSE && NULL == /*_.VALDATA___V1406*/ meltfptr[1405]) /*_.VALDATA___V1406*/ meltfptr[1405] = (melt_ptr_t) sy_NJELSE; } /*^getnamedsymbol */ /*getnamedsym:NORMALIZE_FILL_MATCHER */ { melt_ptr_t sy_NORMALIZE_FILL_MATCHER = meltgc_named_symbol ("NORMALIZE_FILL_MATCHER", MELT_GET); if (sy_NORMALIZE_FILL_MATCHER && NULL == /*_.VALDATA___V1412*/ meltfptr[1411]) /*_.VALDATA___V1412*/ meltfptr[1411] = (melt_ptr_t) sy_NORMALIZE_FILL_MATCHER; } /*^getnamedsymbol */ /*getnamedsym:NOUTS */ { melt_ptr_t sy_NOUTS = meltgc_named_symbol ("NOUTS", MELT_GET); if (sy_NOUTS && NULL == /*_.VALDATA___V1418*/ meltfptr[1417]) /*_.VALDATA___V1418*/ meltfptr[1417] = (melt_ptr_t) sy_NOUTS; } /*^getnamedsymbol */ /*getnamedsym:TESTDATA */ { melt_ptr_t sy_TESTDATA = meltgc_named_symbol ("TESTDATA", MELT_GET); if (sy_TESTDATA && NULL == /*_.VALDATA___V1422*/ meltfptr[1421]) /*_.VALDATA___V1422*/ meltfptr[1421] = (melt_ptr_t) sy_TESTDATA; } /*^getnamedsymbol */ /*getnamedsym:CLASS_CMATCHER */ { melt_ptr_t sy_CLASS_CMATCHER = meltgc_named_symbol ("CLASS_CMATCHER", MELT_GET); if (sy_CLASS_CMATCHER && NULL == /*_.VALDATA___V1434*/ meltfptr[1433]) /*_.VALDATA___V1434*/ meltfptr[1433] = (melt_ptr_t) sy_CLASS_CMATCHER; } /*^getnamedsymbol */ /*getnamedsym:_MATCHRES */ { melt_ptr_t sy_MATCHRES = meltgc_named_symbol ("_MATCHRES", MELT_GET); if (sy_MATCHRES && NULL == /*_.VALDATA___V1443*/ meltfptr[1442]) /*_.VALDATA___V1443*/ meltfptr[1442] = (melt_ptr_t) sy_MATCHRES; } /*^getnamedsymbol */ /*getnamedsym:MATCHALT_INTER_ */ { melt_ptr_t sy_MATCHALT_INTER_ = meltgc_named_symbol ("MATCHALT_INTER_", MELT_GET); if (sy_MATCHALT_INTER_ && NULL == /*_.VALDATA___V1450*/ meltfptr[1449]) /*_.VALDATA___V1450*/ meltfptr[1449] = (melt_ptr_t) sy_MATCHALT_INTER_; } /*^getnamedsymbol */ /*getnamedsym:_MATCHED_DATA */ { melt_ptr_t sy_MATCHED_DATA = meltgc_named_symbol ("_MATCHED_DATA", MELT_GET); if (sy_MATCHED_DATA && NULL == /*_.VALDATA___V1452*/ meltfptr[1451]) /*_.VALDATA___V1452*/ meltfptr[1451] = (melt_ptr_t) sy_MATCHED_DATA; } /*^getnamedkeyword */ /*getnamedkeyw:TRUE */ { melt_ptr_t kw_TRUE = meltgc_named_keyword ("TRUE", MELT_GET); if (kw_TRUE) /*_.VALDATA___V1468*/ meltfptr[1467] = (melt_ptr_t) kw_TRUE; } /*^getnamedsymbol */ /*getnamedsym:MATCHALTRES_ */ { melt_ptr_t sy_MATCHALTRES_ = meltgc_named_symbol ("MATCHALTRES_", MELT_GET); if (sy_MATCHALTRES_ && NULL == /*_.VALDATA___V1470*/ meltfptr[1469]) /*_.VALDATA___V1470*/ meltfptr[1469] = (melt_ptr_t) sy_MATCHALTRES_; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_MATCHALT */ { melt_ptr_t sy_CLASS_SOURCE_MATCHALT = meltgc_named_symbol ("CLASS_SOURCE_MATCHALT", MELT_GET); if (sy_CLASS_SOURCE_MATCHALT && NULL == /*_.VALDATA___V1473*/ meltfptr[1472]) /*_.VALDATA___V1473*/ meltfptr[1472] = (melt_ptr_t) sy_CLASS_SOURCE_MATCHALT; } /*^getnamedsymbol */ /*getnamedsym:ALTERNATE_MATCH */ { melt_ptr_t sy_ALTERNATE_MATCH = meltgc_named_symbol ("ALTERNATE_MATCH", MELT_GET); if (sy_ALTERNATE_MATCH && NULL == /*_.VALDATA___V1477*/ meltfptr[1476]) /*_.VALDATA___V1477*/ meltfptr[1476] = (melt_ptr_t) sy_ALTERNATE_MATCH; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_ALTMATCH */ { melt_ptr_t sy_CLASS_NREP_ALTMATCH = meltgc_named_symbol ("CLASS_NREP_ALTMATCH", MELT_GET); if (sy_CLASS_NREP_ALTMATCH && NULL == /*_.VALDATA___V1480*/ meltfptr[1479]) /*_.VALDATA___V1480*/ meltfptr[1479] = (melt_ptr_t) sy_CLASS_NREP_ALTMATCH; } /*^comment */ /**COMMENT: get the value importer **/ ; /*^getslot */ { melt_ptr_t slot = NULL, obj = NULL; obj = (melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (INITIAL_SYSTEM_DATA)))) /*=obj*/ ; melt_object_get_field (slot, obj, 12, "SYSDATA_VALUE_IMPORTER"); /*_.VALIMPORT___V6*/ meltfptr[5] = slot; }; /*^comment */ /**COMMENT: before getting imported values **/ ; /*^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_ROOT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.CLASS_ROOT__V7*/ meltfptr[6] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V95*/ meltfptr[94]), (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_SELECTOR"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.CLASS_SELECTOR__V8*/ meltfptr[7] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V147*/ meltfptr[146]), (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 = "MELT_DEBUG_FUN"; /*^apply.arg */ 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___V153*/ meltfptr[152]), (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_NAMED"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.CLASS_NAMED__V10*/ meltfptr[9] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V155*/ meltfptr[154]), (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 = "INSTALL_METHOD"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.INSTALL_METHOD__V11*/ meltfptr[10] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156]), (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 = "DISCR_ANY_RECEIVER"; /*^apply.arg */ 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___V159*/ meltfptr[158]), (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_SOURCE_PATTERN"; /*^apply.arg */ 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___V163*/ meltfptr[162]), (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_SOURCE_PATTERN_VARIABLE"; /*^apply.arg */ 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___V167*/ meltfptr[166]), (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_SOURCE_PATTERN_JOKER_VARIABLE"; /*^apply.arg */ 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___V171*/ meltfptr[170]), (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_SOURCE_PATTERN_CONSTANT"; /*^apply.arg */ 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___V175*/ meltfptr[174]), (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 = "NORMAL_EXP"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.NORMAL_EXP__V17*/ meltfptr[16] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V177*/ meltfptr[176]), (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 = "LIST_APPEND2LIST"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.LIST_APPEND2LIST__V18*/ meltfptr[17] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]), (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 = "GET_CTYPE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.GET_CTYPE__V19*/ meltfptr[18] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V181*/ meltfptr[180]), (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_CTYPE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.CLASS_CTYPE__V20*/ meltfptr[19] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V183*/ meltfptr[182]), (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_LOCATED"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.CLASS_LOCATED__V21*/ meltfptr[20] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V185*/ meltfptr[184]), (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_SOURCE_PATTERN_CONSTRUCT"; /*^apply.arg */ 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___V189*/ meltfptr[188]), (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 = "CTYPE_VALUE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.CTYPE_VALUE__V23*/ meltfptr[22] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V191*/ meltfptr[190]), (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_SOURCE_PATTERN_OBJECT"; /*^apply.arg */ 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___V195*/ meltfptr[194]), (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_CLASS"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.CLASS_CLASS__V25*/ meltfptr[24] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V197*/ meltfptr[196]), (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_SOURCE_FIELD_PATTERN"; /*^apply.arg */ 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___V199*/ meltfptr[198]), (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_FIELD"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.CLASS_FIELD__V27*/ meltfptr[26] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V201*/ meltfptr[200]), (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_SOURCE_PATTERN_COMPOSITE"; /*^apply.arg */ 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___V205*/ meltfptr[204]), (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_ANY_MATCHER"; /*^apply.arg */ 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___V207*/ meltfptr[206]), (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_FORMAL_BINDING"; /*^apply.arg */ 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___V209*/ meltfptr[208]), (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 = "NORMALIZE_TUPLE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.NORMALIZE_TUPLE__V31*/ meltfptr[30] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V211*/ meltfptr[210]), (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_SOURCE_PATTERN_OR"; /*^apply.arg */ 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___V216*/ meltfptr[215]), (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 = "DISCR_MAP_OBJECTS"; /*^apply.arg */ 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___V218*/ meltfptr[217]), (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_SYMBOL"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.CLASS_SYMBOL__V34*/ meltfptr[33] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V220*/ meltfptr[219]), (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_SOURCE_PATTERN_AND"; /*^apply.arg */ 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___V224*/ meltfptr[223]), (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_EXPRESSION"; /*^apply.arg */ 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___V254*/ meltfptr[253]), (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_TYPED_EXPRESSION"; /*^apply.arg */ 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___V406*/ meltfptr[405]), (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 = "DISCR_LIST"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.DISCR_LIST__V38*/ meltfptr[37] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V426*/ meltfptr[425]), (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_REFERENCE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.CLASS_REFERENCE__V39*/ meltfptr[38] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V432*/ meltfptr[431]), (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_LOCSYMOCC"; /*^apply.arg */ 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___V443*/ meltfptr[442]), (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_NORMAL_LET_BINDING"; /*^apply.arg */ 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___V447*/ meltfptr[446]), (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_NORMALIZATION_CONTEXT"; /*^apply.arg */ 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___V449*/ meltfptr[448]), (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_QUASI_CTYPE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.CLASS_QUASI_CTYPE__V43*/ meltfptr[42] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V451*/ meltfptr[450]), (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_SOURCE_PATTERN_INSTANCE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.CLASS_SOURCE_PATTERN_INSTANCE__V44*/ meltfptr[43] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V463*/ meltfptr[462]), (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 = "DISCR_MULTIPLE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.DISCR_MULTIPLE__V45*/ meltfptr[44] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V465*/ meltfptr[464]), (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_SYMOCC"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.CLASS_NREP_SYMOCC__V46*/ meltfptr[45] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V467*/ meltfptr[466]), (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_LET_BINDING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.CLASS_LET_BINDING__V47*/ meltfptr[46] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V469*/ meltfptr[468]), (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_UNSAFE_GET_FIELD"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.CLASS_NREP_UNSAFE_GET_FIELD__V48*/ meltfptr[47] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V471*/ meltfptr[470]), (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 = "CLONE_SYMBOL"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.CLONE_SYMBOL__V49*/ meltfptr[48] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V473*/ meltfptr[472]), (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_SOURCE_PATTERN_TUPLE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.CLASS_SOURCE_PATTERN_TUPLE__V50*/ meltfptr[49] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V499*/ meltfptr[498]), (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 = "DISCR_CONSTANT_INTEGER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.DISCR_CONSTANT_INTEGER__V51*/ meltfptr[50] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V501*/ meltfptr[500]), (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 = "LIST_TO_MULTIPLE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.LIST_TO_MULTIPLE__V52*/ meltfptr[51] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V503*/ meltfptr[502]), (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_UNSAFE_NTH_COMPONENT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.CLASS_NREP_UNSAFE_NTH_COMPONENT__V53*/ meltfptr[52] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V505*/ meltfptr[504]), (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 = "MAPOBJECT_SORTED_ATTRIBUTE_TUPLE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.MAPOBJECT_SORTED_ATTRIBUTE_TUPLE__V54*/ meltfptr[53] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V515*/ meltfptr[514]), (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 = "MULTIPLE_MAP"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.MULTIPLE_MAP__V55*/ meltfptr[54] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V517*/ meltfptr[516]), (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"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.CLASS_NREP__V56*/ meltfptr[55] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V519*/ meltfptr[518]), (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_SOURCE_PATTERN_MATCHER"; /*^apply.arg */ 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___V527*/ meltfptr[526]), (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_ANY_BINDING"; /*^apply.arg */ 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___V529*/ meltfptr[528]), (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 = "FIND_ENV"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.FIND_ENV__V59*/ meltfptr[58] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V531*/ meltfptr[530]), (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 = "FRESH_ENV"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.FRESH_ENV__V60*/ meltfptr[59] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V533*/ meltfptr[532]), (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 = "PUT_ENV"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.PUT_ENV__V61*/ meltfptr[60] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V535*/ meltfptr[534]), (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 = "MULTIPLE_TO_LIST"; /*^apply.arg */ 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___V537*/ meltfptr[536]), (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 = "DISCR_STRING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.DISCR_STRING__V63*/ meltfptr[62] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V547*/ meltfptr[546]), (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 = "REGISTER_OPTION"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.REGISTER_OPTION__V64*/ meltfptr[63] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V549*/ meltfptr[548]), (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_PROPED"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.CLASS_PROPED__V65*/ meltfptr[64] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V556*/ meltfptr[555]), (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_CLONED_SYMBOL"; /*^apply.arg */ 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___V592*/ meltfptr[591]), (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 = "DISCR_STRBUF"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.DISCR_STRBUF__V67*/ meltfptr[66] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V602*/ meltfptr[601]), (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_SOURCE_MATCH"; /*^apply.arg */ 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___V613*/ meltfptr[612]), (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_ENVIRONMENT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.CLASS_ENVIRONMENT__V69*/ meltfptr[68] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V615*/ meltfptr[614]), (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_CHECKSIGNAL"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.CLASS_NREP_CHECKSIGNAL__V70*/ meltfptr[69] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V617*/ meltfptr[616]), (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 = "CTYPE_VOID"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.CTYPE_VOID__V71*/ meltfptr[70] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V619*/ meltfptr[618]), (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_SOURCE_MATCH_CASE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.CLASS_SOURCE_MATCH_CASE__V72*/ meltfptr[71] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V621*/ meltfptr[620]), (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 = "WRAP_NORMAL_LETSEQ"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.WRAP_NORMAL_LETSEQ__V73*/ meltfptr[72] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V623*/ meltfptr[622]), (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 = "NORMALIZE_BINDING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.NORMALIZE_BINDING__V74*/ meltfptr[73] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V737*/ meltfptr[736]), (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_SIMPLE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.CLASS_NREP_SIMPLE__V75*/ meltfptr[74] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V957*/ meltfptr[956]), (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_SOURCE_PATTERN_LIST"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.CLASS_SOURCE_PATTERN_LIST__V76*/ meltfptr[75] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1117*/ meltfptr[1116]), (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 = "ADD2OUT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.ADD2OUT__V77*/ meltfptr[76] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1152*/ meltfptr[1151]), (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 = "DISCR_INTEGER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.DISCR_INTEGER__V78*/ meltfptr[77] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1171*/ meltfptr[1170]), (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 = "COMPARE_NAMED_ALPHA"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.COMPARE_NAMED_ALPHA__V79*/ meltfptr[78] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1173*/ meltfptr[1172]), (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_SETQ"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.CLASS_NREP_SETQ__V80*/ meltfptr[79] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1352*/ meltfptr[1351]), (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_CHUNK"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.CLASS_NREP_CHUNK__V81*/ meltfptr[80] = 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); } /*^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 = "CTYPE_LONG"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.CTYPE_LONG__V82*/ meltfptr[81] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1361*/ meltfptr[1360]), (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 = "DISCR_VERBATIM_STRING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.DISCR_VERBATIM_STRING__V83*/ meltfptr[82] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1363*/ meltfptr[1362]), (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_IFISA"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.CLASS_NREP_IFISA__V84*/ meltfptr[83] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1369*/ meltfptr[1368]), (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_PROGN"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.CLASS_NREP_PROGN__V85*/ meltfptr[84] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1371*/ meltfptr[1370]), (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-normatch"; /*_.CLASS_NREP_IFTUPLESIZED__V86*/ meltfptr[85] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1375*/ meltfptr[1374]), (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__V87*/ meltfptr[86] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1377*/ meltfptr[1376]), (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_IFSAME"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.CLASS_NREP_IFSAME__V88*/ meltfptr[87] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1381*/ meltfptr[1380]), (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 = "LIST_MAP"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.LIST_MAP__V89*/ meltfptr[88] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1389*/ meltfptr[1388]), (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_IF"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.CLASS_NREP_IF__V90*/ meltfptr[89] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1393*/ meltfptr[1392]), (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_CMATCHER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.CLASS_CMATCHER__V91*/ meltfptr[90] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1434*/ meltfptr[1433]), (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_SOURCE_MATCHALT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normatch"; /*_.CLASS_SOURCE_MATCHALT__V92*/ meltfptr[91] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1473*/ meltfptr[1472]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^comment */ /**COMMENT: after getting imported values **/ ; /**initial routine cdata initializer**/ memset (meltpredefinited, 0, sizeof (meltpredefinited)); initialize_module_meltdata_warmelt_normatch (&meltfram__, meltpredefinited); /**initial routine body**/ meltmod__warmelt_normatch__initialmeltchunk_0 (&meltfram__, meltpredefinited); meltmod__warmelt_normatch__initialmeltchunk_1 (&meltfram__, meltpredefinited); meltmod__warmelt_normatch__initialmeltchunk_2 (&meltfram__, meltpredefinited); meltmod__warmelt_normatch__initialmeltchunk_3 (&meltfram__, meltpredefinited); meltmod__warmelt_normatch__initialmeltchunk_4 (&meltfram__, meltpredefinited); meltmod__warmelt_normatch__initialmeltchunk_5 (&meltfram__, meltpredefinited); meltmod__warmelt_normatch__initialmeltchunk_6 (&meltfram__, meltpredefinited); meltmod__warmelt_normatch__initialmeltchunk_7 (&meltfram__, meltpredefinited); meltmod__warmelt_normatch__initialmeltchunk_8 (&meltfram__, meltpredefinited); meltmod__warmelt_normatch__initialmeltchunk_9 (&meltfram__, meltpredefinited); meltmod__warmelt_normatch__initialmeltchunk_10 (&meltfram__, meltpredefinited); meltmod__warmelt_normatch__initialmeltchunk_11 (&meltfram__, meltpredefinited); meltmod__warmelt_normatch__initialmeltchunk_12 (&meltfram__, meltpredefinited); meltmod__warmelt_normatch__initialmeltchunk_13 (&meltfram__, meltpredefinited); meltmod__warmelt_normatch__initialmeltchunk_14 (&meltfram__, meltpredefinited); meltmod__warmelt_normatch__initialmeltchunk_15 (&meltfram__, meltpredefinited); meltmod__warmelt_normatch__initialmeltchunk_16 (&meltfram__, meltpredefinited); meltmod__warmelt_normatch__initialmeltchunk_17 (&meltfram__, meltpredefinited); meltmod__warmelt_normatch__initialmeltchunk_18 (&meltfram__, meltpredefinited); meltmod__warmelt_normatch__initialmeltchunk_19 (&meltfram__, meltpredefinited); meltmod__warmelt_normatch__initialmeltchunk_20 (&meltfram__, meltpredefinited); meltmod__warmelt_normatch__initialmeltchunk_21 (&meltfram__, meltpredefinited); meltmod__warmelt_normatch__initialmeltchunk_22 (&meltfram__, meltpredefinited); meltmod__warmelt_normatch__initialmeltchunk_23 (&meltfram__, meltpredefinited); meltmod__warmelt_normatch__initialmeltchunk_24 (&meltfram__, meltpredefinited); meltmod__warmelt_normatch__initialmeltchunk_25 (&meltfram__, meltpredefinited); meltmod__warmelt_normatch__initialmeltchunk_26 (&meltfram__, meltpredefinited); meltmod__warmelt_normatch__initialmeltchunk_27 (&meltfram__, meltpredefinited); meltmod__warmelt_normatch__initialmeltchunk_28 (&meltfram__, meltpredefinited); meltmod__warmelt_normatch__initialmeltchunk_29 (&meltfram__, meltpredefinited); meltmod__warmelt_normatch__initialmeltchunk_30 (&meltfram__, meltpredefinited); meltmod__warmelt_normatch__initialmeltchunk_31 (&meltfram__, meltpredefinited); meltmod__warmelt_normatch__initialmeltchunk_32 (&meltfram__, meltpredefinited); meltmod__warmelt_normatch__initialmeltchunk_33 (&meltfram__, meltpredefinited); meltmod__warmelt_normatch__initialmeltchunk_34 (&meltfram__, meltpredefinited);; goto labend_rout; labend_rout:; melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev; /* popped initial frame */ { /* clear initial frame & return */ melt_ptr_t retval = /*_.RETINIT___V1*/ meltfptr[0]; memset ((void *) &meltfram__, 0, sizeof (meltfram__)); return retval; } #undef meltcallcount #undef meltfram__ #undef MELTFRAM_NBVARNUM #undef MELTFRAM_NBVARPTR } /* end */ void meltmod__warmelt_normatch__initialmeltchunk_0 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /**COMMENT: start of oinibody **/ ; /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V93*/ meltfptr[92])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V93*/ meltfptr[92])))); ((meltobject_ptr_t) ( /*_.VALDATA___V93*/ meltfptr[92]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V94*/ meltfptr[93]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V93*/ meltfptr[92]); melt_dbgtrace_written_object ( /*_.VALDATA___V93*/ meltfptr[92], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V95*/ meltfptr[94])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V95*/ meltfptr[94])))); ((meltobject_ptr_t) ( /*_.VALDATA___V95*/ meltfptr[94]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V96*/ meltfptr[95]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V95*/ meltfptr[94]); melt_dbgtrace_written_object ( /*_.VALDATA___V95*/ meltfptr[94], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V98*/ meltfptr[97]); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96])))); ((meltobject_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]))->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___V99*/ meltfptr[98])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #12 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V99*/ meltfptr[98])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V99*/ meltfptr[98]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___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])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96])))); ((meltobject_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V99*/ meltfptr[98]); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V100*/ meltfptr[99])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V100*/ meltfptr[99])))); ((meltobject_ptr_t) ( /*_.VALDATA___V100*/ meltfptr[99]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V101*/ meltfptr[100]); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V100*/ meltfptr[99])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V100*/ meltfptr[99])))); ((meltobject_ptr_t) ( /*_.VALDATA___V100*/ meltfptr[99]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V100*/ meltfptr[99]); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V100*/ meltfptr[99], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V102*/ meltfptr[101])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V102*/ meltfptr[101])))); ((meltobject_ptr_t) ( /*_.VALDATA___V102*/ meltfptr[101]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V103*/ meltfptr[102]); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V102*/ meltfptr[101])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V102*/ meltfptr[101])))); ((meltobject_ptr_t) ( /*_.VALDATA___V102*/ meltfptr[101]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V102*/ meltfptr[101]); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V102*/ meltfptr[101], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V104*/ meltfptr[103])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V104*/ meltfptr[103])))); ((meltobject_ptr_t) ( /*_.VALDATA___V104*/ meltfptr[103]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V105*/ meltfptr[104]); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V104*/ meltfptr[103])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V104*/ meltfptr[103])))); ((meltobject_ptr_t) ( /*_.VALDATA___V104*/ meltfptr[103]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V104*/ meltfptr[103]); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V104*/ meltfptr[103], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V106*/ meltfptr[105])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V106*/ meltfptr[105])))); ((meltobject_ptr_t) ( /*_.VALDATA___V106*/ meltfptr[105]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V107*/ meltfptr[106]); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V106*/ meltfptr[105])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V106*/ meltfptr[105])))); ((meltobject_ptr_t) ( /*_.VALDATA___V106*/ meltfptr[105]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V106*/ meltfptr[105]); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V106*/ meltfptr[105], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V108*/ meltfptr[107])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V108*/ meltfptr[107])))); ((meltobject_ptr_t) ( /*_.VALDATA___V108*/ meltfptr[107]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V109*/ meltfptr[108]); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V108*/ meltfptr[107])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V108*/ meltfptr[107])))); ((meltobject_ptr_t) ( /*_.VALDATA___V108*/ meltfptr[107]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V108*/ meltfptr[107]); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V108*/ meltfptr[107], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V110*/ meltfptr[109])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V110*/ meltfptr[109])))); ((meltobject_ptr_t) ( /*_.VALDATA___V110*/ meltfptr[109]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V111*/ meltfptr[110]); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V110*/ meltfptr[109])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V110*/ meltfptr[109])))); ((meltobject_ptr_t) ( /*_.VALDATA___V110*/ meltfptr[109]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V110*/ meltfptr[109]); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V110*/ meltfptr[109], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V112*/ meltfptr[111])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V112*/ meltfptr[111])))); ((meltobject_ptr_t) ( /*_.VALDATA___V112*/ meltfptr[111]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V113*/ meltfptr[112]); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V112*/ meltfptr[111])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V112*/ meltfptr[111])))); ((meltobject_ptr_t) ( /*_.VALDATA___V112*/ meltfptr[111]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V112*/ meltfptr[111]); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V112*/ meltfptr[111], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V114*/ meltfptr[113])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V114*/ meltfptr[113])))); ((meltobject_ptr_t) ( /*_.VALDATA___V114*/ meltfptr[113]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V115*/ meltfptr[114]); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V114*/ meltfptr[113])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V114*/ meltfptr[113])))); ((meltobject_ptr_t) ( /*_.VALDATA___V114*/ meltfptr[113]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V114*/ meltfptr[113]); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V114*/ meltfptr[113], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V116*/ meltfptr[115])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V116*/ meltfptr[115])))); ((meltobject_ptr_t) ( /*_.VALDATA___V116*/ meltfptr[115]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V117*/ meltfptr[116]); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V116*/ meltfptr[115])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V116*/ meltfptr[115])))); ((meltobject_ptr_t) ( /*_.VALDATA___V116*/ meltfptr[115]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V116*/ meltfptr[115]); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V116*/ meltfptr[115], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V118*/ meltfptr[117])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V118*/ meltfptr[117])))); ((meltobject_ptr_t) ( /*_.VALDATA___V118*/ meltfptr[117]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V119*/ meltfptr[118]); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V118*/ meltfptr[117])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V118*/ meltfptr[117])))); ((meltobject_ptr_t) ( /*_.VALDATA___V118*/ meltfptr[117]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V118*/ meltfptr[117]); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V118*/ meltfptr[117], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V120*/ meltfptr[119])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V121*/ meltfptr[120]); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V120*/ meltfptr[119])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V120*/ meltfptr[119])))); ((meltobject_ptr_t) ( /*_.VALDATA___V120*/ meltfptr[119]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V120*/ meltfptr[119]); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V120*/ meltfptr[119], "new static instance"); /*putupl#13 */ melt_assertmsg ("putupl #13 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V122*/ meltfptr[121])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #13 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V122*/ meltfptr[121])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V122*/ meltfptr[121]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V100*/ meltfptr[99]); /*putupl#14 */ melt_assertmsg ("putupl #14 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V122*/ meltfptr[121])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #14 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V122*/ meltfptr[121])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V122*/ meltfptr[121]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V102*/ meltfptr[101]); /*putupl#15 */ melt_assertmsg ("putupl #15 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V122*/ meltfptr[121])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #15 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V122*/ meltfptr[121])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V122*/ meltfptr[121]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V104*/ meltfptr[103]); /*putupl#16 */ melt_assertmsg ("putupl #16 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V122*/ meltfptr[121])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #16 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V122*/ meltfptr[121])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V122*/ meltfptr[121]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V106*/ meltfptr[105]); /*putupl#17 */ melt_assertmsg ("putupl #17 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V122*/ meltfptr[121])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #17 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V122*/ meltfptr[121])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V122*/ meltfptr[121]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V108*/ meltfptr[107]); /*putupl#18 */ melt_assertmsg ("putupl #18 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V122*/ meltfptr[121])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #18 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V122*/ meltfptr[121])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V122*/ meltfptr[121]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V110*/ meltfptr[109]); /*putupl#19 */ melt_assertmsg ("putupl #19 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V122*/ meltfptr[121])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #19 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V122*/ meltfptr[121])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V122*/ meltfptr[121]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V112*/ meltfptr[111]); /*putupl#20 */ melt_assertmsg ("putupl #20 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V122*/ meltfptr[121])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #20 checkoff", (7 >= 0 && 7 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V122*/ meltfptr[121])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V122*/ meltfptr[121]))->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V114*/ meltfptr[113]); /*putupl#21 */ melt_assertmsg ("putupl #21 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V122*/ meltfptr[121])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #21 checkoff", (8 >= 0 && 8 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V122*/ meltfptr[121])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V122*/ meltfptr[121]))->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V116*/ meltfptr[115]); /*putupl#22 */ melt_assertmsg ("putupl #22 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V122*/ meltfptr[121])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #22 checkoff", (9 >= 0 && 9 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V122*/ meltfptr[121])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V122*/ meltfptr[121]))->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V118*/ meltfptr[117]); /*putupl#23 */ melt_assertmsg ("putupl #23 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V122*/ meltfptr[121])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #23 checkoff", (10 >= 0 && 10 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V122*/ meltfptr[121])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V122*/ meltfptr[121]))->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V120*/ meltfptr[119]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V122*/ meltfptr[121]); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96])))); ((meltobject_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V122*/ meltfptr[121]); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-normatch.melt:34:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V97*/ meltfptr[96], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V123*/ meltfptr[122])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V123*/ meltfptr[122])))); ((meltobject_ptr_t) ( /*_.VALDATA___V123*/ meltfptr[122]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V124*/ meltfptr[123]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V123*/ meltfptr[122]); melt_dbgtrace_written_object ( /*_.VALDATA___V123*/ meltfptr[122], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V125*/ meltfptr[124])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V125*/ meltfptr[124])))); ((meltobject_ptr_t) ( /*_.VALDATA___V125*/ meltfptr[124]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V126*/ meltfptr[125]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V125*/ meltfptr[124]); melt_dbgtrace_written_object ( /*_.VALDATA___V125*/ meltfptr[124], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V127*/ meltfptr[126])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V127*/ meltfptr[126])))); ((meltobject_ptr_t) ( /*_.VALDATA___V127*/ meltfptr[126]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V128*/ meltfptr[127]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V127*/ meltfptr[126]); melt_dbgtrace_written_object ( /*_.VALDATA___V127*/ meltfptr[126], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V129*/ meltfptr[128])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V129*/ meltfptr[128])))); ((meltobject_ptr_t) ( /*_.VALDATA___V129*/ meltfptr[128]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V130*/ meltfptr[129]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V129*/ meltfptr[128]); melt_dbgtrace_written_object ( /*_.VALDATA___V129*/ meltfptr[128], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V131*/ meltfptr[130])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V131*/ meltfptr[130])))); ((meltobject_ptr_t) ( /*_.VALDATA___V131*/ meltfptr[130]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V132*/ meltfptr[131]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V131*/ meltfptr[130]); melt_dbgtrace_written_object ( /*_.VALDATA___V131*/ meltfptr[130], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V133*/ meltfptr[132])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V133*/ meltfptr[132])))); ((meltobject_ptr_t) ( /*_.VALDATA___V133*/ meltfptr[132]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V134*/ meltfptr[133]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V133*/ meltfptr[132]); melt_dbgtrace_written_object ( /*_.VALDATA___V133*/ meltfptr[132], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V135*/ meltfptr[134])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V135*/ meltfptr[134])))); ((meltobject_ptr_t) ( /*_.VALDATA___V135*/ meltfptr[134]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V136*/ meltfptr[135]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V135*/ meltfptr[134]); melt_dbgtrace_written_object ( /*_.VALDATA___V135*/ meltfptr[134], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V137*/ meltfptr[136])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V137*/ meltfptr[136])))); ((meltobject_ptr_t) ( /*_.VALDATA___V137*/ meltfptr[136]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V138*/ meltfptr[137]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V137*/ meltfptr[136]); melt_dbgtrace_written_object ( /*_.VALDATA___V137*/ meltfptr[136], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V139*/ meltfptr[138])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V139*/ meltfptr[138])))); ((meltobject_ptr_t) ( /*_.VALDATA___V139*/ meltfptr[138]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V140*/ meltfptr[139]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V139*/ meltfptr[138]); melt_dbgtrace_written_object ( /*_.VALDATA___V139*/ meltfptr[138], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V141*/ meltfptr[140])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V141*/ meltfptr[140])))); ((meltobject_ptr_t) ( /*_.VALDATA___V141*/ meltfptr[140]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V142*/ meltfptr[141]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V141*/ meltfptr[140]); melt_dbgtrace_written_object ( /*_.VALDATA___V141*/ meltfptr[140], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V143*/ meltfptr[142])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V143*/ meltfptr[142])))); ((meltobject_ptr_t) ( /*_.VALDATA___V143*/ meltfptr[142]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V144*/ meltfptr[143]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V143*/ meltfptr[142]); melt_dbgtrace_written_object ( /*_.VALDATA___V143*/ meltfptr[142], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V145*/ meltfptr[144])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V145*/ meltfptr[144])))); ((meltobject_ptr_t) ( /*_.VALDATA___V145*/ meltfptr[144]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V146*/ meltfptr[145]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V145*/ meltfptr[144]); melt_dbgtrace_written_object ( /*_.VALDATA___V145*/ meltfptr[144], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V147*/ meltfptr[146])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V147*/ meltfptr[146])))); ((meltobject_ptr_t) ( /*_.VALDATA___V147*/ meltfptr[146]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V148*/ meltfptr[147]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V147*/ meltfptr[146]); melt_dbgtrace_written_object ( /*_.VALDATA___V147*/ meltfptr[146], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:78:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V149*/ meltfptr[148])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V149*/ meltfptr[148])))); ((meltobject_ptr_t) ( /*_.VALDATA___V149*/ meltfptr[148]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V150*/ meltfptr[149]); MELT_LOCATION ("warmelt-normatch.melt:78:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V149*/ meltfptr[148]); MELT_LOCATION ("warmelt-normatch.melt:78:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V149*/ meltfptr[148], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:86:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V151*/ meltfptr[150])) == 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___V151*/ meltfptr[150])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:86:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V151*/ meltfptr[150])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V97*/ meltfptr[96]); ((meltroutine_ptr_t) /*_.VALROUT___V151*/ meltfptr[150])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-normatch.melt:86:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V151*/ meltfptr[150])) == 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___V151*/ meltfptr[150])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:86:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V151*/ meltfptr[150]); /*putclosurout#6 */ melt_assertmsg ("putclosrout#6 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V152*/ meltfptr[151])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#6 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V151*/ meltfptr[150])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V152*/ meltfptr[151])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V151*/ meltfptr[150]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V152*/ meltfptr[151]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V153*/ meltfptr[152])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V153*/ meltfptr[152])))); ((meltobject_ptr_t) ( /*_.VALDATA___V153*/ meltfptr[152]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V154*/ meltfptr[153]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V153*/ meltfptr[152]); melt_dbgtrace_written_object ( /*_.VALDATA___V153*/ meltfptr[152], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V155*/ meltfptr[154])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V155*/ meltfptr[154])))); ((meltobject_ptr_t) ( /*_.VALDATA___V155*/ meltfptr[154]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V156*/ meltfptr[155]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V155*/ meltfptr[154]); melt_dbgtrace_written_object ( /*_.VALDATA___V155*/ meltfptr[154], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V158*/ meltfptr[157]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V157*/ meltfptr[156]); melt_dbgtrace_written_object ( /*_.VALDATA___V157*/ meltfptr[156], "new static instance"); #undef meltfram__ } /*end of meltmod__warmelt_normatch__initialmeltchunk_0 */ void meltmod__warmelt_normatch__initialmeltchunk_1 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*putslot*/ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V159*/ meltfptr[158])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V159*/ meltfptr[158])))); ((meltobject_ptr_t) ( /*_.VALDATA___V159*/ meltfptr[158]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V160*/ meltfptr[159]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V159*/ meltfptr[158]); melt_dbgtrace_written_object ( /*_.VALDATA___V159*/ meltfptr[158], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:101:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V161*/ meltfptr[160])) == 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___V161*/ meltfptr[160])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:101:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V161*/ meltfptr[160])) == 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___V161*/ meltfptr[160])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-normatch.melt:101:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V161*/ meltfptr[160])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V97*/ meltfptr[96]); ((meltroutine_ptr_t) /*_.VALROUT___V161*/ meltfptr[160])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-normatch.melt:101:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V161*/ meltfptr[160])) == 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___V161*/ meltfptr[160])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:101:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V161*/ meltfptr[160]); /*putclosurout#7 */ melt_assertmsg ("putclosrout#7 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V162*/ meltfptr[161])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#7 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V161*/ meltfptr[160])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V162*/ meltfptr[161])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V161*/ meltfptr[160]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V162*/ meltfptr[161]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V163*/ meltfptr[162])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V163*/ meltfptr[162])))); ((meltobject_ptr_t) ( /*_.VALDATA___V163*/ meltfptr[162]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V164*/ meltfptr[163]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V163*/ meltfptr[162]); melt_dbgtrace_written_object ( /*_.VALDATA___V163*/ meltfptr[162], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:117:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V165*/ meltfptr[164])) == 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___V165*/ meltfptr[164])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:117:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V165*/ meltfptr[164])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V97*/ meltfptr[96]); ((meltroutine_ptr_t) /*_.VALROUT___V165*/ meltfptr[164])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-normatch.melt:117:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V165*/ meltfptr[164])) == 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___V165*/ meltfptr[164])->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___V165*/ meltfptr[164]); /*putclosurout#8 */ melt_assertmsg ("putclosrout#8 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V166*/ meltfptr[165])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#8 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V165*/ meltfptr[164])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V166*/ meltfptr[165])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V165*/ meltfptr[164]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V166*/ meltfptr[165]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V167*/ meltfptr[166])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V167*/ meltfptr[166])))); ((meltobject_ptr_t) ( /*_.VALDATA___V167*/ meltfptr[166]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V168*/ meltfptr[167]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V167*/ meltfptr[166]); melt_dbgtrace_written_object ( /*_.VALDATA___V167*/ meltfptr[166], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:151:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V169*/ meltfptr[168])) == 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___V169*/ meltfptr[168])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:151:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V169*/ meltfptr[168])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V97*/ meltfptr[96]); ((meltroutine_ptr_t) /*_.VALROUT___V169*/ meltfptr[168])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-normatch.melt:151:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V169*/ meltfptr[168])) == 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___V169*/ meltfptr[168])->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___V169*/ meltfptr[168]); /*putclosurout#9 */ melt_assertmsg ("putclosrout#9 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V170*/ meltfptr[169])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#9 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V169*/ meltfptr[168])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V170*/ meltfptr[169])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V169*/ meltfptr[168]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V170*/ meltfptr[169]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V171*/ meltfptr[170])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V171*/ meltfptr[170])))); ((meltobject_ptr_t) ( /*_.VALDATA___V171*/ meltfptr[170]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V172*/ meltfptr[171]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V171*/ meltfptr[170]); melt_dbgtrace_written_object ( /*_.VALDATA___V171*/ meltfptr[170], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:165:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V173*/ meltfptr[172])) == 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___V173*/ meltfptr[172])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:165:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V173*/ meltfptr[172])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V97*/ meltfptr[96]); ((meltroutine_ptr_t) /*_.VALROUT___V173*/ meltfptr[172])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-normatch.melt:165:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V173*/ meltfptr[172])) == 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___V173*/ meltfptr[172])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_CONSTANT__V16*/ meltfptr[15]); MELT_LOCATION ("warmelt-normatch.melt:165:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V173*/ meltfptr[172])) == 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___V173*/ meltfptr[172])->tabval[3] = (melt_ptr_t) ( /*_.NORMAL_EXP__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normatch.melt:165:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V173*/ meltfptr[172])) == 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___V173*/ meltfptr[172])->tabval[4] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V18*/ meltfptr[17]); MELT_LOCATION ("warmelt-normatch.melt:165:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V173*/ meltfptr[172])) == 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___V173*/ meltfptr[172])->tabval[5] = (melt_ptr_t) ( /*_.GET_CTYPE__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normatch.melt:165:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V173*/ meltfptr[172])) == 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___V173*/ meltfptr[172])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-normatch.melt:165:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V173*/ meltfptr[172])) == 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___V173*/ meltfptr[172])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-normatch.melt:165:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V173*/ meltfptr[172]); /*putclosurout#10 */ melt_assertmsg ("putclosrout#10 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V174*/ meltfptr[173])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#10 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V173*/ meltfptr[172])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V174*/ meltfptr[173])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V173*/ meltfptr[172]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V174*/ meltfptr[173]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V175*/ meltfptr[174])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V176*/ meltfptr[175]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V175*/ meltfptr[174]); melt_dbgtrace_written_object ( /*_.VALDATA___V175*/ meltfptr[174], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V177*/ meltfptr[176])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V178*/ meltfptr[177]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V177*/ meltfptr[176]); melt_dbgtrace_written_object ( /*_.VALDATA___V177*/ meltfptr[176], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178])))); ((meltobject_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V180*/ meltfptr[179]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V179*/ meltfptr[178]); melt_dbgtrace_written_object ( /*_.VALDATA___V179*/ meltfptr[178], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V181*/ meltfptr[180])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V181*/ meltfptr[180])))); ((meltobject_ptr_t) ( /*_.VALDATA___V181*/ meltfptr[180]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V182*/ meltfptr[181]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V181*/ meltfptr[180]); melt_dbgtrace_written_object ( /*_.VALDATA___V181*/ meltfptr[180], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V183*/ meltfptr[182])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V183*/ meltfptr[182])))); ((meltobject_ptr_t) ( /*_.VALDATA___V183*/ meltfptr[182]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V184*/ meltfptr[183]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V183*/ meltfptr[182]); melt_dbgtrace_written_object ( /*_.VALDATA___V183*/ meltfptr[182], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V185*/ meltfptr[184])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V185*/ meltfptr[184])))); ((meltobject_ptr_t) ( /*_.VALDATA___V185*/ meltfptr[184]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V186*/ meltfptr[185]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V185*/ meltfptr[184]); melt_dbgtrace_written_object ( /*_.VALDATA___V185*/ meltfptr[184], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:217:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V187*/ meltfptr[186])) == 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___V187*/ meltfptr[186])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:217:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V187*/ meltfptr[186])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V97*/ meltfptr[96]); ((meltroutine_ptr_t) /*_.VALROUT___V187*/ meltfptr[186])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-normatch.melt:217:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V187*/ meltfptr[186])) == 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___V187*/ meltfptr[186])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_CONSTRUCT__V22*/ meltfptr[21]); MELT_LOCATION ("warmelt-normatch.melt:217:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V187*/ meltfptr[186])) == 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___V187*/ meltfptr[186])->tabval[3] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-normatch.melt:217:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V187*/ meltfptr[186])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V149*/ meltfptr[148]); ((meltroutine_ptr_t) /*_.VALROUT___V187*/ meltfptr[186])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V149*/ meltfptr[148]); MELT_LOCATION ("warmelt-normatch.melt:217:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V187*/ meltfptr[186]); /*putclosurout#11 */ melt_assertmsg ("putclosrout#11 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V188*/ meltfptr[187])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#11 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V187*/ meltfptr[186])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V188*/ meltfptr[187])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V187*/ meltfptr[186]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V188*/ meltfptr[187]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V189*/ meltfptr[188])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V189*/ meltfptr[188])))); ((meltobject_ptr_t) ( /*_.VALDATA___V189*/ meltfptr[188]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V190*/ meltfptr[189]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V189*/ meltfptr[188]); melt_dbgtrace_written_object ( /*_.VALDATA___V189*/ meltfptr[188], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V191*/ meltfptr[190])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V192*/ meltfptr[191]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V191*/ meltfptr[190]); melt_dbgtrace_written_object ( /*_.VALDATA___V191*/ meltfptr[190], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:242:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V193*/ meltfptr[192])) == 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___V193*/ meltfptr[192])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:242:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V193*/ meltfptr[192])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V97*/ meltfptr[96]); ((meltroutine_ptr_t) /*_.VALROUT___V193*/ meltfptr[192])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-normatch.melt:242:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V193*/ meltfptr[192])) == 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___V193*/ meltfptr[192])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_OBJECT__V24*/ meltfptr[23]); MELT_LOCATION ("warmelt-normatch.melt:242:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V193*/ meltfptr[192])) == 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___V193*/ meltfptr[192])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_CLASS__V25*/ meltfptr[24]); MELT_LOCATION ("warmelt-normatch.melt:242:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V193*/ meltfptr[192])) == 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___V193*/ meltfptr[192])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_SOURCE_FIELD_PATTERN__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-normatch.melt:242:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V193*/ meltfptr[192])) == 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___V193*/ meltfptr[192])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_FIELD__V27*/ meltfptr[26]); MELT_LOCATION ("warmelt-normatch.melt:242:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V193*/ meltfptr[192])) == 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___V193*/ meltfptr[192])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:242:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V193*/ meltfptr[192])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V149*/ meltfptr[148]); ((meltroutine_ptr_t) /*_.VALROUT___V193*/ meltfptr[192])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V149*/ meltfptr[148]); MELT_LOCATION ("warmelt-normatch.melt:242:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V193*/ meltfptr[192])) == 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___V193*/ meltfptr[192])->tabval[8] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-normatch.melt:242:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V193*/ meltfptr[192]); /*putclosurout#12 */ melt_assertmsg ("putclosrout#12 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V194*/ meltfptr[193])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#12 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V193*/ meltfptr[192])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V194*/ meltfptr[193])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V193*/ meltfptr[192]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V194*/ meltfptr[193]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V195*/ meltfptr[194])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V196*/ meltfptr[195]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V195*/ meltfptr[194]); melt_dbgtrace_written_object ( /*_.VALDATA___V195*/ meltfptr[194], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V197*/ meltfptr[196])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V197*/ meltfptr[196])))); ((meltobject_ptr_t) ( /*_.VALDATA___V197*/ meltfptr[196]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V198*/ meltfptr[197]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V197*/ meltfptr[196]); melt_dbgtrace_written_object ( /*_.VALDATA___V197*/ meltfptr[196], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V199*/ meltfptr[198])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V199*/ meltfptr[198])))); ((meltobject_ptr_t) ( /*_.VALDATA___V199*/ meltfptr[198]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V200*/ meltfptr[199]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V199*/ meltfptr[198]); melt_dbgtrace_written_object ( /*_.VALDATA___V199*/ meltfptr[198], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V201*/ meltfptr[200])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V201*/ meltfptr[200])))); ((meltobject_ptr_t) ( /*_.VALDATA___V201*/ meltfptr[200]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V202*/ meltfptr[201]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V201*/ meltfptr[200]); melt_dbgtrace_written_object ( /*_.VALDATA___V201*/ meltfptr[200], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:280:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V203*/ meltfptr[202])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V97*/ meltfptr[96]); ((meltroutine_ptr_t) /*_.VALROUT___V203*/ meltfptr[202])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-normatch.melt:280:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V203*/ meltfptr[202])) == 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___V203*/ meltfptr[202])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:280:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V203*/ meltfptr[202])) == 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___V203*/ meltfptr[202])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-normatch.melt:280:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V203*/ meltfptr[202])) == 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___V203*/ meltfptr[202])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_COMPOSITE__V28*/ meltfptr[27]); MELT_LOCATION ("warmelt-normatch.melt:280:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V203*/ meltfptr[202])) == 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___V203*/ meltfptr[202])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_ANY_MATCHER__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normatch.melt:280:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V203*/ meltfptr[202])) == 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___V203*/ meltfptr[202])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normatch.melt:280:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V203*/ meltfptr[202])) == 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___V203*/ meltfptr[202])->tabval[6] = (melt_ptr_t) ( /*_.NORMALIZE_TUPLE__V31*/ meltfptr[30]); MELT_LOCATION ("warmelt-normatch.melt:280:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V203*/ meltfptr[202])) == 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___V203*/ meltfptr[202])->tabval[7] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V18*/ meltfptr[17]); MELT_LOCATION ("warmelt-normatch.melt:280:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V203*/ meltfptr[202])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V149*/ meltfptr[148]); ((meltroutine_ptr_t) /*_.VALROUT___V203*/ meltfptr[202])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V149*/ meltfptr[148]); MELT_LOCATION ("warmelt-normatch.melt:280:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V203*/ meltfptr[202]); /*putclosurout#13 */ melt_assertmsg ("putclosrout#13 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V204*/ meltfptr[203])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#13 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V203*/ meltfptr[202])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V204*/ meltfptr[203])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V203*/ meltfptr[202]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V204*/ meltfptr[203]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V205*/ meltfptr[204])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V205*/ meltfptr[204])))); ((meltobject_ptr_t) ( /*_.VALDATA___V205*/ meltfptr[204]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V206*/ meltfptr[205]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V205*/ meltfptr[204]); melt_dbgtrace_written_object ( /*_.VALDATA___V205*/ meltfptr[204], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V207*/ meltfptr[206])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V207*/ meltfptr[206])))); ((meltobject_ptr_t) ( /*_.VALDATA___V207*/ meltfptr[206]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V208*/ meltfptr[207]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V207*/ meltfptr[206]); melt_dbgtrace_written_object ( /*_.VALDATA___V207*/ meltfptr[206], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V209*/ meltfptr[208])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V209*/ meltfptr[208])))); ((meltobject_ptr_t) ( /*_.VALDATA___V209*/ meltfptr[208]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V210*/ meltfptr[209]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V209*/ meltfptr[208]); melt_dbgtrace_written_object ( /*_.VALDATA___V209*/ meltfptr[208], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V211*/ meltfptr[210])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V211*/ meltfptr[210])))); ((meltobject_ptr_t) ( /*_.VALDATA___V211*/ meltfptr[210]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V212*/ meltfptr[211]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V211*/ meltfptr[210]); melt_dbgtrace_written_object ( /*_.VALDATA___V211*/ meltfptr[210], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V213*/ meltfptr[212])) == 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___V213*/ meltfptr[212])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:342:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V213*/ meltfptr[212])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V97*/ meltfptr[96]); ((meltroutine_ptr_t) /*_.VALROUT___V213*/ meltfptr[212])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-normatch.melt:342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V213*/ meltfptr[212])) == 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___V213*/ meltfptr[212])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_OR__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-normatch.melt:342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V213*/ meltfptr[212])) == 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___V213*/ meltfptr[212])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V33*/ meltfptr[32]); MELT_LOCATION ("warmelt-normatch.melt:342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V213*/ meltfptr[212])) == 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___V213*/ meltfptr[212])->tabval[4] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V213*/ meltfptr[212])) == 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___V213*/ meltfptr[212])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]); #undef meltfram__ } /*end of meltmod__warmelt_normatch__initialmeltchunk_1 */ void meltmod__warmelt_normatch__initialmeltchunk_2 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-normatch.melt:354:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V214*/ meltfptr[213])) == 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___V214*/ meltfptr[213])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:354:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V214*/ meltfptr[213])) == 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___V214*/ meltfptr[213])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-normatch.melt:354:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V214*/ meltfptr[213]); MELT_LOCATION ("warmelt-normatch.melt:342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V213*/ meltfptr[212])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_121__SCANPAT_SRCPATOR#6", NULL != ( /*_.VALROUT___V214*/ meltfptr[213])); ((meltroutine_ptr_t) /*_.VALROUT___V213*/ meltfptr[212])->tabval[6] = (melt_ptr_t) ( /*_.VALROUT___V214*/ meltfptr[213]); MELT_LOCATION ("warmelt-normatch.melt:342:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V213*/ meltfptr[212])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V149*/ meltfptr[148]); ((meltroutine_ptr_t) /*_.VALROUT___V213*/ meltfptr[212])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V149*/ meltfptr[148]); MELT_LOCATION ("warmelt-normatch.melt:342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V213*/ meltfptr[212])) == 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___V213*/ meltfptr[212])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V34*/ meltfptr[33]); MELT_LOCATION ("warmelt-normatch.melt:342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V213*/ meltfptr[212])) == 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___V213*/ meltfptr[212])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-normatch.melt:342:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V213*/ meltfptr[212]); /*putclosurout#14 */ melt_assertmsg ("putclosrout#14 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V215*/ meltfptr[214])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#14 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V213*/ meltfptr[212])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V215*/ meltfptr[214])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V213*/ meltfptr[212]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V215*/ meltfptr[214]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V216*/ meltfptr[215])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V217*/ meltfptr[216]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V216*/ meltfptr[215]); melt_dbgtrace_written_object ( /*_.VALDATA___V216*/ meltfptr[215], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V218*/ meltfptr[217])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V219*/ meltfptr[218]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V218*/ meltfptr[217]); melt_dbgtrace_written_object ( /*_.VALDATA___V218*/ meltfptr[217], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V220*/ meltfptr[219])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V221*/ meltfptr[220]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V220*/ meltfptr[219]); melt_dbgtrace_written_object ( /*_.VALDATA___V220*/ meltfptr[219], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:416:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V222*/ meltfptr[221])) == 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___V222*/ meltfptr[221])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:416:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V222*/ meltfptr[221])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V97*/ meltfptr[96]); ((meltroutine_ptr_t) /*_.VALROUT___V222*/ meltfptr[221])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-normatch.melt:416:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V222*/ meltfptr[221])) == 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___V222*/ meltfptr[221])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_AND__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normatch.melt:416:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V222*/ meltfptr[221])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V149*/ meltfptr[148]); ((meltroutine_ptr_t) /*_.VALROUT___V222*/ meltfptr[221])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V149*/ meltfptr[148]); MELT_LOCATION ("warmelt-normatch.melt:416:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V222*/ meltfptr[221]); /*putclosurout#15 */ melt_assertmsg ("putclosrout#15 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V223*/ meltfptr[222])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#15 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V222*/ meltfptr[221])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V223*/ meltfptr[222])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V222*/ meltfptr[221]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V223*/ meltfptr[222]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V224*/ meltfptr[223])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V225*/ meltfptr[224]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V224*/ meltfptr[223]); melt_dbgtrace_written_object ( /*_.VALDATA___V224*/ meltfptr[223], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V226*/ meltfptr[225])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V227*/ meltfptr[226]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V226*/ meltfptr[225]); melt_dbgtrace_written_object ( /*_.VALDATA___V226*/ meltfptr[225], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:443:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V228*/ meltfptr[227])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V229*/ meltfptr[228]); MELT_LOCATION ("warmelt-normatch.melt:443:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V228*/ meltfptr[227]); MELT_LOCATION ("warmelt-normatch.melt:443:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V228*/ meltfptr[227], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V230*/ meltfptr[229])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V230*/ meltfptr[229])))); ((meltobject_ptr_t) ( /*_.VALDATA___V230*/ meltfptr[229]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V231*/ meltfptr[230]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V230*/ meltfptr[229]); melt_dbgtrace_written_object ( /*_.VALDATA___V230*/ meltfptr[229], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V233*/ meltfptr[232]); MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231])))); ((meltobject_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231]))->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___V234*/ meltfptr[233])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #24 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V234*/ meltfptr[233])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V234*/ meltfptr[233]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V234*/ meltfptr[233]); MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231])))); ((meltobject_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V234*/ meltfptr[233]); MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V235*/ meltfptr[234])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V236*/ meltfptr[235]); MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V235*/ meltfptr[234])) == 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] = (melt_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231]); MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V235*/ meltfptr[234]); MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V235*/ meltfptr[234], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V237*/ meltfptr[236])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V238*/ meltfptr[237]); MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V237*/ meltfptr[236])) == 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] = (melt_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231]); MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V237*/ meltfptr[236]); MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V237*/ meltfptr[236], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V239*/ meltfptr[238])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V239*/ meltfptr[238])))); ((meltobject_ptr_t) ( /*_.VALDATA___V239*/ meltfptr[238]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V240*/ meltfptr[239]); MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V239*/ meltfptr[238])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V239*/ meltfptr[238])))); ((meltobject_ptr_t) ( /*_.VALDATA___V239*/ meltfptr[238]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231]); MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V239*/ meltfptr[238]); MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V239*/ meltfptr[238], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V241*/ meltfptr[240])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V242*/ meltfptr[241]); MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V241*/ meltfptr[240])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V241*/ meltfptr[240])))); ((meltobject_ptr_t) ( /*_.VALDATA___V241*/ meltfptr[240]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231]); MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V241*/ meltfptr[240]); MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V241*/ meltfptr[240], "new static instance"); /*putupl#25 */ melt_assertmsg ("putupl #25 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V243*/ meltfptr[242])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #25 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V243*/ meltfptr[242])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V243*/ meltfptr[242]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V235*/ meltfptr[234]); /*putupl#26 */ melt_assertmsg ("putupl #26 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V243*/ meltfptr[242])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #26 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V243*/ meltfptr[242])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V243*/ meltfptr[242]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V237*/ meltfptr[236]); /*putupl#27 */ melt_assertmsg ("putupl #27 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V243*/ meltfptr[242])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #27 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V243*/ meltfptr[242])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V243*/ meltfptr[242]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V239*/ meltfptr[238]); /*putupl#28 */ melt_assertmsg ("putupl #28 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V243*/ meltfptr[242])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #28 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V243*/ meltfptr[242])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V243*/ meltfptr[242]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V241*/ meltfptr[240]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V243*/ meltfptr[242]); MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231])))); ((meltobject_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V243*/ meltfptr[242]); MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V232*/ meltfptr[231]); MELT_LOCATION ("warmelt-normatch.melt:448:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V232*/ meltfptr[231], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V244*/ meltfptr[243])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V245*/ meltfptr[244]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V244*/ meltfptr[243]); melt_dbgtrace_written_object ( /*_.VALDATA___V244*/ meltfptr[243], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V246*/ meltfptr[245])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V247*/ meltfptr[246]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V246*/ meltfptr[245]); melt_dbgtrace_written_object ( /*_.VALDATA___V246*/ meltfptr[245], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V248*/ meltfptr[247])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V249*/ meltfptr[248]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V248*/ meltfptr[247]); melt_dbgtrace_written_object ( /*_.VALDATA___V248*/ meltfptr[247], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V250*/ meltfptr[249])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V251*/ meltfptr[250]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V250*/ meltfptr[249]); melt_dbgtrace_written_object ( /*_.VALDATA___V250*/ meltfptr[249], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V252*/ meltfptr[251])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V252*/ meltfptr[251])))); ((meltobject_ptr_t) ( /*_.VALDATA___V252*/ meltfptr[251]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V253*/ meltfptr[252]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V252*/ meltfptr[251]); melt_dbgtrace_written_object ( /*_.VALDATA___V252*/ meltfptr[251], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253])))); ((meltobject_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V255*/ meltfptr[254]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V254*/ meltfptr[253]); melt_dbgtrace_written_object ( /*_.VALDATA___V254*/ meltfptr[253], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V257*/ meltfptr[256]); MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255])))); ((meltobject_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]))->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___V258*/ meltfptr[257])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #29 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V258*/ meltfptr[257])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V258*/ meltfptr[257]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 5))), (0)))); /*putupl#30 */ melt_assertmsg ("putupl #30 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V258*/ meltfptr[257])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #30 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V258*/ meltfptr[257])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V258*/ meltfptr[257]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 5))), (1)))); /*putupl#31 */ melt_assertmsg ("putupl #31 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V258*/ meltfptr[257])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #31 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V258*/ meltfptr[257])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V258*/ meltfptr[257]))->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V258*/ meltfptr[257]); MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255])))); ((meltobject_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V258*/ meltfptr[257]); MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V259*/ meltfptr[258])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V259*/ meltfptr[258])))); ((meltobject_ptr_t) ( /*_.VALDATA___V259*/ meltfptr[258]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V260*/ meltfptr[259]); MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V259*/ meltfptr[258])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V259*/ meltfptr[258])))); ((meltobject_ptr_t) ( /*_.VALDATA___V259*/ meltfptr[258]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V259*/ meltfptr[258], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V261*/ meltfptr[260])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V261*/ meltfptr[260])))); ((meltobject_ptr_t) ( /*_.VALDATA___V261*/ meltfptr[260]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V262*/ meltfptr[261]); MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V261*/ meltfptr[260])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V261*/ meltfptr[260])))); ((meltobject_ptr_t) ( /*_.VALDATA___V261*/ meltfptr[260]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V261*/ meltfptr[260]); MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V261*/ meltfptr[260], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V263*/ meltfptr[262])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V263*/ meltfptr[262])))); ((meltobject_ptr_t) ( /*_.VALDATA___V263*/ meltfptr[262]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V264*/ meltfptr[263]); MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V263*/ meltfptr[262])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V263*/ meltfptr[262])))); ((meltobject_ptr_t) ( /*_.VALDATA___V263*/ meltfptr[262]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V263*/ meltfptr[262]); MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V263*/ meltfptr[262], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V265*/ meltfptr[264])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V266*/ meltfptr[265]); MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V265*/ meltfptr[264])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V265*/ meltfptr[264])))); ((meltobject_ptr_t) ( /*_.VALDATA___V265*/ meltfptr[264]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V265*/ meltfptr[264], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V268*/ meltfptr[267]); MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266])))); ((meltobject_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V267*/ meltfptr[266]); MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V267*/ meltfptr[266], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V269*/ meltfptr[268])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V270*/ meltfptr[269]); MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V269*/ meltfptr[268])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V269*/ meltfptr[268])))); ((meltobject_ptr_t) ( /*_.VALDATA___V269*/ meltfptr[268]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V269*/ meltfptr[268]); MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V269*/ meltfptr[268], "new static instance"); /*putupl#32 */ melt_assertmsg ("putupl #32 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V271*/ meltfptr[270])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #32 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V271*/ meltfptr[270])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V271*/ meltfptr[270]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 6))), (0)))); /*putupl#33 */ melt_assertmsg ("putupl #33 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V271*/ meltfptr[270])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #33 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V271*/ meltfptr[270])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V271*/ meltfptr[270]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V259*/ meltfptr[258]); /*putupl#34 */ melt_assertmsg ("putupl #34 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V271*/ meltfptr[270])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #34 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V271*/ meltfptr[270])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V271*/ meltfptr[270]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V261*/ meltfptr[260]); /*putupl#35 */ melt_assertmsg ("putupl #35 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V271*/ meltfptr[270])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #35 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V271*/ meltfptr[270])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V271*/ meltfptr[270]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V263*/ meltfptr[262]); /*putupl#36 */ melt_assertmsg ("putupl #36 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V271*/ meltfptr[270])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #36 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V271*/ meltfptr[270])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V271*/ meltfptr[270]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V265*/ meltfptr[264]); /*putupl#37 */ melt_assertmsg ("putupl #37 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V271*/ meltfptr[270])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #37 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V271*/ meltfptr[270])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V271*/ meltfptr[270]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266]); /*putupl#38 */ melt_assertmsg ("putupl #38 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V271*/ meltfptr[270])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #38 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V271*/ meltfptr[270])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V271*/ meltfptr[270]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V269*/ meltfptr[268]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V271*/ meltfptr[270]); MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255])))); ((meltobject_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V271*/ meltfptr[270]); MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V256*/ meltfptr[255]); MELT_LOCATION ("warmelt-normatch.melt:467:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V256*/ meltfptr[255], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V272*/ meltfptr[271])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V272*/ meltfptr[271])))); ((meltobject_ptr_t) ( /*_.VALDATA___V272*/ meltfptr[271]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V273*/ meltfptr[272]); #undef meltfram__ } /*end of meltmod__warmelt_normatch__initialmeltchunk_2 */ void meltmod__warmelt_normatch__initialmeltchunk_3 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*touch:VALUEDATA_*/ meltgc_touch ( /*_.VALDATA___V272*/ meltfptr[271]); melt_dbgtrace_written_object ( /*_.VALDATA___V272*/ meltfptr[271], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V274*/ meltfptr[273])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V274*/ meltfptr[273])))); ((meltobject_ptr_t) ( /*_.VALDATA___V274*/ meltfptr[273]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V275*/ meltfptr[274]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V274*/ meltfptr[273]); melt_dbgtrace_written_object ( /*_.VALDATA___V274*/ meltfptr[273], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V276*/ meltfptr[275])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V277*/ meltfptr[276]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V276*/ meltfptr[275]); melt_dbgtrace_written_object ( /*_.VALDATA___V276*/ meltfptr[275], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V278*/ meltfptr[277])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V279*/ meltfptr[278]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V278*/ meltfptr[277]); melt_dbgtrace_written_object ( /*_.VALDATA___V278*/ meltfptr[277], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V280*/ meltfptr[279])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V281*/ meltfptr[280]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V280*/ meltfptr[279]); melt_dbgtrace_written_object ( /*_.VALDATA___V280*/ meltfptr[279], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V282*/ meltfptr[281])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V282*/ meltfptr[281])))); ((meltobject_ptr_t) ( /*_.VALDATA___V282*/ meltfptr[281]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V283*/ meltfptr[282]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V282*/ meltfptr[281]); melt_dbgtrace_written_object ( /*_.VALDATA___V282*/ meltfptr[281], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V284*/ meltfptr[283])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V284*/ meltfptr[283])))); ((meltobject_ptr_t) ( /*_.VALDATA___V284*/ meltfptr[283]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V285*/ meltfptr[284]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V284*/ meltfptr[283]); melt_dbgtrace_written_object ( /*_.VALDATA___V284*/ meltfptr[283], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:482:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V286*/ meltfptr[285])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V287*/ meltfptr[286]); MELT_LOCATION ("warmelt-normatch.melt:482:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V286*/ meltfptr[285])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V286*/ meltfptr[285])))); ((meltobject_ptr_t) ( /*_.VALDATA___V286*/ meltfptr[285]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); /*putupl#39 */ melt_assertmsg ("putupl #39 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V288*/ meltfptr[287])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #39 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V288*/ meltfptr[287])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V288*/ meltfptr[287]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 5))), (0)))); /*putupl#40 */ melt_assertmsg ("putupl #40 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V288*/ meltfptr[287])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #40 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) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 5))), (1)))); /*putupl#41 */ melt_assertmsg ("putupl #41 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V288*/ meltfptr[287])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #41 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) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]); /*putupl#42 */ melt_assertmsg ("putupl #42 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V288*/ meltfptr[287])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #42 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___V256*/ meltfptr[255]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V288*/ meltfptr[287]); MELT_LOCATION ("warmelt-normatch.melt:482:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V286*/ meltfptr[285])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V286*/ meltfptr[285])))); ((meltobject_ptr_t) ( /*_.VALDATA___V286*/ meltfptr[285]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V288*/ meltfptr[287]); MELT_LOCATION ("warmelt-normatch.melt:482:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V289*/ meltfptr[288])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V290*/ meltfptr[289]); MELT_LOCATION ("warmelt-normatch.melt:482:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V289*/ meltfptr[288])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V289*/ meltfptr[288])))); ((meltobject_ptr_t) ( /*_.VALDATA___V289*/ meltfptr[288]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V286*/ meltfptr[285]); MELT_LOCATION ("warmelt-normatch.melt:482:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V289*/ meltfptr[288]); MELT_LOCATION ("warmelt-normatch.melt:482:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V289*/ meltfptr[288], "new static instance"); /*putupl#43 */ melt_assertmsg ("putupl #43 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V291*/ meltfptr[290])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #43 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V291*/ meltfptr[290])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V291*/ meltfptr[290]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 6))), (0)))); /*putupl#44 */ melt_assertmsg ("putupl #44 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V291*/ meltfptr[290])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #44 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V291*/ meltfptr[290])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V291*/ meltfptr[290]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V259*/ meltfptr[258]); /*putupl#45 */ melt_assertmsg ("putupl #45 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V291*/ meltfptr[290])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #45 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V291*/ meltfptr[290])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V291*/ meltfptr[290]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V261*/ meltfptr[260]); /*putupl#46 */ melt_assertmsg ("putupl #46 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V291*/ meltfptr[290])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #46 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V291*/ meltfptr[290])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V291*/ meltfptr[290]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V263*/ meltfptr[262]); /*putupl#47 */ melt_assertmsg ("putupl #47 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V291*/ meltfptr[290])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #47 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V291*/ meltfptr[290])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V291*/ meltfptr[290]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V265*/ meltfptr[264]); /*putupl#48 */ melt_assertmsg ("putupl #48 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V291*/ meltfptr[290])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #48 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V291*/ meltfptr[290])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V291*/ meltfptr[290]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266]); /*putupl#49 */ melt_assertmsg ("putupl #49 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V291*/ meltfptr[290])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #49 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V291*/ meltfptr[290])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V291*/ meltfptr[290]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V269*/ meltfptr[268]); /*putupl#50 */ melt_assertmsg ("putupl #50 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V291*/ meltfptr[290])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #50 checkoff", (7 >= 0 && 7 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V291*/ meltfptr[290])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V291*/ meltfptr[290]))->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V289*/ meltfptr[288]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V291*/ meltfptr[290]); MELT_LOCATION ("warmelt-normatch.melt:482:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V286*/ meltfptr[285])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V286*/ meltfptr[285])))); ((meltobject_ptr_t) ( /*_.VALDATA___V286*/ meltfptr[285]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V291*/ meltfptr[290]); MELT_LOCATION ("warmelt-normatch.melt:482:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V286*/ meltfptr[285]); MELT_LOCATION ("warmelt-normatch.melt:482:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V286*/ meltfptr[285], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V292*/ meltfptr[291])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V292*/ meltfptr[291])))); ((meltobject_ptr_t) ( /*_.VALDATA___V292*/ meltfptr[291]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V293*/ meltfptr[292]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V292*/ meltfptr[291]); melt_dbgtrace_written_object ( /*_.VALDATA___V292*/ meltfptr[291], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V294*/ meltfptr[293])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V294*/ meltfptr[293])))); ((meltobject_ptr_t) ( /*_.VALDATA___V294*/ meltfptr[293]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V295*/ meltfptr[294]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V294*/ meltfptr[293]); melt_dbgtrace_written_object ( /*_.VALDATA___V294*/ meltfptr[293], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:488:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V296*/ meltfptr[295])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V297*/ meltfptr[296]); MELT_LOCATION ("warmelt-normatch.melt:488:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V296*/ meltfptr[295])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V296*/ meltfptr[295])))); ((meltobject_ptr_t) ( /*_.VALDATA___V296*/ meltfptr[295]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); /*putupl#51 */ melt_assertmsg ("putupl #51 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V298*/ meltfptr[297])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #51 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V298*/ meltfptr[297])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V298*/ meltfptr[297]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 5))), (0)))); /*putupl#52 */ melt_assertmsg ("putupl #52 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V298*/ meltfptr[297])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #52 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) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 5))), (1)))); /*putupl#53 */ melt_assertmsg ("putupl #53 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V298*/ meltfptr[297])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #53 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) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]); /*putupl#54 */ melt_assertmsg ("putupl #54 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V298*/ meltfptr[297])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #54 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___V256*/ meltfptr[255]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V298*/ meltfptr[297]); MELT_LOCATION ("warmelt-normatch.melt:488:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V296*/ meltfptr[295])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V296*/ meltfptr[295])))); ((meltobject_ptr_t) ( /*_.VALDATA___V296*/ meltfptr[295]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V298*/ meltfptr[297]); MELT_LOCATION ("warmelt-normatch.melt:488:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V299*/ meltfptr[298])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V300*/ meltfptr[299]); MELT_LOCATION ("warmelt-normatch.melt:488:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V299*/ meltfptr[298])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V299*/ meltfptr[298])))); ((meltobject_ptr_t) ( /*_.VALDATA___V299*/ meltfptr[298]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V296*/ meltfptr[295]); MELT_LOCATION ("warmelt-normatch.melt:488:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V299*/ meltfptr[298]); MELT_LOCATION ("warmelt-normatch.melt:488:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V299*/ meltfptr[298], "new static instance"); /*putupl#55 */ melt_assertmsg ("putupl #55 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V301*/ meltfptr[300])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #55 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V301*/ meltfptr[300])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V301*/ meltfptr[300]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 6))), (0)))); /*putupl#56 */ melt_assertmsg ("putupl #56 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V301*/ meltfptr[300])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #56 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V301*/ meltfptr[300])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V301*/ meltfptr[300]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V259*/ meltfptr[258]); /*putupl#57 */ melt_assertmsg ("putupl #57 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V301*/ meltfptr[300])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #57 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V301*/ meltfptr[300])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V301*/ meltfptr[300]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V261*/ meltfptr[260]); /*putupl#58 */ melt_assertmsg ("putupl #58 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V301*/ meltfptr[300])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #58 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V301*/ meltfptr[300])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V301*/ meltfptr[300]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V263*/ meltfptr[262]); /*putupl#59 */ melt_assertmsg ("putupl #59 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V301*/ meltfptr[300])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #59 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V301*/ meltfptr[300])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V301*/ meltfptr[300]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V265*/ meltfptr[264]); /*putupl#60 */ melt_assertmsg ("putupl #60 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V301*/ meltfptr[300])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #60 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V301*/ meltfptr[300])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V301*/ meltfptr[300]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266]); /*putupl#61 */ melt_assertmsg ("putupl #61 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V301*/ meltfptr[300])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #61 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V301*/ meltfptr[300])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V301*/ meltfptr[300]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V269*/ meltfptr[268]); /*putupl#62 */ melt_assertmsg ("putupl #62 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V301*/ meltfptr[300])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #62 checkoff", (7 >= 0 && 7 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V301*/ meltfptr[300])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V301*/ meltfptr[300]))->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V299*/ meltfptr[298]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V301*/ meltfptr[300]); MELT_LOCATION ("warmelt-normatch.melt:488:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V296*/ meltfptr[295])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V296*/ meltfptr[295])))); ((meltobject_ptr_t) ( /*_.VALDATA___V296*/ meltfptr[295]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V301*/ meltfptr[300]); MELT_LOCATION ("warmelt-normatch.melt:488:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V296*/ meltfptr[295]); MELT_LOCATION ("warmelt-normatch.melt:488:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V296*/ meltfptr[295], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V302*/ meltfptr[301])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V302*/ meltfptr[301])))); ((meltobject_ptr_t) ( /*_.VALDATA___V302*/ meltfptr[301]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V303*/ meltfptr[302]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V302*/ meltfptr[301]); melt_dbgtrace_written_object ( /*_.VALDATA___V302*/ meltfptr[301], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V304*/ meltfptr[303])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V305*/ meltfptr[304]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V304*/ meltfptr[303]); melt_dbgtrace_written_object ( /*_.VALDATA___V304*/ meltfptr[303], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:494:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V306*/ meltfptr[305])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V307*/ meltfptr[306]); MELT_LOCATION ("warmelt-normatch.melt:494:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V306*/ meltfptr[305])) == 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] = (melt_ptr_t) ( /*_.VALDATA___V296*/ meltfptr[295]); /*putupl#63 */ melt_assertmsg ("putupl #63 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V308*/ meltfptr[307])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #63 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V308*/ meltfptr[307])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V308*/ meltfptr[307]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 5))), (0)))); /*putupl#64 */ melt_assertmsg ("putupl #64 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V308*/ meltfptr[307])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #64 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V308*/ meltfptr[307])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V308*/ meltfptr[307]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 5))), (1)))); /*putupl#65 */ melt_assertmsg ("putupl #65 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V308*/ meltfptr[307])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #65 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) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]); /*putupl#66 */ melt_assertmsg ("putupl #66 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V308*/ meltfptr[307])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #66 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___V256*/ meltfptr[255]); /*putupl#67 */ melt_assertmsg ("putupl #67 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V308*/ meltfptr[307])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #67 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___V296*/ meltfptr[295]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V308*/ meltfptr[307]); MELT_LOCATION ("warmelt-normatch.melt:494:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V306*/ meltfptr[305])) == 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] = (melt_ptr_t) ( /*_.VALTUP___V308*/ meltfptr[307]); /*putupl#68 */ melt_assertmsg ("putupl #68 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V309*/ meltfptr[308])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #68 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) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 6))), (0)))); /*putupl#69 */ melt_assertmsg ("putupl #69 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V309*/ meltfptr[308])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #69 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___V259*/ meltfptr[258]); /*putupl#70 */ melt_assertmsg ("putupl #70 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V309*/ meltfptr[308])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #70 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___V261*/ meltfptr[260]); /*putupl#71 */ melt_assertmsg ("putupl #71 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V309*/ meltfptr[308])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #71 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___V263*/ meltfptr[262]); /*putupl#72 */ melt_assertmsg ("putupl #72 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V309*/ meltfptr[308])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #72 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___V265*/ meltfptr[264]); /*putupl#73 */ melt_assertmsg ("putupl #73 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V309*/ meltfptr[308])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #73 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V309*/ meltfptr[308])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V309*/ meltfptr[308]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266]); /*putupl#74 */ melt_assertmsg ("putupl #74 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V309*/ meltfptr[308])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #74 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V309*/ meltfptr[308])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V309*/ meltfptr[308]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V269*/ meltfptr[268]); /*putupl#75 */ melt_assertmsg ("putupl #75 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V309*/ meltfptr[308])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #75 checkoff", (7 >= 0 && 7 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V309*/ meltfptr[308])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V309*/ meltfptr[308]))->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V299*/ meltfptr[298]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V309*/ meltfptr[308]); MELT_LOCATION ("warmelt-normatch.melt:494:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V306*/ meltfptr[305])) == 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] = (melt_ptr_t) ( /*_.VALTUP___V309*/ meltfptr[308]); MELT_LOCATION ("warmelt-normatch.melt:494:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V306*/ meltfptr[305]); MELT_LOCATION ("warmelt-normatch.melt:494:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V306*/ meltfptr[305], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V310*/ meltfptr[309])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V311*/ meltfptr[310]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V310*/ meltfptr[309]); melt_dbgtrace_written_object ( /*_.VALDATA___V310*/ meltfptr[309], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:500:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V312*/ meltfptr[311])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V313*/ meltfptr[312]); MELT_LOCATION ("warmelt-normatch.melt:500:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V312*/ meltfptr[311])) == 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] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); /*putupl#76 */ melt_assertmsg ("putupl #76 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V314*/ meltfptr[313])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #76 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V314*/ meltfptr[313])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V314*/ meltfptr[313]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 5))), (0)))); /*putupl#77 */ melt_assertmsg ("putupl #77 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V314*/ meltfptr[313])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #77 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V314*/ meltfptr[313])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V314*/ meltfptr[313]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 5))), (1)))); /*putupl#78 */ melt_assertmsg ("putupl #78 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V314*/ meltfptr[313])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #78 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) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]); /*putupl#79 */ melt_assertmsg ("putupl #79 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V314*/ meltfptr[313])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #79 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___V256*/ meltfptr[255]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V314*/ meltfptr[313]); MELT_LOCATION ("warmelt-normatch.melt:500:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V312*/ meltfptr[311])) == 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] = (melt_ptr_t) ( /*_.VALTUP___V314*/ meltfptr[313]); MELT_LOCATION ("warmelt-normatch.melt:500:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V315*/ meltfptr[314])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V315*/ meltfptr[314])))); ((meltobject_ptr_t) ( /*_.VALDATA___V315*/ meltfptr[314]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V316*/ meltfptr[315]); MELT_LOCATION ("warmelt-normatch.melt:500:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V315*/ meltfptr[314])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V315*/ meltfptr[314])))); ((meltobject_ptr_t) ( /*_.VALDATA___V315*/ meltfptr[314]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V312*/ meltfptr[311]); MELT_LOCATION ("warmelt-normatch.melt:500:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V315*/ meltfptr[314]); MELT_LOCATION ("warmelt-normatch.melt:500:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V315*/ meltfptr[314], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:500:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V317*/ meltfptr[316])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V318*/ meltfptr[317]); MELT_LOCATION ("warmelt-normatch.melt:500:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V317*/ meltfptr[316])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V317*/ meltfptr[316])))); ((meltobject_ptr_t) ( /*_.VALDATA___V317*/ meltfptr[316]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V312*/ meltfptr[311]); MELT_LOCATION ("warmelt-normatch.melt:500:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V317*/ meltfptr[316]); MELT_LOCATION ("warmelt-normatch.melt:500:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V317*/ meltfptr[316], "new static instance"); /*putupl#80 */ melt_assertmsg ("putupl #80 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V319*/ meltfptr[318])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #80 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V319*/ meltfptr[318])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V319*/ meltfptr[318]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 6))), (0)))); /*putupl#81 */ melt_assertmsg ("putupl #81 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V319*/ meltfptr[318])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #81 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V319*/ meltfptr[318])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V319*/ meltfptr[318]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V259*/ meltfptr[258]); /*putupl#82 */ melt_assertmsg ("putupl #82 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V319*/ meltfptr[318])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #82 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V319*/ meltfptr[318])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V319*/ meltfptr[318]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V261*/ meltfptr[260]); /*putupl#83 */ melt_assertmsg ("putupl #83 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V319*/ meltfptr[318])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #83 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V319*/ meltfptr[318])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V319*/ meltfptr[318]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V263*/ meltfptr[262]); /*putupl#84 */ melt_assertmsg ("putupl #84 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V319*/ meltfptr[318])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #84 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V319*/ meltfptr[318])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V319*/ meltfptr[318]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V265*/ meltfptr[264]); /*putupl#85 */ melt_assertmsg ("putupl #85 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V319*/ meltfptr[318])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #85 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V319*/ meltfptr[318])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V319*/ meltfptr[318]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266]); /*putupl#86 */ melt_assertmsg ("putupl #86 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V319*/ meltfptr[318])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #86 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V319*/ meltfptr[318])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V319*/ meltfptr[318]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V269*/ meltfptr[268]); /*putupl#87 */ melt_assertmsg ("putupl #87 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V319*/ meltfptr[318])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #87 checkoff", (7 >= 0 && 7 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V319*/ meltfptr[318])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V319*/ meltfptr[318]))->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V315*/ meltfptr[314]); #undef meltfram__ } /*end of meltmod__warmelt_normatch__initialmeltchunk_3 */ void meltmod__warmelt_normatch__initialmeltchunk_4 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*putupl#88*/ melt_assertmsg ("putupl #88 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V319*/ meltfptr[318])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #88 checkoff", (8 >= 0 && 8 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V319*/ meltfptr[318])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V319*/ meltfptr[318]))->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V317*/ meltfptr[316]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V319*/ meltfptr[318]); MELT_LOCATION ("warmelt-normatch.melt:500:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V312*/ meltfptr[311])) == 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] = (melt_ptr_t) ( /*_.VALTUP___V319*/ meltfptr[318]); MELT_LOCATION ("warmelt-normatch.melt:500:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V312*/ meltfptr[311]); MELT_LOCATION ("warmelt-normatch.melt:500:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V312*/ meltfptr[311], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V320*/ meltfptr[319])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V320*/ meltfptr[319])))); ((meltobject_ptr_t) ( /*_.VALDATA___V320*/ meltfptr[319]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V321*/ meltfptr[320]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V320*/ meltfptr[319]); melt_dbgtrace_written_object ( /*_.VALDATA___V320*/ meltfptr[319], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V322*/ meltfptr[321])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V323*/ meltfptr[322]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V322*/ meltfptr[321]); melt_dbgtrace_written_object ( /*_.VALDATA___V322*/ meltfptr[321], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V324*/ meltfptr[323])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V325*/ meltfptr[324]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V324*/ meltfptr[323]); melt_dbgtrace_written_object ( /*_.VALDATA___V324*/ meltfptr[323], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:508:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V326*/ meltfptr[325])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V326*/ meltfptr[325])))); ((meltobject_ptr_t) ( /*_.VALDATA___V326*/ meltfptr[325]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V327*/ meltfptr[326]); MELT_LOCATION ("warmelt-normatch.melt:508:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V326*/ meltfptr[325])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V326*/ meltfptr[325])))); ((meltobject_ptr_t) ( /*_.VALDATA___V326*/ meltfptr[325]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); /*putupl#89 */ melt_assertmsg ("putupl #89 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V328*/ meltfptr[327])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #89 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V328*/ meltfptr[327])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V328*/ meltfptr[327]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 5))), (0)))); /*putupl#90 */ melt_assertmsg ("putupl #90 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V328*/ meltfptr[327])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #90 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V328*/ meltfptr[327])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V328*/ meltfptr[327]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 5))), (1)))); /*putupl#91 */ melt_assertmsg ("putupl #91 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V328*/ meltfptr[327])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #91 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V328*/ meltfptr[327])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V328*/ meltfptr[327]))->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___V328*/ meltfptr[327])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #92 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V328*/ meltfptr[327])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V328*/ meltfptr[327]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V328*/ meltfptr[327]); MELT_LOCATION ("warmelt-normatch.melt:508:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V326*/ meltfptr[325])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V326*/ meltfptr[325])))); ((meltobject_ptr_t) ( /*_.VALDATA___V326*/ meltfptr[325]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V328*/ meltfptr[327]); /*putupl#93 */ melt_assertmsg ("putupl #93 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V329*/ meltfptr[328])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #93 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) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 6))), (0)))); /*putupl#94 */ melt_assertmsg ("putupl #94 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V329*/ meltfptr[328])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #94 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___V259*/ meltfptr[258]); /*putupl#95 */ melt_assertmsg ("putupl #95 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V329*/ meltfptr[328])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #95 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V329*/ meltfptr[328])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V329*/ meltfptr[328]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V261*/ meltfptr[260]); /*putupl#96 */ melt_assertmsg ("putupl #96 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V329*/ meltfptr[328])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #96 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V329*/ meltfptr[328])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V329*/ meltfptr[328]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V263*/ meltfptr[262]); /*putupl#97 */ melt_assertmsg ("putupl #97 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V329*/ meltfptr[328])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #97 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V329*/ meltfptr[328])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V329*/ meltfptr[328]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V265*/ meltfptr[264]); /*putupl#98 */ melt_assertmsg ("putupl #98 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V329*/ meltfptr[328])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #98 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V329*/ meltfptr[328])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V329*/ meltfptr[328]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266]); /*putupl#99 */ melt_assertmsg ("putupl #99 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V329*/ meltfptr[328])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #99 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V329*/ meltfptr[328])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V329*/ meltfptr[328]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V269*/ meltfptr[268]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V329*/ meltfptr[328]); MELT_LOCATION ("warmelt-normatch.melt:508:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V326*/ meltfptr[325])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V326*/ meltfptr[325])))); ((meltobject_ptr_t) ( /*_.VALDATA___V326*/ meltfptr[325]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V329*/ meltfptr[328]); MELT_LOCATION ("warmelt-normatch.melt:508:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V326*/ meltfptr[325]); MELT_LOCATION ("warmelt-normatch.melt:508:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V326*/ meltfptr[325], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V330*/ meltfptr[329])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V331*/ meltfptr[330]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V330*/ meltfptr[329]); melt_dbgtrace_written_object ( /*_.VALDATA___V330*/ meltfptr[329], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:516:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V332*/ meltfptr[331])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V333*/ meltfptr[332]); MELT_LOCATION ("warmelt-normatch.melt:516:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V332*/ meltfptr[331])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V332*/ meltfptr[331])))); ((meltobject_ptr_t) ( /*_.VALDATA___V332*/ meltfptr[331]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V326*/ meltfptr[325]); /*putupl#100 */ melt_assertmsg ("putupl #100 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V334*/ meltfptr[333])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #100 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V334*/ meltfptr[333])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V334*/ meltfptr[333]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 5))), (0)))); /*putupl#101 */ melt_assertmsg ("putupl #101 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V334*/ meltfptr[333])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #101 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V334*/ meltfptr[333])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V334*/ meltfptr[333]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 5))), (1)))); /*putupl#102 */ melt_assertmsg ("putupl #102 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V334*/ meltfptr[333])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #102 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V334*/ meltfptr[333])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V334*/ meltfptr[333]))->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___V334*/ meltfptr[333])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #103 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V334*/ meltfptr[333])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V334*/ meltfptr[333]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); /*putupl#104 */ melt_assertmsg ("putupl #104 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V334*/ meltfptr[333])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #104 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V334*/ meltfptr[333])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V334*/ meltfptr[333]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V326*/ meltfptr[325]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V334*/ meltfptr[333]); MELT_LOCATION ("warmelt-normatch.melt:516:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V332*/ meltfptr[331])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V332*/ meltfptr[331])))); ((meltobject_ptr_t) ( /*_.VALDATA___V332*/ meltfptr[331]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V334*/ meltfptr[333]); MELT_LOCATION ("warmelt-normatch.melt:516:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V335*/ meltfptr[334])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V335*/ meltfptr[334])))); ((meltobject_ptr_t) ( /*_.VALDATA___V335*/ meltfptr[334]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V336*/ meltfptr[335]); MELT_LOCATION ("warmelt-normatch.melt:516:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V335*/ meltfptr[334])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V335*/ meltfptr[334])))); ((meltobject_ptr_t) ( /*_.VALDATA___V335*/ meltfptr[334]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V332*/ meltfptr[331]); MELT_LOCATION ("warmelt-normatch.melt:516:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V335*/ meltfptr[334]); MELT_LOCATION ("warmelt-normatch.melt:516:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V335*/ meltfptr[334], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:516:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V337*/ meltfptr[336])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V338*/ meltfptr[337]); MELT_LOCATION ("warmelt-normatch.melt:516:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V337*/ meltfptr[336])) == 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] = (melt_ptr_t) ( /*_.VALDATA___V332*/ meltfptr[331]); MELT_LOCATION ("warmelt-normatch.melt:516:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V337*/ meltfptr[336]); MELT_LOCATION ("warmelt-normatch.melt:516:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V337*/ meltfptr[336], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:516:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V339*/ meltfptr[338])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V340*/ meltfptr[339]); MELT_LOCATION ("warmelt-normatch.melt:516:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V339*/ meltfptr[338])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V339*/ meltfptr[338])))); ((meltobject_ptr_t) ( /*_.VALDATA___V339*/ meltfptr[338]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V332*/ meltfptr[331]); MELT_LOCATION ("warmelt-normatch.melt:516:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V339*/ meltfptr[338]); MELT_LOCATION ("warmelt-normatch.melt:516:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V339*/ meltfptr[338], "new static instance"); /*putupl#105 */ melt_assertmsg ("putupl #105 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #105 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 6))), (0)))); /*putupl#106 */ melt_assertmsg ("putupl #106 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #106 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V259*/ meltfptr[258]); /*putupl#107 */ melt_assertmsg ("putupl #107 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #107 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V261*/ meltfptr[260]); /*putupl#108 */ melt_assertmsg ("putupl #108 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #108 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V263*/ meltfptr[262]); /*putupl#109 */ melt_assertmsg ("putupl #109 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #109 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V265*/ meltfptr[264]); /*putupl#110 */ melt_assertmsg ("putupl #110 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #110 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266]); /*putupl#111 */ melt_assertmsg ("putupl #111 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #111 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V269*/ meltfptr[268]); /*putupl#112 */ melt_assertmsg ("putupl #112 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #112 checkoff", (7 >= 0 && 7 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340]))->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V335*/ meltfptr[334]); /*putupl#113 */ melt_assertmsg ("putupl #113 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #113 checkoff", (8 >= 0 && 8 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340]))->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V337*/ meltfptr[336]); /*putupl#114 */ melt_assertmsg ("putupl #114 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #114 checkoff", (9 >= 0 && 9 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340]))->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V339*/ meltfptr[338]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V341*/ meltfptr[340]); MELT_LOCATION ("warmelt-normatch.melt:516:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V332*/ meltfptr[331])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V332*/ meltfptr[331])))); ((meltobject_ptr_t) ( /*_.VALDATA___V332*/ meltfptr[331]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340]); MELT_LOCATION ("warmelt-normatch.melt:516:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V332*/ meltfptr[331]); MELT_LOCATION ("warmelt-normatch.melt:516:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V332*/ meltfptr[331], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V342*/ meltfptr[341])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V343*/ meltfptr[342]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V342*/ meltfptr[341]); melt_dbgtrace_written_object ( /*_.VALDATA___V342*/ meltfptr[341], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V345*/ meltfptr[344]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V344*/ meltfptr[343]); melt_dbgtrace_written_object ( /*_.VALDATA___V344*/ meltfptr[343], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V346*/ meltfptr[345])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V346*/ meltfptr[345])))); ((meltobject_ptr_t) ( /*_.VALDATA___V346*/ meltfptr[345]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V347*/ meltfptr[346]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V346*/ meltfptr[345]); melt_dbgtrace_written_object ( /*_.VALDATA___V346*/ meltfptr[345], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V348*/ meltfptr[347])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V348*/ meltfptr[347])))); ((meltobject_ptr_t) ( /*_.VALDATA___V348*/ meltfptr[347]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V349*/ meltfptr[348]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V348*/ meltfptr[347]); melt_dbgtrace_written_object ( /*_.VALDATA___V348*/ meltfptr[347], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:524:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V351*/ meltfptr[350]); MELT_LOCATION ("warmelt-normatch.melt:524:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349])))); ((meltobject_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V326*/ meltfptr[325]); /*putupl#115 */ melt_assertmsg ("putupl #115 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V352*/ meltfptr[351])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #115 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V352*/ meltfptr[351])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V352*/ meltfptr[351]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 5))), (0)))); /*putupl#116 */ melt_assertmsg ("putupl #116 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V352*/ meltfptr[351])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #116 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) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 5))), (1)))); /*putupl#117 */ melt_assertmsg ("putupl #117 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V352*/ meltfptr[351])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #117 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) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]); /*putupl#118 */ melt_assertmsg ("putupl #118 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V352*/ meltfptr[351])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #118 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___V256*/ meltfptr[255]); /*putupl#119 */ melt_assertmsg ("putupl #119 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V352*/ meltfptr[351])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #119 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___V326*/ meltfptr[325]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V352*/ meltfptr[351]); MELT_LOCATION ("warmelt-normatch.melt:524:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349])))); ((meltobject_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V352*/ meltfptr[351]); MELT_LOCATION ("warmelt-normatch.melt:524:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V353*/ meltfptr[352])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V354*/ meltfptr[353]); MELT_LOCATION ("warmelt-normatch.melt:524:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V353*/ meltfptr[352])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V353*/ meltfptr[352])))); ((meltobject_ptr_t) ( /*_.VALDATA___V353*/ meltfptr[352]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]); MELT_LOCATION ("warmelt-normatch.melt:524:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V353*/ meltfptr[352]); MELT_LOCATION ("warmelt-normatch.melt:524:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V353*/ meltfptr[352], "new static instance"); /*putupl#120 */ melt_assertmsg ("putupl #120 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V355*/ meltfptr[354])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #120 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V355*/ meltfptr[354])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V355*/ meltfptr[354]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 6))), (0)))); /*putupl#121 */ melt_assertmsg ("putupl #121 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V355*/ meltfptr[354])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #121 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V355*/ meltfptr[354])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V355*/ meltfptr[354]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V259*/ meltfptr[258]); /*putupl#122 */ melt_assertmsg ("putupl #122 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V355*/ meltfptr[354])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #122 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V355*/ meltfptr[354])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V355*/ meltfptr[354]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V261*/ meltfptr[260]); /*putupl#123 */ melt_assertmsg ("putupl #123 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V355*/ meltfptr[354])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #123 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V355*/ meltfptr[354])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V355*/ meltfptr[354]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V263*/ meltfptr[262]); /*putupl#124 */ melt_assertmsg ("putupl #124 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V355*/ meltfptr[354])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #124 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V355*/ meltfptr[354])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V355*/ meltfptr[354]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V265*/ meltfptr[264]); /*putupl#125 */ melt_assertmsg ("putupl #125 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V355*/ meltfptr[354])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #125 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V355*/ meltfptr[354])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V355*/ meltfptr[354]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266]); /*putupl#126 */ melt_assertmsg ("putupl #126 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V355*/ meltfptr[354])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #126 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V355*/ meltfptr[354])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V355*/ meltfptr[354]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V269*/ meltfptr[268]); /*putupl#127 */ melt_assertmsg ("putupl #127 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V355*/ meltfptr[354])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #127 checkoff", (7 >= 0 && 7 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V355*/ meltfptr[354])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V355*/ meltfptr[354]))->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V353*/ meltfptr[352]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V355*/ meltfptr[354]); MELT_LOCATION ("warmelt-normatch.melt:524:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349])))); ((meltobject_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V355*/ meltfptr[354]); MELT_LOCATION ("warmelt-normatch.melt:524:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V350*/ meltfptr[349]); MELT_LOCATION ("warmelt-normatch.melt:524:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V350*/ meltfptr[349], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V356*/ meltfptr[355])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V356*/ meltfptr[355])))); ((meltobject_ptr_t) ( /*_.VALDATA___V356*/ meltfptr[355]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V357*/ meltfptr[356]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V356*/ meltfptr[355]); melt_dbgtrace_written_object ( /*_.VALDATA___V356*/ meltfptr[355], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V358*/ meltfptr[357])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V358*/ meltfptr[357])))); ((meltobject_ptr_t) ( /*_.VALDATA___V358*/ meltfptr[357]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V359*/ meltfptr[358]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V358*/ meltfptr[357]); melt_dbgtrace_written_object ( /*_.VALDATA___V358*/ meltfptr[357], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V360*/ meltfptr[359])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V361*/ meltfptr[360]); MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V360*/ meltfptr[359])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V360*/ meltfptr[359])))); ((meltobject_ptr_t) ( /*_.VALDATA___V360*/ meltfptr[359]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V326*/ meltfptr[325]); /*putupl#128 */ melt_assertmsg ("putupl #128 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V362*/ meltfptr[361])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #128 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V362*/ meltfptr[361])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V362*/ meltfptr[361]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 5))), (0)))); /*putupl#129 */ melt_assertmsg ("putupl #129 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V362*/ meltfptr[361])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #129 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V362*/ meltfptr[361])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V362*/ meltfptr[361]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 5))), (1)))); /*putupl#130 */ melt_assertmsg ("putupl #130 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V362*/ meltfptr[361])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #130 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V362*/ meltfptr[361])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V362*/ meltfptr[361]))->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___V362*/ meltfptr[361])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #131 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V362*/ meltfptr[361])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V362*/ meltfptr[361]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); /*putupl#132 */ melt_assertmsg ("putupl #132 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V362*/ meltfptr[361])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #132 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V362*/ meltfptr[361])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V362*/ meltfptr[361]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V326*/ meltfptr[325]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V362*/ meltfptr[361]); MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V360*/ meltfptr[359])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V360*/ meltfptr[359])))); ((meltobject_ptr_t) ( /*_.VALDATA___V360*/ meltfptr[359]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V362*/ meltfptr[361]); MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V363*/ meltfptr[362])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V363*/ meltfptr[362])))); ((meltobject_ptr_t) ( /*_.VALDATA___V363*/ meltfptr[362]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V364*/ meltfptr[363]); MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V363*/ meltfptr[362])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V363*/ meltfptr[362])))); ((meltobject_ptr_t) ( /*_.VALDATA___V363*/ meltfptr[362]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V360*/ meltfptr[359]); MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V363*/ meltfptr[362]); MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V363*/ meltfptr[362], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V365*/ meltfptr[364])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V365*/ meltfptr[364])))); ((meltobject_ptr_t) ( /*_.VALDATA___V365*/ meltfptr[364]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V366*/ meltfptr[365]); #undef meltfram__ } /*end of meltmod__warmelt_normatch__initialmeltchunk_4 */ void meltmod__warmelt_normatch__initialmeltchunk_5 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V365*/ meltfptr[364])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V365*/ meltfptr[364])))); ((meltobject_ptr_t) ( /*_.VALDATA___V365*/ meltfptr[364]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V360*/ meltfptr[359]); MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V365*/ meltfptr[364]); MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V365*/ meltfptr[364], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V367*/ meltfptr[366])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V368*/ meltfptr[367]); MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V367*/ meltfptr[366])) == 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] = (melt_ptr_t) ( /*_.VALDATA___V360*/ meltfptr[359]); MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V367*/ meltfptr[366]); MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V367*/ meltfptr[366], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V369*/ meltfptr[368])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V370*/ meltfptr[369]); MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V369*/ meltfptr[368])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V369*/ meltfptr[368])))); ((meltobject_ptr_t) ( /*_.VALDATA___V369*/ meltfptr[368]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V360*/ meltfptr[359]); MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V369*/ meltfptr[368]); MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V369*/ meltfptr[368], "new static instance"); /*putupl#133 */ melt_assertmsg ("putupl #133 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V371*/ meltfptr[370])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #133 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V371*/ meltfptr[370])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V371*/ meltfptr[370]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 6))), (0)))); /*putupl#134 */ melt_assertmsg ("putupl #134 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V371*/ meltfptr[370])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #134 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V371*/ meltfptr[370])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V371*/ meltfptr[370]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V259*/ meltfptr[258]); /*putupl#135 */ melt_assertmsg ("putupl #135 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V371*/ meltfptr[370])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #135 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V371*/ meltfptr[370])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V371*/ meltfptr[370]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V261*/ meltfptr[260]); /*putupl#136 */ melt_assertmsg ("putupl #136 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V371*/ meltfptr[370])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #136 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V371*/ meltfptr[370])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V371*/ meltfptr[370]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V263*/ meltfptr[262]); /*putupl#137 */ melt_assertmsg ("putupl #137 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V371*/ meltfptr[370])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #137 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V371*/ meltfptr[370])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V371*/ meltfptr[370]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V265*/ meltfptr[264]); /*putupl#138 */ melt_assertmsg ("putupl #138 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V371*/ meltfptr[370])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #138 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V371*/ meltfptr[370])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V371*/ meltfptr[370]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266]); /*putupl#139 */ melt_assertmsg ("putupl #139 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V371*/ meltfptr[370])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #139 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V371*/ meltfptr[370])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V371*/ meltfptr[370]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V269*/ meltfptr[268]); /*putupl#140 */ melt_assertmsg ("putupl #140 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V371*/ meltfptr[370])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #140 checkoff", (7 >= 0 && 7 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V371*/ meltfptr[370])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V371*/ meltfptr[370]))->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V363*/ meltfptr[362]); /*putupl#141 */ melt_assertmsg ("putupl #141 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V371*/ meltfptr[370])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #141 checkoff", (8 >= 0 && 8 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V371*/ meltfptr[370])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V371*/ meltfptr[370]))->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V365*/ meltfptr[364]); /*putupl#142 */ melt_assertmsg ("putupl #142 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V371*/ meltfptr[370])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #142 checkoff", (9 >= 0 && 9 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V371*/ meltfptr[370])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V371*/ meltfptr[370]))->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V367*/ meltfptr[366]); /*putupl#143 */ melt_assertmsg ("putupl #143 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V371*/ meltfptr[370])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #143 checkoff", (10 >= 0 && 10 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V371*/ meltfptr[370])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V371*/ meltfptr[370]))->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V369*/ meltfptr[368]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V371*/ meltfptr[370]); MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V360*/ meltfptr[359])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V360*/ meltfptr[359])))); ((meltobject_ptr_t) ( /*_.VALDATA___V360*/ meltfptr[359]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V371*/ meltfptr[370]); MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V360*/ meltfptr[359]); MELT_LOCATION ("warmelt-normatch.melt:530:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V360*/ meltfptr[359], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V372*/ meltfptr[371])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V373*/ meltfptr[372]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V372*/ meltfptr[371]); melt_dbgtrace_written_object ( /*_.VALDATA___V372*/ meltfptr[371], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V374*/ meltfptr[373])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V375*/ meltfptr[374]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V374*/ meltfptr[373]); melt_dbgtrace_written_object ( /*_.VALDATA___V374*/ meltfptr[373], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V376*/ meltfptr[375])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V376*/ meltfptr[375])))); ((meltobject_ptr_t) ( /*_.VALDATA___V376*/ meltfptr[375]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V377*/ meltfptr[376]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V376*/ meltfptr[375]); melt_dbgtrace_written_object ( /*_.VALDATA___V376*/ meltfptr[375], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V378*/ meltfptr[377])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V378*/ meltfptr[377])))); ((meltobject_ptr_t) ( /*_.VALDATA___V378*/ meltfptr[377]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V379*/ meltfptr[378]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V378*/ meltfptr[377]); melt_dbgtrace_written_object ( /*_.VALDATA___V378*/ meltfptr[377], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V380*/ meltfptr[379])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V381*/ meltfptr[380]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V380*/ meltfptr[379]); melt_dbgtrace_written_object ( /*_.VALDATA___V380*/ meltfptr[379], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:542:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V382*/ meltfptr[381])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V383*/ meltfptr[382]); MELT_LOCATION ("warmelt-normatch.melt:542:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V382*/ meltfptr[381])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V382*/ meltfptr[381])))); ((meltobject_ptr_t) ( /*_.VALDATA___V382*/ meltfptr[381]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V326*/ meltfptr[325]); /*putupl#144 */ melt_assertmsg ("putupl #144 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V384*/ meltfptr[383])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #144 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V384*/ meltfptr[383])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V384*/ meltfptr[383]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 5))), (0)))); /*putupl#145 */ melt_assertmsg ("putupl #145 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V384*/ meltfptr[383])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #145 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V384*/ meltfptr[383])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V384*/ meltfptr[383]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 5))), (1)))); /*putupl#146 */ melt_assertmsg ("putupl #146 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V384*/ meltfptr[383])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #146 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V384*/ meltfptr[383])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V384*/ meltfptr[383]))->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___V384*/ meltfptr[383])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #147 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V384*/ meltfptr[383])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V384*/ meltfptr[383]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); /*putupl#148 */ melt_assertmsg ("putupl #148 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V384*/ meltfptr[383])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #148 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V384*/ meltfptr[383])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V384*/ meltfptr[383]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V326*/ meltfptr[325]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V384*/ meltfptr[383]); MELT_LOCATION ("warmelt-normatch.melt:542:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V382*/ meltfptr[381])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V382*/ meltfptr[381])))); ((meltobject_ptr_t) ( /*_.VALDATA___V382*/ meltfptr[381]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V384*/ meltfptr[383]); MELT_LOCATION ("warmelt-normatch.melt:542:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V385*/ meltfptr[384])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V385*/ meltfptr[384])))); ((meltobject_ptr_t) ( /*_.VALDATA___V385*/ meltfptr[384]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V386*/ meltfptr[385]); MELT_LOCATION ("warmelt-normatch.melt:542:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V385*/ meltfptr[384])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V385*/ meltfptr[384])))); ((meltobject_ptr_t) ( /*_.VALDATA___V385*/ meltfptr[384]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V382*/ meltfptr[381]); MELT_LOCATION ("warmelt-normatch.melt:542:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V385*/ meltfptr[384]); MELT_LOCATION ("warmelt-normatch.melt:542:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V385*/ meltfptr[384], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:542:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V387*/ meltfptr[386])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V388*/ meltfptr[387]); MELT_LOCATION ("warmelt-normatch.melt:542:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V387*/ meltfptr[386])) == 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] = (melt_ptr_t) ( /*_.VALDATA___V382*/ meltfptr[381]); MELT_LOCATION ("warmelt-normatch.melt:542:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V387*/ meltfptr[386]); MELT_LOCATION ("warmelt-normatch.melt:542:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V387*/ meltfptr[386], "new static instance"); /*putupl#149 */ melt_assertmsg ("putupl #149 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V389*/ meltfptr[388])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #149 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V389*/ meltfptr[388])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V389*/ meltfptr[388]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 6))), (0)))); /*putupl#150 */ melt_assertmsg ("putupl #150 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V389*/ meltfptr[388])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #150 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V389*/ meltfptr[388])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V389*/ meltfptr[388]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V259*/ meltfptr[258]); /*putupl#151 */ melt_assertmsg ("putupl #151 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V389*/ meltfptr[388])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #151 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V389*/ meltfptr[388])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V389*/ meltfptr[388]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V261*/ meltfptr[260]); /*putupl#152 */ melt_assertmsg ("putupl #152 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V389*/ meltfptr[388])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #152 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V389*/ meltfptr[388])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V389*/ meltfptr[388]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V263*/ meltfptr[262]); /*putupl#153 */ melt_assertmsg ("putupl #153 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V389*/ meltfptr[388])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #153 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V389*/ meltfptr[388])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V389*/ meltfptr[388]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V265*/ meltfptr[264]); /*putupl#154 */ melt_assertmsg ("putupl #154 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V389*/ meltfptr[388])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #154 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V389*/ meltfptr[388])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V389*/ meltfptr[388]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266]); /*putupl#155 */ melt_assertmsg ("putupl #155 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V389*/ meltfptr[388])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #155 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V389*/ meltfptr[388])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V389*/ meltfptr[388]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V269*/ meltfptr[268]); /*putupl#156 */ melt_assertmsg ("putupl #156 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V389*/ meltfptr[388])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #156 checkoff", (7 >= 0 && 7 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V389*/ meltfptr[388])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V389*/ meltfptr[388]))->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V385*/ meltfptr[384]); /*putupl#157 */ melt_assertmsg ("putupl #157 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V389*/ meltfptr[388])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #157 checkoff", (8 >= 0 && 8 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V389*/ meltfptr[388])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V389*/ meltfptr[388]))->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V387*/ meltfptr[386]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V389*/ meltfptr[388]); MELT_LOCATION ("warmelt-normatch.melt:542:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V382*/ meltfptr[381])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V382*/ meltfptr[381])))); ((meltobject_ptr_t) ( /*_.VALDATA___V382*/ meltfptr[381]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V389*/ meltfptr[388]); MELT_LOCATION ("warmelt-normatch.melt:542:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V382*/ meltfptr[381]); MELT_LOCATION ("warmelt-normatch.melt:542:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V382*/ meltfptr[381], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V390*/ meltfptr[389])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V390*/ meltfptr[389])))); ((meltobject_ptr_t) ( /*_.VALDATA___V390*/ meltfptr[389]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V391*/ meltfptr[390]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V390*/ meltfptr[389]); melt_dbgtrace_written_object ( /*_.VALDATA___V390*/ meltfptr[389], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V392*/ meltfptr[391])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V393*/ meltfptr[392]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V392*/ meltfptr[391]); melt_dbgtrace_written_object ( /*_.VALDATA___V392*/ meltfptr[391], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V394*/ meltfptr[393])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V395*/ meltfptr[394]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V394*/ meltfptr[393]); melt_dbgtrace_written_object ( /*_.VALDATA___V394*/ meltfptr[393], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:551:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V396*/ meltfptr[395])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V397*/ meltfptr[396]); MELT_LOCATION ("warmelt-normatch.melt:551:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V396*/ meltfptr[395])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V396*/ meltfptr[395])))); ((meltobject_ptr_t) ( /*_.VALDATA___V396*/ meltfptr[395]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V326*/ meltfptr[325]); /*putupl#158 */ melt_assertmsg ("putupl #158 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V398*/ meltfptr[397])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #158 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V398*/ meltfptr[397])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V398*/ meltfptr[397]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 5))), (0)))); /*putupl#159 */ melt_assertmsg ("putupl #159 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V398*/ meltfptr[397])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #159 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) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 5))), (1)))); /*putupl#160 */ melt_assertmsg ("putupl #160 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V398*/ meltfptr[397])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #160 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) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]); /*putupl#161 */ melt_assertmsg ("putupl #161 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V398*/ meltfptr[397])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #161 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___V256*/ meltfptr[255]); /*putupl#162 */ melt_assertmsg ("putupl #162 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V398*/ meltfptr[397])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #162 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___V326*/ meltfptr[325]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V398*/ meltfptr[397]); MELT_LOCATION ("warmelt-normatch.melt:551:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V396*/ meltfptr[395])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V396*/ meltfptr[395])))); ((meltobject_ptr_t) ( /*_.VALDATA___V396*/ meltfptr[395]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V398*/ meltfptr[397]); MELT_LOCATION ("warmelt-normatch.melt:551:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V399*/ meltfptr[398])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V400*/ meltfptr[399]); MELT_LOCATION ("warmelt-normatch.melt:551:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V399*/ meltfptr[398])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V399*/ meltfptr[398])))); ((meltobject_ptr_t) ( /*_.VALDATA___V399*/ meltfptr[398]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V396*/ meltfptr[395]); MELT_LOCATION ("warmelt-normatch.melt:551:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V399*/ meltfptr[398]); MELT_LOCATION ("warmelt-normatch.melt:551:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V399*/ meltfptr[398], "new static instance"); /*putupl#163 */ melt_assertmsg ("putupl #163 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V401*/ meltfptr[400])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #163 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V401*/ meltfptr[400])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V401*/ meltfptr[400]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 6))), (0)))); /*putupl#164 */ melt_assertmsg ("putupl #164 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V401*/ meltfptr[400])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #164 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V401*/ meltfptr[400])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V401*/ meltfptr[400]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V259*/ meltfptr[258]); /*putupl#165 */ melt_assertmsg ("putupl #165 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V401*/ meltfptr[400])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #165 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V401*/ meltfptr[400])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V401*/ meltfptr[400]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V261*/ meltfptr[260]); /*putupl#166 */ melt_assertmsg ("putupl #166 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V401*/ meltfptr[400])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #166 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V401*/ meltfptr[400])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V401*/ meltfptr[400]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V263*/ meltfptr[262]); /*putupl#167 */ melt_assertmsg ("putupl #167 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V401*/ meltfptr[400])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #167 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V401*/ meltfptr[400])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V401*/ meltfptr[400]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V265*/ meltfptr[264]); /*putupl#168 */ melt_assertmsg ("putupl #168 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V401*/ meltfptr[400])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #168 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V401*/ meltfptr[400])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V401*/ meltfptr[400]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V267*/ meltfptr[266]); /*putupl#169 */ melt_assertmsg ("putupl #169 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V401*/ meltfptr[400])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #169 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V401*/ meltfptr[400])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V401*/ meltfptr[400]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V269*/ meltfptr[268]); /*putupl#170 */ melt_assertmsg ("putupl #170 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V401*/ meltfptr[400])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #170 checkoff", (7 >= 0 && 7 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V401*/ meltfptr[400])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V401*/ meltfptr[400]))->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V399*/ meltfptr[398]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V401*/ meltfptr[400]); MELT_LOCATION ("warmelt-normatch.melt:551:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V396*/ meltfptr[395])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V396*/ meltfptr[395])))); ((meltobject_ptr_t) ( /*_.VALDATA___V396*/ meltfptr[395]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V401*/ meltfptr[400]); MELT_LOCATION ("warmelt-normatch.melt:551:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V396*/ meltfptr[395]); MELT_LOCATION ("warmelt-normatch.melt:551:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V396*/ meltfptr[395], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V402*/ meltfptr[401])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V402*/ meltfptr[401])))); ((meltobject_ptr_t) ( /*_.VALDATA___V402*/ meltfptr[401]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V403*/ meltfptr[402]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V402*/ meltfptr[401]); melt_dbgtrace_written_object ( /*_.VALDATA___V402*/ meltfptr[401], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V404*/ meltfptr[403])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V405*/ meltfptr[404]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V404*/ meltfptr[403]); melt_dbgtrace_written_object ( /*_.VALDATA___V404*/ meltfptr[403], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V406*/ meltfptr[405])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V407*/ meltfptr[406]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V406*/ meltfptr[405]); melt_dbgtrace_written_object ( /*_.VALDATA___V406*/ meltfptr[405], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:559:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V408*/ meltfptr[407])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V409*/ meltfptr[408]); MELT_LOCATION ("warmelt-normatch.melt:559:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V408*/ meltfptr[407])) == 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] = (melt_ptr_t) ( /*_.CLASS_NREP_TYPED_EXPRESSION__V37*/ meltfptr[36]); /*putupl#171 */ melt_assertmsg ("putupl #171 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V410*/ meltfptr[409])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #171 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V410*/ meltfptr[409])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V410*/ meltfptr[409]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_TYPED_EXPRESSION__V37*/ meltfptr[36]), 5))), (0)))); /*putupl#172 */ melt_assertmsg ("putupl #172 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V410*/ meltfptr[409])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #172 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V410*/ meltfptr[409])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V410*/ meltfptr[409]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_TYPED_EXPRESSION__V37*/ meltfptr[36]), 5))), (1)))); /*putupl#173 */ melt_assertmsg ("putupl #173 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V410*/ meltfptr[409])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #173 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) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_TYPED_EXPRESSION__V37*/ meltfptr[36]), 5))), (2)))); /*putupl#174 */ melt_assertmsg ("putupl #174 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V410*/ meltfptr[409])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #174 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V410*/ meltfptr[409])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V410*/ meltfptr[409]))->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NREP_TYPED_EXPRESSION__V37*/ meltfptr[36]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V410*/ meltfptr[409]); MELT_LOCATION ("warmelt-normatch.melt:559:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V408*/ meltfptr[407])) == 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] = (melt_ptr_t) ( /*_.VALTUP___V410*/ meltfptr[409]); MELT_LOCATION ("warmelt-normatch.melt:559:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V411*/ meltfptr[410])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V412*/ meltfptr[411]); MELT_LOCATION ("warmelt-normatch.melt:559:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V411*/ meltfptr[410])) == 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] = (melt_ptr_t) ( /*_.VALDATA___V408*/ meltfptr[407]); MELT_LOCATION ("warmelt-normatch.melt:559:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V411*/ meltfptr[410]); MELT_LOCATION ("warmelt-normatch.melt:559:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V411*/ meltfptr[410], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:559:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V413*/ meltfptr[412])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V414*/ meltfptr[413]); MELT_LOCATION ("warmelt-normatch.melt:559:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V413*/ meltfptr[412])) == 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] = (melt_ptr_t) ( /*_.VALDATA___V408*/ meltfptr[407]); #undef meltfram__ } /*end of meltmod__warmelt_normatch__initialmeltchunk_5 */ void meltmod__warmelt_normatch__initialmeltchunk_6 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-normatch.melt:559:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V413*/ meltfptr[412]); MELT_LOCATION ("warmelt-normatch.melt:559:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V413*/ meltfptr[412], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:559:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V415*/ meltfptr[414])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V416*/ meltfptr[415]); MELT_LOCATION ("warmelt-normatch.melt:559:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V415*/ meltfptr[414])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V415*/ meltfptr[414])))); ((meltobject_ptr_t) ( /*_.VALDATA___V415*/ meltfptr[414]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V408*/ meltfptr[407]); MELT_LOCATION ("warmelt-normatch.melt:559:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V415*/ meltfptr[414]); MELT_LOCATION ("warmelt-normatch.melt:559:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V415*/ meltfptr[414], "new static instance"); /*putupl#175 */ melt_assertmsg ("putupl #175 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V417*/ meltfptr[416])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #175 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V417*/ meltfptr[416])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V417*/ meltfptr[416]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_TYPED_EXPRESSION__V37*/ meltfptr[36]), 6))), (0)))); /*putupl#176 */ melt_assertmsg ("putupl #176 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V417*/ meltfptr[416])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #176 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V417*/ meltfptr[416])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V417*/ meltfptr[416]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_TYPED_EXPRESSION__V37*/ meltfptr[36]), 6))), (1)))); /*putupl#177 */ melt_assertmsg ("putupl #177 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V417*/ meltfptr[416])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #177 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V417*/ meltfptr[416])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V417*/ meltfptr[416]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V411*/ meltfptr[410]); /*putupl#178 */ melt_assertmsg ("putupl #178 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V417*/ meltfptr[416])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #178 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V417*/ meltfptr[416])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V417*/ meltfptr[416]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V413*/ meltfptr[412]); /*putupl#179 */ melt_assertmsg ("putupl #179 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V417*/ meltfptr[416])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #179 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V417*/ meltfptr[416])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V417*/ meltfptr[416]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V415*/ meltfptr[414]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V417*/ meltfptr[416]); MELT_LOCATION ("warmelt-normatch.melt:559:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V408*/ meltfptr[407])) == 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] = (melt_ptr_t) ( /*_.VALTUP___V417*/ meltfptr[416]); MELT_LOCATION ("warmelt-normatch.melt:559:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V408*/ meltfptr[407]); MELT_LOCATION ("warmelt-normatch.melt:559:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V408*/ meltfptr[407], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V418*/ meltfptr[417])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V419*/ meltfptr[418]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V418*/ meltfptr[417]); melt_dbgtrace_written_object ( /*_.VALDATA___V418*/ meltfptr[417], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V420*/ meltfptr[419])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V421*/ meltfptr[420]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V420*/ meltfptr[419]); melt_dbgtrace_written_object ( /*_.VALDATA___V420*/ meltfptr[419], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V422*/ meltfptr[421])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V423*/ meltfptr[422]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V422*/ meltfptr[421]); melt_dbgtrace_written_object ( /*_.VALDATA___V422*/ meltfptr[421], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:568:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V424*/ meltfptr[423])) == 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___V424*/ meltfptr[423])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:568:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V424*/ meltfptr[423])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V256*/ meltfptr[255]); ((meltroutine_ptr_t) /*_.VALROUT___V424*/ meltfptr[423])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); MELT_LOCATION ("warmelt-normatch.melt:568:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V424*/ meltfptr[423])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V97*/ meltfptr[96]); ((meltroutine_ptr_t) /*_.VALROUT___V424*/ meltfptr[423])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-normatch.melt:568:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V424*/ meltfptr[423])) == 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___V424*/ meltfptr[423])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-normatch.melt:568:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V424*/ meltfptr[423]); /*putclosurout#16 */ melt_assertmsg ("putclosrout#16 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V425*/ meltfptr[424])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#16 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V424*/ meltfptr[423])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V425*/ meltfptr[424])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V424*/ meltfptr[423]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V425*/ meltfptr[424]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V426*/ meltfptr[425])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V427*/ meltfptr[426]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V426*/ meltfptr[425]); melt_dbgtrace_written_object ( /*_.VALDATA___V426*/ meltfptr[425], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:598:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V428*/ meltfptr[427])) == 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___V428*/ meltfptr[427])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:598:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V428*/ meltfptr[427])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V256*/ meltfptr[255]); ((meltroutine_ptr_t) /*_.VALROUT___V428*/ meltfptr[427])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); MELT_LOCATION ("warmelt-normatch.melt:598:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V428*/ meltfptr[427])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V286*/ meltfptr[285]); ((meltroutine_ptr_t) /*_.VALROUT___V428*/ meltfptr[427])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V286*/ meltfptr[285]); MELT_LOCATION ("warmelt-normatch.melt:598:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V428*/ meltfptr[427])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V332*/ meltfptr[331]); ((meltroutine_ptr_t) /*_.VALROUT___V428*/ meltfptr[427])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V332*/ meltfptr[331]); MELT_LOCATION ("warmelt-normatch.melt:598:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V428*/ meltfptr[427])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_336__PUT_TESTER_THEN#4", NULL != ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V428*/ meltfptr[427])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normatch.melt:628:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V430*/ meltfptr[429])) == 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___V430*/ meltfptr[429])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:628:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V430*/ meltfptr[429])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V256*/ meltfptr[255]); ((meltroutine_ptr_t) /*_.VALROUT___V430*/ meltfptr[429])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); MELT_LOCATION ("warmelt-normatch.melt:628:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V430*/ meltfptr[429])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_340__SET_NEW_TESTER_LAST_THEN#2", NULL != ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V430*/ meltfptr[429])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38]); /*putclosurout#17 */ melt_assertmsg ("putclosrout#17 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V431*/ meltfptr[430])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#17 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V428*/ meltfptr[427])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V431*/ meltfptr[430])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V428*/ meltfptr[427]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V431*/ meltfptr[430]); MELT_LOCATION ("warmelt-normatch.melt:628:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V430*/ meltfptr[429])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V431*/ meltfptr[430]); ((meltroutine_ptr_t) /*_.VALROUT___V430*/ meltfptr[429])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V431*/ meltfptr[430]); MELT_LOCATION ("warmelt-normatch.melt:628:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V430*/ meltfptr[429]); /*putclosurout#18 */ melt_assertmsg ("putclosrout#18 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V429*/ meltfptr[428])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#18 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V430*/ meltfptr[429])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V429*/ meltfptr[428])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V430*/ meltfptr[429]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V429*/ meltfptr[428]); MELT_LOCATION ("warmelt-normatch.melt:598:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V428*/ meltfptr[427])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V429*/ meltfptr[428]); ((meltroutine_ptr_t) /*_.VALROUT___V428*/ meltfptr[427])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V429*/ meltfptr[428]); MELT_LOCATION ("warmelt-normatch.melt:598:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V428*/ meltfptr[427]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V432*/ meltfptr[431])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V432*/ meltfptr[431])))); ((meltobject_ptr_t) ( /*_.VALDATA___V432*/ meltfptr[431]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V433*/ meltfptr[432]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V432*/ meltfptr[431]); melt_dbgtrace_written_object ( /*_.VALDATA___V432*/ meltfptr[431], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:653:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V434*/ meltfptr[433])) == 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___V434*/ meltfptr[433])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:653:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V434*/ meltfptr[433])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V256*/ meltfptr[255]); ((meltroutine_ptr_t) /*_.VALROUT___V434*/ meltfptr[433])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); MELT_LOCATION ("warmelt-normatch.melt:653:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V434*/ meltfptr[433])) == 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___V434*/ meltfptr[433])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-normatch.melt:653:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V434*/ meltfptr[433])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V326*/ meltfptr[325]); ((meltroutine_ptr_t) /*_.VALROUT___V434*/ meltfptr[433])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V326*/ meltfptr[325]); /*putclosurout#19 */ melt_assertmsg ("putclosrout#19 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V435*/ meltfptr[434])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#19 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V434*/ meltfptr[433])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V435*/ meltfptr[434])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V434*/ meltfptr[433]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V435*/ meltfptr[434]); MELT_LOCATION ("warmelt-normatch.melt:653:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V434*/ meltfptr[433])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V435*/ meltfptr[434]); ((meltroutine_ptr_t) /*_.VALROUT___V434*/ meltfptr[433])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V435*/ meltfptr[434]); MELT_LOCATION ("warmelt-normatch.melt:653:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V434*/ meltfptr[433]); MELT_LOCATION ("warmelt-normatch.melt:717:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V436*/ meltfptr[435])) == 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___V436*/ meltfptr[435])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:717:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V436*/ meltfptr[435])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V97*/ meltfptr[96]); ((meltroutine_ptr_t) /*_.VALROUT___V436*/ meltfptr[435])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-normatch.melt:717:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V436*/ meltfptr[435])) == 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___V436*/ meltfptr[435])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:717:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V436*/ meltfptr[435])) == 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___V436*/ meltfptr[435])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-normatch.melt:717:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V436*/ meltfptr[435]); /*putclosurout#20 */ melt_assertmsg ("putclosrout#20 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V437*/ meltfptr[436])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#20 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V436*/ meltfptr[435])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V437*/ meltfptr[436])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V436*/ meltfptr[435]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V437*/ meltfptr[436]); MELT_LOCATION ("warmelt-normatch.melt:733:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V438*/ meltfptr[437])) == 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___V438*/ meltfptr[437])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:733:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V438*/ meltfptr[437])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V97*/ meltfptr[96]); ((meltroutine_ptr_t) /*_.VALROUT___V438*/ meltfptr[437])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-normatch.melt:733:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V438*/ meltfptr[437])) == 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___V438*/ meltfptr[437])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-normatch.melt:733:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V438*/ meltfptr[437])) == 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___V438*/ meltfptr[437])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:733:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V438*/ meltfptr[437])) == 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___V438*/ meltfptr[437])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-normatch.melt:733:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V438*/ meltfptr[437]); /*putclosurout#21 */ melt_assertmsg ("putclosrout#21 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V439*/ meltfptr[438])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#21 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V438*/ meltfptr[437])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V439*/ meltfptr[438])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V438*/ meltfptr[437]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V439*/ meltfptr[438]); MELT_LOCATION ("warmelt-normatch.melt:753:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V440*/ meltfptr[439])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V97*/ meltfptr[96]); ((meltroutine_ptr_t) /*_.VALROUT___V440*/ meltfptr[439])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-normatch.melt:753:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V440*/ meltfptr[439])) == 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___V440*/ meltfptr[439])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normatch.melt:753:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V440*/ meltfptr[439])) == 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___V440*/ meltfptr[439])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:753:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V440*/ meltfptr[439])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V350*/ meltfptr[349]); ((meltroutine_ptr_t) /*_.VALROUT___V440*/ meltfptr[439])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]); MELT_LOCATION ("warmelt-normatch.melt:753:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V440*/ meltfptr[439])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V256*/ meltfptr[255]); ((meltroutine_ptr_t) /*_.VALROUT___V440*/ meltfptr[439])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); MELT_LOCATION ("warmelt-normatch.melt:753:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V440*/ meltfptr[439])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V256*/ meltfptr[255]); ((meltroutine_ptr_t) /*_.VALROUT___V440*/ meltfptr[439])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); MELT_LOCATION ("warmelt-normatch.melt:753:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V440*/ meltfptr[439])) == 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___V440*/ meltfptr[439])->tabval[6] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:771:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V441*/ meltfptr[440])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V256*/ meltfptr[255]); ((meltroutine_ptr_t) /*_.VALROUT___V441*/ meltfptr[440])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); MELT_LOCATION ("warmelt-normatch.melt:771:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V441*/ meltfptr[440])) == 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___V441*/ meltfptr[440])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:771:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V441*/ meltfptr[440]); MELT_LOCATION ("warmelt-normatch.melt:753:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V440*/ meltfptr[439])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_348__NORMVARPAT_GENREUSETEST#7", NULL != ( /*_.VALROUT___V441*/ meltfptr[440])); ((meltroutine_ptr_t) /*_.VALROUT___V440*/ meltfptr[439])->tabval[7] = (melt_ptr_t) ( /*_.VALROUT___V441*/ meltfptr[440]); MELT_LOCATION ("warmelt-normatch.melt:753:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V440*/ meltfptr[439])) == 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___V440*/ meltfptr[439])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-normatch.melt:753:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V440*/ meltfptr[439])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V425*/ meltfptr[424]); ((meltroutine_ptr_t) /*_.VALROUT___V440*/ meltfptr[439])->tabval[9] = (melt_ptr_t) ( /*_.VALCLO___V425*/ meltfptr[424]); MELT_LOCATION ("warmelt-normatch.melt:753:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V440*/ meltfptr[439]); /*putclosurout#22 */ melt_assertmsg ("putclosrout#22 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V442*/ meltfptr[441])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#22 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V440*/ meltfptr[439])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V442*/ meltfptr[441])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V440*/ meltfptr[439]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V442*/ meltfptr[441]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V443*/ meltfptr[442])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V444*/ meltfptr[443]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V443*/ meltfptr[442]); melt_dbgtrace_written_object ( /*_.VALDATA___V443*/ meltfptr[442], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:805:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V445*/ meltfptr[444])) == 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___V445*/ meltfptr[444])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:805:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V445*/ meltfptr[444])) == 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___V445*/ meltfptr[444])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-normatch.melt:805:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V445*/ meltfptr[444])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V97*/ meltfptr[96]); ((meltroutine_ptr_t) /*_.VALROUT___V445*/ meltfptr[444])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-normatch.melt:805:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V445*/ meltfptr[444])) == 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___V445*/ meltfptr[444])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-normatch.melt:805:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V445*/ meltfptr[444])) == 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___V445*/ meltfptr[444])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normatch.melt:805:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V445*/ meltfptr[444])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V442*/ meltfptr[441]); ((meltroutine_ptr_t) /*_.VALROUT___V445*/ meltfptr[444])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V442*/ meltfptr[441]); MELT_LOCATION ("warmelt-normatch.melt:805:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V445*/ meltfptr[444])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V232*/ meltfptr[231]); ((meltroutine_ptr_t) /*_.VALROUT___V445*/ meltfptr[444])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231]); MELT_LOCATION ("warmelt-normatch.melt:805:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V445*/ meltfptr[444])) == 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___V445*/ meltfptr[444])->tabval[7] = (melt_ptr_t) ( /*_.GET_CTYPE__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normatch.melt:805:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V445*/ meltfptr[444])) == 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___V445*/ meltfptr[444])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-normatch.melt:805:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V445*/ meltfptr[444])) == 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___V445*/ meltfptr[444])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V42*/ meltfptr[41]); MELT_LOCATION ("warmelt-normatch.melt:805:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V445*/ meltfptr[444])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_353__NORMPAT_VARIABLEPAT#10", NULL != ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V445*/ meltfptr[444])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normatch.melt:805:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V445*/ meltfptr[444])) == 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___V445*/ meltfptr[444])->tabval[11] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:805:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V445*/ meltfptr[444])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_353__NORMPAT_VARIABLEPAT#12", NULL != ( /*_.CLASS_QUASI_CTYPE__V43*/ meltfptr[42])); ((meltroutine_ptr_t) /*_.VALROUT___V445*/ meltfptr[444])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_QUASI_CTYPE__V43*/ meltfptr[42]); MELT_LOCATION ("warmelt-normatch.melt:805:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V445*/ meltfptr[444]); /*putclosurout#23 */ melt_assertmsg ("putclosrout#23 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V446*/ meltfptr[445])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#23 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V445*/ meltfptr[444])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V446*/ meltfptr[445])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V445*/ meltfptr[444]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V446*/ meltfptr[445]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V447*/ meltfptr[446])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V447*/ meltfptr[446])))); ((meltobject_ptr_t) ( /*_.VALDATA___V447*/ meltfptr[446]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V448*/ meltfptr[447]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V447*/ meltfptr[446]); melt_dbgtrace_written_object ( /*_.VALDATA___V447*/ meltfptr[446], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V449*/ meltfptr[448])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V449*/ meltfptr[448])))); ((meltobject_ptr_t) ( /*_.VALDATA___V449*/ meltfptr[448]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V450*/ meltfptr[449]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V449*/ meltfptr[448]); melt_dbgtrace_written_object ( /*_.VALDATA___V449*/ meltfptr[448], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V451*/ meltfptr[450])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V451*/ meltfptr[450])))); ((meltobject_ptr_t) ( /*_.VALDATA___V451*/ meltfptr[450]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V452*/ meltfptr[451]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V451*/ meltfptr[450]); melt_dbgtrace_written_object ( /*_.VALDATA___V451*/ meltfptr[450], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:949:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V453*/ meltfptr[452])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_361__NORMPAT_JOKERPAT#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V453*/ meltfptr[452])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:949:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V453*/ meltfptr[452])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_361__NORMPAT_JOKERPAT#1", NULL != ( /*_.CLASS_SOURCE_PATTERN_JOKER_VARIABLE__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V453*/ meltfptr[452])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_JOKER_VARIABLE__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-normatch.melt:949:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V453*/ meltfptr[452])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V97*/ meltfptr[96]); ((meltroutine_ptr_t) /*_.VALROUT___V453*/ meltfptr[452])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-normatch.melt:949:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V453*/ meltfptr[452]); /*putclosurout#24 */ melt_assertmsg ("putclosrout#24 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V454*/ meltfptr[453])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#24 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V453*/ meltfptr[452])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V454*/ meltfptr[453])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V453*/ meltfptr[452]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V454*/ meltfptr[453]); MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V455*/ meltfptr[454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__NORMPAT_INSTANCEPAT#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V455*/ meltfptr[454])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V455*/ meltfptr[454])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V97*/ meltfptr[96]); ((meltroutine_ptr_t) /*_.VALROUT___V455*/ meltfptr[454])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]); #undef meltfram__ } /*end of meltmod__warmelt_normatch__initialmeltchunk_6 */ void meltmod__warmelt_normatch__initialmeltchunk_7 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V455*/ meltfptr[454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__NORMPAT_INSTANCEPAT#2", NULL != ( /*_.CLASS_SOURCE_PATTERN_INSTANCE__V44*/ meltfptr[43])); ((meltroutine_ptr_t) /*_.VALROUT___V455*/ meltfptr[454])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_INSTANCE__V44*/ meltfptr[43]); MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V455*/ meltfptr[454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__NORMPAT_INSTANCEPAT#3", NULL != ( /*_.CLASS_LOCATED__V21*/ meltfptr[20])); ((meltroutine_ptr_t) /*_.VALROUT___V455*/ meltfptr[454])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V455*/ meltfptr[454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__NORMPAT_INSTANCEPAT#4", NULL != ( /*_.CLASS_SOURCE_PATTERN_OBJECT__V24*/ meltfptr[23])); ((meltroutine_ptr_t) /*_.VALROUT___V455*/ meltfptr[454])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_OBJECT__V24*/ meltfptr[23]); MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V455*/ meltfptr[454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__NORMPAT_INSTANCEPAT#5", NULL != ( /*_.NORMAL_EXP__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V455*/ meltfptr[454])->tabval[5] = (melt_ptr_t) ( /*_.NORMAL_EXP__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V455*/ meltfptr[454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__NORMPAT_INSTANCEPAT#6", NULL != ( /*_.CLASS_CLASS__V25*/ meltfptr[24])); ((meltroutine_ptr_t) /*_.VALROUT___V455*/ meltfptr[454])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_CLASS__V25*/ meltfptr[24]); MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V455*/ meltfptr[454])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V382*/ meltfptr[381]); ((meltroutine_ptr_t) /*_.VALROUT___V455*/ meltfptr[454])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V382*/ meltfptr[381]); MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V455*/ meltfptr[454])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V256*/ meltfptr[255]); ((meltroutine_ptr_t) /*_.VALROUT___V455*/ meltfptr[454])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V455*/ meltfptr[454])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V256*/ meltfptr[255]); ((meltroutine_ptr_t) /*_.VALROUT___V455*/ meltfptr[454])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V455*/ meltfptr[454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__NORMPAT_INSTANCEPAT#10", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V455*/ meltfptr[454])->tabval[10] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:997:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V456*/ meltfptr[455])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V256*/ meltfptr[255]); ((meltroutine_ptr_t) /*_.VALROUT___V456*/ meltfptr[455])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); MELT_LOCATION ("warmelt-normatch.melt:997:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V456*/ meltfptr[455])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_367__LAMBDA_#1", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V456*/ meltfptr[455])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:997:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V456*/ meltfptr[455]); MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V455*/ meltfptr[454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__NORMPAT_INSTANCEPAT#11", NULL != ( /*_.VALROUT___V456*/ meltfptr[455])); ((meltroutine_ptr_t) /*_.VALROUT___V455*/ meltfptr[454])->tabval[11] = (melt_ptr_t) ( /*_.VALROUT___V456*/ meltfptr[455]); MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V455*/ meltfptr[454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__NORMPAT_INSTANCEPAT#12", NULL != ( /*_.DISCR_MULTIPLE__V45*/ meltfptr[44])); ((meltroutine_ptr_t) /*_.VALROUT___V455*/ meltfptr[454])->tabval[12] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V45*/ meltfptr[44]); MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V455*/ meltfptr[454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__NORMPAT_INSTANCEPAT#13", NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V455*/ meltfptr[454])->tabval[13] = (melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V455*/ meltfptr[454])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V425*/ meltfptr[424]); ((meltroutine_ptr_t) /*_.VALROUT___V455*/ meltfptr[454])->tabval[14] = (melt_ptr_t) ( /*_.VALCLO___V425*/ meltfptr[424]); MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V455*/ meltfptr[454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__NORMPAT_INSTANCEPAT#15", NULL != ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V455*/ meltfptr[454])->tabval[15] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V455*/ meltfptr[454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__NORMPAT_INSTANCEPAT#16", NULL != ( /*_.CLASS_SOURCE_FIELD_PATTERN__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V455*/ meltfptr[454])->tabval[16] = (melt_ptr_t) ( /*_.CLASS_SOURCE_FIELD_PATTERN__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V455*/ meltfptr[454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__NORMPAT_INSTANCEPAT#17", NULL != ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V455*/ meltfptr[454])->tabval[17] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-normatch.melt:1042:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V457*/ meltfptr[456])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_370__LAMBDA_#0", NULL != ( /*_.CLASS_SOURCE_FIELD_PATTERN__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V457*/ meltfptr[456])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_FIELD_PATTERN__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-normatch.melt:1042:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V457*/ meltfptr[456])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_370__LAMBDA_#1", NULL != ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V457*/ meltfptr[456])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-normatch.melt:1042:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V457*/ meltfptr[456])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_370__LAMBDA_#2", NULL != ( /*_.VALBXINT___V458*/ meltfptr[457])); ((meltroutine_ptr_t) /*_.VALROUT___V457*/ meltfptr[456])->tabval[2] = (melt_ptr_t) ( /*_.VALBXINT___V458*/ meltfptr[457]); MELT_LOCATION ("warmelt-normatch.melt:1042:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V457*/ meltfptr[456])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_370__LAMBDA_#3", NULL != ( /*_.VALBXINT___V459*/ meltfptr[458])); ((meltroutine_ptr_t) /*_.VALROUT___V457*/ meltfptr[456])->tabval[3] = (melt_ptr_t) ( /*_.VALBXINT___V459*/ meltfptr[458]); MELT_LOCATION ("warmelt-normatch.melt:1042:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V457*/ meltfptr[456])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_370__LAMBDA_#4", NULL != ( /*_.VALBXINT___V460*/ meltfptr[459])); ((meltroutine_ptr_t) /*_.VALROUT___V457*/ meltfptr[456])->tabval[4] = (melt_ptr_t) ( /*_.VALBXINT___V460*/ meltfptr[459]); MELT_LOCATION ("warmelt-normatch.melt:1042:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V457*/ meltfptr[456]); MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V455*/ meltfptr[454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__NORMPAT_INSTANCEPAT#18", NULL != ( /*_.VALROUT___V457*/ meltfptr[456])); ((meltroutine_ptr_t) /*_.VALROUT___V455*/ meltfptr[454])->tabval[18] = (melt_ptr_t) ( /*_.VALROUT___V457*/ meltfptr[456]); MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V455*/ meltfptr[454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__NORMPAT_INSTANCEPAT#19", NULL != ( /*_.CLASS_SOURCE_FIELD_PATTERN__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V455*/ meltfptr[454])->tabval[19] = (melt_ptr_t) ( /*_.CLASS_SOURCE_FIELD_PATTERN__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V455*/ meltfptr[454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__NORMPAT_INSTANCEPAT#20", NULL != ( /*_.CLASS_FIELD__V27*/ meltfptr[26])); ((meltroutine_ptr_t) /*_.VALROUT___V455*/ meltfptr[454])->tabval[20] = (melt_ptr_t) ( /*_.CLASS_FIELD__V27*/ meltfptr[26]); MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V455*/ meltfptr[454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__NORMPAT_INSTANCEPAT#21", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V455*/ meltfptr[454])->tabval[21] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V455*/ meltfptr[454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__NORMPAT_INSTANCEPAT#22", NULL != ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V455*/ meltfptr[454])->tabval[22] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V455*/ meltfptr[454])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V326*/ meltfptr[325]); ((meltroutine_ptr_t) /*_.VALROUT___V455*/ meltfptr[454])->tabval[23] = (melt_ptr_t) ( /*_.VALDATA___V326*/ meltfptr[325]); MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V455*/ meltfptr[454])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V429*/ meltfptr[428]); ((meltroutine_ptr_t) /*_.VALROUT___V455*/ meltfptr[454])->tabval[24] = (melt_ptr_t) ( /*_.VALCLO___V429*/ meltfptr[428]); MELT_LOCATION ("warmelt-normatch.melt:1072:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V461*/ meltfptr[460])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_374__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V461*/ meltfptr[460])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:1072:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V461*/ meltfptr[460])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_374__LAMBDA_#1", NULL != ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V461*/ meltfptr[460])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normatch.melt:1072:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V461*/ meltfptr[460])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V326*/ meltfptr[325]); ((meltroutine_ptr_t) /*_.VALROUT___V461*/ meltfptr[460])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V326*/ meltfptr[325]); MELT_LOCATION ("warmelt-normatch.melt:1072:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V461*/ meltfptr[460])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V429*/ meltfptr[428]); ((meltroutine_ptr_t) /*_.VALROUT___V461*/ meltfptr[460])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V429*/ meltfptr[428]); MELT_LOCATION ("warmelt-normatch.melt:1072:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V461*/ meltfptr[460]); MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V455*/ meltfptr[454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__NORMPAT_INSTANCEPAT#25", NULL != ( /*_.VALROUT___V461*/ meltfptr[460])); ((meltroutine_ptr_t) /*_.VALROUT___V455*/ meltfptr[454])->tabval[25] = (melt_ptr_t) ( /*_.VALROUT___V461*/ meltfptr[460]); MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V455*/ meltfptr[454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__NORMPAT_INSTANCEPAT#26", NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V455*/ meltfptr[454])->tabval[26] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V455*/ meltfptr[454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__NORMPAT_INSTANCEPAT#27", NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V455*/ meltfptr[454])->tabval[27] = (melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V455*/ meltfptr[454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__NORMPAT_INSTANCEPAT#28", NULL != ( /*_.CLASS_NREP_SYMOCC__V46*/ meltfptr[45])); ((meltroutine_ptr_t) /*_.VALROUT___V455*/ meltfptr[454])->tabval[28] = (melt_ptr_t) ( /*_.CLASS_NREP_SYMOCC__V46*/ meltfptr[45]); MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V455*/ meltfptr[454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__NORMPAT_INSTANCEPAT#29", NULL != ( /*_.CLASS_LET_BINDING__V47*/ meltfptr[46])); ((meltroutine_ptr_t) /*_.VALROUT___V455*/ meltfptr[454])->tabval[29] = (melt_ptr_t) ( /*_.CLASS_LET_BINDING__V47*/ meltfptr[46]); MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V455*/ meltfptr[454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__NORMPAT_INSTANCEPAT#30", NULL != ( /*_.CLASS_NREP_UNSAFE_GET_FIELD__V48*/ meltfptr[47])); ((meltroutine_ptr_t) /*_.VALROUT___V455*/ meltfptr[454])->tabval[30] = (melt_ptr_t) ( /*_.CLASS_NREP_UNSAFE_GET_FIELD__V48*/ meltfptr[47]); MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V455*/ meltfptr[454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__NORMPAT_INSTANCEPAT#31", NULL != ( /*_.CLONE_SYMBOL__V49*/ meltfptr[48])); ((meltroutine_ptr_t) /*_.VALROUT___V455*/ meltfptr[454])->tabval[31] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V49*/ meltfptr[48]); MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V455*/ meltfptr[454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__NORMPAT_INSTANCEPAT#32", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V455*/ meltfptr[454])->tabval[32] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V455*/ meltfptr[454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__NORMPAT_INSTANCEPAT#33", NULL != ( /*_.CTYPE_VALUE__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V455*/ meltfptr[454])->tabval[33] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V455*/ meltfptr[454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__NORMPAT_INSTANCEPAT#34", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V42*/ meltfptr[41])); ((meltroutine_ptr_t) /*_.VALROUT___V455*/ meltfptr[454])->tabval[34] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V42*/ meltfptr[41]); MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V455*/ meltfptr[454])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V228*/ meltfptr[227]); ((meltroutine_ptr_t) /*_.VALROUT___V455*/ meltfptr[454])->tabval[35] = (melt_ptr_t) ( /*_.VALDATA___V228*/ meltfptr[227]); MELT_LOCATION ("warmelt-normatch.melt:963:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V455*/ meltfptr[454]); /*putclosurout#25 */ melt_assertmsg ("putclosrout#25 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V462*/ meltfptr[461])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#25 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V455*/ meltfptr[454])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V462*/ meltfptr[461])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V455*/ meltfptr[454]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V462*/ meltfptr[461]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V463*/ meltfptr[462])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V464*/ meltfptr[463]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V463*/ meltfptr[462]); melt_dbgtrace_written_object ( /*_.VALDATA___V463*/ meltfptr[462], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V465*/ meltfptr[464])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V465*/ meltfptr[464])))); ((meltobject_ptr_t) ( /*_.VALDATA___V465*/ meltfptr[464]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V466*/ meltfptr[465]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V465*/ meltfptr[464]); melt_dbgtrace_written_object ( /*_.VALDATA___V465*/ meltfptr[464], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V467*/ meltfptr[466])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V467*/ meltfptr[466])))); ((meltobject_ptr_t) ( /*_.VALDATA___V467*/ meltfptr[466]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V468*/ meltfptr[467]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V467*/ meltfptr[466]); melt_dbgtrace_written_object ( /*_.VALDATA___V467*/ meltfptr[466], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V469*/ meltfptr[468])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V469*/ meltfptr[468])))); ((meltobject_ptr_t) ( /*_.VALDATA___V469*/ meltfptr[468]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V470*/ meltfptr[469]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V469*/ meltfptr[468]); melt_dbgtrace_written_object ( /*_.VALDATA___V469*/ meltfptr[468], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V471*/ meltfptr[470])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V471*/ meltfptr[470])))); ((meltobject_ptr_t) ( /*_.VALDATA___V471*/ meltfptr[470]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V472*/ meltfptr[471]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V471*/ meltfptr[470]); melt_dbgtrace_written_object ( /*_.VALDATA___V471*/ meltfptr[470], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V473*/ meltfptr[472])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V473*/ meltfptr[472])))); ((meltobject_ptr_t) ( /*_.VALDATA___V473*/ meltfptr[472]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V474*/ meltfptr[473]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V473*/ meltfptr[472]); melt_dbgtrace_written_object ( /*_.VALDATA___V473*/ meltfptr[472], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V475*/ meltfptr[474])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V476*/ meltfptr[475]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V475*/ meltfptr[474]); melt_dbgtrace_written_object ( /*_.VALDATA___V475*/ meltfptr[474], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:1150:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V477*/ meltfptr[476])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V478*/ meltfptr[477]); MELT_LOCATION ("warmelt-normatch.melt:1150:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V477*/ meltfptr[476])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V477*/ meltfptr[476])))); ((meltobject_ptr_t) ( /*_.VALDATA___V477*/ meltfptr[476]))->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___V479*/ meltfptr[478])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #180 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) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V479*/ meltfptr[478]); MELT_LOCATION ("warmelt-normatch.melt:1150:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V477*/ meltfptr[476])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V477*/ meltfptr[476])))); ((meltobject_ptr_t) ( /*_.VALDATA___V477*/ meltfptr[476]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V479*/ meltfptr[478]); MELT_LOCATION ("warmelt-normatch.melt:1150:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V480*/ meltfptr[479])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V481*/ meltfptr[480]); MELT_LOCATION ("warmelt-normatch.melt:1150:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V480*/ meltfptr[479])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V480*/ meltfptr[479])))); ((meltobject_ptr_t) ( /*_.VALDATA___V480*/ meltfptr[479]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V477*/ meltfptr[476]); MELT_LOCATION ("warmelt-normatch.melt:1150:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V480*/ meltfptr[479]); MELT_LOCATION ("warmelt-normatch.melt:1150:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V480*/ meltfptr[479], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:1150:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V482*/ meltfptr[481])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V483*/ meltfptr[482]); MELT_LOCATION ("warmelt-normatch.melt:1150:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V482*/ meltfptr[481])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V482*/ meltfptr[481])))); ((meltobject_ptr_t) ( /*_.VALDATA___V482*/ meltfptr[481]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V477*/ meltfptr[476]); MELT_LOCATION ("warmelt-normatch.melt:1150:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V482*/ meltfptr[481]); MELT_LOCATION ("warmelt-normatch.melt:1150:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V482*/ meltfptr[481], "new static instance"); /*putupl#181 */ melt_assertmsg ("putupl #181 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V484*/ meltfptr[483])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #181 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V484*/ meltfptr[483])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V484*/ meltfptr[483]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V480*/ meltfptr[479]); /*putupl#182 */ melt_assertmsg ("putupl #182 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V484*/ meltfptr[483])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #182 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V484*/ meltfptr[483])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V484*/ meltfptr[483]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V482*/ meltfptr[481]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V484*/ meltfptr[483]); MELT_LOCATION ("warmelt-normatch.melt:1150:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V477*/ meltfptr[476])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V477*/ meltfptr[476])))); ((meltobject_ptr_t) ( /*_.VALDATA___V477*/ meltfptr[476]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V484*/ meltfptr[483]); MELT_LOCATION ("warmelt-normatch.melt:1150:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V477*/ meltfptr[476]); MELT_LOCATION ("warmelt-normatch.melt:1150:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V477*/ meltfptr[476], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V485*/ meltfptr[484])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V486*/ meltfptr[485]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V485*/ meltfptr[484]); melt_dbgtrace_written_object ( /*_.VALDATA___V485*/ meltfptr[484], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V487*/ meltfptr[486])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V487*/ meltfptr[486])))); ((meltobject_ptr_t) ( /*_.VALDATA___V487*/ meltfptr[486]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V488*/ meltfptr[487]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V487*/ meltfptr[486]); melt_dbgtrace_written_object ( /*_.VALDATA___V487*/ meltfptr[486], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:1159:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_397__NORMPAT_TUPLEPAT#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V489*/ meltfptr[488])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:1159:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V97*/ meltfptr[96]); ((meltroutine_ptr_t) /*_.VALROUT___V489*/ meltfptr[488])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-normatch.melt:1159:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_397__NORMPAT_TUPLEPAT#2", NULL != ( /*_.CLASS_SOURCE_PATTERN_TUPLE__V50*/ meltfptr[49])); ((meltroutine_ptr_t) /*_.VALROUT___V489*/ meltfptr[488])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_TUPLE__V50*/ meltfptr[49]); MELT_LOCATION ("warmelt-normatch.melt:1159:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_397__NORMPAT_TUPLEPAT#3", NULL != ( /*_.CLASS_LOCATED__V21*/ meltfptr[20])); ((meltroutine_ptr_t) /*_.VALROUT___V489*/ meltfptr[488])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-normatch.melt:1159:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_397__NORMPAT_TUPLEPAT#4", NULL != ( /*_.CLASS_SOURCE_PATTERN_CONSTRUCT__V22*/ meltfptr[21])); ((meltroutine_ptr_t) /*_.VALROUT___V489*/ meltfptr[488])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_CONSTRUCT__V22*/ meltfptr[21]); MELT_LOCATION ("warmelt-normatch.melt:1159:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V396*/ meltfptr[395]); ((meltroutine_ptr_t) /*_.VALROUT___V489*/ meltfptr[488])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V396*/ meltfptr[395]); MELT_LOCATION ("warmelt-normatch.melt:1159:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V256*/ meltfptr[255]); ((meltroutine_ptr_t) /*_.VALROUT___V489*/ meltfptr[488])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); MELT_LOCATION ("warmelt-normatch.melt:1159:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V256*/ meltfptr[255]); ((meltroutine_ptr_t) /*_.VALROUT___V489*/ meltfptr[488])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); MELT_LOCATION ("warmelt-normatch.melt:1159:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_397__NORMPAT_TUPLEPAT#8", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V489*/ meltfptr[488])->tabval[8] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:1190:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V490*/ meltfptr[489])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V256*/ meltfptr[255]); ((meltroutine_ptr_t) /*_.VALROUT___V490*/ meltfptr[489])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); MELT_LOCATION ("warmelt-normatch.melt:1190:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V490*/ meltfptr[489])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_401__LAMBDA_#1", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V490*/ meltfptr[489])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:1190:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V490*/ meltfptr[489]); MELT_LOCATION ("warmelt-normatch.melt:1159:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_397__NORMPAT_TUPLEPAT#9", NULL != ( /*_.VALROUT___V490*/ meltfptr[489])); ((meltroutine_ptr_t) /*_.VALROUT___V489*/ meltfptr[488])->tabval[9] = (melt_ptr_t) ( /*_.VALROUT___V490*/ meltfptr[489]); MELT_LOCATION ("warmelt-normatch.melt:1159:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_397__NORMPAT_TUPLEPAT#10", NULL != ( /*_.DISCR_MULTIPLE__V45*/ meltfptr[44])); ((meltroutine_ptr_t) /*_.VALROUT___V489*/ meltfptr[488])->tabval[10] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V45*/ meltfptr[44]); MELT_LOCATION ("warmelt-normatch.melt:1159:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_397__NORMPAT_TUPLEPAT#11", NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V489*/ meltfptr[488])->tabval[11] = (melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-normatch.melt:1159:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V425*/ meltfptr[424]); ((meltroutine_ptr_t) /*_.VALROUT___V489*/ meltfptr[488])->tabval[12] = (melt_ptr_t) ( /*_.VALCLO___V425*/ meltfptr[424]); MELT_LOCATION ("warmelt-normatch.melt:1159:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_397__NORMPAT_TUPLEPAT#13", NULL != ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V489*/ meltfptr[488])->tabval[13] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normatch.melt:1159:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_397__NORMPAT_TUPLEPAT#14", NULL != ( /*_.CLASS_SOURCE_PATTERN_JOKER_VARIABLE__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V489*/ meltfptr[488])->tabval[14] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_JOKER_VARIABLE__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-normatch.melt:1159:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V477*/ meltfptr[476]); ((meltroutine_ptr_t) /*_.VALROUT___V489*/ meltfptr[488])->tabval[15] = (melt_ptr_t) ( /*_.VALDATA___V477*/ meltfptr[476]); MELT_LOCATION ("warmelt-normatch.melt:1159:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_397__NORMPAT_TUPLEPAT#16", NULL != ( /*_.DISCR_CONSTANT_INTEGER__V51*/ meltfptr[50])); ((meltroutine_ptr_t) /*_.VALROUT___V489*/ meltfptr[488])->tabval[16] = (melt_ptr_t) ( /*_.DISCR_CONSTANT_INTEGER__V51*/ meltfptr[50]); MELT_LOCATION ("warmelt-normatch.melt:1159:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_397__NORMPAT_TUPLEPAT#17", NULL != ( /*_.LIST_TO_MULTIPLE__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V489*/ meltfptr[488])->tabval[17] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-normatch.melt:1159:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V477*/ meltfptr[476]); ((meltroutine_ptr_t) /*_.VALROUT___V489*/ meltfptr[488])->tabval[18] = (melt_ptr_t) ( /*_.VALDATA___V477*/ meltfptr[476]); MELT_LOCATION ("warmelt-normatch.melt:1159:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_397__NORMPAT_TUPLEPAT#19", NULL != ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V489*/ meltfptr[488])->tabval[19] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-normatch.melt:1249:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V491*/ meltfptr[490])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V477*/ meltfptr[476]); ((meltroutine_ptr_t) /*_.VALROUT___V491*/ meltfptr[490])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V477*/ meltfptr[476]); MELT_LOCATION ("warmelt-normatch.melt:1249:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V491*/ meltfptr[490])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_406__LAMBDA_#1", NULL != ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V491*/ meltfptr[490])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-normatch.melt:1249:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V491*/ meltfptr[490])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_406__LAMBDA_#2", NULL != ( /*_.VALBXINT___V492*/ meltfptr[491])); ((meltroutine_ptr_t) /*_.VALROUT___V491*/ meltfptr[490])->tabval[2] = (melt_ptr_t) ( /*_.VALBXINT___V492*/ meltfptr[491]); MELT_LOCATION ("warmelt-normatch.melt:1249:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V491*/ meltfptr[490])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_406__LAMBDA_#3", NULL != ( /*_.VALBXINT___V493*/ meltfptr[492])); ((meltroutine_ptr_t) /*_.VALROUT___V491*/ meltfptr[490])->tabval[3] = (melt_ptr_t) ( /*_.VALBXINT___V493*/ meltfptr[492]); MELT_LOCATION ("warmelt-normatch.melt:1249:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V491*/ meltfptr[490])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_406__LAMBDA_#4", NULL != ( /*_.VALBXINT___V494*/ meltfptr[493])); ((meltroutine_ptr_t) /*_.VALROUT___V491*/ meltfptr[490])->tabval[4] = (melt_ptr_t) ( /*_.VALBXINT___V494*/ meltfptr[493]); MELT_LOCATION ("warmelt-normatch.melt:1249:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V491*/ meltfptr[490]); MELT_LOCATION ("warmelt-normatch.melt:1159:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_397__NORMPAT_TUPLEPAT#20", NULL != ( /*_.VALROUT___V491*/ meltfptr[490])); ((meltroutine_ptr_t) /*_.VALROUT___V489*/ meltfptr[488])->tabval[20] = (melt_ptr_t) ( /*_.VALROUT___V491*/ meltfptr[490]); MELT_LOCATION ("warmelt-normatch.melt:1159:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_397__NORMPAT_TUPLEPAT#21", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V489*/ meltfptr[488])->tabval[21] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); #undef meltfram__ } /*end of meltmod__warmelt_normatch__initialmeltchunk_7 */ void meltmod__warmelt_normatch__initialmeltchunk_8 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-normatch.melt:1159:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_397__NORMPAT_TUPLEPAT#22", NULL != ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V489*/ meltfptr[488])->tabval[22] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normatch.melt:1159:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V326*/ meltfptr[325]); ((meltroutine_ptr_t) /*_.VALROUT___V489*/ meltfptr[488])->tabval[23] = (melt_ptr_t) ( /*_.VALDATA___V326*/ meltfptr[325]); MELT_LOCATION ("warmelt-normatch.melt:1159:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V429*/ meltfptr[428]); ((meltroutine_ptr_t) /*_.VALROUT___V489*/ meltfptr[488])->tabval[24] = (melt_ptr_t) ( /*_.VALCLO___V429*/ meltfptr[428]); MELT_LOCATION ("warmelt-normatch.melt:1270:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V495*/ meltfptr[494])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_410__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V495*/ meltfptr[494])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:1270:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V495*/ meltfptr[494])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_410__LAMBDA_#1", NULL != ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V495*/ meltfptr[494])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normatch.melt:1270:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V495*/ meltfptr[494])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V326*/ meltfptr[325]); ((meltroutine_ptr_t) /*_.VALROUT___V495*/ meltfptr[494])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V326*/ meltfptr[325]); MELT_LOCATION ("warmelt-normatch.melt:1270:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V495*/ meltfptr[494])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V429*/ meltfptr[428]); ((meltroutine_ptr_t) /*_.VALROUT___V495*/ meltfptr[494])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V429*/ meltfptr[428]); MELT_LOCATION ("warmelt-normatch.melt:1270:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V495*/ meltfptr[494]); MELT_LOCATION ("warmelt-normatch.melt:1159:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_397__NORMPAT_TUPLEPAT#25", NULL != ( /*_.VALROUT___V495*/ meltfptr[494])); ((meltroutine_ptr_t) /*_.VALROUT___V489*/ meltfptr[488])->tabval[25] = (melt_ptr_t) ( /*_.VALROUT___V495*/ meltfptr[494]); MELT_LOCATION ("warmelt-normatch.melt:1159:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_397__NORMPAT_TUPLEPAT#26", NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V489*/ meltfptr[488])->tabval[26] = (melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normatch.melt:1159:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_397__NORMPAT_TUPLEPAT#27", NULL != ( /*_.CLASS_NREP_SYMOCC__V46*/ meltfptr[45])); ((meltroutine_ptr_t) /*_.VALROUT___V489*/ meltfptr[488])->tabval[27] = (melt_ptr_t) ( /*_.CLASS_NREP_SYMOCC__V46*/ meltfptr[45]); MELT_LOCATION ("warmelt-normatch.melt:1159:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_397__NORMPAT_TUPLEPAT#28", NULL != ( /*_.CLASS_LET_BINDING__V47*/ meltfptr[46])); ((meltroutine_ptr_t) /*_.VALROUT___V489*/ meltfptr[488])->tabval[28] = (melt_ptr_t) ( /*_.CLASS_LET_BINDING__V47*/ meltfptr[46]); MELT_LOCATION ("warmelt-normatch.melt:1159:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_397__NORMPAT_TUPLEPAT#29", NULL != ( /*_.CLASS_NREP_UNSAFE_NTH_COMPONENT__V53*/ meltfptr[52])); ((meltroutine_ptr_t) /*_.VALROUT___V489*/ meltfptr[488])->tabval[29] = (melt_ptr_t) ( /*_.CLASS_NREP_UNSAFE_NTH_COMPONENT__V53*/ meltfptr[52]); MELT_LOCATION ("warmelt-normatch.melt:1159:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_397__NORMPAT_TUPLEPAT#30", NULL != ( /*_.CLONE_SYMBOL__V49*/ meltfptr[48])); ((meltroutine_ptr_t) /*_.VALROUT___V489*/ meltfptr[488])->tabval[30] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V49*/ meltfptr[48]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V496*/ meltfptr[495])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V497*/ meltfptr[496]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V496*/ meltfptr[495]); melt_dbgtrace_written_object ( /*_.VALDATA___V496*/ meltfptr[495], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:1159:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_397__NORMPAT_TUPLEPAT#31", NULL != ( /*_.VALDATA___V496*/ meltfptr[495])); ((meltroutine_ptr_t) /*_.VALROUT___V489*/ meltfptr[488])->tabval[31] = (melt_ptr_t) ( /*_.VALDATA___V496*/ meltfptr[495]); MELT_LOCATION ("warmelt-normatch.melt:1159:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_397__NORMPAT_TUPLEPAT#32", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V489*/ meltfptr[488])->tabval[32] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-normatch.melt:1159:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_397__NORMPAT_TUPLEPAT#33", NULL != ( /*_.CTYPE_VALUE__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V489*/ meltfptr[488])->tabval[33] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-normatch.melt:1159:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_397__NORMPAT_TUPLEPAT#34", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V42*/ meltfptr[41])); ((meltroutine_ptr_t) /*_.VALROUT___V489*/ meltfptr[488])->tabval[34] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V42*/ meltfptr[41]); MELT_LOCATION ("warmelt-normatch.melt:1159:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V228*/ meltfptr[227]); ((meltroutine_ptr_t) /*_.VALROUT___V489*/ meltfptr[488])->tabval[35] = (melt_ptr_t) ( /*_.VALDATA___V228*/ meltfptr[227]); MELT_LOCATION ("warmelt-normatch.melt:1159:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V489*/ meltfptr[488]); /*putclosurout#26 */ melt_assertmsg ("putclosrout#26 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V498*/ meltfptr[497])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#26 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V498*/ meltfptr[497])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V498*/ meltfptr[497]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V499*/ meltfptr[498])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V499*/ meltfptr[498])))); ((meltobject_ptr_t) ( /*_.VALDATA___V499*/ meltfptr[498]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V500*/ meltfptr[499]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V499*/ meltfptr[498]); melt_dbgtrace_written_object ( /*_.VALDATA___V499*/ meltfptr[498], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V501*/ meltfptr[500])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V501*/ meltfptr[500])))); ((meltobject_ptr_t) ( /*_.VALDATA___V501*/ meltfptr[500]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V502*/ meltfptr[501]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V501*/ meltfptr[500]); melt_dbgtrace_written_object ( /*_.VALDATA___V501*/ meltfptr[500], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V503*/ meltfptr[502])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V503*/ meltfptr[502])))); ((meltobject_ptr_t) ( /*_.VALDATA___V503*/ meltfptr[502]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V504*/ meltfptr[503]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V503*/ meltfptr[502]); melt_dbgtrace_written_object ( /*_.VALDATA___V503*/ meltfptr[502], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V505*/ meltfptr[504])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V506*/ meltfptr[505]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V505*/ meltfptr[504]); melt_dbgtrace_written_object ( /*_.VALDATA___V505*/ meltfptr[504], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:1346:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V507*/ meltfptr[506])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_415__NORMPAT_ANDPAT#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V507*/ meltfptr[506])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:1346:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V507*/ meltfptr[506])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V97*/ meltfptr[96]); ((meltroutine_ptr_t) /*_.VALROUT___V507*/ meltfptr[506])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-normatch.melt:1346:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V507*/ meltfptr[506])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_415__NORMPAT_ANDPAT#2", NULL != ( /*_.CLASS_SOURCE_PATTERN_AND__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V507*/ meltfptr[506])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_AND__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normatch.melt:1346:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V507*/ meltfptr[506])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_415__NORMPAT_ANDPAT#3", NULL != ( /*_.CLASS_LOCATED__V21*/ meltfptr[20])); ((meltroutine_ptr_t) /*_.VALROUT___V507*/ meltfptr[506])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-normatch.melt:1346:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V507*/ meltfptr[506])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_415__NORMPAT_ANDPAT#4", NULL != ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V507*/ meltfptr[506])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normatch.melt:1346:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V507*/ meltfptr[506])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_415__NORMPAT_ANDPAT#5", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V507*/ meltfptr[506])->tabval[5] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:1346:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V507*/ meltfptr[506])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_415__NORMPAT_ANDPAT#6", NULL != ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V507*/ meltfptr[506])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normatch.melt:1346:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V507*/ meltfptr[506])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V256*/ meltfptr[255]); ((meltroutine_ptr_t) /*_.VALROUT___V507*/ meltfptr[506])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); MELT_LOCATION ("warmelt-normatch.melt:1346:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V507*/ meltfptr[506])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V429*/ meltfptr[428]); ((meltroutine_ptr_t) /*_.VALROUT___V507*/ meltfptr[506])->tabval[8] = (melt_ptr_t) ( /*_.VALCLO___V429*/ meltfptr[428]); MELT_LOCATION ("warmelt-normatch.melt:1355:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V508*/ meltfptr[507])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_417__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V508*/ meltfptr[507])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:1355:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V508*/ meltfptr[507])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_417__LAMBDA_#1", NULL != ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V508*/ meltfptr[507])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normatch.melt:1355:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V508*/ meltfptr[507])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V256*/ meltfptr[255]); ((meltroutine_ptr_t) /*_.VALROUT___V508*/ meltfptr[507])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); MELT_LOCATION ("warmelt-normatch.melt:1355:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V508*/ meltfptr[507])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V429*/ meltfptr[428]); ((meltroutine_ptr_t) /*_.VALROUT___V508*/ meltfptr[507])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V429*/ meltfptr[428]); MELT_LOCATION ("warmelt-normatch.melt:1355:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V508*/ meltfptr[507]); MELT_LOCATION ("warmelt-normatch.melt:1346:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V507*/ meltfptr[506])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_415__NORMPAT_ANDPAT#9", NULL != ( /*_.VALROUT___V508*/ meltfptr[507])); ((meltroutine_ptr_t) /*_.VALROUT___V507*/ meltfptr[506])->tabval[9] = (melt_ptr_t) ( /*_.VALROUT___V508*/ meltfptr[507]); MELT_LOCATION ("warmelt-normatch.melt:1346:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V507*/ meltfptr[506])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V228*/ meltfptr[227]); ((meltroutine_ptr_t) /*_.VALROUT___V507*/ meltfptr[506])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V228*/ meltfptr[227]); MELT_LOCATION ("warmelt-normatch.melt:1346:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V507*/ meltfptr[506]); /*putclosurout#27 */ melt_assertmsg ("putclosrout#27 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V509*/ meltfptr[508])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#27 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V507*/ meltfptr[506])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V509*/ meltfptr[508])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V507*/ meltfptr[506]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V509*/ meltfptr[508]); MELT_LOCATION ("warmelt-normatch.melt:1395:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_418__NORMPAT_ORPAT#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:1395:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V97*/ meltfptr[96]); ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-normatch.melt:1395:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_418__NORMPAT_ORPAT#2", NULL != ( /*_.CLASS_SOURCE_PATTERN_OR__V32*/ meltfptr[31])); ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_OR__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-normatch.melt:1395:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_418__NORMPAT_ORPAT#3", NULL != ( /*_.CLASS_LOCATED__V21*/ meltfptr[20])); ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-normatch.melt:1395:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_418__NORMPAT_ORPAT#4", NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-normatch.melt:1395:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_418__NORMPAT_ORPAT#5", NULL != ( /*_.MAPOBJECT_SORTED_ATTRIBUTE_TUPLE__V54*/ meltfptr[53])); ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[5] = (melt_ptr_t) ( /*_.MAPOBJECT_SORTED_ATTRIBUTE_TUPLE__V54*/ meltfptr[53]); MELT_LOCATION ("warmelt-normatch.melt:1395:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V332*/ meltfptr[331]); ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V332*/ meltfptr[331]); MELT_LOCATION ("warmelt-normatch.melt:1395:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_418__NORMPAT_ORPAT#7", NULL != ( /*_.MULTIPLE_MAP__V55*/ meltfptr[54])); ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[7] = (melt_ptr_t) ( /*_.MULTIPLE_MAP__V55*/ meltfptr[54]); MELT_LOCATION ("warmelt-normatch.melt:1395:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V232*/ meltfptr[231]); ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231]); MELT_LOCATION ("warmelt-normatch.melt:1395:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_418__NORMPAT_ORPAT#9", NULL != ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13])); ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-normatch.melt:1395:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_418__NORMPAT_ORPAT#10", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[10] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:1424:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V511*/ meltfptr[510])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V232*/ meltfptr[231]); ((meltroutine_ptr_t) /*_.VALROUT___V511*/ meltfptr[510])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231]); MELT_LOCATION ("warmelt-normatch.melt:1424:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V511*/ meltfptr[510])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_424__LAMBDA_#1", NULL != ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13])); ((meltroutine_ptr_t) /*_.VALROUT___V511*/ meltfptr[510])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-normatch.melt:1424:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V511*/ meltfptr[510])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_424__LAMBDA_#2", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V511*/ meltfptr[510])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:1424:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V511*/ meltfptr[510]); MELT_LOCATION ("warmelt-normatch.melt:1395:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_418__NORMPAT_ORPAT#11", NULL != ( /*_.VALROUT___V511*/ meltfptr[510])); ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[11] = (melt_ptr_t) ( /*_.VALROUT___V511*/ meltfptr[510]); MELT_LOCATION ("warmelt-normatch.melt:1395:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_418__NORMPAT_ORPAT#12", NULL != ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normatch.melt:1395:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V425*/ meltfptr[424]); ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[13] = (melt_ptr_t) ( /*_.VALCLO___V425*/ meltfptr[424]); MELT_LOCATION ("warmelt-normatch.melt:1395:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V232*/ meltfptr[231]); ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[14] = (melt_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231]); MELT_LOCATION ("warmelt-normatch.melt:1395:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_418__NORMPAT_ORPAT#15", NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[15] = (melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normatch.melt:1395:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V296*/ meltfptr[295]); ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[16] = (melt_ptr_t) ( /*_.VALDATA___V296*/ meltfptr[295]); MELT_LOCATION ("warmelt-normatch.melt:1395:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_418__NORMPAT_ORPAT#17", NULL != ( /*_.LIST_TO_MULTIPLE__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[17] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-normatch.melt:1395:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_418__NORMPAT_ORPAT#18", NULL != ( /*_.DISCR_MULTIPLE__V45*/ meltfptr[44])); ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[18] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V45*/ meltfptr[44]); MELT_LOCATION ("warmelt-normatch.melt:1395:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_418__NORMPAT_ORPAT#19", NULL != ( /*_.CLASS_NREP__V56*/ meltfptr[55])); ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[19] = (melt_ptr_t) ( /*_.CLASS_NREP__V56*/ meltfptr[55]); MELT_LOCATION ("warmelt-normatch.melt:1395:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V435*/ meltfptr[434]); ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[20] = (melt_ptr_t) ( /*_.VALCLO___V435*/ meltfptr[434]); MELT_LOCATION ("warmelt-normatch.melt:1395:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_418__NORMPAT_ORPAT#21", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[21] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:1395:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_418__NORMPAT_ORPAT#22", NULL != ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[22] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normatch.melt:1395:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V429*/ meltfptr[428]); ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[23] = (melt_ptr_t) ( /*_.VALCLO___V429*/ meltfptr[428]); MELT_LOCATION ("warmelt-normatch.melt:1504:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V512*/ meltfptr[511])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_427__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V512*/ meltfptr[511])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:1504:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V512*/ meltfptr[511])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_427__LAMBDA_#1", NULL != ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V512*/ meltfptr[511])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normatch.melt:1504:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V512*/ meltfptr[511])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V429*/ meltfptr[428]); ((meltroutine_ptr_t) /*_.VALROUT___V512*/ meltfptr[511])->tabval[2] = (melt_ptr_t) ( /*_.VALCLO___V429*/ meltfptr[428]); MELT_LOCATION ("warmelt-normatch.melt:1504:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V512*/ meltfptr[511]); MELT_LOCATION ("warmelt-normatch.melt:1395:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_418__NORMPAT_ORPAT#24", NULL != ( /*_.VALROUT___V512*/ meltfptr[511])); ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[24] = (melt_ptr_t) ( /*_.VALROUT___V512*/ meltfptr[511]); MELT_LOCATION ("warmelt-normatch.melt:1395:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V228*/ meltfptr[227]); ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[25] = (melt_ptr_t) ( /*_.VALDATA___V228*/ meltfptr[227]); MELT_LOCATION ("warmelt-normatch.melt:1395:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V312*/ meltfptr[311]); ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[26] = (melt_ptr_t) ( /*_.VALDATA___V312*/ meltfptr[311]); MELT_LOCATION ("warmelt-normatch.melt:1395:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V429*/ meltfptr[428]); ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[27] = (melt_ptr_t) ( /*_.VALCLO___V429*/ meltfptr[428]); MELT_LOCATION ("warmelt-normatch.melt:1395:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V232*/ meltfptr[231]); ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[28] = (melt_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231]); MELT_LOCATION ("warmelt-normatch.melt:1395:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_418__NORMPAT_ORPAT#29", NULL != ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13])); ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[29] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-normatch.melt:1395:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_418__NORMPAT_ORPAT#30", NULL != ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[30] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normatch.melt:1395:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_418__NORMPAT_ORPAT#31", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[31] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:1558:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V513*/ meltfptr[512])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V232*/ meltfptr[231]); ((meltroutine_ptr_t) /*_.VALROUT___V513*/ meltfptr[512])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231]); MELT_LOCATION ("warmelt-normatch.melt:1558:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V513*/ meltfptr[512])) == 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___V513*/ meltfptr[512])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-normatch.melt:1558:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V513*/ meltfptr[512])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_428__LAMBDA_#2", NULL != ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V513*/ meltfptr[512])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normatch.melt:1558:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V513*/ meltfptr[512])) == 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___V513*/ meltfptr[512])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:1558:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V513*/ meltfptr[512]); MELT_LOCATION ("warmelt-normatch.melt:1395:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_418__NORMPAT_ORPAT#32", NULL != ( /*_.VALROUT___V513*/ meltfptr[512])); ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[32] = (melt_ptr_t) ( /*_.VALROUT___V513*/ meltfptr[512]); MELT_LOCATION ("warmelt-normatch.melt:1395:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V510*/ meltfptr[509]); /*putclosurout#28 */ melt_assertmsg ("putclosrout#28 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V514*/ meltfptr[513])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#28 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V514*/ meltfptr[513])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V510*/ meltfptr[509]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V514*/ meltfptr[513]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V515*/ meltfptr[514])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V515*/ meltfptr[514])))); ((meltobject_ptr_t) ( /*_.VALDATA___V515*/ meltfptr[514]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V516*/ meltfptr[515]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V515*/ meltfptr[514]); melt_dbgtrace_written_object ( /*_.VALDATA___V515*/ meltfptr[514], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V517*/ meltfptr[516])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V517*/ meltfptr[516])))); ((meltobject_ptr_t) ( /*_.VALDATA___V517*/ meltfptr[516]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V518*/ meltfptr[517]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V517*/ meltfptr[516]); melt_dbgtrace_written_object ( /*_.VALDATA___V517*/ meltfptr[516], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V519*/ meltfptr[518])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V520*/ meltfptr[519]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V519*/ meltfptr[518]); melt_dbgtrace_written_object ( /*_.VALDATA___V519*/ meltfptr[518], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == 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___V521*/ meltfptr[520])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V97*/ meltfptr[96]); ((meltroutine_ptr_t) /*_.VALROUT___V521*/ meltfptr[520])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == 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___V521*/ meltfptr[520])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_MATCHER__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == 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___V521*/ meltfptr[520])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == 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___V521*/ meltfptr[520])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_COMPOSITE__V28*/ meltfptr[27]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == 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___V521*/ meltfptr[520])->tabval[5] = (melt_ptr_t) ( /*_.GET_CTYPE__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == 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___V521*/ meltfptr[520])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_ANY_MATCHER__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == 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___V521*/ meltfptr[520])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V58*/ meltfptr[57]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == 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___V521*/ meltfptr[520])->tabval[8] = (melt_ptr_t) ( /*_.FIND_ENV__V59*/ meltfptr[58]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == 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___V521*/ meltfptr[520])->tabval[9] = (melt_ptr_t) ( /*_.NORMAL_EXP__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == 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___V521*/ meltfptr[520])->tabval[10] = (melt_ptr_t) ( /*_.NORMALIZE_TUPLE__V31*/ meltfptr[30]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == 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___V521*/ meltfptr[520])->tabval[11] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V18*/ meltfptr[17]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == 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___V521*/ meltfptr[520])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == 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___V521*/ meltfptr[520])->tabval[13] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); #undef meltfram__ } /*end of meltmod__warmelt_normatch__initialmeltchunk_8 */ void meltmod__warmelt_normatch__initialmeltchunk_9 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == 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___V521*/ meltfptr[520])->tabval[14] = (melt_ptr_t) ( /*_.FRESH_ENV__V60*/ meltfptr[59]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == 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___V521*/ meltfptr[520])->tabval[15] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == 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___V521*/ meltfptr[520])->tabval[16] = (melt_ptr_t) ( /*_.PUT_ENV__V61*/ meltfptr[60]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V360*/ meltfptr[359]); ((meltroutine_ptr_t) /*_.VALROUT___V521*/ meltfptr[520])->tabval[17] = (melt_ptr_t) ( /*_.VALDATA___V360*/ meltfptr[359]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V256*/ meltfptr[255]); ((meltroutine_ptr_t) /*_.VALROUT___V521*/ meltfptr[520])->tabval[18] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V256*/ meltfptr[255]); ((meltroutine_ptr_t) /*_.VALROUT___V521*/ meltfptr[520])->tabval[19] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == 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___V521*/ meltfptr[520])->tabval[20] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:1729:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V522*/ meltfptr[521])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V256*/ meltfptr[255]); ((meltroutine_ptr_t) /*_.VALROUT___V522*/ meltfptr[521])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); MELT_LOCATION ("warmelt-normatch.melt:1729:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V522*/ meltfptr[521])) == 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___V522*/ meltfptr[521])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:1729:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V522*/ meltfptr[521]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#21", NULL != ( /*_.VALROUT___V522*/ meltfptr[521])); ((meltroutine_ptr_t) /*_.VALROUT___V521*/ meltfptr[520])->tabval[21] = (melt_ptr_t) ( /*_.VALROUT___V522*/ meltfptr[521]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V256*/ meltfptr[255]); ((meltroutine_ptr_t) /*_.VALROUT___V521*/ meltfptr[520])->tabval[22] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == 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___V521*/ meltfptr[520])->tabval[23] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:1742:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V523*/ meltfptr[522])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V256*/ meltfptr[255]); ((meltroutine_ptr_t) /*_.VALROUT___V523*/ meltfptr[522])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); MELT_LOCATION ("warmelt-normatch.melt:1742:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V523*/ meltfptr[522])) == 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___V523*/ meltfptr[522])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:1742:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V523*/ meltfptr[522]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#24", NULL != ( /*_.VALROUT___V523*/ meltfptr[522])); ((meltroutine_ptr_t) /*_.VALROUT___V521*/ meltfptr[520])->tabval[24] = (melt_ptr_t) ( /*_.VALROUT___V523*/ meltfptr[522]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#25", NULL != ( /*_.MULTIPLE_MAP__V55*/ meltfptr[54])); ((meltroutine_ptr_t) /*_.VALROUT___V521*/ meltfptr[520])->tabval[25] = (melt_ptr_t) ( /*_.MULTIPLE_MAP__V55*/ meltfptr[54]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == 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___V521*/ meltfptr[520])->tabval[26] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == 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___V521*/ meltfptr[520])->tabval[27] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#28", NULL != ( /*_.CLONE_SYMBOL__V49*/ meltfptr[48])); ((meltroutine_ptr_t) /*_.VALROUT___V521*/ meltfptr[520])->tabval[28] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V49*/ meltfptr[48]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == 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___V521*/ meltfptr[520])->tabval[29] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V58*/ meltfptr[57]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == 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___V521*/ meltfptr[520])->tabval[30] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == 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___V521*/ meltfptr[520])->tabval[31] = (melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == 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___V521*/ meltfptr[520])->tabval[32] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V42*/ meltfptr[41]); MELT_LOCATION ("warmelt-normatch.melt:1754:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V524*/ meltfptr[523])) == 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___V524*/ meltfptr[523])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:1754:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V524*/ meltfptr[523])) == 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___V524*/ meltfptr[523])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normatch.melt:1754:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V524*/ meltfptr[523])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_443__LAMBDA_#2", NULL != ( /*_.CLONE_SYMBOL__V49*/ meltfptr[48])); ((meltroutine_ptr_t) /*_.VALROUT___V524*/ meltfptr[523])->tabval[2] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V49*/ meltfptr[48]); MELT_LOCATION ("warmelt-normatch.melt:1754:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V524*/ meltfptr[523])) == 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___V524*/ meltfptr[523])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V58*/ meltfptr[57]); MELT_LOCATION ("warmelt-normatch.melt:1754:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V524*/ meltfptr[523])) == 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___V524*/ meltfptr[523])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-normatch.melt:1754:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V524*/ meltfptr[523])) == 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___V524*/ meltfptr[523])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normatch.melt:1754:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V524*/ meltfptr[523])) == 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___V524*/ meltfptr[523])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V42*/ meltfptr[41]); MELT_LOCATION ("warmelt-normatch.melt:1754:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V524*/ meltfptr[523]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#33", NULL != ( /*_.VALROUT___V524*/ meltfptr[523])); ((meltroutine_ptr_t) /*_.VALROUT___V521*/ meltfptr[520])->tabval[33] = (melt_ptr_t) ( /*_.VALROUT___V524*/ meltfptr[523]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == 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___V521*/ meltfptr[520])->tabval[34] = (melt_ptr_t) ( /*_.MULTIPLE_TO_LIST__V62*/ meltfptr[61]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == 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___V521*/ meltfptr[520])->tabval[35] = (melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V425*/ meltfptr[424]); ((meltroutine_ptr_t) /*_.VALROUT___V521*/ meltfptr[520])->tabval[36] = (melt_ptr_t) ( /*_.VALCLO___V425*/ meltfptr[424]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#37", NULL != ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V521*/ meltfptr[520])->tabval[37] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == 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___V521*/ meltfptr[520])->tabval[38] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V429*/ meltfptr[428]); ((meltroutine_ptr_t) /*_.VALROUT___V521*/ meltfptr[520])->tabval[39] = (melt_ptr_t) ( /*_.VALCLO___V429*/ meltfptr[428]); MELT_LOCATION ("warmelt-normatch.melt:1825:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V525*/ meltfptr[524])) == 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___V525*/ meltfptr[524])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:1825:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V525*/ meltfptr[524])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V429*/ meltfptr[428]); ((meltroutine_ptr_t) /*_.VALROUT___V525*/ meltfptr[524])->tabval[1] = (melt_ptr_t) ( /*_.VALCLO___V429*/ meltfptr[428]); MELT_LOCATION ("warmelt-normatch.melt:1825:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V525*/ meltfptr[524]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_429__NORMPAT_ANYMATCHPAT#40", NULL != ( /*_.VALROUT___V525*/ meltfptr[524])); ((meltroutine_ptr_t) /*_.VALROUT___V521*/ meltfptr[520])->tabval[40] = (melt_ptr_t) ( /*_.VALROUT___V525*/ meltfptr[524]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V228*/ meltfptr[227]); ((meltroutine_ptr_t) /*_.VALROUT___V521*/ meltfptr[520])->tabval[41] = (melt_ptr_t) ( /*_.VALDATA___V228*/ meltfptr[227]); MELT_LOCATION ("warmelt-normatch.melt:1591:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V521*/ meltfptr[520]); /*putclosurout#29 */ melt_assertmsg ("putclosrout#29 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V526*/ meltfptr[525])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#29 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V526*/ meltfptr[525])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V521*/ meltfptr[520]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V526*/ meltfptr[525]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V527*/ meltfptr[526])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V527*/ meltfptr[526])))); ((meltobject_ptr_t) ( /*_.VALDATA___V527*/ meltfptr[526]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V528*/ meltfptr[527]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V527*/ meltfptr[526]); melt_dbgtrace_written_object ( /*_.VALDATA___V527*/ meltfptr[526], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V529*/ meltfptr[528])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V529*/ meltfptr[528])))); ((meltobject_ptr_t) ( /*_.VALDATA___V529*/ meltfptr[528]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V530*/ meltfptr[529]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V529*/ meltfptr[528]); melt_dbgtrace_written_object ( /*_.VALDATA___V529*/ meltfptr[528], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V531*/ meltfptr[530])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V531*/ meltfptr[530])))); ((meltobject_ptr_t) ( /*_.VALDATA___V531*/ meltfptr[530]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V532*/ meltfptr[531]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V531*/ meltfptr[530]); melt_dbgtrace_written_object ( /*_.VALDATA___V531*/ meltfptr[530], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V533*/ meltfptr[532])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V534*/ meltfptr[533]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V533*/ meltfptr[532]); melt_dbgtrace_written_object ( /*_.VALDATA___V533*/ meltfptr[532], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V535*/ meltfptr[534])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V536*/ meltfptr[535]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V535*/ meltfptr[534]); melt_dbgtrace_written_object ( /*_.VALDATA___V535*/ meltfptr[534], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V537*/ meltfptr[536])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V537*/ meltfptr[536])))); ((meltobject_ptr_t) ( /*_.VALDATA___V537*/ meltfptr[536]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V538*/ meltfptr[537]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V537*/ meltfptr[536]); melt_dbgtrace_written_object ( /*_.VALDATA___V537*/ meltfptr[536], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:1851:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V539*/ meltfptr[538])) == 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___V539*/ meltfptr[538])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:1851:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V539*/ meltfptr[538])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V97*/ meltfptr[96]); ((meltroutine_ptr_t) /*_.VALROUT___V539*/ meltfptr[538])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-normatch.melt:1851:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V539*/ meltfptr[538])) == 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___V539*/ meltfptr[538])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_CONSTANT__V16*/ meltfptr[15]); MELT_LOCATION ("warmelt-normatch.melt:1851:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V539*/ meltfptr[538])) == 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___V539*/ meltfptr[538])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-normatch.melt:1851:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V539*/ meltfptr[538])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V350*/ meltfptr[349]); ((meltroutine_ptr_t) /*_.VALROUT___V539*/ meltfptr[538])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]); MELT_LOCATION ("warmelt-normatch.melt:1851:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V539*/ meltfptr[538])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V256*/ meltfptr[255]); ((meltroutine_ptr_t) /*_.VALROUT___V539*/ meltfptr[538])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); MELT_LOCATION ("warmelt-normatch.melt:1851:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V539*/ meltfptr[538])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V256*/ meltfptr[255]); ((meltroutine_ptr_t) /*_.VALROUT___V539*/ meltfptr[538])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); MELT_LOCATION ("warmelt-normatch.melt:1851:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V539*/ meltfptr[538])) == 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___V539*/ meltfptr[538])->tabval[7] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:1885:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V540*/ meltfptr[539])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V256*/ meltfptr[255]); ((meltroutine_ptr_t) /*_.VALROUT___V540*/ meltfptr[539])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); MELT_LOCATION ("warmelt-normatch.melt:1885:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V540*/ meltfptr[539])) == 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___V540*/ meltfptr[539])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:1885:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V540*/ meltfptr[539]); MELT_LOCATION ("warmelt-normatch.melt:1851:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V539*/ meltfptr[538])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_447__NORMPAT_CONSTPAT#8", NULL != ( /*_.VALROUT___V540*/ meltfptr[539])); ((meltroutine_ptr_t) /*_.VALROUT___V539*/ meltfptr[538])->tabval[8] = (melt_ptr_t) ( /*_.VALROUT___V540*/ meltfptr[539]); MELT_LOCATION ("warmelt-normatch.melt:1851:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V539*/ meltfptr[538])) == 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___V539*/ meltfptr[538])->tabval[9] = (melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-normatch.melt:1851:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V539*/ meltfptr[538])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V425*/ meltfptr[424]); ((meltroutine_ptr_t) /*_.VALROUT___V539*/ meltfptr[538])->tabval[10] = (melt_ptr_t) ( /*_.VALCLO___V425*/ meltfptr[424]); MELT_LOCATION ("warmelt-normatch.melt:1851:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V539*/ meltfptr[538]); /*putclosurout#30 */ melt_assertmsg ("putclosrout#30 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V541*/ meltfptr[540])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#30 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V539*/ meltfptr[538])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V541*/ meltfptr[540])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V539*/ meltfptr[538]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V541*/ meltfptr[540]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V542*/ meltfptr[541])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V543*/ meltfptr[542]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V542*/ meltfptr[541]); melt_dbgtrace_written_object ( /*_.VALDATA___V542*/ meltfptr[541], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:1927:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V544*/ meltfptr[543])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V544*/ meltfptr[543])))); ((meltobject_ptr_t) ( /*_.VALDATA___V544*/ meltfptr[543]))->obj_vartab[0] = (melt_ptr_t) ( ( /*nil */ NULL)); MELT_LOCATION ("warmelt-normatch.melt:1927:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V544*/ meltfptr[543]); MELT_LOCATION ("warmelt-normatch.melt:1927:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V544*/ meltfptr[543], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:1930:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V545*/ meltfptr[544])) == 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___V545*/ meltfptr[544])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:1930:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V545*/ meltfptr[544])) == 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___V545*/ meltfptr[544])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_STRING__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normatch.melt:1930:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V545*/ meltfptr[544])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V544*/ meltfptr[543]); ((meltroutine_ptr_t) /*_.VALROUT___V545*/ meltfptr[544])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V544*/ meltfptr[543]); MELT_LOCATION ("warmelt-normatch.melt:1930:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V545*/ meltfptr[544])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_453__MATCH_GRAPHIC_OPTSET#3", NULL != ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V545*/ meltfptr[544])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normatch.melt:1930:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V545*/ meltfptr[544]); /*putclosurout#31 */ melt_assertmsg ("putclosrout#31 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V546*/ meltfptr[545])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#31 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V545*/ meltfptr[544])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V546*/ meltfptr[545])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V545*/ meltfptr[544]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V546*/ meltfptr[545]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V547*/ meltfptr[546])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V548*/ meltfptr[547]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V547*/ meltfptr[546]); melt_dbgtrace_written_object ( /*_.VALDATA___V547*/ meltfptr[546], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V549*/ meltfptr[548])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V549*/ meltfptr[548])))); ((meltobject_ptr_t) ( /*_.VALDATA___V549*/ meltfptr[548]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V550*/ meltfptr[549]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V549*/ meltfptr[548]); melt_dbgtrace_written_object ( /*_.VALDATA___V549*/ meltfptr[548], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V551*/ meltfptr[550])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V552*/ meltfptr[551]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V551*/ meltfptr[550]); melt_dbgtrace_written_object ( /*_.VALDATA___V551*/ meltfptr[550], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V554*/ meltfptr[553])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V555*/ meltfptr[554]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V554*/ meltfptr[553]); melt_dbgtrace_written_object ( /*_.VALDATA___V554*/ meltfptr[553], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V556*/ meltfptr[555])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V556*/ meltfptr[555])))); ((meltobject_ptr_t) ( /*_.VALDATA___V556*/ meltfptr[555]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V557*/ meltfptr[556]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V556*/ meltfptr[555]); melt_dbgtrace_written_object ( /*_.VALDATA___V556*/ meltfptr[555], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:1945:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V559*/ meltfptr[558]); MELT_LOCATION ("warmelt-normatch.melt:1945:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557])))); ((meltobject_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557]))->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___V560*/ meltfptr[559])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #183 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V560*/ meltfptr[559])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V560*/ meltfptr[559]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_PROPED__V65*/ meltfptr[64]), 5))), (0)))); /*putupl#184 */ melt_assertmsg ("putupl #184 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V560*/ meltfptr[559])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #184 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V560*/ meltfptr[559])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V560*/ meltfptr[559]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_PROPED__V65*/ meltfptr[64]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V560*/ meltfptr[559]); MELT_LOCATION ("warmelt-normatch.melt:1945:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557])))); ((meltobject_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V560*/ meltfptr[559]); MELT_LOCATION ("warmelt-normatch.melt:1945:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V561*/ meltfptr[560])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V561*/ meltfptr[560])))); ((meltobject_ptr_t) ( /*_.VALDATA___V561*/ meltfptr[560]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V562*/ meltfptr[561]); MELT_LOCATION ("warmelt-normatch.melt:1945:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V561*/ meltfptr[560])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V561*/ meltfptr[560])))); ((meltobject_ptr_t) ( /*_.VALDATA___V561*/ meltfptr[560]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557]); MELT_LOCATION ("warmelt-normatch.melt:1945:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V561*/ meltfptr[560]); MELT_LOCATION ("warmelt-normatch.melt:1945:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V561*/ meltfptr[560], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:1945:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V563*/ meltfptr[562])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V563*/ meltfptr[562])))); ((meltobject_ptr_t) ( /*_.VALDATA___V563*/ meltfptr[562]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V564*/ meltfptr[563]); MELT_LOCATION ("warmelt-normatch.melt:1945:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V563*/ meltfptr[562])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V563*/ meltfptr[562])))); ((meltobject_ptr_t) ( /*_.VALDATA___V563*/ meltfptr[562]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557]); MELT_LOCATION ("warmelt-normatch.melt:1945:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V563*/ meltfptr[562]); MELT_LOCATION ("warmelt-normatch.melt:1945:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V563*/ meltfptr[562], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:1945:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V565*/ meltfptr[564])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V565*/ meltfptr[564])))); ((meltobject_ptr_t) ( /*_.VALDATA___V565*/ meltfptr[564]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V566*/ meltfptr[565]); MELT_LOCATION ("warmelt-normatch.melt:1945:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V565*/ meltfptr[564])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V565*/ meltfptr[564])))); ((meltobject_ptr_t) ( /*_.VALDATA___V565*/ meltfptr[564]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557]); MELT_LOCATION ("warmelt-normatch.melt:1945:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V565*/ meltfptr[564]); #undef meltfram__ } /*end of meltmod__warmelt_normatch__initialmeltchunk_9 */ void meltmod__warmelt_normatch__initialmeltchunk_10 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-normatch.melt:1945:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V565*/ meltfptr[564], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:1945:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V567*/ meltfptr[566])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V568*/ meltfptr[567]); MELT_LOCATION ("warmelt-normatch.melt:1945:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V567*/ meltfptr[566])) == 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] = (melt_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557]); MELT_LOCATION ("warmelt-normatch.melt:1945:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V567*/ meltfptr[566]); MELT_LOCATION ("warmelt-normatch.melt:1945:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V567*/ meltfptr[566], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:1945:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V569*/ meltfptr[568])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V570*/ meltfptr[569]); MELT_LOCATION ("warmelt-normatch.melt:1945:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V569*/ meltfptr[568])) == 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] = (melt_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557]); MELT_LOCATION ("warmelt-normatch.melt:1945:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V569*/ meltfptr[568]); MELT_LOCATION ("warmelt-normatch.melt:1945:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V569*/ meltfptr[568], "new static instance"); /*putupl#185 */ melt_assertmsg ("putupl #185 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V571*/ meltfptr[570])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #185 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V571*/ meltfptr[570])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V571*/ meltfptr[570]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_PROPED__V65*/ meltfptr[64]), 6))), (0)))); /*putupl#186 */ melt_assertmsg ("putupl #186 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V571*/ meltfptr[570])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #186 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V571*/ meltfptr[570])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V571*/ meltfptr[570]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V561*/ meltfptr[560]); /*putupl#187 */ melt_assertmsg ("putupl #187 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V571*/ meltfptr[570])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #187 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V571*/ meltfptr[570])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V571*/ meltfptr[570]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V563*/ meltfptr[562]); /*putupl#188 */ melt_assertmsg ("putupl #188 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V571*/ meltfptr[570])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #188 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V571*/ meltfptr[570])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V571*/ meltfptr[570]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V565*/ meltfptr[564]); /*putupl#189 */ melt_assertmsg ("putupl #189 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V571*/ meltfptr[570])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #189 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V571*/ meltfptr[570])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V571*/ meltfptr[570]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V567*/ meltfptr[566]); /*putupl#190 */ melt_assertmsg ("putupl #190 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V571*/ meltfptr[570])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #190 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V571*/ meltfptr[570])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V571*/ meltfptr[570]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V569*/ meltfptr[568]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V571*/ meltfptr[570]); MELT_LOCATION ("warmelt-normatch.melt:1945:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557])))); ((meltobject_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V571*/ meltfptr[570]); MELT_LOCATION ("warmelt-normatch.melt:1945:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V558*/ meltfptr[557]); MELT_LOCATION ("warmelt-normatch.melt:1945:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V558*/ meltfptr[557], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V572*/ meltfptr[571])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V572*/ meltfptr[571])))); ((meltobject_ptr_t) ( /*_.VALDATA___V572*/ meltfptr[571]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V573*/ meltfptr[572]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V572*/ meltfptr[571]); melt_dbgtrace_written_object ( /*_.VALDATA___V572*/ meltfptr[571], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V574*/ meltfptr[573])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V575*/ meltfptr[574]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V574*/ meltfptr[573]); melt_dbgtrace_written_object ( /*_.VALDATA___V574*/ meltfptr[573], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V576*/ meltfptr[575])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V577*/ meltfptr[576]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V576*/ meltfptr[575]); melt_dbgtrace_written_object ( /*_.VALDATA___V576*/ meltfptr[575], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V578*/ meltfptr[577])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V579*/ meltfptr[578]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V578*/ meltfptr[577]); melt_dbgtrace_written_object ( /*_.VALDATA___V578*/ meltfptr[577], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V580*/ meltfptr[579])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V581*/ meltfptr[580]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V580*/ meltfptr[579]); melt_dbgtrace_written_object ( /*_.VALDATA___V580*/ meltfptr[579], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:1959:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V582*/ meltfptr[581])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V256*/ meltfptr[255]); ((meltroutine_ptr_t) /*_.VALROUT___V582*/ meltfptr[581])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); MELT_LOCATION ("warmelt-normatch.melt:1959:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V582*/ meltfptr[581])) == 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___V582*/ meltfptr[581])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:1959:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V582*/ meltfptr[581]); /*putclosurout#32 */ melt_assertmsg ("putclosrout#32 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V583*/ meltfptr[582])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#32 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V582*/ meltfptr[581])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V583*/ meltfptr[582])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V582*/ meltfptr[581]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V583*/ meltfptr[582]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V584*/ meltfptr[583])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V584*/ meltfptr[583])))); ((meltobject_ptr_t) ( /*_.VALDATA___V584*/ meltfptr[583]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V585*/ meltfptr[584]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V584*/ meltfptr[583]); melt_dbgtrace_written_object ( /*_.VALDATA___V584*/ meltfptr[583], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:1983:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V586*/ meltfptr[585])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V586*/ meltfptr[585])))); ((meltobject_ptr_t) ( /*_.VALDATA___V586*/ meltfptr[585]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V587*/ meltfptr[586]); MELT_LOCATION ("warmelt-normatch.melt:1983:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V586*/ meltfptr[585]); MELT_LOCATION ("warmelt-normatch.melt:1983:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V586*/ meltfptr[585], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:1985:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) 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_496__MGLABEL_ANY#0", NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V588*/ meltfptr[587])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:1985:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) 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_496__MGLABEL_ANY#1", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V588*/ meltfptr[587])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:1985:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V588*/ meltfptr[587]); /*putclosurout#33 */ melt_assertmsg ("putclosrout#33 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V589*/ meltfptr[588])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#33 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V588*/ meltfptr[587])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V589*/ meltfptr[588])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V588*/ meltfptr[587]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V589*/ meltfptr[588]); MELT_LOCATION ("warmelt-normatch.melt:1995:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V590*/ meltfptr[589])) == 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___V590*/ meltfptr[589])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:1995:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V590*/ meltfptr[589])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V256*/ meltfptr[255]); ((meltroutine_ptr_t) /*_.VALROUT___V590*/ meltfptr[589])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); MELT_LOCATION ("warmelt-normatch.melt:1995:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V590*/ meltfptr[589])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V558*/ meltfptr[557]); ((meltroutine_ptr_t) /*_.VALROUT___V590*/ meltfptr[589])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557]); MELT_LOCATION ("warmelt-normatch.melt:1995:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V590*/ meltfptr[589])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V583*/ meltfptr[582]); ((meltroutine_ptr_t) /*_.VALROUT___V590*/ meltfptr[589])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V583*/ meltfptr[582]); MELT_LOCATION ("warmelt-normatch.melt:1995:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V590*/ meltfptr[589])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_498__MGLABEL_ANY_TEST#4", NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V590*/ meltfptr[589])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normatch.melt:1995:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V590*/ meltfptr[589])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_498__MGLABEL_ANY_TEST#5", NULL != ( /*_.CLASS_CLONED_SYMBOL__V66*/ meltfptr[65])); ((meltroutine_ptr_t) /*_.VALROUT___V590*/ meltfptr[589])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V66*/ meltfptr[65]); MELT_LOCATION ("warmelt-normatch.melt:1995:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V590*/ meltfptr[589])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_498__MGLABEL_ANY_TEST#6", NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V590*/ meltfptr[589])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:1995:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V590*/ meltfptr[589]); /*putclosurout#34 */ melt_assertmsg ("putclosrout#34 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V591*/ meltfptr[590])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#34 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V590*/ meltfptr[589])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V591*/ meltfptr[590])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V590*/ meltfptr[589]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V591*/ meltfptr[590]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V592*/ meltfptr[591])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V593*/ meltfptr[592]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V592*/ meltfptr[591]); melt_dbgtrace_written_object ( /*_.VALDATA___V592*/ meltfptr[591], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2055:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V594*/ meltfptr[593])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_502__MGLABEL_INSTANCE_TEST#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V594*/ meltfptr[593])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:2055:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V594*/ meltfptr[593])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V382*/ meltfptr[381]); ((meltroutine_ptr_t) /*_.VALROUT___V594*/ meltfptr[593])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V382*/ meltfptr[381]); MELT_LOCATION ("warmelt-normatch.melt:2055:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V594*/ meltfptr[593])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V558*/ meltfptr[557]); ((meltroutine_ptr_t) /*_.VALROUT___V594*/ meltfptr[593])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557]); MELT_LOCATION ("warmelt-normatch.melt:2055:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V594*/ meltfptr[593])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V583*/ meltfptr[582]); ((meltroutine_ptr_t) /*_.VALROUT___V594*/ meltfptr[593])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V583*/ meltfptr[582]); MELT_LOCATION ("warmelt-normatch.melt:2055:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V594*/ meltfptr[593])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_502__MGLABEL_INSTANCE_TEST#4", NULL != ( /*_.CLASS_NREP_SYMOCC__V46*/ meltfptr[45])); ((meltroutine_ptr_t) /*_.VALROUT___V594*/ meltfptr[593])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_NREP_SYMOCC__V46*/ meltfptr[45]); MELT_LOCATION ("warmelt-normatch.melt:2055:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V594*/ meltfptr[593])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_502__MGLABEL_INSTANCE_TEST#5", NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V594*/ meltfptr[593])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:2055:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V594*/ meltfptr[593])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_502__MGLABEL_INSTANCE_TEST#6", NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V594*/ meltfptr[593])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normatch.melt:2055:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V594*/ meltfptr[593])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_502__MGLABEL_INSTANCE_TEST#7", NULL != ( /*_.CLASS_CLONED_SYMBOL__V66*/ meltfptr[65])); ((meltroutine_ptr_t) /*_.VALROUT___V594*/ meltfptr[593])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V66*/ meltfptr[65]); MELT_LOCATION ("warmelt-normatch.melt:2055:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V594*/ meltfptr[593]); /*putclosurout#35 */ melt_assertmsg ("putclosrout#35 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V595*/ meltfptr[594])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#35 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V594*/ meltfptr[593])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V595*/ meltfptr[594])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V594*/ meltfptr[593]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V595*/ meltfptr[594]); MELT_LOCATION ("warmelt-normatch.melt:2120:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V596*/ meltfptr[595])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_504__MGLABEL_SUCCESS_TEST#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V596*/ meltfptr[595])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:2120:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V596*/ meltfptr[595])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V286*/ meltfptr[285]); ((meltroutine_ptr_t) /*_.VALROUT___V596*/ meltfptr[595])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V286*/ meltfptr[285]); MELT_LOCATION ("warmelt-normatch.melt:2120:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V596*/ meltfptr[595])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V558*/ meltfptr[557]); ((meltroutine_ptr_t) /*_.VALROUT___V596*/ meltfptr[595])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557]); MELT_LOCATION ("warmelt-normatch.melt:2120:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V596*/ meltfptr[595])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V583*/ meltfptr[582]); ((meltroutine_ptr_t) /*_.VALROUT___V596*/ meltfptr[595])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V583*/ meltfptr[582]); MELT_LOCATION ("warmelt-normatch.melt:2120:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V596*/ meltfptr[595]); /*putclosurout#36 */ melt_assertmsg ("putclosrout#36 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V597*/ meltfptr[596])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#36 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V596*/ meltfptr[595])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V597*/ meltfptr[596])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V596*/ meltfptr[595]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V597*/ meltfptr[596]); MELT_LOCATION ("warmelt-normatch.melt:2160:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V598*/ meltfptr[597])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_506__MATCHGRAPHIC_TESTS#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V598*/ meltfptr[597])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:2160:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V598*/ meltfptr[597])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V558*/ meltfptr[557]); ((meltroutine_ptr_t) /*_.VALROUT___V598*/ meltfptr[597])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557]); MELT_LOCATION ("warmelt-normatch.melt:2160:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V598*/ meltfptr[597])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V256*/ meltfptr[255]); ((meltroutine_ptr_t) /*_.VALROUT___V598*/ meltfptr[597])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); MELT_LOCATION ("warmelt-normatch.melt:2160:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V598*/ meltfptr[597])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V583*/ meltfptr[582]); ((meltroutine_ptr_t) /*_.VALROUT___V598*/ meltfptr[597])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V583*/ meltfptr[582]); MELT_LOCATION ("warmelt-normatch.melt:2160:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V598*/ meltfptr[597])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V586*/ meltfptr[585]); ((meltroutine_ptr_t) /*_.VALROUT___V598*/ meltfptr[597])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V586*/ meltfptr[585]); MELT_LOCATION ("warmelt-normatch.melt:2160:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V598*/ meltfptr[597]); /*putclosurout#37 */ melt_assertmsg ("putclosrout#37 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V599*/ meltfptr[598])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#37 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V598*/ meltfptr[597])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V599*/ meltfptr[598])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V598*/ meltfptr[597]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V599*/ meltfptr[598]); MELT_LOCATION ("warmelt-normatch.melt:2213:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V600*/ meltfptr[599])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_508__MG_DRAW_MATCH_GRAPHVIZ_FILE#0", NULL != ( /*_.DISCR_STRBUF__V67*/ meltfptr[66])); ((meltroutine_ptr_t) /*_.VALROUT___V600*/ meltfptr[599])->tabval[0] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V67*/ meltfptr[66]); MELT_LOCATION ("warmelt-normatch.melt:2213:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V600*/ meltfptr[599])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_508__MG_DRAW_MATCH_GRAPHVIZ_FILE#1", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V600*/ meltfptr[599])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:2213:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V600*/ meltfptr[599])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_508__MG_DRAW_MATCH_GRAPHVIZ_FILE#2", NULL != ( /*_.DISCR_STRING__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V600*/ meltfptr[599])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_STRING__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normatch.melt:2213:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V600*/ meltfptr[599])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V558*/ meltfptr[557]); ((meltroutine_ptr_t) /*_.VALROUT___V600*/ meltfptr[599])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557]); MELT_LOCATION ("warmelt-normatch.melt:2213:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V600*/ meltfptr[599])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V599*/ meltfptr[598]); ((meltroutine_ptr_t) /*_.VALROUT___V600*/ meltfptr[599])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V599*/ meltfptr[598]); MELT_LOCATION ("warmelt-normatch.melt:2213:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V600*/ meltfptr[599]); /*putclosurout#38 */ melt_assertmsg ("putclosrout#38 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V601*/ meltfptr[600])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#38 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V600*/ meltfptr[599])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V601*/ meltfptr[600])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V600*/ meltfptr[599]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V601*/ meltfptr[600]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V602*/ meltfptr[601])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V602*/ meltfptr[601])))); ((meltobject_ptr_t) ( /*_.VALDATA___V602*/ meltfptr[601]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V603*/ meltfptr[602]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V602*/ meltfptr[601]); melt_dbgtrace_written_object ( /*_.VALDATA___V602*/ meltfptr[601], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#0", NULL != ( /*_.CLASS_SOURCE_MATCH__V68*/ meltfptr[67])); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_MATCH__V68*/ meltfptr[67]); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#1", NULL != ( /*_.CLASS_ENVIRONMENT__V69*/ meltfptr[68])); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V69*/ meltfptr[68]); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V42*/ meltfptr[41])); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V42*/ meltfptr[41]); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#3", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#4", NULL != ( /*_.DISCR_MULTIPLE__V45*/ meltfptr[44])); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V45*/ meltfptr[44]); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#5", NULL != ( /*_.DISCR_MAP_OBJECTS__V33*/ meltfptr[32])); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V33*/ meltfptr[32]); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#6", NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#7", NULL != ( /*_.CLONE_SYMBOL__V49*/ meltfptr[48])); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[7] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V49*/ meltfptr[48]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V605*/ meltfptr[604])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V606*/ meltfptr[605]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V605*/ meltfptr[604]); melt_dbgtrace_written_object ( /*_.VALDATA___V605*/ meltfptr[604], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#8", NULL != ( /*_.VALDATA___V605*/ meltfptr[604])); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V605*/ meltfptr[604]); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#9", NULL != ( /*_.CLASS_NREP_CHECKSIGNAL__V70*/ meltfptr[69])); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_NREP_CHECKSIGNAL__V70*/ meltfptr[69]); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#10", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#11", NULL != ( /*_.CTYPE_VOID__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[11] = (melt_ptr_t) ( /*_.CTYPE_VOID__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#12", NULL != ( /*_.NORMAL_EXP__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[12] = (melt_ptr_t) ( /*_.NORMAL_EXP__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#13", NULL != ( /*_.GET_CTYPE__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[13] = (melt_ptr_t) ( /*_.GET_CTYPE__V19*/ meltfptr[18]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V607*/ meltfptr[606])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V608*/ meltfptr[607]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V607*/ meltfptr[606]); melt_dbgtrace_written_object ( /*_.VALDATA___V607*/ meltfptr[606], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#14", NULL != ( /*_.VALDATA___V607*/ meltfptr[606])); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[14] = (melt_ptr_t) ( /*_.VALDATA___V607*/ meltfptr[606]); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#15", NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[15] = (melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#16", NULL != ( /*_.CLASS_SOURCE_MATCH_CASE__V72*/ meltfptr[71])); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[16] = (melt_ptr_t) ( /*_.CLASS_SOURCE_MATCH_CASE__V72*/ meltfptr[71]); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V97*/ meltfptr[96]); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[17] = (melt_ptr_t) ( /*_.VALDATA___V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#18", NULL != ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[18] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V149*/ meltfptr[148]); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[19] = (melt_ptr_t) ( /*_.VALDATA___V149*/ meltfptr[148]); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V228*/ meltfptr[227]); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[20] = (melt_ptr_t) ( /*_.VALDATA___V228*/ meltfptr[227]); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#21", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[21] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); #undef meltfram__ } /*end of meltmod__warmelt_normatch__initialmeltchunk_10 */ void meltmod__warmelt_normatch__initialmeltchunk_11 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#22", NULL != ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[22] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normatch.melt:2389:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V609*/ meltfptr[608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_528__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V609*/ meltfptr[608])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:2389:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V609*/ meltfptr[608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_528__LAMBDA_#1", NULL != ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V609*/ meltfptr[608])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normatch.melt:2389:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V609*/ meltfptr[608]); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#23", NULL != ( /*_.VALROUT___V609*/ meltfptr[608])); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[23] = (melt_ptr_t) ( /*_.VALROUT___V609*/ meltfptr[608]); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V286*/ meltfptr[285]); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[24] = (melt_ptr_t) ( /*_.VALDATA___V286*/ meltfptr[285]); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V429*/ meltfptr[428]); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[25] = (melt_ptr_t) ( /*_.VALCLO___V429*/ meltfptr[428]); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V256*/ meltfptr[255]); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[26] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V326*/ meltfptr[325]); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[27] = (melt_ptr_t) ( /*_.VALDATA___V326*/ meltfptr[325]); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V435*/ meltfptr[434]); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[28] = (melt_ptr_t) ( /*_.VALCLO___V435*/ meltfptr[434]); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#29", NULL != ( /*_.MAPOBJECT_SORTED_ATTRIBUTE_TUPLE__V54*/ meltfptr[53])); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[29] = (melt_ptr_t) ( /*_.MAPOBJECT_SORTED_ATTRIBUTE_TUPLE__V54*/ meltfptr[53]); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#30", NULL != ( /*_.FRESH_ENV__V60*/ meltfptr[59])); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[30] = (melt_ptr_t) ( /*_.FRESH_ENV__V60*/ meltfptr[59]); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#31", NULL != ( /*_.PUT_ENV__V61*/ meltfptr[60])); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[31] = (melt_ptr_t) ( /*_.PUT_ENV__V61*/ meltfptr[60]); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#32", NULL != ( /*_.NORMALIZE_TUPLE__V31*/ meltfptr[30])); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[32] = (melt_ptr_t) ( /*_.NORMALIZE_TUPLE__V31*/ meltfptr[30]); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#33", NULL != ( /*_.WRAP_NORMAL_LETSEQ__V73*/ meltfptr[72])); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[33] = (melt_ptr_t) ( /*_.WRAP_NORMAL_LETSEQ__V73*/ meltfptr[72]); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#34", NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[34] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#35", NULL != ( /*_.LIST_TO_MULTIPLE__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[35] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V408*/ meltfptr[407]); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[36] = (melt_ptr_t) ( /*_.VALDATA___V408*/ meltfptr[407]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V610*/ meltfptr[609])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V611*/ meltfptr[610]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V610*/ meltfptr[609]); melt_dbgtrace_written_object ( /*_.VALDATA___V610*/ meltfptr[609], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#37", NULL != ( /*_.VALDATA___V610*/ meltfptr[609])); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[37] = (melt_ptr_t) ( /*_.VALDATA___V610*/ meltfptr[609]); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_512__NORMEXP_MATCH#38", NULL != ( /*_.CLASS_NREP_SYMOCC__V46*/ meltfptr[45])); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[38] = (melt_ptr_t) ( /*_.CLASS_NREP_SYMOCC__V46*/ meltfptr[45]); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V544*/ meltfptr[543]); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[39] = (melt_ptr_t) ( /*_.VALDATA___V544*/ meltfptr[543]); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V601*/ meltfptr[600]); ((meltroutine_ptr_t) /*_.VALROUT___V604*/ meltfptr[603])->tabval[40] = (melt_ptr_t) ( /*_.VALCLO___V601*/ meltfptr[600]); MELT_LOCATION ("warmelt-normatch.melt:2280:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V604*/ meltfptr[603]); /*putclosurout#39 */ melt_assertmsg ("putclosrout#39 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V612*/ meltfptr[611])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#39 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V612*/ meltfptr[611])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V612*/ meltfptr[611]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V613*/ meltfptr[612])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V613*/ meltfptr[612])))); ((meltobject_ptr_t) ( /*_.VALDATA___V613*/ meltfptr[612]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V614*/ meltfptr[613]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V613*/ meltfptr[612]); melt_dbgtrace_written_object ( /*_.VALDATA___V613*/ meltfptr[612], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V615*/ meltfptr[614])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V615*/ meltfptr[614])))); ((meltobject_ptr_t) ( /*_.VALDATA___V615*/ meltfptr[614]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V616*/ meltfptr[615]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V615*/ meltfptr[614]); melt_dbgtrace_written_object ( /*_.VALDATA___V615*/ meltfptr[614], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V617*/ meltfptr[616])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V617*/ meltfptr[616])))); ((meltobject_ptr_t) ( /*_.VALDATA___V617*/ meltfptr[616]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V618*/ meltfptr[617]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V617*/ meltfptr[616]); melt_dbgtrace_written_object ( /*_.VALDATA___V617*/ meltfptr[616], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V619*/ meltfptr[618])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V619*/ meltfptr[618])))); ((meltobject_ptr_t) ( /*_.VALDATA___V619*/ meltfptr[618]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V620*/ meltfptr[619]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V619*/ meltfptr[618]); melt_dbgtrace_written_object ( /*_.VALDATA___V619*/ meltfptr[618], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V621*/ meltfptr[620])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V622*/ meltfptr[621]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V621*/ meltfptr[620]); melt_dbgtrace_written_object ( /*_.VALDATA___V621*/ meltfptr[620], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V623*/ meltfptr[622])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V624*/ meltfptr[623]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V623*/ meltfptr[622]); melt_dbgtrace_written_object ( /*_.VALDATA___V623*/ meltfptr[622], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V625*/ meltfptr[624])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V626*/ meltfptr[625]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V625*/ meltfptr[624]); melt_dbgtrace_written_object ( /*_.VALDATA___V625*/ meltfptr[624], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V627*/ meltfptr[626])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V628*/ meltfptr[627]); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V627*/ meltfptr[626])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V627*/ meltfptr[626])))); ((meltobject_ptr_t) ( /*_.VALDATA___V627*/ meltfptr[626]))->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___V629*/ meltfptr[628])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #191 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V629*/ meltfptr[628])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V629*/ meltfptr[628]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V629*/ meltfptr[628]); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V627*/ meltfptr[626])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V627*/ meltfptr[626])))); ((meltobject_ptr_t) ( /*_.VALDATA___V627*/ meltfptr[626]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V629*/ meltfptr[628]); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V630*/ meltfptr[629])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V630*/ meltfptr[629])))); ((meltobject_ptr_t) ( /*_.VALDATA___V630*/ meltfptr[629]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V631*/ meltfptr[630]); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V630*/ meltfptr[629])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V630*/ meltfptr[629])))); ((meltobject_ptr_t) ( /*_.VALDATA___V630*/ meltfptr[629]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V627*/ meltfptr[626]); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V630*/ meltfptr[629]); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V630*/ meltfptr[629], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V632*/ meltfptr[631])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V633*/ meltfptr[632]); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V632*/ meltfptr[631])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V632*/ meltfptr[631])))); ((meltobject_ptr_t) ( /*_.VALDATA___V632*/ meltfptr[631]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V627*/ meltfptr[626]); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V632*/ meltfptr[631]); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V632*/ meltfptr[631], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V634*/ meltfptr[633])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V635*/ meltfptr[634]); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V634*/ meltfptr[633])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V634*/ meltfptr[633])))); ((meltobject_ptr_t) ( /*_.VALDATA___V634*/ meltfptr[633]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V627*/ meltfptr[626]); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V634*/ meltfptr[633]); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V634*/ meltfptr[633], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V636*/ meltfptr[635])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V636*/ meltfptr[635])))); ((meltobject_ptr_t) ( /*_.VALDATA___V636*/ meltfptr[635]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V637*/ meltfptr[636]); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V636*/ meltfptr[635])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V636*/ meltfptr[635])))); ((meltobject_ptr_t) ( /*_.VALDATA___V636*/ meltfptr[635]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V627*/ meltfptr[626]); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V636*/ meltfptr[635]); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V636*/ meltfptr[635], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V638*/ meltfptr[637])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V639*/ meltfptr[638]); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V638*/ meltfptr[637])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V638*/ meltfptr[637])))); ((meltobject_ptr_t) ( /*_.VALDATA___V638*/ meltfptr[637]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V627*/ meltfptr[626]); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V638*/ meltfptr[637]); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V638*/ meltfptr[637], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V640*/ meltfptr[639])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V641*/ meltfptr[640]); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V640*/ meltfptr[639])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V640*/ meltfptr[639])))); ((meltobject_ptr_t) ( /*_.VALDATA___V640*/ meltfptr[639]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V627*/ meltfptr[626]); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V640*/ meltfptr[639]); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V640*/ meltfptr[639], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V642*/ meltfptr[641])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V643*/ meltfptr[642]); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V642*/ meltfptr[641])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V642*/ meltfptr[641])))); ((meltobject_ptr_t) ( /*_.VALDATA___V642*/ meltfptr[641]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V627*/ meltfptr[626]); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V642*/ meltfptr[641]); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V642*/ meltfptr[641], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V644*/ meltfptr[643])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V645*/ meltfptr[644]); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V644*/ meltfptr[643])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V644*/ meltfptr[643])))); ((meltobject_ptr_t) ( /*_.VALDATA___V644*/ meltfptr[643]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V627*/ meltfptr[626]); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V644*/ meltfptr[643]); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V644*/ meltfptr[643], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V646*/ meltfptr[645])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V647*/ meltfptr[646]); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V646*/ meltfptr[645])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V646*/ meltfptr[645])))); ((meltobject_ptr_t) ( /*_.VALDATA___V646*/ meltfptr[645]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V627*/ meltfptr[626]); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V646*/ meltfptr[645]); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V646*/ meltfptr[645], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V648*/ meltfptr[647])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V649*/ meltfptr[648]); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V648*/ meltfptr[647])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V648*/ meltfptr[647])))); ((meltobject_ptr_t) ( /*_.VALDATA___V648*/ meltfptr[647]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V627*/ meltfptr[626]); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V648*/ meltfptr[647]); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V648*/ meltfptr[647], "new static instance"); /*putupl#192 */ melt_assertmsg ("putupl #192 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #192 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V630*/ meltfptr[629]); /*putupl#193 */ melt_assertmsg ("putupl #193 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #193 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V632*/ meltfptr[631]); /*putupl#194 */ melt_assertmsg ("putupl #194 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #194 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V634*/ meltfptr[633]); /*putupl#195 */ melt_assertmsg ("putupl #195 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #195 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V636*/ meltfptr[635]); /*putupl#196 */ melt_assertmsg ("putupl #196 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #196 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V638*/ meltfptr[637]); /*putupl#197 */ melt_assertmsg ("putupl #197 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #197 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V640*/ meltfptr[639]); /*putupl#198 */ melt_assertmsg ("putupl #198 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #198 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V642*/ meltfptr[641]); /*putupl#199 */ melt_assertmsg ("putupl #199 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #199 checkoff", (7 >= 0 && 7 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649]))->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V644*/ meltfptr[643]); /*putupl#200 */ melt_assertmsg ("putupl #200 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #200 checkoff", (8 >= 0 && 8 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649]))->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V646*/ meltfptr[645]); /*putupl#201 */ melt_assertmsg ("putupl #201 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #201 checkoff", (9 >= 0 && 9 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649]))->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V648*/ meltfptr[647]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V650*/ meltfptr[649]); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V627*/ meltfptr[626])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V627*/ meltfptr[626])))); ((meltobject_ptr_t) ( /*_.VALDATA___V627*/ meltfptr[626]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649]); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V627*/ meltfptr[626]); MELT_LOCATION ("warmelt-normatch.melt:2623:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V627*/ meltfptr[626], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V651*/ meltfptr[650])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V651*/ meltfptr[650])))); ((meltobject_ptr_t) ( /*_.VALDATA___V651*/ meltfptr[650]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V652*/ meltfptr[651]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V651*/ meltfptr[650]); melt_dbgtrace_written_object ( /*_.VALDATA___V651*/ meltfptr[650], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V653*/ meltfptr[652])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V653*/ meltfptr[652])))); ((meltobject_ptr_t) ( /*_.VALDATA___V653*/ meltfptr[652]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V654*/ meltfptr[653]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V653*/ meltfptr[652]); melt_dbgtrace_written_object ( /*_.VALDATA___V653*/ meltfptr[652], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V655*/ meltfptr[654])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V655*/ meltfptr[654])))); ((meltobject_ptr_t) ( /*_.VALDATA___V655*/ meltfptr[654]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V656*/ meltfptr[655]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V655*/ meltfptr[654]); melt_dbgtrace_written_object ( /*_.VALDATA___V655*/ meltfptr[654], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V657*/ meltfptr[656])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V657*/ meltfptr[656])))); ((meltobject_ptr_t) ( /*_.VALDATA___V657*/ meltfptr[656]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V658*/ meltfptr[657]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V657*/ meltfptr[656]); melt_dbgtrace_written_object ( /*_.VALDATA___V657*/ meltfptr[656], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V659*/ meltfptr[658])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V659*/ meltfptr[658])))); ((meltobject_ptr_t) ( /*_.VALDATA___V659*/ meltfptr[658]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V660*/ meltfptr[659]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V659*/ meltfptr[658]); melt_dbgtrace_written_object ( /*_.VALDATA___V659*/ meltfptr[658], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V661*/ meltfptr[660])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V661*/ meltfptr[660])))); ((meltobject_ptr_t) ( /*_.VALDATA___V661*/ meltfptr[660]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V662*/ meltfptr[661]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V661*/ meltfptr[660]); melt_dbgtrace_written_object ( /*_.VALDATA___V661*/ meltfptr[660], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V663*/ meltfptr[662])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V663*/ meltfptr[662])))); ((meltobject_ptr_t) ( /*_.VALDATA___V663*/ meltfptr[662]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V664*/ meltfptr[663]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V663*/ meltfptr[662]); #undef meltfram__ } /*end of meltmod__warmelt_normatch__initialmeltchunk_11 */ void meltmod__warmelt_normatch__initialmeltchunk_12 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; melt_dbgtrace_written_object ( /*_.VALDATA___V663*/ meltfptr[662], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V665*/ meltfptr[664])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V666*/ meltfptr[665]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V665*/ meltfptr[664]); melt_dbgtrace_written_object ( /*_.VALDATA___V665*/ meltfptr[664], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V667*/ meltfptr[666])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V668*/ meltfptr[667]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V667*/ meltfptr[666]); melt_dbgtrace_written_object ( /*_.VALDATA___V667*/ meltfptr[666], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V669*/ meltfptr[668])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V670*/ meltfptr[669]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V669*/ meltfptr[668]); melt_dbgtrace_written_object ( /*_.VALDATA___V669*/ meltfptr[668], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V671*/ meltfptr[670])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V672*/ meltfptr[671]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V671*/ meltfptr[670]); melt_dbgtrace_written_object ( /*_.VALDATA___V671*/ meltfptr[670], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2647:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V673*/ meltfptr[672])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V674*/ meltfptr[673]); MELT_LOCATION ("warmelt-normatch.melt:2647:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V673*/ meltfptr[672])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V673*/ meltfptr[672])))); ((meltobject_ptr_t) ( /*_.VALDATA___V673*/ meltfptr[672]))->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___V675*/ meltfptr[674])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #202 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V675*/ meltfptr[674])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V675*/ meltfptr[674]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_PROPED__V65*/ meltfptr[64]), 5))), (0)))); /*putupl#203 */ melt_assertmsg ("putupl #203 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V675*/ meltfptr[674])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #203 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) ( /*_.CLASS_PROPED__V65*/ meltfptr[64]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V675*/ meltfptr[674]); MELT_LOCATION ("warmelt-normatch.melt:2647:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V673*/ meltfptr[672])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V673*/ meltfptr[672])))); ((meltobject_ptr_t) ( /*_.VALDATA___V673*/ meltfptr[672]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V675*/ meltfptr[674]); MELT_LOCATION ("warmelt-normatch.melt:2647:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V676*/ meltfptr[675])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V677*/ meltfptr[676]); MELT_LOCATION ("warmelt-normatch.melt:2647:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V676*/ meltfptr[675])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V676*/ meltfptr[675])))); ((meltobject_ptr_t) ( /*_.VALDATA___V676*/ meltfptr[675]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V673*/ meltfptr[672]); MELT_LOCATION ("warmelt-normatch.melt:2647:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V676*/ meltfptr[675]); MELT_LOCATION ("warmelt-normatch.melt:2647:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V676*/ meltfptr[675], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2647:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V678*/ meltfptr[677])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V679*/ meltfptr[678]); MELT_LOCATION ("warmelt-normatch.melt:2647:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V678*/ meltfptr[677])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V678*/ meltfptr[677])))); ((meltobject_ptr_t) ( /*_.VALDATA___V678*/ meltfptr[677]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V673*/ meltfptr[672]); MELT_LOCATION ("warmelt-normatch.melt:2647:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V678*/ meltfptr[677]); MELT_LOCATION ("warmelt-normatch.melt:2647:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V678*/ meltfptr[677], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2647:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V680*/ meltfptr[679])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V681*/ meltfptr[680]); MELT_LOCATION ("warmelt-normatch.melt:2647:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V680*/ meltfptr[679])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V680*/ meltfptr[679])))); ((meltobject_ptr_t) ( /*_.VALDATA___V680*/ meltfptr[679]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V673*/ meltfptr[672]); MELT_LOCATION ("warmelt-normatch.melt:2647:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V680*/ meltfptr[679]); MELT_LOCATION ("warmelt-normatch.melt:2647:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V680*/ meltfptr[679], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2647:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V682*/ meltfptr[681])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V683*/ meltfptr[682]); MELT_LOCATION ("warmelt-normatch.melt:2647:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V682*/ meltfptr[681])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V682*/ meltfptr[681])))); ((meltobject_ptr_t) ( /*_.VALDATA___V682*/ meltfptr[681]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V673*/ meltfptr[672]); MELT_LOCATION ("warmelt-normatch.melt:2647:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V682*/ meltfptr[681]); MELT_LOCATION ("warmelt-normatch.melt:2647:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V682*/ meltfptr[681], "new static instance"); /*putupl#204 */ melt_assertmsg ("putupl #204 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V684*/ meltfptr[683])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #204 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V684*/ meltfptr[683])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V684*/ meltfptr[683]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_PROPED__V65*/ meltfptr[64]), 6))), (0)))); /*putupl#205 */ melt_assertmsg ("putupl #205 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V684*/ meltfptr[683])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #205 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V684*/ meltfptr[683])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V684*/ meltfptr[683]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V676*/ meltfptr[675]); /*putupl#206 */ melt_assertmsg ("putupl #206 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V684*/ meltfptr[683])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #206 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V684*/ meltfptr[683])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V684*/ meltfptr[683]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V678*/ meltfptr[677]); /*putupl#207 */ melt_assertmsg ("putupl #207 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V684*/ meltfptr[683])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #207 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V684*/ meltfptr[683])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V684*/ meltfptr[683]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V680*/ meltfptr[679]); /*putupl#208 */ melt_assertmsg ("putupl #208 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V684*/ meltfptr[683])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #208 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.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___V684*/ meltfptr[683]); MELT_LOCATION ("warmelt-normatch.melt:2647:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V673*/ meltfptr[672])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V673*/ meltfptr[672])))); ((meltobject_ptr_t) ( /*_.VALDATA___V673*/ meltfptr[672]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V684*/ meltfptr[683]); MELT_LOCATION ("warmelt-normatch.melt:2647:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V673*/ meltfptr[672]); MELT_LOCATION ("warmelt-normatch.melt:2647:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V673*/ meltfptr[672], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V685*/ meltfptr[684])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V685*/ meltfptr[684])))); ((meltobject_ptr_t) ( /*_.VALDATA___V685*/ meltfptr[684]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V686*/ meltfptr[685]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V685*/ meltfptr[684]); melt_dbgtrace_written_object ( /*_.VALDATA___V685*/ meltfptr[684], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V687*/ meltfptr[686])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V687*/ meltfptr[686])))); ((meltobject_ptr_t) ( /*_.VALDATA___V687*/ meltfptr[686]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V688*/ meltfptr[687]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V687*/ meltfptr[686]); melt_dbgtrace_written_object ( /*_.VALDATA___V687*/ meltfptr[686], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V690*/ meltfptr[689]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V689*/ meltfptr[688]); melt_dbgtrace_written_object ( /*_.VALDATA___V689*/ meltfptr[688], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V691*/ meltfptr[690])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V692*/ meltfptr[691]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V691*/ meltfptr[690]); melt_dbgtrace_written_object ( /*_.VALDATA___V691*/ meltfptr[690], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V693*/ meltfptr[692])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V694*/ meltfptr[693]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V693*/ meltfptr[692]); melt_dbgtrace_written_object ( /*_.VALDATA___V693*/ meltfptr[692], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2659:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V696*/ meltfptr[695]); MELT_LOCATION ("warmelt-normatch.melt:2659:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694])))); ((meltobject_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]))->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___V697*/ meltfptr[696])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #209 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V697*/ meltfptr[696])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V697*/ meltfptr[696]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_PROPED__V65*/ meltfptr[64]), 5))), (0)))); /*putupl#210 */ melt_assertmsg ("putupl #210 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V697*/ meltfptr[696])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #210 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) ( /*_.CLASS_PROPED__V65*/ meltfptr[64]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V697*/ meltfptr[696]); MELT_LOCATION ("warmelt-normatch.melt:2659:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694])))); ((meltobject_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V697*/ meltfptr[696]); MELT_LOCATION ("warmelt-normatch.melt:2659:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V698*/ meltfptr[697])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V699*/ meltfptr[698]); MELT_LOCATION ("warmelt-normatch.melt:2659:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V698*/ meltfptr[697])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V698*/ meltfptr[697])))); ((meltobject_ptr_t) ( /*_.VALDATA___V698*/ meltfptr[697]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); MELT_LOCATION ("warmelt-normatch.melt:2659:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V698*/ meltfptr[697]); MELT_LOCATION ("warmelt-normatch.melt:2659:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V698*/ meltfptr[697], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2659:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V700*/ meltfptr[699])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V701*/ meltfptr[700]); MELT_LOCATION ("warmelt-normatch.melt:2659:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V700*/ meltfptr[699])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V700*/ meltfptr[699])))); ((meltobject_ptr_t) ( /*_.VALDATA___V700*/ meltfptr[699]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); MELT_LOCATION ("warmelt-normatch.melt:2659:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V700*/ meltfptr[699]); MELT_LOCATION ("warmelt-normatch.melt:2659:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V700*/ meltfptr[699], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2659:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V702*/ meltfptr[701])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V703*/ meltfptr[702]); MELT_LOCATION ("warmelt-normatch.melt:2659:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V702*/ meltfptr[701])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V702*/ meltfptr[701])))); ((meltobject_ptr_t) ( /*_.VALDATA___V702*/ meltfptr[701]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); MELT_LOCATION ("warmelt-normatch.melt:2659:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V702*/ meltfptr[701]); MELT_LOCATION ("warmelt-normatch.melt:2659:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V702*/ meltfptr[701], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2659:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V704*/ meltfptr[703])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V705*/ meltfptr[704]); MELT_LOCATION ("warmelt-normatch.melt:2659:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V704*/ meltfptr[703])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V704*/ meltfptr[703])))); ((meltobject_ptr_t) ( /*_.VALDATA___V704*/ meltfptr[703]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); MELT_LOCATION ("warmelt-normatch.melt:2659:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V704*/ meltfptr[703]); MELT_LOCATION ("warmelt-normatch.melt:2659:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V704*/ meltfptr[703], "new static instance"); /*putupl#211 */ melt_assertmsg ("putupl #211 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V706*/ meltfptr[705])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #211 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V706*/ meltfptr[705])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V706*/ meltfptr[705]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_PROPED__V65*/ meltfptr[64]), 6))), (0)))); /*putupl#212 */ melt_assertmsg ("putupl #212 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V706*/ meltfptr[705])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #212 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V706*/ meltfptr[705])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V706*/ meltfptr[705]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V698*/ meltfptr[697]); /*putupl#213 */ melt_assertmsg ("putupl #213 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V706*/ meltfptr[705])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #213 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___V700*/ meltfptr[699]); /*putupl#214 */ melt_assertmsg ("putupl #214 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V706*/ meltfptr[705])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #214 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___V702*/ meltfptr[701]); /*putupl#215 */ melt_assertmsg ("putupl #215 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V706*/ meltfptr[705])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #215 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___V704*/ meltfptr[703]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V706*/ meltfptr[705]); MELT_LOCATION ("warmelt-normatch.melt:2659:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694])))); ((meltobject_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V706*/ meltfptr[705]); MELT_LOCATION ("warmelt-normatch.melt:2659:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V695*/ meltfptr[694]); MELT_LOCATION ("warmelt-normatch.melt:2659:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V695*/ meltfptr[694], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V707*/ meltfptr[706])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V708*/ meltfptr[707]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V707*/ meltfptr[706]); melt_dbgtrace_written_object ( /*_.VALDATA___V707*/ meltfptr[706], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V709*/ meltfptr[708])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V709*/ meltfptr[708])))); ((meltobject_ptr_t) ( /*_.VALDATA___V709*/ meltfptr[708]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V710*/ meltfptr[709]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V709*/ meltfptr[708]); melt_dbgtrace_written_object ( /*_.VALDATA___V709*/ meltfptr[708], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V711*/ meltfptr[710])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V711*/ meltfptr[710])))); ((meltobject_ptr_t) ( /*_.VALDATA___V711*/ meltfptr[710]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V712*/ meltfptr[711]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V711*/ meltfptr[710]); melt_dbgtrace_written_object ( /*_.VALDATA___V711*/ meltfptr[710], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V713*/ meltfptr[712])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V713*/ meltfptr[712])))); ((meltobject_ptr_t) ( /*_.VALDATA___V713*/ meltfptr[712]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V714*/ meltfptr[713]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V713*/ meltfptr[712]); melt_dbgtrace_written_object ( /*_.VALDATA___V713*/ meltfptr[712], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V715*/ meltfptr[714])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V715*/ meltfptr[714])))); ((meltobject_ptr_t) ( /*_.VALDATA___V715*/ meltfptr[714]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V716*/ meltfptr[715]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V715*/ meltfptr[714]); melt_dbgtrace_written_object ( /*_.VALDATA___V715*/ meltfptr[714], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2674:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V717*/ meltfptr[716])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V718*/ meltfptr[717]); MELT_LOCATION ("warmelt-normatch.melt:2674:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V717*/ meltfptr[716])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V717*/ meltfptr[716])))); ((meltobject_ptr_t) ( /*_.VALDATA___V717*/ meltfptr[716]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); /*putupl#216 */ melt_assertmsg ("putupl #216 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V719*/ meltfptr[718])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #216 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V719*/ meltfptr[718])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V719*/ meltfptr[718]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_PROPED__V65*/ meltfptr[64]), 5))), (0)))); /*putupl#217 */ melt_assertmsg ("putupl #217 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V719*/ meltfptr[718])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #217 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V719*/ meltfptr[718])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V719*/ meltfptr[718]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_PROPED__V65*/ meltfptr[64]); /*putupl#218 */ melt_assertmsg ("putupl #218 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V719*/ meltfptr[718])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #218 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V719*/ meltfptr[718])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V719*/ meltfptr[718]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V719*/ meltfptr[718]); MELT_LOCATION ("warmelt-normatch.melt:2674:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V717*/ meltfptr[716])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V717*/ meltfptr[716])))); ((meltobject_ptr_t) ( /*_.VALDATA___V717*/ meltfptr[716]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V719*/ meltfptr[718]); /*putupl#219 */ melt_assertmsg ("putupl #219 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V720*/ meltfptr[719])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #219 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V720*/ meltfptr[719])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V720*/ meltfptr[719]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_PROPED__V65*/ meltfptr[64]), 6))), (0)))); /*putupl#220 */ melt_assertmsg ("putupl #220 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V720*/ meltfptr[719])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #220 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V720*/ meltfptr[719])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V720*/ meltfptr[719]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V698*/ meltfptr[697]); /*putupl#221 */ melt_assertmsg ("putupl #221 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V720*/ meltfptr[719])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #221 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V720*/ meltfptr[719])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V720*/ meltfptr[719]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V700*/ meltfptr[699]); /*putupl#222 */ melt_assertmsg ("putupl #222 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V720*/ meltfptr[719])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #222 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V720*/ meltfptr[719])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V720*/ meltfptr[719]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V702*/ meltfptr[701]); /*putupl#223 */ melt_assertmsg ("putupl #223 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V720*/ meltfptr[719])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #223 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V720*/ meltfptr[719])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V720*/ meltfptr[719]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V704*/ meltfptr[703]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V720*/ meltfptr[719]); MELT_LOCATION ("warmelt-normatch.melt:2674:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V717*/ meltfptr[716])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V717*/ meltfptr[716])))); ((meltobject_ptr_t) ( /*_.VALDATA___V717*/ meltfptr[716]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V720*/ meltfptr[719]); MELT_LOCATION ("warmelt-normatch.melt:2674:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V717*/ meltfptr[716]); MELT_LOCATION ("warmelt-normatch.melt:2674:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V717*/ meltfptr[716], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V721*/ meltfptr[720])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V722*/ meltfptr[721]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V721*/ meltfptr[720]); melt_dbgtrace_written_object ( /*_.VALDATA___V721*/ meltfptr[720], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2680:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V723*/ meltfptr[722])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V723*/ meltfptr[722])))); ((meltobject_ptr_t) ( /*_.VALDATA___V723*/ meltfptr[722]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V724*/ meltfptr[723]); MELT_LOCATION ("warmelt-normatch.melt:2680:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V723*/ meltfptr[722])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V723*/ meltfptr[722])))); ((meltobject_ptr_t) ( /*_.VALDATA___V723*/ meltfptr[722]))->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___V725*/ meltfptr[724])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #224 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V725*/ meltfptr[724])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V725*/ meltfptr[724]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V58*/ meltfptr[57]), 5))), (0)))); /*putupl#225 */ melt_assertmsg ("putupl #225 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V725*/ meltfptr[724])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #225 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V725*/ meltfptr[724])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V725*/ meltfptr[724]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V58*/ meltfptr[57]); #undef meltfram__ } /*end of meltmod__warmelt_normatch__initialmeltchunk_12 */ void meltmod__warmelt_normatch__initialmeltchunk_13 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*touch:INITUP_*/ meltgc_touch ( /*_.VALTUP___V725*/ meltfptr[724]); MELT_LOCATION ("warmelt-normatch.melt:2680:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V723*/ meltfptr[722])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V723*/ meltfptr[722])))); ((meltobject_ptr_t) ( /*_.VALDATA___V723*/ meltfptr[722]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V725*/ meltfptr[724]); MELT_LOCATION ("warmelt-normatch.melt:2680:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V726*/ meltfptr[725])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V727*/ meltfptr[726]); MELT_LOCATION ("warmelt-normatch.melt:2680:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V726*/ meltfptr[725])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V726*/ meltfptr[725])))); ((meltobject_ptr_t) ( /*_.VALDATA___V726*/ meltfptr[725]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V723*/ meltfptr[722]); MELT_LOCATION ("warmelt-normatch.melt:2680:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V726*/ meltfptr[725]); MELT_LOCATION ("warmelt-normatch.melt:2680:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V726*/ meltfptr[725], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2680:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V728*/ meltfptr[727])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V729*/ meltfptr[728]); MELT_LOCATION ("warmelt-normatch.melt:2680:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V728*/ meltfptr[727])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V728*/ meltfptr[727])))); ((meltobject_ptr_t) ( /*_.VALDATA___V728*/ meltfptr[727]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V723*/ meltfptr[722]); MELT_LOCATION ("warmelt-normatch.melt:2680:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V728*/ meltfptr[727]); MELT_LOCATION ("warmelt-normatch.melt:2680:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V728*/ meltfptr[727], "new static instance"); /*putupl#226 */ melt_assertmsg ("putupl #226 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V730*/ meltfptr[729])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #226 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V730*/ meltfptr[729])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V730*/ meltfptr[729]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V58*/ meltfptr[57]), 6))), (0)))); /*putupl#227 */ melt_assertmsg ("putupl #227 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V730*/ meltfptr[729])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #227 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V730*/ meltfptr[729])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V730*/ meltfptr[729]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V726*/ meltfptr[725]); /*putupl#228 */ melt_assertmsg ("putupl #228 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V730*/ meltfptr[729])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #228 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V730*/ meltfptr[729])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V730*/ meltfptr[729]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V728*/ meltfptr[727]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V730*/ meltfptr[729]); MELT_LOCATION ("warmelt-normatch.melt:2680:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V723*/ meltfptr[722])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V723*/ meltfptr[722])))); ((meltobject_ptr_t) ( /*_.VALDATA___V723*/ meltfptr[722]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V730*/ meltfptr[729]); MELT_LOCATION ("warmelt-normatch.melt:2680:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V723*/ meltfptr[722]); MELT_LOCATION ("warmelt-normatch.melt:2680:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V723*/ meltfptr[722], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V731*/ meltfptr[730])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V731*/ meltfptr[730])))); ((meltobject_ptr_t) ( /*_.VALDATA___V731*/ meltfptr[730]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V732*/ meltfptr[731]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V731*/ meltfptr[730]); melt_dbgtrace_written_object ( /*_.VALDATA___V731*/ meltfptr[730], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V733*/ meltfptr[732])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V733*/ meltfptr[732])))); ((meltobject_ptr_t) ( /*_.VALDATA___V733*/ meltfptr[732]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V734*/ meltfptr[733]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V733*/ meltfptr[732]); melt_dbgtrace_written_object ( /*_.VALDATA___V733*/ meltfptr[732], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2691:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V735*/ meltfptr[734])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V723*/ meltfptr[722]); ((meltroutine_ptr_t) /*_.VALROUT___V735*/ meltfptr[734])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V723*/ meltfptr[722]); MELT_LOCATION ("warmelt-normatch.melt:2691:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V735*/ meltfptr[734])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_643__NORMBIND_MATCHBIND#1", NULL != ( /*_.CLASS_ENVIRONMENT__V69*/ meltfptr[68])); ((meltroutine_ptr_t) /*_.VALROUT___V735*/ meltfptr[734])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V69*/ meltfptr[68]); MELT_LOCATION ("warmelt-normatch.melt:2691:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V735*/ meltfptr[734])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_643__NORMBIND_MATCHBIND#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V42*/ meltfptr[41])); ((meltroutine_ptr_t) /*_.VALROUT___V735*/ meltfptr[734])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V42*/ meltfptr[41]); MELT_LOCATION ("warmelt-normatch.melt:2691:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V735*/ meltfptr[734])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_643__NORMBIND_MATCHBIND#3", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V735*/ meltfptr[734])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:2691:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V735*/ meltfptr[734])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_643__NORMBIND_MATCHBIND#4", NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V735*/ meltfptr[734])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normatch.melt:2691:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V735*/ meltfptr[734])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V695*/ meltfptr[694]); ((meltroutine_ptr_t) /*_.VALROUT___V735*/ meltfptr[734])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); MELT_LOCATION ("warmelt-normatch.melt:2691:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V735*/ meltfptr[734]); /*putclosurout#40 */ melt_assertmsg ("putclosrout#40 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V736*/ meltfptr[735])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#40 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V735*/ meltfptr[734])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V736*/ meltfptr[735])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V735*/ meltfptr[734]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V736*/ meltfptr[735]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V737*/ meltfptr[736])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V738*/ meltfptr[737]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V737*/ meltfptr[736]); melt_dbgtrace_written_object ( /*_.VALDATA___V737*/ meltfptr[736], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V739*/ meltfptr[738])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V740*/ meltfptr[739]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V739*/ meltfptr[738]); melt_dbgtrace_written_object ( /*_.VALDATA___V739*/ meltfptr[738], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2723:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V741*/ meltfptr[740])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V742*/ meltfptr[741]); MELT_LOCATION ("warmelt-normatch.melt:2723:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V741*/ meltfptr[740])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V741*/ meltfptr[740])))); ((meltobject_ptr_t) ( /*_.VALDATA___V741*/ meltfptr[740]))->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___V743*/ meltfptr[742])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #229 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V743*/ meltfptr[742])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V743*/ meltfptr[742]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 5))), (0)))); /*putupl#230 */ melt_assertmsg ("putupl #230 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V743*/ meltfptr[742])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #230 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V743*/ meltfptr[742])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V743*/ meltfptr[742]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 5))), (1)))); /*putupl#231 */ melt_assertmsg ("putupl #231 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V743*/ meltfptr[742])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #231 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) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V743*/ meltfptr[742]); MELT_LOCATION ("warmelt-normatch.melt:2723:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V741*/ meltfptr[740])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V741*/ meltfptr[740])))); ((meltobject_ptr_t) ( /*_.VALDATA___V741*/ meltfptr[740]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V743*/ meltfptr[742]); MELT_LOCATION ("warmelt-normatch.melt:2723:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V744*/ meltfptr[743])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V745*/ meltfptr[744]); MELT_LOCATION ("warmelt-normatch.melt:2723:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V744*/ meltfptr[743])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V744*/ meltfptr[743])))); ((meltobject_ptr_t) ( /*_.VALDATA___V744*/ meltfptr[743]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V741*/ meltfptr[740]); MELT_LOCATION ("warmelt-normatch.melt:2723:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V744*/ meltfptr[743]); MELT_LOCATION ("warmelt-normatch.melt:2723:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V744*/ meltfptr[743], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2723:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V746*/ meltfptr[745])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V747*/ meltfptr[746]); MELT_LOCATION ("warmelt-normatch.melt:2723:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V746*/ meltfptr[745])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V746*/ meltfptr[745])))); ((meltobject_ptr_t) ( /*_.VALDATA___V746*/ meltfptr[745]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V741*/ meltfptr[740]); MELT_LOCATION ("warmelt-normatch.melt:2723:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V746*/ meltfptr[745]); MELT_LOCATION ("warmelt-normatch.melt:2723:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V746*/ meltfptr[745], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2723:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V748*/ meltfptr[747])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V749*/ meltfptr[748]); MELT_LOCATION ("warmelt-normatch.melt:2723:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V748*/ meltfptr[747])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V748*/ meltfptr[747])))); ((meltobject_ptr_t) ( /*_.VALDATA___V748*/ meltfptr[747]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V741*/ meltfptr[740]); MELT_LOCATION ("warmelt-normatch.melt:2723:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V748*/ meltfptr[747]); MELT_LOCATION ("warmelt-normatch.melt:2723:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V748*/ meltfptr[747], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2723:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V750*/ meltfptr[749])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V751*/ meltfptr[750]); MELT_LOCATION ("warmelt-normatch.melt:2723:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V750*/ meltfptr[749])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V750*/ meltfptr[749])))); ((meltobject_ptr_t) ( /*_.VALDATA___V750*/ meltfptr[749]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V741*/ meltfptr[740]); MELT_LOCATION ("warmelt-normatch.melt:2723:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V750*/ meltfptr[749]); MELT_LOCATION ("warmelt-normatch.melt:2723:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V750*/ meltfptr[749], "new static instance"); /*putupl#232 */ melt_assertmsg ("putupl #232 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V752*/ meltfptr[751])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #232 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V752*/ meltfptr[751])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V752*/ meltfptr[751]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 6))), (0)))); /*putupl#233 */ melt_assertmsg ("putupl #233 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V752*/ meltfptr[751])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #233 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V752*/ meltfptr[751])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V752*/ meltfptr[751]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 6))), (1)))); /*putupl#234 */ melt_assertmsg ("putupl #234 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V752*/ meltfptr[751])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #234 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___V744*/ meltfptr[743]); /*putupl#235 */ melt_assertmsg ("putupl #235 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V752*/ meltfptr[751])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #235 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V752*/ meltfptr[751])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V752*/ meltfptr[751]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V746*/ meltfptr[745]); /*putupl#236 */ melt_assertmsg ("putupl #236 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V752*/ meltfptr[751])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #236 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V752*/ meltfptr[751])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V752*/ meltfptr[751]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V748*/ meltfptr[747]); /*putupl#237 */ melt_assertmsg ("putupl #237 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V752*/ meltfptr[751])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #237 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V752*/ meltfptr[751])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V752*/ meltfptr[751]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V750*/ meltfptr[749]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V752*/ meltfptr[751]); MELT_LOCATION ("warmelt-normatch.melt:2723:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V741*/ meltfptr[740])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V741*/ meltfptr[740])))); ((meltobject_ptr_t) ( /*_.VALDATA___V741*/ meltfptr[740]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V752*/ meltfptr[751]); MELT_LOCATION ("warmelt-normatch.melt:2723:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V741*/ meltfptr[740]); MELT_LOCATION ("warmelt-normatch.melt:2723:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V741*/ meltfptr[740], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V753*/ meltfptr[752])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V754*/ meltfptr[753]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V753*/ meltfptr[752]); melt_dbgtrace_written_object ( /*_.VALDATA___V753*/ meltfptr[752], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V755*/ meltfptr[754])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V756*/ meltfptr[755]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V755*/ meltfptr[754]); melt_dbgtrace_written_object ( /*_.VALDATA___V755*/ meltfptr[754], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V758*/ meltfptr[757]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V757*/ meltfptr[756]); melt_dbgtrace_written_object ( /*_.VALDATA___V757*/ meltfptr[756], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V759*/ meltfptr[758])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V759*/ meltfptr[758])))); ((meltobject_ptr_t) ( /*_.VALDATA___V759*/ meltfptr[758]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V760*/ meltfptr[759]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V759*/ meltfptr[758]); melt_dbgtrace_written_object ( /*_.VALDATA___V759*/ meltfptr[758], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V761*/ meltfptr[760])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V761*/ meltfptr[760])))); ((meltobject_ptr_t) ( /*_.VALDATA___V761*/ meltfptr[760]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V762*/ meltfptr[761]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V761*/ meltfptr[760]); melt_dbgtrace_written_object ( /*_.VALDATA___V761*/ meltfptr[760], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2739:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V764*/ meltfptr[763]); MELT_LOCATION ("warmelt-normatch.melt:2739:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762])))); ((meltobject_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]))->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___V765*/ meltfptr[764])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #238 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V765*/ meltfptr[764])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V765*/ meltfptr[764]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 5))), (0)))); /*putupl#239 */ melt_assertmsg ("putupl #239 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V765*/ meltfptr[764])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #239 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V765*/ meltfptr[764])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V765*/ meltfptr[764]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 5))), (1)))); /*putupl#240 */ melt_assertmsg ("putupl #240 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V765*/ meltfptr[764])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #240 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) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V765*/ meltfptr[764]); MELT_LOCATION ("warmelt-normatch.melt:2739:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762])))); ((meltobject_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V765*/ meltfptr[764]); /*putupl#241 */ melt_assertmsg ("putupl #241 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V766*/ meltfptr[765])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #241 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V766*/ meltfptr[765])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V766*/ meltfptr[765]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 6))), (0)))); /*putupl#242 */ melt_assertmsg ("putupl #242 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V766*/ meltfptr[765])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #242 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V766*/ meltfptr[765])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V766*/ meltfptr[765]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 6))), (1)))); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V766*/ meltfptr[765]); MELT_LOCATION ("warmelt-normatch.melt:2739:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762])))); ((meltobject_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V766*/ meltfptr[765]); MELT_LOCATION ("warmelt-normatch.melt:2739:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V763*/ meltfptr[762]); MELT_LOCATION ("warmelt-normatch.melt:2739:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V763*/ meltfptr[762], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V767*/ meltfptr[766])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V767*/ meltfptr[766])))); ((meltobject_ptr_t) ( /*_.VALDATA___V767*/ meltfptr[766]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V768*/ meltfptr[767]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V767*/ meltfptr[766]); melt_dbgtrace_written_object ( /*_.VALDATA___V767*/ meltfptr[766], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2745:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768])))); ((meltobject_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V770*/ meltfptr[769]); MELT_LOCATION ("warmelt-normatch.melt:2745:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768])))); ((meltobject_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]); /*putupl#243 */ melt_assertmsg ("putupl #243 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V771*/ meltfptr[770])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #243 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V771*/ meltfptr[770])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V771*/ meltfptr[770]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 5))), (0)))); /*putupl#244 */ melt_assertmsg ("putupl #244 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V771*/ meltfptr[770])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #244 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V771*/ meltfptr[770])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V771*/ meltfptr[770]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 5))), (1)))); /*putupl#245 */ melt_assertmsg ("putupl #245 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V771*/ meltfptr[770])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #245 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V771*/ meltfptr[770])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V771*/ meltfptr[770]))->tabval[2] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]); /*putupl#246 */ melt_assertmsg ("putupl #246 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V771*/ meltfptr[770])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #246 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V771*/ meltfptr[770])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V771*/ meltfptr[770]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V771*/ meltfptr[770]); MELT_LOCATION ("warmelt-normatch.melt:2745:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768])))); ((meltobject_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V771*/ meltfptr[770]); MELT_LOCATION ("warmelt-normatch.melt:2745:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V772*/ meltfptr[771])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V772*/ meltfptr[771])))); ((meltobject_ptr_t) ( /*_.VALDATA___V772*/ meltfptr[771]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V773*/ meltfptr[772]); MELT_LOCATION ("warmelt-normatch.melt:2745:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V772*/ meltfptr[771])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V772*/ meltfptr[771])))); ((meltobject_ptr_t) ( /*_.VALDATA___V772*/ meltfptr[771]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768]); MELT_LOCATION ("warmelt-normatch.melt:2745:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V772*/ meltfptr[771]); MELT_LOCATION ("warmelt-normatch.melt:2745:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V772*/ meltfptr[771], "new static instance"); /*putupl#247 */ melt_assertmsg ("putupl #247 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V774*/ meltfptr[773])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #247 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V774*/ meltfptr[773])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V774*/ meltfptr[773]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 6))), (0)))); /*putupl#248 */ melt_assertmsg ("putupl #248 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V774*/ meltfptr[773])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #248 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V774*/ meltfptr[773])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V774*/ meltfptr[773]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 6))), (1)))); /*putupl#249 */ melt_assertmsg ("putupl #249 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V774*/ meltfptr[773])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #249 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V774*/ meltfptr[773])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V774*/ meltfptr[773]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V772*/ meltfptr[771]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V774*/ meltfptr[773]); MELT_LOCATION ("warmelt-normatch.melt:2745:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768])))); ((meltobject_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V774*/ meltfptr[773]); MELT_LOCATION ("warmelt-normatch.melt:2745:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V769*/ meltfptr[768]); MELT_LOCATION ("warmelt-normatch.melt:2745:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V769*/ meltfptr[768], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V775*/ meltfptr[774])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V775*/ meltfptr[774])))); ((meltobject_ptr_t) ( /*_.VALDATA___V775*/ meltfptr[774]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V776*/ meltfptr[775]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V775*/ meltfptr[774]); melt_dbgtrace_written_object ( /*_.VALDATA___V775*/ meltfptr[774], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V777*/ meltfptr[776])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V777*/ meltfptr[776])))); ((meltobject_ptr_t) ( /*_.VALDATA___V777*/ meltfptr[776]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V778*/ meltfptr[777]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V777*/ meltfptr[776]); melt_dbgtrace_written_object ( /*_.VALDATA___V777*/ meltfptr[776], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2752:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V779*/ meltfptr[778])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V779*/ meltfptr[778])))); ((meltobject_ptr_t) ( /*_.VALDATA___V779*/ meltfptr[778]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V780*/ meltfptr[779]); #undef meltfram__ } /*end of meltmod__warmelt_normatch__initialmeltchunk_13 */ void meltmod__warmelt_normatch__initialmeltchunk_14 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-normatch.melt:2752:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V779*/ meltfptr[778])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V779*/ meltfptr[778])))); ((meltobject_ptr_t) ( /*_.VALDATA___V779*/ meltfptr[778]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768]); /*putupl#250 */ melt_assertmsg ("putupl #250 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V781*/ meltfptr[780])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #250 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V781*/ meltfptr[780])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V781*/ meltfptr[780]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 5))), (0)))); /*putupl#251 */ melt_assertmsg ("putupl #251 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V781*/ meltfptr[780])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #251 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V781*/ meltfptr[780])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V781*/ meltfptr[780]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 5))), (1)))); /*putupl#252 */ melt_assertmsg ("putupl #252 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V781*/ meltfptr[780])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #252 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V781*/ meltfptr[780])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V781*/ meltfptr[780]))->tabval[2] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]); /*putupl#253 */ melt_assertmsg ("putupl #253 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V781*/ meltfptr[780])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #253 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V781*/ meltfptr[780])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V781*/ meltfptr[780]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]); /*putupl#254 */ melt_assertmsg ("putupl #254 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V781*/ meltfptr[780])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #254 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V781*/ meltfptr[780])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V781*/ meltfptr[780]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V781*/ meltfptr[780]); MELT_LOCATION ("warmelt-normatch.melt:2752:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V779*/ meltfptr[778])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V779*/ meltfptr[778])))); ((meltobject_ptr_t) ( /*_.VALDATA___V779*/ meltfptr[778]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V781*/ meltfptr[780]); MELT_LOCATION ("warmelt-normatch.melt:2752:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V782*/ meltfptr[781])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V782*/ meltfptr[781])))); ((meltobject_ptr_t) ( /*_.VALDATA___V782*/ meltfptr[781]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V783*/ meltfptr[782]); MELT_LOCATION ("warmelt-normatch.melt:2752:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V782*/ meltfptr[781])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V782*/ meltfptr[781])))); ((meltobject_ptr_t) ( /*_.VALDATA___V782*/ meltfptr[781]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V779*/ meltfptr[778]); MELT_LOCATION ("warmelt-normatch.melt:2752:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V782*/ meltfptr[781]); MELT_LOCATION ("warmelt-normatch.melt:2752:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V782*/ meltfptr[781], "new static instance"); /*putupl#255 */ melt_assertmsg ("putupl #255 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V784*/ meltfptr[783])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #255 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V784*/ meltfptr[783])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V784*/ meltfptr[783]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 6))), (0)))); /*putupl#256 */ melt_assertmsg ("putupl #256 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V784*/ meltfptr[783])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #256 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V784*/ meltfptr[783])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V784*/ meltfptr[783]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 6))), (1)))); /*putupl#257 */ melt_assertmsg ("putupl #257 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V784*/ meltfptr[783])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #257 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V784*/ meltfptr[783])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V784*/ meltfptr[783]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V772*/ meltfptr[771]); /*putupl#258 */ melt_assertmsg ("putupl #258 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V784*/ meltfptr[783])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #258 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V784*/ meltfptr[783])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V784*/ meltfptr[783]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V782*/ meltfptr[781]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V784*/ meltfptr[783]); MELT_LOCATION ("warmelt-normatch.melt:2752:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V779*/ meltfptr[778])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V779*/ meltfptr[778])))); ((meltobject_ptr_t) ( /*_.VALDATA___V779*/ meltfptr[778]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V784*/ meltfptr[783]); MELT_LOCATION ("warmelt-normatch.melt:2752:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V779*/ meltfptr[778]); MELT_LOCATION ("warmelt-normatch.melt:2752:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V779*/ meltfptr[778], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V785*/ meltfptr[784])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V785*/ meltfptr[784])))); ((meltobject_ptr_t) ( /*_.VALDATA___V785*/ meltfptr[784]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V786*/ meltfptr[785]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V785*/ meltfptr[784]); melt_dbgtrace_written_object ( /*_.VALDATA___V785*/ meltfptr[784], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V787*/ meltfptr[786])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V787*/ meltfptr[786])))); ((meltobject_ptr_t) ( /*_.VALDATA___V787*/ meltfptr[786]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V788*/ meltfptr[787]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V787*/ meltfptr[786]); melt_dbgtrace_written_object ( /*_.VALDATA___V787*/ meltfptr[786], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2757:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V789*/ meltfptr[788])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V789*/ meltfptr[788])))); ((meltobject_ptr_t) ( /*_.VALDATA___V789*/ meltfptr[788]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V790*/ meltfptr[789]); MELT_LOCATION ("warmelt-normatch.melt:2757:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V789*/ meltfptr[788])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V789*/ meltfptr[788])))); ((meltobject_ptr_t) ( /*_.VALDATA___V789*/ meltfptr[788]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768]); /*putupl#259 */ melt_assertmsg ("putupl #259 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V791*/ meltfptr[790])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #259 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V791*/ meltfptr[790])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V791*/ meltfptr[790]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 5))), (0)))); /*putupl#260 */ melt_assertmsg ("putupl #260 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V791*/ meltfptr[790])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #260 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V791*/ meltfptr[790])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V791*/ meltfptr[790]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 5))), (1)))); /*putupl#261 */ melt_assertmsg ("putupl #261 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V791*/ meltfptr[790])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #261 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V791*/ meltfptr[790])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V791*/ meltfptr[790]))->tabval[2] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]); /*putupl#262 */ melt_assertmsg ("putupl #262 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V791*/ meltfptr[790])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #262 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V791*/ meltfptr[790])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V791*/ meltfptr[790]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]); /*putupl#263 */ melt_assertmsg ("putupl #263 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V791*/ meltfptr[790])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #263 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V791*/ meltfptr[790])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V791*/ meltfptr[790]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V791*/ meltfptr[790]); MELT_LOCATION ("warmelt-normatch.melt:2757:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V789*/ meltfptr[788])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V789*/ meltfptr[788])))); ((meltobject_ptr_t) ( /*_.VALDATA___V789*/ meltfptr[788]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V791*/ meltfptr[790]); MELT_LOCATION ("warmelt-normatch.melt:2757:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V792*/ meltfptr[791])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V792*/ meltfptr[791])))); ((meltobject_ptr_t) ( /*_.VALDATA___V792*/ meltfptr[791]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V793*/ meltfptr[792]); MELT_LOCATION ("warmelt-normatch.melt:2757:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V792*/ meltfptr[791])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V792*/ meltfptr[791])))); ((meltobject_ptr_t) ( /*_.VALDATA___V792*/ meltfptr[791]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V789*/ meltfptr[788]); MELT_LOCATION ("warmelt-normatch.melt:2757:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V792*/ meltfptr[791]); MELT_LOCATION ("warmelt-normatch.melt:2757:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V792*/ meltfptr[791], "new static instance"); /*putupl#264 */ melt_assertmsg ("putupl #264 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V794*/ meltfptr[793])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #264 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V794*/ meltfptr[793])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V794*/ meltfptr[793]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 6))), (0)))); /*putupl#265 */ melt_assertmsg ("putupl #265 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V794*/ meltfptr[793])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #265 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V794*/ meltfptr[793])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V794*/ meltfptr[793]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 6))), (1)))); /*putupl#266 */ melt_assertmsg ("putupl #266 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V794*/ meltfptr[793])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #266 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V794*/ meltfptr[793])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V794*/ meltfptr[793]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V772*/ meltfptr[771]); /*putupl#267 */ melt_assertmsg ("putupl #267 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V794*/ meltfptr[793])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #267 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V794*/ meltfptr[793])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V794*/ meltfptr[793]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V792*/ meltfptr[791]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V794*/ meltfptr[793]); MELT_LOCATION ("warmelt-normatch.melt:2757:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V789*/ meltfptr[788])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V789*/ meltfptr[788])))); ((meltobject_ptr_t) ( /*_.VALDATA___V789*/ meltfptr[788]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V794*/ meltfptr[793]); MELT_LOCATION ("warmelt-normatch.melt:2757:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V789*/ meltfptr[788]); MELT_LOCATION ("warmelt-normatch.melt:2757:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V789*/ meltfptr[788], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V795*/ meltfptr[794])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V796*/ meltfptr[795]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V795*/ meltfptr[794]); melt_dbgtrace_written_object ( /*_.VALDATA___V795*/ meltfptr[794], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V797*/ meltfptr[796])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V797*/ meltfptr[796])))); ((meltobject_ptr_t) ( /*_.VALDATA___V797*/ meltfptr[796]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V798*/ meltfptr[797]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V797*/ meltfptr[796]); melt_dbgtrace_written_object ( /*_.VALDATA___V797*/ meltfptr[796], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2763:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V799*/ meltfptr[798])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V799*/ meltfptr[798])))); ((meltobject_ptr_t) ( /*_.VALDATA___V799*/ meltfptr[798]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V800*/ meltfptr[799]); MELT_LOCATION ("warmelt-normatch.melt:2763:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V799*/ meltfptr[798])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V799*/ meltfptr[798])))); ((meltobject_ptr_t) ( /*_.VALDATA___V799*/ meltfptr[798]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768]); /*putupl#268 */ melt_assertmsg ("putupl #268 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V801*/ meltfptr[800])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #268 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V801*/ meltfptr[800])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V801*/ meltfptr[800]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 5))), (0)))); /*putupl#269 */ melt_assertmsg ("putupl #269 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V801*/ meltfptr[800])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #269 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V801*/ meltfptr[800])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V801*/ meltfptr[800]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 5))), (1)))); /*putupl#270 */ melt_assertmsg ("putupl #270 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V801*/ meltfptr[800])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #270 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V801*/ meltfptr[800])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V801*/ meltfptr[800]))->tabval[2] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]); /*putupl#271 */ melt_assertmsg ("putupl #271 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V801*/ meltfptr[800])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #271 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V801*/ meltfptr[800])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V801*/ meltfptr[800]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]); /*putupl#272 */ melt_assertmsg ("putupl #272 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V801*/ meltfptr[800])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #272 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V801*/ meltfptr[800])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V801*/ meltfptr[800]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V801*/ meltfptr[800]); MELT_LOCATION ("warmelt-normatch.melt:2763:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V799*/ meltfptr[798])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V799*/ meltfptr[798])))); ((meltobject_ptr_t) ( /*_.VALDATA___V799*/ meltfptr[798]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V801*/ meltfptr[800]); MELT_LOCATION ("warmelt-normatch.melt:2763:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V802*/ meltfptr[801])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V803*/ meltfptr[802]); MELT_LOCATION ("warmelt-normatch.melt:2763:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V802*/ meltfptr[801])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V802*/ meltfptr[801])))); ((meltobject_ptr_t) ( /*_.VALDATA___V802*/ meltfptr[801]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V799*/ meltfptr[798]); MELT_LOCATION ("warmelt-normatch.melt:2763:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V802*/ meltfptr[801]); MELT_LOCATION ("warmelt-normatch.melt:2763:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V802*/ meltfptr[801], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2763:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V804*/ meltfptr[803])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V805*/ meltfptr[804]); MELT_LOCATION ("warmelt-normatch.melt:2763:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V804*/ meltfptr[803])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V804*/ meltfptr[803])))); ((meltobject_ptr_t) ( /*_.VALDATA___V804*/ meltfptr[803]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V799*/ meltfptr[798]); MELT_LOCATION ("warmelt-normatch.melt:2763:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V804*/ meltfptr[803]); MELT_LOCATION ("warmelt-normatch.melt:2763:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V804*/ meltfptr[803], "new static instance"); /*putupl#273 */ melt_assertmsg ("putupl #273 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V806*/ meltfptr[805])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #273 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V806*/ meltfptr[805])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V806*/ meltfptr[805]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 6))), (0)))); /*putupl#274 */ melt_assertmsg ("putupl #274 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V806*/ meltfptr[805])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #274 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V806*/ meltfptr[805])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V806*/ meltfptr[805]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 6))), (1)))); /*putupl#275 */ melt_assertmsg ("putupl #275 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V806*/ meltfptr[805])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #275 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V806*/ meltfptr[805])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V806*/ meltfptr[805]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V772*/ meltfptr[771]); /*putupl#276 */ melt_assertmsg ("putupl #276 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V806*/ meltfptr[805])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #276 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___V802*/ meltfptr[801]); /*putupl#277 */ melt_assertmsg ("putupl #277 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V806*/ meltfptr[805])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #277 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___V804*/ meltfptr[803]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V806*/ meltfptr[805]); MELT_LOCATION ("warmelt-normatch.melt:2763:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V799*/ meltfptr[798])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V799*/ meltfptr[798])))); ((meltobject_ptr_t) ( /*_.VALDATA___V799*/ meltfptr[798]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V806*/ meltfptr[805]); MELT_LOCATION ("warmelt-normatch.melt:2763:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V799*/ meltfptr[798]); MELT_LOCATION ("warmelt-normatch.melt:2763:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V799*/ meltfptr[798], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V807*/ meltfptr[806])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V807*/ meltfptr[806])))); ((meltobject_ptr_t) ( /*_.VALDATA___V807*/ meltfptr[806]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V808*/ meltfptr[807]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V807*/ meltfptr[806]); melt_dbgtrace_written_object ( /*_.VALDATA___V807*/ meltfptr[806], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V809*/ meltfptr[808])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V809*/ meltfptr[808])))); ((meltobject_ptr_t) ( /*_.VALDATA___V809*/ meltfptr[808]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V810*/ meltfptr[809]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V809*/ meltfptr[808]); melt_dbgtrace_written_object ( /*_.VALDATA___V809*/ meltfptr[808], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V811*/ meltfptr[810])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V811*/ meltfptr[810])))); ((meltobject_ptr_t) ( /*_.VALDATA___V811*/ meltfptr[810]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V812*/ meltfptr[811]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V811*/ meltfptr[810]); melt_dbgtrace_written_object ( /*_.VALDATA___V811*/ meltfptr[810], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2775:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V814*/ meltfptr[813]); MELT_LOCATION ("warmelt-normatch.melt:2775:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812])))); ((meltobject_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V789*/ meltfptr[788]); /*putupl#278 */ melt_assertmsg ("putupl #278 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V815*/ meltfptr[814])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #278 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V815*/ meltfptr[814])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V815*/ meltfptr[814]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 5))), (0)))); /*putupl#279 */ melt_assertmsg ("putupl #279 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V815*/ meltfptr[814])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #279 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V815*/ meltfptr[814])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V815*/ meltfptr[814]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 5))), (1)))); /*putupl#280 */ melt_assertmsg ("putupl #280 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V815*/ meltfptr[814])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #280 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) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]); /*putupl#281 */ melt_assertmsg ("putupl #281 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V815*/ meltfptr[814])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #281 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___V763*/ meltfptr[762]); /*putupl#282 */ melt_assertmsg ("putupl #282 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V815*/ meltfptr[814])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #282 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___V769*/ meltfptr[768]); /*putupl#283 */ melt_assertmsg ("putupl #283 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V815*/ meltfptr[814])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #283 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V815*/ meltfptr[814])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V815*/ meltfptr[814]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V789*/ meltfptr[788]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V815*/ meltfptr[814]); MELT_LOCATION ("warmelt-normatch.melt:2775:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812])))); ((meltobject_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V815*/ meltfptr[814]); /*putupl#284 */ melt_assertmsg ("putupl #284 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V816*/ meltfptr[815])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #284 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V816*/ meltfptr[815])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V816*/ meltfptr[815]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 6))), (0)))); /*putupl#285 */ melt_assertmsg ("putupl #285 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V816*/ meltfptr[815])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #285 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V816*/ meltfptr[815])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V816*/ meltfptr[815]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 6))), (1)))); /*putupl#286 */ melt_assertmsg ("putupl #286 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V816*/ meltfptr[815])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #286 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V816*/ meltfptr[815])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V816*/ meltfptr[815]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V772*/ meltfptr[771]); /*putupl#287 */ melt_assertmsg ("putupl #287 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V816*/ meltfptr[815])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #287 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V816*/ meltfptr[815])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V816*/ meltfptr[815]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V792*/ meltfptr[791]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V816*/ meltfptr[815]); MELT_LOCATION ("warmelt-normatch.melt:2775:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812])))); ((meltobject_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V816*/ meltfptr[815]); MELT_LOCATION ("warmelt-normatch.melt:2775:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V813*/ meltfptr[812]); MELT_LOCATION ("warmelt-normatch.melt:2775:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V813*/ meltfptr[812], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V817*/ meltfptr[816])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V817*/ meltfptr[816])))); ((meltobject_ptr_t) ( /*_.VALDATA___V817*/ meltfptr[816]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V818*/ meltfptr[817]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V817*/ meltfptr[816]); melt_dbgtrace_written_object ( /*_.VALDATA___V817*/ meltfptr[816], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2781:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V820*/ meltfptr[819]); MELT_LOCATION ("warmelt-normatch.melt:2781:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818])))); ((meltobject_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V789*/ meltfptr[788]); /*putupl#288 */ melt_assertmsg ("putupl #288 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V821*/ meltfptr[820])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #288 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V821*/ meltfptr[820])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V821*/ meltfptr[820]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 5))), (0)))); /*putupl#289 */ melt_assertmsg ("putupl #289 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V821*/ meltfptr[820])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #289 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V821*/ meltfptr[820])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V821*/ meltfptr[820]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 5))), (1)))); /*putupl#290 */ melt_assertmsg ("putupl #290 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V821*/ meltfptr[820])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #290 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V821*/ meltfptr[820])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V821*/ meltfptr[820]))->tabval[2] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]); /*putupl#291 */ melt_assertmsg ("putupl #291 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V821*/ meltfptr[820])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #291 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V821*/ meltfptr[820])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V821*/ meltfptr[820]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]); /*putupl#292 */ melt_assertmsg ("putupl #292 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V821*/ meltfptr[820])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #292 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V821*/ meltfptr[820])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V821*/ meltfptr[820]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768]); /*putupl#293 */ melt_assertmsg ("putupl #293 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V821*/ meltfptr[820])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #293 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V821*/ meltfptr[820])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V821*/ meltfptr[820]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V789*/ meltfptr[788]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V821*/ meltfptr[820]); MELT_LOCATION ("warmelt-normatch.melt:2781:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818])))); ((meltobject_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V821*/ meltfptr[820]); MELT_LOCATION ("warmelt-normatch.melt:2781:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V822*/ meltfptr[821])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V822*/ meltfptr[821])))); ((meltobject_ptr_t) ( /*_.VALDATA___V822*/ meltfptr[821]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V823*/ meltfptr[822]); MELT_LOCATION ("warmelt-normatch.melt:2781:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V822*/ meltfptr[821])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V822*/ meltfptr[821])))); ((meltobject_ptr_t) ( /*_.VALDATA___V822*/ meltfptr[821]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818]); MELT_LOCATION ("warmelt-normatch.melt:2781:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V822*/ meltfptr[821]); MELT_LOCATION ("warmelt-normatch.melt:2781:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V822*/ meltfptr[821], "new static instance"); /*putupl#294 */ melt_assertmsg ("putupl #294 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V824*/ meltfptr[823])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #294 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V824*/ meltfptr[823])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V824*/ meltfptr[823]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 6))), (0)))); /*putupl#295 */ melt_assertmsg ("putupl #295 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V824*/ meltfptr[823])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #295 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V824*/ meltfptr[823])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V824*/ meltfptr[823]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 6))), (1)))); /*putupl#296 */ melt_assertmsg ("putupl #296 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V824*/ meltfptr[823])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #296 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V824*/ meltfptr[823])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V824*/ meltfptr[823]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V772*/ meltfptr[771]); /*putupl#297 */ melt_assertmsg ("putupl #297 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V824*/ meltfptr[823])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #297 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V824*/ meltfptr[823])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V824*/ meltfptr[823]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V792*/ meltfptr[791]); /*putupl#298 */ melt_assertmsg ("putupl #298 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V824*/ meltfptr[823])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #298 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V824*/ meltfptr[823])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V824*/ meltfptr[823]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V822*/ meltfptr[821]); #undef meltfram__ } /*end of meltmod__warmelt_normatch__initialmeltchunk_14 */ void meltmod__warmelt_normatch__initialmeltchunk_15 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*touch:INITUP_*/ meltgc_touch ( /*_.VALTUP___V824*/ meltfptr[823]); MELT_LOCATION ("warmelt-normatch.melt:2781:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818])))); ((meltobject_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V824*/ meltfptr[823]); MELT_LOCATION ("warmelt-normatch.melt:2781:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V819*/ meltfptr[818]); MELT_LOCATION ("warmelt-normatch.melt:2781:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V819*/ meltfptr[818], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V825*/ meltfptr[824])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V826*/ meltfptr[825]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V825*/ meltfptr[824]); melt_dbgtrace_written_object ( /*_.VALDATA___V825*/ meltfptr[824], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V827*/ meltfptr[826])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V827*/ meltfptr[826])))); ((meltobject_ptr_t) ( /*_.VALDATA___V827*/ meltfptr[826]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V828*/ meltfptr[827]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V827*/ meltfptr[826]); melt_dbgtrace_written_object ( /*_.VALDATA___V827*/ meltfptr[826], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2786:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V829*/ meltfptr[828])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V829*/ meltfptr[828])))); ((meltobject_ptr_t) ( /*_.VALDATA___V829*/ meltfptr[828]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V830*/ meltfptr[829]); MELT_LOCATION ("warmelt-normatch.melt:2786:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V829*/ meltfptr[828])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V829*/ meltfptr[828])))); ((meltobject_ptr_t) ( /*_.VALDATA___V829*/ meltfptr[828]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818]); /*putupl#299 */ melt_assertmsg ("putupl #299 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V831*/ meltfptr[830])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #299 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V831*/ meltfptr[830])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V831*/ meltfptr[830]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 5))), (0)))); /*putupl#300 */ melt_assertmsg ("putupl #300 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V831*/ meltfptr[830])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #300 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V831*/ meltfptr[830])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V831*/ meltfptr[830]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 5))), (1)))); /*putupl#301 */ melt_assertmsg ("putupl #301 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V831*/ meltfptr[830])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #301 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V831*/ meltfptr[830])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V831*/ meltfptr[830]))->tabval[2] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]); /*putupl#302 */ melt_assertmsg ("putupl #302 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V831*/ meltfptr[830])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #302 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V831*/ meltfptr[830])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V831*/ meltfptr[830]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]); /*putupl#303 */ melt_assertmsg ("putupl #303 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V831*/ meltfptr[830])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #303 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V831*/ meltfptr[830])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V831*/ meltfptr[830]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768]); /*putupl#304 */ melt_assertmsg ("putupl #304 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V831*/ meltfptr[830])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #304 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V831*/ meltfptr[830])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V831*/ meltfptr[830]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V789*/ meltfptr[788]); /*putupl#305 */ melt_assertmsg ("putupl #305 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V831*/ meltfptr[830])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #305 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V831*/ meltfptr[830])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V831*/ meltfptr[830]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V831*/ meltfptr[830]); MELT_LOCATION ("warmelt-normatch.melt:2786:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V829*/ meltfptr[828])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V829*/ meltfptr[828])))); ((meltobject_ptr_t) ( /*_.VALDATA___V829*/ meltfptr[828]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V831*/ meltfptr[830]); /*putupl#306 */ melt_assertmsg ("putupl #306 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V832*/ meltfptr[831])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #306 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V832*/ meltfptr[831])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V832*/ meltfptr[831]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 6))), (0)))); /*putupl#307 */ melt_assertmsg ("putupl #307 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V832*/ meltfptr[831])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #307 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V832*/ meltfptr[831])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V832*/ meltfptr[831]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 6))), (1)))); /*putupl#308 */ melt_assertmsg ("putupl #308 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V832*/ meltfptr[831])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #308 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V832*/ meltfptr[831])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V832*/ meltfptr[831]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V772*/ meltfptr[771]); /*putupl#309 */ melt_assertmsg ("putupl #309 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V832*/ meltfptr[831])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #309 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V832*/ meltfptr[831])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V832*/ meltfptr[831]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V792*/ meltfptr[791]); /*putupl#310 */ melt_assertmsg ("putupl #310 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V832*/ meltfptr[831])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #310 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V832*/ meltfptr[831])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V832*/ meltfptr[831]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V822*/ meltfptr[821]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V832*/ meltfptr[831]); MELT_LOCATION ("warmelt-normatch.melt:2786:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V829*/ meltfptr[828])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V829*/ meltfptr[828])))); ((meltobject_ptr_t) ( /*_.VALDATA___V829*/ meltfptr[828]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V832*/ meltfptr[831]); MELT_LOCATION ("warmelt-normatch.melt:2786:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V829*/ meltfptr[828]); MELT_LOCATION ("warmelt-normatch.melt:2786:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V829*/ meltfptr[828], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V833*/ meltfptr[832])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V833*/ meltfptr[832])))); ((meltobject_ptr_t) ( /*_.VALDATA___V833*/ meltfptr[832]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V834*/ meltfptr[833]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V833*/ meltfptr[832]); melt_dbgtrace_written_object ( /*_.VALDATA___V833*/ meltfptr[832], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2793:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V835*/ meltfptr[834])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V836*/ meltfptr[835]); MELT_LOCATION ("warmelt-normatch.melt:2793:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V835*/ meltfptr[834])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V835*/ meltfptr[834])))); ((meltobject_ptr_t) ( /*_.VALDATA___V835*/ meltfptr[834]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818]); /*putupl#311 */ melt_assertmsg ("putupl #311 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V837*/ meltfptr[836])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #311 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V837*/ meltfptr[836])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V837*/ meltfptr[836]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 5))), (0)))); /*putupl#312 */ melt_assertmsg ("putupl #312 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V837*/ meltfptr[836])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #312 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V837*/ meltfptr[836])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V837*/ meltfptr[836]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 5))), (1)))); /*putupl#313 */ melt_assertmsg ("putupl #313 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V837*/ meltfptr[836])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #313 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V837*/ meltfptr[836])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V837*/ meltfptr[836]))->tabval[2] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]); /*putupl#314 */ melt_assertmsg ("putupl #314 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V837*/ meltfptr[836])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #314 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V837*/ meltfptr[836])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V837*/ meltfptr[836]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]); /*putupl#315 */ melt_assertmsg ("putupl #315 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V837*/ meltfptr[836])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #315 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V837*/ meltfptr[836])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V837*/ meltfptr[836]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768]); /*putupl#316 */ melt_assertmsg ("putupl #316 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V837*/ meltfptr[836])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #316 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V837*/ meltfptr[836])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V837*/ meltfptr[836]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V789*/ meltfptr[788]); /*putupl#317 */ melt_assertmsg ("putupl #317 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V837*/ meltfptr[836])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #317 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V837*/ meltfptr[836])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V837*/ meltfptr[836]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V837*/ meltfptr[836]); MELT_LOCATION ("warmelt-normatch.melt:2793:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V835*/ meltfptr[834])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V835*/ meltfptr[834])))); ((meltobject_ptr_t) ( /*_.VALDATA___V835*/ meltfptr[834]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V837*/ meltfptr[836]); /*putupl#318 */ melt_assertmsg ("putupl #318 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V838*/ meltfptr[837])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #318 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V838*/ meltfptr[837])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V838*/ meltfptr[837]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 6))), (0)))); /*putupl#319 */ melt_assertmsg ("putupl #319 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V838*/ meltfptr[837])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #319 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V838*/ meltfptr[837])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V838*/ meltfptr[837]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 6))), (1)))); /*putupl#320 */ melt_assertmsg ("putupl #320 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V838*/ meltfptr[837])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #320 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V838*/ meltfptr[837])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V838*/ meltfptr[837]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V772*/ meltfptr[771]); /*putupl#321 */ melt_assertmsg ("putupl #321 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V838*/ meltfptr[837])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #321 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V838*/ meltfptr[837])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V838*/ meltfptr[837]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V792*/ meltfptr[791]); /*putupl#322 */ melt_assertmsg ("putupl #322 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V838*/ meltfptr[837])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #322 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V838*/ meltfptr[837])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V838*/ meltfptr[837]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V822*/ meltfptr[821]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V838*/ meltfptr[837]); MELT_LOCATION ("warmelt-normatch.melt:2793:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V835*/ meltfptr[834])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V835*/ meltfptr[834])))); ((meltobject_ptr_t) ( /*_.VALDATA___V835*/ meltfptr[834]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V838*/ meltfptr[837]); MELT_LOCATION ("warmelt-normatch.melt:2793:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V835*/ meltfptr[834]); MELT_LOCATION ("warmelt-normatch.melt:2793:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V835*/ meltfptr[834], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V839*/ meltfptr[838])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V840*/ meltfptr[839]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V839*/ meltfptr[838]); melt_dbgtrace_written_object ( /*_.VALDATA___V839*/ meltfptr[838], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2801:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V841*/ meltfptr[840])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V842*/ meltfptr[841]); MELT_LOCATION ("warmelt-normatch.melt:2801:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V841*/ meltfptr[840])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V841*/ meltfptr[840])))); ((meltobject_ptr_t) ( /*_.VALDATA___V841*/ meltfptr[840]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V789*/ meltfptr[788]); /*putupl#323 */ melt_assertmsg ("putupl #323 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V843*/ meltfptr[842])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #323 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V843*/ meltfptr[842])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V843*/ meltfptr[842]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 5))), (0)))); /*putupl#324 */ melt_assertmsg ("putupl #324 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V843*/ meltfptr[842])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #324 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V843*/ meltfptr[842])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V843*/ meltfptr[842]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 5))), (1)))); /*putupl#325 */ melt_assertmsg ("putupl #325 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V843*/ meltfptr[842])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #325 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V843*/ meltfptr[842])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V843*/ meltfptr[842]))->tabval[2] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]); /*putupl#326 */ melt_assertmsg ("putupl #326 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V843*/ meltfptr[842])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #326 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V843*/ meltfptr[842])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V843*/ meltfptr[842]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]); /*putupl#327 */ melt_assertmsg ("putupl #327 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V843*/ meltfptr[842])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #327 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V843*/ meltfptr[842])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V843*/ meltfptr[842]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768]); /*putupl#328 */ melt_assertmsg ("putupl #328 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V843*/ meltfptr[842])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #328 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V843*/ meltfptr[842])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V843*/ meltfptr[842]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V789*/ meltfptr[788]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V843*/ meltfptr[842]); MELT_LOCATION ("warmelt-normatch.melt:2801:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V841*/ meltfptr[840])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V841*/ meltfptr[840])))); ((meltobject_ptr_t) ( /*_.VALDATA___V841*/ meltfptr[840]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V843*/ meltfptr[842]); MELT_LOCATION ("warmelt-normatch.melt:2801:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V844*/ meltfptr[843])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V845*/ meltfptr[844]); MELT_LOCATION ("warmelt-normatch.melt:2801:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V844*/ meltfptr[843])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V844*/ meltfptr[843])))); ((meltobject_ptr_t) ( /*_.VALDATA___V844*/ meltfptr[843]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V841*/ meltfptr[840]); MELT_LOCATION ("warmelt-normatch.melt:2801:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V844*/ meltfptr[843]); MELT_LOCATION ("warmelt-normatch.melt:2801:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V844*/ meltfptr[843], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2801:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V846*/ meltfptr[845])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V847*/ meltfptr[846]); MELT_LOCATION ("warmelt-normatch.melt:2801:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V846*/ meltfptr[845])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V846*/ meltfptr[845])))); ((meltobject_ptr_t) ( /*_.VALDATA___V846*/ meltfptr[845]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V841*/ meltfptr[840]); MELT_LOCATION ("warmelt-normatch.melt:2801:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V846*/ meltfptr[845]); MELT_LOCATION ("warmelt-normatch.melt:2801:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V846*/ meltfptr[845], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2801:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V848*/ meltfptr[847])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V849*/ meltfptr[848]); MELT_LOCATION ("warmelt-normatch.melt:2801:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V848*/ meltfptr[847])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V848*/ meltfptr[847])))); ((meltobject_ptr_t) ( /*_.VALDATA___V848*/ meltfptr[847]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V841*/ meltfptr[840]); MELT_LOCATION ("warmelt-normatch.melt:2801:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V848*/ meltfptr[847]); MELT_LOCATION ("warmelt-normatch.melt:2801:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V848*/ meltfptr[847], "new static instance"); /*putupl#329 */ melt_assertmsg ("putupl #329 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V850*/ meltfptr[849])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #329 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V850*/ meltfptr[849])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V850*/ meltfptr[849]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 6))), (0)))); /*putupl#330 */ melt_assertmsg ("putupl #330 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V850*/ meltfptr[849])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #330 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V850*/ meltfptr[849])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V850*/ meltfptr[849]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 6))), (1)))); /*putupl#331 */ melt_assertmsg ("putupl #331 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V850*/ meltfptr[849])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #331 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V850*/ meltfptr[849])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V850*/ meltfptr[849]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V772*/ meltfptr[771]); /*putupl#332 */ melt_assertmsg ("putupl #332 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V850*/ meltfptr[849])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #332 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V850*/ meltfptr[849])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V850*/ meltfptr[849]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V792*/ meltfptr[791]); /*putupl#333 */ melt_assertmsg ("putupl #333 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V850*/ meltfptr[849])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #333 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V850*/ meltfptr[849])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V850*/ meltfptr[849]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V844*/ meltfptr[843]); /*putupl#334 */ melt_assertmsg ("putupl #334 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V850*/ meltfptr[849])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #334 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V850*/ meltfptr[849])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V850*/ meltfptr[849]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V846*/ meltfptr[845]); /*putupl#335 */ melt_assertmsg ("putupl #335 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V850*/ meltfptr[849])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #335 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V850*/ meltfptr[849])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V850*/ meltfptr[849]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V848*/ meltfptr[847]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V850*/ meltfptr[849]); MELT_LOCATION ("warmelt-normatch.melt:2801:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V841*/ meltfptr[840])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V841*/ meltfptr[840])))); ((meltobject_ptr_t) ( /*_.VALDATA___V841*/ meltfptr[840]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V850*/ meltfptr[849]); MELT_LOCATION ("warmelt-normatch.melt:2801:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V841*/ meltfptr[840]); MELT_LOCATION ("warmelt-normatch.melt:2801:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V841*/ meltfptr[840], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V851*/ meltfptr[850])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V851*/ meltfptr[850])))); ((meltobject_ptr_t) ( /*_.VALDATA___V851*/ meltfptr[850]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V852*/ meltfptr[851]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V851*/ meltfptr[850]); melt_dbgtrace_written_object ( /*_.VALDATA___V851*/ meltfptr[850], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V853*/ meltfptr[852])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V854*/ meltfptr[853]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V853*/ meltfptr[852]); melt_dbgtrace_written_object ( /*_.VALDATA___V853*/ meltfptr[852], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V855*/ meltfptr[854])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V856*/ meltfptr[855]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V855*/ meltfptr[854]); melt_dbgtrace_written_object ( /*_.VALDATA___V855*/ meltfptr[854], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V857*/ meltfptr[856])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V858*/ meltfptr[857]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V857*/ meltfptr[856]); melt_dbgtrace_written_object ( /*_.VALDATA___V857*/ meltfptr[856], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2813:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V859*/ meltfptr[858])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V859*/ meltfptr[858])))); ((meltobject_ptr_t) ( /*_.VALDATA___V859*/ meltfptr[858]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V860*/ meltfptr[859]); MELT_LOCATION ("warmelt-normatch.melt:2813:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V859*/ meltfptr[858])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V859*/ meltfptr[858])))); ((meltobject_ptr_t) ( /*_.VALDATA___V859*/ meltfptr[858]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V799*/ meltfptr[798]); /*putupl#336 */ melt_assertmsg ("putupl #336 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V861*/ meltfptr[860])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #336 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V861*/ meltfptr[860])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V861*/ meltfptr[860]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 5))), (0)))); /*putupl#337 */ melt_assertmsg ("putupl #337 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V861*/ meltfptr[860])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #337 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V861*/ meltfptr[860])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V861*/ meltfptr[860]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 5))), (1)))); /*putupl#338 */ melt_assertmsg ("putupl #338 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V861*/ meltfptr[860])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #338 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V861*/ meltfptr[860])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V861*/ meltfptr[860]))->tabval[2] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]); /*putupl#339 */ melt_assertmsg ("putupl #339 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V861*/ meltfptr[860])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #339 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V861*/ meltfptr[860])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V861*/ meltfptr[860]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]); /*putupl#340 */ melt_assertmsg ("putupl #340 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V861*/ meltfptr[860])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #340 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V861*/ meltfptr[860])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V861*/ meltfptr[860]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768]); /*putupl#341 */ melt_assertmsg ("putupl #341 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V861*/ meltfptr[860])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #341 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V861*/ meltfptr[860])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V861*/ meltfptr[860]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V799*/ meltfptr[798]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V861*/ meltfptr[860]); MELT_LOCATION ("warmelt-normatch.melt:2813:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V859*/ meltfptr[858])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V859*/ meltfptr[858])))); ((meltobject_ptr_t) ( /*_.VALDATA___V859*/ meltfptr[858]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V861*/ meltfptr[860]); MELT_LOCATION ("warmelt-normatch.melt:2813:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V862*/ meltfptr[861])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V863*/ meltfptr[862]); MELT_LOCATION ("warmelt-normatch.melt:2813:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V862*/ meltfptr[861])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V862*/ meltfptr[861])))); ((meltobject_ptr_t) ( /*_.VALDATA___V862*/ meltfptr[861]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V859*/ meltfptr[858]); MELT_LOCATION ("warmelt-normatch.melt:2813:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V862*/ meltfptr[861]); MELT_LOCATION ("warmelt-normatch.melt:2813:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V862*/ meltfptr[861], "new static instance"); /*putupl#342 */ melt_assertmsg ("putupl #342 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V864*/ meltfptr[863])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #342 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V864*/ meltfptr[863])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V864*/ meltfptr[863]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 6))), (0)))); /*putupl#343 */ melt_assertmsg ("putupl #343 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V864*/ meltfptr[863])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #343 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V864*/ meltfptr[863])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V864*/ meltfptr[863]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 6))), (1)))); /*putupl#344 */ melt_assertmsg ("putupl #344 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V864*/ meltfptr[863])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #344 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V864*/ meltfptr[863])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V864*/ meltfptr[863]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V772*/ meltfptr[771]); /*putupl#345 */ melt_assertmsg ("putupl #345 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V864*/ meltfptr[863])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #345 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V864*/ meltfptr[863])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V864*/ meltfptr[863]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V802*/ meltfptr[801]); /*putupl#346 */ melt_assertmsg ("putupl #346 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V864*/ meltfptr[863])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #346 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V864*/ meltfptr[863])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V864*/ meltfptr[863]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V804*/ meltfptr[803]); /*putupl#347 */ melt_assertmsg ("putupl #347 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V864*/ meltfptr[863])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #347 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V864*/ meltfptr[863])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V864*/ meltfptr[863]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V862*/ meltfptr[861]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V864*/ meltfptr[863]); MELT_LOCATION ("warmelt-normatch.melt:2813:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V859*/ meltfptr[858])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V859*/ meltfptr[858])))); ((meltobject_ptr_t) ( /*_.VALDATA___V859*/ meltfptr[858]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V864*/ meltfptr[863]); MELT_LOCATION ("warmelt-normatch.melt:2813:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V859*/ meltfptr[858]); MELT_LOCATION ("warmelt-normatch.melt:2813:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V859*/ meltfptr[858], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V865*/ meltfptr[864])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V865*/ meltfptr[864])))); ((meltobject_ptr_t) ( /*_.VALDATA___V865*/ meltfptr[864]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V866*/ meltfptr[865]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V865*/ meltfptr[864]); melt_dbgtrace_written_object ( /*_.VALDATA___V865*/ meltfptr[864], "new static instance"); #undef meltfram__ } /*end of meltmod__warmelt_normatch__initialmeltchunk_15 */ void meltmod__warmelt_normatch__initialmeltchunk_16 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*putslot*/ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V867*/ meltfptr[866])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V867*/ meltfptr[866])))); ((meltobject_ptr_t) ( /*_.VALDATA___V867*/ meltfptr[866]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V868*/ meltfptr[867]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V867*/ meltfptr[866]); melt_dbgtrace_written_object ( /*_.VALDATA___V867*/ meltfptr[866], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2821:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V869*/ meltfptr[868])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V870*/ meltfptr[869]); MELT_LOCATION ("warmelt-normatch.melt:2821:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V869*/ meltfptr[868])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V869*/ meltfptr[868])))); ((meltobject_ptr_t) ( /*_.VALDATA___V869*/ meltfptr[868]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V859*/ meltfptr[858]); /*putupl#348 */ melt_assertmsg ("putupl #348 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V871*/ meltfptr[870])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #348 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V871*/ meltfptr[870])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V871*/ meltfptr[870]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 5))), (0)))); /*putupl#349 */ melt_assertmsg ("putupl #349 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V871*/ meltfptr[870])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #349 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V871*/ meltfptr[870])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V871*/ meltfptr[870]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 5))), (1)))); /*putupl#350 */ melt_assertmsg ("putupl #350 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V871*/ meltfptr[870])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #350 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V871*/ meltfptr[870])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V871*/ meltfptr[870]))->tabval[2] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]); /*putupl#351 */ melt_assertmsg ("putupl #351 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V871*/ meltfptr[870])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #351 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V871*/ meltfptr[870])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V871*/ meltfptr[870]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]); /*putupl#352 */ melt_assertmsg ("putupl #352 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V871*/ meltfptr[870])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #352 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V871*/ meltfptr[870])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V871*/ meltfptr[870]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768]); /*putupl#353 */ melt_assertmsg ("putupl #353 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V871*/ meltfptr[870])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #353 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V871*/ meltfptr[870])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V871*/ meltfptr[870]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V799*/ meltfptr[798]); /*putupl#354 */ melt_assertmsg ("putupl #354 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V871*/ meltfptr[870])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #354 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V871*/ meltfptr[870])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V871*/ meltfptr[870]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V859*/ meltfptr[858]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V871*/ meltfptr[870]); MELT_LOCATION ("warmelt-normatch.melt:2821:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V869*/ meltfptr[868])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V869*/ meltfptr[868])))); ((meltobject_ptr_t) ( /*_.VALDATA___V869*/ meltfptr[868]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V871*/ meltfptr[870]); MELT_LOCATION ("warmelt-normatch.melt:2821:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V872*/ meltfptr[871])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V872*/ meltfptr[871])))); ((meltobject_ptr_t) ( /*_.VALDATA___V872*/ meltfptr[871]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V873*/ meltfptr[872]); MELT_LOCATION ("warmelt-normatch.melt:2821:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V872*/ meltfptr[871])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V872*/ meltfptr[871])))); ((meltobject_ptr_t) ( /*_.VALDATA___V872*/ meltfptr[871]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V869*/ meltfptr[868]); MELT_LOCATION ("warmelt-normatch.melt:2821:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V872*/ meltfptr[871]); MELT_LOCATION ("warmelt-normatch.melt:2821:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V872*/ meltfptr[871], "new static instance"); /*putupl#355 */ melt_assertmsg ("putupl #355 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V874*/ meltfptr[873])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #355 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V874*/ meltfptr[873])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V874*/ meltfptr[873]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 6))), (0)))); /*putupl#356 */ melt_assertmsg ("putupl #356 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V874*/ meltfptr[873])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #356 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V874*/ meltfptr[873])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V874*/ meltfptr[873]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 6))), (1)))); /*putupl#357 */ melt_assertmsg ("putupl #357 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V874*/ meltfptr[873])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #357 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V874*/ meltfptr[873])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V874*/ meltfptr[873]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V772*/ meltfptr[771]); /*putupl#358 */ melt_assertmsg ("putupl #358 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V874*/ meltfptr[873])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #358 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V874*/ meltfptr[873])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V874*/ meltfptr[873]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V802*/ meltfptr[801]); /*putupl#359 */ melt_assertmsg ("putupl #359 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V874*/ meltfptr[873])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #359 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V874*/ meltfptr[873])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V874*/ meltfptr[873]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V804*/ meltfptr[803]); /*putupl#360 */ melt_assertmsg ("putupl #360 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V874*/ meltfptr[873])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #360 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V874*/ meltfptr[873])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V874*/ meltfptr[873]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V862*/ meltfptr[861]); /*putupl#361 */ melt_assertmsg ("putupl #361 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V874*/ meltfptr[873])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #361 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V874*/ meltfptr[873])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V874*/ meltfptr[873]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V872*/ meltfptr[871]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V874*/ meltfptr[873]); MELT_LOCATION ("warmelt-normatch.melt:2821:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V869*/ meltfptr[868])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V869*/ meltfptr[868])))); ((meltobject_ptr_t) ( /*_.VALDATA___V869*/ meltfptr[868]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V874*/ meltfptr[873]); MELT_LOCATION ("warmelt-normatch.melt:2821:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V869*/ meltfptr[868]); MELT_LOCATION ("warmelt-normatch.melt:2821:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V869*/ meltfptr[868], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V875*/ meltfptr[874])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V876*/ meltfptr[875]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V875*/ meltfptr[874]); melt_dbgtrace_written_object ( /*_.VALDATA___V875*/ meltfptr[874], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V877*/ meltfptr[876])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V877*/ meltfptr[876])))); ((meltobject_ptr_t) ( /*_.VALDATA___V877*/ meltfptr[876]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V878*/ meltfptr[877]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V877*/ meltfptr[876]); melt_dbgtrace_written_object ( /*_.VALDATA___V877*/ meltfptr[876], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2827:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V879*/ meltfptr[878])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V879*/ meltfptr[878])))); ((meltobject_ptr_t) ( /*_.VALDATA___V879*/ meltfptr[878]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V880*/ meltfptr[879]); MELT_LOCATION ("warmelt-normatch.melt:2827:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V879*/ meltfptr[878])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V879*/ meltfptr[878])))); ((meltobject_ptr_t) ( /*_.VALDATA___V879*/ meltfptr[878]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V859*/ meltfptr[858]); /*putupl#362 */ melt_assertmsg ("putupl #362 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V881*/ meltfptr[880])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #362 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V881*/ meltfptr[880])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V881*/ meltfptr[880]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 5))), (0)))); /*putupl#363 */ melt_assertmsg ("putupl #363 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V881*/ meltfptr[880])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #363 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V881*/ meltfptr[880])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V881*/ meltfptr[880]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 5))), (1)))); /*putupl#364 */ melt_assertmsg ("putupl #364 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V881*/ meltfptr[880])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #364 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V881*/ meltfptr[880])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V881*/ meltfptr[880]))->tabval[2] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]); /*putupl#365 */ melt_assertmsg ("putupl #365 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V881*/ meltfptr[880])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #365 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V881*/ meltfptr[880])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V881*/ meltfptr[880]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]); /*putupl#366 */ melt_assertmsg ("putupl #366 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V881*/ meltfptr[880])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #366 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V881*/ meltfptr[880])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V881*/ meltfptr[880]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768]); /*putupl#367 */ melt_assertmsg ("putupl #367 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V881*/ meltfptr[880])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #367 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V881*/ meltfptr[880])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V881*/ meltfptr[880]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V799*/ meltfptr[798]); /*putupl#368 */ melt_assertmsg ("putupl #368 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V881*/ meltfptr[880])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #368 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V881*/ meltfptr[880])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V881*/ meltfptr[880]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V859*/ meltfptr[858]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V881*/ meltfptr[880]); MELT_LOCATION ("warmelt-normatch.melt:2827:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V879*/ meltfptr[878])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V879*/ meltfptr[878])))); ((meltobject_ptr_t) ( /*_.VALDATA___V879*/ meltfptr[878]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V881*/ meltfptr[880]); MELT_LOCATION ("warmelt-normatch.melt:2827:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V882*/ meltfptr[881])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V883*/ meltfptr[882]); MELT_LOCATION ("warmelt-normatch.melt:2827:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V882*/ meltfptr[881])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V882*/ meltfptr[881])))); ((meltobject_ptr_t) ( /*_.VALDATA___V882*/ meltfptr[881]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V879*/ meltfptr[878]); MELT_LOCATION ("warmelt-normatch.melt:2827:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V882*/ meltfptr[881]); MELT_LOCATION ("warmelt-normatch.melt:2827:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V882*/ meltfptr[881], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2827:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V884*/ meltfptr[883])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V885*/ meltfptr[884]); MELT_LOCATION ("warmelt-normatch.melt:2827:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V884*/ meltfptr[883])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V884*/ meltfptr[883])))); ((meltobject_ptr_t) ( /*_.VALDATA___V884*/ meltfptr[883]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V879*/ meltfptr[878]); MELT_LOCATION ("warmelt-normatch.melt:2827:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V884*/ meltfptr[883]); MELT_LOCATION ("warmelt-normatch.melt:2827:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V884*/ meltfptr[883], "new static instance"); /*putupl#369 */ melt_assertmsg ("putupl #369 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V886*/ meltfptr[885])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #369 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V886*/ meltfptr[885])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V886*/ meltfptr[885]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 6))), (0)))); /*putupl#370 */ melt_assertmsg ("putupl #370 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V886*/ meltfptr[885])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #370 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V886*/ meltfptr[885])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V886*/ meltfptr[885]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 6))), (1)))); /*putupl#371 */ melt_assertmsg ("putupl #371 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V886*/ meltfptr[885])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #371 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___V772*/ meltfptr[771]); /*putupl#372 */ melt_assertmsg ("putupl #372 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V886*/ meltfptr[885])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #372 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___V802*/ meltfptr[801]); /*putupl#373 */ melt_assertmsg ("putupl #373 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V886*/ meltfptr[885])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #373 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___V804*/ meltfptr[803]); /*putupl#374 */ melt_assertmsg ("putupl #374 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V886*/ meltfptr[885])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #374 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___V862*/ meltfptr[861]); /*putupl#375 */ melt_assertmsg ("putupl #375 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V886*/ meltfptr[885])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #375 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___V882*/ meltfptr[881]); /*putupl#376 */ melt_assertmsg ("putupl #376 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V886*/ meltfptr[885])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #376 checkoff", (7 >= 0 && 7 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V886*/ meltfptr[885])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V886*/ meltfptr[885]))->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V884*/ meltfptr[883]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V886*/ meltfptr[885]); MELT_LOCATION ("warmelt-normatch.melt:2827:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V879*/ meltfptr[878])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V879*/ meltfptr[878])))); ((meltobject_ptr_t) ( /*_.VALDATA___V879*/ meltfptr[878]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V886*/ meltfptr[885]); MELT_LOCATION ("warmelt-normatch.melt:2827:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V879*/ meltfptr[878]); MELT_LOCATION ("warmelt-normatch.melt:2827:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V879*/ meltfptr[878], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V887*/ meltfptr[886])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V888*/ meltfptr[887]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V887*/ meltfptr[886]); melt_dbgtrace_written_object ( /*_.VALDATA___V887*/ meltfptr[886], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V889*/ meltfptr[888])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V890*/ meltfptr[889]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V889*/ meltfptr[888]); melt_dbgtrace_written_object ( /*_.VALDATA___V889*/ meltfptr[888], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V891*/ meltfptr[890])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V892*/ meltfptr[891]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V891*/ meltfptr[890]); melt_dbgtrace_written_object ( /*_.VALDATA___V891*/ meltfptr[890], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2833:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V894*/ meltfptr[893]); MELT_LOCATION ("warmelt-normatch.melt:2833:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892])))); ((meltobject_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V859*/ meltfptr[858]); /*putupl#377 */ melt_assertmsg ("putupl #377 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V895*/ meltfptr[894])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #377 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V895*/ meltfptr[894])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V895*/ meltfptr[894]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 5))), (0)))); /*putupl#378 */ melt_assertmsg ("putupl #378 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V895*/ meltfptr[894])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #378 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V895*/ meltfptr[894])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V895*/ meltfptr[894]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 5))), (1)))); /*putupl#379 */ melt_assertmsg ("putupl #379 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V895*/ meltfptr[894])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #379 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V895*/ meltfptr[894])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V895*/ meltfptr[894]))->tabval[2] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]); /*putupl#380 */ melt_assertmsg ("putupl #380 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V895*/ meltfptr[894])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #380 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V895*/ meltfptr[894])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V895*/ meltfptr[894]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]); /*putupl#381 */ melt_assertmsg ("putupl #381 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V895*/ meltfptr[894])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #381 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V895*/ meltfptr[894])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V895*/ meltfptr[894]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768]); /*putupl#382 */ melt_assertmsg ("putupl #382 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V895*/ meltfptr[894])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #382 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V895*/ meltfptr[894])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V895*/ meltfptr[894]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V799*/ meltfptr[798]); /*putupl#383 */ melt_assertmsg ("putupl #383 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V895*/ meltfptr[894])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #383 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V895*/ meltfptr[894])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V895*/ meltfptr[894]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V859*/ meltfptr[858]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V895*/ meltfptr[894]); MELT_LOCATION ("warmelt-normatch.melt:2833:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892])))); ((meltobject_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V895*/ meltfptr[894]); MELT_LOCATION ("warmelt-normatch.melt:2833:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V896*/ meltfptr[895])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V897*/ meltfptr[896]); MELT_LOCATION ("warmelt-normatch.melt:2833:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V896*/ meltfptr[895])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V896*/ meltfptr[895])))); ((meltobject_ptr_t) ( /*_.VALDATA___V896*/ meltfptr[895]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]); MELT_LOCATION ("warmelt-normatch.melt:2833:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V896*/ meltfptr[895]); MELT_LOCATION ("warmelt-normatch.melt:2833:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V896*/ meltfptr[895], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2833:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V898*/ meltfptr[897])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V899*/ meltfptr[898]); MELT_LOCATION ("warmelt-normatch.melt:2833:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V898*/ meltfptr[897])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V898*/ meltfptr[897])))); ((meltobject_ptr_t) ( /*_.VALDATA___V898*/ meltfptr[897]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]); MELT_LOCATION ("warmelt-normatch.melt:2833:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V898*/ meltfptr[897]); MELT_LOCATION ("warmelt-normatch.melt:2833:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V898*/ meltfptr[897], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2833:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V900*/ meltfptr[899])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V901*/ meltfptr[900]); MELT_LOCATION ("warmelt-normatch.melt:2833:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V900*/ meltfptr[899])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V900*/ meltfptr[899])))); ((meltobject_ptr_t) ( /*_.VALDATA___V900*/ meltfptr[899]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]); MELT_LOCATION ("warmelt-normatch.melt:2833:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V900*/ meltfptr[899]); MELT_LOCATION ("warmelt-normatch.melt:2833:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V900*/ meltfptr[899], "new static instance"); /*putupl#384 */ melt_assertmsg ("putupl #384 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V902*/ meltfptr[901])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #384 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V902*/ meltfptr[901])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V902*/ meltfptr[901]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 6))), (0)))); /*putupl#385 */ melt_assertmsg ("putupl #385 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V902*/ meltfptr[901])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #385 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V902*/ meltfptr[901])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V902*/ meltfptr[901]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 6))), (1)))); /*putupl#386 */ melt_assertmsg ("putupl #386 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V902*/ meltfptr[901])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #386 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V902*/ meltfptr[901])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V902*/ meltfptr[901]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V772*/ meltfptr[771]); /*putupl#387 */ melt_assertmsg ("putupl #387 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V902*/ meltfptr[901])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #387 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V902*/ meltfptr[901])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V902*/ meltfptr[901]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V802*/ meltfptr[801]); /*putupl#388 */ melt_assertmsg ("putupl #388 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V902*/ meltfptr[901])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #388 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V902*/ meltfptr[901])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V902*/ meltfptr[901]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V804*/ meltfptr[803]); /*putupl#389 */ melt_assertmsg ("putupl #389 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V902*/ meltfptr[901])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #389 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V902*/ meltfptr[901])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V902*/ meltfptr[901]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V862*/ meltfptr[861]); /*putupl#390 */ melt_assertmsg ("putupl #390 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V902*/ meltfptr[901])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #390 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V902*/ meltfptr[901])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V902*/ meltfptr[901]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V896*/ meltfptr[895]); /*putupl#391 */ melt_assertmsg ("putupl #391 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V902*/ meltfptr[901])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #391 checkoff", (7 >= 0 && 7 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V902*/ meltfptr[901])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V902*/ meltfptr[901]))->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V898*/ meltfptr[897]); /*putupl#392 */ melt_assertmsg ("putupl #392 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V902*/ meltfptr[901])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #392 checkoff", (8 >= 0 && 8 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V902*/ meltfptr[901])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V902*/ meltfptr[901]))->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V900*/ meltfptr[899]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V902*/ meltfptr[901]); MELT_LOCATION ("warmelt-normatch.melt:2833:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892])))); ((meltobject_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V902*/ meltfptr[901]); MELT_LOCATION ("warmelt-normatch.melt:2833:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V893*/ meltfptr[892]); MELT_LOCATION ("warmelt-normatch.melt:2833:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V893*/ meltfptr[892], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V903*/ meltfptr[902])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V903*/ meltfptr[902])))); ((meltobject_ptr_t) ( /*_.VALDATA___V903*/ meltfptr[902]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V904*/ meltfptr[903]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V903*/ meltfptr[902]); melt_dbgtrace_written_object ( /*_.VALDATA___V903*/ meltfptr[902], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V905*/ meltfptr[904])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V906*/ meltfptr[905]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V905*/ meltfptr[904]); melt_dbgtrace_written_object ( /*_.VALDATA___V905*/ meltfptr[904], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V907*/ meltfptr[906])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V908*/ meltfptr[907]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V907*/ meltfptr[906]); melt_dbgtrace_written_object ( /*_.VALDATA___V907*/ meltfptr[906], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V909*/ meltfptr[908])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V909*/ meltfptr[908])))); ((meltobject_ptr_t) ( /*_.VALDATA___V909*/ meltfptr[908]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V910*/ meltfptr[909]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V909*/ meltfptr[908]); melt_dbgtrace_written_object ( /*_.VALDATA___V909*/ meltfptr[908], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2844:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V911*/ meltfptr[910])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V911*/ meltfptr[910])))); ((meltobject_ptr_t) ( /*_.VALDATA___V911*/ meltfptr[910]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V912*/ meltfptr[911]); MELT_LOCATION ("warmelt-normatch.melt:2844:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V911*/ meltfptr[910])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V911*/ meltfptr[910])))); ((meltobject_ptr_t) ( /*_.VALDATA___V911*/ meltfptr[910]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V859*/ meltfptr[858]); /*putupl#393 */ melt_assertmsg ("putupl #393 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V913*/ meltfptr[912])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #393 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V913*/ meltfptr[912])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V913*/ meltfptr[912]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 5))), (0)))); /*putupl#394 */ melt_assertmsg ("putupl #394 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V913*/ meltfptr[912])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #394 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V913*/ meltfptr[912])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V913*/ meltfptr[912]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 5))), (1)))); /*putupl#395 */ melt_assertmsg ("putupl #395 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V913*/ meltfptr[912])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #395 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V913*/ meltfptr[912])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V913*/ meltfptr[912]))->tabval[2] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]); #undef meltfram__ } /*end of meltmod__warmelt_normatch__initialmeltchunk_16 */ void meltmod__warmelt_normatch__initialmeltchunk_17 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*putupl#396*/ melt_assertmsg ("putupl #396 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V913*/ meltfptr[912])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #396 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V913*/ meltfptr[912])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V913*/ meltfptr[912]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]); /*putupl#397 */ melt_assertmsg ("putupl #397 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V913*/ meltfptr[912])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #397 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V913*/ meltfptr[912])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V913*/ meltfptr[912]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768]); /*putupl#398 */ melt_assertmsg ("putupl #398 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V913*/ meltfptr[912])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #398 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V913*/ meltfptr[912])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V913*/ meltfptr[912]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V799*/ meltfptr[798]); /*putupl#399 */ melt_assertmsg ("putupl #399 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V913*/ meltfptr[912])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #399 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V913*/ meltfptr[912])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V913*/ meltfptr[912]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V859*/ meltfptr[858]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V913*/ meltfptr[912]); MELT_LOCATION ("warmelt-normatch.melt:2844:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V911*/ meltfptr[910])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V911*/ meltfptr[910])))); ((meltobject_ptr_t) ( /*_.VALDATA___V911*/ meltfptr[910]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V913*/ meltfptr[912]); MELT_LOCATION ("warmelt-normatch.melt:2844:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V914*/ meltfptr[913])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V915*/ meltfptr[914]); MELT_LOCATION ("warmelt-normatch.melt:2844:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V914*/ meltfptr[913])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V914*/ meltfptr[913])))); ((meltobject_ptr_t) ( /*_.VALDATA___V914*/ meltfptr[913]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V911*/ meltfptr[910]); MELT_LOCATION ("warmelt-normatch.melt:2844:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V914*/ meltfptr[913]); MELT_LOCATION ("warmelt-normatch.melt:2844:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V914*/ meltfptr[913], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2844:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V917*/ meltfptr[916]); MELT_LOCATION ("warmelt-normatch.melt:2844:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915])))); ((meltobject_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V911*/ meltfptr[910]); MELT_LOCATION ("warmelt-normatch.melt:2844:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V916*/ meltfptr[915]); MELT_LOCATION ("warmelt-normatch.melt:2844:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V916*/ meltfptr[915], "new static instance"); /*putupl#400 */ melt_assertmsg ("putupl #400 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V918*/ meltfptr[917])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #400 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V918*/ meltfptr[917])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V918*/ meltfptr[917]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 6))), (0)))); /*putupl#401 */ melt_assertmsg ("putupl #401 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V918*/ meltfptr[917])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #401 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V918*/ meltfptr[917])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V918*/ meltfptr[917]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 6))), (1)))); /*putupl#402 */ melt_assertmsg ("putupl #402 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V918*/ meltfptr[917])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #402 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V918*/ meltfptr[917])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V918*/ meltfptr[917]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V772*/ meltfptr[771]); /*putupl#403 */ melt_assertmsg ("putupl #403 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V918*/ meltfptr[917])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #403 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___V802*/ meltfptr[801]); /*putupl#404 */ melt_assertmsg ("putupl #404 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V918*/ meltfptr[917])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #404 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___V804*/ meltfptr[803]); /*putupl#405 */ melt_assertmsg ("putupl #405 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V918*/ meltfptr[917])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #405 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___V862*/ meltfptr[861]); /*putupl#406 */ melt_assertmsg ("putupl #406 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V918*/ meltfptr[917])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #406 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___V914*/ meltfptr[913]); /*putupl#407 */ melt_assertmsg ("putupl #407 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V918*/ meltfptr[917])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #407 checkoff", (7 >= 0 && 7 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V918*/ meltfptr[917])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V918*/ meltfptr[917]))->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V918*/ meltfptr[917]); MELT_LOCATION ("warmelt-normatch.melt:2844:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V911*/ meltfptr[910])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V911*/ meltfptr[910])))); ((meltobject_ptr_t) ( /*_.VALDATA___V911*/ meltfptr[910]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V918*/ meltfptr[917]); MELT_LOCATION ("warmelt-normatch.melt:2844:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V911*/ meltfptr[910]); MELT_LOCATION ("warmelt-normatch.melt:2844:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V911*/ meltfptr[910], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V919*/ meltfptr[918])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V920*/ meltfptr[919]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V919*/ meltfptr[918]); melt_dbgtrace_written_object ( /*_.VALDATA___V919*/ meltfptr[918], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V921*/ meltfptr[920])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V921*/ meltfptr[920])))); ((meltobject_ptr_t) ( /*_.VALDATA___V921*/ meltfptr[920]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V922*/ meltfptr[921]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V921*/ meltfptr[920]); melt_dbgtrace_written_object ( /*_.VALDATA___V921*/ meltfptr[920], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V923*/ meltfptr[922])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V923*/ meltfptr[922])))); ((meltobject_ptr_t) ( /*_.VALDATA___V923*/ meltfptr[922]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V924*/ meltfptr[923]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V923*/ meltfptr[922]); melt_dbgtrace_written_object ( /*_.VALDATA___V923*/ meltfptr[922], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2852:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V925*/ meltfptr[924])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V925*/ meltfptr[924])))); ((meltobject_ptr_t) ( /*_.VALDATA___V925*/ meltfptr[924]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V926*/ meltfptr[925]); MELT_LOCATION ("warmelt-normatch.melt:2852:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V925*/ meltfptr[924])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V925*/ meltfptr[924])))); ((meltobject_ptr_t) ( /*_.VALDATA___V925*/ meltfptr[924]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V859*/ meltfptr[858]); /*putupl#408 */ melt_assertmsg ("putupl #408 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V927*/ meltfptr[926])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #408 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V927*/ meltfptr[926])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V927*/ meltfptr[926]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 5))), (0)))); /*putupl#409 */ melt_assertmsg ("putupl #409 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V927*/ meltfptr[926])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #409 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V927*/ meltfptr[926])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V927*/ meltfptr[926]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 5))), (1)))); /*putupl#410 */ melt_assertmsg ("putupl #410 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V927*/ meltfptr[926])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #410 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V927*/ meltfptr[926])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V927*/ meltfptr[926]))->tabval[2] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]); /*putupl#411 */ melt_assertmsg ("putupl #411 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V927*/ meltfptr[926])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #411 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V927*/ meltfptr[926])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V927*/ meltfptr[926]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]); /*putupl#412 */ melt_assertmsg ("putupl #412 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V927*/ meltfptr[926])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #412 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V927*/ meltfptr[926])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V927*/ meltfptr[926]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768]); /*putupl#413 */ melt_assertmsg ("putupl #413 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V927*/ meltfptr[926])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #413 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V927*/ meltfptr[926])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V927*/ meltfptr[926]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V799*/ meltfptr[798]); /*putupl#414 */ melt_assertmsg ("putupl #414 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V927*/ meltfptr[926])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #414 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V927*/ meltfptr[926])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V927*/ meltfptr[926]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V859*/ meltfptr[858]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V927*/ meltfptr[926]); MELT_LOCATION ("warmelt-normatch.melt:2852:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V925*/ meltfptr[924])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V925*/ meltfptr[924])))); ((meltobject_ptr_t) ( /*_.VALDATA___V925*/ meltfptr[924]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V927*/ meltfptr[926]); MELT_LOCATION ("warmelt-normatch.melt:2852:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V928*/ meltfptr[927])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V929*/ meltfptr[928]); MELT_LOCATION ("warmelt-normatch.melt:2852:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V928*/ meltfptr[927])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V928*/ meltfptr[927])))); ((meltobject_ptr_t) ( /*_.VALDATA___V928*/ meltfptr[927]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V925*/ meltfptr[924]); MELT_LOCATION ("warmelt-normatch.melt:2852:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V928*/ meltfptr[927]); MELT_LOCATION ("warmelt-normatch.melt:2852:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V928*/ meltfptr[927], "new static instance"); /*putupl#415 */ melt_assertmsg ("putupl #415 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V930*/ meltfptr[929])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #415 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V930*/ meltfptr[929])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V930*/ meltfptr[929]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 6))), (0)))); /*putupl#416 */ melt_assertmsg ("putupl #416 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V930*/ meltfptr[929])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #416 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V930*/ meltfptr[929])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V930*/ meltfptr[929]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 6))), (1)))); /*putupl#417 */ melt_assertmsg ("putupl #417 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V930*/ meltfptr[929])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #417 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___V772*/ meltfptr[771]); /*putupl#418 */ melt_assertmsg ("putupl #418 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V930*/ meltfptr[929])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #418 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V930*/ meltfptr[929])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V930*/ meltfptr[929]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V802*/ meltfptr[801]); /*putupl#419 */ melt_assertmsg ("putupl #419 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V930*/ meltfptr[929])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #419 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V930*/ meltfptr[929])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V930*/ meltfptr[929]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V804*/ meltfptr[803]); /*putupl#420 */ melt_assertmsg ("putupl #420 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V930*/ meltfptr[929])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #420 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V930*/ meltfptr[929])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V930*/ meltfptr[929]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V862*/ meltfptr[861]); /*putupl#421 */ melt_assertmsg ("putupl #421 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V930*/ meltfptr[929])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #421 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V930*/ meltfptr[929])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V930*/ meltfptr[929]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V928*/ meltfptr[927]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V930*/ meltfptr[929]); MELT_LOCATION ("warmelt-normatch.melt:2852:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V925*/ meltfptr[924])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V925*/ meltfptr[924])))); ((meltobject_ptr_t) ( /*_.VALDATA___V925*/ meltfptr[924]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V930*/ meltfptr[929]); MELT_LOCATION ("warmelt-normatch.melt:2852:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V925*/ meltfptr[924]); MELT_LOCATION ("warmelt-normatch.melt:2852:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V925*/ meltfptr[924], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V931*/ meltfptr[930])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V932*/ meltfptr[931]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V931*/ meltfptr[930]); melt_dbgtrace_written_object ( /*_.VALDATA___V931*/ meltfptr[930], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V933*/ meltfptr[932])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V934*/ meltfptr[933]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V933*/ meltfptr[932]); melt_dbgtrace_written_object ( /*_.VALDATA___V933*/ meltfptr[932], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2860:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V935*/ meltfptr[934])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V936*/ meltfptr[935]); MELT_LOCATION ("warmelt-normatch.melt:2860:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V935*/ meltfptr[934])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V935*/ meltfptr[934])))); ((meltobject_ptr_t) ( /*_.VALDATA___V935*/ meltfptr[934]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V859*/ meltfptr[858]); /*putupl#422 */ melt_assertmsg ("putupl #422 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V937*/ meltfptr[936])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #422 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V937*/ meltfptr[936])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V937*/ meltfptr[936]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 5))), (0)))); /*putupl#423 */ melt_assertmsg ("putupl #423 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V937*/ meltfptr[936])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #423 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V937*/ meltfptr[936])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V937*/ meltfptr[936]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 5))), (1)))); /*putupl#424 */ melt_assertmsg ("putupl #424 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V937*/ meltfptr[936])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #424 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) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]); /*putupl#425 */ melt_assertmsg ("putupl #425 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V937*/ meltfptr[936])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #425 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___V763*/ meltfptr[762]); /*putupl#426 */ melt_assertmsg ("putupl #426 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V937*/ meltfptr[936])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #426 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___V769*/ meltfptr[768]); /*putupl#427 */ melt_assertmsg ("putupl #427 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V937*/ meltfptr[936])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #427 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___V799*/ meltfptr[798]); /*putupl#428 */ melt_assertmsg ("putupl #428 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V937*/ meltfptr[936])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #428 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___V859*/ meltfptr[858]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V937*/ meltfptr[936]); MELT_LOCATION ("warmelt-normatch.melt:2860:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V935*/ meltfptr[934])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V935*/ meltfptr[934])))); ((meltobject_ptr_t) ( /*_.VALDATA___V935*/ meltfptr[934]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V937*/ meltfptr[936]); MELT_LOCATION ("warmelt-normatch.melt:2860:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V938*/ meltfptr[937])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V939*/ meltfptr[938]); MELT_LOCATION ("warmelt-normatch.melt:2860:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V938*/ meltfptr[937])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V938*/ meltfptr[937])))); ((meltobject_ptr_t) ( /*_.VALDATA___V938*/ meltfptr[937]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V935*/ meltfptr[934]); MELT_LOCATION ("warmelt-normatch.melt:2860:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V938*/ meltfptr[937]); MELT_LOCATION ("warmelt-normatch.melt:2860:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V938*/ meltfptr[937], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2860:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V940*/ meltfptr[939])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V941*/ meltfptr[940]); MELT_LOCATION ("warmelt-normatch.melt:2860:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V940*/ meltfptr[939])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V940*/ meltfptr[939])))); ((meltobject_ptr_t) ( /*_.VALDATA___V940*/ meltfptr[939]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V935*/ meltfptr[934]); MELT_LOCATION ("warmelt-normatch.melt:2860:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V940*/ meltfptr[939]); MELT_LOCATION ("warmelt-normatch.melt:2860:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V940*/ meltfptr[939], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2860:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V942*/ meltfptr[941])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V943*/ meltfptr[942]); MELT_LOCATION ("warmelt-normatch.melt:2860:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V942*/ meltfptr[941])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V942*/ meltfptr[941])))); ((meltobject_ptr_t) ( /*_.VALDATA___V942*/ meltfptr[941]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V935*/ meltfptr[934]); MELT_LOCATION ("warmelt-normatch.melt:2860:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V942*/ meltfptr[941]); MELT_LOCATION ("warmelt-normatch.melt:2860:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V942*/ meltfptr[941], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2860:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V944*/ meltfptr[943])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V945*/ meltfptr[944]); MELT_LOCATION ("warmelt-normatch.melt:2860:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V944*/ meltfptr[943])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V944*/ meltfptr[943])))); ((meltobject_ptr_t) ( /*_.VALDATA___V944*/ meltfptr[943]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V935*/ meltfptr[934]); MELT_LOCATION ("warmelt-normatch.melt:2860:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V944*/ meltfptr[943]); MELT_LOCATION ("warmelt-normatch.melt:2860:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V944*/ meltfptr[943], "new static instance"); /*putupl#429 */ melt_assertmsg ("putupl #429 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V946*/ meltfptr[945])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #429 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V946*/ meltfptr[945])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V946*/ meltfptr[945]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 6))), (0)))); /*putupl#430 */ melt_assertmsg ("putupl #430 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V946*/ meltfptr[945])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #430 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V946*/ meltfptr[945])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V946*/ meltfptr[945]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]), 6))), (1)))); /*putupl#431 */ melt_assertmsg ("putupl #431 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V946*/ meltfptr[945])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #431 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V946*/ meltfptr[945])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V946*/ meltfptr[945]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V772*/ meltfptr[771]); /*putupl#432 */ melt_assertmsg ("putupl #432 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V946*/ meltfptr[945])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #432 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V946*/ meltfptr[945])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V946*/ meltfptr[945]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V802*/ meltfptr[801]); /*putupl#433 */ melt_assertmsg ("putupl #433 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V946*/ meltfptr[945])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #433 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V946*/ meltfptr[945])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V946*/ meltfptr[945]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V804*/ meltfptr[803]); /*putupl#434 */ melt_assertmsg ("putupl #434 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V946*/ meltfptr[945])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #434 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V946*/ meltfptr[945])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V946*/ meltfptr[945]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V862*/ meltfptr[861]); /*putupl#435 */ melt_assertmsg ("putupl #435 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V946*/ meltfptr[945])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #435 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V946*/ meltfptr[945])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V946*/ meltfptr[945]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V938*/ meltfptr[937]); /*putupl#436 */ melt_assertmsg ("putupl #436 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V946*/ meltfptr[945])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #436 checkoff", (7 >= 0 && 7 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V946*/ meltfptr[945])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V946*/ meltfptr[945]))->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V940*/ meltfptr[939]); /*putupl#437 */ melt_assertmsg ("putupl #437 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V946*/ meltfptr[945])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #437 checkoff", (8 >= 0 && 8 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V946*/ meltfptr[945])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V946*/ meltfptr[945]))->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V942*/ meltfptr[941]); /*putupl#438 */ melt_assertmsg ("putupl #438 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V946*/ meltfptr[945])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #438 checkoff", (9 >= 0 && 9 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V946*/ meltfptr[945])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V946*/ meltfptr[945]))->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V944*/ meltfptr[943]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V946*/ meltfptr[945]); MELT_LOCATION ("warmelt-normatch.melt:2860:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V935*/ meltfptr[934])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V935*/ meltfptr[934])))); ((meltobject_ptr_t) ( /*_.VALDATA___V935*/ meltfptr[934]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V946*/ meltfptr[945]); MELT_LOCATION ("warmelt-normatch.melt:2860:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V935*/ meltfptr[934]); MELT_LOCATION ("warmelt-normatch.melt:2860:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V935*/ meltfptr[934], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V947*/ meltfptr[946])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V948*/ meltfptr[947]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V947*/ meltfptr[946]); melt_dbgtrace_written_object ( /*_.VALDATA___V947*/ meltfptr[946], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V949*/ meltfptr[948])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V950*/ meltfptr[949]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V949*/ meltfptr[948]); melt_dbgtrace_written_object ( /*_.VALDATA___V949*/ meltfptr[948], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V951*/ meltfptr[950])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V952*/ meltfptr[951]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V951*/ meltfptr[950]); melt_dbgtrace_written_object ( /*_.VALDATA___V951*/ meltfptr[950], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V953*/ meltfptr[952])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V954*/ meltfptr[953]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V953*/ meltfptr[952]); melt_dbgtrace_written_object ( /*_.VALDATA___V953*/ meltfptr[952], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V955*/ meltfptr[954])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V956*/ meltfptr[955]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V955*/ meltfptr[954]); melt_dbgtrace_written_object ( /*_.VALDATA___V955*/ meltfptr[954], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V957*/ meltfptr[956])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V958*/ meltfptr[957]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V957*/ meltfptr[956]); melt_dbgtrace_written_object ( /*_.VALDATA___V957*/ meltfptr[956], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2872:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V959*/ meltfptr[958])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V960*/ meltfptr[959]); MELT_LOCATION ("warmelt-normatch.melt:2872:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V959*/ meltfptr[958])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V959*/ meltfptr[958])))); ((meltobject_ptr_t) ( /*_.VALDATA___V959*/ meltfptr[958]))->obj_vartab[4] = (melt_ptr_t) ( /*_.CLASS_NREP_SIMPLE__V75*/ meltfptr[74]); #undef meltfram__ } /*end of meltmod__warmelt_normatch__initialmeltchunk_17 */ void meltmod__warmelt_normatch__initialmeltchunk_18 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*putupl#439*/ melt_assertmsg ("putupl #439 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V961*/ meltfptr[960])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #439 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V961*/ meltfptr[960])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V961*/ meltfptr[960]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_SIMPLE__V75*/ meltfptr[74]), 5))), (0)))); /*putupl#440 */ melt_assertmsg ("putupl #440 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V961*/ meltfptr[960])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #440 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V961*/ meltfptr[960])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V961*/ meltfptr[960]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_SIMPLE__V75*/ meltfptr[74]), 5))), (1)))); /*putupl#441 */ melt_assertmsg ("putupl #441 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V961*/ meltfptr[960])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #441 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V961*/ meltfptr[960])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V961*/ meltfptr[960]))->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NREP_SIMPLE__V75*/ meltfptr[74]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V961*/ meltfptr[960]); MELT_LOCATION ("warmelt-normatch.melt:2872:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V959*/ meltfptr[958])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V959*/ meltfptr[958])))); ((meltobject_ptr_t) ( /*_.VALDATA___V959*/ meltfptr[958]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V961*/ meltfptr[960]); MELT_LOCATION ("warmelt-normatch.melt:2872:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V962*/ meltfptr[961])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V963*/ meltfptr[962]); MELT_LOCATION ("warmelt-normatch.melt:2872:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V962*/ meltfptr[961])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V962*/ meltfptr[961])))); ((meltobject_ptr_t) ( /*_.VALDATA___V962*/ meltfptr[961]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V959*/ meltfptr[958]); MELT_LOCATION ("warmelt-normatch.melt:2872:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V962*/ meltfptr[961]); MELT_LOCATION ("warmelt-normatch.melt:2872:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V962*/ meltfptr[961], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2872:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V964*/ meltfptr[963])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V965*/ meltfptr[964]); MELT_LOCATION ("warmelt-normatch.melt:2872:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V964*/ meltfptr[963])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V964*/ meltfptr[963])))); ((meltobject_ptr_t) ( /*_.VALDATA___V964*/ meltfptr[963]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V959*/ meltfptr[958]); MELT_LOCATION ("warmelt-normatch.melt:2872:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V964*/ meltfptr[963]); MELT_LOCATION ("warmelt-normatch.melt:2872:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V964*/ meltfptr[963], "new static instance"); /*putupl#442 */ melt_assertmsg ("putupl #442 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V966*/ meltfptr[965])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #442 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.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_NREP_SIMPLE__V75*/ meltfptr[74]), 6))), (0)))); /*putupl#443 */ melt_assertmsg ("putupl #443 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V966*/ meltfptr[965])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #443 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V966*/ meltfptr[965])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V966*/ meltfptr[965]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V962*/ meltfptr[961]); /*putupl#444 */ melt_assertmsg ("putupl #444 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V966*/ meltfptr[965])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #444 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V966*/ meltfptr[965])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V966*/ meltfptr[965]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V964*/ meltfptr[963]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V966*/ meltfptr[965]); MELT_LOCATION ("warmelt-normatch.melt:2872:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V959*/ meltfptr[958])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V959*/ meltfptr[958])))); ((meltobject_ptr_t) ( /*_.VALDATA___V959*/ meltfptr[958]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V966*/ meltfptr[965]); MELT_LOCATION ("warmelt-normatch.melt:2872:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V959*/ meltfptr[958]); MELT_LOCATION ("warmelt-normatch.melt:2872:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V959*/ meltfptr[958], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V967*/ meltfptr[966])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V968*/ meltfptr[967]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V967*/ meltfptr[966]); melt_dbgtrace_written_object ( /*_.VALDATA___V967*/ meltfptr[966], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V969*/ meltfptr[968])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V970*/ meltfptr[969]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V969*/ meltfptr[968]); melt_dbgtrace_written_object ( /*_.VALDATA___V969*/ meltfptr[968], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V971*/ meltfptr[970])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V972*/ meltfptr[971]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V971*/ meltfptr[970]); melt_dbgtrace_written_object ( /*_.VALDATA___V971*/ meltfptr[970], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2882:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V973*/ meltfptr[972])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V973*/ meltfptr[972])))); ((meltobject_ptr_t) ( /*_.VALDATA___V973*/ meltfptr[972]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V974*/ meltfptr[973]); MELT_LOCATION ("warmelt-normatch.melt:2882:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V973*/ meltfptr[972])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V973*/ meltfptr[972])))); ((meltobject_ptr_t) ( /*_.VALDATA___V973*/ meltfptr[972]))->obj_vartab[4] = (melt_ptr_t) ( /*_.CLASS_NREP_SIMPLE__V75*/ meltfptr[74]); /*putupl#445 */ melt_assertmsg ("putupl #445 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V975*/ meltfptr[974])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #445 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V975*/ meltfptr[974])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V975*/ meltfptr[974]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_SIMPLE__V75*/ meltfptr[74]), 5))), (0)))); /*putupl#446 */ melt_assertmsg ("putupl #446 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V975*/ meltfptr[974])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #446 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V975*/ meltfptr[974])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V975*/ meltfptr[974]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_SIMPLE__V75*/ meltfptr[74]), 5))), (1)))); /*putupl#447 */ melt_assertmsg ("putupl #447 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V975*/ meltfptr[974])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #447 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V975*/ meltfptr[974])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V975*/ meltfptr[974]))->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NREP_SIMPLE__V75*/ meltfptr[74]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V975*/ meltfptr[974]); MELT_LOCATION ("warmelt-normatch.melt:2882:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V973*/ meltfptr[972])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V973*/ meltfptr[972])))); ((meltobject_ptr_t) ( /*_.VALDATA___V973*/ meltfptr[972]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V975*/ meltfptr[974]); MELT_LOCATION ("warmelt-normatch.melt:2882:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V976*/ meltfptr[975])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V977*/ meltfptr[976]); MELT_LOCATION ("warmelt-normatch.melt:2882:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V976*/ meltfptr[975])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V976*/ meltfptr[975])))); ((meltobject_ptr_t) ( /*_.VALDATA___V976*/ meltfptr[975]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V973*/ meltfptr[972]); MELT_LOCATION ("warmelt-normatch.melt:2882:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V976*/ meltfptr[975]); MELT_LOCATION ("warmelt-normatch.melt:2882:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V976*/ meltfptr[975], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2882:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V978*/ meltfptr[977])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V979*/ meltfptr[978]); MELT_LOCATION ("warmelt-normatch.melt:2882:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V978*/ meltfptr[977])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V978*/ meltfptr[977])))); ((meltobject_ptr_t) ( /*_.VALDATA___V978*/ meltfptr[977]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V973*/ meltfptr[972]); MELT_LOCATION ("warmelt-normatch.melt:2882:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V978*/ meltfptr[977]); MELT_LOCATION ("warmelt-normatch.melt:2882:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V978*/ meltfptr[977], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2882:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V980*/ meltfptr[979])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V981*/ meltfptr[980]); MELT_LOCATION ("warmelt-normatch.melt:2882:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V980*/ meltfptr[979])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V980*/ meltfptr[979])))); ((meltobject_ptr_t) ( /*_.VALDATA___V980*/ meltfptr[979]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V973*/ meltfptr[972]); MELT_LOCATION ("warmelt-normatch.melt:2882:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V980*/ meltfptr[979]); MELT_LOCATION ("warmelt-normatch.melt:2882:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V980*/ meltfptr[979], "new static instance"); /*putupl#448 */ melt_assertmsg ("putupl #448 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V982*/ meltfptr[981])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #448 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V982*/ meltfptr[981])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V982*/ meltfptr[981]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_SIMPLE__V75*/ meltfptr[74]), 6))), (0)))); /*putupl#449 */ melt_assertmsg ("putupl #449 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V982*/ meltfptr[981])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #449 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V982*/ meltfptr[981])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V982*/ meltfptr[981]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V976*/ meltfptr[975]); /*putupl#450 */ melt_assertmsg ("putupl #450 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V982*/ meltfptr[981])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #450 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V982*/ meltfptr[981])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V982*/ meltfptr[981]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V978*/ meltfptr[977]); /*putupl#451 */ melt_assertmsg ("putupl #451 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V982*/ meltfptr[981])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #451 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V982*/ meltfptr[981])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V982*/ meltfptr[981]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V980*/ meltfptr[979]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V982*/ meltfptr[981]); MELT_LOCATION ("warmelt-normatch.melt:2882:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V973*/ meltfptr[972])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V973*/ meltfptr[972])))); ((meltobject_ptr_t) ( /*_.VALDATA___V973*/ meltfptr[972]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V982*/ meltfptr[981]); MELT_LOCATION ("warmelt-normatch.melt:2882:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V973*/ meltfptr[972]); MELT_LOCATION ("warmelt-normatch.melt:2882:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V973*/ meltfptr[972], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V983*/ meltfptr[982])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V983*/ meltfptr[982])))); ((meltobject_ptr_t) ( /*_.VALDATA___V983*/ meltfptr[982]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V984*/ meltfptr[983]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V983*/ meltfptr[982]); melt_dbgtrace_written_object ( /*_.VALDATA___V983*/ meltfptr[982], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V985*/ meltfptr[984])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V986*/ meltfptr[985]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V985*/ meltfptr[984]); melt_dbgtrace_written_object ( /*_.VALDATA___V985*/ meltfptr[984], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V987*/ meltfptr[986])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V988*/ meltfptr[987]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V987*/ meltfptr[986]); melt_dbgtrace_written_object ( /*_.VALDATA___V987*/ meltfptr[986], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2895:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V989*/ meltfptr[988])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_897__MAKE_MATCH_FLAG#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V989*/ meltfptr[988])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:2895:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V989*/ meltfptr[988])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_897__MAKE_MATCH_FLAG#1", NULL != ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V989*/ meltfptr[988])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-normatch.melt:2895:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V989*/ meltfptr[988])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V627*/ meltfptr[626]); ((meltroutine_ptr_t) /*_.VALROUT___V989*/ meltfptr[988])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V627*/ meltfptr[626]); MELT_LOCATION ("warmelt-normatch.melt:2895:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V989*/ meltfptr[988])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V741*/ meltfptr[740]); ((meltroutine_ptr_t) /*_.VALROUT___V989*/ meltfptr[988])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V741*/ meltfptr[740]); MELT_LOCATION ("warmelt-normatch.melt:2895:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V989*/ meltfptr[988])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_897__MAKE_MATCH_FLAG#4", NULL != ( /*_.DISCR_CONSTANT_INTEGER__V51*/ meltfptr[50])); ((meltroutine_ptr_t) /*_.VALROUT___V989*/ meltfptr[988])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_CONSTANT_INTEGER__V51*/ meltfptr[50]); MELT_LOCATION ("warmelt-normatch.melt:2895:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V989*/ meltfptr[988]); /*putclosurout#41 */ melt_assertmsg ("putclosrout#41 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V990*/ meltfptr[989])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#41 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V989*/ meltfptr[988])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V990*/ meltfptr[989])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V989*/ meltfptr[988]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V990*/ meltfptr[989]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V991*/ meltfptr[990])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V992*/ meltfptr[991]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V991*/ meltfptr[990]); melt_dbgtrace_written_object ( /*_.VALDATA___V991*/ meltfptr[990], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V993*/ meltfptr[992])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V994*/ meltfptr[993]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V993*/ meltfptr[992]); melt_dbgtrace_written_object ( /*_.VALDATA___V993*/ meltfptr[992], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2924:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V995*/ meltfptr[994])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V995*/ meltfptr[994])))); ((meltobject_ptr_t) ( /*_.VALDATA___V995*/ meltfptr[994]))->obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V993*/ meltfptr[992]); MELT_LOCATION ("warmelt-normatch.melt:2924:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V995*/ meltfptr[994])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V995*/ meltfptr[994])))); ((meltobject_ptr_t) ( /*_.VALDATA___V995*/ meltfptr[994]))->obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normatch.melt:2924:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V995*/ meltfptr[994]); MELT_LOCATION ("warmelt-normatch.melt:2924:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V995*/ meltfptr[994], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V996*/ meltfptr[995])) == 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] = (melt_ptr_t) ( /*_.VALSTR___V997*/ meltfptr[996]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V996*/ meltfptr[995]); melt_dbgtrace_written_object ( /*_.VALDATA___V996*/ meltfptr[995], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2924:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V998*/ meltfptr[997])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V998*/ meltfptr[997])))); ((meltobject_ptr_t) ( /*_.VALDATA___V998*/ meltfptr[997]))->obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V996*/ meltfptr[995]); MELT_LOCATION ("warmelt-normatch.melt:2924:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V998*/ meltfptr[997])) == 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) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normatch.melt:2924:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V998*/ meltfptr[997]); MELT_LOCATION ("warmelt-normatch.melt:2924:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V998*/ meltfptr[997], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V999*/ meltfptr[998])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V999*/ meltfptr[998])))); ((meltobject_ptr_t) ( /*_.VALDATA___V999*/ meltfptr[998]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1000*/ meltfptr[999]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V999*/ meltfptr[998]); melt_dbgtrace_written_object ( /*_.VALDATA___V999*/ meltfptr[998], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2924:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1001*/ meltfptr[1000])) == 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]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V999*/ meltfptr[998]); MELT_LOCATION ("warmelt-normatch.melt:2924:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1001*/ meltfptr[1000])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normatch.melt:2924:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1001*/ meltfptr[1000]); MELT_LOCATION ("warmelt-normatch.melt:2924:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1001*/ meltfptr[1000], "new static instance"); /*putupl#452 */ melt_assertmsg ("putupl #452 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1002*/ meltfptr[1001])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #452 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1002*/ meltfptr[1001])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1002*/ meltfptr[1001]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V995*/ meltfptr[994]); /*putupl#453 */ melt_assertmsg ("putupl #453 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1002*/ meltfptr[1001])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #453 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1002*/ meltfptr[1001])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1002*/ meltfptr[1001]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V998*/ meltfptr[997]); /*putupl#454 */ melt_assertmsg ("putupl #454 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1002*/ meltfptr[1001])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #454 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1002*/ meltfptr[1001])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1002*/ meltfptr[1001]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1001*/ meltfptr[1000]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1002*/ meltfptr[1001]); MELT_LOCATION ("warmelt-normatch.melt:2924:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1003*/ meltfptr[1002])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1003*/ meltfptr[1002])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1003*/ meltfptr[1002]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1004*/ meltfptr[1003]); MELT_LOCATION ("warmelt-normatch.melt:2924:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1003*/ meltfptr[1002]); MELT_LOCATION ("warmelt-normatch.melt:2924:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1003*/ meltfptr[1002], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1005*/ meltfptr[1004])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1005*/ meltfptr[1004])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1005*/ meltfptr[1004]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1006*/ meltfptr[1005]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1005*/ meltfptr[1004]); melt_dbgtrace_written_object ( /*_.VALDATA___V1005*/ meltfptr[1004], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1007*/ meltfptr[1006])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1007*/ meltfptr[1006])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1007*/ meltfptr[1006]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1008*/ meltfptr[1007]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1007*/ meltfptr[1006]); melt_dbgtrace_written_object ( /*_.VALDATA___V1007*/ meltfptr[1006], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2930:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1009*/ meltfptr[1008])) == 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]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1007*/ meltfptr[1006]); MELT_LOCATION ("warmelt-normatch.melt:2930:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1009*/ meltfptr[1008])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normatch.melt:2930:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1009*/ meltfptr[1008]); MELT_LOCATION ("warmelt-normatch.melt:2930:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1009*/ meltfptr[1008], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2930:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1010*/ meltfptr[1009])) == 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]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V996*/ meltfptr[995]); MELT_LOCATION ("warmelt-normatch.melt:2930:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1010*/ meltfptr[1009])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normatch.melt:2930:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1010*/ meltfptr[1009]); MELT_LOCATION ("warmelt-normatch.melt:2930:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1010*/ meltfptr[1009], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2930:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1011*/ meltfptr[1010])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1011*/ meltfptr[1010])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1011*/ meltfptr[1010]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V999*/ meltfptr[998]); MELT_LOCATION ("warmelt-normatch.melt:2930:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1011*/ meltfptr[1010])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normatch.melt:2930:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1011*/ meltfptr[1010]); MELT_LOCATION ("warmelt-normatch.melt:2930:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1011*/ meltfptr[1010], "new static instance"); /*putupl#455 */ melt_assertmsg ("putupl #455 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1012*/ meltfptr[1011])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #455 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1012*/ meltfptr[1011])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1012*/ meltfptr[1011]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V1009*/ meltfptr[1008]); /*putupl#456 */ melt_assertmsg ("putupl #456 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1012*/ meltfptr[1011])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #456 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1012*/ meltfptr[1011])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1012*/ meltfptr[1011]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1010*/ meltfptr[1009]); /*putupl#457 */ melt_assertmsg ("putupl #457 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1012*/ meltfptr[1011])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #457 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1012*/ meltfptr[1011])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1012*/ meltfptr[1011]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1011*/ meltfptr[1010]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1012*/ meltfptr[1011]); MELT_LOCATION ("warmelt-normatch.melt:2930:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1013*/ meltfptr[1012])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1014*/ meltfptr[1013]); MELT_LOCATION ("warmelt-normatch.melt:2930:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1013*/ meltfptr[1012]); #undef meltfram__ } /*end of meltmod__warmelt_normatch__initialmeltchunk_18 */ void meltmod__warmelt_normatch__initialmeltchunk_19 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-normatch.melt:2930:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1013*/ meltfptr[1012], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1015*/ meltfptr[1014])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1016*/ meltfptr[1015]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1015*/ meltfptr[1014]); melt_dbgtrace_written_object ( /*_.VALDATA___V1015*/ meltfptr[1014], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2935:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1017*/ meltfptr[1016])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1017*/ meltfptr[1016])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1017*/ meltfptr[1016]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1007*/ meltfptr[1006]); MELT_LOCATION ("warmelt-normatch.melt:2935:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1017*/ meltfptr[1016])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normatch.melt:2935:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1017*/ meltfptr[1016]); MELT_LOCATION ("warmelt-normatch.melt:2935:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1017*/ meltfptr[1016], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2935:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1018*/ meltfptr[1017])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1018*/ meltfptr[1017])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1018*/ meltfptr[1017]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V996*/ meltfptr[995]); MELT_LOCATION ("warmelt-normatch.melt:2935:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1018*/ meltfptr[1017])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1018*/ meltfptr[1017])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1018*/ meltfptr[1017]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normatch.melt:2935:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1018*/ meltfptr[1017]); MELT_LOCATION ("warmelt-normatch.melt:2935:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1018*/ meltfptr[1017], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2935:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1019*/ meltfptr[1018])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1019*/ meltfptr[1018])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1019*/ meltfptr[1018]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V999*/ meltfptr[998]); MELT_LOCATION ("warmelt-normatch.melt:2935:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1019*/ meltfptr[1018])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1019*/ meltfptr[1018])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1019*/ meltfptr[1018]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normatch.melt:2935:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1019*/ meltfptr[1018]); MELT_LOCATION ("warmelt-normatch.melt:2935:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1019*/ meltfptr[1018], "new static instance"); /*putupl#458 */ melt_assertmsg ("putupl #458 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1020*/ meltfptr[1019])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #458 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1020*/ meltfptr[1019])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1020*/ meltfptr[1019]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V1017*/ meltfptr[1016]); /*putupl#459 */ melt_assertmsg ("putupl #459 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1020*/ meltfptr[1019])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #459 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1020*/ meltfptr[1019])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1020*/ meltfptr[1019]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1018*/ meltfptr[1017]); /*putupl#460 */ melt_assertmsg ("putupl #460 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1020*/ meltfptr[1019])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #460 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1020*/ meltfptr[1019])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1020*/ meltfptr[1019]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1019*/ meltfptr[1018]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1020*/ meltfptr[1019]); MELT_LOCATION ("warmelt-normatch.melt:2935:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1021*/ meltfptr[1020])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1021*/ meltfptr[1020])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1021*/ meltfptr[1020]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1022*/ meltfptr[1021]); MELT_LOCATION ("warmelt-normatch.melt:2935:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1021*/ meltfptr[1020]); MELT_LOCATION ("warmelt-normatch.melt:2935:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1021*/ meltfptr[1020], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:2940:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1023*/ meltfptr[1022])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_931__SCANSUBPAT_ANYRECV#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1023*/ meltfptr[1022])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:2940:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1023*/ meltfptr[1022]); /*putclosurout#42 */ melt_assertmsg ("putclosrout#42 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1024*/ meltfptr[1023])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#42 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1023*/ meltfptr[1022])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1024*/ meltfptr[1023])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1023*/ meltfptr[1022]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1024*/ meltfptr[1023]); MELT_LOCATION ("warmelt-normatch.melt:2948:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1025*/ meltfptr[1024])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_933__SCANSTEPDATA_ANYRECV#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1025*/ meltfptr[1024])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:2948:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1025*/ meltfptr[1024]); /*putclosurout#43 */ melt_assertmsg ("putclosrout#43 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1026*/ meltfptr[1025])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#43 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1025*/ meltfptr[1024])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1026*/ meltfptr[1025])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1025*/ meltfptr[1024]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1026*/ meltfptr[1025]); MELT_LOCATION ("warmelt-normatch.melt:2956:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1027*/ meltfptr[1026])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_935__SCANSTEPFLAG_ANYRECV#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1027*/ meltfptr[1026])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:2956:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1027*/ meltfptr[1026]); /*putclosurout#44 */ melt_assertmsg ("putclosrout#44 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1028*/ meltfptr[1027])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#44 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:2964:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) 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_937__SCANSUBPAT_NOOP#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:2964:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1029*/ meltfptr[1028]); /*putclosurout#45 */ melt_assertmsg ("putclosrout#45 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1030*/ meltfptr[1029])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#45 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1029*/ meltfptr[1028])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1030*/ meltfptr[1029])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1029*/ meltfptr[1028]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1030*/ meltfptr[1029]); MELT_LOCATION ("warmelt-normatch.melt:2971:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) 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_939__SCANSUBPAT_OR#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1031*/ meltfptr[1030])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:2971:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1031*/ meltfptr[1030]); /*putclosurout#46 */ melt_assertmsg ("putclosrout#46 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1032*/ meltfptr[1031])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#46 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1031*/ meltfptr[1030])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1032*/ meltfptr[1031])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1031*/ meltfptr[1030]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1032*/ meltfptr[1031]); MELT_LOCATION ("warmelt-normatch.melt:2980:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1033*/ meltfptr[1032])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_941__SCANSUBPAT_AND#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1033*/ meltfptr[1032])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:2980:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1033*/ meltfptr[1032]); /*putclosurout#47 */ melt_assertmsg ("putclosrout#47 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1034*/ meltfptr[1033])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#47 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1033*/ meltfptr[1032])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1034*/ meltfptr[1033])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1033*/ meltfptr[1032]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1034*/ meltfptr[1033]); MELT_LOCATION ("warmelt-normatch.melt:2991:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1035*/ meltfptr[1034])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_943__SCANSUBPAT_CONSTRUCT#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1035*/ meltfptr[1034])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:2991:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1035*/ meltfptr[1034])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_943__SCANSUBPAT_CONSTRUCT#1", NULL != ( /*_.CLASS_SOURCE_PATTERN_CONSTRUCT__V22*/ meltfptr[21])); ((meltroutine_ptr_t) /*_.VALROUT___V1035*/ meltfptr[1034])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_CONSTRUCT__V22*/ meltfptr[21]); MELT_LOCATION ("warmelt-normatch.melt:2991:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1035*/ meltfptr[1034]); /*putclosurout#48 */ melt_assertmsg ("putclosrout#48 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1036*/ meltfptr[1035])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#48 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1035*/ meltfptr[1034])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1036*/ meltfptr[1035])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1035*/ meltfptr[1034]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1036*/ meltfptr[1035]); MELT_LOCATION ("warmelt-normatch.melt:3006:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1037*/ meltfptr[1036])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_945__SCANSUBPAT_OBJECT#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1037*/ meltfptr[1036])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:3006:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1037*/ meltfptr[1036])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_945__SCANSUBPAT_OBJECT#1", NULL != ( /*_.CLASS_SOURCE_FIELD_PATTERN__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1037*/ meltfptr[1036])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SOURCE_FIELD_PATTERN__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-normatch.melt:3006:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1037*/ meltfptr[1036]); /*putclosurout#49 */ melt_assertmsg ("putclosrout#49 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1038*/ meltfptr[1037])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#49 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1037*/ meltfptr[1036])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1038*/ meltfptr[1037])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1037*/ meltfptr[1036]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1038*/ meltfptr[1037]); MELT_LOCATION ("warmelt-normatch.melt:3017:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1039*/ meltfptr[1038])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_947__FILL_MATCHCASE#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1039*/ meltfptr[1038])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:3017:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1039*/ meltfptr[1038])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V673*/ meltfptr[672]); ((meltroutine_ptr_t) /*_.VALROUT___V1039*/ meltfptr[1038])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V673*/ meltfptr[672]); MELT_LOCATION ("warmelt-normatch.melt:3017:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1039*/ meltfptr[1038])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_947__FILL_MATCHCASE#2", NULL != ( /*_.DISCR_MAP_OBJECTS__V33*/ meltfptr[32])); ((meltroutine_ptr_t) /*_.VALROUT___V1039*/ meltfptr[1038])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V33*/ meltfptr[32]); MELT_LOCATION ("warmelt-normatch.melt:3017:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1039*/ meltfptr[1038])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_947__FILL_MATCHCASE#3", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1039*/ meltfptr[1038])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:3017:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1039*/ meltfptr[1038])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_947__FILL_MATCHCASE#4", NULL != ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13])); ((meltroutine_ptr_t) /*_.VALROUT___V1039*/ meltfptr[1038])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-normatch.melt:3017:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1039*/ meltfptr[1038])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_947__FILL_MATCHCASE#5", NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1039*/ meltfptr[1038])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-normatch.melt:3017:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1039*/ meltfptr[1038])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1003*/ meltfptr[1002]); ((meltroutine_ptr_t) /*_.VALROUT___V1039*/ meltfptr[1038])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1003*/ meltfptr[1002]); MELT_LOCATION ("warmelt-normatch.melt:3028:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1040*/ meltfptr[1039])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_949__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1040*/ meltfptr[1039])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:3028:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1040*/ meltfptr[1039])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_949__LAMBDA_#1", NULL != ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13])); ((meltroutine_ptr_t) /*_.VALROUT___V1040*/ meltfptr[1039])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-normatch.melt:3028:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1040*/ meltfptr[1039])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_949__LAMBDA_#2", NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1040*/ meltfptr[1039])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-normatch.melt:3028:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1040*/ meltfptr[1039])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1003*/ meltfptr[1002]); ((meltroutine_ptr_t) /*_.VALROUT___V1040*/ meltfptr[1039])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1003*/ meltfptr[1002]); MELT_LOCATION ("warmelt-normatch.melt:3028:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1040*/ meltfptr[1039]); MELT_LOCATION ("warmelt-normatch.melt:3017:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1039*/ meltfptr[1038])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_947__FILL_MATCHCASE#7", NULL != ( /*_.VALROUT___V1040*/ meltfptr[1039])); ((meltroutine_ptr_t) /*_.VALROUT___V1039*/ meltfptr[1038])->tabval[7] = (melt_ptr_t) ( /*_.VALROUT___V1040*/ meltfptr[1039]); MELT_LOCATION ("warmelt-normatch.melt:3017:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1039*/ meltfptr[1038]); /*putclosurout#50 */ melt_assertmsg ("putclosrout#50 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1041*/ meltfptr[1040])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#50 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1039*/ meltfptr[1038])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1041*/ meltfptr[1040])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1039*/ meltfptr[1038]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1041*/ meltfptr[1040]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1042*/ meltfptr[1041])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1043*/ meltfptr[1042]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1042*/ meltfptr[1041]); melt_dbgtrace_written_object ( /*_.VALDATA___V1042*/ meltfptr[1041], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:3067:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1044*/ meltfptr[1043])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1044*/ meltfptr[1043])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1044*/ meltfptr[1043]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V993*/ meltfptr[992]); MELT_LOCATION ("warmelt-normatch.melt:3067:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1044*/ meltfptr[1043])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normatch.melt:3067:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1044*/ meltfptr[1043]); MELT_LOCATION ("warmelt-normatch.melt:3067:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1044*/ meltfptr[1043], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1045*/ meltfptr[1044])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1045*/ meltfptr[1044])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1045*/ meltfptr[1044]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1046*/ meltfptr[1045]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1045*/ meltfptr[1044]); melt_dbgtrace_written_object ( /*_.VALDATA___V1045*/ meltfptr[1044], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:3067:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1047*/ meltfptr[1046])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1047*/ meltfptr[1046])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1047*/ meltfptr[1046]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1045*/ meltfptr[1044]); MELT_LOCATION ("warmelt-normatch.melt:3067:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1047*/ meltfptr[1046])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1047*/ meltfptr[1046])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1047*/ meltfptr[1046]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normatch.melt:3067:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1047*/ meltfptr[1046]); MELT_LOCATION ("warmelt-normatch.melt:3067:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1047*/ meltfptr[1046], "new static instance"); /*putupl#461 */ melt_assertmsg ("putupl #461 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1048*/ meltfptr[1047])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #461 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1048*/ meltfptr[1047])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1048*/ meltfptr[1047]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V1044*/ meltfptr[1043]); /*putupl#462 */ melt_assertmsg ("putupl #462 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1048*/ meltfptr[1047])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #462 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1048*/ meltfptr[1047])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1048*/ meltfptr[1047]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1047*/ meltfptr[1046]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1048*/ meltfptr[1047]); MELT_LOCATION ("warmelt-normatch.melt:3067:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1049*/ meltfptr[1048])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1050*/ meltfptr[1049]); MELT_LOCATION ("warmelt-normatch.melt:3067:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1049*/ meltfptr[1048]); MELT_LOCATION ("warmelt-normatch.melt:3067:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1049*/ meltfptr[1048], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:3072:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1051*/ meltfptr[1050])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_959__PUTTHEN_MATCHANY#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1051*/ meltfptr[1050])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:3072:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1051*/ meltfptr[1050])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_959__PUTTHEN_MATCHANY#1", NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1051*/ meltfptr[1050])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:3072:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1051*/ meltfptr[1050]); /*putclosurout#51 */ melt_assertmsg ("putclosrout#51 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1052*/ meltfptr[1051])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#51 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1051*/ meltfptr[1050])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1052*/ meltfptr[1051])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1051*/ meltfptr[1050]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1052*/ meltfptr[1051]); MELT_LOCATION ("warmelt-normatch.melt:3081:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1053*/ meltfptr[1052])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V893*/ meltfptr[892]); ((meltroutine_ptr_t) /*_.VALROUT___V1053*/ meltfptr[1052])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]); MELT_LOCATION ("warmelt-normatch.melt:3081:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1053*/ meltfptr[1052])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_961__START_STEP#1", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1053*/ meltfptr[1052])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:3081:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1053*/ meltfptr[1052])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V763*/ meltfptr[762]); ((meltroutine_ptr_t) /*_.VALROUT___V1053*/ meltfptr[1052])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]); MELT_LOCATION ("warmelt-normatch.melt:3081:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1053*/ meltfptr[1052]); /*putclosurout#52 */ melt_assertmsg ("putclosrout#52 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1054*/ meltfptr[1053])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#52 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1053*/ meltfptr[1052])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1054*/ meltfptr[1053])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1053*/ meltfptr[1052]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1054*/ meltfptr[1053]); MELT_LOCATION ("warmelt-normatch.melt:3100:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1055*/ meltfptr[1054])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_963__PUTTHEN_MATCHTHEN#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1055*/ meltfptr[1054])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:3100:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1055*/ meltfptr[1054])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V769*/ meltfptr[768]); ((meltroutine_ptr_t) /*_.VALROUT___V1055*/ meltfptr[1054])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768]); MELT_LOCATION ("warmelt-normatch.melt:3100:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1055*/ meltfptr[1054])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V763*/ meltfptr[762]); ((meltroutine_ptr_t) /*_.VALROUT___V1055*/ meltfptr[1054])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]); MELT_LOCATION ("warmelt-normatch.melt:3100:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1055*/ meltfptr[1054])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V911*/ meltfptr[910]); ((meltroutine_ptr_t) /*_.VALROUT___V1055*/ meltfptr[1054])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V911*/ meltfptr[910]); MELT_LOCATION ("warmelt-normatch.melt:3100:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1055*/ meltfptr[1054])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1054*/ meltfptr[1053]); ((meltroutine_ptr_t) /*_.VALROUT___V1055*/ meltfptr[1054])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V1054*/ meltfptr[1053]); MELT_LOCATION ("warmelt-normatch.melt:3100:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1055*/ meltfptr[1054])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1049*/ meltfptr[1048]); ((meltroutine_ptr_t) /*_.VALROUT___V1055*/ meltfptr[1054])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1049*/ meltfptr[1048]); MELT_LOCATION ("warmelt-normatch.melt:3100:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1055*/ meltfptr[1054]); /*putclosurout#53 */ melt_assertmsg ("putclosrout#53 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1056*/ meltfptr[1055])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#53 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1055*/ meltfptr[1054])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1056*/ meltfptr[1055])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1055*/ meltfptr[1054]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1056*/ meltfptr[1055]); MELT_LOCATION ("warmelt-normatch.melt:3139:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1057*/ meltfptr[1056])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_965__PUTTHEN_MATCHGROUP#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1057*/ meltfptr[1056])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:3139:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1057*/ meltfptr[1056])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V893*/ meltfptr[892]); ((meltroutine_ptr_t) /*_.VALROUT___V1057*/ meltfptr[1056])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]); MELT_LOCATION ("warmelt-normatch.melt:3139:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1057*/ meltfptr[1056])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V763*/ meltfptr[762]); ((meltroutine_ptr_t) /*_.VALROUT___V1057*/ meltfptr[1056])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]); MELT_LOCATION ("warmelt-normatch.melt:3139:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1057*/ meltfptr[1056])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1056*/ meltfptr[1055]); ((meltroutine_ptr_t) /*_.VALROUT___V1057*/ meltfptr[1056])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V1056*/ meltfptr[1055]); MELT_LOCATION ("warmelt-normatch.melt:3139:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1057*/ meltfptr[1056])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1049*/ meltfptr[1048]); ((meltroutine_ptr_t) /*_.VALROUT___V1057*/ meltfptr[1056])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V1049*/ meltfptr[1048]); MELT_LOCATION ("warmelt-normatch.melt:3139:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1057*/ meltfptr[1056]); /*putclosurout#54 */ melt_assertmsg ("putclosrout#54 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1058*/ meltfptr[1057])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#54 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1057*/ meltfptr[1056])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1058*/ meltfptr[1057])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1057*/ meltfptr[1056]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1058*/ meltfptr[1057]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1059*/ meltfptr[1058])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1060*/ meltfptr[1059]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1059*/ meltfptr[1058]); melt_dbgtrace_written_object ( /*_.VALDATA___V1059*/ meltfptr[1058], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:3169:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1061*/ meltfptr[1060])) == 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]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V993*/ meltfptr[992]); MELT_LOCATION ("warmelt-normatch.melt:3169:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1061*/ meltfptr[1060])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normatch.melt:3169:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1061*/ meltfptr[1060]); MELT_LOCATION ("warmelt-normatch.melt:3169:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1061*/ meltfptr[1060], "new static instance"); #undef meltfram__ } /*end of meltmod__warmelt_normatch__initialmeltchunk_19 */ void meltmod__warmelt_normatch__initialmeltchunk_20 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*putslot*/ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1062*/ meltfptr[1061])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1062*/ meltfptr[1061])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1062*/ meltfptr[1061]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1063*/ meltfptr[1062]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1062*/ meltfptr[1061]); melt_dbgtrace_written_object ( /*_.VALDATA___V1062*/ meltfptr[1061], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:3169:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1064*/ meltfptr[1063])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1064*/ meltfptr[1063])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1064*/ meltfptr[1063]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1062*/ meltfptr[1061]); MELT_LOCATION ("warmelt-normatch.melt:3169:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1064*/ meltfptr[1063])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1064*/ meltfptr[1063])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1064*/ meltfptr[1063]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normatch.melt:3169:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1064*/ meltfptr[1063]); MELT_LOCATION ("warmelt-normatch.melt:3169:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1064*/ meltfptr[1063], "new static instance"); /*putupl#463 */ melt_assertmsg ("putupl #463 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1065*/ meltfptr[1064])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #463 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1065*/ meltfptr[1064])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1065*/ meltfptr[1064]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V1061*/ meltfptr[1060]); /*putupl#464 */ melt_assertmsg ("putupl #464 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1065*/ meltfptr[1064])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #464 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.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___V1065*/ meltfptr[1064]); MELT_LOCATION ("warmelt-normatch.melt:3169:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1066*/ meltfptr[1065])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1066*/ meltfptr[1065])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1066*/ meltfptr[1065]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1067*/ meltfptr[1066]); MELT_LOCATION ("warmelt-normatch.melt:3169:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1066*/ meltfptr[1065]); MELT_LOCATION ("warmelt-normatch.melt:3169:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1066*/ meltfptr[1065], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:3174:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1068*/ meltfptr[1067])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_976__PUTELSE_MATCHANY#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1068*/ meltfptr[1067])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:3174:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1068*/ meltfptr[1067])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_976__PUTELSE_MATCHANY#1", NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1068*/ meltfptr[1067])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:3174:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1068*/ meltfptr[1067]); /*putclosurout#55 */ melt_assertmsg ("putclosrout#55 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1069*/ meltfptr[1068])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#55 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1068*/ meltfptr[1067])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1069*/ meltfptr[1068])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1068*/ meltfptr[1067]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1069*/ meltfptr[1068]); MELT_LOCATION ("warmelt-normatch.melt:3184:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) 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_978__PUTELSE_MATCHSTEPTHEN#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1070*/ meltfptr[1069])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:3184:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1070*/ meltfptr[1069])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V769*/ meltfptr[768]); ((meltroutine_ptr_t) /*_.VALROUT___V1070*/ meltfptr[1069])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768]); MELT_LOCATION ("warmelt-normatch.melt:3184:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1070*/ meltfptr[1069])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V763*/ meltfptr[762]); ((meltroutine_ptr_t) /*_.VALROUT___V1070*/ meltfptr[1069])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]); MELT_LOCATION ("warmelt-normatch.melt:3184:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1070*/ meltfptr[1069])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1054*/ meltfptr[1053]); ((meltroutine_ptr_t) /*_.VALROUT___V1070*/ meltfptr[1069])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V1054*/ meltfptr[1053]); MELT_LOCATION ("warmelt-normatch.melt:3184:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1070*/ meltfptr[1069])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1066*/ meltfptr[1065]); ((meltroutine_ptr_t) /*_.VALROUT___V1070*/ meltfptr[1069])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V1066*/ meltfptr[1065]); MELT_LOCATION ("warmelt-normatch.melt:3184:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1070*/ meltfptr[1069]); /*putclosurout#56 */ melt_assertmsg ("putclosrout#56 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1071*/ meltfptr[1070])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#56 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1070*/ meltfptr[1069])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1071*/ meltfptr[1070])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1070*/ meltfptr[1069]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1071*/ meltfptr[1070]); MELT_LOCATION ("warmelt-normatch.melt:3219:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) 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_980__PUTELSE_MATCHTEST#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:3219:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1072*/ meltfptr[1071])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V859*/ meltfptr[858]); ((meltroutine_ptr_t) /*_.VALROUT___V1072*/ meltfptr[1071])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V859*/ meltfptr[858]); MELT_LOCATION ("warmelt-normatch.melt:3219:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1072*/ meltfptr[1071])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V763*/ meltfptr[762]); ((meltroutine_ptr_t) /*_.VALROUT___V1072*/ meltfptr[1071])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]); MELT_LOCATION ("warmelt-normatch.melt:3219:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1072*/ meltfptr[1071])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1054*/ meltfptr[1053]); ((meltroutine_ptr_t) /*_.VALROUT___V1072*/ meltfptr[1071])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V1054*/ meltfptr[1053]); MELT_LOCATION ("warmelt-normatch.melt:3219:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1072*/ meltfptr[1071])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1049*/ meltfptr[1048]); ((meltroutine_ptr_t) /*_.VALROUT___V1072*/ meltfptr[1071])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V1049*/ meltfptr[1048]); MELT_LOCATION ("warmelt-normatch.melt:3219:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1072*/ meltfptr[1071])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1066*/ meltfptr[1065]); ((meltroutine_ptr_t) /*_.VALROUT___V1072*/ meltfptr[1071])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1066*/ meltfptr[1065]); MELT_LOCATION ("warmelt-normatch.melt:3219:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1072*/ meltfptr[1071]); /*putclosurout#57 */ melt_assertmsg ("putclosrout#57 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1073*/ meltfptr[1072])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#57 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1072*/ meltfptr[1071])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1073*/ meltfptr[1072])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1072*/ meltfptr[1071]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1073*/ meltfptr[1072]); MELT_LOCATION ("warmelt-normatch.melt:3273:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) 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_982__PUTELSE_MATCHGROUP#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:3273:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1074*/ meltfptr[1073])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V893*/ meltfptr[892]); ((meltroutine_ptr_t) /*_.VALROUT___V1074*/ meltfptr[1073])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]); MELT_LOCATION ("warmelt-normatch.melt:3273:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1074*/ meltfptr[1073])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V763*/ meltfptr[762]); ((meltroutine_ptr_t) /*_.VALROUT___V1074*/ meltfptr[1073])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]); MELT_LOCATION ("warmelt-normatch.melt:3273:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1074*/ meltfptr[1073])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1054*/ meltfptr[1053]); ((meltroutine_ptr_t) /*_.VALROUT___V1074*/ meltfptr[1073])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V1054*/ meltfptr[1053]); MELT_LOCATION ("warmelt-normatch.melt:3273:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1074*/ meltfptr[1073])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1066*/ meltfptr[1065]); ((meltroutine_ptr_t) /*_.VALROUT___V1074*/ meltfptr[1073])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V1066*/ meltfptr[1065]); MELT_LOCATION ("warmelt-normatch.melt:3273:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1074*/ meltfptr[1073]); /*putclosurout#58 */ melt_assertmsg ("putclosrout#58 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1075*/ meltfptr[1074])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#58 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:3316:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1076*/ meltfptr[1075])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V911*/ meltfptr[910]); ((meltroutine_ptr_t) /*_.VALROUT___V1076*/ meltfptr[1075])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V911*/ meltfptr[910]); MELT_LOCATION ("warmelt-normatch.melt:3316:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1076*/ meltfptr[1075])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_984__SCANSTEPDATA_TESTINS#1", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1076*/ meltfptr[1075])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:3316:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1076*/ meltfptr[1075]); /*putclosurout#59 */ melt_assertmsg ("putclosrout#59 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1077*/ meltfptr[1076])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#59 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1076*/ meltfptr[1075])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1077*/ meltfptr[1076])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1076*/ meltfptr[1075]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1077*/ meltfptr[1076]); MELT_LOCATION ("warmelt-normatch.melt:3328:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1078*/ meltfptr[1077])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_986__SCANSTEPDATA_TESTTUPLE#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1078*/ meltfptr[1077])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:3328:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1078*/ meltfptr[1077])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V925*/ meltfptr[924]); ((meltroutine_ptr_t) /*_.VALROUT___V1078*/ meltfptr[1077])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V925*/ meltfptr[924]); MELT_LOCATION ("warmelt-normatch.melt:3328:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1078*/ meltfptr[1077]); /*putclosurout#60 */ melt_assertmsg ("putclosrout#60 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1079*/ meltfptr[1078])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#60 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1078*/ meltfptr[1077])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1079*/ meltfptr[1078])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1078*/ meltfptr[1077]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1079*/ meltfptr[1078]); MELT_LOCATION ("warmelt-normatch.melt:3345:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1080*/ meltfptr[1079])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_988__SCANSTEPDATA_TESTWITHFLAG#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1080*/ meltfptr[1079])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:3345:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1080*/ meltfptr[1079]); /*putclosurout#61 */ melt_assertmsg ("putclosrout#61 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1081*/ meltfptr[1080])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#61 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:3351:/ 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___V935*/ meltfptr[934]); ((meltroutine_ptr_t) /*_.VALROUT___V1082*/ meltfptr[1081])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V935*/ meltfptr[934]); MELT_LOCATION ("warmelt-normatch.melt:3351:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1082*/ meltfptr[1081]); /*putclosurout#62 */ melt_assertmsg ("putclosrout#62 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1083*/ meltfptr[1082])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#62 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]); MELT_LOCATION ("warmelt-normatch.melt:3362:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1084*/ meltfptr[1083])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V789*/ meltfptr[788]); ((meltroutine_ptr_t) /*_.VALROUT___V1084*/ meltfptr[1083])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V789*/ meltfptr[788]); MELT_LOCATION ("warmelt-normatch.melt:3362:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1084*/ meltfptr[1083]); /*putclosurout#63 */ melt_assertmsg ("putclosrout#63 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1085*/ meltfptr[1084])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#63 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1084*/ meltfptr[1083])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1085*/ meltfptr[1084])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1084*/ meltfptr[1083]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1085*/ meltfptr[1084]); MELT_LOCATION ("warmelt-normatch.melt:3371:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1086*/ meltfptr[1085])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V819*/ meltfptr[818]); ((meltroutine_ptr_t) /*_.VALROUT___V1086*/ meltfptr[1085])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818]); MELT_LOCATION ("warmelt-normatch.melt:3371:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1086*/ meltfptr[1085]); /*putclosurout#64 */ melt_assertmsg ("putclosrout#64 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1087*/ meltfptr[1086])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#64 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1086*/ meltfptr[1085])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1087*/ meltfptr[1086])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1086*/ meltfptr[1085]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1087*/ meltfptr[1086]); MELT_LOCATION ("warmelt-normatch.melt:3389:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1088*/ meltfptr[1087])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_996__SCANSTEPFLAG_STEPWITHDATA#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1088*/ meltfptr[1087])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:3389:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1088*/ meltfptr[1087])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V799*/ meltfptr[798]); ((meltroutine_ptr_t) /*_.VALROUT___V1088*/ meltfptr[1087])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V799*/ meltfptr[798]); MELT_LOCATION ("warmelt-normatch.melt:3389:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1088*/ meltfptr[1087]); /*putclosurout#65 */ melt_assertmsg ("putclosrout#65 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1089*/ meltfptr[1088])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#65 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1088*/ meltfptr[1087])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1089*/ meltfptr[1088])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1088*/ meltfptr[1087]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1089*/ meltfptr[1088]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1090*/ meltfptr[1089])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1091*/ meltfptr[1090]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1090*/ meltfptr[1089]); melt_dbgtrace_written_object ( /*_.VALDATA___V1090*/ meltfptr[1089], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:3398:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1092*/ meltfptr[1091])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1092*/ meltfptr[1091])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1092*/ meltfptr[1091]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V993*/ meltfptr[992]); MELT_LOCATION ("warmelt-normatch.melt:3398:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1092*/ meltfptr[1091])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1092*/ meltfptr[1091])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1092*/ meltfptr[1091]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normatch.melt:3398:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1092*/ meltfptr[1091]); MELT_LOCATION ("warmelt-normatch.melt:3398:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1092*/ meltfptr[1091], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1093*/ meltfptr[1092])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1094*/ meltfptr[1093]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1093*/ meltfptr[1092]); melt_dbgtrace_written_object ( /*_.VALDATA___V1093*/ meltfptr[1092], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:3398:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1095*/ meltfptr[1094])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1095*/ meltfptr[1094])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1095*/ meltfptr[1094]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1093*/ meltfptr[1092]); MELT_LOCATION ("warmelt-normatch.melt:3398:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1095*/ meltfptr[1094])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normatch.melt:3398:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1095*/ meltfptr[1094]); MELT_LOCATION ("warmelt-normatch.melt:3398:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1095*/ meltfptr[1094], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1096*/ meltfptr[1095])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1097*/ meltfptr[1096]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1096*/ meltfptr[1095]); melt_dbgtrace_written_object ( /*_.VALDATA___V1096*/ meltfptr[1095], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:3398:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1098*/ meltfptr[1097])) == 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]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1096*/ meltfptr[1095]); MELT_LOCATION ("warmelt-normatch.melt:3398:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1098*/ meltfptr[1097])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normatch.melt:3398:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1098*/ meltfptr[1097]); MELT_LOCATION ("warmelt-normatch.melt:3398:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1098*/ meltfptr[1097], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1099*/ meltfptr[1098])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1100*/ meltfptr[1099]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1099*/ meltfptr[1098]); melt_dbgtrace_written_object ( /*_.VALDATA___V1099*/ meltfptr[1098], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:3398:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1101*/ meltfptr[1100])) == 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]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1099*/ meltfptr[1098]); MELT_LOCATION ("warmelt-normatch.melt:3398:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1101*/ meltfptr[1100])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normatch.melt:3398:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1101*/ meltfptr[1100]); MELT_LOCATION ("warmelt-normatch.melt:3398:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1101*/ meltfptr[1100], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1102*/ meltfptr[1101])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1103*/ meltfptr[1102]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1102*/ meltfptr[1101]); melt_dbgtrace_written_object ( /*_.VALDATA___V1102*/ meltfptr[1101], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:3398:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1104*/ meltfptr[1103])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1104*/ meltfptr[1103])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1104*/ meltfptr[1103]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1102*/ meltfptr[1101]); MELT_LOCATION ("warmelt-normatch.melt:3398:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1104*/ meltfptr[1103])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normatch.melt:3398:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1104*/ meltfptr[1103]); MELT_LOCATION ("warmelt-normatch.melt:3398:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1104*/ meltfptr[1103], "new static instance"); /*putupl#465 */ melt_assertmsg ("putupl #465 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1105*/ meltfptr[1104])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #465 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1105*/ meltfptr[1104])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1105*/ meltfptr[1104]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V1092*/ meltfptr[1091]); /*putupl#466 */ melt_assertmsg ("putupl #466 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1105*/ meltfptr[1104])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #466 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1105*/ meltfptr[1104])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1105*/ meltfptr[1104]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1095*/ meltfptr[1094]); /*putupl#467 */ melt_assertmsg ("putupl #467 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1105*/ meltfptr[1104])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #467 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1105*/ meltfptr[1104])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1105*/ meltfptr[1104]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1098*/ meltfptr[1097]); /*putupl#468 */ melt_assertmsg ("putupl #468 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1105*/ meltfptr[1104])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #468 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1105*/ meltfptr[1104])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1105*/ meltfptr[1104]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1101*/ meltfptr[1100]); /*putupl#469 */ melt_assertmsg ("putupl #469 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1105*/ meltfptr[1104])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #469 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1105*/ meltfptr[1104])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1105*/ meltfptr[1104]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V1104*/ meltfptr[1103]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1105*/ meltfptr[1104]); MELT_LOCATION ("warmelt-normatch.melt:3398:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1106*/ meltfptr[1105])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1106*/ meltfptr[1105])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1106*/ meltfptr[1105]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1107*/ meltfptr[1106]); MELT_LOCATION ("warmelt-normatch.melt:3398:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1106*/ meltfptr[1105]); MELT_LOCATION ("warmelt-normatch.melt:3398:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1106*/ meltfptr[1105], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:3405:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1108*/ meltfptr[1107])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1016__TRANSLPAT_ANYRECV#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1108*/ meltfptr[1107])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:3405:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1108*/ meltfptr[1107]); /*putclosurout#66 */ melt_assertmsg ("putclosrout#66 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1109*/ meltfptr[1108])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#66 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1108*/ meltfptr[1107])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1109*/ meltfptr[1108])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1108*/ meltfptr[1107]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1109*/ meltfptr[1108]); MELT_LOCATION ("warmelt-normatch.melt:3415:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1110*/ meltfptr[1109])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1018__TRANSLPAT_JOKERPAT#0", NULL != ( /*_.CLASS_SOURCE_PATTERN_JOKER_VARIABLE__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1110*/ meltfptr[1109])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_JOKER_VARIABLE__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-normatch.melt:3415:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1110*/ meltfptr[1109])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1018__TRANSLPAT_JOKERPAT#1", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1110*/ meltfptr[1109])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:3415:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1110*/ meltfptr[1109]); /*putclosurout#67 */ melt_assertmsg ("putclosrout#67 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1111*/ meltfptr[1110])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#67 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1110*/ meltfptr[1109])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1111*/ meltfptr[1110])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1110*/ meltfptr[1109]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1111*/ meltfptr[1110]); MELT_LOCATION ("warmelt-normatch.melt:3423:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1112*/ meltfptr[1111])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1020__TRANSLPAT_CONSTPAT#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1112*/ meltfptr[1111])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); #undef meltfram__ } /*end of meltmod__warmelt_normatch__initialmeltchunk_20 */ void meltmod__warmelt_normatch__initialmeltchunk_21 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-normatch.melt:3423:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1112*/ meltfptr[1111])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1020__TRANSLPAT_CONSTPAT#1", NULL != ( /*_.CLASS_SOURCE_PATTERN_CONSTANT__V16*/ meltfptr[15])); ((meltroutine_ptr_t) /*_.VALROUT___V1112*/ meltfptr[1111])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_CONSTANT__V16*/ meltfptr[15]); MELT_LOCATION ("warmelt-normatch.melt:3423:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1112*/ meltfptr[1111])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V695*/ meltfptr[694]); ((meltroutine_ptr_t) /*_.VALROUT___V1112*/ meltfptr[1111])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); MELT_LOCATION ("warmelt-normatch.melt:3423:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1112*/ meltfptr[1111])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V673*/ meltfptr[672]); ((meltroutine_ptr_t) /*_.VALROUT___V1112*/ meltfptr[1111])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V673*/ meltfptr[672]); MELT_LOCATION ("warmelt-normatch.melt:3423:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1112*/ meltfptr[1111])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V627*/ meltfptr[626]); ((meltroutine_ptr_t) /*_.VALROUT___V1112*/ meltfptr[1111])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V627*/ meltfptr[626]); MELT_LOCATION ("warmelt-normatch.melt:3423:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1112*/ meltfptr[1111])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1020__TRANSLPAT_CONSTPAT#5", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V42*/ meltfptr[41])); ((meltroutine_ptr_t) /*_.VALROUT___V1112*/ meltfptr[1111])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V42*/ meltfptr[41]); MELT_LOCATION ("warmelt-normatch.melt:3423:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1112*/ meltfptr[1111])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1020__TRANSLPAT_CONSTPAT#6", NULL != ( /*_.CLASS_ENVIRONMENT__V69*/ meltfptr[68])); ((meltroutine_ptr_t) /*_.VALROUT___V1112*/ meltfptr[1111])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V69*/ meltfptr[68]); MELT_LOCATION ("warmelt-normatch.melt:3423:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1112*/ meltfptr[1111])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1020__TRANSLPAT_CONSTPAT#7", NULL != ( /*_.NORMAL_EXP__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1112*/ meltfptr[1111])->tabval[7] = (melt_ptr_t) ( /*_.NORMAL_EXP__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normatch.melt:3423:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1112*/ meltfptr[1111])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V990*/ meltfptr[989]); ((meltroutine_ptr_t) /*_.VALROUT___V1112*/ meltfptr[1111])->tabval[8] = (melt_ptr_t) ( /*_.VALCLO___V990*/ meltfptr[989]); MELT_LOCATION ("warmelt-normatch.melt:3423:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1112*/ meltfptr[1111])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1020__TRANSLPAT_CONSTPAT#9", NULL != ( /*_.VALSTR___V1113*/ meltfptr[1112])); ((meltroutine_ptr_t) /*_.VALROUT___V1112*/ meltfptr[1111])->tabval[9] = (melt_ptr_t) ( /*_.VALSTR___V1113*/ meltfptr[1112]); MELT_LOCATION ("warmelt-normatch.melt:3423:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1112*/ meltfptr[1111])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1020__TRANSLPAT_CONSTPAT#10", NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1112*/ meltfptr[1111])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:3423:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1112*/ meltfptr[1111])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V813*/ meltfptr[812]); ((meltroutine_ptr_t) /*_.VALROUT___V1112*/ meltfptr[1111])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812]); MELT_LOCATION ("warmelt-normatch.melt:3423:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1112*/ meltfptr[1111])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V879*/ meltfptr[878]); ((meltroutine_ptr_t) /*_.VALROUT___V1112*/ meltfptr[1111])->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V879*/ meltfptr[878]); MELT_LOCATION ("warmelt-normatch.melt:3423:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1112*/ meltfptr[1111]); /*putclosurout#68 */ melt_assertmsg ("putclosrout#68 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1114*/ meltfptr[1113])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#68 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1112*/ meltfptr[1111])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1114*/ meltfptr[1113])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1112*/ meltfptr[1111]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1114*/ meltfptr[1113]); MELT_LOCATION ("warmelt-normatch.melt:3477:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1115*/ meltfptr[1114])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1023__TRANSLPAT_LISTPAT#0", NULL != ( /*_.CLASS_SOURCE_PATTERN_LIST__V76*/ meltfptr[75])); ((meltroutine_ptr_t) /*_.VALROUT___V1115*/ meltfptr[1114])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_LIST__V76*/ meltfptr[75]); MELT_LOCATION ("warmelt-normatch.melt:3477:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1115*/ meltfptr[1114])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1023__TRANSLPAT_LISTPAT#1", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1115*/ meltfptr[1114])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:3477:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1115*/ meltfptr[1114]); /*putclosurout#69 */ melt_assertmsg ("putclosrout#69 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1116*/ meltfptr[1115])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#69 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1115*/ meltfptr[1114])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1116*/ meltfptr[1115])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1115*/ meltfptr[1114]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1116*/ meltfptr[1115]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1117*/ meltfptr[1116])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1117*/ meltfptr[1116])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1117*/ meltfptr[1116]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1118*/ meltfptr[1117]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1117*/ meltfptr[1116]); melt_dbgtrace_written_object ( /*_.VALDATA___V1117*/ meltfptr[1116], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:3488:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1119*/ meltfptr[1118])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1027__TRANSLPAT_TUPLEPAT#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:3488:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1119*/ meltfptr[1118])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1027__TRANSLPAT_TUPLEPAT#1", NULL != ( /*_.CLASS_SOURCE_PATTERN_TUPLE__V50*/ meltfptr[49])); ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_TUPLE__V50*/ meltfptr[49]); MELT_LOCATION ("warmelt-normatch.melt:3488:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1119*/ meltfptr[1118])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V695*/ meltfptr[694]); ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); MELT_LOCATION ("warmelt-normatch.melt:3488:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1119*/ meltfptr[1118])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V673*/ meltfptr[672]); ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V673*/ meltfptr[672]); MELT_LOCATION ("warmelt-normatch.melt:3488:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1119*/ meltfptr[1118])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1027__TRANSLPAT_TUPLEPAT#4", NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-normatch.melt:3488:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1119*/ meltfptr[1118])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1027__TRANSLPAT_TUPLEPAT#5", NULL != ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-normatch.melt:3488:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1119*/ meltfptr[1118])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1027__TRANSLPAT_TUPLEPAT#6", NULL != ( /*_.CLASS_SOURCE_PATTERN_JOKER_VARIABLE__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_JOKER_VARIABLE__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-normatch.melt:3488:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1119*/ meltfptr[1118])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V477*/ meltfptr[476]); ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V477*/ meltfptr[476]); MELT_LOCATION ("warmelt-normatch.melt:3488:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1119*/ meltfptr[1118])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1027__TRANSLPAT_TUPLEPAT#8", NULL != ( /*_.DISCR_CONSTANT_INTEGER__V51*/ meltfptr[50])); ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_CONSTANT_INTEGER__V51*/ meltfptr[50]); MELT_LOCATION ("warmelt-normatch.melt:3488:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1119*/ meltfptr[1118])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1027__TRANSLPAT_TUPLEPAT#9", NULL != ( /*_.LIST_TO_MULTIPLE__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[9] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-normatch.melt:3488:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1119*/ meltfptr[1118])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1027__TRANSLPAT_TUPLEPAT#10", NULL != ( /*_.DISCR_MULTIPLE__V45*/ meltfptr[44])); ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[10] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V45*/ meltfptr[44]); MELT_LOCATION ("warmelt-normatch.melt:3488:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1119*/ meltfptr[1118])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V477*/ meltfptr[476]); ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V477*/ meltfptr[476]); MELT_LOCATION ("warmelt-normatch.melt:3488:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1119*/ meltfptr[1118])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1027__TRANSLPAT_TUPLEPAT#12", NULL != ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-normatch.melt:3517:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1120*/ meltfptr[1119])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V477*/ meltfptr[476]); ((meltroutine_ptr_t) /*_.VALROUT___V1120*/ meltfptr[1119])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V477*/ meltfptr[476]); MELT_LOCATION ("warmelt-normatch.melt:3517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1120*/ meltfptr[1119])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1029__LAMBDA_#1", NULL != ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1120*/ meltfptr[1119])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-normatch.melt:3517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1120*/ meltfptr[1119])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1029__LAMBDA_#2", NULL != ( /*_.VALBXINT___V1121*/ meltfptr[1120])); ((meltroutine_ptr_t) /*_.VALROUT___V1120*/ meltfptr[1119])->tabval[2] = (melt_ptr_t) ( /*_.VALBXINT___V1121*/ meltfptr[1120]); MELT_LOCATION ("warmelt-normatch.melt:3517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1120*/ meltfptr[1119])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1029__LAMBDA_#3", NULL != ( /*_.VALBXINT___V1122*/ meltfptr[1121])); ((meltroutine_ptr_t) /*_.VALROUT___V1120*/ meltfptr[1119])->tabval[3] = (melt_ptr_t) ( /*_.VALBXINT___V1122*/ meltfptr[1121]); MELT_LOCATION ("warmelt-normatch.melt:3517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1120*/ meltfptr[1119])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1029__LAMBDA_#4", NULL != ( /*_.VALBXINT___V1123*/ meltfptr[1122])); ((meltroutine_ptr_t) /*_.VALROUT___V1120*/ meltfptr[1119])->tabval[4] = (melt_ptr_t) ( /*_.VALBXINT___V1123*/ meltfptr[1122]); MELT_LOCATION ("warmelt-normatch.melt:3517:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1120*/ meltfptr[1119]); MELT_LOCATION ("warmelt-normatch.melt:3488:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1119*/ meltfptr[1118])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1027__TRANSLPAT_TUPLEPAT#13", NULL != ( /*_.VALROUT___V1120*/ meltfptr[1119])); ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[13] = (melt_ptr_t) ( /*_.VALROUT___V1120*/ meltfptr[1119]); MELT_LOCATION ("warmelt-normatch.melt:3488:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1119*/ meltfptr[1118])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V925*/ meltfptr[924]); ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[14] = (melt_ptr_t) ( /*_.VALDATA___V925*/ meltfptr[924]); MELT_LOCATION ("warmelt-normatch.melt:3488:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1119*/ meltfptr[1118])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V859*/ meltfptr[858]); ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[15] = (melt_ptr_t) ( /*_.VALDATA___V859*/ meltfptr[858]); MELT_LOCATION ("warmelt-normatch.melt:3488:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1119*/ meltfptr[1118])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1066*/ meltfptr[1065]); ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[16] = (melt_ptr_t) ( /*_.VALDATA___V1066*/ meltfptr[1065]); MELT_LOCATION ("warmelt-normatch.melt:3488:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1119*/ meltfptr[1118])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1027__TRANSLPAT_TUPLEPAT#17", NULL != ( /*_.CLONE_SYMBOL__V49*/ meltfptr[48])); ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[17] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V49*/ meltfptr[48]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1124*/ meltfptr[1123])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1124*/ meltfptr[1123])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1124*/ meltfptr[1123]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1125*/ meltfptr[1124]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1124*/ meltfptr[1123]); melt_dbgtrace_written_object ( /*_.VALDATA___V1124*/ meltfptr[1123], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:3488:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1119*/ meltfptr[1118])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1027__TRANSLPAT_TUPLEPAT#18", NULL != ( /*_.VALDATA___V1124*/ meltfptr[1123])); ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[18] = (melt_ptr_t) ( /*_.VALDATA___V1124*/ meltfptr[1123]); MELT_LOCATION ("warmelt-normatch.melt:3488:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1119*/ meltfptr[1118])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1027__TRANSLPAT_TUPLEPAT#19", NULL != ( /*_.CTYPE_VALUE__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[19] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-normatch.melt:3488:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1119*/ meltfptr[1118])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1106*/ meltfptr[1105]); ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[20] = (melt_ptr_t) ( /*_.VALDATA___V1106*/ meltfptr[1105]); MELT_LOCATION ("warmelt-normatch.melt:3488:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1119*/ meltfptr[1118])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1049*/ meltfptr[1048]); ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[21] = (melt_ptr_t) ( /*_.VALDATA___V1049*/ meltfptr[1048]); MELT_LOCATION ("warmelt-normatch.melt:3488:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1119*/ meltfptr[1118])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V990*/ meltfptr[989]); ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[22] = (melt_ptr_t) ( /*_.VALCLO___V990*/ meltfptr[989]); MELT_LOCATION ("warmelt-normatch.melt:3488:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1119*/ meltfptr[1118])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1027__TRANSLPAT_TUPLEPAT#23", NULL != ( /*_.VALSTR___V1126*/ meltfptr[1125])); ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[23] = (melt_ptr_t) ( /*_.VALSTR___V1126*/ meltfptr[1125]); MELT_LOCATION ("warmelt-normatch.melt:3488:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1119*/ meltfptr[1118])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V829*/ meltfptr[828]); ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[24] = (melt_ptr_t) ( /*_.VALDATA___V829*/ meltfptr[828]); MELT_LOCATION ("warmelt-normatch.melt:3488:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1119*/ meltfptr[1118])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V813*/ meltfptr[812]); ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[25] = (melt_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812]); MELT_LOCATION ("warmelt-normatch.melt:3488:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1119*/ meltfptr[1118])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V893*/ meltfptr[892]); ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[26] = (melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]); MELT_LOCATION ("warmelt-normatch.melt:3488:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1119*/ meltfptr[1118])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V741*/ meltfptr[740]); ((meltroutine_ptr_t) /*_.VALROUT___V1119*/ meltfptr[1118])->tabval[27] = (melt_ptr_t) ( /*_.VALDATA___V741*/ meltfptr[740]); MELT_LOCATION ("warmelt-normatch.melt:3488:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1119*/ meltfptr[1118]); /*putclosurout#70 */ melt_assertmsg ("putclosrout#70 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1127*/ meltfptr[1126])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#70 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1119*/ meltfptr[1118])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1127*/ meltfptr[1126])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1119*/ meltfptr[1118]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1127*/ meltfptr[1126]); MELT_LOCATION ("warmelt-normatch.melt:3657:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1036__TRANSLPAT_INSPAT#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1128*/ meltfptr[1127])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:3657:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1036__TRANSLPAT_INSPAT#1", NULL != ( /*_.CLASS_SOURCE_PATTERN_INSTANCE__V44*/ meltfptr[43])); ((meltroutine_ptr_t) /*_.VALROUT___V1128*/ meltfptr[1127])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_INSTANCE__V44*/ meltfptr[43]); MELT_LOCATION ("warmelt-normatch.melt:3657:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V695*/ meltfptr[694]); ((meltroutine_ptr_t) /*_.VALROUT___V1128*/ meltfptr[1127])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); MELT_LOCATION ("warmelt-normatch.melt:3657:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V673*/ meltfptr[672]); ((meltroutine_ptr_t) /*_.VALROUT___V1128*/ meltfptr[1127])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V673*/ meltfptr[672]); MELT_LOCATION ("warmelt-normatch.melt:3657:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1036__TRANSLPAT_INSPAT#4", NULL != ( /*_.CLASS_CLASS__V25*/ meltfptr[24])); ((meltroutine_ptr_t) /*_.VALROUT___V1128*/ meltfptr[1127])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_CLASS__V25*/ meltfptr[24]); MELT_LOCATION ("warmelt-normatch.melt:3657:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V990*/ meltfptr[989]); ((meltroutine_ptr_t) /*_.VALROUT___V1128*/ meltfptr[1127])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V990*/ meltfptr[989]); MELT_LOCATION ("warmelt-normatch.melt:3657:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1036__TRANSLPAT_INSPAT#6", NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1128*/ meltfptr[1127])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:3657:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1036__TRANSLPAT_INSPAT#7", NULL != ( /*_.CLASS_SOURCE_FIELD_PATTERN__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1128*/ meltfptr[1127])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_SOURCE_FIELD_PATTERN__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-normatch.melt:3657:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1036__TRANSLPAT_INSPAT#8", NULL != ( /*_.CLASS_FIELD__V27*/ meltfptr[26])); ((meltroutine_ptr_t) /*_.VALROUT___V1128*/ meltfptr[1127])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_FIELD__V27*/ meltfptr[26]); MELT_LOCATION ("warmelt-normatch.melt:3657:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V911*/ meltfptr[910]); ((meltroutine_ptr_t) /*_.VALROUT___V1128*/ meltfptr[1127])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V911*/ meltfptr[910]); MELT_LOCATION ("warmelt-normatch.melt:3657:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V859*/ meltfptr[858]); ((meltroutine_ptr_t) /*_.VALROUT___V1128*/ meltfptr[1127])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V859*/ meltfptr[858]); MELT_LOCATION ("warmelt-normatch.melt:3657:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1036__TRANSLPAT_INSPAT#11", NULL != ( /*_.DISCR_MULTIPLE__V45*/ meltfptr[44])); ((meltroutine_ptr_t) /*_.VALROUT___V1128*/ meltfptr[1127])->tabval[11] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V45*/ meltfptr[44]); MELT_LOCATION ("warmelt-normatch.melt:3657:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1066*/ meltfptr[1065]); ((meltroutine_ptr_t) /*_.VALROUT___V1128*/ meltfptr[1127])->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V1066*/ meltfptr[1065]); MELT_LOCATION ("warmelt-normatch.melt:3657:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1036__TRANSLPAT_INSPAT#13", NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1128*/ meltfptr[1127])->tabval[13] = (melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-normatch.melt:3657:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1036__TRANSLPAT_INSPAT#14", NULL != ( /*_.CLASS_SOURCE_PATTERN_JOKER_VARIABLE__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1128*/ meltfptr[1127])->tabval[14] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_JOKER_VARIABLE__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-normatch.melt:3657:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1036__TRANSLPAT_INSPAT#15", NULL != ( /*_.CLONE_SYMBOL__V49*/ meltfptr[48])); ((meltroutine_ptr_t) /*_.VALROUT___V1128*/ meltfptr[1127])->tabval[15] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V49*/ meltfptr[48]); MELT_LOCATION ("warmelt-normatch.melt:3657:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1036__TRANSLPAT_INSPAT#16", NULL != ( /*_.CTYPE_VALUE__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1128*/ meltfptr[1127])->tabval[16] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-normatch.melt:3657:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1106*/ meltfptr[1105]); ((meltroutine_ptr_t) /*_.VALROUT___V1128*/ meltfptr[1127])->tabval[17] = (melt_ptr_t) ( /*_.VALDATA___V1106*/ meltfptr[1105]); MELT_LOCATION ("warmelt-normatch.melt:3657:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1049*/ meltfptr[1048]); ((meltroutine_ptr_t) /*_.VALROUT___V1128*/ meltfptr[1127])->tabval[18] = (melt_ptr_t) ( /*_.VALDATA___V1049*/ meltfptr[1048]); MELT_LOCATION ("warmelt-normatch.melt:3657:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V829*/ meltfptr[828]); ((meltroutine_ptr_t) /*_.VALROUT___V1128*/ meltfptr[1127])->tabval[19] = (melt_ptr_t) ( /*_.VALDATA___V829*/ meltfptr[828]); MELT_LOCATION ("warmelt-normatch.melt:3657:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1036__TRANSLPAT_INSPAT#20", NULL != ( /*_.LIST_TO_MULTIPLE__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1128*/ meltfptr[1127])->tabval[20] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-normatch.melt:3657:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V813*/ meltfptr[812]); ((meltroutine_ptr_t) /*_.VALROUT___V1128*/ meltfptr[1127])->tabval[21] = (melt_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812]); MELT_LOCATION ("warmelt-normatch.melt:3657:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V893*/ meltfptr[892]); ((meltroutine_ptr_t) /*_.VALROUT___V1128*/ meltfptr[1127])->tabval[22] = (melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]); MELT_LOCATION ("warmelt-normatch.melt:3657:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V741*/ meltfptr[740]); ((meltroutine_ptr_t) /*_.VALROUT___V1128*/ meltfptr[1127])->tabval[23] = (melt_ptr_t) ( /*_.VALDATA___V741*/ meltfptr[740]); MELT_LOCATION ("warmelt-normatch.melt:3657:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1128*/ meltfptr[1127]); /*putclosurout#71 */ melt_assertmsg ("putclosrout#71 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1129*/ meltfptr[1128])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#71 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1129*/ meltfptr[1128])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1129*/ meltfptr[1128]); MELT_LOCATION ("warmelt-normatch.melt:3816:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1130*/ meltfptr[1129])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1038__TRANSLPAT_VARPAT#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1130*/ meltfptr[1129])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:3816:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1130*/ meltfptr[1129])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1038__TRANSLPAT_VARPAT#1", NULL != ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13])); ((meltroutine_ptr_t) /*_.VALROUT___V1130*/ meltfptr[1129])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-normatch.melt:3816:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1130*/ meltfptr[1129])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V695*/ meltfptr[694]); ((meltroutine_ptr_t) /*_.VALROUT___V1130*/ meltfptr[1129])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); MELT_LOCATION ("warmelt-normatch.melt:3816:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1130*/ meltfptr[1129])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V673*/ meltfptr[672]); ((meltroutine_ptr_t) /*_.VALROUT___V1130*/ meltfptr[1129])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V673*/ meltfptr[672]); MELT_LOCATION ("warmelt-normatch.melt:3816:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1130*/ meltfptr[1129])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V627*/ meltfptr[626]); ((meltroutine_ptr_t) /*_.VALROUT___V1130*/ meltfptr[1129])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V627*/ meltfptr[626]); MELT_LOCATION ("warmelt-normatch.melt:3816:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1130*/ meltfptr[1129])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V990*/ meltfptr[989]); ((meltroutine_ptr_t) /*_.VALROUT___V1130*/ meltfptr[1129])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V990*/ meltfptr[989]); MELT_LOCATION ("warmelt-normatch.melt:3816:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1130*/ meltfptr[1129])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1038__TRANSLPAT_VARPAT#6", NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1130*/ meltfptr[1129])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:3816:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1130*/ meltfptr[1129])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V813*/ meltfptr[812]); ((meltroutine_ptr_t) /*_.VALROUT___V1130*/ meltfptr[1129])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812]); MELT_LOCATION ("warmelt-normatch.melt:3816:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1130*/ meltfptr[1129])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V741*/ meltfptr[740]); ((meltroutine_ptr_t) /*_.VALROUT___V1130*/ meltfptr[1129])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V741*/ meltfptr[740]); MELT_LOCATION ("warmelt-normatch.melt:3816:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1130*/ meltfptr[1129])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V869*/ meltfptr[868]); ((meltroutine_ptr_t) /*_.VALROUT___V1130*/ meltfptr[1129])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V869*/ meltfptr[868]); MELT_LOCATION ("warmelt-normatch.melt:3816:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1130*/ meltfptr[1129])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1049*/ meltfptr[1048]); ((meltroutine_ptr_t) /*_.VALROUT___V1130*/ meltfptr[1129])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V1049*/ meltfptr[1048]); MELT_LOCATION ("warmelt-normatch.melt:3816:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1130*/ meltfptr[1129])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V859*/ meltfptr[858]); ((meltroutine_ptr_t) /*_.VALROUT___V1130*/ meltfptr[1129])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V859*/ meltfptr[858]); MELT_LOCATION ("warmelt-normatch.melt:3816:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1130*/ meltfptr[1129])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1066*/ meltfptr[1065]); ((meltroutine_ptr_t) /*_.VALROUT___V1130*/ meltfptr[1129])->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V1066*/ meltfptr[1065]); MELT_LOCATION ("warmelt-normatch.melt:3816:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1130*/ meltfptr[1129]); /*putclosurout#72 */ melt_assertmsg ("putclosrout#72 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1131*/ meltfptr[1130])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#72 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1130*/ meltfptr[1129])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1131*/ meltfptr[1130])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1130*/ meltfptr[1129]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1131*/ meltfptr[1130]); MELT_LOCATION ("warmelt-normatch.melt:3909:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1132*/ meltfptr[1131])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1040__TRANSLPAT_ANDPAT#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1132*/ meltfptr[1131])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:3909:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1132*/ meltfptr[1131])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1040__TRANSLPAT_ANDPAT#1", NULL != ( /*_.CLASS_SOURCE_PATTERN_AND__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1132*/ meltfptr[1131])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_AND__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normatch.melt:3909:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1132*/ meltfptr[1131])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V695*/ meltfptr[694]); ((meltroutine_ptr_t) /*_.VALROUT___V1132*/ meltfptr[1131])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); MELT_LOCATION ("warmelt-normatch.melt:3909:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1132*/ meltfptr[1131])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V673*/ meltfptr[672]); ((meltroutine_ptr_t) /*_.VALROUT___V1132*/ meltfptr[1131])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V673*/ meltfptr[672]); MELT_LOCATION ("warmelt-normatch.melt:3909:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1132*/ meltfptr[1131])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1040__TRANSLPAT_ANDPAT#4", NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1132*/ meltfptr[1131])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-normatch.melt:3909:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1132*/ meltfptr[1131])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V893*/ meltfptr[892]); ((meltroutine_ptr_t) /*_.VALROUT___V1132*/ meltfptr[1131])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]); MELT_LOCATION ("warmelt-normatch.melt:3909:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1132*/ meltfptr[1131])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V990*/ meltfptr[989]); ((meltroutine_ptr_t) /*_.VALROUT___V1132*/ meltfptr[1131])->tabval[6] = (melt_ptr_t) ( /*_.VALCLO___V990*/ meltfptr[989]); MELT_LOCATION ("warmelt-normatch.melt:3909:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1132*/ meltfptr[1131])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1040__TRANSLPAT_ANDPAT#7", NULL != ( /*_.VALSTR___V1133*/ meltfptr[1132])); ((meltroutine_ptr_t) /*_.VALROUT___V1132*/ meltfptr[1131])->tabval[7] = (melt_ptr_t) ( /*_.VALSTR___V1133*/ meltfptr[1132]); MELT_LOCATION ("warmelt-normatch.melt:3909:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1132*/ meltfptr[1131])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V829*/ meltfptr[828]); ((meltroutine_ptr_t) /*_.VALROUT___V1132*/ meltfptr[1131])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V829*/ meltfptr[828]); MELT_LOCATION ("warmelt-normatch.melt:3909:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1132*/ meltfptr[1131])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V741*/ meltfptr[740]); ((meltroutine_ptr_t) /*_.VALROUT___V1132*/ meltfptr[1131])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V741*/ meltfptr[740]); MELT_LOCATION ("warmelt-normatch.melt:3909:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1132*/ meltfptr[1131])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1106*/ meltfptr[1105]); ((meltroutine_ptr_t) /*_.VALROUT___V1132*/ meltfptr[1131])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V1106*/ meltfptr[1105]); MELT_LOCATION ("warmelt-normatch.melt:3909:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1132*/ meltfptr[1131])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1049*/ meltfptr[1048]); ((meltroutine_ptr_t) /*_.VALROUT___V1132*/ meltfptr[1131])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V1049*/ meltfptr[1048]); MELT_LOCATION ("warmelt-normatch.melt:3909:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1132*/ meltfptr[1131])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1040__TRANSLPAT_ANDPAT#12", NULL != ( /*_.LIST_TO_MULTIPLE__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1132*/ meltfptr[1131])->tabval[12] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-normatch.melt:3909:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1132*/ meltfptr[1131])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1040__TRANSLPAT_ANDPAT#13", NULL != ( /*_.DISCR_MULTIPLE__V45*/ meltfptr[44])); ((meltroutine_ptr_t) /*_.VALROUT___V1132*/ meltfptr[1131])->tabval[13] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V45*/ meltfptr[44]); MELT_LOCATION ("warmelt-normatch.melt:3909:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1132*/ meltfptr[1131])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V819*/ meltfptr[818]); ((meltroutine_ptr_t) /*_.VALROUT___V1132*/ meltfptr[1131])->tabval[14] = (melt_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818]); MELT_LOCATION ("warmelt-normatch.melt:3909:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1132*/ meltfptr[1131]); /*putclosurout#73 */ melt_assertmsg ("putclosrout#73 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1134*/ meltfptr[1133])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#73 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1132*/ meltfptr[1131])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1134*/ meltfptr[1133])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1132*/ meltfptr[1131]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1134*/ meltfptr[1133]); MELT_LOCATION ("warmelt-normatch.melt:3993:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1135*/ meltfptr[1134])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1043__TRANSLPAT_ORPAT#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1135*/ meltfptr[1134])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:3993:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1135*/ meltfptr[1134])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1043__TRANSLPAT_ORPAT#1", NULL != ( /*_.CLASS_SOURCE_PATTERN_OR__V32*/ meltfptr[31])); ((meltroutine_ptr_t) /*_.VALROUT___V1135*/ meltfptr[1134])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_OR__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-normatch.melt:3993:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1135*/ meltfptr[1134])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V695*/ meltfptr[694]); ((meltroutine_ptr_t) /*_.VALROUT___V1135*/ meltfptr[1134])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); MELT_LOCATION ("warmelt-normatch.melt:3993:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1135*/ meltfptr[1134])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V673*/ meltfptr[672]); ((meltroutine_ptr_t) /*_.VALROUT___V1135*/ meltfptr[1134])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V673*/ meltfptr[672]); #undef meltfram__ } /*end of meltmod__warmelt_normatch__initialmeltchunk_21 */ void meltmod__warmelt_normatch__initialmeltchunk_22 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-normatch.melt:3993:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1135*/ meltfptr[1134])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V627*/ meltfptr[626]); ((meltroutine_ptr_t) /*_.VALROUT___V1135*/ meltfptr[1134])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V627*/ meltfptr[626]); MELT_LOCATION ("warmelt-normatch.melt:3993:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1135*/ meltfptr[1134])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V893*/ meltfptr[892]); ((meltroutine_ptr_t) /*_.VALROUT___V1135*/ meltfptr[1134])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]); MELT_LOCATION ("warmelt-normatch.melt:3993:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1135*/ meltfptr[1134])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V990*/ meltfptr[989]); ((meltroutine_ptr_t) /*_.VALROUT___V1135*/ meltfptr[1134])->tabval[6] = (melt_ptr_t) ( /*_.VALCLO___V990*/ meltfptr[989]); MELT_LOCATION ("warmelt-normatch.melt:3993:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1135*/ meltfptr[1134])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1043__TRANSLPAT_ORPAT#7", NULL != ( /*_.VALSTR___V1136*/ meltfptr[1135])); ((meltroutine_ptr_t) /*_.VALROUT___V1135*/ meltfptr[1134])->tabval[7] = (melt_ptr_t) ( /*_.VALSTR___V1136*/ meltfptr[1135]); MELT_LOCATION ("warmelt-normatch.melt:3993:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1135*/ meltfptr[1134])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V835*/ meltfptr[834]); ((meltroutine_ptr_t) /*_.VALROUT___V1135*/ meltfptr[1134])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V835*/ meltfptr[834]); MELT_LOCATION ("warmelt-normatch.melt:3993:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1135*/ meltfptr[1134])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1043__TRANSLPAT_ORPAT#9", NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1135*/ meltfptr[1134])->tabval[9] = (melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-normatch.melt:3993:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1135*/ meltfptr[1134])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1043__TRANSLPAT_ORPAT#10", NULL != ( /*_.DISCR_MAP_OBJECTS__V33*/ meltfptr[32])); ((meltroutine_ptr_t) /*_.VALROUT___V1135*/ meltfptr[1134])->tabval[10] = (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V33*/ meltfptr[32]); MELT_LOCATION ("warmelt-normatch.melt:3993:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1135*/ meltfptr[1134])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1043__TRANSLPAT_ORPAT#11", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1135*/ meltfptr[1134])->tabval[11] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:3993:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1135*/ meltfptr[1134])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1043__TRANSLPAT_ORPAT#12", NULL != ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13])); ((meltroutine_ptr_t) /*_.VALROUT___V1135*/ meltfptr[1134])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-normatch.melt:3993:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1135*/ meltfptr[1134])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V695*/ meltfptr[694]); ((meltroutine_ptr_t) /*_.VALROUT___V1135*/ meltfptr[1134])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); MELT_LOCATION ("warmelt-normatch.melt:4032:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1137*/ meltfptr[1136])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1046__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1137*/ meltfptr[1136])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:4032:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1137*/ meltfptr[1136])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1046__LAMBDA_#1", NULL != ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13])); ((meltroutine_ptr_t) /*_.VALROUT___V1137*/ meltfptr[1136])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-normatch.melt:4032:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1137*/ meltfptr[1136])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V695*/ meltfptr[694]); ((meltroutine_ptr_t) /*_.VALROUT___V1137*/ meltfptr[1136])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); MELT_LOCATION ("warmelt-normatch.melt:4032:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1137*/ meltfptr[1136]); MELT_LOCATION ("warmelt-normatch.melt:3993:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1135*/ meltfptr[1134])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1043__TRANSLPAT_ORPAT#14", NULL != ( /*_.VALROUT___V1137*/ meltfptr[1136])); ((meltroutine_ptr_t) /*_.VALROUT___V1135*/ meltfptr[1134])->tabval[14] = (melt_ptr_t) ( /*_.VALROUT___V1137*/ meltfptr[1136]); MELT_LOCATION ("warmelt-normatch.melt:3993:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1135*/ meltfptr[1134])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1106*/ meltfptr[1105]); ((meltroutine_ptr_t) /*_.VALROUT___V1135*/ meltfptr[1134])->tabval[15] = (melt_ptr_t) ( /*_.VALDATA___V1106*/ meltfptr[1105]); MELT_LOCATION ("warmelt-normatch.melt:3993:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1135*/ meltfptr[1134])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V779*/ meltfptr[778]); ((meltroutine_ptr_t) /*_.VALROUT___V1135*/ meltfptr[1134])->tabval[16] = (melt_ptr_t) ( /*_.VALDATA___V779*/ meltfptr[778]); MELT_LOCATION ("warmelt-normatch.melt:3993:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1135*/ meltfptr[1134])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1049*/ meltfptr[1048]); ((meltroutine_ptr_t) /*_.VALROUT___V1135*/ meltfptr[1134])->tabval[17] = (melt_ptr_t) ( /*_.VALDATA___V1049*/ meltfptr[1048]); MELT_LOCATION ("warmelt-normatch.melt:3993:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1135*/ meltfptr[1134])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1066*/ meltfptr[1065]); ((meltroutine_ptr_t) /*_.VALROUT___V1135*/ meltfptr[1134])->tabval[18] = (melt_ptr_t) ( /*_.VALDATA___V1066*/ meltfptr[1065]); MELT_LOCATION ("warmelt-normatch.melt:3993:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1135*/ meltfptr[1134])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1043__TRANSLPAT_ORPAT#19", NULL != ( /*_.MAPOBJECT_SORTED_ATTRIBUTE_TUPLE__V54*/ meltfptr[53])); ((meltroutine_ptr_t) /*_.VALROUT___V1135*/ meltfptr[1134])->tabval[19] = (melt_ptr_t) ( /*_.MAPOBJECT_SORTED_ATTRIBUTE_TUPLE__V54*/ meltfptr[53]); MELT_LOCATION ("warmelt-normatch.melt:3993:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1135*/ meltfptr[1134])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1043__TRANSLPAT_ORPAT#20", NULL != ( /*_.MULTIPLE_MAP__V55*/ meltfptr[54])); ((meltroutine_ptr_t) /*_.VALROUT___V1135*/ meltfptr[1134])->tabval[20] = (melt_ptr_t) ( /*_.MULTIPLE_MAP__V55*/ meltfptr[54]); MELT_LOCATION ("warmelt-normatch.melt:3993:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1135*/ meltfptr[1134])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1043__TRANSLPAT_ORPAT#21", NULL != ( /*_.VALROUT___V1138*/ meltfptr[1137])); ((meltroutine_ptr_t) /*_.VALROUT___V1135*/ meltfptr[1134])->tabval[21] = (melt_ptr_t) ( /*_.VALROUT___V1138*/ meltfptr[1137]); MELT_LOCATION ("warmelt-normatch.melt:3993:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1135*/ meltfptr[1134])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1043__TRANSLPAT_ORPAT#22", NULL != ( /*_.CLASS_LOCATED__V21*/ meltfptr[20])); ((meltroutine_ptr_t) /*_.VALROUT___V1135*/ meltfptr[1134])->tabval[22] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-normatch.melt:3993:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1135*/ meltfptr[1134])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1043__TRANSLPAT_ORPAT#23", NULL != ( /*_.LIST_TO_MULTIPLE__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1135*/ meltfptr[1134])->tabval[23] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-normatch.melt:3993:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1135*/ meltfptr[1134])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1043__TRANSLPAT_ORPAT#24", NULL != ( /*_.DISCR_MULTIPLE__V45*/ meltfptr[44])); ((meltroutine_ptr_t) /*_.VALROUT___V1135*/ meltfptr[1134])->tabval[24] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V45*/ meltfptr[44]); MELT_LOCATION ("warmelt-normatch.melt:3993:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1135*/ meltfptr[1134])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V819*/ meltfptr[818]); ((meltroutine_ptr_t) /*_.VALROUT___V1135*/ meltfptr[1134])->tabval[25] = (melt_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818]); MELT_LOCATION ("warmelt-normatch.melt:3993:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1135*/ meltfptr[1134]); /*putclosurout#74 */ melt_assertmsg ("putclosrout#74 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1139*/ meltfptr[1138])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#74 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1135*/ meltfptr[1134])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1139*/ meltfptr[1138])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1135*/ meltfptr[1134]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1139*/ meltfptr[1138]); MELT_LOCATION ("warmelt-normatch.melt:4117:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) 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_1048__TRANSLPAT_PATMAT#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:4117:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) 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_1048__TRANSLPAT_PATMAT#1", NULL != ( /*_.CLASS_SOURCE_PATTERN_MATCHER__V57*/ meltfptr[56])); ((meltroutine_ptr_t) /*_.VALROUT___V1140*/ meltfptr[1139])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_MATCHER__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-normatch.melt:4117:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1140*/ meltfptr[1139])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V695*/ meltfptr[694]); ((meltroutine_ptr_t) /*_.VALROUT___V1140*/ meltfptr[1139])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); MELT_LOCATION ("warmelt-normatch.melt:4117:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1140*/ meltfptr[1139])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V673*/ meltfptr[672]); ((meltroutine_ptr_t) /*_.VALROUT___V1140*/ meltfptr[1139])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V673*/ meltfptr[672]); MELT_LOCATION ("warmelt-normatch.melt:4117:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1140*/ meltfptr[1139])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V627*/ meltfptr[626]); ((meltroutine_ptr_t) /*_.VALROUT___V1140*/ meltfptr[1139])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V627*/ meltfptr[626]); MELT_LOCATION ("warmelt-normatch.melt:4117:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) 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_1048__TRANSLPAT_PATMAT#5", NULL != ( /*_.CLASS_ANY_MATCHER__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V1140*/ meltfptr[1139])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_ANY_MATCHER__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normatch.melt:4117:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1140*/ meltfptr[1139])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V990*/ meltfptr[989]); ((meltroutine_ptr_t) /*_.VALROUT___V1140*/ meltfptr[1139])->tabval[6] = (melt_ptr_t) ( /*_.VALCLO___V990*/ meltfptr[989]); MELT_LOCATION ("warmelt-normatch.melt:4117:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) 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_1048__TRANSLPAT_PATMAT#7", NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1140*/ meltfptr[1139])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:4117:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) 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_1048__TRANSLPAT_PATMAT#8", NULL != ( /*_.CLASS_ENVIRONMENT__V69*/ meltfptr[68])); ((meltroutine_ptr_t) /*_.VALROUT___V1140*/ meltfptr[1139])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V69*/ meltfptr[68]); MELT_LOCATION ("warmelt-normatch.melt:4117:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) 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_1048__TRANSLPAT_PATMAT#9", NULL != ( /*_.NORMALIZE_TUPLE__V31*/ meltfptr[30])); ((meltroutine_ptr_t) /*_.VALROUT___V1140*/ meltfptr[1139])->tabval[9] = (melt_ptr_t) ( /*_.NORMALIZE_TUPLE__V31*/ meltfptr[30]); MELT_LOCATION ("warmelt-normatch.melt:4117:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) 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_1048__TRANSLPAT_PATMAT#10", NULL != ( /*_.GET_CTYPE__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1140*/ meltfptr[1139])->tabval[10] = (melt_ptr_t) ( /*_.GET_CTYPE__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normatch.melt:4117:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) 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_1048__TRANSLPAT_PATMAT#11", NULL != ( /*_.CLASS_FORMAL_BINDING__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V1140*/ meltfptr[1139])->tabval[11] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normatch.melt:4117:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) 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_1048__TRANSLPAT_PATMAT#12", NULL != ( /*_.CLASS_CTYPE__V20*/ meltfptr[19])); ((meltroutine_ptr_t) /*_.VALROUT___V1140*/ meltfptr[1139])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-normatch.melt:4117:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) 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_1048__TRANSLPAT_PATMAT#13", NULL != ( /*_.CLASS_ANY_BINDING__V58*/ meltfptr[57])); ((meltroutine_ptr_t) /*_.VALROUT___V1140*/ meltfptr[1139])->tabval[13] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V58*/ meltfptr[57]); MELT_LOCATION ("warmelt-normatch.melt:4117:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1140*/ meltfptr[1139])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V763*/ meltfptr[762]); ((meltroutine_ptr_t) /*_.VALROUT___V1140*/ meltfptr[1139])->tabval[14] = (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]); MELT_LOCATION ("warmelt-normatch.melt:4117:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1140*/ meltfptr[1139])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V859*/ meltfptr[858]); ((meltroutine_ptr_t) /*_.VALROUT___V1140*/ meltfptr[1139])->tabval[15] = (melt_ptr_t) ( /*_.VALDATA___V859*/ meltfptr[858]); MELT_LOCATION ("warmelt-normatch.melt:4117:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1140*/ meltfptr[1139])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V935*/ meltfptr[934]); ((meltroutine_ptr_t) /*_.VALROUT___V1140*/ meltfptr[1139])->tabval[16] = (melt_ptr_t) ( /*_.VALDATA___V935*/ meltfptr[934]); MELT_LOCATION ("warmelt-normatch.melt:4117:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1140*/ meltfptr[1139])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V799*/ meltfptr[798]); ((meltroutine_ptr_t) /*_.VALROUT___V1140*/ meltfptr[1139])->tabval[17] = (melt_ptr_t) ( /*_.VALDATA___V799*/ meltfptr[798]); MELT_LOCATION ("warmelt-normatch.melt:4117:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) 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_1048__TRANSLPAT_PATMAT#18", NULL != ( /*_.DISCR_MULTIPLE__V45*/ meltfptr[44])); ((meltroutine_ptr_t) /*_.VALROUT___V1140*/ meltfptr[1139])->tabval[18] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V45*/ meltfptr[44]); MELT_LOCATION ("warmelt-normatch.melt:4117:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1140*/ meltfptr[1139])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1066*/ meltfptr[1065]); ((meltroutine_ptr_t) /*_.VALROUT___V1140*/ meltfptr[1139])->tabval[19] = (melt_ptr_t) ( /*_.VALDATA___V1066*/ meltfptr[1065]); MELT_LOCATION ("warmelt-normatch.melt:4117:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) 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_1048__TRANSLPAT_PATMAT#20", NULL != ( /*_.CLONE_SYMBOL__V49*/ meltfptr[48])); ((meltroutine_ptr_t) /*_.VALROUT___V1140*/ meltfptr[1139])->tabval[20] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V49*/ meltfptr[48]); MELT_LOCATION ("warmelt-normatch.melt:4117:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) 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_1048__TRANSLPAT_PATMAT#21", NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1140*/ meltfptr[1139])->tabval[21] = (melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-normatch.melt:4117:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1140*/ meltfptr[1139])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V893*/ meltfptr[892]); ((meltroutine_ptr_t) /*_.VALROUT___V1140*/ meltfptr[1139])->tabval[22] = (melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]); MELT_LOCATION ("warmelt-normatch.melt:4117:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1140*/ meltfptr[1139])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1106*/ meltfptr[1105]); ((meltroutine_ptr_t) /*_.VALROUT___V1140*/ meltfptr[1139])->tabval[23] = (melt_ptr_t) ( /*_.VALDATA___V1106*/ meltfptr[1105]); MELT_LOCATION ("warmelt-normatch.melt:4117:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1140*/ meltfptr[1139])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1049*/ meltfptr[1048]); ((meltroutine_ptr_t) /*_.VALROUT___V1140*/ meltfptr[1139])->tabval[24] = (melt_ptr_t) ( /*_.VALDATA___V1049*/ meltfptr[1048]); MELT_LOCATION ("warmelt-normatch.melt:4117:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1140*/ meltfptr[1139])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V741*/ meltfptr[740]); ((meltroutine_ptr_t) /*_.VALROUT___V1140*/ meltfptr[1139])->tabval[25] = (melt_ptr_t) ( /*_.VALDATA___V741*/ meltfptr[740]); MELT_LOCATION ("warmelt-normatch.melt:4117:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1140*/ meltfptr[1139])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V829*/ meltfptr[828]); ((meltroutine_ptr_t) /*_.VALROUT___V1140*/ meltfptr[1139])->tabval[26] = (melt_ptr_t) ( /*_.VALDATA___V829*/ meltfptr[828]); MELT_LOCATION ("warmelt-normatch.melt:4117:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) 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_1048__TRANSLPAT_PATMAT#27", NULL != ( /*_.LIST_TO_MULTIPLE__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1140*/ meltfptr[1139])->tabval[27] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-normatch.melt:4117:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1140*/ meltfptr[1139])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V813*/ meltfptr[812]); ((meltroutine_ptr_t) /*_.VALROUT___V1140*/ meltfptr[1139])->tabval[28] = (melt_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812]); MELT_LOCATION ("warmelt-normatch.melt:4117:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1140*/ meltfptr[1139]); /*putclosurout#75 */ melt_assertmsg ("putclosrout#75 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1141*/ meltfptr[1140])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#75 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]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1141*/ meltfptr[1140]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1142*/ meltfptr[1141])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1143*/ meltfptr[1142]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1142*/ meltfptr[1141]); melt_dbgtrace_written_object ( /*_.VALDATA___V1142*/ meltfptr[1141], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:4340:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1144*/ meltfptr[1143])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1145*/ meltfptr[1144]); MELT_LOCATION ("warmelt-normatch.melt:4340:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1144*/ meltfptr[1143]); MELT_LOCATION ("warmelt-normatch.melt:4340:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1144*/ meltfptr[1143], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:4344:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1146*/ meltfptr[1145])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1054__MGALTSTEP_ANY#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1146*/ meltfptr[1145])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:4344:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1146*/ meltfptr[1145])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1054__MGALTSTEP_ANY#1", NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1146*/ meltfptr[1145])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:4344:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1146*/ meltfptr[1145]); /*putclosurout#76 */ melt_assertmsg ("putclosrout#76 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1147*/ meltfptr[1146])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#76 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1146*/ meltfptr[1145])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1147*/ meltfptr[1146])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1146*/ meltfptr[1145]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1147*/ meltfptr[1146]); MELT_LOCATION ("warmelt-normatch.melt:4355:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1148*/ meltfptr[1147])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1056__MGALTSTEP_STEPTESTVAR#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((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"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1148*/ meltfptr[1147])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V869*/ meltfptr[868]); ((meltroutine_ptr_t) /*_.VALROUT___V1148*/ meltfptr[1147])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V869*/ meltfptr[868]); MELT_LOCATION ("warmelt-normatch.melt:4355:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1148*/ meltfptr[1147])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V558*/ meltfptr[557]); ((meltroutine_ptr_t) /*_.VALROUT___V1148*/ meltfptr[1147])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557]); MELT_LOCATION ("warmelt-normatch.melt:4355:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1148*/ meltfptr[1147])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1056__MGALTSTEP_STEPTESTVAR#3", NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1148*/ meltfptr[1147])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:4355:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1148*/ meltfptr[1147])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V695*/ meltfptr[694]); ((meltroutine_ptr_t) /*_.VALROUT___V1148*/ meltfptr[1147])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); MELT_LOCATION ("warmelt-normatch.melt:4355:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1148*/ meltfptr[1147])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1056__MGALTSTEP_STEPTESTVAR#5", NULL != ( /*_.CLASS_CLONED_SYMBOL__V66*/ meltfptr[65])); ((meltroutine_ptr_t) /*_.VALROUT___V1148*/ meltfptr[1147])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V66*/ meltfptr[65]); MELT_LOCATION ("warmelt-normatch.melt:4355:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1148*/ meltfptr[1147]); /*putclosurout#77 */ melt_assertmsg ("putclosrout#77 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1149*/ meltfptr[1148])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#77 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1148*/ meltfptr[1147])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1149*/ meltfptr[1148])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1148*/ meltfptr[1147]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1149*/ meltfptr[1148]); MELT_LOCATION ("warmelt-normatch.melt:4421:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1150*/ meltfptr[1149])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1058__MGALTSTEP_STEPTESTINST#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1150*/ meltfptr[1149])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:4421:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1150*/ meltfptr[1149])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V911*/ meltfptr[910]); ((meltroutine_ptr_t) /*_.VALROUT___V1150*/ meltfptr[1149])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V911*/ meltfptr[910]); MELT_LOCATION ("warmelt-normatch.melt:4421:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1150*/ meltfptr[1149])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V558*/ meltfptr[557]); ((meltroutine_ptr_t) /*_.VALROUT___V1150*/ meltfptr[1149])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557]); MELT_LOCATION ("warmelt-normatch.melt:4421:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1150*/ meltfptr[1149])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1058__MGALTSTEP_STEPTESTINST#3", NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1150*/ meltfptr[1149])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:4421:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1150*/ meltfptr[1149])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V695*/ meltfptr[694]); ((meltroutine_ptr_t) /*_.VALROUT___V1150*/ meltfptr[1149])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); MELT_LOCATION ("warmelt-normatch.melt:4421:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1150*/ meltfptr[1149])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1058__MGALTSTEP_STEPTESTINST#5", NULL != ( /*_.CLASS_CLASS__V25*/ meltfptr[24])); ((meltroutine_ptr_t) /*_.VALROUT___V1150*/ meltfptr[1149])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_CLASS__V25*/ meltfptr[24]); MELT_LOCATION ("warmelt-normatch.melt:4421:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1150*/ meltfptr[1149])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1058__MGALTSTEP_STEPTESTINST#6", NULL != ( /*_.CLASS_FIELD__V27*/ meltfptr[26])); ((meltroutine_ptr_t) /*_.VALROUT___V1150*/ meltfptr[1149])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_FIELD__V27*/ meltfptr[26]); MELT_LOCATION ("warmelt-normatch.melt:4421:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1150*/ meltfptr[1149])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1058__MGALTSTEP_STEPTESTINST#7", NULL != ( /*_.ADD2OUT__V77*/ meltfptr[76])); ((meltroutine_ptr_t) /*_.VALROUT___V1150*/ meltfptr[1149])->tabval[7] = (melt_ptr_t) ( /*_.ADD2OUT__V77*/ meltfptr[76]); MELT_LOCATION ("warmelt-normatch.melt:4421:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1150*/ meltfptr[1149]); /*putclosurout#78 */ melt_assertmsg ("putclosrout#78 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1151*/ meltfptr[1150])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#78 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1150*/ meltfptr[1149])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1151*/ meltfptr[1150])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1150*/ meltfptr[1149]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1151*/ meltfptr[1150]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1152*/ meltfptr[1151])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1153*/ meltfptr[1152]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1152*/ meltfptr[1151]); melt_dbgtrace_written_object ( /*_.VALDATA___V1152*/ meltfptr[1151], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:4492:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1154*/ meltfptr[1153])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1062__MGALTSTEP_STEPTESTMULT#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1154*/ meltfptr[1153])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:4492:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1154*/ meltfptr[1153])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V925*/ meltfptr[924]); ((meltroutine_ptr_t) /*_.VALROUT___V1154*/ meltfptr[1153])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V925*/ meltfptr[924]); MELT_LOCATION ("warmelt-normatch.melt:4492:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1154*/ meltfptr[1153])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V558*/ meltfptr[557]); ((meltroutine_ptr_t) /*_.VALROUT___V1154*/ meltfptr[1153])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557]); MELT_LOCATION ("warmelt-normatch.melt:4492:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1154*/ meltfptr[1153])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1062__MGALTSTEP_STEPTESTMULT#3", NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1154*/ meltfptr[1153])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:4492:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1154*/ meltfptr[1153])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1062__MGALTSTEP_STEPTESTMULT#4", NULL != ( /*_.ADD2OUT__V77*/ meltfptr[76])); ((meltroutine_ptr_t) /*_.VALROUT___V1154*/ meltfptr[1153])->tabval[4] = (melt_ptr_t) ( /*_.ADD2OUT__V77*/ meltfptr[76]); MELT_LOCATION ("warmelt-normatch.melt:4492:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1154*/ meltfptr[1153])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V695*/ meltfptr[694]); ((meltroutine_ptr_t) /*_.VALROUT___V1154*/ meltfptr[1153])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); MELT_LOCATION ("warmelt-normatch.melt:4492:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1154*/ meltfptr[1153]); /*putclosurout#79 */ melt_assertmsg ("putclosrout#79 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1155*/ meltfptr[1154])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#79 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1154*/ meltfptr[1153])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1155*/ meltfptr[1154])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1154*/ meltfptr[1153]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1155*/ meltfptr[1154]); MELT_LOCATION ("warmelt-normatch.melt:4562:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1156*/ meltfptr[1155])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1064__MGALTSTEP_STEPTESTGROUP#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:4562:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1156*/ meltfptr[1155])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V893*/ meltfptr[892]); ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]); MELT_LOCATION ("warmelt-normatch.melt:4562:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1156*/ meltfptr[1155])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V558*/ meltfptr[557]); ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557]); MELT_LOCATION ("warmelt-normatch.melt:4562:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1156*/ meltfptr[1155])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1064__MGALTSTEP_STEPTESTGROUP#3", NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:4562:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1156*/ meltfptr[1155])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1064__MGALTSTEP_STEPTESTGROUP#4", NULL != ( /*_.ADD2OUT__V77*/ meltfptr[76])); ((meltroutine_ptr_t) /*_.VALROUT___V1156*/ meltfptr[1155])->tabval[4] = (melt_ptr_t) ( /*_.ADD2OUT__V77*/ meltfptr[76]); MELT_LOCATION ("warmelt-normatch.melt:4562:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1156*/ meltfptr[1155]); /*putclosurout#80 */ melt_assertmsg ("putclosrout#80 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1157*/ meltfptr[1156])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#80 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1156*/ meltfptr[1155])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1157*/ meltfptr[1156])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1156*/ meltfptr[1155]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1157*/ meltfptr[1156]); MELT_LOCATION ("warmelt-normatch.melt:4606:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1158*/ meltfptr[1157])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1066__MGALTSTEP_STEPTESTMATCHER#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1158*/ meltfptr[1157])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:4606:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1158*/ meltfptr[1157])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V935*/ meltfptr[934]); ((meltroutine_ptr_t) /*_.VALROUT___V1158*/ meltfptr[1157])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V935*/ meltfptr[934]); MELT_LOCATION ("warmelt-normatch.melt:4606:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1158*/ meltfptr[1157])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V558*/ meltfptr[557]); ((meltroutine_ptr_t) /*_.VALROUT___V1158*/ meltfptr[1157])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557]); MELT_LOCATION ("warmelt-normatch.melt:4606:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1158*/ meltfptr[1157])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1066__MGALTSTEP_STEPTESTMATCHER#3", NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1158*/ meltfptr[1157])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:4606:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1158*/ meltfptr[1157])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V695*/ meltfptr[694]); ((meltroutine_ptr_t) /*_.VALROUT___V1158*/ meltfptr[1157])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); MELT_LOCATION ("warmelt-normatch.melt:4606:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1158*/ meltfptr[1157])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1066__MGALTSTEP_STEPTESTMATCHER#5", NULL != ( /*_.CLASS_ANY_MATCHER__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V1158*/ meltfptr[1157])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_ANY_MATCHER__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normatch.melt:4606:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1158*/ meltfptr[1157])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1066__MGALTSTEP_STEPTESTMATCHER#6", NULL != ( /*_.CLASS_ANY_BINDING__V58*/ meltfptr[57])); ((meltroutine_ptr_t) /*_.VALROUT___V1158*/ meltfptr[1157])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V58*/ meltfptr[57]); MELT_LOCATION ("warmelt-normatch.melt:4606:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1158*/ meltfptr[1157])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1066__MGALTSTEP_STEPTESTMATCHER#7", NULL != ( /*_.CLASS_SYMBOL__V34*/ meltfptr[33])); ((meltroutine_ptr_t) /*_.VALROUT___V1158*/ meltfptr[1157])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V34*/ meltfptr[33]); MELT_LOCATION ("warmelt-normatch.melt:4606:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1158*/ meltfptr[1157]); /*putclosurout#81 */ melt_assertmsg ("putclosrout#81 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1159*/ meltfptr[1158])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#81 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1158*/ meltfptr[1157])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1159*/ meltfptr[1158])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1158*/ meltfptr[1157]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1159*/ meltfptr[1158]); MELT_LOCATION ("warmelt-normatch.melt:4683:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1160*/ meltfptr[1159])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1068__MGALTSTEP_STEPSUCCESS#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1160*/ meltfptr[1159])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:4683:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1160*/ meltfptr[1159])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V841*/ meltfptr[840]); ((meltroutine_ptr_t) /*_.VALROUT___V1160*/ meltfptr[1159])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V841*/ meltfptr[840]); MELT_LOCATION ("warmelt-normatch.melt:4683:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1160*/ meltfptr[1159])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V558*/ meltfptr[557]); ((meltroutine_ptr_t) /*_.VALROUT___V1160*/ meltfptr[1159])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557]); MELT_LOCATION ("warmelt-normatch.melt:4683:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1160*/ meltfptr[1159])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V741*/ meltfptr[740]); ((meltroutine_ptr_t) /*_.VALROUT___V1160*/ meltfptr[1159])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V741*/ meltfptr[740]); MELT_LOCATION ("warmelt-normatch.melt:4683:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1160*/ meltfptr[1159])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1068__MGALTSTEP_STEPSUCCESS#4", NULL != ( /*_.CLASS_LOCATED__V21*/ meltfptr[20])); ((meltroutine_ptr_t) /*_.VALROUT___V1160*/ meltfptr[1159])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]); #undef meltfram__ } /*end of meltmod__warmelt_normatch__initialmeltchunk_22 */ void meltmod__warmelt_normatch__initialmeltchunk_23 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-normatch.melt:4683:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1160*/ meltfptr[1159])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1068__MGALTSTEP_STEPSUCCESS#5", NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1160*/ meltfptr[1159])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:4683:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1160*/ meltfptr[1159])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V789*/ meltfptr[788]); ((meltroutine_ptr_t) /*_.VALROUT___V1160*/ meltfptr[1159])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V789*/ meltfptr[788]); MELT_LOCATION ("warmelt-normatch.melt:4683:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1160*/ meltfptr[1159]); /*putclosurout#82 */ melt_assertmsg ("putclosrout#82 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1161*/ meltfptr[1160])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#82 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1160*/ meltfptr[1159])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1161*/ meltfptr[1160])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1160*/ meltfptr[1159]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1161*/ meltfptr[1160]); MELT_LOCATION ("warmelt-normatch.melt:4752:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1162*/ meltfptr[1161])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1070__MGALTSTEP_STEPCLEAR#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1162*/ meltfptr[1161])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:4752:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1162*/ meltfptr[1161])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V779*/ meltfptr[778]); ((meltroutine_ptr_t) /*_.VALROUT___V1162*/ meltfptr[1161])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V779*/ meltfptr[778]); MELT_LOCATION ("warmelt-normatch.melt:4752:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1162*/ meltfptr[1161])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V558*/ meltfptr[557]); ((meltroutine_ptr_t) /*_.VALROUT___V1162*/ meltfptr[1161])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557]); MELT_LOCATION ("warmelt-normatch.melt:4752:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1162*/ meltfptr[1161])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1070__MGALTSTEP_STEPCLEAR#3", NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1162*/ meltfptr[1161])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:4752:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1162*/ meltfptr[1161]); /*putclosurout#83 */ melt_assertmsg ("putclosrout#83 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1163*/ meltfptr[1162])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#83 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1162*/ meltfptr[1161])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1163*/ meltfptr[1162])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1162*/ meltfptr[1161]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1163*/ meltfptr[1162]); MELT_LOCATION ("warmelt-normatch.melt:4809:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1164*/ meltfptr[1163])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1072__MGALTSTEP_STEPFLAGSET#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1164*/ meltfptr[1163])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:4809:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1164*/ meltfptr[1163])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V813*/ meltfptr[812]); ((meltroutine_ptr_t) /*_.VALROUT___V1164*/ meltfptr[1163])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812]); MELT_LOCATION ("warmelt-normatch.melt:4809:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1164*/ meltfptr[1163])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V558*/ meltfptr[557]); ((meltroutine_ptr_t) /*_.VALROUT___V1164*/ meltfptr[1163])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557]); MELT_LOCATION ("warmelt-normatch.melt:4809:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1164*/ meltfptr[1163])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1072__MGALTSTEP_STEPFLAGSET#3", NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1164*/ meltfptr[1163])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:4809:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1164*/ meltfptr[1163])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V741*/ meltfptr[740]); ((meltroutine_ptr_t) /*_.VALROUT___V1164*/ meltfptr[1163])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V741*/ meltfptr[740]); MELT_LOCATION ("warmelt-normatch.melt:4809:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1164*/ meltfptr[1163])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1072__MGALTSTEP_STEPFLAGSET#5", NULL != ( /*_.CLASS_LOCATED__V21*/ meltfptr[20])); ((meltroutine_ptr_t) /*_.VALROUT___V1164*/ meltfptr[1163])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-normatch.melt:4809:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1164*/ meltfptr[1163]); /*putclosurout#84 */ melt_assertmsg ("putclosrout#84 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1165*/ meltfptr[1164])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#84 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1164*/ meltfptr[1163])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1165*/ meltfptr[1164])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1164*/ meltfptr[1163]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1165*/ meltfptr[1164]); MELT_LOCATION ("warmelt-normatch.melt:4861:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1166*/ meltfptr[1165])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1074__MGALTSTEP_STEPFLAGOPER#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1166*/ meltfptr[1165])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:4861:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1166*/ meltfptr[1165])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V819*/ meltfptr[818]); ((meltroutine_ptr_t) /*_.VALROUT___V1166*/ meltfptr[1165])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818]); MELT_LOCATION ("warmelt-normatch.melt:4861:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1166*/ meltfptr[1165])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V558*/ meltfptr[557]); ((meltroutine_ptr_t) /*_.VALROUT___V1166*/ meltfptr[1165])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557]); MELT_LOCATION ("warmelt-normatch.melt:4861:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1166*/ meltfptr[1165])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1074__MGALTSTEP_STEPFLAGOPER#3", NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1166*/ meltfptr[1165])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:4861:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1166*/ meltfptr[1165])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V741*/ meltfptr[740]); ((meltroutine_ptr_t) /*_.VALROUT___V1166*/ meltfptr[1165])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V741*/ meltfptr[740]); MELT_LOCATION ("warmelt-normatch.melt:4861:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1166*/ meltfptr[1165])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1074__MGALTSTEP_STEPFLAGOPER#5", NULL != ( /*_.CLASS_LOCATED__V21*/ meltfptr[20])); ((meltroutine_ptr_t) /*_.VALROUT___V1166*/ meltfptr[1165])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-normatch.melt:4861:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1166*/ meltfptr[1165])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V789*/ meltfptr[788]); ((meltroutine_ptr_t) /*_.VALROUT___V1166*/ meltfptr[1165])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V789*/ meltfptr[788]); MELT_LOCATION ("warmelt-normatch.melt:4861:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1166*/ meltfptr[1165]); /*putclosurout#85 */ melt_assertmsg ("putclosrout#85 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1167*/ meltfptr[1166])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#85 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1166*/ meltfptr[1165])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1167*/ meltfptr[1166])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1166*/ meltfptr[1165]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1167*/ meltfptr[1166]); MELT_LOCATION ("warmelt-normatch.melt:4956:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1168*/ meltfptr[1167])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1076__TRANSLATE_MATCHCASE#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1168*/ meltfptr[1167])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:4956:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1168*/ meltfptr[1167])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V673*/ meltfptr[672]); ((meltroutine_ptr_t) /*_.VALROUT___V1168*/ meltfptr[1167])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V673*/ meltfptr[672]); MELT_LOCATION ("warmelt-normatch.melt:4956:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1168*/ meltfptr[1167])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V627*/ meltfptr[626]); ((meltroutine_ptr_t) /*_.VALROUT___V1168*/ meltfptr[1167])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V627*/ meltfptr[626]); MELT_LOCATION ("warmelt-normatch.melt:4956:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1168*/ meltfptr[1167])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1076__TRANSLATE_MATCHCASE#3", NULL != ( /*_.CLASS_SOURCE_MATCH_CASE__V72*/ meltfptr[71])); ((meltroutine_ptr_t) /*_.VALROUT___V1168*/ meltfptr[1167])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_SOURCE_MATCH_CASE__V72*/ meltfptr[71]); MELT_LOCATION ("warmelt-normatch.melt:4956:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1168*/ meltfptr[1167])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1076__TRANSLATE_MATCHCASE#4", NULL != ( /*_.DISCR_MAP_OBJECTS__V33*/ meltfptr[32])); ((meltroutine_ptr_t) /*_.VALROUT___V1168*/ meltfptr[1167])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V33*/ meltfptr[32]); MELT_LOCATION ("warmelt-normatch.melt:4956:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1168*/ meltfptr[1167])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1076__TRANSLATE_MATCHCASE#5", NULL != ( /*_.FRESH_ENV__V60*/ meltfptr[59])); ((meltroutine_ptr_t) /*_.VALROUT___V1168*/ meltfptr[1167])->tabval[5] = (melt_ptr_t) ( /*_.FRESH_ENV__V60*/ meltfptr[59]); MELT_LOCATION ("warmelt-normatch.melt:4956:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1168*/ meltfptr[1167])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1076__TRANSLATE_MATCHCASE#6", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V42*/ meltfptr[41])); ((meltroutine_ptr_t) /*_.VALROUT___V1168*/ meltfptr[1167])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V42*/ meltfptr[41]); MELT_LOCATION ("warmelt-normatch.melt:4956:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1168*/ meltfptr[1167])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1076__TRANSLATE_MATCHCASE#7", NULL != ( /*_.CLASS_ENVIRONMENT__V69*/ meltfptr[68])); ((meltroutine_ptr_t) /*_.VALROUT___V1168*/ meltfptr[1167])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V69*/ meltfptr[68]); MELT_LOCATION ("warmelt-normatch.melt:4956:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1168*/ meltfptr[1167])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1106*/ meltfptr[1105]); ((meltroutine_ptr_t) /*_.VALROUT___V1168*/ meltfptr[1167])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V1106*/ meltfptr[1105]); MELT_LOCATION ("warmelt-normatch.melt:4956:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1168*/ meltfptr[1167])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1076__TRANSLATE_MATCHCASE#9", NULL != ( /*_.CLASS_SYMBOL__V34*/ meltfptr[33])); ((meltroutine_ptr_t) /*_.VALROUT___V1168*/ meltfptr[1167])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V34*/ meltfptr[33]); MELT_LOCATION ("warmelt-normatch.melt:4956:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1168*/ meltfptr[1167])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V695*/ meltfptr[694]); ((meltroutine_ptr_t) /*_.VALROUT___V1168*/ meltfptr[1167])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); MELT_LOCATION ("warmelt-normatch.melt:4956:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1168*/ meltfptr[1167])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V723*/ meltfptr[722]); ((meltroutine_ptr_t) /*_.VALROUT___V1168*/ meltfptr[1167])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V723*/ meltfptr[722]); MELT_LOCATION ("warmelt-normatch.melt:4956:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1168*/ meltfptr[1167])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1076__TRANSLATE_MATCHCASE#12", NULL != ( /*_.DISCR_INTEGER__V78*/ meltfptr[77])); ((meltroutine_ptr_t) /*_.VALROUT___V1168*/ meltfptr[1167])->tabval[12] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V78*/ meltfptr[77]); MELT_LOCATION ("warmelt-normatch.melt:4956:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1168*/ meltfptr[1167])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1076__TRANSLATE_MATCHCASE#13", NULL != ( /*_.PUT_ENV__V61*/ meltfptr[60])); ((meltroutine_ptr_t) /*_.VALROUT___V1168*/ meltfptr[1167])->tabval[13] = (melt_ptr_t) ( /*_.PUT_ENV__V61*/ meltfptr[60]); MELT_LOCATION ("warmelt-normatch.melt:4956:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1168*/ meltfptr[1167])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1076__TRANSLATE_MATCHCASE#14", NULL != ( /*_.NORMALIZE_TUPLE__V31*/ meltfptr[30])); ((meltroutine_ptr_t) /*_.VALROUT___V1168*/ meltfptr[1167])->tabval[14] = (melt_ptr_t) ( /*_.NORMALIZE_TUPLE__V31*/ meltfptr[30]); MELT_LOCATION ("warmelt-normatch.melt:4956:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1168*/ meltfptr[1167])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1076__TRANSLATE_MATCHCASE#15", NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1168*/ meltfptr[1167])->tabval[15] = (melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-normatch.melt:4956:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1168*/ meltfptr[1167])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V841*/ meltfptr[840]); ((meltroutine_ptr_t) /*_.VALROUT___V1168*/ meltfptr[1167])->tabval[16] = (melt_ptr_t) ( /*_.VALDATA___V841*/ meltfptr[840]); MELT_LOCATION ("warmelt-normatch.melt:4956:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1168*/ meltfptr[1167])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1076__TRANSLATE_MATCHCASE#17", NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1168*/ meltfptr[1167])->tabval[17] = (melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normatch.melt:4956:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1168*/ meltfptr[1167])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1076__TRANSLATE_MATCHCASE#18", NULL != ( /*_.CLASS_NREP_SYMOCC__V46*/ meltfptr[45])); ((meltroutine_ptr_t) /*_.VALROUT___V1168*/ meltfptr[1167])->tabval[18] = (melt_ptr_t) ( /*_.CLASS_NREP_SYMOCC__V46*/ meltfptr[45]); MELT_LOCATION ("warmelt-normatch.melt:4956:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1168*/ meltfptr[1167])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1076__TRANSLATE_MATCHCASE#19", NULL != ( /*_.LIST_TO_MULTIPLE__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1168*/ meltfptr[1167])->tabval[19] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-normatch.melt:4956:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1168*/ meltfptr[1167])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1076__TRANSLATE_MATCHCASE#20", NULL != ( /*_.DISCR_MULTIPLE__V45*/ meltfptr[44])); ((meltroutine_ptr_t) /*_.VALROUT___V1168*/ meltfptr[1167])->tabval[20] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V45*/ meltfptr[44]); MELT_LOCATION ("warmelt-normatch.melt:4956:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1168*/ meltfptr[1167])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1076__TRANSLATE_MATCHCASE#21", NULL != ( /*_.COMPARE_NAMED_ALPHA__V79*/ meltfptr[78])); ((meltroutine_ptr_t) /*_.VALROUT___V1168*/ meltfptr[1167])->tabval[21] = (melt_ptr_t) ( /*_.COMPARE_NAMED_ALPHA__V79*/ meltfptr[78]); MELT_LOCATION ("warmelt-normatch.melt:4956:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1168*/ meltfptr[1167])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1076__TRANSLATE_MATCHCASE#22", NULL != ( /*_.CLASS_NREP_SYMOCC__V46*/ meltfptr[45])); ((meltroutine_ptr_t) /*_.VALROUT___V1168*/ meltfptr[1167])->tabval[22] = (melt_ptr_t) ( /*_.CLASS_NREP_SYMOCC__V46*/ meltfptr[45]); MELT_LOCATION ("warmelt-normatch.melt:5041:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1169*/ meltfptr[1168])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1080__LAMBDA_#0", NULL != ( /*_.COMPARE_NAMED_ALPHA__V79*/ meltfptr[78])); ((meltroutine_ptr_t) /*_.VALROUT___V1169*/ meltfptr[1168])->tabval[0] = (melt_ptr_t) ( /*_.COMPARE_NAMED_ALPHA__V79*/ meltfptr[78]); MELT_LOCATION ("warmelt-normatch.melt:5041:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1169*/ meltfptr[1168])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1080__LAMBDA_#1", NULL != ( /*_.CLASS_NREP_SYMOCC__V46*/ meltfptr[45])); ((meltroutine_ptr_t) /*_.VALROUT___V1169*/ meltfptr[1168])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_SYMOCC__V46*/ meltfptr[45]); MELT_LOCATION ("warmelt-normatch.melt:5041:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1169*/ meltfptr[1168]); MELT_LOCATION ("warmelt-normatch.melt:4956:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1168*/ meltfptr[1167])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1076__TRANSLATE_MATCHCASE#23", NULL != ( /*_.VALROUT___V1169*/ meltfptr[1168])); ((meltroutine_ptr_t) /*_.VALROUT___V1168*/ meltfptr[1167])->tabval[23] = (melt_ptr_t) ( /*_.VALROUT___V1169*/ meltfptr[1168]); MELT_LOCATION ("warmelt-normatch.melt:4956:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1168*/ meltfptr[1167])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1049*/ meltfptr[1048]); ((meltroutine_ptr_t) /*_.VALROUT___V1168*/ meltfptr[1167])->tabval[24] = (melt_ptr_t) ( /*_.VALDATA___V1049*/ meltfptr[1048]); MELT_LOCATION ("warmelt-normatch.melt:4956:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1168*/ meltfptr[1167]); /*putclosurout#86 */ melt_assertmsg ("putclosrout#86 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1170*/ meltfptr[1169])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#86 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1168*/ meltfptr[1167])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1170*/ meltfptr[1169])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1168*/ meltfptr[1167]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1170*/ meltfptr[1169]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1171*/ meltfptr[1170])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1171*/ meltfptr[1170])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1171*/ meltfptr[1170]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1172*/ meltfptr[1171]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1171*/ meltfptr[1170]); melt_dbgtrace_written_object ( /*_.VALDATA___V1171*/ meltfptr[1170], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1173*/ meltfptr[1172])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1173*/ meltfptr[1172])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1173*/ meltfptr[1172]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1174*/ meltfptr[1173]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1173*/ meltfptr[1172]); melt_dbgtrace_written_object ( /*_.VALDATA___V1173*/ meltfptr[1172], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1175*/ meltfptr[1174])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1175*/ meltfptr[1174])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1175*/ meltfptr[1174]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1176*/ meltfptr[1175]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1175*/ meltfptr[1174]); melt_dbgtrace_written_object ( /*_.VALDATA___V1175*/ meltfptr[1174], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5068:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1177*/ meltfptr[1176])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1177*/ meltfptr[1176])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1177*/ meltfptr[1176]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1178*/ meltfptr[1177]); MELT_LOCATION ("warmelt-normatch.melt:5068:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1177*/ meltfptr[1176])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1177*/ meltfptr[1176])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1177*/ meltfptr[1176]))-> obj_vartab[4] = (melt_ptr_t) ( /*_.CLASS_NREP_TYPED_EXPRESSION__V37*/ meltfptr[36]); /*putupl#470 */ melt_assertmsg ("putupl #470 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1179*/ meltfptr[1178])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #470 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1179*/ meltfptr[1178])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1179*/ meltfptr[1178]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_TYPED_EXPRESSION__V37*/ meltfptr[36]), 5))), (0)))); /*putupl#471 */ melt_assertmsg ("putupl #471 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1179*/ meltfptr[1178])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #471 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1179*/ meltfptr[1178])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1179*/ meltfptr[1178]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_TYPED_EXPRESSION__V37*/ meltfptr[36]), 5))), (1)))); /*putupl#472 */ melt_assertmsg ("putupl #472 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1179*/ meltfptr[1178])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #472 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1179*/ meltfptr[1178])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1179*/ meltfptr[1178]))->tabval[2] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_TYPED_EXPRESSION__V37*/ meltfptr[36]), 5))), (2)))); /*putupl#473 */ melt_assertmsg ("putupl #473 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1179*/ meltfptr[1178])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #473 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1179*/ meltfptr[1178])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1179*/ meltfptr[1178]))->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NREP_TYPED_EXPRESSION__V37*/ meltfptr[36]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1179*/ meltfptr[1178]); MELT_LOCATION ("warmelt-normatch.melt:5068:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1177*/ meltfptr[1176])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1177*/ meltfptr[1176])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1177*/ meltfptr[1176]))-> obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1179*/ meltfptr[1178]); MELT_LOCATION ("warmelt-normatch.melt:5068:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1180*/ meltfptr[1179])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1181*/ meltfptr[1180]); MELT_LOCATION ("warmelt-normatch.melt:5068:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1180*/ meltfptr[1179])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1180*/ meltfptr[1179])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1180*/ meltfptr[1179]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1177*/ meltfptr[1176]); MELT_LOCATION ("warmelt-normatch.melt:5068:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1180*/ meltfptr[1179]); MELT_LOCATION ("warmelt-normatch.melt:5068:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1180*/ meltfptr[1179], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5068:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1182*/ meltfptr[1181])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1183*/ meltfptr[1182]); MELT_LOCATION ("warmelt-normatch.melt:5068:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1182*/ meltfptr[1181])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1182*/ meltfptr[1181])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1182*/ meltfptr[1181]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1177*/ meltfptr[1176]); MELT_LOCATION ("warmelt-normatch.melt:5068:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1182*/ meltfptr[1181]); MELT_LOCATION ("warmelt-normatch.melt:5068:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1182*/ meltfptr[1181], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5068:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1184*/ meltfptr[1183])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1185*/ meltfptr[1184]); MELT_LOCATION ("warmelt-normatch.melt:5068:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1184*/ meltfptr[1183])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1184*/ meltfptr[1183])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1184*/ meltfptr[1183]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1177*/ meltfptr[1176]); MELT_LOCATION ("warmelt-normatch.melt:5068:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1184*/ meltfptr[1183]); MELT_LOCATION ("warmelt-normatch.melt:5068:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1184*/ meltfptr[1183], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5068:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1186*/ meltfptr[1185])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1187*/ meltfptr[1186]); MELT_LOCATION ("warmelt-normatch.melt:5068:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1186*/ meltfptr[1185])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1186*/ meltfptr[1185])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1186*/ meltfptr[1185]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1177*/ meltfptr[1176]); MELT_LOCATION ("warmelt-normatch.melt:5068:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1186*/ meltfptr[1185]); MELT_LOCATION ("warmelt-normatch.melt:5068:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1186*/ meltfptr[1185], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5068:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1188*/ meltfptr[1187])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1189*/ meltfptr[1188]); MELT_LOCATION ("warmelt-normatch.melt:5068:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1188*/ meltfptr[1187])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1188*/ meltfptr[1187])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1188*/ meltfptr[1187]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1177*/ meltfptr[1176]); MELT_LOCATION ("warmelt-normatch.melt:5068:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1188*/ meltfptr[1187]); MELT_LOCATION ("warmelt-normatch.melt:5068:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1188*/ meltfptr[1187], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5068:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1190*/ meltfptr[1189])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1191*/ meltfptr[1190]); MELT_LOCATION ("warmelt-normatch.melt:5068:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1190*/ meltfptr[1189])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1190*/ meltfptr[1189])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1190*/ meltfptr[1189]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1177*/ meltfptr[1176]); MELT_LOCATION ("warmelt-normatch.melt:5068:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1190*/ meltfptr[1189]); MELT_LOCATION ("warmelt-normatch.melt:5068:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1190*/ meltfptr[1189], "new static instance"); /*putupl#474 */ melt_assertmsg ("putupl #474 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1192*/ meltfptr[1191])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #474 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1192*/ meltfptr[1191])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1192*/ meltfptr[1191]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_TYPED_EXPRESSION__V37*/ meltfptr[36]), 6))), (0)))); /*putupl#475 */ melt_assertmsg ("putupl #475 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1192*/ meltfptr[1191])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #475 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1192*/ meltfptr[1191])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1192*/ meltfptr[1191]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_TYPED_EXPRESSION__V37*/ meltfptr[36]), 6))), (1)))); /*putupl#476 */ melt_assertmsg ("putupl #476 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1192*/ meltfptr[1191])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #476 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1192*/ meltfptr[1191])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1192*/ meltfptr[1191]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1180*/ meltfptr[1179]); /*putupl#477 */ melt_assertmsg ("putupl #477 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1192*/ meltfptr[1191])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #477 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1192*/ meltfptr[1191])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1192*/ meltfptr[1191]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1182*/ meltfptr[1181]); /*putupl#478 */ melt_assertmsg ("putupl #478 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1192*/ meltfptr[1191])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #478 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1192*/ meltfptr[1191])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1192*/ meltfptr[1191]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V1184*/ meltfptr[1183]); /*putupl#479 */ melt_assertmsg ("putupl #479 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1192*/ meltfptr[1191])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #479 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1192*/ meltfptr[1191])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1192*/ meltfptr[1191]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1186*/ meltfptr[1185]); /*putupl#480 */ melt_assertmsg ("putupl #480 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1192*/ meltfptr[1191])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #480 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1192*/ meltfptr[1191])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1192*/ meltfptr[1191]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1188*/ meltfptr[1187]); /*putupl#481 */ melt_assertmsg ("putupl #481 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1192*/ meltfptr[1191])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #481 checkoff", (7 >= 0 && 7 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1192*/ meltfptr[1191])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1192*/ meltfptr[1191]))->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V1190*/ meltfptr[1189]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1192*/ meltfptr[1191]); MELT_LOCATION ("warmelt-normatch.melt:5068:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1177*/ meltfptr[1176])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1177*/ meltfptr[1176])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1177*/ meltfptr[1176]))-> obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1192*/ meltfptr[1191]); MELT_LOCATION ("warmelt-normatch.melt:5068:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1177*/ meltfptr[1176]); MELT_LOCATION ("warmelt-normatch.melt:5068:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1177*/ meltfptr[1176], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1193*/ meltfptr[1192])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1194*/ meltfptr[1193]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1193*/ meltfptr[1192]); melt_dbgtrace_written_object ( /*_.VALDATA___V1193*/ meltfptr[1192], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1195*/ meltfptr[1194])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1196*/ meltfptr[1195]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1195*/ meltfptr[1194]); melt_dbgtrace_written_object ( /*_.VALDATA___V1195*/ meltfptr[1194], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1197*/ meltfptr[1196])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1197*/ meltfptr[1196])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1197*/ meltfptr[1196]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1198*/ meltfptr[1197]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1197*/ meltfptr[1196]); melt_dbgtrace_written_object ( /*_.VALDATA___V1197*/ meltfptr[1196], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1199*/ meltfptr[1198])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1199*/ meltfptr[1198])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1199*/ meltfptr[1198]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1200*/ meltfptr[1199]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1199*/ meltfptr[1198]); melt_dbgtrace_written_object ( /*_.VALDATA___V1199*/ meltfptr[1198], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1201*/ meltfptr[1200])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1201*/ meltfptr[1200])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1201*/ meltfptr[1200]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1202*/ meltfptr[1201]); #undef meltfram__ } /*end of meltmod__warmelt_normatch__initialmeltchunk_23 */ void meltmod__warmelt_normatch__initialmeltchunk_24 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*touch:VALUEDATA_*/ meltgc_touch ( /*_.VALDATA___V1201*/ meltfptr[1200]); melt_dbgtrace_written_object ( /*_.VALDATA___V1201*/ meltfptr[1200], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1203*/ meltfptr[1202])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1203*/ meltfptr[1202])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1203*/ meltfptr[1202]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1204*/ meltfptr[1203]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1203*/ meltfptr[1202]); melt_dbgtrace_written_object ( /*_.VALDATA___V1203*/ meltfptr[1202], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1205*/ meltfptr[1204])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1206*/ meltfptr[1205]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1205*/ meltfptr[1204]); melt_dbgtrace_written_object ( /*_.VALDATA___V1205*/ meltfptr[1204], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5086:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1207*/ meltfptr[1206])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1207*/ meltfptr[1206])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1207*/ meltfptr[1206]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1208*/ meltfptr[1207]); MELT_LOCATION ("warmelt-normatch.melt:5086:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1207*/ meltfptr[1206])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1207*/ meltfptr[1206])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1207*/ meltfptr[1206]))-> obj_vartab[4] = (melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]); /*putupl#482 */ melt_assertmsg ("putupl #482 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1209*/ meltfptr[1208])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #482 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1209*/ meltfptr[1208])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1209*/ meltfptr[1208]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 5))), (0)))); /*putupl#483 */ melt_assertmsg ("putupl #483 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1209*/ meltfptr[1208])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #483 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1209*/ meltfptr[1208])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1209*/ meltfptr[1208]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 5))), (1)))); /*putupl#484 */ melt_assertmsg ("putupl #484 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1209*/ meltfptr[1208])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #484 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1209*/ meltfptr[1208])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1209*/ meltfptr[1208]))->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1209*/ meltfptr[1208]); MELT_LOCATION ("warmelt-normatch.melt:5086:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1207*/ meltfptr[1206])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1207*/ meltfptr[1206])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1207*/ meltfptr[1206]))-> obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1209*/ meltfptr[1208]); MELT_LOCATION ("warmelt-normatch.melt:5086:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1210*/ meltfptr[1209])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1211*/ meltfptr[1210]); MELT_LOCATION ("warmelt-normatch.melt:5086:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1210*/ meltfptr[1209])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1210*/ meltfptr[1209])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1210*/ meltfptr[1209]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1207*/ meltfptr[1206]); MELT_LOCATION ("warmelt-normatch.melt:5086:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1210*/ meltfptr[1209]); MELT_LOCATION ("warmelt-normatch.melt:5086:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1210*/ meltfptr[1209], "new static instance"); /*putupl#485 */ melt_assertmsg ("putupl #485 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1212*/ meltfptr[1211])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #485 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1212*/ meltfptr[1211])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1212*/ meltfptr[1211]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 6))), (0)))); /*putupl#486 */ melt_assertmsg ("putupl #486 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1212*/ meltfptr[1211])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #486 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1212*/ meltfptr[1211])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1212*/ meltfptr[1211]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1210*/ meltfptr[1209]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1212*/ meltfptr[1211]); MELT_LOCATION ("warmelt-normatch.melt:5086:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1207*/ meltfptr[1206])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1207*/ meltfptr[1206])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1207*/ meltfptr[1206]))-> obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1212*/ meltfptr[1211]); MELT_LOCATION ("warmelt-normatch.melt:5086:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1207*/ meltfptr[1206]); MELT_LOCATION ("warmelt-normatch.melt:5086:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1207*/ meltfptr[1206], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1213*/ meltfptr[1212])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1213*/ meltfptr[1212])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1213*/ meltfptr[1212]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1214*/ meltfptr[1213]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1213*/ meltfptr[1212]); melt_dbgtrace_written_object ( /*_.VALDATA___V1213*/ meltfptr[1212], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1215*/ meltfptr[1214])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1215*/ meltfptr[1214])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1215*/ meltfptr[1214]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1216*/ meltfptr[1215]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1215*/ meltfptr[1214]); melt_dbgtrace_written_object ( /*_.VALDATA___V1215*/ meltfptr[1214], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5093:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1217*/ meltfptr[1216])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1217*/ meltfptr[1216])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1217*/ meltfptr[1216]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1218*/ meltfptr[1217]); MELT_LOCATION ("warmelt-normatch.melt:5093:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1217*/ meltfptr[1216])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1217*/ meltfptr[1216])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1217*/ meltfptr[1216]))-> obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V1207*/ meltfptr[1206]); /*putupl#487 */ melt_assertmsg ("putupl #487 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1219*/ meltfptr[1218])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #487 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1219*/ meltfptr[1218])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1219*/ meltfptr[1218]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 5))), (0)))); /*putupl#488 */ melt_assertmsg ("putupl #488 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1219*/ meltfptr[1218])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #488 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1219*/ meltfptr[1218])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1219*/ meltfptr[1218]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 5))), (1)))); /*putupl#489 */ melt_assertmsg ("putupl #489 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1219*/ meltfptr[1218])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #489 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1219*/ meltfptr[1218])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1219*/ meltfptr[1218]))->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]); /*putupl#490 */ melt_assertmsg ("putupl #490 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1219*/ meltfptr[1218])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #490 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1219*/ meltfptr[1218])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1219*/ meltfptr[1218]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1207*/ meltfptr[1206]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1219*/ meltfptr[1218]); MELT_LOCATION ("warmelt-normatch.melt:5093:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1217*/ meltfptr[1216])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1217*/ meltfptr[1216])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1217*/ meltfptr[1216]))-> obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1219*/ meltfptr[1218]); /*putupl#491 */ melt_assertmsg ("putupl #491 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1220*/ meltfptr[1219])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #491 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1220*/ meltfptr[1219])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1220*/ meltfptr[1219]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 6))), (0)))); /*putupl#492 */ melt_assertmsg ("putupl #492 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1220*/ meltfptr[1219])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #492 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1220*/ meltfptr[1219])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1220*/ meltfptr[1219]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1210*/ meltfptr[1209]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1220*/ meltfptr[1219]); MELT_LOCATION ("warmelt-normatch.melt:5093:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1217*/ meltfptr[1216])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1217*/ meltfptr[1216])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1217*/ meltfptr[1216]))-> obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1220*/ meltfptr[1219]); MELT_LOCATION ("warmelt-normatch.melt:5093:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1217*/ meltfptr[1216]); MELT_LOCATION ("warmelt-normatch.melt:5093:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1217*/ meltfptr[1216], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1221*/ meltfptr[1220])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1221*/ meltfptr[1220])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1221*/ meltfptr[1220]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1222*/ meltfptr[1221]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1221*/ meltfptr[1220]); melt_dbgtrace_written_object ( /*_.VALDATA___V1221*/ meltfptr[1220], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5097:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1223*/ meltfptr[1222])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1223*/ meltfptr[1222])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1223*/ meltfptr[1222]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1224*/ meltfptr[1223]); MELT_LOCATION ("warmelt-normatch.melt:5097:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1223*/ meltfptr[1222])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1223*/ meltfptr[1222])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1223*/ meltfptr[1222]))-> obj_vartab[4] = (melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]); /*putupl#493 */ melt_assertmsg ("putupl #493 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1225*/ meltfptr[1224])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #493 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1225*/ meltfptr[1224])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1225*/ meltfptr[1224]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 5))), (0)))); /*putupl#494 */ melt_assertmsg ("putupl #494 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1225*/ meltfptr[1224])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #494 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1225*/ meltfptr[1224])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1225*/ meltfptr[1224]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 5))), (1)))); /*putupl#495 */ melt_assertmsg ("putupl #495 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1225*/ meltfptr[1224])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #495 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1225*/ meltfptr[1224])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1225*/ meltfptr[1224]))->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1225*/ meltfptr[1224]); MELT_LOCATION ("warmelt-normatch.melt:5097:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1223*/ meltfptr[1222])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1223*/ meltfptr[1222])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1223*/ meltfptr[1222]))-> obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1225*/ meltfptr[1224]); MELT_LOCATION ("warmelt-normatch.melt:5097:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1226*/ meltfptr[1225])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1227*/ meltfptr[1226]); MELT_LOCATION ("warmelt-normatch.melt:5097:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1226*/ meltfptr[1225])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1226*/ meltfptr[1225])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1226*/ meltfptr[1225]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1223*/ meltfptr[1222]); MELT_LOCATION ("warmelt-normatch.melt:5097:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1226*/ meltfptr[1225]); MELT_LOCATION ("warmelt-normatch.melt:5097:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1226*/ meltfptr[1225], "new static instance"); /*putupl#496 */ melt_assertmsg ("putupl #496 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1228*/ meltfptr[1227])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #496 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1228*/ meltfptr[1227])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1228*/ meltfptr[1227]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 6))), (0)))); /*putupl#497 */ melt_assertmsg ("putupl #497 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1228*/ meltfptr[1227])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #497 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1228*/ meltfptr[1227])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1228*/ meltfptr[1227]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1226*/ meltfptr[1225]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1228*/ meltfptr[1227]); MELT_LOCATION ("warmelt-normatch.melt:5097:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1223*/ meltfptr[1222])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1223*/ meltfptr[1222])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1223*/ meltfptr[1222]))-> obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1228*/ meltfptr[1227]); MELT_LOCATION ("warmelt-normatch.melt:5097:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1223*/ meltfptr[1222]); MELT_LOCATION ("warmelt-normatch.melt:5097:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1223*/ meltfptr[1222], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1229*/ meltfptr[1228])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1229*/ meltfptr[1228])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1229*/ meltfptr[1228]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1230*/ meltfptr[1229]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1229*/ meltfptr[1228]); melt_dbgtrace_written_object ( /*_.VALDATA___V1229*/ meltfptr[1228], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1231*/ meltfptr[1230])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1231*/ meltfptr[1230])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1231*/ meltfptr[1230]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1232*/ meltfptr[1231]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1231*/ meltfptr[1230]); melt_dbgtrace_written_object ( /*_.VALDATA___V1231*/ meltfptr[1230], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5103:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1233*/ meltfptr[1232])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1234*/ meltfptr[1233]); MELT_LOCATION ("warmelt-normatch.melt:5103:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1233*/ meltfptr[1232])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1233*/ meltfptr[1232])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1233*/ meltfptr[1232]))-> obj_vartab[4] = (melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]); /*putupl#498 */ melt_assertmsg ("putupl #498 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1235*/ meltfptr[1234])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #498 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1235*/ meltfptr[1234])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1235*/ meltfptr[1234]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 5))), (0)))); /*putupl#499 */ melt_assertmsg ("putupl #499 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1235*/ meltfptr[1234])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #499 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1235*/ meltfptr[1234])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1235*/ meltfptr[1234]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 5))), (1)))); /*putupl#500 */ melt_assertmsg ("putupl #500 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1235*/ meltfptr[1234])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #500 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1235*/ meltfptr[1234])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1235*/ meltfptr[1234]))->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1235*/ meltfptr[1234]); MELT_LOCATION ("warmelt-normatch.melt:5103:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1233*/ meltfptr[1232])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1233*/ meltfptr[1232])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1233*/ meltfptr[1232]))-> obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1235*/ meltfptr[1234]); MELT_LOCATION ("warmelt-normatch.melt:5103:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1236*/ meltfptr[1235])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1237*/ meltfptr[1236]); MELT_LOCATION ("warmelt-normatch.melt:5103:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1236*/ meltfptr[1235])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1236*/ meltfptr[1235])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1236*/ meltfptr[1235]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1233*/ meltfptr[1232]); MELT_LOCATION ("warmelt-normatch.melt:5103:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1236*/ meltfptr[1235]); MELT_LOCATION ("warmelt-normatch.melt:5103:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1236*/ meltfptr[1235], "new static instance"); /*putupl#501 */ melt_assertmsg ("putupl #501 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1238*/ meltfptr[1237])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #501 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1238*/ meltfptr[1237])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1238*/ meltfptr[1237]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 6))), (0)))); /*putupl#502 */ melt_assertmsg ("putupl #502 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1238*/ meltfptr[1237])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #502 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1238*/ meltfptr[1237])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1238*/ meltfptr[1237]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1236*/ meltfptr[1235]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1238*/ meltfptr[1237]); MELT_LOCATION ("warmelt-normatch.melt:5103:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1233*/ meltfptr[1232])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1233*/ meltfptr[1232])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1233*/ meltfptr[1232]))-> obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1238*/ meltfptr[1237]); MELT_LOCATION ("warmelt-normatch.melt:5103:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1233*/ meltfptr[1232]); MELT_LOCATION ("warmelt-normatch.melt:5103:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1233*/ meltfptr[1232], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1239*/ meltfptr[1238])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1239*/ meltfptr[1238])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1239*/ meltfptr[1238]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1240*/ meltfptr[1239]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1239*/ meltfptr[1238]); melt_dbgtrace_written_object ( /*_.VALDATA___V1239*/ meltfptr[1238], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1241*/ meltfptr[1240])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1241*/ meltfptr[1240])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1241*/ meltfptr[1240]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1242*/ meltfptr[1241]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1241*/ meltfptr[1240]); melt_dbgtrace_written_object ( /*_.VALDATA___V1241*/ meltfptr[1240], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5109:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1243*/ meltfptr[1242])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1243*/ meltfptr[1242])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1243*/ meltfptr[1242]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1244*/ meltfptr[1243]); MELT_LOCATION ("warmelt-normatch.melt:5109:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1243*/ meltfptr[1242])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1243*/ meltfptr[1242])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1243*/ meltfptr[1242]))-> obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V1233*/ meltfptr[1232]); /*putupl#503 */ melt_assertmsg ("putupl #503 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1245*/ meltfptr[1244])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #503 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1245*/ meltfptr[1244])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1245*/ meltfptr[1244]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 5))), (0)))); /*putupl#504 */ melt_assertmsg ("putupl #504 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1245*/ meltfptr[1244])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #504 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1245*/ meltfptr[1244])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1245*/ meltfptr[1244]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 5))), (1)))); /*putupl#505 */ melt_assertmsg ("putupl #505 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1245*/ meltfptr[1244])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #505 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1245*/ meltfptr[1244])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1245*/ meltfptr[1244]))->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]); /*putupl#506 */ melt_assertmsg ("putupl #506 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1245*/ meltfptr[1244])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #506 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1245*/ meltfptr[1244])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1245*/ meltfptr[1244]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1233*/ meltfptr[1232]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1245*/ meltfptr[1244]); MELT_LOCATION ("warmelt-normatch.melt:5109:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1243*/ meltfptr[1242])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1243*/ meltfptr[1242])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1243*/ meltfptr[1242]))-> obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1245*/ meltfptr[1244]); /*putupl#507 */ melt_assertmsg ("putupl #507 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1246*/ meltfptr[1245])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #507 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1246*/ meltfptr[1245])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1246*/ meltfptr[1245]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 6))), (0)))); /*putupl#508 */ melt_assertmsg ("putupl #508 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1246*/ meltfptr[1245])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #508 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1246*/ meltfptr[1245])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1246*/ meltfptr[1245]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1236*/ meltfptr[1235]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1246*/ meltfptr[1245]); MELT_LOCATION ("warmelt-normatch.melt:5109:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1243*/ meltfptr[1242])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1243*/ meltfptr[1242])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1243*/ meltfptr[1242]))-> obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1246*/ meltfptr[1245]); MELT_LOCATION ("warmelt-normatch.melt:5109:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1243*/ meltfptr[1242]); MELT_LOCATION ("warmelt-normatch.melt:5109:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1243*/ meltfptr[1242], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1247*/ meltfptr[1246])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1247*/ meltfptr[1246])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1247*/ meltfptr[1246]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1248*/ meltfptr[1247]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1247*/ meltfptr[1246]); melt_dbgtrace_written_object ( /*_.VALDATA___V1247*/ meltfptr[1246], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5116:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1249*/ meltfptr[1248])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1249*/ meltfptr[1248])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1249*/ meltfptr[1248]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1250*/ meltfptr[1249]); MELT_LOCATION ("warmelt-normatch.melt:5116:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1249*/ meltfptr[1248])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1249*/ meltfptr[1248])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1249*/ meltfptr[1248]))-> obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V1233*/ meltfptr[1232]); /*putupl#509 */ melt_assertmsg ("putupl #509 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1251*/ meltfptr[1250])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #509 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1251*/ meltfptr[1250])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1251*/ meltfptr[1250]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 5))), (0)))); /*putupl#510 */ melt_assertmsg ("putupl #510 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1251*/ meltfptr[1250])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #510 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1251*/ meltfptr[1250])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1251*/ meltfptr[1250]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 5))), (1)))); /*putupl#511 */ melt_assertmsg ("putupl #511 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1251*/ meltfptr[1250])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #511 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1251*/ meltfptr[1250])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1251*/ meltfptr[1250]))->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]); /*putupl#512 */ melt_assertmsg ("putupl #512 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1251*/ meltfptr[1250])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #512 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1251*/ meltfptr[1250])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1251*/ meltfptr[1250]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1233*/ meltfptr[1232]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1251*/ meltfptr[1250]); MELT_LOCATION ("warmelt-normatch.melt:5116:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1249*/ meltfptr[1248])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1249*/ meltfptr[1248])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1249*/ meltfptr[1248]))-> obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1251*/ meltfptr[1250]); /*putupl#513 */ melt_assertmsg ("putupl #513 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1252*/ meltfptr[1251])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #513 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1252*/ meltfptr[1251])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1252*/ meltfptr[1251]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 6))), (0)))); /*putupl#514 */ melt_assertmsg ("putupl #514 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1252*/ meltfptr[1251])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #514 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1252*/ meltfptr[1251])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1252*/ meltfptr[1251]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1236*/ meltfptr[1235]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1252*/ meltfptr[1251]); MELT_LOCATION ("warmelt-normatch.melt:5116:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1249*/ meltfptr[1248])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1249*/ meltfptr[1248])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1249*/ meltfptr[1248]))-> obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1252*/ meltfptr[1251]); MELT_LOCATION ("warmelt-normatch.melt:5116:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1249*/ meltfptr[1248]); MELT_LOCATION ("warmelt-normatch.melt:5116:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1249*/ meltfptr[1248], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1253*/ meltfptr[1252])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1254*/ meltfptr[1253]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1253*/ meltfptr[1252]); melt_dbgtrace_written_object ( /*_.VALDATA___V1253*/ meltfptr[1252], "new static instance"); #undef meltfram__ } /*end of meltmod__warmelt_normatch__initialmeltchunk_24 */ void meltmod__warmelt_normatch__initialmeltchunk_25 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-normatch.melt:5123:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1255*/ meltfptr[1254])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1256*/ meltfptr[1255]); MELT_LOCATION ("warmelt-normatch.melt:5123:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1255*/ meltfptr[1254])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1255*/ meltfptr[1254])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1255*/ meltfptr[1254]))-> obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V1233*/ meltfptr[1232]); /*putupl#515 */ melt_assertmsg ("putupl #515 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1257*/ meltfptr[1256])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #515 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1257*/ meltfptr[1256])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1257*/ meltfptr[1256]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 5))), (0)))); /*putupl#516 */ melt_assertmsg ("putupl #516 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1257*/ meltfptr[1256])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #516 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1257*/ meltfptr[1256])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1257*/ meltfptr[1256]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 5))), (1)))); /*putupl#517 */ melt_assertmsg ("putupl #517 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1257*/ meltfptr[1256])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #517 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1257*/ meltfptr[1256])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1257*/ meltfptr[1256]))->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]); /*putupl#518 */ melt_assertmsg ("putupl #518 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1257*/ meltfptr[1256])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #518 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1257*/ meltfptr[1256])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1257*/ meltfptr[1256]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1233*/ meltfptr[1232]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1257*/ meltfptr[1256]); MELT_LOCATION ("warmelt-normatch.melt:5123:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1255*/ meltfptr[1254])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1255*/ meltfptr[1254])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1255*/ meltfptr[1254]))-> obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1257*/ meltfptr[1256]); /*putupl#519 */ melt_assertmsg ("putupl #519 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1258*/ meltfptr[1257])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #519 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1258*/ meltfptr[1257])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1258*/ meltfptr[1257]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 6))), (0)))); /*putupl#520 */ melt_assertmsg ("putupl #520 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1258*/ meltfptr[1257])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #520 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1258*/ meltfptr[1257])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1258*/ meltfptr[1257]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1236*/ meltfptr[1235]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1258*/ meltfptr[1257]); MELT_LOCATION ("warmelt-normatch.melt:5123:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1255*/ meltfptr[1254])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1255*/ meltfptr[1254])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1255*/ meltfptr[1254]))-> obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1258*/ meltfptr[1257]); MELT_LOCATION ("warmelt-normatch.melt:5123:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1255*/ meltfptr[1254]); MELT_LOCATION ("warmelt-normatch.melt:5123:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1255*/ meltfptr[1254], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1259*/ meltfptr[1258])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1260*/ meltfptr[1259]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1259*/ meltfptr[1258]); melt_dbgtrace_written_object ( /*_.VALDATA___V1259*/ meltfptr[1258], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5131:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1261*/ meltfptr[1260])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1262*/ meltfptr[1261]); MELT_LOCATION ("warmelt-normatch.melt:5131:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1261*/ meltfptr[1260])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1261*/ meltfptr[1260])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1261*/ meltfptr[1260]))-> obj_vartab[4] = (melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]); /*putupl#521 */ melt_assertmsg ("putupl #521 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1263*/ meltfptr[1262])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #521 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1263*/ meltfptr[1262])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1263*/ meltfptr[1262]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 5))), (0)))); /*putupl#522 */ melt_assertmsg ("putupl #522 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1263*/ meltfptr[1262])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #522 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1263*/ meltfptr[1262])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1263*/ meltfptr[1262]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 5))), (1)))); /*putupl#523 */ melt_assertmsg ("putupl #523 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1263*/ meltfptr[1262])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #523 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1263*/ meltfptr[1262])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1263*/ meltfptr[1262]))->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1263*/ meltfptr[1262]); MELT_LOCATION ("warmelt-normatch.melt:5131:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1261*/ meltfptr[1260])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1261*/ meltfptr[1260])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1261*/ meltfptr[1260]))-> obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1263*/ meltfptr[1262]); MELT_LOCATION ("warmelt-normatch.melt:5131:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1264*/ meltfptr[1263])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1264*/ meltfptr[1263])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1264*/ meltfptr[1263]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1265*/ meltfptr[1264]); MELT_LOCATION ("warmelt-normatch.melt:5131:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1264*/ meltfptr[1263])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1264*/ meltfptr[1263])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1264*/ meltfptr[1263]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1261*/ meltfptr[1260]); MELT_LOCATION ("warmelt-normatch.melt:5131:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1264*/ meltfptr[1263]); MELT_LOCATION ("warmelt-normatch.melt:5131:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1264*/ meltfptr[1263], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5131:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1266*/ meltfptr[1265])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1266*/ meltfptr[1265])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1266*/ meltfptr[1265]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1267*/ meltfptr[1266]); MELT_LOCATION ("warmelt-normatch.melt:5131:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1266*/ meltfptr[1265])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1266*/ meltfptr[1265])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1266*/ meltfptr[1265]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1261*/ meltfptr[1260]); MELT_LOCATION ("warmelt-normatch.melt:5131:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1266*/ meltfptr[1265]); MELT_LOCATION ("warmelt-normatch.melt:5131:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1266*/ meltfptr[1265], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5131:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1268*/ meltfptr[1267])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1268*/ meltfptr[1267])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1268*/ meltfptr[1267]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1269*/ meltfptr[1268]); MELT_LOCATION ("warmelt-normatch.melt:5131:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1268*/ meltfptr[1267])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1268*/ meltfptr[1267])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1268*/ meltfptr[1267]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1261*/ meltfptr[1260]); MELT_LOCATION ("warmelt-normatch.melt:5131:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1268*/ meltfptr[1267]); MELT_LOCATION ("warmelt-normatch.melt:5131:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1268*/ meltfptr[1267], "new static instance"); /*putupl#524 */ melt_assertmsg ("putupl #524 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1270*/ meltfptr[1269])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #524 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1270*/ meltfptr[1269])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1270*/ meltfptr[1269]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]), 6))), (0)))); /*putupl#525 */ melt_assertmsg ("putupl #525 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1270*/ meltfptr[1269])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #525 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1270*/ meltfptr[1269])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1270*/ meltfptr[1269]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1264*/ meltfptr[1263]); /*putupl#526 */ melt_assertmsg ("putupl #526 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1270*/ meltfptr[1269])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #526 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1270*/ meltfptr[1269])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1270*/ meltfptr[1269]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1266*/ meltfptr[1265]); /*putupl#527 */ melt_assertmsg ("putupl #527 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1270*/ meltfptr[1269])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #527 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1270*/ meltfptr[1269])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1270*/ meltfptr[1269]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1268*/ meltfptr[1267]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1270*/ meltfptr[1269]); MELT_LOCATION ("warmelt-normatch.melt:5131:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1261*/ meltfptr[1260])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1261*/ meltfptr[1260])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1261*/ meltfptr[1260]))-> obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1270*/ meltfptr[1269]); MELT_LOCATION ("warmelt-normatch.melt:5131:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1261*/ meltfptr[1260]); MELT_LOCATION ("warmelt-normatch.melt:5131:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1261*/ meltfptr[1260], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1271*/ meltfptr[1270])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1272*/ meltfptr[1271]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1271*/ meltfptr[1270]); melt_dbgtrace_written_object ( /*_.VALDATA___V1271*/ meltfptr[1270], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1273*/ meltfptr[1272])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1273*/ meltfptr[1272])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1273*/ meltfptr[1272]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1274*/ meltfptr[1273]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1273*/ meltfptr[1272]); melt_dbgtrace_written_object ( /*_.VALDATA___V1273*/ meltfptr[1272], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1275*/ meltfptr[1274])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1276*/ meltfptr[1275]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1275*/ meltfptr[1274]); melt_dbgtrace_written_object ( /*_.VALDATA___V1275*/ meltfptr[1274], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1277*/ meltfptr[1276])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1277*/ meltfptr[1276])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1277*/ meltfptr[1276]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1278*/ meltfptr[1277]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1277*/ meltfptr[1276]); melt_dbgtrace_written_object ( /*_.VALDATA___V1277*/ meltfptr[1276], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1280*/ meltfptr[1279]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278]))-> obj_vartab[4] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#528 */ melt_assertmsg ("putupl #528 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1281*/ meltfptr[1280])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #528 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1281*/ meltfptr[1280])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1281*/ meltfptr[1280]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1281*/ meltfptr[1280]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278]))-> obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1281*/ meltfptr[1280]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1282*/ meltfptr[1281])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1283*/ meltfptr[1282]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1282*/ meltfptr[1281])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1282*/ meltfptr[1281])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1282*/ meltfptr[1281]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1282*/ meltfptr[1281]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1282*/ meltfptr[1281], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1284*/ meltfptr[1283])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1285*/ meltfptr[1284]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1284*/ meltfptr[1283])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1284*/ meltfptr[1283])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1284*/ meltfptr[1283]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1284*/ meltfptr[1283]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1284*/ meltfptr[1283], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1286*/ meltfptr[1285])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1287*/ meltfptr[1286]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1286*/ meltfptr[1285])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1286*/ meltfptr[1285])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1286*/ meltfptr[1285]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1286*/ meltfptr[1285]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1286*/ meltfptr[1285], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1288*/ meltfptr[1287])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1289*/ meltfptr[1288]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1288*/ meltfptr[1287])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1288*/ meltfptr[1287])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1288*/ meltfptr[1287]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1288*/ meltfptr[1287]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1288*/ meltfptr[1287], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1290*/ meltfptr[1289])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1291*/ meltfptr[1290]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1290*/ meltfptr[1289])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1290*/ meltfptr[1289])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1290*/ meltfptr[1289]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1290*/ meltfptr[1289]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1290*/ meltfptr[1289], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1292*/ meltfptr[1291])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1292*/ meltfptr[1291])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1292*/ meltfptr[1291]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1293*/ meltfptr[1292]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1292*/ meltfptr[1291])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1292*/ meltfptr[1291])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1292*/ meltfptr[1291]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1292*/ meltfptr[1291]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1292*/ meltfptr[1291], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1294*/ meltfptr[1293])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1295*/ meltfptr[1294]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1294*/ meltfptr[1293])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1294*/ meltfptr[1293])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1294*/ meltfptr[1293]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1294*/ meltfptr[1293]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1294*/ meltfptr[1293], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1296*/ meltfptr[1295])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1297*/ meltfptr[1296]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1296*/ meltfptr[1295])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1296*/ meltfptr[1295])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1296*/ meltfptr[1295]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1296*/ meltfptr[1295]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1296*/ meltfptr[1295], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1298*/ meltfptr[1297])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1298*/ meltfptr[1297])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1298*/ meltfptr[1297]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1299*/ meltfptr[1298]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1298*/ meltfptr[1297])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1298*/ meltfptr[1297])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1298*/ meltfptr[1297]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1298*/ meltfptr[1297]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1298*/ meltfptr[1297], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1300*/ meltfptr[1299])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1301*/ meltfptr[1300]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1300*/ meltfptr[1299])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1300*/ meltfptr[1299])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1300*/ meltfptr[1299]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1300*/ meltfptr[1299]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1300*/ meltfptr[1299], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1302*/ meltfptr[1301])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1303*/ meltfptr[1302]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1302*/ meltfptr[1301])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1302*/ meltfptr[1301])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1302*/ meltfptr[1301]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1302*/ meltfptr[1301]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1302*/ meltfptr[1301], "new static instance"); /*putupl#529 */ melt_assertmsg ("putupl #529 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1304*/ meltfptr[1303])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #529 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1304*/ meltfptr[1303])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1304*/ meltfptr[1303]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V1282*/ meltfptr[1281]); /*putupl#530 */ melt_assertmsg ("putupl #530 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1304*/ meltfptr[1303])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #530 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1304*/ meltfptr[1303])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1304*/ meltfptr[1303]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1284*/ meltfptr[1283]); /*putupl#531 */ melt_assertmsg ("putupl #531 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1304*/ meltfptr[1303])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #531 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1304*/ meltfptr[1303])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1304*/ meltfptr[1303]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1286*/ meltfptr[1285]); /*putupl#532 */ melt_assertmsg ("putupl #532 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1304*/ meltfptr[1303])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #532 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1304*/ meltfptr[1303])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1304*/ meltfptr[1303]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1288*/ meltfptr[1287]); /*putupl#533 */ melt_assertmsg ("putupl #533 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1304*/ meltfptr[1303])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #533 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1304*/ meltfptr[1303])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1304*/ meltfptr[1303]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V1290*/ meltfptr[1289]); /*putupl#534 */ melt_assertmsg ("putupl #534 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1304*/ meltfptr[1303])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #534 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1304*/ meltfptr[1303])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1304*/ meltfptr[1303]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1292*/ meltfptr[1291]); /*putupl#535 */ melt_assertmsg ("putupl #535 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1304*/ meltfptr[1303])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #535 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1304*/ meltfptr[1303])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1304*/ meltfptr[1303]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1294*/ meltfptr[1293]); /*putupl#536 */ melt_assertmsg ("putupl #536 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1304*/ meltfptr[1303])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #536 checkoff", (7 >= 0 && 7 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1304*/ meltfptr[1303])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1304*/ meltfptr[1303]))->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V1296*/ meltfptr[1295]); /*putupl#537 */ melt_assertmsg ("putupl #537 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1304*/ meltfptr[1303])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #537 checkoff", (8 >= 0 && 8 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1304*/ meltfptr[1303])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1304*/ meltfptr[1303]))->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V1298*/ meltfptr[1297]); /*putupl#538 */ melt_assertmsg ("putupl #538 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1304*/ meltfptr[1303])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #538 checkoff", (9 >= 0 && 9 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1304*/ meltfptr[1303])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1304*/ meltfptr[1303]))->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V1300*/ meltfptr[1299]); /*putupl#539 */ melt_assertmsg ("putupl #539 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1304*/ meltfptr[1303])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #539 checkoff", (10 >= 0 && 10 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1304*/ meltfptr[1303])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1304*/ meltfptr[1303]))->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V1302*/ meltfptr[1301]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1304*/ meltfptr[1303]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278]))-> obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1304*/ meltfptr[1303]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1279*/ meltfptr[1278]); MELT_LOCATION ("warmelt-normatch.melt:5142:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1279*/ meltfptr[1278], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1305*/ meltfptr[1304])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1306*/ meltfptr[1305]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1305*/ meltfptr[1304]); melt_dbgtrace_written_object ( /*_.VALDATA___V1305*/ meltfptr[1304], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1307*/ meltfptr[1306])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1307*/ meltfptr[1306])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1307*/ meltfptr[1306]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1308*/ meltfptr[1307]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1307*/ meltfptr[1306]); melt_dbgtrace_written_object ( /*_.VALDATA___V1307*/ meltfptr[1306], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1309*/ meltfptr[1308])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1309*/ meltfptr[1308])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1309*/ meltfptr[1308]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1310*/ meltfptr[1309]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1309*/ meltfptr[1308]); #undef meltfram__ } /*end of meltmod__warmelt_normatch__initialmeltchunk_25 */ void meltmod__warmelt_normatch__initialmeltchunk_26 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; melt_dbgtrace_written_object ( /*_.VALDATA___V1309*/ meltfptr[1308], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1311*/ meltfptr[1310])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1311*/ meltfptr[1310])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1311*/ meltfptr[1310]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1312*/ meltfptr[1311]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1311*/ meltfptr[1310]); melt_dbgtrace_written_object ( /*_.VALDATA___V1311*/ meltfptr[1310], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1313*/ meltfptr[1312])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1313*/ meltfptr[1312])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1313*/ meltfptr[1312]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1314*/ meltfptr[1313]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1313*/ meltfptr[1312]); melt_dbgtrace_written_object ( /*_.VALDATA___V1313*/ meltfptr[1312], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1315*/ meltfptr[1314])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1315*/ meltfptr[1314])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1315*/ meltfptr[1314]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1316*/ meltfptr[1315]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1315*/ meltfptr[1314]); melt_dbgtrace_written_object ( /*_.VALDATA___V1315*/ meltfptr[1314], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1317*/ meltfptr[1316])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1318*/ meltfptr[1317]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1317*/ meltfptr[1316]); melt_dbgtrace_written_object ( /*_.VALDATA___V1317*/ meltfptr[1316], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1319*/ meltfptr[1318])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1319*/ meltfptr[1318])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1319*/ meltfptr[1318]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1320*/ meltfptr[1319]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1319*/ meltfptr[1318]); melt_dbgtrace_written_object ( /*_.VALDATA___V1319*/ meltfptr[1318], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1321*/ meltfptr[1320])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1322*/ meltfptr[1321]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1321*/ meltfptr[1320]); melt_dbgtrace_written_object ( /*_.VALDATA___V1321*/ meltfptr[1320], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1323*/ meltfptr[1322])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1323*/ meltfptr[1322])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1323*/ meltfptr[1322]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1324*/ meltfptr[1323]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1323*/ meltfptr[1322]); melt_dbgtrace_written_object ( /*_.VALDATA___V1323*/ meltfptr[1322], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1325*/ meltfptr[1324])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1325*/ meltfptr[1324])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1325*/ meltfptr[1324]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1326*/ meltfptr[1325]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1325*/ meltfptr[1324]); melt_dbgtrace_written_object ( /*_.VALDATA___V1325*/ meltfptr[1324], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5175:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1327*/ meltfptr[1326])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1235__MATCHALT_NORMALIZE_FLAG#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1327*/ meltfptr[1326])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:5175:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1327*/ meltfptr[1326])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V741*/ meltfptr[740]); ((meltroutine_ptr_t) /*_.VALROUT___V1327*/ meltfptr[1326])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V741*/ meltfptr[740]); MELT_LOCATION ("warmelt-normatch.melt:5175:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1327*/ meltfptr[1326])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1279*/ meltfptr[1278]); ((meltroutine_ptr_t) /*_.VALROUT___V1327*/ meltfptr[1326])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278]); MELT_LOCATION ("warmelt-normatch.melt:5175:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1327*/ meltfptr[1326])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V959*/ meltfptr[958]); ((meltroutine_ptr_t) /*_.VALROUT___V1327*/ meltfptr[1326])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V959*/ meltfptr[958]); MELT_LOCATION ("warmelt-normatch.melt:5175:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1327*/ meltfptr[1326]); /*putclosurout#87 */ melt_assertmsg ("putclosrout#87 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1328*/ meltfptr[1327])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#87 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1327*/ meltfptr[1326])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1328*/ meltfptr[1327])->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]); melt_dbgtrace_written_object ( /*_.VALDATA___V1329*/ meltfptr[1328], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5198:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1331*/ meltfptr[1330])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1331*/ meltfptr[1330])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1331*/ meltfptr[1330]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1007*/ meltfptr[1006]); MELT_LOCATION ("warmelt-normatch.melt:5198:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1331*/ meltfptr[1330])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normatch.melt:5198:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1331*/ meltfptr[1330]); MELT_LOCATION ("warmelt-normatch.melt:5198:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1331*/ meltfptr[1330], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1332*/ meltfptr[1331])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1332*/ meltfptr[1331])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1332*/ meltfptr[1331]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1333*/ meltfptr[1332]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1332*/ meltfptr[1331]); melt_dbgtrace_written_object ( /*_.VALDATA___V1332*/ meltfptr[1331], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5198:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1334*/ meltfptr[1333])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1334*/ meltfptr[1333])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1334*/ meltfptr[1333]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1332*/ meltfptr[1331]); MELT_LOCATION ("warmelt-normatch.melt:5198:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1334*/ meltfptr[1333])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normatch.melt:5198:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1334*/ meltfptr[1333]); MELT_LOCATION ("warmelt-normatch.melt:5198:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1334*/ meltfptr[1333], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5198:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1335*/ meltfptr[1334])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1335*/ meltfptr[1334])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1335*/ meltfptr[1334]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1102*/ meltfptr[1101]); MELT_LOCATION ("warmelt-normatch.melt:5198:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1335*/ meltfptr[1334])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normatch.melt:5198:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1335*/ meltfptr[1334]); MELT_LOCATION ("warmelt-normatch.melt:5198:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1335*/ meltfptr[1334], "new static instance"); /*putupl#540 */ melt_assertmsg ("putupl #540 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1336*/ meltfptr[1335])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #540 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1336*/ meltfptr[1335])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1336*/ meltfptr[1335]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V1331*/ meltfptr[1330]); /*putupl#541 */ melt_assertmsg ("putupl #541 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1336*/ meltfptr[1335])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #541 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1336*/ meltfptr[1335])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1336*/ meltfptr[1335]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1334*/ meltfptr[1333]); /*putupl#542 */ melt_assertmsg ("putupl #542 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1336*/ meltfptr[1335])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #542 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1336*/ meltfptr[1335])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1336*/ meltfptr[1335]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1335*/ meltfptr[1334]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1336*/ meltfptr[1335]); MELT_LOCATION ("warmelt-normatch.melt:5198:/ 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) ( /*_.VALSTR___V1338*/ meltfptr[1337]); MELT_LOCATION ("warmelt-normatch.melt:5198:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1337*/ meltfptr[1336]); MELT_LOCATION ("warmelt-normatch.melt:5198:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1337*/ meltfptr[1336], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5207:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1339*/ meltfptr[1338])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1247__MATCH_DATA_UPDATE_DATA_STEPS_INDEX#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1339*/ meltfptr[1338])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:5207:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1339*/ meltfptr[1338])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V695*/ meltfptr[694]); ((meltroutine_ptr_t) /*_.VALROUT___V1339*/ meltfptr[1338])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); MELT_LOCATION ("warmelt-normatch.melt:5207:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1339*/ meltfptr[1338])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1247__MATCH_DATA_UPDATE_DATA_STEPS_INDEX#2", NULL != ( /*_.LIST_TO_MULTIPLE__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1339*/ meltfptr[1338])->tabval[2] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-normatch.melt:5207:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1339*/ meltfptr[1338])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V799*/ meltfptr[798]); ((meltroutine_ptr_t) /*_.VALROUT___V1339*/ meltfptr[1338])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V799*/ meltfptr[798]); MELT_LOCATION ("warmelt-normatch.melt:5207:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1339*/ meltfptr[1338])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1247__MATCH_DATA_UPDATE_DATA_STEPS_INDEX#4", NULL != ( /*_.DISCR_CONSTANT_INTEGER__V51*/ meltfptr[50])); ((meltroutine_ptr_t) /*_.VALROUT___V1339*/ meltfptr[1338])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_CONSTANT_INTEGER__V51*/ meltfptr[50]); MELT_LOCATION ("warmelt-normatch.melt:5207:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1339*/ meltfptr[1338]); /*putclosurout#88 */ melt_assertmsg ("putclosrout#88 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1340*/ meltfptr[1339])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#88 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1339*/ meltfptr[1338])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1340*/ meltfptr[1339])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1339*/ meltfptr[1338]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1340*/ meltfptr[1339]); MELT_LOCATION ("warmelt-normatch.melt:5242:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1341*/ meltfptr[1340])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1249__MATCH_STEP_INDEX#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1341*/ meltfptr[1340])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:5242:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1341*/ meltfptr[1340])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V763*/ meltfptr[762]); ((meltroutine_ptr_t) /*_.VALROUT___V1341*/ meltfptr[1340])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]); MELT_LOCATION ("warmelt-normatch.melt:5242:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1341*/ meltfptr[1340])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V799*/ meltfptr[798]); ((meltroutine_ptr_t) /*_.VALROUT___V1341*/ meltfptr[1340])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V799*/ meltfptr[798]); MELT_LOCATION ("warmelt-normatch.melt:5242:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1341*/ meltfptr[1340])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1340*/ meltfptr[1339]); ((meltroutine_ptr_t) /*_.VALROUT___V1341*/ meltfptr[1340])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V1340*/ meltfptr[1339]); MELT_LOCATION ("warmelt-normatch.melt:5242:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1341*/ meltfptr[1340]); /*putclosurout#89 */ melt_assertmsg ("putclosrout#89 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1342*/ meltfptr[1341])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#89 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1341*/ meltfptr[1340])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1342*/ meltfptr[1341])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1341*/ meltfptr[1340]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1342*/ meltfptr[1341]); MELT_LOCATION ("warmelt-normatch.melt:5268:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1343*/ meltfptr[1342])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1251__COMPLETE_NORMSTEP_IF_LAST#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1343*/ meltfptr[1342])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:5268:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1343*/ meltfptr[1342])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V763*/ meltfptr[762]); ((meltroutine_ptr_t) /*_.VALROUT___V1343*/ meltfptr[1342])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]); MELT_LOCATION ("warmelt-normatch.melt:5268:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1343*/ meltfptr[1342])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1279*/ meltfptr[1278]); ((meltroutine_ptr_t) /*_.VALROUT___V1343*/ meltfptr[1342])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278]); MELT_LOCATION ("warmelt-normatch.melt:5268:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1343*/ meltfptr[1342])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V799*/ meltfptr[798]); ((meltroutine_ptr_t) /*_.VALROUT___V1343*/ meltfptr[1342])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V799*/ meltfptr[798]); MELT_LOCATION ("warmelt-normatch.melt:5268:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1343*/ meltfptr[1342])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V695*/ meltfptr[694]); ((meltroutine_ptr_t) /*_.VALROUT___V1343*/ meltfptr[1342])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); MELT_LOCATION ("warmelt-normatch.melt:5268:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1343*/ meltfptr[1342])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1340*/ meltfptr[1339]); ((meltroutine_ptr_t) /*_.VALROUT___V1343*/ meltfptr[1342])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1340*/ meltfptr[1339]); MELT_LOCATION ("warmelt-normatch.melt:5268:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1343*/ meltfptr[1342])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1342*/ meltfptr[1341]); ((meltroutine_ptr_t) /*_.VALROUT___V1343*/ meltfptr[1342])->tabval[6] = (melt_ptr_t) ( /*_.VALCLO___V1342*/ meltfptr[1341]); MELT_LOCATION ("warmelt-normatch.melt:5268:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1343*/ meltfptr[1342])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1251__COMPLETE_NORMSTEP_IF_LAST#7", NULL != ( /*_.CLASS_NREP_SIMPLE__V75*/ meltfptr[74])); ((meltroutine_ptr_t) /*_.VALROUT___V1343*/ meltfptr[1342])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_NREP_SIMPLE__V75*/ meltfptr[74]); MELT_LOCATION ("warmelt-normatch.melt:5268:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1343*/ meltfptr[1342])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V973*/ meltfptr[972]); ((meltroutine_ptr_t) /*_.VALROUT___V1343*/ meltfptr[1342])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V973*/ meltfptr[972]); MELT_LOCATION ("warmelt-normatch.melt:5268:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1343*/ meltfptr[1342])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1249*/ meltfptr[1248]); ((meltroutine_ptr_t) /*_.VALROUT___V1343*/ meltfptr[1342])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V1249*/ meltfptr[1248]); MELT_LOCATION ("warmelt-normatch.melt:5268:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1343*/ meltfptr[1342])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1255*/ meltfptr[1254]); ((meltroutine_ptr_t) /*_.VALROUT___V1343*/ meltfptr[1342])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V1255*/ meltfptr[1254]); MELT_LOCATION ("warmelt-normatch.melt:5268:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1343*/ meltfptr[1342])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1251__COMPLETE_NORMSTEP_IF_LAST#11", NULL != ( /*_.MULTIPLE_TO_LIST__V62*/ meltfptr[61])); ((meltroutine_ptr_t) /*_.VALROUT___V1343*/ meltfptr[1342])->tabval[11] = (melt_ptr_t) ( /*_.MULTIPLE_TO_LIST__V62*/ meltfptr[61]); MELT_LOCATION ("warmelt-normatch.melt:5268:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1343*/ meltfptr[1342])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1251__COMPLETE_NORMSTEP_IF_LAST#12", NULL != ( /*_.LIST_TO_MULTIPLE__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1343*/ meltfptr[1342])->tabval[12] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-normatch.melt:5268:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1343*/ meltfptr[1342]); /*putclosurout#90 */ melt_assertmsg ("putclosrout#90 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1344*/ meltfptr[1343])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#90 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1343*/ meltfptr[1342])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1344*/ meltfptr[1343])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1343*/ meltfptr[1342]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1344*/ meltfptr[1343]); MELT_LOCATION ("warmelt-normatch.melt:5347:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1345*/ meltfptr[1344])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1253__NORMSTEP_ANYRECV#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1345*/ meltfptr[1344])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:5347:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1345*/ meltfptr[1344])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1279*/ meltfptr[1278]); ((meltroutine_ptr_t) /*_.VALROUT___V1345*/ meltfptr[1344])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278]); MELT_LOCATION ("warmelt-normatch.melt:5347:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1345*/ meltfptr[1344])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1253__NORMSTEP_ANYRECV#2", NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1345*/ meltfptr[1344])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:5347:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1345*/ meltfptr[1344]); /*putclosurout#91 */ melt_assertmsg ("putclosrout#91 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1346*/ meltfptr[1345])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#91 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1345*/ meltfptr[1344])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1346*/ meltfptr[1345])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1345*/ meltfptr[1344]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1346*/ meltfptr[1345]); MELT_LOCATION ("warmelt-normatch.melt:5360:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1347*/ meltfptr[1346])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1255__NORMSTEP_MFLAGSET#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1347*/ meltfptr[1346])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:5360:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1347*/ meltfptr[1346])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V813*/ meltfptr[812]); ((meltroutine_ptr_t) /*_.VALROUT___V1347*/ meltfptr[1346])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812]); MELT_LOCATION ("warmelt-normatch.melt:5360:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1347*/ meltfptr[1346])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1279*/ meltfptr[1278]); ((meltroutine_ptr_t) /*_.VALROUT___V1347*/ meltfptr[1346])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278]); MELT_LOCATION ("warmelt-normatch.melt:6265:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1349*/ meltfptr[1348])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1344__MATCHALT_NORMALIZE_STEP#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1349*/ meltfptr[1348])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:6265:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1349*/ meltfptr[1348])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1279*/ meltfptr[1278]); ((meltroutine_ptr_t) /*_.VALROUT___V1349*/ meltfptr[1348])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278]); MELT_LOCATION ("warmelt-normatch.melt:6265:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1349*/ meltfptr[1348])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V763*/ meltfptr[762]); ((meltroutine_ptr_t) /*_.VALROUT___V1349*/ meltfptr[1348])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]); MELT_LOCATION ("warmelt-normatch.melt:6265:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1349*/ meltfptr[1348])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1344__MATCHALT_NORMALIZE_STEP#3", NULL != ( /*_.CLASS_LOCATED__V21*/ meltfptr[20])); ((meltroutine_ptr_t) /*_.VALROUT___V1349*/ meltfptr[1348])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-normatch.melt:6265:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1349*/ meltfptr[1348])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1207*/ meltfptr[1206]); ((meltroutine_ptr_t) /*_.VALROUT___V1349*/ meltfptr[1348])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V1207*/ meltfptr[1206]); MELT_LOCATION ("warmelt-normatch.melt:6265:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1349*/ meltfptr[1348]); /*putclosurout#92 */ melt_assertmsg ("putclosrout#92 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1348*/ meltfptr[1347])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#92 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1349*/ meltfptr[1348])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1348*/ meltfptr[1347])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1349*/ meltfptr[1348]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1348*/ meltfptr[1347]); MELT_LOCATION ("warmelt-normatch.melt:5360:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1347*/ meltfptr[1346])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", 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:5360:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1347*/ meltfptr[1346])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1328*/ meltfptr[1327]); ((meltroutine_ptr_t) /*_.VALROUT___V1347*/ meltfptr[1346])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V1328*/ meltfptr[1327]); MELT_LOCATION ("warmelt-normatch.melt:5360:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1347*/ meltfptr[1346])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1255__NORMSTEP_MFLAGSET#5", NULL != ( /*_.CLASS_NREP_SETQ__V80*/ meltfptr[79])); ((meltroutine_ptr_t) /*_.VALROUT___V1347*/ meltfptr[1346])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NREP_SETQ__V80*/ meltfptr[79]); MELT_LOCATION ("warmelt-normatch.melt:5360:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1347*/ meltfptr[1346])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1255__NORMSTEP_MFLAGSET#6", NULL != ( /*_.VALBXINT___V1350*/ meltfptr[1349])); ((meltroutine_ptr_t) /*_.VALROUT___V1347*/ meltfptr[1346])->tabval[6] = (melt_ptr_t) ( /*_.VALBXINT___V1350*/ meltfptr[1349]); MELT_LOCATION ("warmelt-normatch.melt:5360:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1347*/ meltfptr[1346])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1223*/ meltfptr[1222]); ((meltroutine_ptr_t) /*_.VALROUT___V1347*/ meltfptr[1346])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V1223*/ meltfptr[1222]); MELT_LOCATION ("warmelt-normatch.melt:5360:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1347*/ meltfptr[1346])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1344*/ meltfptr[1343]); ((meltroutine_ptr_t) /*_.VALROUT___V1347*/ meltfptr[1346])->tabval[8] = (melt_ptr_t) ( /*_.VALCLO___V1344*/ meltfptr[1343]); MELT_LOCATION ("warmelt-normatch.melt:5360:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1347*/ meltfptr[1346]); /*putclosurout#93 */ melt_assertmsg ("putclosrout#93 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1351*/ meltfptr[1350])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#93 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1347*/ meltfptr[1346])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1351*/ meltfptr[1350])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1347*/ meltfptr[1346]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1351*/ meltfptr[1350]); /*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) ( /*_.VALSTR___V1353*/ meltfptr[1352]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1352*/ meltfptr[1351]); melt_dbgtrace_written_object ( /*_.VALDATA___V1352*/ meltfptr[1351], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5384:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1260__NORMSTEP_MFLAGCONJ#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:5384:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V829*/ meltfptr[828]); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V829*/ meltfptr[828]); MELT_LOCATION ("warmelt-normatch.melt:5384:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1279*/ meltfptr[1278]); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278]); MELT_LOCATION ("warmelt-normatch.melt:5384:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1348*/ meltfptr[1347]); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V1348*/ meltfptr[1347]); MELT_LOCATION ("warmelt-normatch.melt:5384:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1328*/ meltfptr[1327]); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V1328*/ meltfptr[1327]); MELT_LOCATION ("warmelt-normatch.melt:5384:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1260__NORMSTEP_MFLAGCONJ#5", NULL != ( /*_.CLASS_NREP_SETQ__V80*/ meltfptr[79])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NREP_SETQ__V80*/ meltfptr[79]); MELT_LOCATION ("warmelt-normatch.melt:5384:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1223*/ meltfptr[1222]); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1223*/ meltfptr[1222]); MELT_LOCATION ("warmelt-normatch.melt:5384:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1260__NORMSTEP_MFLAGCONJ#7", NULL != ( /*_.VALBXINT___V1355*/ meltfptr[1354])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[7] = (melt_ptr_t) ( /*_.VALBXINT___V1355*/ meltfptr[1354]); MELT_LOCATION ("warmelt-normatch.melt:5384:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1260__NORMSTEP_MFLAGCONJ#8", NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-normatch.melt:5384:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1260__NORMSTEP_MFLAGCONJ#9", NULL != ( /*_.CLASS_NREP_CHUNK__V81*/ meltfptr[80])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_NREP_CHUNK__V81*/ meltfptr[80]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1356*/ meltfptr[1355])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1357*/ meltfptr[1356]); #undef meltfram__ } /*end of meltmod__warmelt_normatch__initialmeltchunk_26 */ void meltmod__warmelt_normatch__initialmeltchunk_27 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*touch:VALUEDATA_*/ meltgc_touch ( /*_.VALDATA___V1356*/ meltfptr[1355]); melt_dbgtrace_written_object ( /*_.VALDATA___V1356*/ meltfptr[1355], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5384:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1260__NORMSTEP_MFLAGCONJ#10", NULL != ( /*_.VALDATA___V1356*/ meltfptr[1355])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V1356*/ meltfptr[1355]); MELT_LOCATION ("warmelt-normatch.melt:5384:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1260__NORMSTEP_MFLAGCONJ#11", NULL != ( /*_.CTYPE_LONG__V82*/ meltfptr[81])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[11] = (melt_ptr_t) ( /*_.CTYPE_LONG__V82*/ meltfptr[81]); MELT_LOCATION ("warmelt-normatch.melt:5384:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1260__NORMSTEP_MFLAGCONJ#12", NULL != ( /*_.DISCR_VERBATIM_STRING__V83*/ meltfptr[82])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[12] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V83*/ meltfptr[82]); MELT_LOCATION ("warmelt-normatch.melt:5384:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1260__NORMSTEP_MFLAGCONJ#13", NULL != ( /*_.LIST_TO_MULTIPLE__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[13] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-normatch.melt:5384:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1344*/ meltfptr[1343]); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[14] = (melt_ptr_t) ( /*_.VALCLO___V1344*/ meltfptr[1343]); MELT_LOCATION ("warmelt-normatch.melt:5384:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1354*/ meltfptr[1353]); /*putclosurout#94 */ melt_assertmsg ("putclosrout#94 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1358*/ meltfptr[1357])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#94 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1358*/ meltfptr[1357])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1358*/ meltfptr[1357]); /*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_dbgtrace_written_object ( /*_.VALDATA___V1359*/ meltfptr[1358], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1361*/ meltfptr[1360])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1362*/ meltfptr[1361]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1361*/ meltfptr[1360]); melt_dbgtrace_written_object ( /*_.VALDATA___V1361*/ meltfptr[1360], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1363*/ meltfptr[1362])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1364*/ meltfptr[1363]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1363*/ meltfptr[1362]); melt_dbgtrace_written_object ( /*_.VALDATA___V1363*/ meltfptr[1362], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5447:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1365*/ meltfptr[1364])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1271__NORMSTEP_MTESTINSTANCE#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:5447:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1365*/ meltfptr[1364])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V911*/ meltfptr[910]); ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V911*/ meltfptr[910]); MELT_LOCATION ("warmelt-normatch.melt:5447:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1365*/ meltfptr[1364])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1279*/ meltfptr[1278]); ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278]); MELT_LOCATION ("warmelt-normatch.melt:6301:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1367*/ meltfptr[1366])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1346__MATCHALT_NORMALIZE_MDATA#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1367*/ meltfptr[1366])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:6301:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1367*/ meltfptr[1366])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V695*/ meltfptr[694]); ((meltroutine_ptr_t) /*_.VALROUT___V1367*/ meltfptr[1366])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); MELT_LOCATION ("warmelt-normatch.melt:6301:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1367*/ meltfptr[1366])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1279*/ meltfptr[1278]); ((meltroutine_ptr_t) /*_.VALROUT___V1367*/ meltfptr[1366])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278]); MELT_LOCATION ("warmelt-normatch.melt:6301:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1367*/ meltfptr[1366])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V717*/ meltfptr[716]); ((meltroutine_ptr_t) /*_.VALROUT___V1367*/ meltfptr[1366])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V717*/ meltfptr[716]); MELT_LOCATION ("warmelt-normatch.melt:6301:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1367*/ meltfptr[1366])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1346__MATCHALT_NORMALIZE_MDATA#4", NULL != ( /*_.CLASS_LOCATED__V21*/ meltfptr[20])); ((meltroutine_ptr_t) /*_.VALROUT___V1367*/ meltfptr[1366])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-normatch.melt:6301:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1367*/ meltfptr[1366])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V973*/ meltfptr[972]); ((meltroutine_ptr_t) /*_.VALROUT___V1367*/ meltfptr[1366])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V973*/ meltfptr[972]); MELT_LOCATION ("warmelt-normatch.melt:6301:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1367*/ meltfptr[1366])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1346__MATCHALT_NORMALIZE_MDATA#6", NULL != ( /*_.DISCR_CONSTANT_INTEGER__V51*/ meltfptr[50])); ((meltroutine_ptr_t) /*_.VALROUT___V1367*/ meltfptr[1366])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_CONSTANT_INTEGER__V51*/ meltfptr[50]); MELT_LOCATION ("warmelt-normatch.melt:6301:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1367*/ meltfptr[1366])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1243*/ meltfptr[1242]); ((meltroutine_ptr_t) /*_.VALROUT___V1367*/ meltfptr[1366])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V1243*/ meltfptr[1242]); MELT_LOCATION ("warmelt-normatch.melt:6301:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1367*/ meltfptr[1366]); /*putclosurout#95 */ melt_assertmsg ("putclosrout#95 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1366*/ meltfptr[1365])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#95 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1367*/ meltfptr[1366])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1366*/ meltfptr[1365])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1367*/ meltfptr[1366]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1366*/ meltfptr[1365]); MELT_LOCATION ("warmelt-normatch.melt:5447:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1365*/ meltfptr[1364])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1366*/ meltfptr[1365]); ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V1366*/ meltfptr[1365]); MELT_LOCATION ("warmelt-normatch.melt:5447:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1365*/ meltfptr[1364])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1271__NORMSTEP_MTESTINSTANCE#4", NULL != ( /*_.CLASS_CLASS__V25*/ meltfptr[24])); ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_CLASS__V25*/ meltfptr[24]); MELT_LOCATION ("warmelt-normatch.melt:5447:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1365*/ meltfptr[1364])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1348*/ meltfptr[1347]); ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1348*/ meltfptr[1347]); MELT_LOCATION ("warmelt-normatch.melt:5447:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1365*/ meltfptr[1364])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1223*/ meltfptr[1222]); ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1223*/ meltfptr[1222]); MELT_LOCATION ("warmelt-normatch.melt:5447:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1365*/ meltfptr[1364])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1344*/ meltfptr[1343]); ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[7] = (melt_ptr_t) ( /*_.VALCLO___V1344*/ meltfptr[1343]); MELT_LOCATION ("warmelt-normatch.melt:5447:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1365*/ meltfptr[1364])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V627*/ meltfptr[626]); ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V627*/ meltfptr[626]); MELT_LOCATION ("warmelt-normatch.melt:5447:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1365*/ meltfptr[1364])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1271__NORMSTEP_MTESTINSTANCE#9", NULL != ( /*_.NORMAL_EXP__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[9] = (melt_ptr_t) ( /*_.NORMAL_EXP__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normatch.melt:5447:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1365*/ meltfptr[1364])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1271__NORMSTEP_MTESTINSTANCE#10", NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[10] = (melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-normatch.melt:5447:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1365*/ meltfptr[1364])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1271__NORMSTEP_MTESTINSTANCE#11", NULL != ( /*_.CLASS_NREP_IFISA__V84*/ meltfptr[83])); ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[11] = (melt_ptr_t) ( /*_.CLASS_NREP_IFISA__V84*/ meltfptr[83]); MELT_LOCATION ("warmelt-normatch.melt:5447:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1365*/ meltfptr[1364])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1271__NORMSTEP_MTESTINSTANCE#12", NULL != ( /*_.CTYPE_VOID__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[12] = (melt_ptr_t) ( /*_.CTYPE_VOID__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normatch.melt:5447:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1365*/ meltfptr[1364])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1207*/ meltfptr[1206]); ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V1207*/ meltfptr[1206]); MELT_LOCATION ("warmelt-normatch.melt:5447:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1365*/ meltfptr[1364])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V695*/ meltfptr[694]); ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[14] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); MELT_LOCATION ("warmelt-normatch.melt:5447:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1365*/ meltfptr[1364])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1271__NORMSTEP_MTESTINSTANCE#15", NULL != ( /*_.CLASS_NREP_UNSAFE_GET_FIELD__V48*/ meltfptr[47])); ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[15] = (melt_ptr_t) ( /*_.CLASS_NREP_UNSAFE_GET_FIELD__V48*/ meltfptr[47]); MELT_LOCATION ("warmelt-normatch.melt:5447:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1365*/ meltfptr[1364])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1271__NORMSTEP_MTESTINSTANCE#16", NULL != ( /*_.CLASS_NREP_SETQ__V80*/ meltfptr[79])); ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[16] = (melt_ptr_t) ( /*_.CLASS_NREP_SETQ__V80*/ meltfptr[79]); MELT_LOCATION ("warmelt-normatch.melt:5447:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1365*/ meltfptr[1364])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1271__NORMSTEP_MTESTINSTANCE#17", NULL != ( /*_.CLASS_FIELD__V27*/ meltfptr[26])); ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[17] = (melt_ptr_t) ( /*_.CLASS_FIELD__V27*/ meltfptr[26]); MELT_LOCATION ("warmelt-normatch.melt:5447:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1365*/ meltfptr[1364])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1271__NORMSTEP_MTESTINSTANCE#18", NULL != ( /*_.LIST_APPEND2LIST__V18*/ meltfptr[17])); ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[18] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V18*/ meltfptr[17]); MELT_LOCATION ("warmelt-normatch.melt:5447:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1365*/ meltfptr[1364])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1271__NORMSTEP_MTESTINSTANCE#19", NULL != ( /*_.CLASS_NREP_PROGN__V85*/ meltfptr[84])); ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[19] = (melt_ptr_t) ( /*_.CLASS_NREP_PROGN__V85*/ meltfptr[84]); MELT_LOCATION ("warmelt-normatch.melt:5447:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1365*/ meltfptr[1364])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1271__NORMSTEP_MTESTINSTANCE#20", NULL != ( /*_.LIST_TO_MULTIPLE__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1365*/ meltfptr[1364])->tabval[20] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-normatch.melt:5447:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1365*/ meltfptr[1364]); /*putclosurout#96 */ melt_assertmsg ("putclosrout#96 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1368*/ meltfptr[1367])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#96 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1365*/ meltfptr[1364])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1368*/ meltfptr[1367])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1365*/ meltfptr[1364]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1368*/ meltfptr[1367]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1369*/ meltfptr[1368])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1370*/ meltfptr[1369]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1369*/ meltfptr[1368]); melt_dbgtrace_written_object ( /*_.VALDATA___V1369*/ meltfptr[1368], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1371*/ meltfptr[1370])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1372*/ meltfptr[1371]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1371*/ meltfptr[1370]); melt_dbgtrace_written_object ( /*_.VALDATA___V1371*/ meltfptr[1370], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5558:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1373*/ meltfptr[1372])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1277__NORMSTEP_MTESTMULTIPLE#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:5558:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1373*/ meltfptr[1372])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V925*/ meltfptr[924]); ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V925*/ meltfptr[924]); MELT_LOCATION ("warmelt-normatch.melt:5558:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1373*/ meltfptr[1372])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1279*/ meltfptr[1278]); ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278]); MELT_LOCATION ("warmelt-normatch.melt:5558:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1373*/ meltfptr[1372])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1366*/ meltfptr[1365]); ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V1366*/ meltfptr[1365]); MELT_LOCATION ("warmelt-normatch.melt:5558:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1373*/ meltfptr[1372])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1348*/ meltfptr[1347]); ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V1348*/ meltfptr[1347]); MELT_LOCATION ("warmelt-normatch.melt:5558:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1373*/ meltfptr[1372])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1223*/ meltfptr[1222]); ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1223*/ meltfptr[1222]); MELT_LOCATION ("warmelt-normatch.melt:5558:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1373*/ meltfptr[1372])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1344*/ meltfptr[1343]); ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[6] = (melt_ptr_t) ( /*_.VALCLO___V1344*/ meltfptr[1343]); MELT_LOCATION ("warmelt-normatch.melt:5558:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1373*/ meltfptr[1372])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V627*/ meltfptr[626]); ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V627*/ meltfptr[626]); MELT_LOCATION ("warmelt-normatch.melt:5558:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1373*/ meltfptr[1372])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1277__NORMSTEP_MTESTMULTIPLE#8", NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-normatch.melt:5558:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1373*/ meltfptr[1372])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1277__NORMSTEP_MTESTMULTIPLE#9", NULL != ( /*_.DISCR_CONSTANT_INTEGER__V51*/ meltfptr[50])); ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[9] = (melt_ptr_t) ( /*_.DISCR_CONSTANT_INTEGER__V51*/ meltfptr[50]); MELT_LOCATION ("warmelt-normatch.melt:5558:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1373*/ meltfptr[1372])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1277__NORMSTEP_MTESTMULTIPLE#10", NULL != ( /*_.CLASS_NREP_IFTUPLESIZED__V86*/ meltfptr[85])); ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_NREP_IFTUPLESIZED__V86*/ meltfptr[85]); MELT_LOCATION ("warmelt-normatch.melt:5558:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1373*/ meltfptr[1372])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1277__NORMSTEP_MTESTMULTIPLE#11", NULL != ( /*_.CTYPE_VOID__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[11] = (melt_ptr_t) ( /*_.CTYPE_VOID__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normatch.melt:5558:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1373*/ meltfptr[1372])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1207*/ meltfptr[1206]); ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V1207*/ meltfptr[1206]); MELT_LOCATION ("warmelt-normatch.melt:5558:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1373*/ meltfptr[1372])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V695*/ meltfptr[694]); ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); MELT_LOCATION ("warmelt-normatch.melt:5558:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1373*/ meltfptr[1372])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1277__NORMSTEP_MTESTMULTIPLE#14", NULL != ( /*_.CLASS_NREP_UNSAFE_NTH_COMPONENT__V53*/ meltfptr[52])); ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[14] = (melt_ptr_t) ( /*_.CLASS_NREP_UNSAFE_NTH_COMPONENT__V53*/ meltfptr[52]); MELT_LOCATION ("warmelt-normatch.melt:5558:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1373*/ meltfptr[1372])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1277__NORMSTEP_MTESTMULTIPLE#15", NULL != ( /*_.CLASS_NREP_SETQ__V80*/ meltfptr[79])); ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[15] = (melt_ptr_t) ( /*_.CLASS_NREP_SETQ__V80*/ meltfptr[79]); MELT_LOCATION ("warmelt-normatch.melt:5558:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1373*/ meltfptr[1372])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1277__NORMSTEP_MTESTMULTIPLE#16", NULL != ( /*_.LIST_APPEND2LIST__V18*/ meltfptr[17])); ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[16] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V18*/ meltfptr[17]); MELT_LOCATION ("warmelt-normatch.melt:5558:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1373*/ meltfptr[1372])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1277__NORMSTEP_MTESTMULTIPLE#17", NULL != ( /*_.CLASS_NREP_PROGN__V85*/ meltfptr[84])); ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[17] = (melt_ptr_t) ( /*_.CLASS_NREP_PROGN__V85*/ meltfptr[84]); MELT_LOCATION ("warmelt-normatch.melt:5558:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1373*/ meltfptr[1372])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1277__NORMSTEP_MTESTMULTIPLE#18", NULL != ( /*_.LIST_TO_MULTIPLE__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[18] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-normatch.melt:5558:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1373*/ meltfptr[1372])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1277__NORMSTEP_MTESTMULTIPLE#19", NULL != ( /*_.CLASS_NREP_IFCOMMON__V87*/ meltfptr[86])); ((meltroutine_ptr_t) /*_.VALROUT___V1373*/ meltfptr[1372])->tabval[19] = (melt_ptr_t) ( /*_.CLASS_NREP_IFCOMMON__V87*/ meltfptr[86]); MELT_LOCATION ("warmelt-normatch.melt:5558:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1373*/ meltfptr[1372]); /*putclosurout#97 */ melt_assertmsg ("putclosrout#97 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1374*/ meltfptr[1373])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#97 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1373*/ meltfptr[1372])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1374*/ meltfptr[1373])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1373*/ meltfptr[1372]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1374*/ meltfptr[1373]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1375*/ meltfptr[1374])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1376*/ meltfptr[1375]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1375*/ meltfptr[1374]); melt_dbgtrace_written_object ( /*_.VALDATA___V1375*/ meltfptr[1374], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1377*/ meltfptr[1376])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1378*/ meltfptr[1377]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1377*/ meltfptr[1376]); melt_dbgtrace_written_object ( /*_.VALDATA___V1377*/ meltfptr[1376], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5667:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1379*/ meltfptr[1378])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1283__NORMSTEP_MTESTVAR#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1379*/ meltfptr[1378])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:5667:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1379*/ meltfptr[1378])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V869*/ meltfptr[868]); ((meltroutine_ptr_t) /*_.VALROUT___V1379*/ meltfptr[1378])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V869*/ meltfptr[868]); MELT_LOCATION ("warmelt-normatch.melt:5667:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1379*/ meltfptr[1378])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1279*/ meltfptr[1278]); ((meltroutine_ptr_t) /*_.VALROUT___V1379*/ meltfptr[1378])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278]); MELT_LOCATION ("warmelt-normatch.melt:5667:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1379*/ meltfptr[1378])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1348*/ meltfptr[1347]); ((meltroutine_ptr_t) /*_.VALROUT___V1379*/ meltfptr[1378])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V1348*/ meltfptr[1347]); MELT_LOCATION ("warmelt-normatch.melt:5667:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1379*/ meltfptr[1378])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1366*/ meltfptr[1365]); ((meltroutine_ptr_t) /*_.VALROUT___V1379*/ meltfptr[1378])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V1366*/ meltfptr[1365]); MELT_LOCATION ("warmelt-normatch.melt:5667:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1379*/ meltfptr[1378])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1223*/ meltfptr[1222]); ((meltroutine_ptr_t) /*_.VALROUT___V1379*/ meltfptr[1378])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1223*/ meltfptr[1222]); MELT_LOCATION ("warmelt-normatch.melt:5667:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1379*/ meltfptr[1378])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1344*/ meltfptr[1343]); ((meltroutine_ptr_t) /*_.VALROUT___V1379*/ meltfptr[1378])->tabval[6] = (melt_ptr_t) ( /*_.VALCLO___V1344*/ meltfptr[1343]); MELT_LOCATION ("warmelt-normatch.melt:5667:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1379*/ meltfptr[1378])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1283__NORMSTEP_MTESTVAR#7", NULL != ( /*_.CLASS_NREP_IFSAME__V88*/ meltfptr[87])); ((meltroutine_ptr_t) /*_.VALROUT___V1379*/ meltfptr[1378])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_NREP_IFSAME__V88*/ meltfptr[87]); MELT_LOCATION ("warmelt-normatch.melt:5667:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1379*/ meltfptr[1378])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1283__NORMSTEP_MTESTVAR#8", NULL != ( /*_.CLASS_NREP_PROGN__V85*/ meltfptr[84])); ((meltroutine_ptr_t) /*_.VALROUT___V1379*/ meltfptr[1378])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_NREP_PROGN__V85*/ meltfptr[84]); MELT_LOCATION ("warmelt-normatch.melt:5667:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1379*/ meltfptr[1378]); /*putclosurout#98 */ melt_assertmsg ("putclosrout#98 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1380*/ meltfptr[1379])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#98 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1379*/ meltfptr[1378])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1380*/ meltfptr[1379])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1379*/ meltfptr[1378]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1380*/ meltfptr[1379]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1381*/ meltfptr[1380])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1382*/ meltfptr[1381]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1381*/ meltfptr[1380]); melt_dbgtrace_written_object ( /*_.VALDATA___V1381*/ meltfptr[1380], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5744:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1383*/ meltfptr[1382])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1287__NORMSTEP_MGROUP#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1383*/ meltfptr[1382])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:5744:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1383*/ meltfptr[1382])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V893*/ meltfptr[892]); ((meltroutine_ptr_t) /*_.VALROUT___V1383*/ meltfptr[1382])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]); MELT_LOCATION ("warmelt-normatch.melt:5744:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1383*/ meltfptr[1382])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1279*/ meltfptr[1278]); ((meltroutine_ptr_t) /*_.VALROUT___V1383*/ meltfptr[1382])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278]); MELT_LOCATION ("warmelt-normatch.melt:5744:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1383*/ meltfptr[1382])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1366*/ meltfptr[1365]); ((meltroutine_ptr_t) /*_.VALROUT___V1383*/ meltfptr[1382])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V1366*/ meltfptr[1365]); MELT_LOCATION ("warmelt-normatch.melt:5744:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1383*/ meltfptr[1382])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1348*/ meltfptr[1347]); ((meltroutine_ptr_t) /*_.VALROUT___V1383*/ meltfptr[1382])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V1348*/ meltfptr[1347]); MELT_LOCATION ("warmelt-normatch.melt:5744:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1383*/ meltfptr[1382])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1287__NORMSTEP_MGROUP#5", NULL != ( /*_.LIST_MAP__V89*/ meltfptr[88])); ((meltroutine_ptr_t) /*_.VALROUT___V1383*/ meltfptr[1382])->tabval[5] = (melt_ptr_t) ( /*_.LIST_MAP__V89*/ meltfptr[88]); MELT_LOCATION ("warmelt-normatch.melt:5744:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1383*/ meltfptr[1382])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1348*/ meltfptr[1347]); ((meltroutine_ptr_t) /*_.VALROUT___V1383*/ meltfptr[1382])->tabval[6] = (melt_ptr_t) ( /*_.VALCLO___V1348*/ meltfptr[1347]); MELT_LOCATION ("warmelt-normatch.melt:5767:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1384*/ meltfptr[1383])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1348*/ meltfptr[1347]); ((meltroutine_ptr_t) /*_.VALROUT___V1384*/ meltfptr[1383])->tabval[0] = (melt_ptr_t) ( /*_.VALCLO___V1348*/ meltfptr[1347]); MELT_LOCATION ("warmelt-normatch.melt:5767:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1384*/ meltfptr[1383]); MELT_LOCATION ("warmelt-normatch.melt:5744:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1383*/ meltfptr[1382])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1287__NORMSTEP_MGROUP#7", NULL != ( /*_.VALROUT___V1384*/ meltfptr[1383])); ((meltroutine_ptr_t) /*_.VALROUT___V1383*/ meltfptr[1382])->tabval[7] = (melt_ptr_t) ( /*_.VALROUT___V1384*/ meltfptr[1383]); MELT_LOCATION ("warmelt-normatch.melt:5744:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1383*/ meltfptr[1382])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1287__NORMSTEP_MGROUP#8", NULL != ( /*_.MULTIPLE_MAP__V55*/ meltfptr[54])); ((meltroutine_ptr_t) /*_.VALROUT___V1383*/ meltfptr[1382])->tabval[8] = (melt_ptr_t) ( /*_.MULTIPLE_MAP__V55*/ meltfptr[54]); MELT_LOCATION ("warmelt-normatch.melt:5744:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1383*/ meltfptr[1382])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1348*/ meltfptr[1347]); ((meltroutine_ptr_t) /*_.VALROUT___V1383*/ meltfptr[1382])->tabval[9] = (melt_ptr_t) ( /*_.VALCLO___V1348*/ meltfptr[1347]); MELT_LOCATION ("warmelt-normatch.melt:5770:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1385*/ meltfptr[1384])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1348*/ meltfptr[1347]); ((meltroutine_ptr_t) /*_.VALROUT___V1385*/ meltfptr[1384])->tabval[0] = (melt_ptr_t) ( /*_.VALCLO___V1348*/ meltfptr[1347]); MELT_LOCATION ("warmelt-normatch.melt:5770:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1385*/ meltfptr[1384]); MELT_LOCATION ("warmelt-normatch.melt:5744:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1383*/ meltfptr[1382])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1287__NORMSTEP_MGROUP#10", NULL != ( /*_.VALROUT___V1385*/ meltfptr[1384])); ((meltroutine_ptr_t) /*_.VALROUT___V1383*/ meltfptr[1382])->tabval[10] = (melt_ptr_t) ( /*_.VALROUT___V1385*/ meltfptr[1384]); MELT_LOCATION ("warmelt-normatch.melt:5744:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1383*/ meltfptr[1382])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1348*/ meltfptr[1347]); ((meltroutine_ptr_t) /*_.VALROUT___V1383*/ meltfptr[1382])->tabval[11] = (melt_ptr_t) ( /*_.VALCLO___V1348*/ meltfptr[1347]); MELT_LOCATION ("warmelt-normatch.melt:5783:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1386*/ meltfptr[1385])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1348*/ meltfptr[1347]); ((meltroutine_ptr_t) /*_.VALROUT___V1386*/ meltfptr[1385])->tabval[0] = (melt_ptr_t) ( /*_.VALCLO___V1348*/ meltfptr[1347]); MELT_LOCATION ("warmelt-normatch.melt:5783:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1386*/ meltfptr[1385]); MELT_LOCATION ("warmelt-normatch.melt:5744:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1383*/ meltfptr[1382])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1287__NORMSTEP_MGROUP#12", NULL != ( /*_.VALROUT___V1386*/ meltfptr[1385])); ((meltroutine_ptr_t) /*_.VALROUT___V1383*/ meltfptr[1382])->tabval[12] = (melt_ptr_t) ( /*_.VALROUT___V1386*/ meltfptr[1385]); MELT_LOCATION ("warmelt-normatch.melt:5744:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1383*/ meltfptr[1382])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1348*/ meltfptr[1347]); ((meltroutine_ptr_t) /*_.VALROUT___V1383*/ meltfptr[1382])->tabval[13] = (melt_ptr_t) ( /*_.VALCLO___V1348*/ meltfptr[1347]); MELT_LOCATION ("warmelt-normatch.melt:5786:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1387*/ meltfptr[1386])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1348*/ meltfptr[1347]); ((meltroutine_ptr_t) /*_.VALROUT___V1387*/ meltfptr[1386])->tabval[0] = (melt_ptr_t) ( /*_.VALCLO___V1348*/ meltfptr[1347]); MELT_LOCATION ("warmelt-normatch.melt:5786:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1387*/ meltfptr[1386]); MELT_LOCATION ("warmelt-normatch.melt:5744:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1383*/ meltfptr[1382])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1287__NORMSTEP_MGROUP#14", NULL != ( /*_.VALROUT___V1387*/ meltfptr[1386])); ((meltroutine_ptr_t) /*_.VALROUT___V1383*/ meltfptr[1382])->tabval[14] = (melt_ptr_t) ( /*_.VALROUT___V1387*/ meltfptr[1386]); MELT_LOCATION ("warmelt-normatch.melt:5744:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1383*/ meltfptr[1382]); #undef meltfram__ } /*end of meltmod__warmelt_normatch__initialmeltchunk_27 */ void meltmod__warmelt_normatch__initialmeltchunk_28 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*putclosurout#99*/ melt_assertmsg ("putclosrout#99 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1388*/ meltfptr[1387])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#99 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1383*/ meltfptr[1382])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1388*/ meltfptr[1387])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1383*/ meltfptr[1382]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1388*/ meltfptr[1387]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1389*/ meltfptr[1388])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1390*/ meltfptr[1389]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1389*/ meltfptr[1388]); melt_dbgtrace_written_object ( /*_.VALDATA___V1389*/ meltfptr[1388], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5812:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1391*/ meltfptr[1390])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1295__NORMSTEP_MSUCCWHENFLAG#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1391*/ meltfptr[1390])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:5812:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1391*/ meltfptr[1390])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V841*/ meltfptr[840]); ((meltroutine_ptr_t) /*_.VALROUT___V1391*/ meltfptr[1390])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V841*/ meltfptr[840]); MELT_LOCATION ("warmelt-normatch.melt:5812:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1391*/ meltfptr[1390])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1279*/ meltfptr[1278]); ((meltroutine_ptr_t) /*_.VALROUT___V1391*/ meltfptr[1390])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278]); MELT_LOCATION ("warmelt-normatch.melt:5812:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1391*/ meltfptr[1390])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1295__NORMSTEP_MSUCCWHENFLAG#3", NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1391*/ meltfptr[1390])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-normatch.melt:5812:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1391*/ meltfptr[1390])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1295__NORMSTEP_MSUCCWHENFLAG#4", NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1391*/ meltfptr[1390])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normatch.melt:5812:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1391*/ meltfptr[1390])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1295__NORMSTEP_MSUCCWHENFLAG#5", NULL != ( /*_.CLASS_NREP_SYMOCC__V46*/ meltfptr[45])); ((meltroutine_ptr_t) /*_.VALROUT___V1391*/ meltfptr[1390])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NREP_SYMOCC__V46*/ meltfptr[45]); MELT_LOCATION ("warmelt-normatch.melt:5812:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1391*/ meltfptr[1390])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1295__NORMSTEP_MSUCCWHENFLAG#6", NULL != ( /*_.CLASS_NREP__V56*/ meltfptr[55])); ((meltroutine_ptr_t) /*_.VALROUT___V1391*/ meltfptr[1390])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_NREP__V56*/ meltfptr[55]); MELT_LOCATION ("warmelt-normatch.melt:5812:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1391*/ meltfptr[1390])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V723*/ meltfptr[722]); ((meltroutine_ptr_t) /*_.VALROUT___V1391*/ meltfptr[1390])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V723*/ meltfptr[722]); MELT_LOCATION ("warmelt-normatch.melt:5812:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1391*/ meltfptr[1390])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V695*/ meltfptr[694]); ((meltroutine_ptr_t) /*_.VALROUT___V1391*/ meltfptr[1390])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); MELT_LOCATION ("warmelt-normatch.melt:5812:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1391*/ meltfptr[1390])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1366*/ meltfptr[1365]); ((meltroutine_ptr_t) /*_.VALROUT___V1391*/ meltfptr[1390])->tabval[9] = (melt_ptr_t) ( /*_.VALCLO___V1366*/ meltfptr[1365]); MELT_LOCATION ("warmelt-normatch.melt:5812:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1391*/ meltfptr[1390])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1295__NORMSTEP_MSUCCWHENFLAG#10", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V1391*/ meltfptr[1390])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-normatch.melt:5812:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1391*/ meltfptr[1390])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1348*/ meltfptr[1347]); ((meltroutine_ptr_t) /*_.VALROUT___V1391*/ meltfptr[1390])->tabval[11] = (melt_ptr_t) ( /*_.VALCLO___V1348*/ meltfptr[1347]); MELT_LOCATION ("warmelt-normatch.melt:5812:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1391*/ meltfptr[1390])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1328*/ meltfptr[1327]); ((meltroutine_ptr_t) /*_.VALROUT___V1391*/ meltfptr[1390])->tabval[12] = (melt_ptr_t) ( /*_.VALCLO___V1328*/ meltfptr[1327]); MELT_LOCATION ("warmelt-normatch.melt:5812:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1391*/ meltfptr[1390])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1223*/ meltfptr[1222]); ((meltroutine_ptr_t) /*_.VALROUT___V1391*/ meltfptr[1390])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V1223*/ meltfptr[1222]); MELT_LOCATION ("warmelt-normatch.melt:5812:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1391*/ meltfptr[1390])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1344*/ meltfptr[1343]); ((meltroutine_ptr_t) /*_.VALROUT___V1391*/ meltfptr[1390])->tabval[14] = (melt_ptr_t) ( /*_.VALCLO___V1344*/ meltfptr[1343]); MELT_LOCATION ("warmelt-normatch.melt:5812:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1391*/ meltfptr[1390])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1295__NORMSTEP_MSUCCWHENFLAG#15", NULL != ( /*_.CLASS_NREP_SETQ__V80*/ meltfptr[79])); ((meltroutine_ptr_t) /*_.VALROUT___V1391*/ meltfptr[1390])->tabval[15] = (melt_ptr_t) ( /*_.CLASS_NREP_SETQ__V80*/ meltfptr[79]); MELT_LOCATION ("warmelt-normatch.melt:5812:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1391*/ meltfptr[1390])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1295__NORMSTEP_MSUCCWHENFLAG#16", NULL != ( /*_.DISCR_MULTIPLE__V45*/ meltfptr[44])); ((meltroutine_ptr_t) /*_.VALROUT___V1391*/ meltfptr[1390])->tabval[16] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V45*/ meltfptr[44]); MELT_LOCATION ("warmelt-normatch.melt:5812:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1391*/ meltfptr[1390])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1295__NORMSTEP_MSUCCWHENFLAG#17", NULL != ( /*_.CLASS_NREP_IF__V90*/ meltfptr[89])); ((meltroutine_ptr_t) /*_.VALROUT___V1391*/ meltfptr[1390])->tabval[17] = (melt_ptr_t) ( /*_.CLASS_NREP_IF__V90*/ meltfptr[89]); MELT_LOCATION ("warmelt-normatch.melt:5812:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1391*/ meltfptr[1390])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1295__NORMSTEP_MSUCCWHENFLAG#18", NULL != ( /*_.WRAP_NORMAL_LETSEQ__V73*/ meltfptr[72])); ((meltroutine_ptr_t) /*_.VALROUT___V1391*/ meltfptr[1390])->tabval[18] = (melt_ptr_t) ( /*_.WRAP_NORMAL_LETSEQ__V73*/ meltfptr[72]); MELT_LOCATION ("warmelt-normatch.melt:5812:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1391*/ meltfptr[1390])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1295__NORMSTEP_MSUCCWHENFLAG#19", NULL != ( /*_.CTYPE_VOID__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V1391*/ meltfptr[1390])->tabval[19] = (melt_ptr_t) ( /*_.CTYPE_VOID__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normatch.melt:5812:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1391*/ meltfptr[1390]); /*putclosurout#100 */ melt_assertmsg ("putclosrout#100 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1392*/ meltfptr[1391])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#100 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1391*/ meltfptr[1390])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1392*/ meltfptr[1391])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1391*/ meltfptr[1390]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1392*/ meltfptr[1391]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1393*/ meltfptr[1392])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1393*/ meltfptr[1392])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1393*/ meltfptr[1392]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1394*/ meltfptr[1393]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1393*/ meltfptr[1392]); melt_dbgtrace_written_object ( /*_.VALDATA___V1393*/ meltfptr[1392], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1395*/ meltfptr[1394])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1395*/ meltfptr[1394])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1395*/ meltfptr[1394]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1396*/ meltfptr[1395]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1395*/ meltfptr[1394]); melt_dbgtrace_written_object ( /*_.VALDATA___V1395*/ meltfptr[1394], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5909:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1397*/ meltfptr[1396])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1397*/ meltfptr[1396])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1397*/ meltfptr[1396]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V993*/ meltfptr[992]); MELT_LOCATION ("warmelt-normatch.melt:5909:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1397*/ meltfptr[1396])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normatch.melt:5909:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1397*/ meltfptr[1396]); MELT_LOCATION ("warmelt-normatch.melt:5909:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1397*/ meltfptr[1396], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5909:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1398*/ meltfptr[1397])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1398*/ meltfptr[1397])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1398*/ meltfptr[1397]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1102*/ meltfptr[1101]); MELT_LOCATION ("warmelt-normatch.melt:5909:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1398*/ meltfptr[1397])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normatch.melt:5909:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1398*/ meltfptr[1397]); MELT_LOCATION ("warmelt-normatch.melt:5909:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1398*/ meltfptr[1397], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1399*/ meltfptr[1398])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1399*/ meltfptr[1398])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1399*/ meltfptr[1398]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1400*/ meltfptr[1399]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1399*/ meltfptr[1398]); melt_dbgtrace_written_object ( /*_.VALDATA___V1399*/ meltfptr[1398], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5909:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1401*/ meltfptr[1400])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1401*/ meltfptr[1400])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1401*/ meltfptr[1400]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1399*/ meltfptr[1398]); MELT_LOCATION ("warmelt-normatch.melt:5909:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1401*/ meltfptr[1400])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1401*/ meltfptr[1400])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1401*/ meltfptr[1400]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normatch.melt:5909:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1401*/ meltfptr[1400]); MELT_LOCATION ("warmelt-normatch.melt:5909:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1401*/ meltfptr[1400], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1402*/ meltfptr[1401])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1403*/ meltfptr[1402]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1402*/ meltfptr[1401]); melt_dbgtrace_written_object ( /*_.VALDATA___V1402*/ meltfptr[1401], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5909:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1404*/ meltfptr[1403])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1404*/ meltfptr[1403])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1404*/ meltfptr[1403]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1402*/ meltfptr[1401]); MELT_LOCATION ("warmelt-normatch.melt:5909:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1404*/ meltfptr[1403])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1404*/ meltfptr[1403])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1404*/ meltfptr[1403]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normatch.melt:5909:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1404*/ meltfptr[1403]); MELT_LOCATION ("warmelt-normatch.melt:5909:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1404*/ meltfptr[1403], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5909:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1405*/ meltfptr[1404])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1405*/ meltfptr[1404])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1405*/ meltfptr[1404]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1332*/ meltfptr[1331]); MELT_LOCATION ("warmelt-normatch.melt:5909:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1405*/ meltfptr[1404])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1405*/ meltfptr[1404])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1405*/ meltfptr[1404]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normatch.melt:5909:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1405*/ meltfptr[1404]); MELT_LOCATION ("warmelt-normatch.melt:5909:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1405*/ meltfptr[1404], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1406*/ meltfptr[1405])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1407*/ meltfptr[1406]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1406*/ meltfptr[1405]); melt_dbgtrace_written_object ( /*_.VALDATA___V1406*/ meltfptr[1405], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5909:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1408*/ meltfptr[1407])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1408*/ meltfptr[1407])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1408*/ meltfptr[1407]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1406*/ meltfptr[1405]); MELT_LOCATION ("warmelt-normatch.melt:5909:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1408*/ meltfptr[1407])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1408*/ meltfptr[1407])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1408*/ meltfptr[1407]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normatch.melt:5909:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1408*/ meltfptr[1407]); MELT_LOCATION ("warmelt-normatch.melt:5909:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1408*/ meltfptr[1407], "new static instance"); /*putupl#543 */ melt_assertmsg ("putupl #543 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1409*/ meltfptr[1408])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #543 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1409*/ meltfptr[1408])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1409*/ meltfptr[1408]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V1397*/ meltfptr[1396]); /*putupl#544 */ melt_assertmsg ("putupl #544 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1409*/ meltfptr[1408])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #544 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1409*/ meltfptr[1408])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1409*/ meltfptr[1408]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1398*/ meltfptr[1397]); /*putupl#545 */ melt_assertmsg ("putupl #545 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1409*/ meltfptr[1408])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #545 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1409*/ meltfptr[1408])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1409*/ meltfptr[1408]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1401*/ meltfptr[1400]); /*putupl#546 */ melt_assertmsg ("putupl #546 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1409*/ meltfptr[1408])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #546 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1409*/ meltfptr[1408])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1409*/ meltfptr[1408]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1404*/ meltfptr[1403]); /*putupl#547 */ melt_assertmsg ("putupl #547 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1409*/ meltfptr[1408])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #547 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1409*/ meltfptr[1408])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1409*/ meltfptr[1408]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V1405*/ meltfptr[1404]); /*putupl#548 */ melt_assertmsg ("putupl #548 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1409*/ meltfptr[1408])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #548 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1409*/ meltfptr[1408])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1409*/ meltfptr[1408]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1408*/ meltfptr[1407]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1409*/ meltfptr[1408]); MELT_LOCATION ("warmelt-normatch.melt:5909:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1410*/ meltfptr[1409])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1410*/ meltfptr[1409])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1410*/ meltfptr[1409]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1411*/ meltfptr[1410]); MELT_LOCATION ("warmelt-normatch.melt:5909:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1410*/ meltfptr[1409]); MELT_LOCATION ("warmelt-normatch.melt:5909:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1410*/ meltfptr[1409], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1412*/ meltfptr[1411])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1413*/ meltfptr[1412]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1412*/ meltfptr[1411]); melt_dbgtrace_written_object ( /*_.VALDATA___V1412*/ meltfptr[1411], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5913:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1414*/ meltfptr[1413])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1414*/ meltfptr[1413])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1414*/ meltfptr[1413]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V993*/ meltfptr[992]); MELT_LOCATION ("warmelt-normatch.melt:5913:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1414*/ meltfptr[1413])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1414*/ meltfptr[1413])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1414*/ meltfptr[1413]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normatch.melt:5913:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1414*/ meltfptr[1413]); MELT_LOCATION ("warmelt-normatch.melt:5913:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1414*/ meltfptr[1413], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5913:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1415*/ meltfptr[1414])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1415*/ meltfptr[1414])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1415*/ meltfptr[1414]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1102*/ meltfptr[1101]); MELT_LOCATION ("warmelt-normatch.melt:5913:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1415*/ meltfptr[1414])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1415*/ meltfptr[1414])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1415*/ meltfptr[1414]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normatch.melt:5913:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1415*/ meltfptr[1414]); MELT_LOCATION ("warmelt-normatch.melt:5913:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1415*/ meltfptr[1414], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5913:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1416*/ meltfptr[1415])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1416*/ meltfptr[1415])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1416*/ meltfptr[1415]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1399*/ meltfptr[1398]); MELT_LOCATION ("warmelt-normatch.melt:5913:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1416*/ meltfptr[1415])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1416*/ meltfptr[1415])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1416*/ meltfptr[1415]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normatch.melt:5913:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1416*/ meltfptr[1415]); MELT_LOCATION ("warmelt-normatch.melt:5913:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1416*/ meltfptr[1415], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5913:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1417*/ meltfptr[1416])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1417*/ meltfptr[1416])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1417*/ meltfptr[1416]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1402*/ meltfptr[1401]); MELT_LOCATION ("warmelt-normatch.melt:5913:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1417*/ meltfptr[1416])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normatch.melt:5913:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1417*/ meltfptr[1416]); MELT_LOCATION ("warmelt-normatch.melt:5913:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1417*/ meltfptr[1416], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1418*/ meltfptr[1417])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1418*/ meltfptr[1417])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1418*/ meltfptr[1417]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1419*/ meltfptr[1418]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1418*/ meltfptr[1417]); melt_dbgtrace_written_object ( /*_.VALDATA___V1418*/ meltfptr[1417], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5913:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1420*/ meltfptr[1419])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1420*/ meltfptr[1419])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1420*/ meltfptr[1419]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1418*/ meltfptr[1417]); MELT_LOCATION ("warmelt-normatch.melt:5913:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1420*/ meltfptr[1419])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1420*/ meltfptr[1419])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1420*/ meltfptr[1419]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normatch.melt:5913:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1420*/ meltfptr[1419]); MELT_LOCATION ("warmelt-normatch.melt:5913:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1420*/ meltfptr[1419], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5913:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1421*/ meltfptr[1420])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1421*/ meltfptr[1420])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1421*/ meltfptr[1420]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1332*/ meltfptr[1331]); MELT_LOCATION ("warmelt-normatch.melt:5913:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1421*/ meltfptr[1420])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normatch.melt:5913:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1421*/ meltfptr[1420]); MELT_LOCATION ("warmelt-normatch.melt:5913:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1421*/ meltfptr[1420], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1422*/ meltfptr[1421])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1422*/ meltfptr[1421])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1422*/ meltfptr[1421]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1423*/ meltfptr[1422]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1422*/ meltfptr[1421]); melt_dbgtrace_written_object ( /*_.VALDATA___V1422*/ meltfptr[1421], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5913:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1424*/ meltfptr[1423])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1424*/ meltfptr[1423])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1424*/ meltfptr[1423]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1422*/ meltfptr[1421]); MELT_LOCATION ("warmelt-normatch.melt:5913:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1424*/ meltfptr[1423])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1424*/ meltfptr[1423])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1424*/ meltfptr[1423]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normatch.melt:5913:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1424*/ meltfptr[1423]); MELT_LOCATION ("warmelt-normatch.melt:5913:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1424*/ meltfptr[1423], "new static instance"); /*putupl#549 */ melt_assertmsg ("putupl #549 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1425*/ meltfptr[1424])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #549 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1425*/ meltfptr[1424])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1425*/ meltfptr[1424]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V1414*/ meltfptr[1413]); /*putupl#550 */ melt_assertmsg ("putupl #550 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1425*/ meltfptr[1424])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #550 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1425*/ meltfptr[1424])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1425*/ meltfptr[1424]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1415*/ meltfptr[1414]); /*putupl#551 */ melt_assertmsg ("putupl #551 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1425*/ meltfptr[1424])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #551 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1425*/ meltfptr[1424])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1425*/ meltfptr[1424]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1416*/ meltfptr[1415]); /*putupl#552 */ melt_assertmsg ("putupl #552 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1425*/ meltfptr[1424])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #552 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1425*/ meltfptr[1424])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1425*/ meltfptr[1424]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1417*/ meltfptr[1416]); /*putupl#553 */ melt_assertmsg ("putupl #553 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1425*/ meltfptr[1424])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #553 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1425*/ meltfptr[1424])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1425*/ meltfptr[1424]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V1420*/ meltfptr[1419]); /*putupl#554 */ melt_assertmsg ("putupl #554 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1425*/ meltfptr[1424])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #554 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1425*/ meltfptr[1424])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1425*/ meltfptr[1424]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1421*/ meltfptr[1420]); /*putupl#555 */ melt_assertmsg ("putupl #555 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1425*/ meltfptr[1424])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #555 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1425*/ meltfptr[1424])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1425*/ meltfptr[1424]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1424*/ meltfptr[1423]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1425*/ meltfptr[1424]); MELT_LOCATION ("warmelt-normatch.melt:5913:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1426*/ meltfptr[1425])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1426*/ meltfptr[1425])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1426*/ meltfptr[1425]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1427*/ meltfptr[1426]); MELT_LOCATION ("warmelt-normatch.melt:5913:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1426*/ meltfptr[1425]); MELT_LOCATION ("warmelt-normatch.melt:5913:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1426*/ meltfptr[1425], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:5917:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1428*/ meltfptr[1427])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1332__NORMTESTMATCH_CATCHALL#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1428*/ meltfptr[1427])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:5917:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1428*/ meltfptr[1427])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1332__NORMTESTMATCH_CATCHALL#1", NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1428*/ meltfptr[1427])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:5917:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1428*/ meltfptr[1427]); #undef meltfram__ } /*end of meltmod__warmelt_normatch__initialmeltchunk_28 */ void meltmod__warmelt_normatch__initialmeltchunk_29 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*putclosurout#101*/ melt_assertmsg ("putclosrout#101 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1429*/ meltfptr[1428])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#101 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1428*/ meltfptr[1427])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1429*/ meltfptr[1428])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1428*/ meltfptr[1427]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1429*/ meltfptr[1428]); MELT_LOCATION ("warmelt-normatch.melt:5931:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1430*/ meltfptr[1429])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1334__NORMFILLMATCH_CATCHALL#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1430*/ meltfptr[1429])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:5931:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1430*/ meltfptr[1429])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1334__NORMFILLMATCH_CATCHALL#1", NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1430*/ meltfptr[1429])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:5931:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1430*/ meltfptr[1429]); /*putclosurout#102 */ melt_assertmsg ("putclosrout#102 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1431*/ meltfptr[1430])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#102 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1430*/ meltfptr[1429])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1431*/ meltfptr[1430])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1430*/ meltfptr[1429]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1431*/ meltfptr[1430]); MELT_LOCATION ("warmelt-normatch.melt:5943:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1432*/ meltfptr[1431])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1336__NORMTESTMATCH_CMATCHER#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1432*/ meltfptr[1431])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:5943:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1432*/ meltfptr[1431])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1336__NORMTESTMATCH_CMATCHER#1", NULL != ( /*_.CLASS_CMATCHER__V91*/ meltfptr[90])); ((meltroutine_ptr_t) /*_.VALROUT___V1432*/ meltfptr[1431])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_CMATCHER__V91*/ meltfptr[90]); MELT_LOCATION ("warmelt-normatch.melt:5943:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1432*/ meltfptr[1431])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1279*/ meltfptr[1278]); ((meltroutine_ptr_t) /*_.VALROUT___V1432*/ meltfptr[1431])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278]); MELT_LOCATION ("warmelt-normatch.melt:5943:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1432*/ meltfptr[1431])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1336__NORMTESTMATCH_CMATCHER#3", NULL != ( /*_.CLASS_ANY_BINDING__V58*/ meltfptr[57])); ((meltroutine_ptr_t) /*_.VALROUT___V1432*/ meltfptr[1431])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V58*/ meltfptr[57]); MELT_LOCATION ("warmelt-normatch.melt:5943:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1432*/ meltfptr[1431])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1336__NORMTESTMATCH_CMATCHER#4", NULL != ( /*_.DISCR_MULTIPLE__V45*/ meltfptr[44])); ((meltroutine_ptr_t) /*_.VALROUT___V1432*/ meltfptr[1431])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V45*/ meltfptr[44]); MELT_LOCATION ("warmelt-normatch.melt:5943:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1432*/ meltfptr[1431])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1336__NORMTESTMATCH_CMATCHER#5", NULL != ( /*_.CLONE_SYMBOL__V49*/ meltfptr[48])); ((meltroutine_ptr_t) /*_.VALROUT___V1432*/ meltfptr[1431])->tabval[5] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V49*/ meltfptr[48]); MELT_LOCATION ("warmelt-normatch.melt:5943:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1432*/ meltfptr[1431])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1336__NORMTESTMATCH_CMATCHER#6", NULL != ( /*_.DISCR_STRBUF__V67*/ meltfptr[66])); ((meltroutine_ptr_t) /*_.VALROUT___V1432*/ meltfptr[1431])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V67*/ meltfptr[66]); MELT_LOCATION ("warmelt-normatch.melt:5943:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1432*/ meltfptr[1431])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1336__NORMTESTMATCH_CMATCHER#7", NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1432*/ meltfptr[1431])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:5943:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1432*/ meltfptr[1431])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1336__NORMTESTMATCH_CMATCHER#8", NULL != ( /*_.CLASS_CLONED_SYMBOL__V66*/ meltfptr[65])); ((meltroutine_ptr_t) /*_.VALROUT___V1432*/ meltfptr[1431])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V66*/ meltfptr[65]); MELT_LOCATION ("warmelt-normatch.melt:5943:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1432*/ meltfptr[1431])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1336__NORMTESTMATCH_CMATCHER#9", NULL != ( /*_.DISCR_VERBATIM_STRING__V83*/ meltfptr[82])); ((meltroutine_ptr_t) /*_.VALROUT___V1432*/ meltfptr[1431])->tabval[9] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V83*/ meltfptr[82]); MELT_LOCATION ("warmelt-normatch.melt:5943:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1432*/ meltfptr[1431])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1336__NORMTESTMATCH_CMATCHER#10", NULL != ( /*_.CLASS_NREP_CHUNK__V81*/ meltfptr[80])); ((meltroutine_ptr_t) /*_.VALROUT___V1432*/ meltfptr[1431])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_NREP_CHUNK__V81*/ meltfptr[80]); MELT_LOCATION ("warmelt-normatch.melt:5943:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1432*/ meltfptr[1431])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1336__NORMTESTMATCH_CMATCHER#11", NULL != ( /*_.CTYPE_LONG__V82*/ meltfptr[81])); ((meltroutine_ptr_t) /*_.VALROUT___V1432*/ meltfptr[1431])->tabval[11] = (melt_ptr_t) ( /*_.CTYPE_LONG__V82*/ meltfptr[81]); MELT_LOCATION ("warmelt-normatch.melt:5943:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1432*/ meltfptr[1431])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1336__NORMTESTMATCH_CMATCHER#12", NULL != ( /*_.CLASS_NREP_IF__V90*/ meltfptr[89])); ((meltroutine_ptr_t) /*_.VALROUT___V1432*/ meltfptr[1431])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_NREP_IF__V90*/ meltfptr[89]); MELT_LOCATION ("warmelt-normatch.melt:5943:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1432*/ meltfptr[1431])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1336__NORMTESTMATCH_CMATCHER#13", NULL != ( /*_.CTYPE_VOID__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V1432*/ meltfptr[1431])->tabval[13] = (melt_ptr_t) ( /*_.CTYPE_VOID__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normatch.melt:5943:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1432*/ meltfptr[1431])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1336__NORMTESTMATCH_CMATCHER#14", NULL != ( /*_.DISCR_MAP_OBJECTS__V33*/ meltfptr[32])); ((meltroutine_ptr_t) /*_.VALROUT___V1432*/ meltfptr[1431])->tabval[14] = (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V33*/ meltfptr[32]); MELT_LOCATION ("warmelt-normatch.melt:5943:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1432*/ meltfptr[1431])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1336__NORMTESTMATCH_CMATCHER#15", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V1432*/ meltfptr[1431])->tabval[15] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-normatch.melt:5943:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1432*/ meltfptr[1431])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1336__NORMTESTMATCH_CMATCHER#16", NULL != ( /*_.CLASS_LET_BINDING__V47*/ meltfptr[46])); ((meltroutine_ptr_t) /*_.VALROUT___V1432*/ meltfptr[1431])->tabval[16] = (melt_ptr_t) ( /*_.CLASS_LET_BINDING__V47*/ meltfptr[46]); MELT_LOCATION ("warmelt-normatch.melt:5943:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1432*/ meltfptr[1431])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1336__NORMTESTMATCH_CMATCHER#17", NULL != ( /*_.CLASS_SYMBOL__V34*/ meltfptr[33])); ((meltroutine_ptr_t) /*_.VALROUT___V1432*/ meltfptr[1431])->tabval[17] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V34*/ meltfptr[33]); MELT_LOCATION ("warmelt-normatch.melt:5943:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1432*/ meltfptr[1431])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1336__NORMTESTMATCH_CMATCHER#18", NULL != ( /*_.CLASS_NREP__V56*/ meltfptr[55])); ((meltroutine_ptr_t) /*_.VALROUT___V1432*/ meltfptr[1431])->tabval[18] = (melt_ptr_t) ( /*_.CLASS_NREP__V56*/ meltfptr[55]); MELT_LOCATION ("warmelt-normatch.melt:5943:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1432*/ meltfptr[1431]); /*putclosurout#103 */ melt_assertmsg ("putclosrout#103 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1433*/ meltfptr[1432])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#103 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1432*/ meltfptr[1431])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1433*/ meltfptr[1432])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1432*/ meltfptr[1431]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1433*/ meltfptr[1432]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1434*/ meltfptr[1433])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1435*/ meltfptr[1434]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1434*/ meltfptr[1433]); melt_dbgtrace_written_object ( /*_.VALDATA___V1434*/ meltfptr[1433], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:6028:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) 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_1340__NORMFILLMATCH_CMATCHER#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1436*/ meltfptr[1435])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:6028:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) 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_1340__NORMFILLMATCH_CMATCHER#1", NULL != ( /*_.CLASS_CMATCHER__V91*/ meltfptr[90])); ((meltroutine_ptr_t) /*_.VALROUT___V1436*/ meltfptr[1435])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_CMATCHER__V91*/ meltfptr[90]); MELT_LOCATION ("warmelt-normatch.melt:6028:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) 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_1340__NORMFILLMATCH_CMATCHER#2", NULL != ( /*_.DISCR_MULTIPLE__V45*/ meltfptr[44])); ((meltroutine_ptr_t) /*_.VALROUT___V1436*/ meltfptr[1435])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V45*/ meltfptr[44]); MELT_LOCATION ("warmelt-normatch.melt:6028:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) 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_1340__NORMFILLMATCH_CMATCHER#3", NULL != ( /*_.CLASS_NREP_CHUNK__V81*/ meltfptr[80])); ((meltroutine_ptr_t) /*_.VALROUT___V1436*/ meltfptr[1435])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NREP_CHUNK__V81*/ meltfptr[80]); MELT_LOCATION ("warmelt-normatch.melt:6028:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) 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_1340__NORMFILLMATCH_CMATCHER#4", NULL != ( /*_.CTYPE_VOID__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V1436*/ meltfptr[1435])->tabval[4] = (melt_ptr_t) ( /*_.CTYPE_VOID__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normatch.melt:6028:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) 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_1340__NORMFILLMATCH_CMATCHER#5", NULL != ( /*_.CLASS_ANY_BINDING__V58*/ meltfptr[57])); ((meltroutine_ptr_t) /*_.VALROUT___V1436*/ meltfptr[1435])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V58*/ meltfptr[57]); MELT_LOCATION ("warmelt-normatch.melt:6028:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) 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_1340__NORMFILLMATCH_CMATCHER#6", NULL != ( /*_.CLASS_FORMAL_BINDING__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V1436*/ meltfptr[1435])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normatch.melt:6028:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) 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_1340__NORMFILLMATCH_CMATCHER#7", NULL != ( /*_.CLASS_SYMBOL__V34*/ meltfptr[33])); ((meltroutine_ptr_t) /*_.VALROUT___V1436*/ meltfptr[1435])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V34*/ meltfptr[33]); MELT_LOCATION ("warmelt-normatch.melt:6028:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1436*/ meltfptr[1435]); /*putclosurout#104 */ melt_assertmsg ("putclosrout#104 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1437*/ meltfptr[1436])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#104 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1436*/ meltfptr[1435])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1437*/ meltfptr[1436])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1436*/ meltfptr[1435]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1437*/ meltfptr[1436]); MELT_LOCATION ("warmelt-normatch.melt:6104:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1438*/ meltfptr[1437])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1342__NORMSTEP_MTESTMATCHER#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:6104:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1438*/ meltfptr[1437])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V935*/ meltfptr[934]); ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V935*/ meltfptr[934]); MELT_LOCATION ("warmelt-normatch.melt:6104:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1438*/ meltfptr[1437])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1279*/ meltfptr[1278]); ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278]); MELT_LOCATION ("warmelt-normatch.melt:6104:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1438*/ meltfptr[1437])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1342__NORMSTEP_MTESTMATCHER#3", NULL != ( /*_.CLASS_ANY_MATCHER__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_ANY_MATCHER__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normatch.melt:6104:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1438*/ meltfptr[1437])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1348*/ meltfptr[1347]); ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V1348*/ meltfptr[1347]); MELT_LOCATION ("warmelt-normatch.melt:6104:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1438*/ meltfptr[1437])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1366*/ meltfptr[1365]); ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1366*/ meltfptr[1365]); MELT_LOCATION ("warmelt-normatch.melt:6104:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1438*/ meltfptr[1437])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1223*/ meltfptr[1222]); ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1223*/ meltfptr[1222]); MELT_LOCATION ("warmelt-normatch.melt:6104:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1438*/ meltfptr[1437])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1344*/ meltfptr[1343]); ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[7] = (melt_ptr_t) ( /*_.VALCLO___V1344*/ meltfptr[1343]); MELT_LOCATION ("warmelt-normatch.melt:6104:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1438*/ meltfptr[1437])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V627*/ meltfptr[626]); ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V627*/ meltfptr[626]); MELT_LOCATION ("warmelt-normatch.melt:6104:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1438*/ meltfptr[1437])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1342__NORMSTEP_MTESTMATCHER#9", NULL != ( /*_.FRESH_ENV__V60*/ meltfptr[59])); ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[9] = (melt_ptr_t) ( /*_.FRESH_ENV__V60*/ meltfptr[59]); MELT_LOCATION ("warmelt-normatch.melt:6104:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1438*/ meltfptr[1437])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1342__NORMSTEP_MTESTMATCHER#10", NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[10] = (melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-normatch.melt:6104:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1438*/ meltfptr[1437])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1342__NORMSTEP_MTESTMATCHER#11", NULL != ( /*_.DISCR_MULTIPLE__V45*/ meltfptr[44])); ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[11] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V45*/ meltfptr[44]); MELT_LOCATION ("warmelt-normatch.melt:6104:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1438*/ meltfptr[1437])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1342__NORMSTEP_MTESTMATCHER#12", NULL != ( /*_.CLASS_ENVIRONMENT__V69*/ meltfptr[68])); ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V69*/ meltfptr[68]); MELT_LOCATION ("warmelt-normatch.melt:6104:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1438*/ meltfptr[1437])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1342__NORMSTEP_MTESTMATCHER#13", NULL != ( /*_.CLASS_FORMAL_BINDING__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[13] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normatch.melt:6104:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1438*/ meltfptr[1437])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1342__NORMSTEP_MTESTMATCHER#14", NULL != ( /*_.CLASS_ANY_BINDING__V58*/ meltfptr[57])); ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[14] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V58*/ meltfptr[57]); MELT_LOCATION ("warmelt-normatch.melt:6104:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1438*/ meltfptr[1437])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1342__NORMSTEP_MTESTMATCHER#15", NULL != ( /*_.GET_CTYPE__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[15] = (melt_ptr_t) ( /*_.GET_CTYPE__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normatch.melt:6104:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1438*/ meltfptr[1437])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1342__NORMSTEP_MTESTMATCHER#16", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[16] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-normatch.melt:6104:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1438*/ meltfptr[1437])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1342__NORMSTEP_MTESTMATCHER#17", NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[17] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:6104:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1438*/ meltfptr[1437])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1342__NORMSTEP_MTESTMATCHER#18", NULL != ( /*_.PUT_ENV__V61*/ meltfptr[60])); ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[18] = (melt_ptr_t) ( /*_.PUT_ENV__V61*/ meltfptr[60]); MELT_LOCATION ("warmelt-normatch.melt:6104:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1438*/ meltfptr[1437])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V695*/ meltfptr[694]); ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[19] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); MELT_LOCATION ("warmelt-normatch.melt:6104:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1438*/ meltfptr[1437])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V973*/ meltfptr[972]); ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[20] = (melt_ptr_t) ( /*_.VALDATA___V973*/ meltfptr[972]); MELT_LOCATION ("warmelt-normatch.melt:6104:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1438*/ meltfptr[1437])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1410*/ meltfptr[1409]); ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[21] = (melt_ptr_t) ( /*_.VALDATA___V1410*/ meltfptr[1409]); MELT_LOCATION ("warmelt-normatch.melt:6104:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1438*/ meltfptr[1437])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1426*/ meltfptr[1425]); ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[22] = (melt_ptr_t) ( /*_.VALDATA___V1426*/ meltfptr[1425]); MELT_LOCATION ("warmelt-normatch.melt:6104:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1438*/ meltfptr[1437]); /*putclosurout#105 */ melt_assertmsg ("putclosrout#105 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1439*/ meltfptr[1438])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#105 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1438*/ meltfptr[1437])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1439*/ meltfptr[1438])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1438*/ meltfptr[1437]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1439*/ meltfptr[1438]); MELT_LOCATION ("warmelt-normatch.melt:6361:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1440*/ meltfptr[1439])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1348__MATCHALT_HANDLE_NORMALIZED_MDATA#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1440*/ meltfptr[1439])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:6361:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1440*/ meltfptr[1439])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V695*/ meltfptr[694]); ((meltroutine_ptr_t) /*_.VALROUT___V1440*/ meltfptr[1439])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); MELT_LOCATION ("warmelt-normatch.melt:6361:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1440*/ meltfptr[1439])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1348__MATCHALT_HANDLE_NORMALIZED_MDATA#2", NULL != ( /*_.CLASS_NREP_SIMPLE__V75*/ meltfptr[74])); ((meltroutine_ptr_t) /*_.VALROUT___V1440*/ meltfptr[1439])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NREP_SIMPLE__V75*/ meltfptr[74]); MELT_LOCATION ("warmelt-normatch.melt:6361:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1440*/ meltfptr[1439])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1340*/ meltfptr[1339]); ((meltroutine_ptr_t) /*_.VALROUT___V1440*/ meltfptr[1439])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V1340*/ meltfptr[1339]); MELT_LOCATION ("warmelt-normatch.melt:6361:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1440*/ meltfptr[1439])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1348__MATCHALT_HANDLE_NORMALIZED_MDATA#4", NULL != ( /*_.DISCR_MULTIPLE__V45*/ meltfptr[44])); ((meltroutine_ptr_t) /*_.VALROUT___V1440*/ meltfptr[1439])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V45*/ meltfptr[44]); MELT_LOCATION ("warmelt-normatch.melt:6361:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1440*/ meltfptr[1439])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1348*/ meltfptr[1347]); ((meltroutine_ptr_t) /*_.VALROUT___V1440*/ meltfptr[1439])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1348*/ meltfptr[1347]); MELT_LOCATION ("warmelt-normatch.melt:6361:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1440*/ meltfptr[1439]); /*putclosurout#106 */ melt_assertmsg ("putclosrout#106 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1441*/ meltfptr[1440])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#106 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1440*/ meltfptr[1439])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1441*/ meltfptr[1440])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1440*/ meltfptr[1439]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1441*/ meltfptr[1440]); MELT_LOCATION ("warmelt-normatch.melt:6398:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1442*/ meltfptr[1441])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1350__MATCHALT_MAKE_MATCH_NORMALIZATION_CONTEXT#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1442*/ meltfptr[1441])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:6398:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1442*/ meltfptr[1441])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1177*/ meltfptr[1176]); ((meltroutine_ptr_t) /*_.VALROUT___V1442*/ meltfptr[1441])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1177*/ meltfptr[1176]); MELT_LOCATION ("warmelt-normatch.melt:6398:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1442*/ meltfptr[1441])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1350__MATCHALT_MAKE_MATCH_NORMALIZATION_CONTEXT#2", NULL != ( /*_.CLONE_SYMBOL__V49*/ meltfptr[48])); ((meltroutine_ptr_t) /*_.VALROUT___V1442*/ meltfptr[1441])->tabval[2] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V49*/ meltfptr[48]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1443*/ meltfptr[1442])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1443*/ meltfptr[1442])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1443*/ meltfptr[1442]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1444*/ meltfptr[1443]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1443*/ meltfptr[1442]); melt_dbgtrace_written_object ( /*_.VALDATA___V1443*/ meltfptr[1442], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:6398:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1442*/ meltfptr[1441])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1350__MATCHALT_MAKE_MATCH_NORMALIZATION_CONTEXT#3", NULL != ( /*_.VALDATA___V1443*/ meltfptr[1442])); ((meltroutine_ptr_t) /*_.VALROUT___V1442*/ meltfptr[1441])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1443*/ meltfptr[1442]); MELT_LOCATION ("warmelt-normatch.melt:6398:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1442*/ meltfptr[1441])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1350__MATCHALT_MAKE_MATCH_NORMALIZATION_CONTEXT#4", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V1442*/ meltfptr[1441])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-normatch.melt:6398:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1442*/ meltfptr[1441])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1350__MATCHALT_MAKE_MATCH_NORMALIZATION_CONTEXT#5", NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1442*/ meltfptr[1441])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normatch.melt:6398:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1442*/ meltfptr[1441])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1350__MATCHALT_MAKE_MATCH_NORMALIZATION_CONTEXT#6", NULL != ( /*_.DISCR_MAP_OBJECTS__V33*/ meltfptr[32])); ((meltroutine_ptr_t) /*_.VALROUT___V1442*/ meltfptr[1441])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V33*/ meltfptr[32]); MELT_LOCATION ("warmelt-normatch.melt:6398:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1442*/ meltfptr[1441])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1350__MATCHALT_MAKE_MATCH_NORMALIZATION_CONTEXT#7", NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1442*/ meltfptr[1441])->tabval[7] = (melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-normatch.melt:6398:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1442*/ meltfptr[1441])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1217*/ meltfptr[1216]); ((meltroutine_ptr_t) /*_.VALROUT___V1442*/ meltfptr[1441])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V1217*/ meltfptr[1216]); MELT_LOCATION ("warmelt-normatch.melt:6398:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1442*/ meltfptr[1441])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1279*/ meltfptr[1278]); ((meltroutine_ptr_t) /*_.VALROUT___V1442*/ meltfptr[1441])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278]); MELT_LOCATION ("warmelt-normatch.melt:6398:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1442*/ meltfptr[1441]); /*putclosurout#107 */ melt_assertmsg ("putclosrout#107 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1445*/ meltfptr[1444])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#107 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1442*/ meltfptr[1441])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1445*/ meltfptr[1444])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1442*/ meltfptr[1441]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1445*/ meltfptr[1444]); MELT_LOCATION ("warmelt-normatch.melt:6462:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1446*/ meltfptr[1445])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1354__MATCHALT_NORMALIZE_MATCH_CONTEXT#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:6462:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1446*/ meltfptr[1445])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1279*/ meltfptr[1278]); ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1279*/ meltfptr[1278]); MELT_LOCATION ("warmelt-normatch.melt:6462:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1446*/ meltfptr[1445])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1366*/ meltfptr[1365]); ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[2] = (melt_ptr_t) ( /*_.VALCLO___V1366*/ meltfptr[1365]); MELT_LOCATION ("warmelt-normatch.melt:6462:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1446*/ meltfptr[1445])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V695*/ meltfptr[694]); ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); MELT_LOCATION ("warmelt-normatch.melt:6462:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1446*/ meltfptr[1445])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1354__MATCHALT_NORMALIZE_MATCH_CONTEXT#4", NULL != ( /*_.CLASS_NREP_SIMPLE__V75*/ meltfptr[74])); ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_NREP_SIMPLE__V75*/ meltfptr[74]); MELT_LOCATION ("warmelt-normatch.melt:6462:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1446*/ meltfptr[1445])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1441*/ meltfptr[1440]); ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1441*/ meltfptr[1440]); MELT_LOCATION ("warmelt-normatch.melt:6462:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1446*/ meltfptr[1445])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1337*/ meltfptr[1336]); ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1337*/ meltfptr[1336]); MELT_LOCATION ("warmelt-normatch.melt:6462:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1446*/ meltfptr[1445])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1354__MATCHALT_NORMALIZE_MATCH_CONTEXT#7", NULL != ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35])); ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]); MELT_LOCATION ("warmelt-normatch.melt:6462:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1446*/ meltfptr[1445])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1354__MATCHALT_NORMALIZE_MATCH_CONTEXT#8", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[8] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:6511:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1447*/ meltfptr[1446])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1356__LAMBDA_#0", NULL != ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35])); ((meltroutine_ptr_t) /*_.VALROUT___V1447*/ meltfptr[1446])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_EXPRESSION__V36*/ meltfptr[35]); MELT_LOCATION ("warmelt-normatch.melt:6511:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1447*/ meltfptr[1446])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1356__LAMBDA_#1", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1447*/ meltfptr[1446])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:6511:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1447*/ meltfptr[1446]); MELT_LOCATION ("warmelt-normatch.melt:6462:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1446*/ meltfptr[1445])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1354__MATCHALT_NORMALIZE_MATCH_CONTEXT#9", NULL != ( /*_.VALROUT___V1447*/ meltfptr[1446])); ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[9] = (melt_ptr_t) ( /*_.VALROUT___V1447*/ meltfptr[1446]); MELT_LOCATION ("warmelt-normatch.melt:6462:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1446*/ meltfptr[1445]); /*putclosurout#108 */ melt_assertmsg ("putclosrout#108 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1448*/ meltfptr[1447])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#108 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1446*/ meltfptr[1445])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1448*/ meltfptr[1447])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1446*/ meltfptr[1445]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1448*/ meltfptr[1447]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1357__NORMEXP_MATCHALT#0", NULL != ( /*_.CLASS_SOURCE_MATCH__V68*/ meltfptr[67])); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_MATCH__V68*/ meltfptr[67]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1357__NORMEXP_MATCHALT#1", NULL != ( /*_.CLASS_ENVIRONMENT__V69*/ meltfptr[68])); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V69*/ meltfptr[68]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1357__NORMEXP_MATCHALT#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V42*/ meltfptr[41])); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V42*/ meltfptr[41]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1357__NORMEXP_MATCHALT#3", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1357__NORMEXP_MATCHALT#4", NULL != ( /*_.CLONE_SYMBOL__V49*/ meltfptr[48])); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[4] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V49*/ meltfptr[48]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1450*/ meltfptr[1449])) == 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]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1451*/ meltfptr[1450]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1450*/ meltfptr[1449]); melt_dbgtrace_written_object ( /*_.VALDATA___V1450*/ meltfptr[1449], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1357__NORMEXP_MATCHALT#5", NULL != ( /*_.VALDATA___V1450*/ meltfptr[1449])); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1450*/ meltfptr[1449]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1357__NORMEXP_MATCHALT#6", NULL != ( /*_.CLASS_NREP_CHECKSIGNAL__V70*/ meltfptr[69])); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_NREP_CHECKSIGNAL__V70*/ meltfptr[69]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1357__NORMEXP_MATCHALT#7", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1357__NORMEXP_MATCHALT#8", NULL != ( /*_.CTYPE_VOID__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[8] = (melt_ptr_t) ( /*_.CTYPE_VOID__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1357__NORMEXP_MATCHALT#9", NULL != ( /*_.NORMAL_EXP__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[9] = (melt_ptr_t) ( /*_.NORMAL_EXP__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1357__NORMEXP_MATCHALT#10", NULL != ( /*_.GET_CTYPE__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[10] = (melt_ptr_t) ( /*_.GET_CTYPE__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1357__NORMEXP_MATCHALT#11", NULL != ( /*_.DISCR_MULTIPLE__V45*/ meltfptr[44])); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[11] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V45*/ meltfptr[44]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1357__NORMEXP_MATCHALT#12", NULL != ( /*_.DISCR_LIST__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[12] = (melt_ptr_t) ( /*_.DISCR_LIST__V38*/ meltfptr[37]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1452*/ meltfptr[1451])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1452*/ meltfptr[1451])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1452*/ meltfptr[1451]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1453*/ meltfptr[1452]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1452*/ meltfptr[1451]); #undef meltfram__ } /*end of meltmod__warmelt_normatch__initialmeltchunk_29 */ void meltmod__warmelt_normatch__initialmeltchunk_30 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; melt_dbgtrace_written_object ( /*_.VALDATA___V1452*/ meltfptr[1451], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1357__NORMEXP_MATCHALT#13", NULL != ( /*_.VALDATA___V1452*/ meltfptr[1451])); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V1452*/ meltfptr[1451]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1357__NORMEXP_MATCHALT#14", NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[14] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1357__NORMEXP_MATCHALT#15", NULL != ( /*_.CLASS_NREP_SYMOCC__V46*/ meltfptr[45])); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[15] = (melt_ptr_t) ( /*_.CLASS_NREP_SYMOCC__V46*/ meltfptr[45]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V717*/ meltfptr[716]); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[16] = (melt_ptr_t) ( /*_.VALDATA___V717*/ meltfptr[716]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1217*/ meltfptr[1216]); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[17] = (melt_ptr_t) ( /*_.VALDATA___V1217*/ meltfptr[1216]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V627*/ meltfptr[626]); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[18] = (melt_ptr_t) ( /*_.VALDATA___V627*/ meltfptr[626]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1357__NORMEXP_MATCHALT#19", NULL != ( /*_.CLASS_SOURCE_MATCH_CASE__V72*/ meltfptr[71])); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[19] = (melt_ptr_t) ( /*_.CLASS_SOURCE_MATCH_CASE__V72*/ meltfptr[71]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V673*/ meltfptr[672]); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[20] = (melt_ptr_t) ( /*_.VALDATA___V673*/ meltfptr[672]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1357__NORMEXP_MATCHALT#21", NULL != ( /*_.DISCR_CONSTANT_INTEGER__V51*/ meltfptr[50])); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[21] = (melt_ptr_t) ( /*_.DISCR_CONSTANT_INTEGER__V51*/ meltfptr[50]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1041*/ meltfptr[1040]); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[22] = (melt_ptr_t) ( /*_.VALCLO___V1041*/ meltfptr[1040]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1357__NORMEXP_MATCHALT#23", NULL != ( /*_.CLASS_LOCATED__V21*/ meltfptr[20])); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[23] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1170*/ meltfptr[1169]); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[24] = (melt_ptr_t) ( /*_.VALCLO___V1170*/ meltfptr[1169]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V841*/ meltfptr[840]); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[25] = (melt_ptr_t) ( /*_.VALDATA___V841*/ meltfptr[840]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1357__NORMEXP_MATCHALT#26", NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[26] = (melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1357__NORMEXP_MATCHALT#27", NULL != ( /*_.FRESH_ENV__V60*/ meltfptr[59])); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[27] = (melt_ptr_t) ( /*_.FRESH_ENV__V60*/ meltfptr[59]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1357__NORMEXP_MATCHALT#28", NULL != ( /*_.PUT_ENV__V61*/ meltfptr[60])); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[28] = (melt_ptr_t) ( /*_.PUT_ENV__V61*/ meltfptr[60]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1357__NORMEXP_MATCHALT#29", NULL != ( /*_.CLASS_CTYPE__V20*/ meltfptr[19])); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[29] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V544*/ meltfptr[543]); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[30] = (melt_ptr_t) ( /*_.VALDATA___V544*/ meltfptr[543]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1357__NORMEXP_MATCHALT#31", NULL != ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[31] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1375__MG_ALTDRAW_GRAPHVIZ#0", NULL != ( /*_.DISCR_MAP_OBJECTS__V33*/ meltfptr[32])); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[0] = (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V33*/ meltfptr[32]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1375__MG_ALTDRAW_GRAPHVIZ#1", NULL != ( /*_.DISCR_STRBUF__V67*/ meltfptr[66])); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V67*/ meltfptr[66]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1375__MG_ALTDRAW_GRAPHVIZ#2", NULL != ( /*_.DISCR_INTEGER__V78*/ meltfptr[77])); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V78*/ meltfptr[77]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1375__MG_ALTDRAW_GRAPHVIZ#3", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1375__MG_ALTDRAW_GRAPHVIZ#4", NULL != ( /*_.DISCR_STRING__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_STRING__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V558*/ meltfptr[557]); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1375__MG_ALTDRAW_GRAPHVIZ#6", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[6] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V695*/ meltfptr[694]); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1375__MG_ALTDRAW_GRAPHVIZ#8", NULL != ( /*_.DISCR_STRBUF__V67*/ meltfptr[66])); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V67*/ meltfptr[66]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1375__MG_ALTDRAW_GRAPHVIZ#9", NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1375__MG_ALTDRAW_GRAPHVIZ#10", NULL != ( /*_.ADD2OUT__V77*/ meltfptr[76])); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[10] = (melt_ptr_t) ( /*_.ADD2OUT__V77*/ meltfptr[76]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1375__MG_ALTDRAW_GRAPHVIZ#11", NULL != ( /*_.CLASS_CLONED_SYMBOL__V66*/ meltfptr[65])); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[11] = (melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V66*/ meltfptr[65]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1375__MG_ALTDRAW_GRAPHVIZ#12", NULL != ( /*_.DISCR_STRING__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[12] = (melt_ptr_t) ( /*_.DISCR_STRING__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normatch.melt:6866:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1456*/ meltfptr[1455])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1377__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1456*/ meltfptr[1455])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:6866:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1456*/ meltfptr[1455])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V695*/ meltfptr[694]); ((meltroutine_ptr_t) /*_.VALROUT___V1456*/ meltfptr[1455])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); MELT_LOCATION ("warmelt-normatch.melt:6866:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1456*/ meltfptr[1455])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1377__LAMBDA_#2", NULL != ( /*_.DISCR_STRBUF__V67*/ meltfptr[66])); ((meltroutine_ptr_t) /*_.VALROUT___V1456*/ meltfptr[1455])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V67*/ meltfptr[66]); MELT_LOCATION ("warmelt-normatch.melt:6866:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1456*/ meltfptr[1455])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1377__LAMBDA_#3", NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1456*/ meltfptr[1455])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:6866:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1456*/ meltfptr[1455])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1377__LAMBDA_#4", NULL != ( /*_.ADD2OUT__V77*/ meltfptr[76])); ((meltroutine_ptr_t) /*_.VALROUT___V1456*/ meltfptr[1455])->tabval[4] = (melt_ptr_t) ( /*_.ADD2OUT__V77*/ meltfptr[76]); MELT_LOCATION ("warmelt-normatch.melt:6866:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1456*/ meltfptr[1455])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1377__LAMBDA_#5", NULL != ( /*_.CLASS_CLONED_SYMBOL__V66*/ meltfptr[65])); ((meltroutine_ptr_t) /*_.VALROUT___V1456*/ meltfptr[1455])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V66*/ meltfptr[65]); MELT_LOCATION ("warmelt-normatch.melt:6866:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1456*/ meltfptr[1455])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1377__LAMBDA_#6", NULL != ( /*_.DISCR_STRING__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V1456*/ meltfptr[1455])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_STRING__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normatch.melt:6866:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1456*/ meltfptr[1455]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1375__MG_ALTDRAW_GRAPHVIZ#13", NULL != ( /*_.VALROUT___V1456*/ meltfptr[1455])); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[13] = (melt_ptr_t) ( /*_.VALROUT___V1456*/ meltfptr[1455]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1375__MG_ALTDRAW_GRAPHVIZ#14", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[14] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V763*/ meltfptr[762]); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[15] = (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1375__MG_ALTDRAW_GRAPHVIZ#16", NULL != ( /*_.DISCR_STRBUF__V67*/ meltfptr[66])); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[16] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V67*/ meltfptr[66]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1375__MG_ALTDRAW_GRAPHVIZ#17", NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[17] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V799*/ meltfptr[798]); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[18] = (melt_ptr_t) ( /*_.VALDATA___V799*/ meltfptr[798]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1375__MG_ALTDRAW_GRAPHVIZ#19", NULL != ( /*_.DISCR_STRING__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[19] = (melt_ptr_t) ( /*_.DISCR_STRING__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1013*/ meltfptr[1012]); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[20] = (melt_ptr_t) ( /*_.VALDATA___V1013*/ meltfptr[1012]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1021*/ meltfptr[1020]); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[21] = (melt_ptr_t) ( /*_.VALDATA___V1021*/ meltfptr[1020]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V769*/ meltfptr[768]); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[22] = (melt_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V859*/ meltfptr[858]); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[23] = (melt_ptr_t) ( /*_.VALDATA___V859*/ meltfptr[858]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V789*/ meltfptr[788]); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[24] = (melt_ptr_t) ( /*_.VALDATA___V789*/ meltfptr[788]); MELT_LOCATION ("warmelt-normatch.melt:6899:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1457*/ meltfptr[1456])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1378__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1457*/ meltfptr[1456])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:6899:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1457*/ meltfptr[1456])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V763*/ meltfptr[762]); ((meltroutine_ptr_t) /*_.VALROUT___V1457*/ meltfptr[1456])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]); MELT_LOCATION ("warmelt-normatch.melt:6899:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1457*/ meltfptr[1456])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1378__LAMBDA_#2", NULL != ( /*_.DISCR_STRBUF__V67*/ meltfptr[66])); ((meltroutine_ptr_t) /*_.VALROUT___V1457*/ meltfptr[1456])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V67*/ meltfptr[66]); MELT_LOCATION ("warmelt-normatch.melt:6899:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1457*/ meltfptr[1456])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1378__LAMBDA_#3", NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1457*/ meltfptr[1456])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:6899:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1457*/ meltfptr[1456])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V799*/ meltfptr[798]); ((meltroutine_ptr_t) /*_.VALROUT___V1457*/ meltfptr[1456])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V799*/ meltfptr[798]); MELT_LOCATION ("warmelt-normatch.melt:6899:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1457*/ meltfptr[1456])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1378__LAMBDA_#5", NULL != ( /*_.DISCR_STRING__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V1457*/ meltfptr[1456])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_STRING__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normatch.melt:6899:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1457*/ meltfptr[1456])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1013*/ meltfptr[1012]); ((meltroutine_ptr_t) /*_.VALROUT___V1457*/ meltfptr[1456])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1013*/ meltfptr[1012]); MELT_LOCATION ("warmelt-normatch.melt:6899:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1457*/ meltfptr[1456])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1021*/ meltfptr[1020]); ((meltroutine_ptr_t) /*_.VALROUT___V1457*/ meltfptr[1456])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V1021*/ meltfptr[1020]); MELT_LOCATION ("warmelt-normatch.melt:6899:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1457*/ meltfptr[1456])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V769*/ meltfptr[768]); ((meltroutine_ptr_t) /*_.VALROUT___V1457*/ meltfptr[1456])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768]); MELT_LOCATION ("warmelt-normatch.melt:6899:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1457*/ meltfptr[1456])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V859*/ meltfptr[858]); ((meltroutine_ptr_t) /*_.VALROUT___V1457*/ meltfptr[1456])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V859*/ meltfptr[858]); MELT_LOCATION ("warmelt-normatch.melt:6899:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1457*/ meltfptr[1456])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V789*/ meltfptr[788]); ((meltroutine_ptr_t) /*_.VALROUT___V1457*/ meltfptr[1456])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V789*/ meltfptr[788]); MELT_LOCATION ("warmelt-normatch.melt:6899:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1457*/ meltfptr[1456]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1375__MG_ALTDRAW_GRAPHVIZ#25", NULL != ( /*_.VALROUT___V1457*/ meltfptr[1456])); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[25] = (melt_ptr_t) ( /*_.VALROUT___V1457*/ meltfptr[1456]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1375__MG_ALTDRAW_GRAPHVIZ#26", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[26] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V741*/ meltfptr[740]); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[27] = (melt_ptr_t) ( /*_.VALDATA___V741*/ meltfptr[740]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V763*/ meltfptr[762]); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[28] = (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]); MELT_LOCATION ("warmelt-normatch.melt:6935:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1458*/ meltfptr[1457])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1379__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1458*/ meltfptr[1457])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:6935:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1458*/ meltfptr[1457])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V741*/ meltfptr[740]); ((meltroutine_ptr_t) /*_.VALROUT___V1458*/ meltfptr[1457])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V741*/ meltfptr[740]); MELT_LOCATION ("warmelt-normatch.melt:6935:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1458*/ meltfptr[1457])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V763*/ meltfptr[762]); ((meltroutine_ptr_t) /*_.VALROUT___V1458*/ meltfptr[1457])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]); MELT_LOCATION ("warmelt-normatch.melt:6935:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1458*/ meltfptr[1457]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1375__MG_ALTDRAW_GRAPHVIZ#29", NULL != ( /*_.VALROUT___V1458*/ meltfptr[1457])); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[29] = (melt_ptr_t) ( /*_.VALROUT___V1458*/ meltfptr[1457]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V695*/ meltfptr[694]); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[30] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1375__MG_ALTDRAW_GRAPHVIZ#31", NULL != ( /*_.DISCR_MULTIPLE__V45*/ meltfptr[44])); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[31] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V45*/ meltfptr[44]); MELT_LOCATION ("warmelt-normatch.melt:6975:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1459*/ meltfptr[1458])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1380__LAMBDA_#0", NULL != ( /*_.VALBXINT___V1460*/ meltfptr[1459])); ((meltroutine_ptr_t) /*_.VALROUT___V1459*/ meltfptr[1458])->tabval[0] = (melt_ptr_t) ( /*_.VALBXINT___V1460*/ meltfptr[1459]); MELT_LOCATION ("warmelt-normatch.melt:6975:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1459*/ meltfptr[1458])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1380__LAMBDA_#1", NULL != ( /*_.VALBXINT___V1461*/ meltfptr[1460])); ((meltroutine_ptr_t) /*_.VALROUT___V1459*/ meltfptr[1458])->tabval[1] = (melt_ptr_t) ( /*_.VALBXINT___V1461*/ meltfptr[1460]); MELT_LOCATION ("warmelt-normatch.melt:6975:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1459*/ meltfptr[1458])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1380__LAMBDA_#2", NULL != ( /*_.VALBXINT___V1462*/ meltfptr[1461])); ((meltroutine_ptr_t) /*_.VALROUT___V1459*/ meltfptr[1458])->tabval[2] = (melt_ptr_t) ( /*_.VALBXINT___V1462*/ meltfptr[1461]); MELT_LOCATION ("warmelt-normatch.melt:6975:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1459*/ meltfptr[1458]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1375__MG_ALTDRAW_GRAPHVIZ#32", NULL != ( /*_.VALROUT___V1459*/ meltfptr[1458])); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[32] = (melt_ptr_t) ( /*_.VALROUT___V1459*/ meltfptr[1458]); MELT_LOCATION ("warmelt-normatch.melt:6994:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1463*/ meltfptr[1462])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1384__LAMBDA_#0", NULL != ( /*_.VALBXINT___V1464*/ meltfptr[1463])); ((meltroutine_ptr_t) /*_.VALROUT___V1463*/ meltfptr[1462])->tabval[0] = (melt_ptr_t) ( /*_.VALBXINT___V1464*/ meltfptr[1463]); MELT_LOCATION ("warmelt-normatch.melt:6994:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1463*/ meltfptr[1462])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1384__LAMBDA_#1", NULL != ( /*_.VALBXINT___V1465*/ meltfptr[1464])); ((meltroutine_ptr_t) /*_.VALROUT___V1463*/ meltfptr[1462])->tabval[1] = (melt_ptr_t) ( /*_.VALBXINT___V1465*/ meltfptr[1464]); MELT_LOCATION ("warmelt-normatch.melt:6994:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1463*/ meltfptr[1462])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1384__LAMBDA_#2", NULL != ( /*_.VALBXINT___V1466*/ meltfptr[1465])); ((meltroutine_ptr_t) /*_.VALROUT___V1463*/ meltfptr[1462])->tabval[2] = (melt_ptr_t) ( /*_.VALBXINT___V1466*/ meltfptr[1465]); MELT_LOCATION ("warmelt-normatch.melt:6994:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1463*/ meltfptr[1462]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1375__MG_ALTDRAW_GRAPHVIZ#33", NULL != ( /*_.VALROUT___V1463*/ meltfptr[1462])); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[33] = (melt_ptr_t) ( /*_.VALROUT___V1463*/ meltfptr[1462]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1375__MG_ALTDRAW_GRAPHVIZ#34", NULL != ( /*_.CLASS_NAMED__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[34] = (melt_ptr_t) ( /*_.CLASS_NAMED__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1375__MG_ALTDRAW_GRAPHVIZ#35", NULL != ( /*_.CLASS_CLONED_SYMBOL__V66*/ meltfptr[65])); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[35] = (melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V66*/ meltfptr[65]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1375__MG_ALTDRAW_GRAPHVIZ#36", NULL != ( /*_.ADD2OUT__V77*/ meltfptr[76])); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[36] = (melt_ptr_t) ( /*_.ADD2OUT__V77*/ meltfptr[76]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1375__MG_ALTDRAW_GRAPHVIZ#37", NULL != ( /*_.CLASS_QUASI_CTYPE__V43*/ meltfptr[42])); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[37] = (melt_ptr_t) ( /*_.CLASS_QUASI_CTYPE__V43*/ meltfptr[42]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V763*/ meltfptr[762]); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[38] = (melt_ptr_t) ( /*_.VALDATA___V763*/ meltfptr[762]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V841*/ meltfptr[840]); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[39] = (melt_ptr_t) ( /*_.VALDATA___V841*/ meltfptr[840]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1144*/ meltfptr[1143]); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[40] = (melt_ptr_t) ( /*_.VALDATA___V1144*/ meltfptr[1143]); MELT_LOCATION ("warmelt-normatch.melt:6828:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1455*/ meltfptr[1454]); /*putclosurout#109 */ melt_assertmsg ("putclosrout#109 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1454*/ meltfptr[1453])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#109 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1454*/ meltfptr[1453])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1454*/ meltfptr[1453]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1454*/ meltfptr[1453]); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[32] = (melt_ptr_t) ( /*_.VALCLO___V1454*/ meltfptr[1453]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1445*/ meltfptr[1444]); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[33] = (melt_ptr_t) ( /*_.VALCLO___V1445*/ meltfptr[1444]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1448*/ meltfptr[1447]); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[34] = (melt_ptr_t) ( /*_.VALCLO___V1448*/ meltfptr[1447]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1357__NORMEXP_MATCHALT#35", NULL != ( /*_.LIST_TO_MULTIPLE__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[35] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V959*/ meltfptr[958]); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[36] = (melt_ptr_t) ( /*_.VALDATA___V959*/ meltfptr[958]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V741*/ meltfptr[740]); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[37] = (melt_ptr_t) ( /*_.VALDATA___V741*/ meltfptr[740]); MELT_LOCATION ("warmelt-normatch.melt:6725:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1467*/ meltfptr[1466])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V959*/ meltfptr[958]); ((meltroutine_ptr_t) /*_.VALROUT___V1467*/ meltfptr[1466])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V959*/ meltfptr[958]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1468*/ meltfptr[1467])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1468*/ meltfptr[1467])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1468*/ meltfptr[1467]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1469*/ meltfptr[1468]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1468*/ meltfptr[1467]); melt_dbgtrace_written_object ( /*_.VALDATA___V1468*/ meltfptr[1467], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:6725:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1467*/ meltfptr[1466])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1363__LAMBDA_#1", NULL != ( /*_.VALDATA___V1468*/ meltfptr[1467])); ((meltroutine_ptr_t) /*_.VALROUT___V1467*/ meltfptr[1466])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1468*/ meltfptr[1467]); MELT_LOCATION ("warmelt-normatch.melt:6725:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1467*/ meltfptr[1466])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V741*/ meltfptr[740]); ((meltroutine_ptr_t) /*_.VALROUT___V1467*/ meltfptr[1466])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V741*/ meltfptr[740]); MELT_LOCATION ("warmelt-normatch.melt:6725:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1467*/ meltfptr[1466]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1357__NORMEXP_MATCHALT#38", NULL != ( /*_.VALROUT___V1467*/ meltfptr[1466])); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[38] = (melt_ptr_t) ( /*_.VALROUT___V1467*/ meltfptr[1466]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1177*/ meltfptr[1176]); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[39] = (melt_ptr_t) ( /*_.VALDATA___V1177*/ meltfptr[1176]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V973*/ meltfptr[972]); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[40] = (melt_ptr_t) ( /*_.VALDATA___V973*/ meltfptr[972]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1470*/ meltfptr[1469])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1470*/ meltfptr[1469])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1470*/ meltfptr[1469]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1471*/ meltfptr[1470]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1470*/ meltfptr[1469]); melt_dbgtrace_written_object ( /*_.VALDATA___V1470*/ meltfptr[1469], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1357__NORMEXP_MATCHALT#41", NULL != ( /*_.VALDATA___V1470*/ meltfptr[1469])); ((meltroutine_ptr_t) /*_.VALROUT___V1449*/ meltfptr[1448])->tabval[41] = (melt_ptr_t) ( /*_.VALDATA___V1470*/ meltfptr[1469]); MELT_LOCATION ("warmelt-normatch.melt:6545:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1449*/ meltfptr[1448]); /*putclosurout#110 */ melt_assertmsg ("putclosrout#110 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1472*/ meltfptr[1471])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#110 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1472*/ meltfptr[1471])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1449*/ meltfptr[1448]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1472*/ meltfptr[1471]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1473*/ meltfptr[1472])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1473*/ meltfptr[1472])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1473*/ meltfptr[1472]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1474*/ meltfptr[1473]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1473*/ meltfptr[1472]); melt_dbgtrace_written_object ( /*_.VALDATA___V1473*/ meltfptr[1472], "new static instance"); MELT_LOCATION ("warmelt-normatch.melt:6809:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1475*/ meltfptr[1474])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1370__ALTERNATE_MATCH_OPTSET#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1475*/ meltfptr[1474])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normatch.melt:6809:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1475*/ meltfptr[1474])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1370__ALTERNATE_MATCH_OPTSET#1", NULL != ( /*_.INSTALL_METHOD__V11*/ meltfptr[10])); ((meltroutine_ptr_t) /*_.VALROUT___V1475*/ meltfptr[1474])->tabval[1] = (melt_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]); MELT_LOCATION ("warmelt-normatch.melt:6809:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1475*/ meltfptr[1474])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1370__ALTERNATE_MATCH_OPTSET#2", NULL != ( /*_.CLASS_SOURCE_MATCH__V68*/ meltfptr[67])); ((meltroutine_ptr_t) /*_.VALROUT___V1475*/ meltfptr[1474])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_SOURCE_MATCH__V68*/ meltfptr[67]); MELT_LOCATION ("warmelt-normatch.melt:6809:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1475*/ meltfptr[1474])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1370__ALTERNATE_MATCH_OPTSET#3", NULL != ( /*_.NORMAL_EXP__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1475*/ meltfptr[1474])->tabval[3] = (melt_ptr_t) ( /*_.NORMAL_EXP__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normatch.melt:6809:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1475*/ meltfptr[1474])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1472*/ meltfptr[1471]); ((meltroutine_ptr_t) /*_.VALROUT___V1475*/ meltfptr[1474])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V1472*/ meltfptr[1471]); MELT_LOCATION ("warmelt-normatch.melt:6809:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1475*/ meltfptr[1474])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1370__ALTERNATE_MATCH_OPTSET#5", NULL != ( /*_.CLASS_SOURCE_MATCHALT__V92*/ meltfptr[91])); ((meltroutine_ptr_t) /*_.VALROUT___V1475*/ meltfptr[1474])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_SOURCE_MATCHALT__V92*/ meltfptr[91]); #undef meltfram__ } /*end of meltmod__warmelt_normatch__initialmeltchunk_30 */ void meltmod__warmelt_normatch__initialmeltchunk_31 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-normatch.melt:6809:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1475*/ meltfptr[1474]); /*putclosurout#111 */ melt_assertmsg ("putclosrout#111 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1476*/ meltfptr[1475])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#111 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1475*/ meltfptr[1474])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1476*/ meltfptr[1475])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1475*/ meltfptr[1474]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1476*/ meltfptr[1475]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1477*/ meltfptr[1476])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1477*/ meltfptr[1476])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1477*/ meltfptr[1476]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1478*/ meltfptr[1477]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1477*/ meltfptr[1476]); melt_dbgtrace_written_object ( /*_.VALDATA___V1477*/ meltfptr[1476], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1480*/ meltfptr[1479])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1480*/ meltfptr[1479])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1480*/ meltfptr[1479]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1481*/ meltfptr[1480]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1480*/ meltfptr[1479]); melt_dbgtrace_written_object ( /*_.VALDATA___V1480*/ meltfptr[1479], "new static instance"); /**COMMENT: before toplevel body **/ ; MELT_LOCATION ("warmelt-normatch.melt:3:/ initchunk"); /*^block */ /*anyblock */ { /*^cond */ /*cond */ if ( /*quasi.cur.mod.env.cont cur.mod.env.cont : at very start */ /*_.CONTENV___V2*/ meltfptr[1]) /*then */ { /*^cond.then */ /*_.OR___V1482*/ meltfptr[1481] = /*quasi.cur.mod.env.cont cur.mod.env.cont : at very start */ /*_.CONTENV___V2*/ meltfptr[1];; } else { MELT_LOCATION ("warmelt-normatch.melt:3:/ cond.else"); /*^block */ /*anyblock */ { /*^getslot */ { melt_ptr_t slot = NULL, obj = NULL; obj = (melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (INITIAL_SYSTEM_DATA)))) /*=obj*/ ; melt_object_get_field (slot, obj, 3, "SYSDATA_CONT_FRESH_ENV"); /*_.SYSDATA_CONT_FRESH_ENV__V1483*/ meltfptr[1482] = slot; }; ; MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[1]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_cstring = "warmelt-normatch"; /*_.FUN___V1484*/ meltfptr[1483] = melt_apply ((meltclosure_ptr_t) ( /*_.SYSDATA_CONT_FRESH_ENV__V1483*/ meltfptr[1482]), (melt_ptr_t) ( /*_.PREVENV___V4*/ meltfptr[3]), (MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } ; /*_.OR___V1482*/ meltfptr[1481] = /*_.FUN___V1484*/ meltfptr[1483];; /*epilog */ MELT_LOCATION ("warmelt-normatch.melt:3:/ clear"); /*clear *//*_.SYSDATA_CONT_FRESH_ENV__V1483*/ meltfptr[1482] = 0; /*^clear */ /*clear *//*_.FUN___V1484*/ meltfptr[1483] = 0; } ; } ; /*^block */ /*com.block:upd.cur.mod.env.cont : at very start */ { } /*com.end block:upd.cur.mod.env.cont : at very start */ ; /*epilog */ /*^clear */ /*clear *//*_.OR___V1482*/ meltfptr[1481] = 0; } MELT_LOCATION ("warmelt-normatch.melt:95:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V149*/ meltfptr[148]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V152*/ meltfptr[151]; /*_.INSTALL_METHOD__V1485*/ meltfptr[1482] = 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__V1485*/ meltfptr[1482] = 0; } MELT_LOCATION ("warmelt-normatch.melt:112:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V149*/ meltfptr[148]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V162*/ meltfptr[161]; /*_.INSTALL_METHOD__V1486*/ meltfptr[1483] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1486*/ meltfptr[1483] = 0; } MELT_LOCATION ("warmelt-normatch.melt:146:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V149*/ meltfptr[148]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V166*/ meltfptr[165]; /*_.INSTALL_METHOD__V1487*/ meltfptr[1481] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1487*/ meltfptr[1481] = 0; } MELT_LOCATION ("warmelt-normatch.melt:158:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V149*/ meltfptr[148]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V170*/ meltfptr[169]; /*_.INSTALL_METHOD__V1488*/ meltfptr[1482] = 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); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1488*/ meltfptr[1482] = 0; } MELT_LOCATION ("warmelt-normatch.melt:210:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V149*/ meltfptr[148]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V174*/ meltfptr[173]; /*_.INSTALL_METHOD__V1489*/ meltfptr[1483] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_CONSTANT__V16*/ meltfptr[15]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1489*/ meltfptr[1483] = 0; } MELT_LOCATION ("warmelt-normatch.melt:235:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V149*/ meltfptr[148]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V188*/ meltfptr[187]; /*_.INSTALL_METHOD__V1490*/ meltfptr[1481] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_CONSTRUCT__V22*/ meltfptr[21]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1490*/ meltfptr[1481] = 0; } MELT_LOCATION ("warmelt-normatch.melt:274:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V149*/ meltfptr[148]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V194*/ meltfptr[193]; /*_.INSTALL_METHOD__V1491*/ meltfptr[1482] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_OBJECT__V24*/ meltfptr[23]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1491*/ meltfptr[1482] = 0; } MELT_LOCATION ("warmelt-normatch.melt:335:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V149*/ meltfptr[148]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V204*/ meltfptr[203]; /*_.INSTALL_METHOD__V1492*/ meltfptr[1483] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_COMPOSITE__V28*/ meltfptr[27]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1492*/ meltfptr[1483] = 0; } MELT_LOCATION ("warmelt-normatch.melt:408:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V149*/ meltfptr[148]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V215*/ meltfptr[214]; /*_.INSTALL_METHOD__V1493*/ meltfptr[1481] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_OR__V32*/ meltfptr[31]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1493*/ meltfptr[1481] = 0; } MELT_LOCATION ("warmelt-normatch.melt:431:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V149*/ meltfptr[148]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V223*/ meltfptr[222]; /*_.INSTALL_METHOD__V1494*/ meltfptr[1482] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_AND__V35*/ meltfptr[34]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1494*/ meltfptr[1482] = 0; } MELT_LOCATION ("warmelt-normatch.melt:728:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V228*/ meltfptr[227]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V437*/ meltfptr[436]; /*_.INSTALL_METHOD__V1495*/ meltfptr[1483] = 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__V1495*/ meltfptr[1483] = 0; } MELT_LOCATION ("warmelt-normatch.melt:746:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V228*/ meltfptr[227]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V439*/ meltfptr[438]; /*_.INSTALL_METHOD__V1496*/ meltfptr[1481] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN__V13*/ meltfptr[12]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1496*/ meltfptr[1481] = 0; } MELT_LOCATION ("warmelt-normatch.melt:941:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V228*/ meltfptr[227]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V446*/ meltfptr[445]; /*_.INSTALL_METHOD__V1497*/ meltfptr[1482] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1497*/ meltfptr[1482] = 0; } MELT_LOCATION ("warmelt-normatch.melt:955:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V228*/ meltfptr[227]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V454*/ meltfptr[453]; /*_.INSTALL_METHOD__V1498*/ meltfptr[1483] = 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); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1498*/ meltfptr[1483] = 0; } MELT_LOCATION ("warmelt-normatch.melt:1147:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V228*/ meltfptr[227]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V462*/ meltfptr[461]; /*_.INSTALL_METHOD__V1499*/ meltfptr[1481] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_INSTANCE__V44*/ meltfptr[43]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1499*/ meltfptr[1481] = 0; } MELT_LOCATION ("warmelt-normatch.melt:1340:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V228*/ meltfptr[227]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V498*/ meltfptr[497]; /*_.INSTALL_METHOD__V1500*/ meltfptr[1482] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_TUPLE__V50*/ meltfptr[49]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1500*/ meltfptr[1482] = 0; } MELT_LOCATION ("warmelt-normatch.melt:1384:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V228*/ meltfptr[227]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V509*/ meltfptr[508]; /*_.INSTALL_METHOD__V1501*/ meltfptr[1483] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_AND__V35*/ meltfptr[34]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1501*/ meltfptr[1483] = 0; } MELT_LOCATION ("warmelt-normatch.melt:1584:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V228*/ meltfptr[227]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V514*/ meltfptr[513]; /*_.INSTALL_METHOD__V1502*/ meltfptr[1481] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_OR__V32*/ meltfptr[31]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1502*/ meltfptr[1481] = 0; } MELT_LOCATION ("warmelt-normatch.melt:1846:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V228*/ meltfptr[227]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V526*/ meltfptr[525]; /*_.INSTALL_METHOD__V1503*/ meltfptr[1482] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_MATCHER__V57*/ meltfptr[56]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1503*/ meltfptr[1482] = 0; } MELT_LOCATION ("warmelt-normatch.melt:1917:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V228*/ meltfptr[227]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V541*/ meltfptr[540]; /*_.INSTALL_METHOD__V1504*/ meltfptr[1483] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_CONSTANT__V16*/ meltfptr[15]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1504*/ meltfptr[1483] = 0; } MELT_LOCATION ("warmelt-normatch.melt:1938:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALSTR___V553*/ meltfptr[552]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V546*/ meltfptr[545]; /*_.REGISTER_OPTION__V1505*/ meltfptr[1481] = melt_apply ((meltclosure_ptr_t) ( /*_.REGISTER_OPTION__V64*/ meltfptr[63]), (melt_ptr_t) ( /*_.VALDATA___V551*/ meltfptr[550]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.REGISTER_OPTION__V1505*/ meltfptr[1481] = 0; } MELT_LOCATION ("warmelt-normatch.melt:1993:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V586*/ meltfptr[585]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V589*/ meltfptr[588]; /*_.INSTALL_METHOD__V1506*/ meltfptr[1482] = 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__V1506*/ meltfptr[1482] = 0; } MELT_LOCATION ("warmelt-normatch.melt:2052:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V586*/ meltfptr[585]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V591*/ meltfptr[590]; /*_.INSTALL_METHOD__V1507*/ meltfptr[1483] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1507*/ meltfptr[1483] = 0; } MELT_LOCATION ("warmelt-normatch.melt:2117:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V586*/ meltfptr[585]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V595*/ meltfptr[594]; /*_.INSTALL_METHOD__V1508*/ meltfptr[1481] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.VALDATA___V382*/ meltfptr[381]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1508*/ meltfptr[1481] = 0; } MELT_LOCATION ("warmelt-normatch.melt:2155:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V586*/ meltfptr[585]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V597*/ meltfptr[596]; /*_.INSTALL_METHOD__V1509*/ meltfptr[1482] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.VALDATA___V286*/ meltfptr[285]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1509*/ meltfptr[1482] = 0; } MELT_LOCATION ("warmelt-normatch.melt:2610:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.NORMAL_EXP__V17*/ meltfptr[16]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V612*/ meltfptr[611]; /*_.INSTALL_METHOD__V1510*/ meltfptr[1483] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.CLASS_SOURCE_MATCH__V68*/ meltfptr[67]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1510*/ meltfptr[1483] = 0; } MELT_LOCATION ("warmelt-normatch.melt:2720:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.NORMALIZE_BINDING__V74*/ meltfptr[73]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V736*/ meltfptr[735]; /*_.INSTALL_METHOD__V1511*/ meltfptr[1481] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.VALDATA___V723*/ meltfptr[722]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1511*/ meltfptr[1481] = 0; } MELT_LOCATION ("warmelt-normatch.melt:2946:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1003*/ meltfptr[1002]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1024*/ meltfptr[1023]; /*_.INSTALL_METHOD__V1512*/ meltfptr[1482] = 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__V1512*/ meltfptr[1482] = 0; } MELT_LOCATION ("warmelt-normatch.melt:2954:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1013*/ meltfptr[1012]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1026*/ meltfptr[1025]; /*_.INSTALL_METHOD__V1513*/ meltfptr[1483] = 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__V1513*/ meltfptr[1483] = 0; } MELT_LOCATION ("warmelt-normatch.melt:2962:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1021*/ meltfptr[1020]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1028*/ meltfptr[1027]; /*_.INSTALL_METHOD__V1514*/ meltfptr[1481] = 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__V1514*/ meltfptr[1481] = 0; } MELT_LOCATION ("warmelt-normatch.melt:2968:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1003*/ meltfptr[1002]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1030*/ meltfptr[1029]; /*_.INSTALL_METHOD__V1515*/ meltfptr[1482] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1515*/ meltfptr[1482] = 0; } MELT_LOCATION ("warmelt-normatch.melt:2969:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1003*/ meltfptr[1002]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1030*/ meltfptr[1029]; /*_.INSTALL_METHOD__V1516*/ meltfptr[1483] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_CONSTANT__V16*/ meltfptr[15]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1516*/ meltfptr[1483] = 0; } MELT_LOCATION ("warmelt-normatch.melt:2978:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1003*/ meltfptr[1002]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1032*/ meltfptr[1031]; /*_.INSTALL_METHOD__V1517*/ meltfptr[1481] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_OR__V32*/ meltfptr[31]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1517*/ meltfptr[1481] = 0; } MELT_LOCATION ("warmelt-normatch.melt:2988:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1003*/ meltfptr[1002]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1034*/ meltfptr[1033]; /*_.INSTALL_METHOD__V1518*/ meltfptr[1482] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_AND__V35*/ meltfptr[34]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1518*/ meltfptr[1482] = 0; } MELT_LOCATION ("warmelt-normatch.melt:3004:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1003*/ meltfptr[1002]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1036*/ meltfptr[1035]; /*_.INSTALL_METHOD__V1519*/ meltfptr[1483] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_CONSTRUCT__V22*/ meltfptr[21]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1519*/ meltfptr[1483] = 0; } MELT_LOCATION ("warmelt-normatch.melt:3014:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1003*/ meltfptr[1002]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1038*/ meltfptr[1037]; /*_.INSTALL_METHOD__V1520*/ meltfptr[1481] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_OBJECT__V24*/ meltfptr[23]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1520*/ meltfptr[1481] = 0; } MELT_LOCATION ("warmelt-normatch.melt:3079:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1049*/ meltfptr[1048]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1052*/ meltfptr[1051]; /*_.INSTALL_METHOD__V1521*/ meltfptr[1482] = 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); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1521*/ meltfptr[1482] = 0; } MELT_LOCATION ("warmelt-normatch.melt:3135:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1049*/ meltfptr[1048]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1056*/ meltfptr[1055]; /*_.INSTALL_METHOD__V1522*/ meltfptr[1483] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1522*/ meltfptr[1483] = 0; } MELT_LOCATION ("warmelt-normatch.melt:3164:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1049*/ meltfptr[1048]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1058*/ meltfptr[1057]; /*_.INSTALL_METHOD__V1523*/ meltfptr[1481] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1523*/ meltfptr[1481] = 0; } MELT_LOCATION ("warmelt-normatch.melt:3181:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1066*/ meltfptr[1065]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1069*/ meltfptr[1068]; /*_.INSTALL_METHOD__V1524*/ meltfptr[1482] = 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); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1524*/ meltfptr[1482] = 0; } MELT_LOCATION ("warmelt-normatch.melt:3215:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1066*/ meltfptr[1065]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1071*/ meltfptr[1070]; /*_.INSTALL_METHOD__V1525*/ meltfptr[1483] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.VALDATA___V769*/ meltfptr[768]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1525*/ meltfptr[1483] = 0; } MELT_LOCATION ("warmelt-normatch.melt:3269:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1066*/ meltfptr[1065]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1073*/ meltfptr[1072]; /*_.INSTALL_METHOD__V1526*/ meltfptr[1481] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.VALDATA___V859*/ meltfptr[858]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1526*/ meltfptr[1481] = 0; } MELT_LOCATION ("warmelt-normatch.melt:3312:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1066*/ meltfptr[1065]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1075*/ meltfptr[1074]; /*_.INSTALL_METHOD__V1527*/ meltfptr[1482] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1527*/ meltfptr[1482] = 0; } MELT_LOCATION ("warmelt-normatch.melt:3326:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1013*/ meltfptr[1012]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1077*/ meltfptr[1076]; /*_.INSTALL_METHOD__V1528*/ meltfptr[1483] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.VALDATA___V911*/ meltfptr[910]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1528*/ meltfptr[1483] = 0; } MELT_LOCATION ("warmelt-normatch.melt:3341:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1013*/ meltfptr[1012]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1079*/ meltfptr[1078]; /*_.INSTALL_METHOD__V1529*/ meltfptr[1481] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.VALDATA___V925*/ meltfptr[924]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1529*/ meltfptr[1481] = 0; } MELT_LOCATION ("warmelt-normatch.melt:3348:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1013*/ meltfptr[1012]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1081*/ meltfptr[1080]; /*_.INSTALL_METHOD__V1530*/ meltfptr[1482] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.VALDATA___V789*/ meltfptr[788]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1530*/ meltfptr[1482] = 0; } MELT_LOCATION ("warmelt-normatch.melt:3360:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1013*/ meltfptr[1012]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1083*/ meltfptr[1082]; /*_.INSTALL_METHOD__V1531*/ meltfptr[1483] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.VALDATA___V935*/ meltfptr[934]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1531*/ meltfptr[1483] = 0; } MELT_LOCATION ("warmelt-normatch.melt:3368:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1021*/ meltfptr[1020]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1085*/ meltfptr[1084]; /*_.INSTALL_METHOD__V1532*/ meltfptr[1481] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.VALDATA___V789*/ meltfptr[788]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1532*/ meltfptr[1481] = 0; } MELT_LOCATION ("warmelt-normatch.melt:3384:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1021*/ meltfptr[1020]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1087*/ meltfptr[1086]; /*_.INSTALL_METHOD__V1533*/ meltfptr[1482] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1533*/ meltfptr[1482] = 0; } MELT_LOCATION ("warmelt-normatch.melt:3393:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1021*/ meltfptr[1020]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1089*/ meltfptr[1088]; /*_.INSTALL_METHOD__V1534*/ meltfptr[1483] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.VALDATA___V799*/ meltfptr[798]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1534*/ meltfptr[1483] = 0; } MELT_LOCATION ("warmelt-normatch.melt:3413:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1106*/ meltfptr[1105]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1109*/ meltfptr[1108]; /*_.INSTALL_METHOD__V1535*/ meltfptr[1481] = 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__V1535*/ meltfptr[1481] = 0; } MELT_LOCATION ("warmelt-normatch.melt:3420:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1106*/ meltfptr[1105]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1111*/ meltfptr[1110]; /*_.INSTALL_METHOD__V1536*/ meltfptr[1482] = 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); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1536*/ meltfptr[1482] = 0; } MELT_LOCATION ("warmelt-normatch.melt:3472:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1106*/ meltfptr[1105]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1114*/ meltfptr[1113]; /*_.INSTALL_METHOD__V1537*/ meltfptr[1483] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_CONSTANT__V16*/ meltfptr[15]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1537*/ meltfptr[1483] = 0; } MELT_LOCATION ("warmelt-normatch.melt:3483:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1106*/ meltfptr[1105]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1116*/ meltfptr[1115]; /*_.INSTALL_METHOD__V1538*/ meltfptr[1481] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_LIST__V76*/ meltfptr[75]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1538*/ meltfptr[1481] = 0; } MELT_LOCATION ("warmelt-normatch.melt:3650:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1106*/ meltfptr[1105]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1127*/ meltfptr[1126]; /*_.INSTALL_METHOD__V1539*/ meltfptr[1482] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_TUPLE__V50*/ meltfptr[49]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1539*/ meltfptr[1482] = 0; } MELT_LOCATION ("warmelt-normatch.melt:3810:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1106*/ meltfptr[1105]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1129*/ meltfptr[1128]; /*_.INSTALL_METHOD__V1540*/ meltfptr[1483] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_INSTANCE__V44*/ meltfptr[43]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1540*/ meltfptr[1483] = 0; } MELT_LOCATION ("warmelt-normatch.melt:3903:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1106*/ meltfptr[1105]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1131*/ meltfptr[1130]; /*_.INSTALL_METHOD__V1541*/ meltfptr[1481] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_VARIABLE__V14*/ meltfptr[13]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1541*/ meltfptr[1481] = 0; } MELT_LOCATION ("warmelt-normatch.melt:3988:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1106*/ meltfptr[1105]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1134*/ meltfptr[1133]; /*_.INSTALL_METHOD__V1542*/ meltfptr[1482] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_AND__V35*/ meltfptr[34]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1542*/ meltfptr[1482] = 0; } MELT_LOCATION ("warmelt-normatch.melt:4111:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1106*/ meltfptr[1105]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1139*/ meltfptr[1138]; /*_.INSTALL_METHOD__V1543*/ meltfptr[1483] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_OR__V32*/ meltfptr[31]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1543*/ meltfptr[1483] = 0; } MELT_LOCATION ("warmelt-normatch.melt:4335:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1106*/ meltfptr[1105]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1141*/ meltfptr[1140]; /*_.INSTALL_METHOD__V1544*/ meltfptr[1481] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.CLASS_SOURCE_PATTERN_MATCHER__V57*/ meltfptr[56]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1544*/ meltfptr[1481] = 0; } MELT_LOCATION ("warmelt-normatch.melt:4351:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1144*/ meltfptr[1143]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1147*/ meltfptr[1146]; /*_.INSTALL_METHOD__V1545*/ meltfptr[1482] = 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); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1545*/ meltfptr[1482] = 0; } MELT_LOCATION ("warmelt-normatch.melt:4417:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1144*/ meltfptr[1143]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1149*/ meltfptr[1148]; /*_.INSTALL_METHOD__V1546*/ meltfptr[1483] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.VALDATA___V869*/ meltfptr[868]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1546*/ meltfptr[1483] = 0; } MELT_LOCATION ("warmelt-normatch.melt:4487:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1144*/ meltfptr[1143]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1151*/ meltfptr[1150]; /*_.INSTALL_METHOD__V1547*/ meltfptr[1481] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.VALDATA___V911*/ meltfptr[910]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1547*/ meltfptr[1481] = 0; } MELT_LOCATION ("warmelt-normatch.melt:4559:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1144*/ meltfptr[1143]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1155*/ meltfptr[1154]; /*_.INSTALL_METHOD__V1548*/ meltfptr[1482] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.VALDATA___V925*/ meltfptr[924]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1548*/ meltfptr[1482] = 0; } MELT_LOCATION ("warmelt-normatch.melt:4603:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1144*/ meltfptr[1143]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1157*/ meltfptr[1156]; /*_.INSTALL_METHOD__V1549*/ meltfptr[1483] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1549*/ meltfptr[1483] = 0; } MELT_LOCATION ("warmelt-normatch.melt:4679:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1144*/ meltfptr[1143]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1159*/ meltfptr[1158]; /*_.INSTALL_METHOD__V1550*/ meltfptr[1481] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.VALDATA___V935*/ meltfptr[934]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1550*/ meltfptr[1481] = 0; } MELT_LOCATION ("warmelt-normatch.melt:4748:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1144*/ meltfptr[1143]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1161*/ meltfptr[1160]; /*_.INSTALL_METHOD__V1551*/ meltfptr[1482] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.VALDATA___V841*/ meltfptr[840]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1551*/ meltfptr[1482] = 0; } MELT_LOCATION ("warmelt-normatch.melt:4807:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1144*/ meltfptr[1143]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1163*/ meltfptr[1162]; /*_.INSTALL_METHOD__V1552*/ meltfptr[1483] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.VALDATA___V779*/ meltfptr[778]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1552*/ meltfptr[1483] = 0; } MELT_LOCATION ("warmelt-normatch.melt:4859:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1144*/ meltfptr[1143]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1165*/ meltfptr[1164]; /*_.INSTALL_METHOD__V1553*/ meltfptr[1481] = 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__V1553*/ meltfptr[1481] = 0; } MELT_LOCATION ("warmelt-normatch.melt:4947:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1144*/ meltfptr[1143]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1167*/ meltfptr[1166]; /*_.INSTALL_METHOD__V1554*/ meltfptr[1482] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1554*/ meltfptr[1482] = 0; } MELT_LOCATION ("warmelt-normatch.melt:5357:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1337*/ meltfptr[1336]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1346*/ meltfptr[1345]; /*_.INSTALL_METHOD__V1555*/ meltfptr[1483] = 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__V1555*/ meltfptr[1483] = 0; } MELT_LOCATION ("warmelt-normatch.melt:5382:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1337*/ meltfptr[1336]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1351*/ meltfptr[1350]; /*_.INSTALL_METHOD__V1556*/ meltfptr[1481] = 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__V1556*/ meltfptr[1481] = 0; } MELT_LOCATION ("warmelt-normatch.melt:5443:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1337*/ meltfptr[1336]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1358*/ meltfptr[1357]; /*_.INSTALL_METHOD__V1557*/ meltfptr[1482] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.VALDATA___V829*/ meltfptr[828]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1557*/ meltfptr[1482] = 0; } MELT_LOCATION ("warmelt-normatch.melt:5553:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1337*/ meltfptr[1336]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1368*/ meltfptr[1367]; /*_.INSTALL_METHOD__V1558*/ meltfptr[1483] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.VALDATA___V911*/ meltfptr[910]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1558*/ meltfptr[1483] = 0; } MELT_LOCATION ("warmelt-normatch.melt:5662:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1337*/ meltfptr[1336]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1374*/ meltfptr[1373]; /*_.INSTALL_METHOD__V1559*/ meltfptr[1481] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.VALDATA___V925*/ meltfptr[924]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1559*/ meltfptr[1481] = 0; } MELT_LOCATION ("warmelt-normatch.melt:5741:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1337*/ meltfptr[1336]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1380*/ meltfptr[1379]; /*_.INSTALL_METHOD__V1560*/ meltfptr[1482] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.VALDATA___V869*/ meltfptr[868]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1560*/ meltfptr[1482] = 0; } MELT_LOCATION ("warmelt-normatch.melt:5808:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1337*/ meltfptr[1336]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1388*/ meltfptr[1387]; /*_.INSTALL_METHOD__V1561*/ meltfptr[1483] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1561*/ meltfptr[1483] = 0; } MELT_LOCATION ("warmelt-normatch.melt:5901:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1337*/ meltfptr[1336]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1392*/ meltfptr[1391]; /*_.INSTALL_METHOD__V1562*/ meltfptr[1481] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.VALDATA___V841*/ meltfptr[840]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1562*/ meltfptr[1481] = 0; } MELT_LOCATION ("warmelt-normatch.melt:5929:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1410*/ meltfptr[1409]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1429*/ meltfptr[1428]; /*_.INSTALL_METHOD__V1563*/ meltfptr[1482] = 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__V1563*/ meltfptr[1482] = 0; } MELT_LOCATION ("warmelt-normatch.melt:5940:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1426*/ meltfptr[1425]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1431*/ meltfptr[1430]; /*_.INSTALL_METHOD__V1564*/ meltfptr[1483] = 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__V1564*/ meltfptr[1483] = 0; } MELT_LOCATION ("warmelt-normatch.melt:6023:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1410*/ meltfptr[1409]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1433*/ meltfptr[1432]; /*_.INSTALL_METHOD__V1565*/ meltfptr[1481] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.CLASS_CMATCHER__V91*/ meltfptr[90]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1565*/ meltfptr[1481] = 0; } MELT_LOCATION ("warmelt-normatch.melt:6100:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1426*/ meltfptr[1425]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1437*/ meltfptr[1436]; /*_.INSTALL_METHOD__V1566*/ meltfptr[1482] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.CLASS_CMATCHER__V91*/ meltfptr[90]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1566*/ meltfptr[1482] = 0; } MELT_LOCATION ("warmelt-normatch.melt:6260:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1337*/ meltfptr[1336]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1439*/ meltfptr[1438]; /*_.INSTALL_METHOD__V1567*/ meltfptr[1483] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.VALDATA___V935*/ meltfptr[934]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1567*/ meltfptr[1483] = 0; } MELT_LOCATION ("warmelt-normatch.melt:6807:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.NORMAL_EXP__V17*/ meltfptr[16]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1472*/ meltfptr[1471]; /*_.INSTALL_METHOD__V1568*/ meltfptr[1481] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.CLASS_SOURCE_MATCHALT__V92*/ meltfptr[91]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V1568*/ meltfptr[1481] = 0; } MELT_LOCATION ("warmelt-normatch.melt:6815:/ initchunk"); /*^block */ /*anyblock */ { MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALSTR___V1479*/ meltfptr[1478]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1476*/ meltfptr[1475]; /*_.REGISTER_OPTION__V1569*/ meltfptr[1482] = melt_apply ((meltclosure_ptr_t) ( /*_.REGISTER_OPTION__V64*/ meltfptr[63]), (melt_ptr_t) ( /*_.VALDATA___V1477*/ meltfptr[1476]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.REGISTER_OPTION__V1569*/ meltfptr[1482] = 0; } MELT_LOCATION ("warmelt-normatch.melt:7134:/ initchunk"); /*^block */ /*anyblock */ { /*^getslot */ { melt_ptr_t slot = NULL, obj = NULL; obj = (melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (INITIAL_SYSTEM_DATA)))) /*=obj*/ ; melt_object_get_field (slot, obj, 4, "SYSDATA_VALUE_EXPORTER"); /*_.VALUEXPORTER___V1570*/ meltfptr[1483] = slot; }; ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V97*/ meltfptr[96]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V93*/ meltfptr[92]), (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___V100*/ meltfptr[99]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V123*/ meltfptr[122]), (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___V102*/ meltfptr[101]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V125*/ meltfptr[124]), (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___V104*/ meltfptr[103]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V127*/ meltfptr[126]), (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___V106*/ meltfptr[105]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V129*/ meltfptr[128]), (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___V108*/ meltfptr[107]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V131*/ meltfptr[130]), (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___V110*/ meltfptr[109]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V133*/ meltfptr[132]), (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___V112*/ meltfptr[111]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V135*/ meltfptr[134]), (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___V114*/ meltfptr[113]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V137*/ meltfptr[136]), (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___V116*/ meltfptr[115]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V139*/ meltfptr[138]), (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___V118*/ meltfptr[117]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V141*/ meltfptr[140]), (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___V120*/ meltfptr[119]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V143*/ meltfptr[142]), (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___V256*/ meltfptr[255]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V252*/ meltfptr[251]), (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___V259*/ meltfptr[258]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V272*/ meltfptr[271]), (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___V261*/ meltfptr[260]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V274*/ meltfptr[273]), (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___V263*/ meltfptr[262]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V276*/ meltfptr[275]), (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___V265*/ meltfptr[264]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V278*/ meltfptr[277]), (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___V267*/ meltfptr[266]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V280*/ meltfptr[279]), (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___V269*/ meltfptr[268]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V282*/ meltfptr[281]), (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___V326*/ meltfptr[325]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V324*/ meltfptr[323]), (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___V332*/ meltfptr[331]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V330*/ meltfptr[329]), (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___V335*/ meltfptr[334]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V342*/ meltfptr[341]), (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___V337*/ meltfptr[336]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]), (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___V339*/ meltfptr[338]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V346*/ meltfptr[345]), (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___V382*/ meltfptr[381]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V380*/ meltfptr[379]), (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___V385*/ meltfptr[384]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V390*/ meltfptr[389]), (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___V387*/ meltfptr[386]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V392*/ meltfptr[391]), (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___V360*/ meltfptr[359]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V358*/ meltfptr[357]), (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___V363*/ meltfptr[362]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V372*/ meltfptr[371]), (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___V365*/ meltfptr[364]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V374*/ meltfptr[373]), (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___V367*/ meltfptr[366]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V376*/ meltfptr[375]), (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___V369*/ meltfptr[368]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V378*/ meltfptr[377]), (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___V296*/ meltfptr[295]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V294*/ meltfptr[293]), (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___V299*/ meltfptr[298]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V302*/ meltfptr[301]), (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___V306*/ meltfptr[305]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V304*/ meltfptr[303]), (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___V312*/ meltfptr[311]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V310*/ meltfptr[309]), (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___V315*/ meltfptr[314]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V320*/ meltfptr[319]), (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___V317*/ meltfptr[316]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V322*/ meltfptr[321]), (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___V350*/ meltfptr[349]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V348*/ meltfptr[347]), (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___V353*/ meltfptr[352]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V356*/ meltfptr[355]), (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___V286*/ meltfptr[285]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V284*/ meltfptr[283]), (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___V289*/ meltfptr[288]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V292*/ meltfptr[291]), (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___V396*/ meltfptr[395]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V394*/ meltfptr[393]), (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___V399*/ meltfptr[398]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V402*/ meltfptr[401]), (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___V408*/ meltfptr[407]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V404*/ meltfptr[403]), (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___V411*/ meltfptr[410]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V418*/ meltfptr[417]), (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___V413*/ meltfptr[412]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V420*/ meltfptr[419]), (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___V415*/ meltfptr[414]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V422*/ meltfptr[421]), (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___V673*/ meltfptr[672]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V671*/ meltfptr[670]), (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___V676*/ meltfptr[675]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V685*/ meltfptr[684]), (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___V678*/ meltfptr[677]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V687*/ meltfptr[686]), (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___V680*/ meltfptr[679]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688]), (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___V682*/ meltfptr[681]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V691*/ meltfptr[690]), (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___V741*/ meltfptr[740]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V739*/ meltfptr[738]), (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___V744*/ meltfptr[743]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V753*/ meltfptr[752]), (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___V746*/ meltfptr[745]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V755*/ meltfptr[754]), (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___V748*/ meltfptr[747]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]), (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___V750*/ meltfptr[749]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V759*/ meltfptr[758]), (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___V1279*/ meltfptr[1278]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V1277*/ meltfptr[1276]), (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___V1282*/ meltfptr[1281]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V1305*/ meltfptr[1304]), (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___V1284*/ meltfptr[1283]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V1307*/ meltfptr[1306]), (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___V1286*/ meltfptr[1285]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V1309*/ meltfptr[1308]), (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___V1288*/ meltfptr[1287]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V1311*/ meltfptr[1310]), (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___V1290*/ meltfptr[1289]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V1313*/ meltfptr[1312]), (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___V1292*/ meltfptr[1291]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V1315*/ meltfptr[1314]), (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___V1294*/ meltfptr[1293]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V1317*/ meltfptr[1316]), (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___V1296*/ meltfptr[1295]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V1319*/ meltfptr[1318]), (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___V1298*/ meltfptr[1297]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V1321*/ meltfptr[1320]), (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___V1300*/ meltfptr[1299]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : MATNORX_STARTLABEL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V1323*/ meltfptr[1322]), (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___V1302*/ meltfptr[1301]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V1325*/ meltfptr[1324]), (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___V763*/ meltfptr[762]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V761*/ meltfptr[760]), (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___V779*/ meltfptr[778]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V777*/ meltfptr[776]), (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___V782*/ meltfptr[781]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V785*/ meltfptr[784]), (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___V829*/ meltfptr[828]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V827*/ meltfptr[826]), (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___V835*/ meltfptr[834]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V833*/ meltfptr[832]), (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___V819*/ meltfptr[818]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V817*/ meltfptr[816]), (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___V822*/ meltfptr[821]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V825*/ meltfptr[824]), (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___V813*/ meltfptr[812]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V811*/ meltfptr[810]), (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___V841*/ meltfptr[840]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V839*/ meltfptr[838]), (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___V844*/ meltfptr[843]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V851*/ meltfptr[850]), (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___V846*/ meltfptr[845]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V853*/ meltfptr[852]), (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___V848*/ meltfptr[847]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V855*/ meltfptr[854]), (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___V859*/ meltfptr[858]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V857*/ meltfptr[856]), (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___V862*/ meltfptr[861]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V865*/ meltfptr[864]), (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___V893*/ meltfptr[892]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V891*/ meltfptr[890]), (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___V896*/ meltfptr[895]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V903*/ meltfptr[902]), (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___V898*/ meltfptr[897]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V905*/ meltfptr[904]), (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___V900*/ meltfptr[899]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V907*/ meltfptr[906]), (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___V911*/ meltfptr[910]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V909*/ meltfptr[908]), (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___V914*/ meltfptr[913]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V919*/ meltfptr[918]), (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___V916*/ meltfptr[915]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V921*/ meltfptr[920]), (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___V935*/ meltfptr[934]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V933*/ meltfptr[932]), (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___V938*/ meltfptr[937]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V947*/ meltfptr[946]), (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___V940*/ meltfptr[939]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V949*/ meltfptr[948]), (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___V942*/ meltfptr[941]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V951*/ meltfptr[950]), (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___V944*/ meltfptr[943]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V953*/ meltfptr[952]), (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___V925*/ meltfptr[924]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V923*/ meltfptr[922]), (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___V928*/ meltfptr[927]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V931*/ meltfptr[930]), (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___V869*/ meltfptr[868]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V867*/ meltfptr[866]), (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___V872*/ meltfptr[871]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V875*/ meltfptr[874]), (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___V769*/ meltfptr[768]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V767*/ meltfptr[766]), (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___V772*/ meltfptr[771]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V775*/ meltfptr[774]), (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___V799*/ meltfptr[798]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V797*/ meltfptr[796]), (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___V802*/ meltfptr[801]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V807*/ meltfptr[806]), (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___V804*/ meltfptr[803]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V809*/ meltfptr[808]), (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___V789*/ meltfptr[788]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V787*/ meltfptr[786]), (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___V792*/ meltfptr[791]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V795*/ meltfptr[794]), (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___V723*/ meltfptr[722]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V721*/ meltfptr[720]), (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___V726*/ meltfptr[725]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V731*/ meltfptr[730]), (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___V728*/ meltfptr[727]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V733*/ meltfptr[732]), (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___V695*/ meltfptr[694]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V693*/ meltfptr[692]), (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___V698*/ meltfptr[697]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V707*/ meltfptr[706]), (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___V700*/ meltfptr[699]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V709*/ meltfptr[708]), (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___V702*/ meltfptr[701]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V711*/ meltfptr[710]), (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___V704*/ meltfptr[703]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V713*/ meltfptr[712]), (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___V717*/ meltfptr[716]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V715*/ meltfptr[714]), (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___V627*/ meltfptr[626]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V625*/ meltfptr[624]), (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___V630*/ meltfptr[629]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V651*/ meltfptr[650]), (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___V632*/ meltfptr[631]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V653*/ meltfptr[652]), (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___V634*/ meltfptr[633]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V655*/ meltfptr[654]), (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___V636*/ meltfptr[635]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V657*/ meltfptr[656]), (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___V638*/ meltfptr[637]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V659*/ meltfptr[658]), (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___V640*/ meltfptr[639]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V661*/ meltfptr[660]), (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___V642*/ meltfptr[641]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V663*/ meltfptr[662]), (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___V644*/ meltfptr[643]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V665*/ meltfptr[664]), (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___V646*/ meltfptr[645]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V667*/ meltfptr[666]), (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___V648*/ meltfptr[647]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V669*/ meltfptr[668]), (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___V1177*/ meltfptr[1176]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_MATCHALT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V1175*/ meltfptr[1174]), (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___V1180*/ meltfptr[1179]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V1193*/ meltfptr[1192]), (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___V1182*/ meltfptr[1181]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V1195*/ meltfptr[1194]), (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___V1184*/ meltfptr[1183]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V1197*/ meltfptr[1196]), (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___V1186*/ meltfptr[1185]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V1199*/ meltfptr[1198]), (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___V1188*/ meltfptr[1187]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NAMATCH_MDATAS */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V1201*/ meltfptr[1200]), (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___V1190*/ meltfptr[1189]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NAMATCH_STARTLABEL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V1203*/ meltfptr[1202]), (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___V1261*/ meltfptr[1260]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V1259*/ meltfptr[1258]), (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___V1264*/ meltfptr[1263]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V1271*/ meltfptr[1270]), (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___V1266*/ meltfptr[1265]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V1273*/ meltfptr[1272]), (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___V1268*/ meltfptr[1267]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V1275*/ meltfptr[1274]), (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___V1233*/ meltfptr[1232]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V1231*/ meltfptr[1230]), (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___V1236*/ meltfptr[1235]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V1239*/ meltfptr[1238]), (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___V1249*/ meltfptr[1248]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V1247*/ meltfptr[1246]), (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___V1255*/ meltfptr[1254]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V1253*/ meltfptr[1252]), (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___V1243*/ meltfptr[1242]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V1241*/ meltfptr[1240]), (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___V959*/ meltfptr[958]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V955*/ meltfptr[954]), (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___V962*/ meltfptr[961]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V967*/ meltfptr[966]), (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 : NRPFLA_NMATCH */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V969*/ meltfptr[968]), (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___V1223*/ meltfptr[1222]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V1221*/ meltfptr[1220]), (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___V1226*/ meltfptr[1225]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V1229*/ meltfptr[1228]), (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___V1207*/ meltfptr[1206]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V1205*/ meltfptr[1204]), (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___V1210*/ meltfptr[1209]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V1213*/ meltfptr[1212]), (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___V1217*/ meltfptr[1216]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V1215*/ meltfptr[1214]), (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___V973*/ meltfptr[972]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V971*/ meltfptr[970]), (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___V976*/ meltfptr[975]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V983*/ meltfptr[982]), (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___V978*/ meltfptr[977]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V985*/ meltfptr[984]), (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___V980*/ meltfptr[979]; /*^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___V1570*/ meltfptr[1483]), (melt_ptr_t) ( /*_.VALDATA___V987*/ meltfptr[986]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.VALUEXPORTER___V1570*/ meltfptr[1483] = 0; } MELT_LOCATION ("warmelt-normatch.melt:7188:/ initchunk"); /*^block */ /*anyblock */ { /*^getslot */ { melt_ptr_t slot = NULL, obj = NULL; obj = (melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (INITIAL_SYSTEM_DATA)))) /*=obj*/ ; melt_object_get_field (slot, obj, 4, "SYSDATA_VALUE_EXPORTER"); /*_.VALUEXPORTER___V1571*/ meltfptr[1481] = slot; }; ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V149*/ meltfptr[148]; /*^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___V1571*/ meltfptr[1481]), (melt_ptr_t) ( /*_.VALDATA___V145*/ meltfptr[144]), (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___V228*/ meltfptr[227]; /*^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___V1571*/ meltfptr[1481]), (melt_ptr_t) ( /*_.VALDATA___V226*/ meltfptr[225]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.VALUEXPORTER___V1571*/ meltfptr[1481] = 0; } MELT_LOCATION ("warmelt-normatch.melt:7193:/ initchunk"); /*^block */ /*anyblock */ { /*^getslot */ { melt_ptr_t slot = NULL, obj = NULL; obj = (melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (INITIAL_SYSTEM_DATA)))) /*=obj*/ ; melt_object_get_field (slot, obj, 4, "SYSDATA_VALUE_EXPORTER"); /*_.VALUEXPORTER___V1572*/ meltfptr[1482] = slot; }; ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1177*/ meltfptr[1176]; /*^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___V1572*/ meltfptr[1482]), (melt_ptr_t) ( /*_.VALDATA___V1480*/ meltfptr[1479]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.VALUEXPORTER___V1572*/ meltfptr[1482] = 0; } /**COMMENT: after toplevel body **/ ; /**COMMENT: compute boxloc again **/ ; /*cond */ if ( /*_.CONTENV___V2*/ meltfptr[1] || melt_object_length ((melt_ptr_t) MELT_PREDEF (INITIAL_SYSTEM_DATA)) < MELTFIELD_SYSDATA_CONT_FRESH_ENV) /*then */ { } else { /*^cond.else */ /*^block */ /*com.block:compute fresh module environment */ { /*^comment */ /**COMMENT: start computing boxloc **/ ; ; /*^getslot */ { melt_ptr_t slot = NULL, obj = NULL; obj = (melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (INITIAL_SYSTEM_DATA)))) /*=obj*/ ; melt_object_get_field (slot, obj, 3, "SYSDATA_CONT_FRESH_ENV"); /*_.FRESHENV___V3*/ meltfptr[2] = slot; }; ; /*^compute */ /*checkfreshenv */ if (( /*_.PREVENV___V4*/ meltfptr[3]) && melt_magic_discr ((melt_ptr_t) ( /*_.FRESHENV___V3*/ meltfptr[2])) != MELTOBMAG_CLOSURE) warning (0, "MELT corruption: bad FRESH_ENV @%p in system data <%s:%d>", (void *) ( /*_.FRESHENV___V3*/ meltfptr[2]), __FILE__, __LINE__);;; /*^apply */ /*apply */ { /*_.CONTENV___V2*/ meltfptr[1] = melt_apply ((meltclosure_ptr_t) ( /*_.FRESHENV___V3*/ meltfptr[2]), (melt_ptr_t) ( /*_.PREVENV___V4*/ meltfptr[3]), (""), (union meltparam_un *) 0, "", (union meltparam_un *) 0); } ; } /*com.end block:compute fresh module environment */ ; } /**COMMENT: intern symbols **/ ; /*internsym:CLASS_PATTERN_CONTEXT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V93*/ meltfptr[92])); /*internsym:CLASS_ROOT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V95*/ meltfptr[94])); /*internsym:PCTN_NORMCTXT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V123*/ meltfptr[122])); /*internsym:PCTN_SRC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V125*/ meltfptr[124])); /*internsym:PCTN_ENV */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V127*/ meltfptr[126])); /*internsym:PCTN_MAPATVAR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V129*/ meltfptr[128])); /*internsym:PCTN_MAPATCST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V131*/ meltfptr[130])); /*internsym:PCTN_MAPOR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V133*/ meltfptr[132])); /*internsym:PCTN_BINDLIST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V135*/ meltfptr[134])); /*internsym:PCTN_STUFFMAP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V137*/ meltfptr[136])); /*internsym:PCTN_PVARLOCMAP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V139*/ meltfptr[138])); /*internsym:PCTN_TESTS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V141*/ meltfptr[140])); /*internsym:PCTN_VARHANDLERS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V143*/ meltfptr[142])); /*internsym:SCAN_PATTERN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V145*/ meltfptr[144])); /*internsym:CLASS_SELECTOR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V147*/ meltfptr[146])); /*internsym:MELT_DEBUG_FUN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V153*/ meltfptr[152])); /*internsym:CLASS_NAMED */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V155*/ meltfptr[154])); /*internsym:INSTALL_METHOD */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V157*/ meltfptr[156])); /*internsym:DISCR_ANY_RECEIVER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V159*/ meltfptr[158])); /*internsym:CLASS_SOURCE_PATTERN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V163*/ meltfptr[162])); /*internsym:CLASS_SOURCE_PATTERN_VARIABLE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V167*/ meltfptr[166])); /*internsym:CLASS_SOURCE_PATTERN_JOKER_VARIABLE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V171*/ meltfptr[170])); /*internsym:CLASS_SOURCE_PATTERN_CONSTANT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V175*/ meltfptr[174])); /*internsym:NORMAL_EXP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V177*/ meltfptr[176])); /*internsym:LIST_APPEND2LIST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178])); #undef meltfram__ } /*end of meltmod__warmelt_normatch__initialmeltchunk_31 */ void meltmod__warmelt_normatch__initialmeltchunk_32 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*internsym:GET_CTYPE*/ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V181*/ meltfptr[180])); /*internsym:CLASS_CTYPE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V183*/ meltfptr[182])); /*internsym:CLASS_LOCATED */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V185*/ meltfptr[184])); /*internsym:CLASS_SOURCE_PATTERN_CONSTRUCT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V189*/ meltfptr[188])); /*internsym:CTYPE_VALUE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V191*/ meltfptr[190])); /*internsym:CLASS_SOURCE_PATTERN_OBJECT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V195*/ meltfptr[194])); /*internsym:CLASS_CLASS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V197*/ meltfptr[196])); /*internsym:CLASS_SOURCE_FIELD_PATTERN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V199*/ meltfptr[198])); /*internsym:CLASS_FIELD */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V201*/ meltfptr[200])); /*internsym:CLASS_SOURCE_PATTERN_COMPOSITE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V205*/ meltfptr[204])); /*internsym:CLASS_ANY_MATCHER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V207*/ meltfptr[206])); /*internsym:CLASS_FORMAL_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V209*/ meltfptr[208])); /*internsym:NORMALIZE_TUPLE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V211*/ meltfptr[210])); /*internsym:CLASS_SOURCE_PATTERN_OR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V216*/ meltfptr[215])); /*internsym:DISCR_MAP_OBJECTS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V218*/ meltfptr[217])); /*internsym:CLASS_SYMBOL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V220*/ meltfptr[219])); /*internsym:CLASS_SOURCE_PATTERN_AND */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V224*/ meltfptr[223])); /*internsym:NORMAL_PATTERN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V226*/ meltfptr[225])); /*internsym:CLASS_NORMAL_OR_VARIABLE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V230*/ meltfptr[229])); /*internsym:NORVAR_NOREXP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V244*/ meltfptr[243])); /*internsym:NORVAR_LOCSYM */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V246*/ meltfptr[245])); /*internsym:NORVAR_PATVAR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V248*/ meltfptr[247])); /*internsym:NORVAR_NREPOR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V250*/ meltfptr[249])); /*internsym:CLASS_NORMTESTER_ANY */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V252*/ meltfptr[251])); /*internsym:CLASS_NREP_EXPRESSION */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253])); /*internsym:NTEST_MATCHED */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V272*/ meltfptr[271])); /*internsym:NTEST_THEN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V274*/ meltfptr[273])); /*internsym:NTEST_ELSE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V276*/ meltfptr[275])); /*internsym:NTEST_NORMATCH */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V278*/ meltfptr[277])); /*internsym:NTEST_LOCCLIST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V280*/ meltfptr[279])); /*internsym:NTEST_COMEFROM */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V282*/ meltfptr[281])); /*internsym:CLASS_NORMTESTER_SUCCESS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V284*/ meltfptr[283])); /*internsym:NTSUCCESS_DO */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V292*/ meltfptr[291])); /*internsym:CLASS_NORMTESTER_OR_CLEAR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V294*/ meltfptr[293])); /*internsym:NTORCLEAR_LOCSYM */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V302*/ meltfptr[301])); /*internsym:CLASS_NORMTESTER_OR_INITIAL_CLEAR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V304*/ meltfptr[303])); /*internsym:CLASS_NORMTESTER_OR_TRANSMIT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V310*/ meltfptr[309])); /*internsym:NTORTRANSMIT_DST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V320*/ meltfptr[319])); /*internsym:NTORTRANSMIT_SRC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V322*/ meltfptr[321])); /*internsym:CLASS_NORMTESTER_ANYTESTER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V324*/ meltfptr[323])); /*internsym:CLASS_NORMTESTER_DISJUNCTION */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V330*/ meltfptr[329])); /*internsym:NTDISJUNCTS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V342*/ meltfptr[341])); /*internsym:NTDISJ_FRESHORVAR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343])); /*internsym:NTDISJ_SETORVAR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V346*/ meltfptr[345])); /*internsym:CLASS_NORMTESTER_SAME */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V348*/ meltfptr[347])); /*internsym:NTSAME_IDENTICAL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V356*/ meltfptr[355])); /*internsym:CLASS_NORMTESTER_MATCHER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V358*/ meltfptr[357])); /*internsym:NTMATCH_MATCHER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V372*/ meltfptr[371])); /*internsym:NTMATCH_MATNDATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V374*/ meltfptr[373])); /*internsym:NTMATCH_INARGS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V376*/ meltfptr[375])); /*internsym:NTMATCH_OUTLOCS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V378*/ meltfptr[377])); /*internsym:CLASS_NORMTESTER_INSTANCE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V380*/ meltfptr[379])); /*internsym:NTINST_CLASS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V390*/ meltfptr[389])); /*internsym:NTINST_FIELDLOCS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V392*/ meltfptr[391])); /*internsym:CLASS_NORMTESTER_TUPLE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V394*/ meltfptr[393])); /*internsym:NTTUPLE_COMPONENTS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V402*/ meltfptr[401])); /*internsym:CLASS_NREP_MATCH */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V404*/ meltfptr[403])); /*internsym:CLASS_NREP_TYPED_EXPRESSION */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V406*/ meltfptr[405])); /*internsym:NMATCH_TESTS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V418*/ meltfptr[417])); /*internsym:NMATCH_STUFFMAP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V420*/ meltfptr[419])); /*internsym:NMATCH_MATCHED */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V422*/ meltfptr[421])); /*internsym:DISCR_LIST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V426*/ meltfptr[425])); /*internsym:CLASS_REFERENCE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V432*/ meltfptr[431])); /*internsym:CLASS_NREP_LOCSYMOCC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V443*/ meltfptr[442])); /*internsym:CLASS_NORMAL_LET_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V447*/ meltfptr[446])); /*internsym:CLASS_NORMALIZATION_CONTEXT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V449*/ meltfptr[448])); /*internsym:CLASS_QUASI_CTYPE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V451*/ meltfptr[450])); /*internsym:CLASS_SOURCE_PATTERN_INSTANCE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V463*/ meltfptr[462])); /*internsym:DISCR_MULTIPLE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V465*/ meltfptr[464])); /*internsym:CLASS_NREP_SYMOCC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V467*/ meltfptr[466])); /*internsym:CLASS_LET_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V469*/ meltfptr[468])); /*internsym:CLASS_NREP_UNSAFE_GET_FIELD */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V471*/ meltfptr[470])); /*internsym:CLONE_SYMBOL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V473*/ meltfptr[472])); /*internsym:CLASS_TUPLE_COMPONENT_PATTERN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V475*/ meltfptr[474])); /*internsym:TUPCP_PATTERN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V485*/ meltfptr[484])); /*internsym:TUPCP_INDEX */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V487*/ meltfptr[486])); /*internsym:CLASS_SOURCE_PATTERN_TUPLE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V499*/ meltfptr[498])); /*internsym:DISCR_CONSTANT_INTEGER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V501*/ meltfptr[500])); /*internsym:LIST_TO_MULTIPLE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V503*/ meltfptr[502])); /*internsym:CLASS_NREP_UNSAFE_NTH_COMPONENT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V505*/ meltfptr[504])); /*internsym:NTHCOMP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V496*/ meltfptr[495])); /*internsym:MAPOBJECT_SORTED_ATTRIBUTE_TUPLE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V515*/ meltfptr[514])); /*internsym:MULTIPLE_MAP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V517*/ meltfptr[516])); /*internsym:CLASS_NREP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V519*/ meltfptr[518])); /*internsym:CLASS_SOURCE_PATTERN_MATCHER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V527*/ meltfptr[526])); /*internsym:CLASS_ANY_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V529*/ meltfptr[528])); /*internsym:FIND_ENV */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V531*/ meltfptr[530])); /*internsym:FRESH_ENV */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V533*/ meltfptr[532])); /*internsym:PUT_ENV */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V535*/ meltfptr[534])); /*internsym:MULTIPLE_TO_LIST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V537*/ meltfptr[536])); /*internsym:MATCH_GRAPHIC_DOT_PREFIX */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V542*/ meltfptr[541])); /*internsym:DISCR_STRING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V547*/ meltfptr[546])); /*internsym:REGISTER_OPTION */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V549*/ meltfptr[548])); /*internsym:MATCH_GRAPHIC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V551*/ meltfptr[550])); /*internsym:CLASS_MATCH_GRAPHIC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V554*/ meltfptr[553])); /*internsym:CLASS_PROPED */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V556*/ meltfptr[555])); /*internsym:MCHGX_FILENAME */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V572*/ meltfptr[571])); /*internsym:MCHGX_NODOUT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V574*/ meltfptr[573])); /*internsym:MCHGX_EDGOUT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V576*/ meltfptr[575])); /*internsym:MCHGX_DATANAMEMAP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V578*/ meltfptr[577])); /*internsym:MCHGX_STEPNAMEMAP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V580*/ meltfptr[579])); /*internsym:MATCHGRAPHIC_LABEL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V584*/ meltfptr[583])); /*internsym:CLASS_CLONED_SYMBOL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V592*/ meltfptr[591])); /*internsym:DISCR_STRBUF */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V602*/ meltfptr[601])); /*internsym:CLASS_SOURCE_MATCH */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V613*/ meltfptr[612])); /*internsym:CLASS_ENVIRONMENT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V615*/ meltfptr[614])); /*internsym:MATCH_INTER_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V605*/ meltfptr[604])); /*internsym:CLASS_NREP_CHECKSIGNAL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V617*/ meltfptr[616])); /*internsym:CTYPE_VOID */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V619*/ meltfptr[618])); /*internsym:_MATCHED_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V607*/ meltfptr[606])); /*internsym:CLASS_SOURCE_MATCH_CASE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V621*/ meltfptr[620])); /*internsym:WRAP_NORMAL_LETSEQ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V623*/ meltfptr[622])); /*internsym:MATCHRES_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V610*/ meltfptr[609])); /*internsym:CLASS_MATCHING_CONTEXT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V625*/ meltfptr[624])); /*internsym:MCTX_NORMCTXT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V651*/ meltfptr[650])); /*internsym:MCTX_SOURCE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V653*/ meltfptr[652])); /*internsym:MCTX_NMATCHED */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V655*/ meltfptr[654])); /*internsym:MCTX_NMATBIND */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V657*/ meltfptr[656])); /*internsym:MCTX_CASES */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V659*/ meltfptr[658])); /*internsym:MCTX_ENV */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V661*/ meltfptr[660])); /*internsym:MCTX_MDATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V663*/ meltfptr[662])); /*internsym:MCTX_VARHANDLERS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V665*/ meltfptr[664])); /*internsym:MCTX_FLAGS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V667*/ meltfptr[666])); /*internsym:MCTX_ENDLABEL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V669*/ meltfptr[668])); /*internsym:CLASS_MATCH_CASE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V671*/ meltfptr[670])); /*internsym:MCASE_MCTXT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V685*/ meltfptr[684])); /*internsym:MCASE_SOURCE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V687*/ meltfptr[686])); /*internsym:MCASE_INDEX */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V689*/ meltfptr[688])); #undef meltfram__ } /*end of meltmod__warmelt_normatch__initialmeltchunk_32 */ void meltmod__warmelt_normatch__initialmeltchunk_33 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*internsym:MCASE_VARMAP*/ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V691*/ meltfptr[690])); /*internsym:CLASS_MATCHED_DATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V693*/ meltfptr[692])); /*internsym:MDATA_SYMB */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V707*/ meltfptr[706])); /*internsym:MDATA_CTYPE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V709*/ meltfptr[708])); /*internsym:MDATA_ORIG */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V711*/ meltfptr[710])); /*internsym:MDATA_STEPS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V713*/ meltfptr[712])); /*internsym:CLASS_MATCHED_NORMAL_DATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V715*/ meltfptr[714])); /*internsym:CLASS_MATCHED_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V721*/ meltfptr[720])); /*internsym:MATCHBIND_DATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V731*/ meltfptr[730])); /*internsym:MATCHBIND_NBOCC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V733*/ meltfptr[732])); /*internsym:NORMALIZE_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V737*/ meltfptr[736])); /*internsym:CLASS_MATCH_FLAG */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V739*/ meltfptr[738])); /*internsym:MFLAG_SPAT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V753*/ meltfptr[752])); /*internsym:MFLAG_RANK */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V755*/ meltfptr[754])); /*internsym:MFLAG_STRING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756])); /*internsym:MFLAG_SETSTEP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V759*/ meltfptr[758])); /*internsym:CLASS_MATCH_STEP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V761*/ meltfptr[760])); /*internsym:CLASS_MATCH_STEP_THEN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V767*/ meltfptr[766])); /*internsym:MSTEP_THEN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V775*/ meltfptr[774])); /*internsym:CLASS_MATCH_STEP_CLEAR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V777*/ meltfptr[776])); /*internsym:MSTEP_CLEARDATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V785*/ meltfptr[784])); /*internsym:CLASS_MATCH_STEP_WITH_FLAG */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V787*/ meltfptr[786])); /*internsym:MSTEP_FLAG */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V795*/ meltfptr[794])); /*internsym:CLASS_MATCH_STEP_WITH_DATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V797*/ meltfptr[796])); /*internsym:MSTEP_DATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V807*/ meltfptr[806])); /*internsym:MSTEP_INDEX */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V809*/ meltfptr[808])); /*internsym:CLASS_MATCH_STEP_FLAG_SET */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V811*/ meltfptr[810])); /*internsym:CLASS_MATCH_STEP_FLAG_OPERATION */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V817*/ meltfptr[816])); /*internsym:MSTEP_FLAGARGS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V825*/ meltfptr[824])); /*internsym:CLASS_MATCH_STEP_FLAG_CONJUNCTION */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V827*/ meltfptr[826])); /*internsym:CLASS_MATCH_STEP_FLAG_DISJUNCTION */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V833*/ meltfptr[832])); /*internsym:CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V839*/ meltfptr[838])); /*internsym:MSTEPSUCCESS_VAROCC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V851*/ meltfptr[850])); /*internsym:MSTEPSUCCESS_BINDS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V853*/ meltfptr[852])); /*internsym:MSTEPSUCCESS_BODY */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V855*/ meltfptr[854])); /*internsym:CLASS_MATCH_STEP_TEST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V857*/ meltfptr[856])); /*internsym:MSTEP_ELSE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V865*/ meltfptr[864])); /*internsym:CLASS_MATCH_STEP_TEST_VARIABLE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V867*/ meltfptr[866])); /*internsym:MSTEPTESTVAR_DATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V875*/ meltfptr[874])); /*internsym:CLASS_MATCH_STEP_TEST_CONSTANT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V877*/ meltfptr[876])); /*internsym:MSTEPTESTCONST_DATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V887*/ meltfptr[886])); /*internsym:MSTEPTESTCONST_BIND */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V889*/ meltfptr[888])); /*internsym:CLASS_MATCH_STEP_TEST_GROUP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V891*/ meltfptr[890])); /*internsym:MSTGROUP_START */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V903*/ meltfptr[902])); /*internsym:MSTGROUP_THEN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V905*/ meltfptr[904])); /*internsym:MSTGROUP_ELSE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V907*/ meltfptr[906])); /*internsym:CLASS_MATCH_STEP_TEST_INSTANCE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V909*/ meltfptr[908])); /*internsym:MSTINS_CLASS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V919*/ meltfptr[918])); /*internsym:MSTINS_SLOTS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V921*/ meltfptr[920])); /*internsym:CLASS_MATCH_STEP_TEST_MULTIPLE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V923*/ meltfptr[922])); /*internsym:MSTTUP_COMPONENTS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V931*/ meltfptr[930])); /*internsym:CLASS_MATCH_STEP_TEST_MATCHER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V933*/ meltfptr[932])); /*internsym:MSTMA_MATCHER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V947*/ meltfptr[946])); /*internsym:MSTMA_BINDS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V949*/ meltfptr[948])); /*internsym:MSTMA_INS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V951*/ meltfptr[950])); /*internsym:MSTMA_OUTS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V953*/ meltfptr[952])); /*internsym:CLASS_NREP_MATCH_FLAG */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V955*/ meltfptr[954])); /*internsym:CLASS_NREP_SIMPLE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V957*/ meltfptr[956])); /*internsym:NRPFLA_FLAG */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V967*/ meltfptr[966])); /*internsym:NRPFLA_NMATCH */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V969*/ meltfptr[968])); /*internsym:CLASS_NREP_MATCHED_DATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V971*/ meltfptr[970])); /*internsym:NRMATD_CTYPE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V983*/ meltfptr[982])); /*internsym:NRMATD_MDATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V985*/ meltfptr[984])); /*internsym:NRMATD_RANK */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V987*/ meltfptr[986])); /*internsym:SCAN_SUBPATTERNS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V991*/ meltfptr[990])); /*internsym:RECV */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V993*/ meltfptr[992])); /*internsym:FUN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V996*/ meltfptr[995])); /*internsym:CTX */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V999*/ meltfptr[998])); /*internsym:SCAN_STEP_DATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1005*/ meltfptr[1004])); /*internsym:STEP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1007*/ meltfptr[1006])); /*internsym:SCAN_STEP_FLAG */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1015*/ meltfptr[1014])); /*internsym:PUT_THEN_MATCH */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1042*/ meltfptr[1041])); /*internsym:THENSTEP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1045*/ meltfptr[1044])); /*internsym:PUT_ELSE_MATCH */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1059*/ meltfptr[1058])); /*internsym:ELSESTEP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1062*/ meltfptr[1061])); /*internsym:TRANSLATE_PATTERN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1090*/ meltfptr[1089])); /*internsym:MDATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1093*/ meltfptr[1092])); /*internsym:MCASE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1096*/ meltfptr[1095])); /*internsym:VARMAP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1099*/ meltfptr[1098])); /*internsym:SLOC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1102*/ meltfptr[1101])); /*internsym:CLASS_SOURCE_PATTERN_LIST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1117*/ meltfptr[1116])); /*internsym:PATUPLECOMP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1124*/ meltfptr[1123])); /*internsym:MATCHGRAPHIC_ALTSTEP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1142*/ meltfptr[1141])); /*internsym:ADD2OUT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1152*/ meltfptr[1151])); /*internsym:DISCR_INTEGER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1171*/ meltfptr[1170])); /*internsym:COMPARE_NAMED_ALPHA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1173*/ meltfptr[1172])); /*internsym:CLASS_NREP_MATCHALT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1175*/ meltfptr[1174])); /*internsym:NAMATCH_MATCHED */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1193*/ meltfptr[1192])); /*internsym:NAMATCH_RESULT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1195*/ meltfptr[1194])); /*internsym:NAMATCH_BODY */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1197*/ meltfptr[1196])); /*internsym:NAMATCH_FLAGS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1199*/ meltfptr[1198])); /*internsym:NAMATCH_MDATAS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1201*/ meltfptr[1200])); /*internsym:NAMATCH_STARTLABEL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1203*/ meltfptr[1202])); /*internsym:CLASS_NREP_MATCH_LABEL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1205*/ meltfptr[1204])); /*internsym:NMLAB_STEP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1213*/ meltfptr[1212])); /*internsym:CLASS_NREP_MATCH_LABEL_END */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1215*/ meltfptr[1214])); /*internsym:CLASS_NREP_MATCH_JUMP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1221*/ meltfptr[1220])); /*internsym:NMJMP_LABEL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1229*/ meltfptr[1228])); /*internsym:CLASS_NREP_MATCH_DATA_ACTION */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1231*/ meltfptr[1230])); /*internsym:NMDAC_DATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1239*/ meltfptr[1238])); /*internsym:CLASS_NREP_MATCH_DATA_INITIALIZER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1241*/ meltfptr[1240])); /*internsym:CLASS_NREP_MATCH_DATA_CLEAR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1247*/ meltfptr[1246])); /*internsym:CLASS_NREP_MATCH_DATA_FINALIZER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1253*/ meltfptr[1252])); /*internsym:CLASS_NREP_JUMP_WHEN_IS_A */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1259*/ meltfptr[1258])); /*internsym:NTESTISA_VALUE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1271*/ meltfptr[1270])); /*internsym:NTESTISA_CLASS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1273*/ meltfptr[1272])); /*internsym:NTESTISA_JUMP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1275*/ meltfptr[1274])); /*internsym:CLASS_MATCH_NORMALIZATION_CONTEXT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1277*/ meltfptr[1276])); /*internsym:MATNORX_RESLOC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1305*/ meltfptr[1304])); /*internsym:MATNORX_NMATCH */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1307*/ meltfptr[1306])); /*internsym:MATNORX_DATAMAP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1309*/ meltfptr[1308])); /*internsym:MATNORX_FLAGMAP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1311*/ meltfptr[1310])); /*internsym:MATNORX_STEPMAP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1313*/ meltfptr[1312])); /*internsym:MATNORX_MDATAQUEUE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1315*/ meltfptr[1314])); /*internsym:MATNORX_MSTEPQUEUE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1317*/ meltfptr[1316])); /*internsym:MATNORX_BODYLIST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1319*/ meltfptr[1318])); /*internsym:MATNORX_ENDLABEL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1321*/ meltfptr[1320])); /*internsym:MATNORX_STARTLABEL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1323*/ meltfptr[1322])); /*internsym:MATNORX_MATCHCTXT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1325*/ meltfptr[1324])); /*internsym:NORMALIZE_STEP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1329*/ meltfptr[1328])); /*internsym:NMCTXT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1332*/ meltfptr[1331])); /*internsym:CLASS_NREP_SETQ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1352*/ meltfptr[1351])); /*internsym:CLASS_NREP_CHUNK */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1359*/ meltfptr[1358])); /*internsym:AND_MATCH_FLAGS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1356*/ meltfptr[1355])); /*internsym:CTYPE_LONG */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1361*/ meltfptr[1360])); /*internsym:DISCR_VERBATIM_STRING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1363*/ meltfptr[1362])); /*internsym:CLASS_NREP_IFISA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1369*/ meltfptr[1368])); /*internsym:CLASS_NREP_PROGN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1371*/ meltfptr[1370])); #undef meltfram__ } /*end of meltmod__warmelt_normatch__initialmeltchunk_33 */ void meltmod__warmelt_normatch__initialmeltchunk_34 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*internsym:CLASS_NREP_IFTUPLESIZED*/ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1375*/ meltfptr[1374])); /*internsym:CLASS_NREP_IFCOMMON */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1377*/ meltfptr[1376])); /*internsym:CLASS_NREP_IFSAME */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1381*/ meltfptr[1380])); /*internsym:LIST_MAP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1389*/ meltfptr[1388])); /*internsym:CLASS_NREP_IF */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1393*/ meltfptr[1392])); /*internsym:NORMALIZE_TEST_MATCHER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1395*/ meltfptr[1394])); /*internsym:NDATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1399*/ meltfptr[1398])); /*internsym:BINDLIST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1402*/ meltfptr[1401])); /*internsym:NJELSE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1406*/ meltfptr[1405])); /*internsym:NORMALIZE_FILL_MATCHER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1412*/ meltfptr[1411])); /*internsym:NOUTS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1418*/ meltfptr[1417])); /*internsym:TESTDATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1422*/ meltfptr[1421])); /*internsym:CLASS_CMATCHER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1434*/ meltfptr[1433])); /*internsym:_MATCHRES */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1443*/ meltfptr[1442])); /*internsym:MATCHALT_INTER_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1450*/ meltfptr[1449])); /*internsym:_MATCHED_DATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1452*/ meltfptr[1451])); /*internkeyw:TRUE */ (void) meltgc_intern_keyword ((melt_ptr_t) ( /*_.VALDATA___V1468*/ meltfptr[1467])); /*internsym:MATCHALTRES_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1470*/ meltfptr[1469])); /*internsym:CLASS_SOURCE_MATCHALT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1473*/ meltfptr[1472])); /*internsym:ALTERNATE_MATCH */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1477*/ meltfptr[1476])); /*internsym:CLASS_NREP_ALTMATCH */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1480*/ meltfptr[1479])); /**COMMENT: set retinit from boxloc **/ ; /*_.RETINIT___V1*/ meltfptr[0] = /* finalsetretinit */ melt_reference_value ((melt_ptr_t) ( /*_.CONTENV___V2*/ meltfptr[1])); /**COMMENT: end the initproc **/ ; #undef meltfram__ } /*end of meltmod__warmelt_normatch__initialmeltchunk_34 */ void meltmod__warmelt_normatch__forward_or_mark_module_start_frame (struct melt_callframe_st *fp, int marking) { int ix = 0; initial_frame_st *meltframptr_ = (initial_frame_st *) fp; melt_assertmsg ("check module frame", meltframptr_->mcfr_nbvar == /*minihash */ -815); if (!marking && melt_is_forwarding) { dbgprintf ("forward_or_mark_module_start_frame_warmelt_normatch forwarding %d pointers in frame %p", 1572, (void *) meltframptr_); for (ix = 0; ix < 1572; 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 < 1572; ix++) if (meltframptr_->mcfr_varptr[ix]) gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]); } /* end meltmod__warmelt_normatch__forward_or_mark_module_start_frame */ /* exported 108 field offsets */ MELT_EXTERN const int meltfieldoff__MATCHBIND_DATA; const int meltfieldoff__MATCHBIND_DATA = 1; /* in CLASS_MATCHED_BINDING */ MELT_EXTERN const int meltfieldoff__MATCHBIND_NBOCC; const int meltfieldoff__MATCHBIND_NBOCC = 2; /* in CLASS_MATCHED_BINDING */ MELT_EXTERN const int meltfieldoff__MATNORX_BODYLIST; const int meltfieldoff__MATNORX_BODYLIST = 7; /* in CLASS_MATCH_NORMALIZATION_CONTEXT */ MELT_EXTERN const int meltfieldoff__MATNORX_DATAMAP; const int meltfieldoff__MATNORX_DATAMAP = 2; /* in CLASS_MATCH_NORMALIZATION_CONTEXT */ MELT_EXTERN const int meltfieldoff__MATNORX_ENDLABEL; const int meltfieldoff__MATNORX_ENDLABEL = 8; /* in CLASS_MATCH_NORMALIZATION_CONTEXT */ MELT_EXTERN const int meltfieldoff__MATNORX_FLAGMAP; const int meltfieldoff__MATNORX_FLAGMAP = 3; /* in CLASS_MATCH_NORMALIZATION_CONTEXT */ MELT_EXTERN const int meltfieldoff__MATNORX_MATCHCTXT; const int meltfieldoff__MATNORX_MATCHCTXT = 10; /* in CLASS_MATCH_NORMALIZATION_CONTEXT */ MELT_EXTERN const int meltfieldoff__MATNORX_MDATAQUEUE; const int meltfieldoff__MATNORX_MDATAQUEUE = 5; /* in CLASS_MATCH_NORMALIZATION_CONTEXT */ MELT_EXTERN const int meltfieldoff__MATNORX_MSTEPQUEUE; const int meltfieldoff__MATNORX_MSTEPQUEUE = 6; /* in CLASS_MATCH_NORMALIZATION_CONTEXT */ MELT_EXTERN const int meltfieldoff__MATNORX_NMATCH; const int meltfieldoff__MATNORX_NMATCH = 1; /* in CLASS_MATCH_NORMALIZATION_CONTEXT */ MELT_EXTERN const int meltfieldoff__MATNORX_RESLOC; const int meltfieldoff__MATNORX_RESLOC = 0; /* in CLASS_MATCH_NORMALIZATION_CONTEXT */ MELT_EXTERN const int meltfieldoff__MATNORX_STARTLABEL; const int meltfieldoff__MATNORX_STARTLABEL = 9; /* in CLASS_MATCH_NORMALIZATION_CONTEXT */ MELT_EXTERN const int meltfieldoff__MATNORX_STEPMAP; const int meltfieldoff__MATNORX_STEPMAP = 4; /* in CLASS_MATCH_NORMALIZATION_CONTEXT */ MELT_EXTERN const int meltfieldoff__MCASE_INDEX; const int meltfieldoff__MCASE_INDEX = 3; /* in CLASS_MATCH_CASE */ MELT_EXTERN const int meltfieldoff__MCASE_MCTXT; const int meltfieldoff__MCASE_MCTXT = 1; /* in CLASS_MATCH_CASE */ MELT_EXTERN const int meltfieldoff__MCASE_SOURCE; const int meltfieldoff__MCASE_SOURCE = 2; /* in CLASS_MATCH_CASE */ MELT_EXTERN const int meltfieldoff__MCASE_VARMAP; const int meltfieldoff__MCASE_VARMAP = 4; /* in CLASS_MATCH_CASE */ MELT_EXTERN const int meltfieldoff__MCTX_CASES; const int meltfieldoff__MCTX_CASES = 4; /* in CLASS_MATCHING_CONTEXT */ MELT_EXTERN const int meltfieldoff__MCTX_ENDLABEL; const int meltfieldoff__MCTX_ENDLABEL = 9; /* in CLASS_MATCHING_CONTEXT */ MELT_EXTERN const int meltfieldoff__MCTX_ENV; const int meltfieldoff__MCTX_ENV = 5; /* in CLASS_MATCHING_CONTEXT */ MELT_EXTERN const int meltfieldoff__MCTX_FLAGS; const int meltfieldoff__MCTX_FLAGS = 8; /* in CLASS_MATCHING_CONTEXT */ MELT_EXTERN const int meltfieldoff__MCTX_MDATA; const int meltfieldoff__MCTX_MDATA = 6; /* in CLASS_MATCHING_CONTEXT */ MELT_EXTERN const int meltfieldoff__MCTX_NMATBIND; const int meltfieldoff__MCTX_NMATBIND = 3; /* in CLASS_MATCHING_CONTEXT */ MELT_EXTERN const int meltfieldoff__MCTX_NMATCHED; const int meltfieldoff__MCTX_NMATCHED = 2; /* in CLASS_MATCHING_CONTEXT */ MELT_EXTERN const int meltfieldoff__MCTX_NORMCTXT; const int meltfieldoff__MCTX_NORMCTXT = 0; /* in CLASS_MATCHING_CONTEXT */ MELT_EXTERN const int meltfieldoff__MCTX_SOURCE; const int meltfieldoff__MCTX_SOURCE = 1; /* in CLASS_MATCHING_CONTEXT */ MELT_EXTERN const int meltfieldoff__MCTX_VARHANDLERS; const int meltfieldoff__MCTX_VARHANDLERS = 7; /* in CLASS_MATCHING_CONTEXT */ MELT_EXTERN const int meltfieldoff__MDATA_CTYPE; const int meltfieldoff__MDATA_CTYPE = 2; /* in CLASS_MATCHED_DATA */ MELT_EXTERN const int meltfieldoff__MDATA_ORIG; const int meltfieldoff__MDATA_ORIG = 3; /* in CLASS_MATCHED_DATA */ MELT_EXTERN const int meltfieldoff__MDATA_STEPS; const int meltfieldoff__MDATA_STEPS = 4; /* in CLASS_MATCHED_DATA */ MELT_EXTERN const int meltfieldoff__MDATA_SYMB; const int meltfieldoff__MDATA_SYMB = 1; /* in CLASS_MATCHED_DATA */ MELT_EXTERN const int meltfieldoff__MFLAG_RANK; const int meltfieldoff__MFLAG_RANK = 3; /* in CLASS_MATCH_FLAG */ MELT_EXTERN const int meltfieldoff__MFLAG_SETSTEP; const int meltfieldoff__MFLAG_SETSTEP = 5; /* in CLASS_MATCH_FLAG */ MELT_EXTERN const int meltfieldoff__MFLAG_SPAT; const int meltfieldoff__MFLAG_SPAT = 2; /* in CLASS_MATCH_FLAG */ MELT_EXTERN const int meltfieldoff__MFLAG_STRING; const int meltfieldoff__MFLAG_STRING = 4; /* in CLASS_MATCH_FLAG */ MELT_EXTERN const int meltfieldoff__MSTEPSUCCESS_BINDS; const int meltfieldoff__MSTEPSUCCESS_BINDS = 5; /* in CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG */ MELT_EXTERN const int meltfieldoff__MSTEPSUCCESS_BODY; const int meltfieldoff__MSTEPSUCCESS_BODY = 6; /* in CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG */ MELT_EXTERN const int meltfieldoff__MSTEPSUCCESS_VAROCC; const int meltfieldoff__MSTEPSUCCESS_VAROCC = 4; /* in CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG */ MELT_EXTERN const int meltfieldoff__MSTEPTESTVAR_DATA; const int meltfieldoff__MSTEPTESTVAR_DATA = 6; /* in CLASS_MATCH_STEP_TEST_VARIABLE */ MELT_EXTERN const int meltfieldoff__MSTEP_CLEARDATA; const int meltfieldoff__MSTEP_CLEARDATA = 3; /* in CLASS_MATCH_STEP_CLEAR */ MELT_EXTERN const int meltfieldoff__MSTEP_DATA; const int meltfieldoff__MSTEP_DATA = 3; /* in CLASS_MATCH_STEP_WITH_DATA */ MELT_EXTERN const int meltfieldoff__MSTEP_ELSE; const int meltfieldoff__MSTEP_ELSE = 5; /* in CLASS_MATCH_STEP_TEST */ MELT_EXTERN const int meltfieldoff__MSTEP_FLAG; const int meltfieldoff__MSTEP_FLAG = 3; /* in CLASS_MATCH_STEP_WITH_FLAG */ MELT_EXTERN const int meltfieldoff__MSTEP_FLAGARGS; const int meltfieldoff__MSTEP_FLAGARGS = 4; /* in CLASS_MATCH_STEP_FLAG_OPERATION */ MELT_EXTERN const int meltfieldoff__MSTEP_INDEX; const int meltfieldoff__MSTEP_INDEX = 4; /* in CLASS_MATCH_STEP_WITH_DATA */ MELT_EXTERN const int meltfieldoff__MSTEP_THEN; const int meltfieldoff__MSTEP_THEN = 2; /* in CLASS_MATCH_STEP_THEN */ MELT_EXTERN const int meltfieldoff__MSTGROUP_ELSE; const int meltfieldoff__MSTGROUP_ELSE = 8; /* in CLASS_MATCH_STEP_TEST_GROUP */ MELT_EXTERN const int meltfieldoff__MSTGROUP_START; const int meltfieldoff__MSTGROUP_START = 6; /* in CLASS_MATCH_STEP_TEST_GROUP */ MELT_EXTERN const int meltfieldoff__MSTGROUP_THEN; const int meltfieldoff__MSTGROUP_THEN = 7; /* in CLASS_MATCH_STEP_TEST_GROUP */ MELT_EXTERN const int meltfieldoff__MSTINS_CLASS; const int meltfieldoff__MSTINS_CLASS = 6; /* in CLASS_MATCH_STEP_TEST_INSTANCE */ MELT_EXTERN const int meltfieldoff__MSTINS_SLOTS; const int meltfieldoff__MSTINS_SLOTS = 7; /* in CLASS_MATCH_STEP_TEST_INSTANCE */ MELT_EXTERN const int meltfieldoff__MSTMA_BINDS; const int meltfieldoff__MSTMA_BINDS = 7; /* in CLASS_MATCH_STEP_TEST_MATCHER */ MELT_EXTERN const int meltfieldoff__MSTMA_INS; const int meltfieldoff__MSTMA_INS = 8; /* in CLASS_MATCH_STEP_TEST_MATCHER */ MELT_EXTERN const int meltfieldoff__MSTMA_MATCHER; const int meltfieldoff__MSTMA_MATCHER = 6; /* in CLASS_MATCH_STEP_TEST_MATCHER */ MELT_EXTERN const int meltfieldoff__MSTMA_OUTS; const int meltfieldoff__MSTMA_OUTS = 9; /* in CLASS_MATCH_STEP_TEST_MATCHER */ MELT_EXTERN const int meltfieldoff__MSTTUP_COMPONENTS; const int meltfieldoff__MSTTUP_COMPONENTS = 6; /* in CLASS_MATCH_STEP_TEST_MULTIPLE */ MELT_EXTERN const int meltfieldoff__NAMATCH_BODY; const int meltfieldoff__NAMATCH_BODY = 4; /* in CLASS_NREP_MATCHALT */ MELT_EXTERN const int meltfieldoff__NAMATCH_FLAGS; const int meltfieldoff__NAMATCH_FLAGS = 5; /* in CLASS_NREP_MATCHALT */ MELT_EXTERN const int meltfieldoff__NAMATCH_MATCHED; const int meltfieldoff__NAMATCH_MATCHED = 2; /* in CLASS_NREP_MATCHALT */ MELT_EXTERN const int meltfieldoff__NAMATCH_MDATAS; const int meltfieldoff__NAMATCH_MDATAS = 6; /* in CLASS_NREP_MATCHALT */ MELT_EXTERN const int meltfieldoff__NAMATCH_RESULT; const int meltfieldoff__NAMATCH_RESULT = 3; /* in CLASS_NREP_MATCHALT */ MELT_EXTERN const int meltfieldoff__NAMATCH_STARTLABEL; const int meltfieldoff__NAMATCH_STARTLABEL = 7; /* in CLASS_NREP_MATCHALT */ MELT_EXTERN const int meltfieldoff__NMATCH_MATCHED; const int meltfieldoff__NMATCH_MATCHED = 4; /* in CLASS_NREP_MATCH */ MELT_EXTERN const int meltfieldoff__NMATCH_STUFFMAP; const int meltfieldoff__NMATCH_STUFFMAP = 3; /* in CLASS_NREP_MATCH */ MELT_EXTERN const int meltfieldoff__NMATCH_TESTS; const int meltfieldoff__NMATCH_TESTS = 2; /* in CLASS_NREP_MATCH */ MELT_EXTERN const int meltfieldoff__NMDAC_DATA; const int meltfieldoff__NMDAC_DATA = 1; /* in CLASS_NREP_MATCH_DATA_ACTION */ MELT_EXTERN const int meltfieldoff__NMJMP_LABEL; const int meltfieldoff__NMJMP_LABEL = 1; /* in CLASS_NREP_MATCH_JUMP */ MELT_EXTERN const int meltfieldoff__NMLAB_STEP; const int meltfieldoff__NMLAB_STEP = 1; /* in CLASS_NREP_MATCH_LABEL */ MELT_EXTERN const int meltfieldoff__NRMATD_CTYPE; const int meltfieldoff__NRMATD_CTYPE = 1; /* in CLASS_NREP_MATCHED_DATA */ MELT_EXTERN const int meltfieldoff__NRMATD_MDATA; const int meltfieldoff__NRMATD_MDATA = 2; /* in CLASS_NREP_MATCHED_DATA */ MELT_EXTERN const int meltfieldoff__NRMATD_RANK; const int meltfieldoff__NRMATD_RANK = 3; /* in CLASS_NREP_MATCHED_DATA */ MELT_EXTERN const int meltfieldoff__NRPFLA_FLAG; const int meltfieldoff__NRPFLA_FLAG = 1; /* in CLASS_NREP_MATCH_FLAG */ MELT_EXTERN const int meltfieldoff__NRPFLA_NMATCH; const int meltfieldoff__NRPFLA_NMATCH = 2; /* in CLASS_NREP_MATCH_FLAG */ MELT_EXTERN const int meltfieldoff__NTDISJUNCTS; const int meltfieldoff__NTDISJUNCTS = 7; /* in CLASS_NORMTESTER_DISJUNCTION */ MELT_EXTERN const int meltfieldoff__NTDISJ_FRESHORVAR; const int meltfieldoff__NTDISJ_FRESHORVAR = 8; /* in CLASS_NORMTESTER_DISJUNCTION */ MELT_EXTERN const int meltfieldoff__NTDISJ_SETORVAR; const int meltfieldoff__NTDISJ_SETORVAR = 9; /* in CLASS_NORMTESTER_DISJUNCTION */ MELT_EXTERN const int meltfieldoff__NTESTISA_CLASS; const int meltfieldoff__NTESTISA_CLASS = 2; /* in CLASS_NREP_JUMP_WHEN_IS_A */ MELT_EXTERN const int meltfieldoff__NTESTISA_JUMP; const int meltfieldoff__NTESTISA_JUMP = 3; /* in CLASS_NREP_JUMP_WHEN_IS_A */ MELT_EXTERN const int meltfieldoff__NTESTISA_VALUE; const int meltfieldoff__NTESTISA_VALUE = 1; /* in CLASS_NREP_JUMP_WHEN_IS_A */ MELT_EXTERN const int meltfieldoff__NTEST_COMEFROM; const int meltfieldoff__NTEST_COMEFROM = 6; /* in CLASS_NORMTESTER_ANY */ MELT_EXTERN const int meltfieldoff__NTEST_ELSE; const int meltfieldoff__NTEST_ELSE = 3; /* in CLASS_NORMTESTER_ANY */ MELT_EXTERN const int meltfieldoff__NTEST_LOCCLIST; const int meltfieldoff__NTEST_LOCCLIST = 5; /* in CLASS_NORMTESTER_ANY */ MELT_EXTERN const int meltfieldoff__NTEST_MATCHED; const int meltfieldoff__NTEST_MATCHED = 1; /* in CLASS_NORMTESTER_ANY */ MELT_EXTERN const int meltfieldoff__NTEST_NORMATCH; const int meltfieldoff__NTEST_NORMATCH = 4; /* in CLASS_NORMTESTER_ANY */ MELT_EXTERN const int meltfieldoff__NTEST_THEN; const int meltfieldoff__NTEST_THEN = 2; /* in CLASS_NORMTESTER_ANY */ MELT_EXTERN const int meltfieldoff__NTINST_CLASS; const int meltfieldoff__NTINST_CLASS = 7; /* in CLASS_NORMTESTER_INSTANCE */ MELT_EXTERN const int meltfieldoff__NTINST_FIELDLOCS; const int meltfieldoff__NTINST_FIELDLOCS = 8; /* in CLASS_NORMTESTER_INSTANCE */ MELT_EXTERN const int meltfieldoff__NTMATCH_INARGS; const int meltfieldoff__NTMATCH_INARGS = 9; /* in CLASS_NORMTESTER_MATCHER */ MELT_EXTERN const int meltfieldoff__NTMATCH_MATCHER; const int meltfieldoff__NTMATCH_MATCHER = 7; /* in CLASS_NORMTESTER_MATCHER */ MELT_EXTERN const int meltfieldoff__NTMATCH_MATNDATA; const int meltfieldoff__NTMATCH_MATNDATA = 8; /* in CLASS_NORMTESTER_MATCHER */ MELT_EXTERN const int meltfieldoff__NTMATCH_OUTLOCS; const int meltfieldoff__NTMATCH_OUTLOCS = 10; /* in CLASS_NORMTESTER_MATCHER */ MELT_EXTERN const int meltfieldoff__NTORCLEAR_LOCSYM; const int meltfieldoff__NTORCLEAR_LOCSYM = 7; /* in CLASS_NORMTESTER_OR_CLEAR */ MELT_EXTERN const int meltfieldoff__NTORTRANSMIT_DST; const int meltfieldoff__NTORTRANSMIT_DST = 7; /* in CLASS_NORMTESTER_OR_TRANSMIT */ MELT_EXTERN const int meltfieldoff__NTORTRANSMIT_SRC; const int meltfieldoff__NTORTRANSMIT_SRC = 8; /* in CLASS_NORMTESTER_OR_TRANSMIT */ MELT_EXTERN const int meltfieldoff__NTSAME_IDENTICAL; const int meltfieldoff__NTSAME_IDENTICAL = 7; /* in CLASS_NORMTESTER_SAME */ MELT_EXTERN const int meltfieldoff__NTSUCCESS_DO; const int meltfieldoff__NTSUCCESS_DO = 7; /* in CLASS_NORMTESTER_SUCCESS */ MELT_EXTERN const int meltfieldoff__NTTUPLE_COMPONENTS; const int meltfieldoff__NTTUPLE_COMPONENTS = 7; /* in CLASS_NORMTESTER_TUPLE */ MELT_EXTERN const int meltfieldoff__PCTN_BINDLIST; const int meltfieldoff__PCTN_BINDLIST = 6; /* in CLASS_PATTERN_CONTEXT */ MELT_EXTERN const int meltfieldoff__PCTN_ENV; const int meltfieldoff__PCTN_ENV = 2; /* in CLASS_PATTERN_CONTEXT */ MELT_EXTERN const int meltfieldoff__PCTN_MAPATCST; const int meltfieldoff__PCTN_MAPATCST = 4; /* in CLASS_PATTERN_CONTEXT */ MELT_EXTERN const int meltfieldoff__PCTN_MAPATVAR; const int meltfieldoff__PCTN_MAPATVAR = 3; /* in CLASS_PATTERN_CONTEXT */ MELT_EXTERN const int meltfieldoff__PCTN_MAPOR; const int meltfieldoff__PCTN_MAPOR = 5; /* in CLASS_PATTERN_CONTEXT */ MELT_EXTERN const int meltfieldoff__PCTN_NORMCTXT; const int meltfieldoff__PCTN_NORMCTXT = 0; /* in CLASS_PATTERN_CONTEXT */ MELT_EXTERN const int meltfieldoff__PCTN_PVARLOCMAP; const int meltfieldoff__PCTN_PVARLOCMAP = 8; /* in CLASS_PATTERN_CONTEXT */ MELT_EXTERN const int meltfieldoff__PCTN_SRC; const int meltfieldoff__PCTN_SRC = 1; /* in CLASS_PATTERN_CONTEXT */ MELT_EXTERN const int meltfieldoff__PCTN_STUFFMAP; const int meltfieldoff__PCTN_STUFFMAP = 7; /* in CLASS_PATTERN_CONTEXT */ MELT_EXTERN const int meltfieldoff__PCTN_TESTS; const int meltfieldoff__PCTN_TESTS = 9; /* in CLASS_PATTERN_CONTEXT */ MELT_EXTERN const int meltfieldoff__PCTN_VARHANDLERS; const int meltfieldoff__PCTN_VARHANDLERS = 10; /* in CLASS_PATTERN_CONTEXT */ /* exported 47 class lengths */ MELT_EXTERN const int meltclasslen__CLASS_MATCHED_BINDING; const int meltclasslen__CLASS_MATCHED_BINDING = 3; MELT_EXTERN const int meltclasslen__CLASS_MATCHED_DATA; const int meltclasslen__CLASS_MATCHED_DATA = 5; MELT_EXTERN const int meltclasslen__CLASS_MATCHED_NORMAL_DATA; const int meltclasslen__CLASS_MATCHED_NORMAL_DATA = 5; MELT_EXTERN const int meltclasslen__CLASS_MATCHING_CONTEXT; const int meltclasslen__CLASS_MATCHING_CONTEXT = 10; MELT_EXTERN const int meltclasslen__CLASS_MATCH_CASE; const int meltclasslen__CLASS_MATCH_CASE = 5; MELT_EXTERN const int meltclasslen__CLASS_MATCH_FLAG; const int meltclasslen__CLASS_MATCH_FLAG = 6; MELT_EXTERN const int meltclasslen__CLASS_MATCH_NORMALIZATION_CONTEXT; const int meltclasslen__CLASS_MATCH_NORMALIZATION_CONTEXT = 11; MELT_EXTERN const int meltclasslen__CLASS_MATCH_STEP; const int meltclasslen__CLASS_MATCH_STEP = 2; MELT_EXTERN const int meltclasslen__CLASS_MATCH_STEP_CLEAR; const int meltclasslen__CLASS_MATCH_STEP_CLEAR = 4; MELT_EXTERN const int meltclasslen__CLASS_MATCH_STEP_FLAG_CONJUNCTION; const int meltclasslen__CLASS_MATCH_STEP_FLAG_CONJUNCTION = 5; MELT_EXTERN const int meltclasslen__CLASS_MATCH_STEP_FLAG_DISJUNCTION; const int meltclasslen__CLASS_MATCH_STEP_FLAG_DISJUNCTION = 5; MELT_EXTERN const int meltclasslen__CLASS_MATCH_STEP_FLAG_OPERATION; const int meltclasslen__CLASS_MATCH_STEP_FLAG_OPERATION = 5; MELT_EXTERN const int meltclasslen__CLASS_MATCH_STEP_FLAG_SET; const int meltclasslen__CLASS_MATCH_STEP_FLAG_SET = 4; MELT_EXTERN const int meltclasslen__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG; const int meltclasslen__CLASS_MATCH_STEP_SUCCESS_WHEN_FLAG = 7; MELT_EXTERN const int meltclasslen__CLASS_MATCH_STEP_TEST; const int meltclasslen__CLASS_MATCH_STEP_TEST = 6; MELT_EXTERN const int meltclasslen__CLASS_MATCH_STEP_TEST_GROUP; const int meltclasslen__CLASS_MATCH_STEP_TEST_GROUP = 9; MELT_EXTERN const int meltclasslen__CLASS_MATCH_STEP_TEST_INSTANCE; const int meltclasslen__CLASS_MATCH_STEP_TEST_INSTANCE = 8; MELT_EXTERN const int meltclasslen__CLASS_MATCH_STEP_TEST_MATCHER; const int meltclasslen__CLASS_MATCH_STEP_TEST_MATCHER = 10; MELT_EXTERN const int meltclasslen__CLASS_MATCH_STEP_TEST_MULTIPLE; const int meltclasslen__CLASS_MATCH_STEP_TEST_MULTIPLE = 7; MELT_EXTERN const int meltclasslen__CLASS_MATCH_STEP_TEST_VARIABLE; const int meltclasslen__CLASS_MATCH_STEP_TEST_VARIABLE = 7; MELT_EXTERN const int meltclasslen__CLASS_MATCH_STEP_THEN; const int meltclasslen__CLASS_MATCH_STEP_THEN = 3; MELT_EXTERN const int meltclasslen__CLASS_MATCH_STEP_WITH_DATA; const int meltclasslen__CLASS_MATCH_STEP_WITH_DATA = 5; MELT_EXTERN const int meltclasslen__CLASS_MATCH_STEP_WITH_FLAG; const int meltclasslen__CLASS_MATCH_STEP_WITH_FLAG = 4; MELT_EXTERN const int meltclasslen__CLASS_NORMTESTER_ANY; const int meltclasslen__CLASS_NORMTESTER_ANY = 7; MELT_EXTERN const int meltclasslen__CLASS_NORMTESTER_ANYTESTER; const int meltclasslen__CLASS_NORMTESTER_ANYTESTER = 7; MELT_EXTERN const int meltclasslen__CLASS_NORMTESTER_DISJUNCTION; const int meltclasslen__CLASS_NORMTESTER_DISJUNCTION = 10; MELT_EXTERN const int meltclasslen__CLASS_NORMTESTER_INSTANCE; const int meltclasslen__CLASS_NORMTESTER_INSTANCE = 9; MELT_EXTERN const int meltclasslen__CLASS_NORMTESTER_MATCHER; const int meltclasslen__CLASS_NORMTESTER_MATCHER = 11; MELT_EXTERN const int meltclasslen__CLASS_NORMTESTER_OR_CLEAR; const int meltclasslen__CLASS_NORMTESTER_OR_CLEAR = 8; MELT_EXTERN const int meltclasslen__CLASS_NORMTESTER_OR_INITIAL_CLEAR; const int meltclasslen__CLASS_NORMTESTER_OR_INITIAL_CLEAR = 8; MELT_EXTERN const int meltclasslen__CLASS_NORMTESTER_OR_TRANSMIT; const int meltclasslen__CLASS_NORMTESTER_OR_TRANSMIT = 9; MELT_EXTERN const int meltclasslen__CLASS_NORMTESTER_SAME; const int meltclasslen__CLASS_NORMTESTER_SAME = 8; MELT_EXTERN const int meltclasslen__CLASS_NORMTESTER_SUCCESS; const int meltclasslen__CLASS_NORMTESTER_SUCCESS = 8; MELT_EXTERN const int meltclasslen__CLASS_NORMTESTER_TUPLE; const int meltclasslen__CLASS_NORMTESTER_TUPLE = 8; MELT_EXTERN const int meltclasslen__CLASS_NREP_JUMP_WHEN_IS_A; const int meltclasslen__CLASS_NREP_JUMP_WHEN_IS_A = 4; MELT_EXTERN const int meltclasslen__CLASS_NREP_MATCH; const int meltclasslen__CLASS_NREP_MATCH = 5; MELT_EXTERN const int meltclasslen__CLASS_NREP_MATCHALT; const int meltclasslen__CLASS_NREP_MATCHALT = 8; MELT_EXTERN const int meltclasslen__CLASS_NREP_MATCHED_DATA; const int meltclasslen__CLASS_NREP_MATCHED_DATA = 4; MELT_EXTERN const int meltclasslen__CLASS_NREP_MATCH_DATA_ACTION; const int meltclasslen__CLASS_NREP_MATCH_DATA_ACTION = 2; MELT_EXTERN const int meltclasslen__CLASS_NREP_MATCH_DATA_CLEAR; const int meltclasslen__CLASS_NREP_MATCH_DATA_CLEAR = 2; MELT_EXTERN const int meltclasslen__CLASS_NREP_MATCH_DATA_FINALIZER; const int meltclasslen__CLASS_NREP_MATCH_DATA_FINALIZER = 2; MELT_EXTERN const int meltclasslen__CLASS_NREP_MATCH_DATA_INITIALIZER; const int meltclasslen__CLASS_NREP_MATCH_DATA_INITIALIZER = 2; MELT_EXTERN const int meltclasslen__CLASS_NREP_MATCH_FLAG; const int meltclasslen__CLASS_NREP_MATCH_FLAG = 3; MELT_EXTERN const int meltclasslen__CLASS_NREP_MATCH_JUMP; const int meltclasslen__CLASS_NREP_MATCH_JUMP = 2; MELT_EXTERN const int meltclasslen__CLASS_NREP_MATCH_LABEL; const int meltclasslen__CLASS_NREP_MATCH_LABEL = 2; MELT_EXTERN const int meltclasslen__CLASS_NREP_MATCH_LABEL_END; const int meltclasslen__CLASS_NREP_MATCH_LABEL_END = 2; MELT_EXTERN const int meltclasslen__CLASS_PATTERN_CONTEXT; const int meltclasslen__CLASS_PATTERN_CONTEXT = 11; /**** end of warmelt-normatch ****/