/* GCC MELT GENERATED FILE warmelt-normal.c - DO NOT EDIT */ /***+ warmelt-normal 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-normal declarations ****/ /*************************************************** *** Copyright 2008, 2009, 2010, 2011, 2012 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_normal_ADD_NCTX_DATA (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_FILL_INITIAL_PREDEFMAP (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_REGISTER_LITERAL_VALUE (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_CREATE_NORMCONTEXT (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_CREATE_NORMAL_EXTENDING_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_6_warmelt_normal_NORMEXP_IDENTICAL (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMEXP_NULL (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMEXP_ANY_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_9_warmelt_normal_NORMEXP_ANY_VALUE (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMEXP_SRC_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_11_warmelt_normal_NORMEXP_LAZYMACROEXP (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_GECTYP_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_13_warmelt_normal_GECTYP_ROOT (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_GECTYP_INTEGER (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_GECTYP_STRING (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMALIZE_TUPLE (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_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_18_warmelt_normal_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_19_warmelt_normal_WRAP_NORMAL_LET1 (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_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_21_warmelt_normal_WRAP_NORMAL_LETSEQ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_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_23_warmelt_normal_CHECK_CTYPE_NARGS (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_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_25_warmelt_normal_NORMBIND_FAILANY (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMBIND_ANYBIND (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMBIND_FORMALBIND (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMBIND_LETBIND (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMBIND_FIXBIND (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMBIND_DEFINEDVALBIND (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMBIND_CONSTRUCTBIND (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMEXP_SYMBOL (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_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_34_warmelt_normal_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_35_warmelt_normal_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_36_warmelt_normal_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_37_warmelt_normal_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_38_warmelt_normal_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_39_warmelt_normal_GECTYP_SYMOCC (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMEXP_CLASS (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMEXP_PRIMITIVE (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_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_43_warmelt_normal_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_44_warmelt_normal_NORMEXP_CODE_CHUNK (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_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_46_warmelt_normal_NORMEXP_CMATCHEXPR (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_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_48_warmelt_normal_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_49_warmelt_normal_NORMEXP_FUNMATCHEXPR (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMEXP_APPLY (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMEXP_MSEND (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMEXP_RETURN (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMEXP_IF (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_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_55_warmelt_normal_NORMEXP_IFELSE (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_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_57_warmelt_normal_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_58_warmelt_normal_NORMEXP_CPPIF (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_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_60_warmelt_normal_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_61_warmelt_normal_NORMEXP_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_62_warmelt_normal_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_63_warmelt_normal_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_64_warmelt_normal_NORMEXP_PROGN (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_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_66_warmelt_normal_NORMEXP_LET (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_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_68_warmelt_normal_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_69_warmelt_normal_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_70_warmelt_normal_NORMEXP_UNSAFE_GET_FIELD (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMEXP_GET_FIELD (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMEXP_UNSAFE_PUT_FIELDS (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_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_74_warmelt_normal_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_75_warmelt_normal_NORMEXP_PUT_FIELDS (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMEXP_SETQ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_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_78_warmelt_normal_NORMEXP_INSTANCE (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_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_80_warmelt_normal_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_81_warmelt_normal_NORMEXP_FOREVER (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMEXP_EXIT (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMEXP_AGAIN (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMEXP_IFVARIADIC (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_85_warmelt_normal_NORMEXP_COMPILEWARNING (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_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_87_warmelt_normal_REPLACE_LAST_BY_RETURN (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_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_ptr_t MELT_MODULE_VISIBILITY meltrout_89_warmelt_normal_NORMEXP_DEFUN (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_LAMBDA___35__ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_LAMBDA___36__ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMALIZE_LAMBDA (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_LAMBDA___37__ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMEXP_LAMBDA (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMEXP_MULTICALL (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_LAMBDA___38__ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_LAMBDA___39__ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_LAMBDA___40__ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMEXP_TUPLE (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMEXP_LIST (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_LAMBDA___41__ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_BADMETH_PREPARE_CONSTRUCTOR_BINDING (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_BADMETH_NORMAL_LETREC_CONSTRUCTIVE (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_PREPCONS_LAMBDA (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMLETREC_LAMBDA (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_PREPCONS_TUPLE (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMLETREC_TUPLE (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_PREPCONS_LIST (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NRECLIST_FIND_LOCSYM (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMLETREC_LIST (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_PREPCONS_INSTANCE (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMLETREC_INSTANCE (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_LAMBDA___42__ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMEXP_LETREC (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMAL_PREDEF (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMAL_SYMBOL_DATA (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMAL_KEYWORD_DATA (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_CREATE_DATA_SLOTS (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_FILL_DATA_SLOT (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMEXP_QUOTE (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMEXP_COMMENT (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMEXP_KEYWORD (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_FILL_NORMAL_FORMALBIND (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_FILL_NORMAL_FORMALS (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_FILL_NORMAL_EXPANSION (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_LAMBDA___43__ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMEXP_DEFPRIMITIVE (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMEXP_DEFCITERATOR (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMEXP_CITERATION (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_LAMBDA___44__ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_LAMBDA___45__ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_LAMBDA___46__ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_LAMBDA___47__ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_LAMBDA___48__ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_LAMBDA___49__ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_LAMBDA___50__ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMEXP_DEFCMATCHER (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMEXP_DEFUNMATCHER (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMEXP_DEFCLASS (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_normal_NORMEXP_DEFINSTANCE (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_141_warmelt_normal_LAMBDA___51__ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_142_warmelt_normal_NORMEXP_DEFINE (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_143_warmelt_normal_LAMBDA___52__ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_144_warmelt_normal_NORMEXP_DEFSELECTOR (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_145_warmelt_normal_LAMBDA___53__ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_146_warmelt_normal_NORMAL_VALUE_EXPORTER (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_147_warmelt_normal_NORMAL_EXPORTED_VALUE (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_148_warmelt_normal_NORMEXP_EXPORT_VALUES (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_149_warmelt_normal_NORMEXP_EXPORT_SYNONYM (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_150_warmelt_normal_NORMEXP_EXPORT_CLASS (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_151_warmelt_normal_LAMBDA___54__ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_152_warmelt_normal_LAMBDA___55__ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_153_warmelt_normal_NORMAL_MACRO_EXPORTER (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_154_warmelt_normal_NORMAL_PATMACRO_EXPORTER (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_155_warmelt_normal_NORMAL_EXPORTED_MACRO (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_156_warmelt_normal_NORMEXP_EXPORT_MACRO (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_157_warmelt_normal_NORMAL_EXPORTED_PATMACRO (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_158_warmelt_normal_NORMEXP_EXPORT_PATMACRO (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_159_warmelt_normal_NORMEXP_CURRENT_MODULE_ENVIRONMENT_CONTAINER (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_160_warmelt_normal_NORMEXP_PARENT_MODULE_ENVIRONMENT (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_161_warmelt_normal_NORMEXP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_162_warmelt_normal_NORMEXP_FETCH_PREDEFINED (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_163_warmelt_normal_LAMBDA___56__ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_164_warmelt_normal_NORMEXP_STORE_PREDEFINED (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_165_warmelt_normal_LAMBDA___57__ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_166_warmelt_normal_NORMEXP_CHEADER (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_167_warmelt_normal_NORMEXP_USE_PACKAGE_FROM_PKG_CONFIG (meltclosure_ptr_t meltclosp_, melt_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_normal__melt_have_debug_enabled[]; #define melt_have_debug_string meltmodule_warmelt_normal__melt_have_debug_enabled #else /*!MELT_HAVE_DEBUG */ MELT_EXTERN const char meltmodule_warmelt_normal__melt_have_debug_disabled[]; #define melt_have_debug_string meltmodule_warmelt_normal__melt_have_debug_disabled #endif /*!MELT_HAVE_DEBUG */ struct frame_melt_start_this_module_st; void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_0 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_1 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_2 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_3 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_4 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_5 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_6 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_7 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_8 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_9 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_10 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_11 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_12 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_13 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_14 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_15 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_16 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_17 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_18 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_19 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_20 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_21 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_22 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_23 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_24 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_25 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_26 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_27 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_28 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_29 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_30 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_31 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_32 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_33 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_34 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_35 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_36 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_37 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_38 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_39 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_40 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_41 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_42 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_43 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_44 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_45 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_46 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_47 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_48 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_49 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__initialmeltchunk_50 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_normal__forward_or_mark_module_start_frame (struct melt_callframe_st *fp, int marking); #define meltmarking_melt_start_this_module meltmod__warmelt_normal__forward_or_mark_module_start_frame /**** warmelt-normal implementations ****/ melt_ptr_t MELT_MODULE_VISIBILITY meltrout_1_warmelt_normal_ADD_NCTX_DATA (meltclosure_ptr_t meltclosp_, 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_normal_ADD_NCTX_DATA_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_normal_ADD_NCTX_DATA_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 21 melt_ptr_t mcfr_varptr[21]; #define MELTFRAM_NBVARNUM 8 long mcfr_varnum[8]; /*others*/ long _spare_; } *meltframptr_ = 0, meltfram__; /*declfrastruct */ #define meltframe meltfram__ /*meltrout_1_warmelt_normal_ADD_NCTX_DATA is not initial declstructinit */ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC)) { /*mark for ggc */ int ix = 0; meltframptr_ = (struct frame_meltrout_1_warmelt_normal_ADD_NCTX_DATA_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 < 21; ix++) if (meltframptr_->mcfr_varptr[ix]) gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]); return NULL; } /*end markggc */ ; memset (&meltfram__, 0, sizeof (meltfram__)); /* declstructinit plain routine meltrout_1_warmelt_normal_ADD_NCTX_DATA nbval 21*/ meltfram__.mcfr_nbvar = 21 /*nbval */ ; meltfram__.mcfr_clos = meltclosp_; meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe; melt_topframe = (struct melt_callframe_st *) &meltfram__; melt_trace_start ("ADD_NCTX_DATA", meltcallcount); /*getargs*/ /*getarg#0 */ MELT_LOCATION ("warmelt-normal.melt:828:/ getarg"); /*_.NCTX__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ /*^getarg */ if (meltxargdescr_[0] != MELTBPAR_PTR) goto lab_endgetargs; /*_.NDATA__V3*/ meltfptr[2] = (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL; gcc_assert (melt_discr ((melt_ptr_t) ( /*_.NDATA__V3*/ meltfptr[2])) != NULL); ; goto lab_endgetargs; lab_endgetargs:; /*body*/ /*^block*/ /*anyblock*/ { #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-normal.melt:829:/ cppif.then"); /*^block */ /*anyblock */ { /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*_#IS_A__L1*/ meltfnum[0] = melt_is_instance_of ((melt_ptr_t) ( /*_.NCTX__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMALIZATION_CONTEXT */ meltfrout->tabval[0])));; MELT_LOCATION ("warmelt-normal.melt:829:/ cond"); /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ /*_.IFELSE___V5*/ meltfptr[4] = ( /*nil */ NULL);; } else { MELT_LOCATION ("warmelt-normal.melt:829:/ cond.else"); /*^block */ /*anyblock */ { { /*^locexp */ melt_assert_failed (("check nctx"), ("warmelt-normal.melt") ? ("warmelt-normal.melt") : __FILE__, (829) ? (829) : __LINE__, __FUNCTION__); ; } ; /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0; /*epilog */ } ; } ; /*^compute */ /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:829:/ clear"); /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-normal.melt:830:/ cppif.then"); /*^block */ /*anyblock */ { /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*_#IS_A__L2*/ meltfnum[0] = melt_is_instance_of ((melt_ptr_t) ( /*_.NDATA__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_NREP_BOUND_DATA */ meltfrout->tabval[1])));; MELT_LOCATION ("warmelt-normal.melt:830:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */ { /*^cond.then */ /*_.IFELSE___V7*/ meltfptr[6] = ( /*nil */ NULL);; } else { MELT_LOCATION ("warmelt-normal.melt:830:/ cond.else"); /*^block */ /*anyblock */ { { /*^locexp */ melt_assert_failed (("check ndata"), ("warmelt-normal.melt") ? ("warmelt-normal.melt") : __FILE__, (830) ? (830) : __LINE__, __FUNCTION__); ; } ; /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0; /*epilog */ } ; } ; /*^compute */ /*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:830:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V6*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-normal.melt:831:/ cppif.then"); /*^block */ /*anyblock */ { /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*^getslot */ { melt_ptr_t slot = NULL, obj = NULL; obj = (melt_ptr_t) ( /*_.NDATA__V3*/ meltfptr[2]) /*=obj*/ ; melt_object_get_field (slot, obj, 2, "NDATA_RANK"); /*_.NDATA_RANK__V9*/ meltfptr[8] = slot; }; ; /*_#NULL__L3*/ meltfnum[0] = (( /*_.NDATA_RANK__V9*/ meltfptr[8]) == NULL);; MELT_LOCATION ("warmelt-normal.melt:831:/ cond"); /*cond */ if ( /*_#NULL__L3*/ meltfnum[0]) /*then */ { /*^cond.then */ /*_.IFELSE___V10*/ meltfptr[9] = ( /*nil */ NULL);; } else { MELT_LOCATION ("warmelt-normal.melt:831:/ cond.else"); /*^block */ /*anyblock */ { { /*^locexp */ melt_assert_failed (("fresh ndata"), ("warmelt-normal.melt") ? ("warmelt-normal.melt") : __FILE__, (831) ? (831) : __LINE__, __FUNCTION__); ; } ; /*clear *//*_.IFELSE___V10*/ meltfptr[9] = 0; /*epilog */ } ; } ; /*^compute */ /*_.IFCPP___V8*/ meltfptr[6] = /*_.IFELSE___V10*/ meltfptr[9];; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:831:/ clear"); /*clear *//*_.NDATA_RANK__V9*/ meltfptr[8] = 0; /*^clear */ /*clear *//*_#NULL__L3*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V10*/ meltfptr[9] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V8*/ meltfptr[6] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION ("warmelt-normal.melt:832:/ quasiblock"); /*^getslot */ { melt_ptr_t slot = NULL, obj = NULL; obj = (melt_ptr_t) ( /*_.NCTX__V2*/ meltfptr[1]) /*=obj*/ ; melt_object_get_field (slot, obj, 2, "NCTX_DATALIST"); /*_.DATLIS__V12*/ meltfptr[9] = slot; }; ; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-normal.melt:833:/ cppif.then"); /*^block */ /*anyblock */ { /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*_#IS_LIST__L4*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.DATLIS__V12*/ meltfptr[9])) == MELTOBMAG_LIST);; MELT_LOCATION ("warmelt-normal.melt:833:/ cond"); /*cond */ if ( /*_#IS_LIST__L4*/ meltfnum[0]) /*then */ { /*^cond.then */ /*_.IFELSE___V14*/ meltfptr[13] = ( /*nil */ NULL);; } else { MELT_LOCATION ("warmelt-normal.melt:833:/ cond.else"); /*^block */ /*anyblock */ { { /*^locexp */ melt_assert_failed (("check datlis"), ("warmelt-normal.melt") ? ("warmelt-normal.melt") : __FILE__, (833) ? (833) : __LINE__, __FUNCTION__); ; } ; /*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0; /*epilog */ } ; } ; /*^compute */ /*_.IFCPP___V13*/ meltfptr[12] = /*_.IFELSE___V14*/ meltfptr[13];; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:833:/ clear"); /*clear *//*_#IS_LIST__L4*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V13*/ meltfptr[12] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION ("warmelt-normal.melt:834:/ quasiblock"); /*_.LIST_LAST__V15*/ meltfptr[13] = (melt_list_last ((melt_ptr_t) ( /*_.DATLIS__V12*/ meltfptr[9])));; /*^compute */ /*_.LASTDAT__V16*/ meltfptr[15] = (melt_pair_head ((melt_ptr_t) ( /*_.LIST_LAST__V15*/ meltfptr[13])));; MELT_LOCATION ("warmelt-normal.melt:835:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_A__L5*/ meltfnum[0] = melt_is_instance_of ((melt_ptr_t) ( /*_.LASTDAT__V16*/ meltfptr[15]), (melt_ptr_t) (( /*!CLASS_NREP_BOUND_DATA */ meltfrout->tabval[1])));; MELT_LOCATION ("warmelt-normal.melt:835:/ cond"); /*cond */ if ( /*_#IS_A__L5*/ meltfnum[0]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { MELT_LOCATION ("warmelt-normal.melt:836:/ quasiblock"); /*^getslot */ { melt_ptr_t slot = NULL, obj = NULL; obj = (melt_ptr_t) ( /*_.LASTDAT__V16*/ meltfptr[15]) /*=obj*/ ; melt_object_get_field (slot, obj, 2, "NDATA_RANK"); /*_.NDATA_RANK__V17*/ meltfptr[16] = slot; }; ; /*_#LASTRK__L6*/ meltfnum[5] = (melt_get_int ((melt_ptr_t) ( /*_.NDATA_RANK__V17*/ meltfptr[16])));; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-normal.melt:837:/ cppif.then"); /*^block */ /*anyblock */ { /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*_#I__L7*/ meltfnum[6] = (( /*_#LASTRK__L6*/ meltfnum[5]) > (0));; MELT_LOCATION ("warmelt-normal.melt:837:/ cond"); /*cond */ if ( /*_#I__L7*/ meltfnum[6]) /*then */ { /*^cond.then */ /*_.IFELSE___V19*/ meltfptr[18] = ( /*nil */ NULL);; } else { MELT_LOCATION ("warmelt-normal.melt:837:/ cond.else"); /*^block */ /*anyblock */ { { /*^locexp */ melt_assert_failed (("check lastrk"), ("warmelt-normal.melt") ? ("warmelt-normal.melt") : __FILE__, (837) ? (837) : __LINE__, __FUNCTION__); ; } ; /*clear *//*_.IFELSE___V19*/ meltfptr[18] = 0; /*epilog */ } ; } ; /*^compute */ /*_.IFCPP___V18*/ meltfptr[17] = /*_.IFELSE___V19*/ meltfptr[18];; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:837:/ clear"); /*clear *//*_#I__L7*/ meltfnum[6] = 0; /*^clear */ /*clear *//*_.IFELSE___V19*/ meltfptr[18] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V18*/ meltfptr[17] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION ("warmelt-normal.melt:838:/ quasiblock"); /*_#I__L8*/ meltfnum[6] = ((1) + ( /*_#LASTRK__L6*/ meltfnum[5]));; /*^compute */ /*_.RKBOX__V20*/ meltfptr[18] = (meltgc_new_int ((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[2])), ( /*_#I__L8*/ meltfnum[6])));; MELT_LOCATION ("warmelt-normal.melt:839:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj @NDATA_RANK", melt_magic_discr ((melt_ptr_t) ( /*_.NDATA__V3*/ meltfptr[2])) == MELTOBMAG_OBJECT); melt_putfield_object (( /*_.NDATA__V3*/ meltfptr[2]), (2), ( /*_.RKBOX__V20*/ meltfptr[18]), "NDATA_RANK"); ; /*^touch */ meltgc_touch ( /*_.NDATA__V3*/ meltfptr[2]); ; /*^touchobj */ melt_dbgtrace_written_object ( /*_.NDATA__V3*/ meltfptr[2], "put-fields"); ; MELT_LOCATION ("warmelt-normal.melt:838:/ clear"); /*clear *//*_#I__L8*/ meltfnum[6] = 0; /*^clear */ /*clear *//*_.RKBOX__V20*/ meltfptr[18] = 0; MELT_LOCATION ("warmelt-normal.melt:836:/ clear"); /*clear *//*_.NDATA_RANK__V17*/ meltfptr[16] = 0; /*^clear */ /*clear *//*_#LASTRK__L6*/ meltfnum[5] = 0; /*^clear */ /*clear *//*_.IFCPP___V18*/ meltfptr[17] = 0; /*epilog */ } ; } else { MELT_LOCATION ("warmelt-normal.melt:835:/ cond.else"); /*^block */ /*anyblock */ { MELT_LOCATION ("warmelt-normal.melt:841:/ quasiblock"); /*_.RKBOX1__V21*/ meltfptr[18] = (meltgc_new_int ((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[2])), (1)));; MELT_LOCATION ("warmelt-normal.melt:842:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj @NDATA_RANK", melt_magic_discr ((melt_ptr_t) ( /*_.NDATA__V3*/ meltfptr[2])) == MELTOBMAG_OBJECT); melt_putfield_object (( /*_.NDATA__V3*/ meltfptr[2]), (2), ( /*_.RKBOX1__V21*/ meltfptr[18]), "NDATA_RANK"); ; /*^touch */ meltgc_touch ( /*_.NDATA__V3*/ meltfptr[2]); ; /*^touchobj */ melt_dbgtrace_written_object ( /*_.NDATA__V3*/ meltfptr[2], "put-fields"); ; MELT_LOCATION ("warmelt-normal.melt:841:/ clear"); /*clear *//*_.RKBOX1__V21*/ meltfptr[18] = 0; /*epilog */ } ; } ; MELT_LOCATION ("warmelt-normal.melt:834:/ clear"); /*clear *//*_.LIST_LAST__V15*/ meltfptr[13] = 0; /*^clear */ /*clear *//*_.LASTDAT__V16*/ meltfptr[15] = 0; /*^clear */ /*clear *//*_#IS_A__L5*/ meltfnum[0] = 0; { MELT_LOCATION ("warmelt-normal.melt:844:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.DATLIS__V12*/ meltfptr[9]), (melt_ptr_t) ( /*_.NDATA__V3*/ meltfptr[2])); } ; /*_.LET___V11*/ meltfptr[8] = /*_.NDATA__V3*/ meltfptr[2];; MELT_LOCATION ("warmelt-normal.melt:832:/ clear"); /*clear *//*_.DATLIS__V12*/ meltfptr[9] = 0; /*^clear */ /*clear *//*_.IFCPP___V13*/ meltfptr[12] = 0; MELT_LOCATION ("warmelt-normal.melt:828:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V11*/ meltfptr[8];; { MELT_LOCATION ("warmelt-normal.melt:828:/ 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___V4*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_.IFCPP___V6*/ meltfptr[4] = 0; /*^clear */ /*clear *//*_.IFCPP___V8*/ meltfptr[6] = 0; /*^clear */ /*clear *//*_.LET___V11*/ meltfptr[8] = 0; } ; goto labend_rout; labend_rout: melt_trace_end ("ADD_NCTX_DATA", meltcallcount); MELT_TRACE_EXIT_LOCATION (); melt_blocklevel_signals = current_blocklevel_signals_meltrout_1_warmelt_normal_ADD_NCTX_DATA_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_normal_ADD_NCTX_DATA */ melt_ptr_t MELT_MODULE_VISIBILITY meltrout_2_warmelt_normal_FILL_INITIAL_PREDEFMAP (meltclosure_ptr_t meltclosp_, 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_normal_FILL_INITIAL_PREDEFMAP_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_normal_FILL_INITIAL_PREDEFMAP_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 3 melt_ptr_t mcfr_varptr[3]; /*no varnum*/ #define MELTFRAM_NBVARNUM /*none*/0 /*others*/ long _spare_; } *meltframptr_ = 0, meltfram__; /*declfrastruct */ #define meltframe meltfram__ /*meltrout_2_warmelt_normal_FILL_INITIAL_PREDEFMAP is not initial declstructinit */ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC)) { /*mark for ggc */ int ix = 0; meltframptr_ = (struct frame_meltrout_2_warmelt_normal_FILL_INITIAL_PREDEFMAP_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 < 3; 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_normal_FILL_INITIAL_PREDEFMAP nbval 3*/ meltfram__.mcfr_nbvar = 3 /*nbval */ ; meltfram__.mcfr_clos = meltclosp_; meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe; melt_topframe = (struct melt_callframe_st *) &meltfram__; melt_trace_start ("FILL_INITIAL_PREDEFMAP", meltcallcount); /*getargs*/ /*getarg#0 */ MELT_LOCATION ("warmelt-predef.melt:3:/ getarg"); /*_.PREDEFMAP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; lab_endgetargs:; /*body*/ /*^block*/ /*anyblock*/ { MELT_LOCATION ("warmelt-predef.melt:4:/ quasiblock"); /*_.CURPREDEF__V3*/ meltfptr[2] = ( /*nil */ NULL);; { MELT_LOCATION ("warmelt-predef.melt:5:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CLASS_ALARM_HANDLER) /*1 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:6:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_0_CLASS_ALARM_HANDLER */ meltfrout->tabval[0]))); } ; { MELT_LOCATION ("warmelt-predef.melt:7:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CLASS_CHILD_PROCESS_HANDLER) /*2 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:8:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_1_CLASS_CHILD_PROCESS_HANDLER */ meltfrout->tabval[1]))); } ; { MELT_LOCATION ("warmelt-predef.melt:9:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CLASS_CITERATOR) /*3 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:10:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_2_CLASS_CITERATOR */ meltfrout->tabval[2]))); } ; { MELT_LOCATION ("warmelt-predef.melt:11:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CLASS_CLASS) /*4 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:12:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_3_CLASS_CLASS */ meltfrout->tabval[3]))); } ; { MELT_LOCATION ("warmelt-predef.melt:13:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CLASS_CMATCHER) /*5 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:14:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_4_CLASS_CMATCHER */ meltfrout->tabval[4]))); } ; { MELT_LOCATION ("warmelt-predef.melt:15:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CLASS_CTYPE) /*6 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:16:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_5_CLASS_CTYPE */ meltfrout->tabval[5]))); } ; { MELT_LOCATION ("warmelt-predef.melt:17:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CLASS_CTYPE_GTY) /*7 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:18:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_6_CLASS_CTYPE_GTY */ meltfrout->tabval[6]))); } ; { MELT_LOCATION ("warmelt-predef.melt:19:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CLASS_CTYPE_PLAIN) /*8 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:20:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_7_CLASS_CTYPE_PLAIN */ meltfrout->tabval[7]))); } ; { MELT_LOCATION ("warmelt-predef.melt:21:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CLASS_DISCRIMINANT) /*9 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:22:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_8_CLASS_DISCRIMINANT */ meltfrout->tabval[8]))); } ; { MELT_LOCATION ("warmelt-predef.melt:23:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CLASS_ENVIRONMENT) /*10 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:24:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_9_CLASS_ENVIRONMENT */ meltfrout->tabval[9]))); } ; { MELT_LOCATION ("warmelt-predef.melt:25:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CLASS_FIELD) /*11 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:26:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_10_CLASS_FIELD */ meltfrout->tabval[10]))); } ; { MELT_LOCATION ("warmelt-predef.melt:27:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CLASS_FORMAL_BINDING) /*12 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:28:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_11_CLASS_FORMAL_BINDING */ meltfrout->tabval[11]))); } ; { MELT_LOCATION ("warmelt-predef.melt:29:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CLASS_FUNMATCHER) /*13 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:30:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_12_CLASS_FUNMATCHER */ meltfrout->tabval[12]))); } ; { MELT_LOCATION ("warmelt-predef.melt:31:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CLASS_GCC_GIMPLE_PASS) /*14 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:32:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_13_CLASS_GCC_GIMPLE_PASS */ meltfrout->tabval[13]))); } ; { MELT_LOCATION ("warmelt-predef.melt:33:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CLASS_GCC_PASS) /*15 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:34:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_14_CLASS_GCC_PASS */ meltfrout->tabval[14]))); } ; { MELT_LOCATION ("warmelt-predef.melt:35:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CLASS_GCC_PRAGMA) /*16 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:36:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_15_CLASS_GCC_PRAGMA */ meltfrout->tabval[15]))); } ; { MELT_LOCATION ("warmelt-predef.melt:37:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CLASS_GCC_RTL_PASS) /*17 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:38:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_16_CLASS_GCC_RTL_PASS */ meltfrout->tabval[16]))); } ; { MELT_LOCATION ("warmelt-predef.melt:39:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CLASS_GCC_SIMPLE_IPA_PASS) /*18 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:40:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_17_CLASS_GCC_SIMPLE_IPA_PASS */ meltfrout->tabval[17]))); } ; { MELT_LOCATION ("warmelt-predef.melt:41:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CLASS_GCC_TRANSFORM_IPA_PASS) /*19 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:42:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_18_CLASS_GCC_TRANSFORM_IPA_PASS */ meltfrout->tabval[18]))); } ; { MELT_LOCATION ("warmelt-predef.melt:43:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CLASS_INPUT_CHANNEL_HANDLER) /*20 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:44:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_19_CLASS_INPUT_CHANNEL_HANDLER */ meltfrout->tabval[19]))); } ; { MELT_LOCATION ("warmelt-predef.melt:45:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CLASS_KEYWORD) /*21 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:46:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_20_CLASS_KEYWORD */ meltfrout->tabval[20]))); } ; { MELT_LOCATION ("warmelt-predef.melt:47:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CLASS_LOCATED) /*22 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:48:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_21_CLASS_LOCATED */ meltfrout->tabval[21]))); } ; { MELT_LOCATION ("warmelt-predef.melt:49:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CLASS_MELT_MODE) /*23 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:50:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_22_CLASS_MELT_MODE */ meltfrout->tabval[22]))); } ; { MELT_LOCATION ("warmelt-predef.melt:51:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CLASS_NAMED) /*24 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:52:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_23_CLASS_NAMED */ meltfrout->tabval[23]))); } ; { MELT_LOCATION ("warmelt-predef.melt:53:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CLASS_PRIMITIVE) /*25 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:54:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_24_CLASS_PRIMITIVE */ meltfrout->tabval[24]))); } ; { MELT_LOCATION ("warmelt-predef.melt:55:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CLASS_PROPED) /*26 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:56:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_25_CLASS_PROPED */ meltfrout->tabval[25]))); } ; { MELT_LOCATION ("warmelt-predef.melt:57:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CLASS_REFERENCE) /*27 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:58:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_26_CLASS_REFERENCE */ meltfrout->tabval[26]))); } ; { MELT_LOCATION ("warmelt-predef.melt:59:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CLASS_ROOT) /*28 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:60:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_27_CLASS_ROOT */ meltfrout->tabval[27]))); } ; { MELT_LOCATION ("warmelt-predef.melt:61:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CLASS_SELECTOR) /*29 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:62:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_28_CLASS_SELECTOR */ meltfrout->tabval[28]))); } ; { MELT_LOCATION ("warmelt-predef.melt:63:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CLASS_SEXPR) /*30 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:64:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_29_CLASS_SEXPR */ meltfrout->tabval[29]))); } ; { MELT_LOCATION ("warmelt-predef.melt:65:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CLASS_SEXPR_MACROSTRING) /*31 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:66:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_30_CLASS_SEXPR_MACROSTRING */ meltfrout->tabval[30]))); } ; { MELT_LOCATION ("warmelt-predef.melt:67:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CLASS_SYMBOL) /*32 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:68:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_31_CLASS_SYMBOL */ meltfrout->tabval[31]))); } ; { MELT_LOCATION ("warmelt-predef.melt:69:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CLASS_SYSTEM_DATA) /*33 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:70:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_32_CLASS_SYSTEM_DATA */ meltfrout->tabval[32]))); } ; { MELT_LOCATION ("warmelt-predef.melt:71:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CTYPE_BASIC_BLOCK) /*34 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:72:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_33_CTYPE_BASIC_BLOCK */ meltfrout->tabval[33]))); } ; { MELT_LOCATION ("warmelt-predef.melt:73:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CTYPE_BITMAP) /*35 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:74:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_34_CTYPE_BITMAP */ meltfrout->tabval[34]))); } ; { MELT_LOCATION ("warmelt-predef.melt:75:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CTYPE_CSTRING) /*36 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:76:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_35_CTYPE_CSTRING */ meltfrout->tabval[35]))); } ; { MELT_LOCATION ("warmelt-predef.melt:77:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CTYPE_EDGE) /*37 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:78:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_36_CTYPE_EDGE */ meltfrout->tabval[36]))); } ; { MELT_LOCATION ("warmelt-predef.melt:79:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CTYPE_GIMPLE) /*38 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:80:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_37_CTYPE_GIMPLE */ meltfrout->tabval[37]))); } ; { MELT_LOCATION ("warmelt-predef.melt:81:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CTYPE_GIMPLE_SEQ) /*39 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:82:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_38_CTYPE_GIMPLE_SEQ */ meltfrout->tabval[38]))); } ; { MELT_LOCATION ("warmelt-predef.melt:83:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CTYPE_LONG) /*40 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:84:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_39_CTYPE_LONG */ meltfrout->tabval[39]))); } ; { MELT_LOCATION ("warmelt-predef.melt:85:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CTYPE_LOOP) /*41 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:86:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_40_CTYPE_LOOP */ meltfrout->tabval[40]))); } ; { MELT_LOCATION ("warmelt-predef.melt:87:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CTYPE_PPL_COEFFICIENT) /*42 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:88:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_41_CTYPE_PPL_COEFFICIENT */ meltfrout->tabval[41]))); } ; { MELT_LOCATION ("warmelt-predef.melt:89:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CTYPE_PPL_CONSTRAINT) /*43 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:90:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_42_CTYPE_PPL_CONSTRAINT */ meltfrout->tabval[42]))); } ; { MELT_LOCATION ("warmelt-predef.melt:91:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CTYPE_PPL_CONSTRAINT_SYSTEM) /*44 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:92:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_43_CTYPE_PPL_CONSTRAINT_SYSTEM */ meltfrout->tabval[43]))); } ; { MELT_LOCATION ("warmelt-predef.melt:93:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CTYPE_PPL_GENERATOR) /*45 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:94:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_44_CTYPE_PPL_GENERATOR */ meltfrout->tabval[44]))); } ; { MELT_LOCATION ("warmelt-predef.melt:95:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CTYPE_PPL_GENERATOR_SYSTEM) /*46 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:96:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_45_CTYPE_PPL_GENERATOR_SYSTEM */ meltfrout->tabval[45]))); } ; { MELT_LOCATION ("warmelt-predef.melt:97:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CTYPE_PPL_LINEAR_EXPRESSION) /*47 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:98:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_46_CTYPE_PPL_LINEAR_EXPRESSION */ meltfrout->tabval[46]))); } ; { MELT_LOCATION ("warmelt-predef.melt:99:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CTYPE_PPL_POLYHEDRON) /*48 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:100:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_47_CTYPE_PPL_POLYHEDRON */ meltfrout->tabval[47]))); } ; { MELT_LOCATION ("warmelt-predef.melt:101:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CTYPE_RTVEC) /*49 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:102:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_48_CTYPE_RTVEC */ meltfrout->tabval[48]))); } ; { MELT_LOCATION ("warmelt-predef.melt:103:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CTYPE_RTX) /*50 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:104:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_49_CTYPE_RTX */ meltfrout->tabval[49]))); } ; { MELT_LOCATION ("warmelt-predef.melt:105:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CTYPE_TREE) /*51 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:106:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_50_CTYPE_TREE */ meltfrout->tabval[50]))); } ; { MELT_LOCATION ("warmelt-predef.melt:107:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CTYPE_VALUE) /*52 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:108:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_51_CTYPE_VALUE */ meltfrout->tabval[51]))); } ; { MELT_LOCATION ("warmelt-predef.melt:109:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (CTYPE_VOID) /*53 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:110:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_52_CTYPE_VOID */ meltfrout->tabval[52]))); } ; { MELT_LOCATION ("warmelt-predef.melt:111:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_ANY_RECEIVER) /*54 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:112:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_53_DISCR_ANY_RECEIVER */ meltfrout->tabval[53]))); } ; { MELT_LOCATION ("warmelt-predef.melt:113:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_BASIC_BLOCK) /*55 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:114:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_54_DISCR_BASIC_BLOCK */ meltfrout->tabval[54]))); } ; { MELT_LOCATION ("warmelt-predef.melt:115:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_BITMAP) /*56 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:116:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_55_DISCR_BITMAP */ meltfrout->tabval[55]))); } ; { MELT_LOCATION ("warmelt-predef.melt:117:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_BUCKET_LONGS) /*57 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:118:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_56_DISCR_BUCKET_LONGS */ meltfrout->tabval[56]))); } ; { MELT_LOCATION ("warmelt-predef.melt:119:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_CHARACTER_INTEGER) /*58 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:120:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_57_DISCR_CHARACTER_INTEGER */ meltfrout->tabval[57]))); } ; { MELT_LOCATION ("warmelt-predef.melt:121:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_CLASS_SEQUENCE) /*59 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:122:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_58_DISCR_CLASS_SEQUENCE */ meltfrout->tabval[58]))); } ; { MELT_LOCATION ("warmelt-predef.melt:123:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_CLOSURE) /*60 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:124:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_59_DISCR_CLOSURE */ meltfrout->tabval[59]))); } ; { MELT_LOCATION ("warmelt-predef.melt:125:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_CONSTANT_INTEGER) /*61 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:126:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_60_DISCR_CONSTANT_INTEGER */ meltfrout->tabval[60]))); } ; { MELT_LOCATION ("warmelt-predef.melt:127:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_EDGE) /*62 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:128:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_61_DISCR_EDGE */ meltfrout->tabval[61]))); } ; { MELT_LOCATION ("warmelt-predef.melt:129:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_FIELD_SEQUENCE) /*63 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:130:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_62_DISCR_FIELD_SEQUENCE */ meltfrout->tabval[62]))); } ; { MELT_LOCATION ("warmelt-predef.melt:131:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_FILE) /*64 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:132:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_63_DISCR_FILE */ meltfrout->tabval[63]))); } ; { MELT_LOCATION ("warmelt-predef.melt:133:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_GIMPLE) /*65 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:134:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_64_DISCR_GIMPLE */ meltfrout->tabval[64]))); } ; { MELT_LOCATION ("warmelt-predef.melt:135:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_GIMPLE_SEQ) /*66 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:136:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_65_DISCR_GIMPLE_SEQ */ meltfrout->tabval[65]))); } ; { MELT_LOCATION ("warmelt-predef.melt:137:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_INTEGER) /*67 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:138:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_66_DISCR_INTEGER */ meltfrout->tabval[66]))); } ; { MELT_LOCATION ("warmelt-predef.melt:139:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_LIST) /*68 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:140:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_67_DISCR_LIST */ meltfrout->tabval[67]))); } ; { MELT_LOCATION ("warmelt-predef.melt:141:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_LOOP) /*69 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:142:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_68_DISCR_LOOP */ meltfrout->tabval[68]))); } ; { MELT_LOCATION ("warmelt-predef.melt:143:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_MAP_BASIC_BLOCKS) /*70 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:144:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_69_DISCR_MAP_BASIC_BLOCKS */ meltfrout->tabval[69]))); } ; { MELT_LOCATION ("warmelt-predef.melt:145:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_MAP_BITMAPS) /*71 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:146:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_70_DISCR_MAP_BITMAPS */ meltfrout->tabval[70]))); } ; { MELT_LOCATION ("warmelt-predef.melt:147:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_MAP_EDGES) /*72 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:148:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_71_DISCR_MAP_EDGES */ meltfrout->tabval[71]))); } ; { MELT_LOCATION ("warmelt-predef.melt:149:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_MAP_GIMPLES) /*73 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:150:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_72_DISCR_MAP_GIMPLES */ meltfrout->tabval[72]))); } ; { MELT_LOCATION ("warmelt-predef.melt:151:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_MAP_GIMPLE_SEQS) /*74 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:152:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_73_DISCR_MAP_GIMPLE_SEQS */ meltfrout->tabval[73]))); } ; { MELT_LOCATION ("warmelt-predef.melt:153:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_MAP_LOOPS) /*75 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:154:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_74_DISCR_MAP_LOOPS */ meltfrout->tabval[74]))); } ; { MELT_LOCATION ("warmelt-predef.melt:155:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_MAP_OBJECTS) /*76 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:156:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_75_DISCR_MAP_OBJECTS */ meltfrout->tabval[75]))); } ; { MELT_LOCATION ("warmelt-predef.melt:157:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_MAP_RTVECS) /*77 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:158:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_76_DISCR_MAP_RTVECS */ meltfrout->tabval[76]))); } ; { MELT_LOCATION ("warmelt-predef.melt:159:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_MAP_RTXS) /*78 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:160:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_77_DISCR_MAP_RTXS */ meltfrout->tabval[77]))); } ; { MELT_LOCATION ("warmelt-predef.melt:161:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_MAP_STRINGS) /*79 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:162:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_78_DISCR_MAP_STRINGS */ meltfrout->tabval[78]))); } ; { MELT_LOCATION ("warmelt-predef.melt:163:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_MAP_TREES) /*80 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:164:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_79_DISCR_MAP_TREES */ meltfrout->tabval[79]))); } ; { MELT_LOCATION ("warmelt-predef.melt:165:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_METHOD_MAP) /*81 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:166:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_80_DISCR_METHOD_MAP */ meltfrout->tabval[80]))); } ; { MELT_LOCATION ("warmelt-predef.melt:167:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_MIXED_BIGINT) /*82 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:168:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_81_DISCR_MIXED_BIGINT */ meltfrout->tabval[81]))); } ; { MELT_LOCATION ("warmelt-predef.melt:169:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_MIXED_INTEGER) /*83 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:170:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_82_DISCR_MIXED_INTEGER */ meltfrout->tabval[82]))); } ; { MELT_LOCATION ("warmelt-predef.melt:171:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_MIXED_LOCATION) /*84 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:172:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_83_DISCR_MIXED_LOCATION */ meltfrout->tabval[83]))); } ; { MELT_LOCATION ("warmelt-predef.melt:173:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_MULTIPLE) /*85 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:174:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_84_DISCR_MULTIPLE */ meltfrout->tabval[84]))); } ; { MELT_LOCATION ("warmelt-predef.melt:175:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_NAME_STRING) /*86 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:176:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_85_DISCR_NAME_STRING */ meltfrout->tabval[85]))); } ; { MELT_LOCATION ("warmelt-predef.melt:177:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_NULL_RECEIVER) /*87 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:178:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_86_DISCR_NULL_RECEIVER */ meltfrout->tabval[86]))); } ; { MELT_LOCATION ("warmelt-predef.melt:179:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_PAIR) /*88 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:180:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_87_DISCR_PAIR */ meltfrout->tabval[87]))); } ; { MELT_LOCATION ("warmelt-predef.melt:181:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_RAWFILE) /*89 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:182:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_88_DISCR_RAWFILE */ meltfrout->tabval[88]))); } ; { MELT_LOCATION ("warmelt-predef.melt:183:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_REAL) /*90 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:184:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_89_DISCR_REAL */ meltfrout->tabval[89]))); } ; { MELT_LOCATION ("warmelt-predef.melt:185:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_ROUTINE) /*91 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:186:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_90_DISCR_ROUTINE */ meltfrout->tabval[90]))); } ; { MELT_LOCATION ("warmelt-predef.melt:187:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_RTVEC) /*92 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:188:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_91_DISCR_RTVEC */ meltfrout->tabval[91]))); } ; { MELT_LOCATION ("warmelt-predef.melt:189:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_RTX) /*93 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:190:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_92_DISCR_RTX */ meltfrout->tabval[92]))); } ; { MELT_LOCATION ("warmelt-predef.melt:191:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_STRBUF) /*94 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:192:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_93_DISCR_STRBUF */ meltfrout->tabval[93]))); } ; { MELT_LOCATION ("warmelt-predef.melt:193:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_STRING) /*95 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:194:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_94_DISCR_STRING */ meltfrout->tabval[94]))); } ; { MELT_LOCATION ("warmelt-predef.melt:195:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_TREE) /*96 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:196:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_95_DISCR_TREE */ meltfrout->tabval[95]))); } ; { MELT_LOCATION ("warmelt-predef.melt:197:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (DISCR_VERBATIM_STRING) /*97 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:198:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_96_DISCR_VERBATIM_STRING */ meltfrout->tabval[96]))); } ; { MELT_LOCATION ("warmelt-predef.melt:199:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (INITIAL_SYSTEM_DATA) /*98 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:200:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_97_INITIAL_SYSTEM_DATA */ meltfrout->tabval[97]))); } ; { MELT_LOCATION ("warmelt-predef.melt:201:/ locexp"); /*_.CURPREDEF__V3*/ meltfptr[2] = MELT_PREDEF (TRUE) /*99 */ ;; } ; { MELT_LOCATION ("warmelt-predef.melt:202:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V2*/ meltfptr[1]), (meltobject_ptr_t) ( /*_.CURPREDEF__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!konst_98_TRUE */ meltfrout-> tabval[98]))); } ; MELT_LOCATION ("warmelt-predef.melt:4:/ clear"); /*clear *//*_.CURPREDEF__V3*/ meltfptr[2] = 0; /*epilog */ } ; goto labend_rout; labend_rout: melt_trace_end ("FILL_INITIAL_PREDEFMAP", meltcallcount); MELT_TRACE_EXIT_LOCATION (); melt_blocklevel_signals = current_blocklevel_signals_meltrout_2_warmelt_normal_FILL_INITIAL_PREDEFMAP_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_2_warmelt_normal_FILL_INITIAL_PREDEFMAP */ melt_ptr_t MELT_MODULE_VISIBILITY meltrout_3_warmelt_normal_REGISTER_LITERAL_VALUE (meltclosure_ptr_t meltclosp_, 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_normal_REGISTER_LITERAL_VALUE_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_normal_REGISTER_LITERAL_VALUE_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 70 melt_ptr_t mcfr_varptr[70]; #define MELTFRAM_NBVARNUM 25 long mcfr_varnum[25]; /*others*/ long _spare_; } *meltframptr_ = 0, meltfram__; /*declfrastruct */ #define meltframe meltfram__ /*meltrout_3_warmelt_normal_REGISTER_LITERAL_VALUE is not initial declstructinit */ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC)) { /*mark for ggc */ int ix = 0; meltframptr_ = (struct frame_meltrout_3_warmelt_normal_REGISTER_LITERAL_VALUE_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 < 70; 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_normal_REGISTER_LITERAL_VALUE nbval 70*/ meltfram__.mcfr_nbvar = 70 /*nbval */ ; meltfram__.mcfr_clos = meltclosp_; meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe; melt_topframe = (struct melt_callframe_st *) &meltfram__; melt_trace_start ("REGISTER_LITERAL_VALUE", meltcallcount); /*getargs*/ /*getarg#0 */ MELT_LOCATION ("warmelt-normal.melt:870:/ getarg"); /*_.VAL__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ /*^getarg */ if (meltxargdescr_[0] != MELTBPAR_PTR) goto lab_endgetargs; /*_.MODCTX__V3*/ meltfptr[2] = (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL; gcc_assert (melt_discr ((melt_ptr_t) ( /*_.MODCTX__V3*/ meltfptr[2])) != NULL); ; goto lab_endgetargs; lab_endgetargs:; /*body*/ /*^block*/ /*anyblock*/ { #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-normal.melt:871:/ cppif.then"); /*^block */ /*anyblock */ { { /*^locexp */ /*melt_increment_dbgcounter */ #if MELT_HAVE_DEBUG melt_dbgcounter++; #endif ; } ; /*^checksignal */ 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-normal.melt:871:/ 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_LOCATION ("warmelt-normal.melt:871:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[7]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1]; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-normal.melt"; /*^apply.arg */ argtab[2].meltbp_long = 871; /*^apply.arg */ argtab[3].meltbp_cstring = "register_literal_value val="; /*^apply.arg */ argtab[4].meltbp_aptr = (melt_ptr_t *) & /*_.VAL__V2*/ meltfptr[1]; /*^apply.arg */ argtab[5].meltbp_cstring = "\n in modctx="; /*^apply.arg */ argtab[6].meltbp_aptr = (melt_ptr_t *) & /*_.MODCTX__V3*/ meltfptr[2]; /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = melt_apply ((meltclosure_ptr_t) (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[0])), (melt_ptr_t) (( /*nil */ NULL)), (MELTBPARSTR_LONG MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_CSTRING MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:871:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0; } ; } else { /*^cond.else */ /*_.IF___V5*/ meltfptr[4] = NULL;; } ; MELT_LOCATION ("warmelt-normal.melt:871:/ quasiblock"); /*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];; /*^compute */ /*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:871:/ clear"); /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V5*/ meltfptr[4] = 0; /*^clear */ /*clear *//*_.PROGN___V7*/ meltfptr[5] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-normal.melt:872:/ cppif.then"); /*^block */ /*anyblock */ { /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*_#IS_A__L3*/ meltfnum[1] = melt_is_instance_of ((melt_ptr_t) ( /*_.MODCTX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_RUNNING_EXTENSION_MODULE_CONTEXT */ meltfrout->tabval[1])));; MELT_LOCATION ("warmelt-normal.melt:872:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ /*_.IFELSE___V9*/ meltfptr[5] = ( /*nil */ NULL);; } else { MELT_LOCATION ("warmelt-normal.melt:872:/ cond.else"); /*^block */ /*anyblock */ { { /*^locexp */ melt_assert_failed (("check modctx"), ("warmelt-normal.melt") ? ("warmelt-normal.melt") : __FILE__, (872) ? (872) : __LINE__, __FUNCTION__); ; } ; /*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0; /*epilog */ } ; } ; /*^compute */ /*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:872:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V8*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION ("warmelt-normal.melt:873:/ quasiblock"); /*^cond */ /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MODCTX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_RUNNING_EXTENSION_MODULE_CONTEXT */ meltfrout->tabval[1]))) ) /*then */ { /*^cond.then */ /*^getslot */ { melt_ptr_t slot = NULL, obj = NULL; obj = (melt_ptr_t) ( /*_.MODCTX__V3*/ meltfptr[2]) /*=obj*/ ; melt_object_get_field (slot, obj, 12, "MORCX_LITERVALIST"); /*_.LITVALIST__V11*/ meltfptr[10] = slot; }; ; } else { /*^cond.else */ /*_.LITVALIST__V11*/ meltfptr[10] = NULL;; } ; MELT_LOCATION ("warmelt-normal.melt:874:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MODCTX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_RUNNING_EXTENSION_MODULE_CONTEXT */ meltfrout->tabval[1]))) ) /*then */ { /*^cond.then */ /*^getslot */ { melt_ptr_t slot = NULL, obj = NULL; obj = (melt_ptr_t) ( /*_.MODCTX__V3*/ meltfptr[2]) /*=obj*/ ; melt_object_get_field (slot, obj, 13, "MORCX_LITEROBJMAP"); /*_.LITOBJMAP__V12*/ meltfptr[11] = slot; }; ; } else { /*^cond.else */ /*_.LITOBJMAP__V12*/ meltfptr[11] = NULL;; } ; MELT_LOCATION ("warmelt-normal.melt:875:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.MODCTX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_RUNNING_EXTENSION_MODULE_CONTEXT */ meltfrout->tabval[1]))) ) /*then */ { /*^cond.then */ /*^getslot */ { melt_ptr_t slot = NULL, obj = NULL; obj = (melt_ptr_t) ( /*_.MODCTX__V3*/ meltfptr[2]) /*=obj*/ ; melt_object_get_field (slot, obj, 14, "MORCX_COUNTLITVAL"); /*_.COUNTLIT__V13*/ meltfptr[12] = slot; }; ; } else { /*^cond.else */ /*_.COUNTLIT__V13*/ meltfptr[12] = NULL;; } ; /*^compute */ /*_#COUNT__L4*/ meltfnum[0] = (melt_get_int ((melt_ptr_t) ( /*_.COUNTLIT__V13*/ meltfptr[12])));; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-normal.melt:878:/ cppif.then"); /*^block */ /*anyblock */ { /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*_#IS_LIST__L5*/ meltfnum[1] = (melt_magic_discr ((melt_ptr_t) ( /*_.LITVALIST__V11*/ meltfptr[10])) == MELTOBMAG_LIST);; MELT_LOCATION ("warmelt-normal.melt:878:/ cond"); /*cond */ if ( /*_#IS_LIST__L5*/ meltfnum[1]) /*then */ { /*^cond.then */ /*_.IFELSE___V15*/ meltfptr[14] = ( /*nil */ NULL);; } else { MELT_LOCATION ("warmelt-normal.melt:878:/ cond.else"); /*^block */ /*anyblock */ { { /*^locexp */ melt_assert_failed (("check litvalist"), ("warmelt-normal.melt") ? ("warmelt-normal.melt") : __FILE__, (878) ? (878) : __LINE__, __FUNCTION__); ; } ; /*clear *//*_.IFELSE___V15*/ meltfptr[14] = 0; /*epilog */ } ; } ; /*^compute */ /*_.IFCPP___V14*/ meltfptr[13] = /*_.IFELSE___V15*/ meltfptr[14];; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:878:/ clear"); /*clear *//*_#IS_LIST__L5*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V15*/ meltfptr[14] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V14*/ meltfptr[13] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-normal.melt:879:/ cppif.then"); /*^block */ /*anyblock */ { /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*_#IS_MAPOBJECT__L6*/ meltfnum[1] = /*is_mapobject: */ (melt_magic_discr ((melt_ptr_t) ( /*_.LITOBJMAP__V12*/ meltfptr[11])) == MELTOBMAG_MAPOBJECTS);; MELT_LOCATION ("warmelt-normal.melt:879:/ cond"); /*cond */ if ( /*_#IS_MAPOBJECT__L6*/ meltfnum[1]) /*then */ { /*^cond.then */ /*_.IFELSE___V17*/ meltfptr[16] = ( /*nil */ NULL);; } else { MELT_LOCATION ("warmelt-normal.melt:879:/ cond.else"); /*^block */ /*anyblock */ { { /*^locexp */ melt_assert_failed (("check litobjmap"), ("warmelt-normal.melt") ? ("warmelt-normal.melt") : __FILE__, (879) ? (879) : __LINE__, __FUNCTION__); ; } ; /*clear *//*_.IFELSE___V17*/ meltfptr[16] = 0; /*epilog */ } ; } ; /*^compute */ /*_.IFCPP___V16*/ meltfptr[14] = /*_.IFELSE___V17*/ meltfptr[16];; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:879:/ clear"); /*clear *//*_#IS_MAPOBJECT__L6*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V17*/ meltfptr[16] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V16*/ meltfptr[14] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-normal.melt:880:/ cppif.then"); /*^block */ /*anyblock */ { /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*_#IS_INTEGERBOX__L7*/ meltfnum[1] = (melt_magic_discr ((melt_ptr_t) ( /*_.COUNTLIT__V13*/ meltfptr[12])) == MELTOBMAG_INT);; MELT_LOCATION ("warmelt-normal.melt:880:/ cond"); /*cond */ if ( /*_#IS_INTEGERBOX__L7*/ meltfnum[1]) /*then */ { /*^cond.then */ /*_.IFELSE___V19*/ meltfptr[18] = ( /*nil */ NULL);; } else { MELT_LOCATION ("warmelt-normal.melt:880:/ cond.else"); /*^block */ /*anyblock */ { { /*^locexp */ melt_assert_failed (("check countlit"), ("warmelt-normal.melt") ? ("warmelt-normal.melt") : __FILE__, (880) ? (880) : __LINE__, __FUNCTION__); ; } ; /*clear *//*_.IFELSE___V19*/ meltfptr[18] = 0; /*epilog */ } ; } ; /*^compute */ /*_.IFCPP___V18*/ meltfptr[16] = /*_.IFELSE___V19*/ meltfptr[18];; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:880:/ clear"); /*clear *//*_#IS_INTEGERBOX__L7*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V19*/ meltfptr[18] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V18*/ meltfptr[16] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-normal.melt:882:/ cppif.then"); /*^block */ /*anyblock */ { /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*_#IRAW__L8*/ meltfnum[1] = (( /*_#COUNT__L4*/ meltfnum[0]) % (4));; MELT_LOCATION ("warmelt-normal.melt:882:/ cond"); /*cond */ if ( /*_#IRAW__L8*/ meltfnum[1]) /*then */ { /*^cond.then */ /*_#OR___L9*/ meltfnum[8] = /*_#IRAW__L8*/ meltfnum[1];; } else { MELT_LOCATION ("warmelt-normal.melt:882:/ cond.else"); /*^block */ /*anyblock */ { /*_#LIST_LENGTH__L10*/ meltfnum[9] = (melt_list_length ((melt_ptr_t) ( /*_.LITVALIST__V11*/ meltfptr[10])));; /*^compute */ /*_#I__L11*/ meltfnum[10] = (( /*_#COUNT__L4*/ meltfnum[0]) == ( /*_#LIST_LENGTH__L10*/ meltfnum[9]));; /*^compute */ /*_#OR___L9*/ meltfnum[8] = /*_#I__L11*/ meltfnum[10];; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:882:/ clear"); /*clear *//*_#LIST_LENGTH__L10*/ meltfnum[9] = 0; /*^clear */ /*clear *//*_#I__L11*/ meltfnum[10] = 0; } ; } ; /*^cond */ /*cond */ if ( /*_#OR___L9*/ meltfnum[8]) /*then */ { /*^cond.then */ /*_.IFELSE___V21*/ meltfptr[20] = ( /*nil */ NULL);; } else { MELT_LOCATION ("warmelt-normal.melt:882:/ cond.else"); /*^block */ /*anyblock */ { { /*^locexp */ melt_assert_failed (("check count"), ("warmelt-normal.melt") ? ("warmelt-normal.melt") : __FILE__, (882) ? (882) : __LINE__, __FUNCTION__); ; } ; /*clear *//*_.IFELSE___V21*/ meltfptr[20] = 0; /*epilog */ } ; } ; /*^compute */ /*_.IFCPP___V20*/ meltfptr[18] = /*_.IFELSE___V21*/ meltfptr[20];; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:882:/ clear"); /*clear *//*_#IRAW__L8*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_#OR___L9*/ meltfnum[8] = 0; /*^clear */ /*clear *//*_.IFELSE___V21*/ meltfptr[20] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V20*/ meltfptr[18] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION ("warmelt-normal.melt:883:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#NULL__L12*/ meltfnum[9] = (( /*_.VAL__V2*/ meltfptr[1]) == NULL);; MELT_LOCATION ("warmelt-normal.melt:883:/ cond"); /*cond */ if ( /*_#NULL__L12*/ meltfnum[9]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-normal.melt:884:/ cppif.then"); /*^block */ /*anyblock */ { /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*^cond */ /*cond */ if (( /*nil */ NULL)) /*then */ { /*^cond.then */ /*_.IFELSE___V24*/ meltfptr[23] = ( /*nil */ NULL);; } else { MELT_LOCATION ("warmelt-normal.melt:884:/ cond.else"); /*^block */ /*anyblock */ { { /*^locexp */ melt_assert_failed (("null literal value"), ("warmelt-normal.melt") ? ("warmelt-normal.melt") : __FILE__, (884) ? (884) : __LINE__, __FUNCTION__); ; } ; /*clear *//*_.IFELSE___V24*/ meltfptr[23] = 0; /*epilog */ } ; } ; /*^compute */ /*_.IFCPP___V23*/ meltfptr[22] = /*_.IFELSE___V24*/ meltfptr[23];; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:884:/ clear"); /*clear *//*_.IFELSE___V24*/ meltfptr[23] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V23*/ meltfptr[22] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION ("warmelt-normal.melt:885:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = NULL;; { MELT_LOCATION ("warmelt-normal.melt:885:/ 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_LOCATION ("warmelt-normal.melt:883:/ quasiblock"); /*_.PROGN___V26*/ meltfptr[25] = /*_.RETURN___V25*/ meltfptr[23];; /*^compute */ /*_.IFELSE___V22*/ meltfptr[20] = /*_.PROGN___V26*/ meltfptr[25];; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:883:/ clear"); /*clear *//*_.IFCPP___V23*/ meltfptr[22] = 0; /*^clear */ /*clear *//*_.RETURN___V25*/ meltfptr[23] = 0; /*^clear */ /*clear *//*_.PROGN___V26*/ meltfptr[25] = 0; } ; } else { /*^cond.else */ /*^block */ /*anyblock */ { MELT_LOCATION ("warmelt-normal.melt:886:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_INTEGERBOX__L13*/ meltfnum[10] = (melt_magic_discr ((melt_ptr_t) ( /*_.VAL__V2*/ meltfptr[1])) == MELTOBMAG_INT);; MELT_LOCATION ("warmelt-normal.melt:886:/ cond"); /*cond */ if ( /*_#IS_INTEGERBOX__L13*/ meltfnum[10]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-normal.melt:887:/ cppif.then"); /*^block */ /*anyblock */ { /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*^cond */ /*cond */ if (( /*nil */ NULL)) /*then */ { /*^cond.then */ /*_.IFELSE___V29*/ meltfptr[25] = ( /*nil */ NULL);; } else { MELT_LOCATION ("warmelt-normal.melt:887:/ cond.else"); /*^block */ /*anyblock */ { { /*^locexp */ melt_assert_failed (("integer literal value"), ("warmelt-normal.melt") ? ("warmelt-normal.melt") : __FILE__, (887) ? (887) : __LINE__, __FUNCTION__); ; } ; /*clear *//*_.IFELSE___V29*/ meltfptr[25] = 0; /*epilog */ } ; } ; /*^compute */ /*_.IFCPP___V28*/ meltfptr[23] = /*_.IFELSE___V29*/ meltfptr[25];; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:887:/ clear"); /*clear *//*_.IFELSE___V29*/ meltfptr[25] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V28*/ meltfptr[23] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION ("warmelt-normal.melt:888:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = NULL;; { MELT_LOCATION ("warmelt-normal.melt:888:/ 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_LOCATION ("warmelt-normal.melt:886:/ quasiblock"); /*_.PROGN___V31*/ meltfptr[30] = /*_.RETURN___V30*/ meltfptr[25];; /*^compute */ /*_.IFELSE___V27*/ meltfptr[22] = /*_.PROGN___V31*/ meltfptr[30];; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:886:/ clear"); /*clear *//*_.IFCPP___V28*/ meltfptr[23] = 0; /*^clear */ /*clear *//*_.RETURN___V30*/ meltfptr[25] = 0; /*^clear */ /*clear *//*_.PROGN___V31*/ meltfptr[30] = 0; } ; } else { /*^cond.else */ /*^block */ /*anyblock */ { MELT_LOCATION ("warmelt-normal.melt:889:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_STRING__L14*/ meltfnum[1] = (melt_magic_discr ((melt_ptr_t) ( /*_.VAL__V2*/ meltfptr[1])) == MELTOBMAG_STRING);; MELT_LOCATION ("warmelt-normal.melt:889:/ cond"); /*cond */ if ( /*_#IS_STRING__L14*/ meltfnum[1]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-normal.melt:890:/ cppif.then"); /*^block */ /*anyblock */ { /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*^cond */ /*cond */ if (( /*nil */ NULL)) /*then */ { /*^cond.then */ /*_.IFELSE___V34*/ meltfptr[30] = ( /*nil */ NULL);; } else { MELT_LOCATION ("warmelt-normal.melt:890:/ cond.else"); /*^block */ /*anyblock */ { { /*^locexp */ melt_assert_failed (("string literal value"), ("warmelt-normal.melt") ? ("warmelt-normal.melt") : __FILE__, (890) ? (890) : __LINE__, __FUNCTION__); ; } ; /*clear *//*_.IFELSE___V34*/ meltfptr[30] = 0; /*epilog */ } ; } ; /*^compute */ /*_.IFCPP___V33*/ meltfptr[25] = /*_.IFELSE___V34*/ meltfptr[30];; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:890:/ clear"); /*clear *//*_.IFELSE___V34*/ meltfptr[30] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V33*/ meltfptr[25] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION ("warmelt-normal.melt:891:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = NULL;; { MELT_LOCATION ("warmelt-normal.melt:891:/ 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_LOCATION ("warmelt-normal.melt:889:/ quasiblock"); /*_.PROGN___V36*/ meltfptr[35] = /*_.RETURN___V35*/ meltfptr[30];; /*^compute */ /*_.IFELSE___V32*/ meltfptr[23] = /*_.PROGN___V36*/ meltfptr[35];; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:889:/ clear"); /*clear *//*_.IFCPP___V33*/ meltfptr[25] = 0; /*^clear */ /*clear *//*_.RETURN___V35*/ meltfptr[30] = 0; /*^clear */ /*clear *//*_.PROGN___V36*/ meltfptr[35] = 0; } ; } else { /*^cond.else */ /*^block */ /*anyblock */ { MELT_LOCATION ("warmelt-normal.melt:892:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_OBJECT__L15*/ meltfnum[8] = (melt_magic_discr ((melt_ptr_t) ( /*_.VAL__V2*/ meltfptr[1])) == MELTOBMAG_OBJECT);; MELT_LOCATION ("warmelt-normal.melt:892:/ cond"); /*cond */ if ( /*_#IS_OBJECT__L15*/ meltfnum[8]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { MELT_LOCATION ("warmelt-normal.melt:893:/ quasiblock"); /*_.LITV__V39*/ meltfptr[35] = /*mapobject_get */ melt_get_mapobjects ((meltmapobjects_ptr_t) ( /*_.LITOBJMAP__V12*/ meltfptr[11]), (meltobject_ptr_t) ( /*_.VAL__V2*/ meltfptr[1]));; MELT_LOCATION ("warmelt-normal.melt:896:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ /*cond */ if ( /*_.LITV__V39*/ meltfptr[35]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-normal.melt:897:/ cppif.then"); /*^block */ /*anyblock */ { { /*^locexp */ /*melt_increment_dbgcounter */ #if MELT_HAVE_DEBUG melt_dbgcounter++; #endif ; } ; /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*_#MELT_NEED_DBG__L16*/ meltfnum[15] = /*MELT_NEED_DBG */ #if MELT_HAVE_DEBUG ( /*melt_need_dbg */ melt_need_debug ((int) 0)) #else 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; MELT_LOCATION ("warmelt-normal.melt:897:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L16*/ meltfnum[15]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { /*_#THE_MELTCALLCOUNT__L17*/ meltfnum[16] = #ifdef meltcallcount meltcallcount /* the_meltcallcount */ #else 0L #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION ("warmelt-normal.melt:897:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[5]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L17*/ meltfnum[16]; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-normal.melt"; /*^apply.arg */ argtab[2].meltbp_long = 897; /*^apply.arg */ argtab[3].meltbp_cstring = "register_literal_value found litv="; /*^apply.arg */ argtab[4].meltbp_aptr = (melt_ptr_t *) & /*_.LITV__V39*/ meltfptr[35]; /*_.MELT_DEBUG_FUN__V43*/ meltfptr[42] = 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___V42*/ meltfptr[41] = /*_.MELT_DEBUG_FUN__V43*/ meltfptr[42];; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:897:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L17*/ meltfnum[16] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V43*/ meltfptr[42] = 0; } ; } else { /*^cond.else */ /*_.IF___V42*/ meltfptr[41] = NULL;; } ; MELT_LOCATION ("warmelt-normal.melt:897:/ quasiblock"); /*_.PROGN___V44*/ meltfptr[42] = /*_.IF___V42*/ meltfptr[41];; /*^compute */ /*_.IFCPP___V41*/ meltfptr[40] = /*_.PROGN___V44*/ meltfptr[42];; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:897:/ clear"); /*clear *//*_#MELT_NEED_DBG__L16*/ meltfnum[15] = 0; /*^clear */ /*clear *//*_.IF___V42*/ meltfptr[41] = 0; /*^clear */ /*clear *//*_.PROGN___V44*/ meltfptr[42] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V41*/ meltfptr[40] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-normal.melt:898:/ cppif.then"); /*^block */ /*anyblock */ { /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*_#IS_A__L18*/ meltfnum[16] = melt_is_instance_of ((melt_ptr_t) ( /*_.LITV__V39*/ meltfptr[35]), (melt_ptr_t) (( /*!CLASS_LITERAL_VALUE */ meltfrout->tabval[2])));; MELT_LOCATION ("warmelt-normal.melt:898:/ cond"); /*cond */ if ( /*_#IS_A__L18*/ meltfnum[16]) /*then */ { /*^cond.then */ /*_.IFELSE___V46*/ meltfptr[42] = ( /*nil */ NULL);; } else { MELT_LOCATION ("warmelt-normal.melt:898:/ cond.else"); /*^block */ /*anyblock */ { { /*^locexp */ melt_assert_failed (("check litv"), ("warmelt-normal.melt") ? ("warmelt-normal.melt") : __FILE__, (898) ? (898) : __LINE__, __FUNCTION__); ; } ; /*clear *//*_.IFELSE___V46*/ meltfptr[42] = 0; /*epilog */ } ; } ; /*^compute */ /*_.IFCPP___V45*/ meltfptr[41] = /*_.IFELSE___V46*/ meltfptr[42];; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:898:/ clear"); /*clear *//*_#IS_A__L18*/ meltfnum[16] = 0; /*^clear */ /*clear *//*_.IFELSE___V46*/ meltfptr[42] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V45*/ meltfptr[41] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-normal.melt:899:/ cppif.then"); /*^block */ /*anyblock */ { /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*^cond */ /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.LITV__V39*/ meltfptr[35]), (melt_ptr_t) (( /*!CLASS_LITERAL_VALUE */ meltfrout->tabval[2]))) ) /*then */ { /*^cond.then */ /*^getslot */ { melt_ptr_t slot = NULL, obj = NULL; obj = (melt_ptr_t) ( /*_.LITV__V39*/ meltfptr[35]) /*=obj*/ ; melt_object_get_field (slot, obj, 1, "LITV_VALUE"); /*_.LITV_VALUE__V48*/ meltfptr[47] = slot; }; ; } else { /*^cond.else */ /*_.LITV_VALUE__V48*/ meltfptr[47] = NULL;; } ; /*^compute */ /*_#__L19*/ meltfnum[15] = (( /*_.LITV_VALUE__V48*/ meltfptr[47]) == ( /*_.VAL__V2*/ meltfptr[1]));; MELT_LOCATION ("warmelt-normal.melt:899:/ cond"); /*cond */ if ( /*_#__L19*/ meltfnum[15]) /*then */ { /*^cond.then */ /*_.IFELSE___V49*/ meltfptr[48] = ( /*nil */ NULL);; } else { MELT_LOCATION ("warmelt-normal.melt:899:/ cond.else"); /*^block */ /*anyblock */ { { /*^locexp */ melt_assert_failed (("check old found value"), ("warmelt-normal.melt") ? ("warmelt-normal.melt") : __FILE__, (899) ? (899) : __LINE__, __FUNCTION__); ; } ; /*clear *//*_.IFELSE___V49*/ meltfptr[48] = 0; /*epilog */ } ; } ; /*^compute */ /*_.IFCPP___V47*/ meltfptr[42] = /*_.IFELSE___V49*/ meltfptr[48];; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:899:/ clear"); /*clear *//*_.LITV_VALUE__V48*/ meltfptr[47] = 0; /*^clear */ /*clear *//*_#__L19*/ meltfnum[15] = 0; /*^clear */ /*clear *//*_.IFELSE___V49*/ meltfptr[48] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V47*/ meltfptr[42] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION ("warmelt-normal.melt:896:/ quasiblock"); /*_.PROGN___V50*/ meltfptr[47] = /*_.IFCPP___V47*/ meltfptr[42];; /*^compute */ /*_.IFELSE___V40*/ meltfptr[39] = /*_.PROGN___V50*/ meltfptr[47];; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:896:/ clear"); /*clear *//*_.IFCPP___V41*/ meltfptr[40] = 0; /*^clear */ /*clear *//*_.IFCPP___V45*/ meltfptr[41] = 0; /*^clear */ /*clear *//*_.IFCPP___V47*/ meltfptr[42] = 0; /*^clear */ /*clear *//*_.PROGN___V50*/ meltfptr[47] = 0; } ; } else { /*^cond.else */ /*^block */ /*anyblock */ { MELT_LOCATION ("warmelt-normal.melt:901:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.MAKE_INTEGERBOX__V51*/ meltfptr[48] = (meltgc_new_int ((meltobject_ptr_t) (( /*!DISCR_CONSTANT_INTEGER */ meltfrout->tabval[3])), ( /*_#COUNT__L4*/ meltfnum[0])));; MELT_LOCATION ("warmelt-normal.melt:901:/ quasiblock"); /*^rawallocobj */ /*rawallocobj */ { melt_ptr_t newobj = 0; melt_raw_object_create (newobj, (melt_ptr_t) (( /*!CLASS_LITERAL_VALUE */ meltfrout->tabval[2])), (4), "CLASS_LITERAL_VALUE"); /*_.INST__V53*/ meltfptr[41] = newobj; }; ; /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj @LITV_VALUE", melt_magic_discr ((melt_ptr_t) ( /*_.INST__V53*/ meltfptr[41])) == MELTOBMAG_OBJECT); melt_putfield_object (( /*_.INST__V53*/ meltfptr[41]), (1), ( /*_.VAL__V2*/ meltfptr[1]), "LITV_VALUE"); ; /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj @LITV_RANK", melt_magic_discr ((melt_ptr_t) ( /*_.INST__V53*/ meltfptr[41])) == MELTOBMAG_OBJECT); melt_putfield_object (( /*_.INST__V53*/ meltfptr[41]), (2), ( /*_.MAKE_INTEGERBOX__V51*/ meltfptr[48]), "LITV_RANK"); ; /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj @LITV_LOC", melt_magic_discr ((melt_ptr_t) ( /*_.INST__V53*/ meltfptr[41])) == MELTOBMAG_OBJECT); melt_putfield_object (( /*_.INST__V53*/ meltfptr[41]), (3), (( /*nil */ NULL)), "LITV_LOC"); ; /*^touchobj */ melt_dbgtrace_written_object ( /*_.INST__V53*/ meltfptr[41], "newly made instance"); ; /*_.INST___V52*/ meltfptr[40] = /*_.INST__V53*/ meltfptr[41];; MELT_LOCATION ("warmelt-normal.melt:901:/ compute"); /*_.LITV__V39*/ meltfptr[35] = /*_.SETQ___V54*/ meltfptr[42] = /*_.INST___V52*/ meltfptr[40];; { MELT_LOCATION ("warmelt-normal.melt:906:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.LITVALIST__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.LITV__V39*/ meltfptr[35])); } ; /*_#I__L20*/ meltfnum[16] = (( /*_#COUNT__L4*/ meltfnum[0]) + (1));; { MELT_LOCATION ("warmelt-normal.melt:907:/ locexp"); melt_put_int ((melt_ptr_t) ( /*_.COUNTLIT__V13*/ meltfptr[12]), ( /*_#I__L20*/ meltfnum[16])); } ; { MELT_LOCATION ("warmelt-normal.melt:908:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.LITOBJMAP__V12*/ meltfptr[11]), (meltobject_ptr_t) ( /*_.VAL__V2*/ meltfptr[1]), (melt_ptr_t) ( /*_.LITV__V39*/ meltfptr[35])); } ; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-normal.melt:909:/ cppif.then"); /*^block */ /*anyblock */ { { /*^locexp */ /*melt_increment_dbgcounter */ #if MELT_HAVE_DEBUG melt_dbgcounter++; #endif ; } ; /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*_#MELT_NEED_DBG__L21*/ meltfnum[15] = /*MELT_NEED_DBG */ #if MELT_HAVE_DEBUG ( /*melt_need_dbg */ melt_need_debug ((int) 0)) #else 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; MELT_LOCATION ("warmelt-normal.melt:909:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L21*/ meltfnum[15]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { /*_#THE_MELTCALLCOUNT__L22*/ meltfnum[21] = #ifdef meltcallcount meltcallcount /* the_meltcallcount */ #else 0L #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION ("warmelt-normal.melt:909:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[7]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L22*/ meltfnum[21]; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-normal.melt"; /*^apply.arg */ argtab[2].meltbp_long = 909; /*^apply.arg */ argtab[3].meltbp_cstring = "register_literal_value new litv="; /*^apply.arg */ argtab[4].meltbp_aptr = (melt_ptr_t *) & /*_.LITV__V39*/ meltfptr[35]; /*^apply.arg */ argtab[5].meltbp_cstring = "\n updated litobjmap="; /*^apply.arg */ argtab[6].meltbp_aptr = (melt_ptr_t *) & /*_.LITOBJMAP__V12*/ meltfptr[11]; /*_.MELT_DEBUG_FUN__V57*/ meltfptr[56] = melt_apply ((meltclosure_ptr_t) (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[0])), (melt_ptr_t) (( /*nil */ NULL)), (MELTBPARSTR_LONG MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_CSTRING MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*_.IF___V56*/ meltfptr[55] = /*_.MELT_DEBUG_FUN__V57*/ meltfptr[56];; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:909:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L22*/ meltfnum[21] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V57*/ meltfptr[56] = 0; } ; } else { /*^cond.else */ /*_.IF___V56*/ meltfptr[55] = NULL;; } ; MELT_LOCATION ("warmelt-normal.melt:909:/ quasiblock"); /*_.PROGN___V58*/ meltfptr[56] = /*_.IF___V56*/ meltfptr[55];; /*^compute */ /*_.IFCPP___V55*/ meltfptr[47] = /*_.PROGN___V58*/ meltfptr[56];; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:909:/ clear"); /*clear *//*_#MELT_NEED_DBG__L21*/ meltfnum[15] = 0; /*^clear */ /*clear *//*_.IF___V56*/ meltfptr[55] = 0; /*^clear */ /*clear *//*_.PROGN___V58*/ meltfptr[56] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V55*/ meltfptr[47] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION ("warmelt-normal.melt:900:/ quasiblock"); /*_.PROGN___V59*/ meltfptr[55] = /*_.IFCPP___V55*/ meltfptr[47];; /*^compute */ /*_.IFELSE___V40*/ meltfptr[39] = /*_.PROGN___V59*/ meltfptr[55];; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:896:/ clear"); /*clear *//*_.MAKE_INTEGERBOX__V51*/ meltfptr[48] = 0; /*^clear */ /*clear *//*_.INST___V52*/ meltfptr[40] = 0; /*^clear */ /*clear *//*_.SETQ___V54*/ meltfptr[42] = 0; /*^clear */ /*clear *//*_#I__L20*/ meltfnum[16] = 0; /*^clear */ /*clear *//*_.IFCPP___V55*/ meltfptr[47] = 0; /*^clear */ /*clear *//*_.PROGN___V59*/ meltfptr[55] = 0; } ; } ; MELT_LOCATION ("warmelt-normal.melt:912:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LITV__V39*/ meltfptr[35];; { MELT_LOCATION ("warmelt-normal.melt:912:/ 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; /*_.LET___V38*/ meltfptr[30] = /*_.RETURN___V60*/ meltfptr[56];; MELT_LOCATION ("warmelt-normal.melt:893:/ clear"); /*clear *//*_.LITV__V39*/ meltfptr[35] = 0; /*^clear */ /*clear *//*_.IFELSE___V40*/ meltfptr[39] = 0; /*^clear */ /*clear *//*_.RETURN___V60*/ meltfptr[56] = 0; /*_.IFELSE___V37*/ meltfptr[25] = /*_.LET___V38*/ meltfptr[30];; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:892:/ clear"); /*clear *//*_.LET___V38*/ meltfptr[30] = 0; } ; } else { /*^cond.else */ /*^block */ /*anyblock */ { MELT_LOCATION ("warmelt-normal.melt:916:/ quasiblock"); /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*_.MAKE_INTEGERBOX__V62*/ meltfptr[40] = (meltgc_new_int ((meltobject_ptr_t) (( /*!DISCR_CONSTANT_INTEGER */ meltfrout-> tabval[3])), ( /*_#COUNT__L4*/ meltfnum[0])));; MELT_LOCATION ("warmelt-normal.melt:916:/ quasiblock"); /*^rawallocobj */ /*rawallocobj */ { melt_ptr_t newobj = 0; melt_raw_object_create (newobj, (melt_ptr_t) (( /*!CLASS_LITERAL_VALUE */ meltfrout->tabval[2])), (4), "CLASS_LITERAL_VALUE"); /*_.INST__V64*/ meltfptr[47] = newobj; }; ; /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj @LITV_VALUE", melt_magic_discr ((melt_ptr_t) ( /*_.INST__V64*/ meltfptr[47])) == MELTOBMAG_OBJECT); melt_putfield_object (( /*_.INST__V64*/ meltfptr[47]), (1), ( /*_.VAL__V2*/ meltfptr[1]), "LITV_VALUE"); ; /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj @LITV_RANK", melt_magic_discr ((melt_ptr_t) ( /*_.INST__V64*/ meltfptr[47])) == MELTOBMAG_OBJECT); melt_putfield_object (( /*_.INST__V64*/ meltfptr[47]), (2), ( /*_.MAKE_INTEGERBOX__V62*/ meltfptr[40]), "LITV_RANK"); ; /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj @LITV_LOC", melt_magic_discr ((melt_ptr_t) ( /*_.INST__V64*/ meltfptr[47])) == MELTOBMAG_OBJECT); melt_putfield_object (( /*_.INST__V64*/ meltfptr[47]), (3), (( /*nil */ NULL)), "LITV_LOC"); ; /*^touchobj */ melt_dbgtrace_written_object ( /*_.INST__V64*/ meltfptr[47], "newly made instance"); ; /*_.LITV__V63*/ meltfptr[42] = /*_.INST__V64*/ meltfptr[47];; { MELT_LOCATION ("warmelt-normal.melt:922:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.LITVALIST__V11*/ meltfptr[10]), (melt_ptr_t) ( /*_.LITV__V63*/ meltfptr[42])); } ; /*_#I__L23*/ meltfnum[21] = (( /*_#COUNT__L4*/ meltfnum[0]) + (1));; { MELT_LOCATION ("warmelt-normal.melt:923:/ locexp"); melt_put_int ((melt_ptr_t) ( /*_.COUNTLIT__V13*/ meltfptr[12]), ( /*_#I__L23*/ meltfnum[21])); } ; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-normal.melt:924:/ cppif.then"); /*^block */ /*anyblock */ { { /*^locexp */ /*melt_increment_dbgcounter */ #if MELT_HAVE_DEBUG melt_dbgcounter++; #endif ; } ; /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*_#MELT_NEED_DBG__L24*/ meltfnum[15] = /*MELT_NEED_DBG */ #if MELT_HAVE_DEBUG ( /*melt_need_dbg */ melt_need_debug ((int) 0)) #else 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; MELT_LOCATION ("warmelt-normal.melt:924:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L24*/ meltfnum[15]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { /*_#THE_MELTCALLCOUNT__L25*/ meltfnum[16] = #ifdef meltcallcount meltcallcount /* the_meltcallcount */ #else 0L #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION ("warmelt-normal.melt:924:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[5]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L25*/ meltfnum[16]; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-normal.melt"; /*^apply.arg */ argtab[2].meltbp_long = 924; /*^apply.arg */ argtab[3].meltbp_cstring = "register_literal_value nonobject value litv="; /*^apply.arg */ argtab[4].meltbp_aptr = (melt_ptr_t *) & /*_.LITV__V63*/ meltfptr[42]; /*_.MELT_DEBUG_FUN__V67*/ meltfptr[39] = melt_apply ((meltclosure_ptr_t) (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[0])), (melt_ptr_t) (( /*nil */ NULL)), (MELTBPARSTR_LONG MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_CSTRING MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*_.IF___V66*/ meltfptr[35] = /*_.MELT_DEBUG_FUN__V67*/ meltfptr[39];; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:924:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L25*/ meltfnum[16] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V67*/ meltfptr[39] = 0; } ; } else { /*^cond.else */ /*_.IF___V66*/ meltfptr[35] = NULL;; } ; MELT_LOCATION ("warmelt-normal.melt:924:/ quasiblock"); /*_.PROGN___V68*/ meltfptr[56] = /*_.IF___V66*/ meltfptr[35];; /*^compute */ /*_.IFCPP___V65*/ meltfptr[55] = /*_.PROGN___V68*/ meltfptr[56];; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:924:/ clear"); /*clear *//*_#MELT_NEED_DBG__L24*/ meltfnum[15] = 0; /*^clear */ /*clear *//*_.IF___V66*/ meltfptr[35] = 0; /*^clear */ /*clear *//*_.PROGN___V68*/ meltfptr[56] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V65*/ meltfptr[55] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION ("warmelt-normal.melt:925:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LITV__V63*/ meltfptr[42];; { MELT_LOCATION ("warmelt-normal.melt:925:/ 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; /*_.LET___V61*/ meltfptr[48] = /*_.RETURN___V69*/ meltfptr[30];; MELT_LOCATION ("warmelt-normal.melt:916:/ clear"); /*clear *//*_.MAKE_INTEGERBOX__V62*/ meltfptr[40] = 0; /*^clear */ /*clear *//*_.LITV__V63*/ meltfptr[42] = 0; /*^clear */ /*clear *//*_#I__L23*/ meltfnum[21] = 0; /*^clear */ /*clear *//*_.IFCPP___V65*/ meltfptr[55] = 0; /*^clear */ /*clear *//*_.RETURN___V69*/ meltfptr[30] = 0; MELT_LOCATION ("warmelt-normal.melt:914:/ quasiblock"); /*_.PROGN___V70*/ meltfptr[39] = /*_.LET___V61*/ meltfptr[48];; /*^compute */ /*_.IFELSE___V37*/ meltfptr[25] = /*_.PROGN___V70*/ meltfptr[39];; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:892:/ clear"); /*clear *//*_.LET___V61*/ meltfptr[48] = 0; /*^clear */ /*clear *//*_.PROGN___V70*/ meltfptr[39] = 0; } ; } ; /*_.IFELSE___V32*/ meltfptr[23] = /*_.IFELSE___V37*/ meltfptr[25];; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:889:/ clear"); /*clear *//*_#IS_OBJECT__L15*/ meltfnum[8] = 0; /*^clear */ /*clear *//*_.IFELSE___V37*/ meltfptr[25] = 0; } ; } ; /*_.IFELSE___V27*/ meltfptr[22] = /*_.IFELSE___V32*/ meltfptr[23];; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:886:/ clear"); /*clear *//*_#IS_STRING__L14*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V32*/ meltfptr[23] = 0; } ; } ; /*_.IFELSE___V22*/ meltfptr[20] = /*_.IFELSE___V27*/ meltfptr[22];; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:883:/ clear"); /*clear *//*_#IS_INTEGERBOX__L13*/ meltfnum[10] = 0; /*^clear */ /*clear *//*_.IFELSE___V27*/ meltfptr[22] = 0; } ; } ; /*_.LET___V10*/ meltfptr[5] = /*_.IFELSE___V22*/ meltfptr[20];; MELT_LOCATION ("warmelt-normal.melt:873:/ clear"); /*clear *//*_.LITVALIST__V11*/ meltfptr[10] = 0; /*^clear */ /*clear *//*_.LITOBJMAP__V12*/ meltfptr[11] = 0; /*^clear */ /*clear *//*_.COUNTLIT__V13*/ meltfptr[12] = 0; /*^clear */ /*clear *//*_#COUNT__L4*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFCPP___V14*/ meltfptr[13] = 0; /*^clear */ /*clear *//*_.IFCPP___V16*/ meltfptr[14] = 0; /*^clear */ /*clear *//*_.IFCPP___V18*/ meltfptr[16] = 0; /*^clear */ /*clear *//*_.IFCPP___V20*/ meltfptr[18] = 0; /*^clear */ /*clear *//*_#NULL__L12*/ meltfnum[9] = 0; /*^clear */ /*clear *//*_.IFELSE___V22*/ meltfptr[20] = 0; MELT_LOCATION ("warmelt-normal.melt:870:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V10*/ meltfptr[5];; { MELT_LOCATION ("warmelt-normal.melt:870:/ 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___V4*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_.IFCPP___V8*/ meltfptr[4] = 0; /*^clear */ /*clear *//*_.LET___V10*/ meltfptr[5] = 0; } ; goto labend_rout; labend_rout: melt_trace_end ("REGISTER_LITERAL_VALUE", meltcallcount); MELT_TRACE_EXIT_LOCATION (); melt_blocklevel_signals = current_blocklevel_signals_meltrout_3_warmelt_normal_REGISTER_LITERAL_VALUE_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_3_warmelt_normal_REGISTER_LITERAL_VALUE */ melt_ptr_t MELT_MODULE_VISIBILITY meltrout_4_warmelt_normal_CREATE_NORMCONTEXT (meltclosure_ptr_t meltclosp_, 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_normal_CREATE_NORMCONTEXT_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_normal_CREATE_NORMCONTEXT_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 36 melt_ptr_t mcfr_varptr[36]; #define MELTFRAM_NBVARNUM 11 long mcfr_varnum[11]; /*others*/ long _spare_; } *meltframptr_ = 0, meltfram__; /*declfrastruct */ #define meltframe meltfram__ /*meltrout_4_warmelt_normal_CREATE_NORMCONTEXT is not initial declstructinit */ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC)) { /*mark for ggc */ int ix = 0; meltframptr_ = (struct frame_meltrout_4_warmelt_normal_CREATE_NORMCONTEXT_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 < 36; 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_normal_CREATE_NORMCONTEXT nbval 36*/ meltfram__.mcfr_nbvar = 36 /*nbval */ ; meltfram__.mcfr_clos = meltclosp_; meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe; melt_topframe = (struct melt_callframe_st *) &meltfram__; melt_trace_start ("CREATE_NORMCONTEXT", meltcallcount); /*getargs*/ /*getarg#0 */ MELT_LOCATION ("warmelt-normal.melt:931:/ getarg"); /*_.MODCTX__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; lab_endgetargs:; /*body*/ /*^block*/ /*anyblock*/ { MELT_LOCATION ("warmelt-normal.melt:934:/ quasiblock"); /*_#MAXPREDEFIX__L1*/ meltfnum[0] = BGLOB__LASTGLOB;; /*^compute */ /*_#IX__L2*/ meltfnum[1] = 1;; /*^compute */ /*_#I__L3*/ meltfnum[2] = ((2) * ( /*_#MAXPREDEFIX__L1*/ meltfnum[0]));; /*^compute */ /*_#I__L4*/ meltfnum[3] = ((19) + ( /*_#I__L3*/ meltfnum[2]));; /*^compute */ /*_.PREDEFMAP__V4*/ meltfptr[3] = (meltgc_new_mapobjects ((meltobject_ptr_t) (( /*!DISCR_MAP_OBJECTS */ meltfrout->tabval[0])), ( /*_#I__L4*/ meltfnum[3])));; /*^compute */ /*_.VALMAP__V5*/ meltfptr[4] = (meltgc_new_mapobjects ((meltobject_ptr_t) (( /*!DISCR_MAP_OBJECTS */ meltfrout->tabval[0])), (350)));; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-normal.melt:939:/ cppif.then"); /*^block */ /*anyblock */ { /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*_#IS_A__L5*/ meltfnum[4] = melt_is_instance_of ((melt_ptr_t) ( /*_.MODCTX__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_MODULE_CONTEXT */ meltfrout->tabval[1])));; MELT_LOCATION ("warmelt-normal.melt:939:/ cond"); /*cond */ if ( /*_#IS_A__L5*/ meltfnum[4]) /*then */ { /*^cond.then */ /*_.IFELSE___V7*/ meltfptr[6] = ( /*nil */ NULL);; } else { MELT_LOCATION ("warmelt-normal.melt:939:/ cond.else"); /*^block */ /*anyblock */ { { /*^locexp */ melt_assert_failed (("check modctx"), ("warmelt-normal.melt") ? ("warmelt-normal.melt") : __FILE__, (939) ? (939) : __LINE__, __FUNCTION__); ; } ; /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0; /*epilog */ } ; } ; /*^compute */ /*_.IFCPP___V6*/ meltfptr[5] = /*_.IFELSE___V7*/ meltfptr[6];; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:939:/ clear"); /*clear *//*_#IS_A__L5*/ meltfnum[4] = 0; /*^clear */ /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V6*/ meltfptr[5] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION ("warmelt-normal.melt:940:/ loop"); /*loop */ { labloop_PREDEFLOOP_1:; /*^loopbody */ /*^block */ /*anyblock */ { /*^checksignal */ MELT_CHECK_SIGNAL (); ; MELT_LOCATION ("warmelt-normal.melt:941:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#I__L6*/ meltfnum[4] = (( /*_#IX__L2*/ meltfnum[1]) >= ( /*_#MAXPREDEFIX__L1*/ meltfnum[0]));; MELT_LOCATION ("warmelt-normal.melt:941:/ cond"); /*cond */ if ( /*_#I__L6*/ meltfnum[4]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { /*^quasiblock */ /*^compute */ /*_.PREDEFLOOP__V9*/ meltfptr[8] = NULL;; /*^exit */ /*exit */ { goto labexit_PREDEFLOOP_1; } ; /*epilog */ } ; } /*noelse */ ; MELT_LOCATION ("warmelt-normal.melt:942:/ quasiblock"); /*_.CURPREDEF__V10*/ meltfptr[9] = /*get_globpredef */ ((melt_ptr_t) melt_globpredef ( /*_#IX__L2*/ meltfnum[1]));; MELT_LOCATION ("warmelt-normal.melt:943:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_OBJECT__L7*/ meltfnum[6] = (melt_magic_discr ((melt_ptr_t) ( /*_.CURPREDEF__V10*/ meltfptr[9])) == MELTOBMAG_OBJECT);; MELT_LOCATION ("warmelt-normal.melt:943:/ cond"); /*cond */ if ( /*_#IS_OBJECT__L7*/ meltfnum[6]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { /*_.MAKE_INTEGERBOX__V11*/ meltfptr[10] = (meltgc_new_int ((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[2])), ( /*_#IX__L2*/ meltfnum[1])));; { MELT_LOCATION ("warmelt-normal.melt:944:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.PREDEFMAP__V4*/ meltfptr[3]), (meltobject_ptr_t) ( /*_.CURPREDEF__V10*/ meltfptr[9]), (melt_ptr_t) ( /*_.MAKE_INTEGERBOX__V11*/ meltfptr[10])); } ; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:943:/ clear"); /*clear *//*_.MAKE_INTEGERBOX__V11*/ meltfptr[10] = 0; } ; } /*noelse */ ; MELT_LOCATION ("warmelt-normal.melt:942:/ clear"); /*clear *//*_.CURPREDEF__V10*/ meltfptr[9] = 0; /*^clear */ /*clear *//*_#IS_OBJECT__L7*/ meltfnum[6] = 0; /*_#I__L8*/ meltfnum[6] = (( /*_#IX__L2*/ meltfnum[1]) + (1));; MELT_LOCATION ("warmelt-normal.melt:946:/ compute"); /*_#IX__L2*/ meltfnum[1] = /*_#SETQ___L9*/ meltfnum[8] = /*_#I__L8*/ meltfnum[6];; MELT_LOCATION ("warmelt-normal.melt:940:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ /*^clear */ /*clear *//*_#I__L6*/ meltfnum[4] = 0; /*^clear */ /*clear *//*_#I__L8*/ meltfnum[6] = 0; /*^clear */ /*clear *//*_#SETQ___L9*/ meltfnum[8] = 0; } ; ; goto labloop_PREDEFLOOP_1; labexit_PREDEFLOOP_1:; /*^loopepilog */ /*loopepilog */ /*_.FOREVER___V8*/ meltfptr[6] = /*_.PREDEFLOOP__V9*/ meltfptr[8];; } ; MELT_LOCATION ("warmelt-normal.melt:947:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { /*_.FILL_INITIAL_PREDEFMAP__V12*/ meltfptr[10] = melt_apply ((meltclosure_ptr_t) (( /*!FILL_INITIAL_PREDEFMAP */ meltfrout->tabval[3])), (melt_ptr_t) ( /*_.PREDEFMAP__V4*/ meltfptr[3]), (""), (union meltparam_un *) 0, "", (union meltparam_un *) 0); } ; MELT_LOCATION ("warmelt-normal.melt:948:/ quasiblock"); /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*_.MAKE_LIST__V14*/ meltfptr[13] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[5]))));; /*^compute */ /*_.MAKE_LIST__V15*/ meltfptr[14] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[5]))));; MELT_LOCATION ("warmelt-normal.melt:948:/ quasiblock"); /*^rawallocobj */ /*rawallocobj */ { melt_ptr_t newobj = 0; melt_raw_object_create (newobj, (melt_ptr_t) (( /*!CLASS_NREP_INITPROC */ meltfrout->tabval[4])), (4), "CLASS_NREP_INITPROC"); /*_.INST__V17*/ meltfptr[16] = newobj; }; ; /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj @NINIT_TOPL", melt_magic_discr ((melt_ptr_t) ( /*_.INST__V17*/ meltfptr[16])) == MELTOBMAG_OBJECT); melt_putfield_object (( /*_.INST__V17*/ meltfptr[16]), (2), ( /*_.MAKE_LIST__V14*/ meltfptr[13]), "NINIT_TOPL"); ; /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj @NINIT_DEFBINDS", melt_magic_discr ((melt_ptr_t) ( /*_.INST__V17*/ meltfptr[16])) == MELTOBMAG_OBJECT); melt_putfield_object (( /*_.INST__V17*/ meltfptr[16]), (3), ( /*_.MAKE_LIST__V15*/ meltfptr[14]), "NINIT_DEFBINDS"); ; /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj @NREP_LOC", melt_magic_discr ((melt_ptr_t) ( /*_.INST__V17*/ meltfptr[16])) == MELTOBMAG_OBJECT); melt_putfield_object (( /*_.INST__V17*/ meltfptr[16]), (0), (( /*nil */ NULL)), "NREP_LOC"); ; /*^touchobj */ melt_dbgtrace_written_object ( /*_.INST__V17*/ meltfptr[16], "newly made instance"); ; /*_.INIPRO__V16*/ meltfptr[15] = /*_.INST__V17*/ meltfptr[16];; MELT_LOCATION ("warmelt-normal.melt:953:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.MAKE_LIST__V18*/ meltfptr[17] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[5]))));; /*^compute */ /*_.MAKE_LIST__V19*/ meltfptr[18] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[5]))));; /*^compute */ /*_.MAKE_LIST__V20*/ meltfptr[19] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[5]))));; /*^compute */ /*_.MAKE_MAPSTRING__V21*/ meltfptr[20] = (meltgc_new_mapstrings ((meltobject_ptr_t) (( /*!DISCR_MAP_STRINGS */ meltfrout->tabval[7])), (50)));; /*^compute */ /*_.MAKE_MAPSTRING__V22*/ meltfptr[21] = (meltgc_new_mapstrings ((meltobject_ptr_t) (( /*!DISCR_MAP_STRINGS */ meltfrout->tabval[7])), (40)));; /*^compute */ /*_.MAKE_MAPOBJECT__V23*/ meltfptr[22] = (meltgc_new_mapobjects ((meltobject_ptr_t) (( /*!DISCR_MAP_OBJECTS */ meltfrout->tabval[0])), (20)));; /*^compute */ /*_.MAKE_MAPOBJECT__V24*/ meltfptr[23] = (meltgc_new_mapobjects ((meltobject_ptr_t) (( /*!DISCR_MAP_OBJECTS */ meltfrout->tabval[0])), (30)));; MELT_LOCATION ("warmelt-normal.melt:968:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*^rawallocobj */ /*rawallocobj */ { melt_ptr_t newobj = 0; melt_raw_object_create (newobj, (melt_ptr_t) (( /*!CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ meltfrout->tabval[8])), (1), "CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER"); /*_.INST__V26*/ meltfptr[25] = newobj; }; ; /*^touchobj */ melt_dbgtrace_written_object ( /*_.INST__V26*/ meltfptr[25], "newly made instance"); ; /*_.INST___V25*/ meltfptr[24] = /*_.INST__V26*/ meltfptr[25];; MELT_LOCATION ("warmelt-normal.melt:970:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*^rawallocobj */ /*rawallocobj */ { melt_ptr_t newobj = 0; melt_raw_object_create (newobj, (melt_ptr_t) (( /*!CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT */ meltfrout->tabval[9])), (1), "CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT"); /*_.INST__V28*/ meltfptr[27] = newobj; }; ; /*^touchobj */ melt_dbgtrace_written_object ( /*_.INST__V28*/ meltfptr[27], "newly made instance"); ; /*_.INST___V27*/ meltfptr[26] = /*_.INST__V28*/ meltfptr[27];; /*^compute */ /*_.MAKE_LIST__V29*/ meltfptr[28] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[5]))));; MELT_LOCATION ("warmelt-normal.melt:953:/ quasiblock"); /*^rawallocobj */ /*rawallocobj */ { melt_ptr_t newobj = 0; melt_raw_object_create (newobj, (melt_ptr_t) (( /*!CLASS_NORMALIZATION_CONTEXT */ meltfrout->tabval[6])), (15), "CLASS_NORMALIZATION_CONTEXT"); /*_.INST__V31*/ meltfptr[30] = newobj; }; ; /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj @NCTX_INITPROC", melt_magic_discr ((melt_ptr_t) ( /*_.INST__V31*/ meltfptr[30])) == MELTOBMAG_OBJECT); melt_putfield_object (( /*_.INST__V31*/ meltfptr[30]), (0), ( /*_.INIPRO__V16*/ meltfptr[15]), "NCTX_INITPROC"); ; /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj @NCTX_PROCLIST", melt_magic_discr ((melt_ptr_t) ( /*_.INST__V31*/ meltfptr[30])) == MELTOBMAG_OBJECT); melt_putfield_object (( /*_.INST__V31*/ meltfptr[30]), (1), ( /*_.MAKE_LIST__V18*/ meltfptr[17]), "NCTX_PROCLIST"); ; /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj @NCTX_DATALIST", melt_magic_discr ((melt_ptr_t) ( /*_.INST__V31*/ meltfptr[30])) == MELTOBMAG_OBJECT); melt_putfield_object (( /*_.INST__V31*/ meltfptr[30]), (2), ( /*_.MAKE_LIST__V19*/ meltfptr[18]), "NCTX_DATALIST"); ; /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj @NCTX_VALUELIST", melt_magic_discr ((melt_ptr_t) ( /*_.INST__V31*/ meltfptr[30])) == MELTOBMAG_OBJECT); melt_putfield_object (( /*_.INST__V31*/ meltfptr[30]), (3), ( /*_.MAKE_LIST__V20*/ meltfptr[19]), "NCTX_VALUELIST"); ; /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj @NCTX_SYMBMAP", melt_magic_discr ((melt_ptr_t) ( /*_.INST__V31*/ meltfptr[30])) == MELTOBMAG_OBJECT); melt_putfield_object (( /*_.INST__V31*/ meltfptr[30]), (4), ( /*_.MAKE_MAPSTRING__V21*/ meltfptr[20]), "NCTX_SYMBMAP"); ; /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj @NCTX_KEYWMAP", melt_magic_discr ((melt_ptr_t) ( /*_.INST__V31*/ meltfptr[30])) == MELTOBMAG_OBJECT); melt_putfield_object (( /*_.INST__V31*/ meltfptr[30]), (5), ( /*_.MAKE_MAPSTRING__V22*/ meltfptr[21]), "NCTX_KEYWMAP"); ; /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj @NCTX_PREDEFMAP", melt_magic_discr ((melt_ptr_t) ( /*_.INST__V31*/ meltfptr[30])) == MELTOBMAG_OBJECT); melt_putfield_object (( /*_.INST__V31*/ meltfptr[30]), (7), ( /*_.PREDEFMAP__V4*/ meltfptr[3]), "NCTX_PREDEFMAP"); ; /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj @NCTX_VALMAP", melt_magic_discr ((melt_ptr_t) ( /*_.INST__V31*/ meltfptr[30])) == MELTOBMAG_OBJECT); melt_putfield_object (( /*_.INST__V31*/ meltfptr[30]), (8), ( /*_.VALMAP__V5*/ meltfptr[4]), "NCTX_VALMAP"); ; /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj @NCTX_VALBINDMAP", melt_magic_discr ((melt_ptr_t) ( /*_.INST__V31*/ meltfptr[30])) == MELTOBMAG_OBJECT); melt_putfield_object (( /*_.INST__V31*/ meltfptr[30]), (9), ( /*_.MAKE_MAPOBJECT__V23*/ meltfptr[22]), "NCTX_VALBINDMAP"); ; /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj @NCTX_SYMBCACHEMAP", melt_magic_discr ((melt_ptr_t) ( /*_.INST__V31*/ meltfptr[30])) == MELTOBMAG_OBJECT); melt_putfield_object (( /*_.INST__V31*/ meltfptr[30]), (6), ( /*_.MAKE_MAPOBJECT__V24*/ meltfptr[23]), "NCTX_SYMBCACHEMAP"); ; /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj @NCTX_CURPROC", melt_magic_discr ((melt_ptr_t) ( /*_.INST__V31*/ meltfptr[30])) == MELTOBMAG_OBJECT); melt_putfield_object (( /*_.INST__V31*/ meltfptr[30]), (10), ( /*_.INIPRO__V16*/ meltfptr[15]), "NCTX_CURPROC"); ; /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj @NCTX_MODULCONTEXT", melt_magic_discr ((melt_ptr_t) ( /*_.INST__V31*/ meltfptr[30])) == MELTOBMAG_OBJECT); melt_putfield_object (( /*_.INST__V31*/ meltfptr[30]), (11), ( /*_.MODCTX__V2*/ meltfptr[1]), "NCTX_MODULCONTEXT"); ; /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj @NCTX_QDATCURMODENVBOX", melt_magic_discr ((melt_ptr_t) ( /*_.INST__V31*/ meltfptr[30])) == MELTOBMAG_OBJECT); melt_putfield_object (( /*_.INST__V31*/ meltfptr[30]), (12), ( /*_.INST___V25*/ meltfptr[24]), "NCTX_QDATCURMODENVBOX"); ; /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj @NCTX_QDATPARMODENV", melt_magic_discr ((melt_ptr_t) ( /*_.INST__V31*/ meltfptr[30])) == MELTOBMAG_OBJECT); melt_putfield_object (( /*_.INST__V31*/ meltfptr[30]), (13), ( /*_.INST___V27*/ meltfptr[26]), "NCTX_QDATPARMODENV"); ; /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj @NCTX_PROCURMODENVLIST", melt_magic_discr ((melt_ptr_t) ( /*_.INST__V31*/ meltfptr[30])) == MELTOBMAG_OBJECT); melt_putfield_object (( /*_.INST__V31*/ meltfptr[30]), (14), ( /*_.MAKE_LIST__V29*/ meltfptr[28]), "NCTX_PROCURMODENVLIST"); ; /*^touchobj */ melt_dbgtrace_written_object ( /*_.INST__V31*/ meltfptr[30], "newly made instance"); ; /*_.NCX__V30*/ meltfptr[29] = /*_.INST__V31*/ meltfptr[30];; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-normal.melt:975:/ cppif.then"); /*^block */ /*anyblock */ { { /*^locexp */ /*melt_increment_dbgcounter */ #if MELT_HAVE_DEBUG melt_dbgcounter++; #endif ; } ; /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*_#MELT_NEED_DBG__L10*/ meltfnum[4] = /*MELT_NEED_DBG */ #if MELT_HAVE_DEBUG ( /*melt_need_dbg */ melt_need_debug ((int) 0)) #else 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; MELT_LOCATION ("warmelt-normal.melt:975:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L10*/ meltfnum[4]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { /*_#THE_MELTCALLCOUNT__L11*/ meltfnum[6] = #ifdef meltcallcount meltcallcount /* the_meltcallcount */ #else 0L #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION ("warmelt-normal.melt:975:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[5]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L11*/ meltfnum[6]; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-normal.melt"; /*^apply.arg */ argtab[2].meltbp_long = 975; /*^apply.arg */ argtab[3].meltbp_cstring = "create_normcontext return ncx"; /*^apply.arg */ argtab[4].meltbp_aptr = (melt_ptr_t *) & /*_.NCX__V30*/ meltfptr[29]; /*_.MELT_DEBUG_FUN__V34*/ meltfptr[33] = melt_apply ((meltclosure_ptr_t) (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[10])), (melt_ptr_t) (( /*nil */ NULL)), (MELTBPARSTR_LONG MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_CSTRING MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*_.IF___V33*/ meltfptr[32] = /*_.MELT_DEBUG_FUN__V34*/ meltfptr[33];; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:975:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L11*/ meltfnum[6] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V34*/ meltfptr[33] = 0; } ; } else { /*^cond.else */ /*_.IF___V33*/ meltfptr[32] = NULL;; } ; MELT_LOCATION ("warmelt-normal.melt:975:/ quasiblock"); /*_.PROGN___V35*/ meltfptr[33] = /*_.IF___V33*/ meltfptr[32];; /*^compute */ /*_.IFCPP___V32*/ meltfptr[31] = /*_.PROGN___V35*/ meltfptr[33];; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:975:/ clear"); /*clear *//*_#MELT_NEED_DBG__L10*/ meltfnum[4] = 0; /*^clear */ /*clear *//*_.IF___V33*/ meltfptr[32] = 0; /*^clear */ /*clear *//*_.PROGN___V35*/ meltfptr[33] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V32*/ meltfptr[31] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION ("warmelt-normal.melt:976:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.NCX__V30*/ meltfptr[29];; { MELT_LOCATION ("warmelt-normal.melt:976:/ 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; /*_.LET___V13*/ meltfptr[9] = /*_.RETURN___V36*/ meltfptr[32];; MELT_LOCATION ("warmelt-normal.melt:948:/ clear"); /*clear *//*_.MAKE_LIST__V14*/ meltfptr[13] = 0; /*^clear */ /*clear *//*_.MAKE_LIST__V15*/ meltfptr[14] = 0; /*^clear */ /*clear *//*_.INIPRO__V16*/ meltfptr[15] = 0; /*^clear */ /*clear *//*_.MAKE_LIST__V18*/ meltfptr[17] = 0; /*^clear */ /*clear *//*_.MAKE_LIST__V19*/ meltfptr[18] = 0; /*^clear */ /*clear *//*_.MAKE_LIST__V20*/ meltfptr[19] = 0; /*^clear */ /*clear *//*_.MAKE_MAPSTRING__V21*/ meltfptr[20] = 0; /*^clear */ /*clear *//*_.MAKE_MAPSTRING__V22*/ meltfptr[21] = 0; /*^clear */ /*clear *//*_.MAKE_MAPOBJECT__V23*/ meltfptr[22] = 0; /*^clear */ /*clear *//*_.MAKE_MAPOBJECT__V24*/ meltfptr[23] = 0; /*^clear */ /*clear *//*_.INST___V25*/ meltfptr[24] = 0; /*^clear */ /*clear *//*_.INST___V27*/ meltfptr[26] = 0; /*^clear */ /*clear *//*_.MAKE_LIST__V29*/ meltfptr[28] = 0; /*^clear */ /*clear *//*_.NCX__V30*/ meltfptr[29] = 0; /*^clear */ /*clear *//*_.IFCPP___V32*/ meltfptr[31] = 0; /*^clear */ /*clear *//*_.RETURN___V36*/ meltfptr[32] = 0; /*_.LET___V3*/ meltfptr[2] = /*_.LET___V13*/ meltfptr[9];; MELT_LOCATION ("warmelt-normal.melt:934:/ clear"); /*clear *//*_#MAXPREDEFIX__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_#IX__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_#I__L3*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_#I__L4*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.PREDEFMAP__V4*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_.VALMAP__V5*/ meltfptr[4] = 0; /*^clear */ /*clear *//*_.IFCPP___V6*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_.FOREVER___V8*/ meltfptr[6] = 0; /*^clear */ /*clear *//*_.FILL_INITIAL_PREDEFMAP__V12*/ meltfptr[10] = 0; /*^clear */ /*clear *//*_.LET___V13*/ meltfptr[9] = 0; MELT_LOCATION ("warmelt-normal.melt:931:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; { MELT_LOCATION ("warmelt-normal.melt:931:/ 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 *//*_.LET___V3*/ meltfptr[2] = 0; } ; goto labend_rout; labend_rout: melt_trace_end ("CREATE_NORMCONTEXT", meltcallcount); MELT_TRACE_EXIT_LOCATION (); melt_blocklevel_signals = current_blocklevel_signals_meltrout_4_warmelt_normal_CREATE_NORMCONTEXT_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_normal_CREATE_NORMCONTEXT */ /****** emitted syntax checking for C generating devices *****/ #if MELT_HAVE_DEBUG /* generated syntax checking routine for 2 C generating devices */ MELT_EXTERN void MELT_MODULE_VISIBILITY melt_syntax_tester_warmelt_normal (void); void melt_syntax_tester_warmelt_normal (void) { if (1) return; /* generating device #1 */ /*primitive-syntax HAS_EXTRA_WARNINGS*/ { long primres_0 = (extra_warnings); if (primres_0) return; } /*end primitive-syntax HAS_EXTRA_WARNINGS */ /* generating device #2 */ /*primitive-syntax LAST_GLOBPREDEF_INDEX*/ { long primres_1 = BGLOB__LASTGLOB; if (primres_1) return; } /*end primitive-syntax LAST_GLOBPREDEF_INDEX */ } /* end generated melt_syntax_tester_warmelt_normal */ #endif /*MELT_HAVE_DEBUG syntaxcheck */ 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 2250 melt_ptr_t mcfr_varptr[2250]; /*no varnum*/ #define MELTFRAM_NBVARNUM /*none*/0 /*others*/ long _spare_; } initial_frame_st; static void initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__, char meltpredefinited[]) { #define meltfram__ (*iniframp__) struct cdata_st { struct MELT_OBJECT_STRUCT (3) dsym_1__CLASS_NREP; struct MELT_STRING_STRUCT (10) dstr_2__CLASS_NREP; 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_NREP; struct MELT_STRING_STRUCT (10) dstr_6__CLASS_NREP; struct MELT_MULTIPLE_STRUCT (1) dtup_7__CLASS_NREP; struct MELT_MULTIPLE_STRUCT (1) dtup_8__CLASS_NREP; struct MELT_OBJECT_STRUCT (3) dsym_9__NREP_LOC; struct MELT_STRING_STRUCT (8) dstr_10__NREP_LOC; struct MELT_OBJECT_STRUCT (4) dobj_11__NREP_LOC; struct MELT_STRING_STRUCT (8) dstr_12__NREP_LOC; struct MELT_OBJECT_STRUCT (3) dsym_13__CLASS_NREP_SIMPLE; struct MELT_STRING_STRUCT (17) dstr_14__CLASS_NREP_SIMPL; struct MELT_OBJECT_STRUCT (8) dobj_15__CLASS_NREP_SIMPLE; struct MELT_STRING_STRUCT (17) dstr_16__CLASS_NREP_SIMPL; struct MELT_MULTIPLE_STRUCT (2) dtup_17__CLASS_NREP_SIMPLE; struct MELT_MULTIPLE_STRUCT (1) dtup_18__CLASS_NREP_SIMPLE; struct MELT_OBJECT_STRUCT (3) dsym_19__CLASS_NREP_EXPRESSION; struct MELT_STRING_STRUCT (21) dstr_20__CLASS_NREP_EXPRE; struct MELT_OBJECT_STRUCT (8) dobj_21__CLASS_NREP_EXPRESSION; struct MELT_STRING_STRUCT (21) dstr_22__CLASS_NREP_EXPRE; struct MELT_MULTIPLE_STRUCT (2) dtup_23__CLASS_NREP_EXPRESSION; struct MELT_MULTIPLE_STRUCT (1) dtup_24__CLASS_NREP_EXPRESSION; struct MELT_OBJECT_STRUCT (3) dsym_25__CLASS_NREP_TYPED_EXPRESSION; struct MELT_STRING_STRUCT (27) dstr_26__CLASS_NREP_TYPED; struct MELT_OBJECT_STRUCT (8) dobj_27__CLASS_NREP_TYPED_EXPRESSION; struct MELT_STRING_STRUCT (27) dstr_28__CLASS_NREP_TYPED; struct MELT_MULTIPLE_STRUCT (3) dtup_29__CLASS_NREP_TYPED_EXPRESSION; struct MELT_MULTIPLE_STRUCT (2) dtup_30__CLASS_NREP_TYPED_EXPRESSION; struct MELT_OBJECT_STRUCT (3) dsym_31__NEXPR_CTYP; struct MELT_STRING_STRUCT (10) dstr_32__NEXPR_CTYP; struct MELT_OBJECT_STRUCT (4) dobj_33__NEXPR_CTYP; struct MELT_STRING_STRUCT (10) dstr_34__NEXPR_CTYP; struct MELT_OBJECT_STRUCT (3) dsym_35__CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS; struct MELT_STRING_STRUCT (42) dstr_36__CLASS_NREP_TYPED; struct MELT_OBJECT_STRUCT (8) dobj_37__CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS; struct MELT_STRING_STRUCT (42) dstr_38__CLASS_NREP_TYPED; struct MELT_MULTIPLE_STRUCT (4) dtup_39__CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS; struct MELT_MULTIPLE_STRUCT (3) dtup_40__CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS; struct MELT_OBJECT_STRUCT (3) dsym_41__NEXPR_ARGS; struct MELT_STRING_STRUCT (10) dstr_42__NEXPR_ARGS; struct MELT_OBJECT_STRUCT (4) dobj_43__NEXPR_ARGS; struct MELT_STRING_STRUCT (10) dstr_44__NEXPR_ARGS; struct MELT_OBJECT_STRUCT (3) dsym_45__CLASS_NREP_APPLY; struct MELT_STRING_STRUCT (16) dstr_46__CLASS_NREP_APPLY; struct MELT_OBJECT_STRUCT (8) dobj_47__CLASS_NREP_APPLY; struct MELT_STRING_STRUCT (16) dstr_48__CLASS_NREP_APPLY; struct MELT_MULTIPLE_STRUCT (5) dtup_49__CLASS_NREP_APPLY; struct MELT_MULTIPLE_STRUCT (4) dtup_50__CLASS_NREP_APPLY; struct MELT_OBJECT_STRUCT (3) dsym_51__NAPP_FUN; struct MELT_STRING_STRUCT (8) dstr_52__NAPP_FUN; struct MELT_OBJECT_STRUCT (4) dobj_53__NAPP_FUN; struct MELT_STRING_STRUCT (8) dstr_54__NAPP_FUN; struct MELT_OBJECT_STRUCT (3) dsym_55__CLASS_NREP_MULTIAPPLY; struct MELT_STRING_STRUCT (21) dstr_56__CLASS_NREP_MULTI; struct MELT_OBJECT_STRUCT (8) dobj_57__CLASS_NREP_MULTIAPPLY; struct MELT_STRING_STRUCT (21) dstr_58__CLASS_NREP_MULTI; struct MELT_MULTIPLE_STRUCT (6) dtup_59__CLASS_NREP_MULTIAPPLY; struct MELT_MULTIPLE_STRUCT (6) dtup_60__CLASS_NREP_MULTIAPPLY; struct MELT_OBJECT_STRUCT (3) dsym_61__NMULAPP_BINDINGS; struct MELT_STRING_STRUCT (16) dstr_62__NMULAPP_BINDINGS; struct MELT_OBJECT_STRUCT (4) dobj_63__NMULAPP_BINDINGS; struct MELT_STRING_STRUCT (16) dstr_64__NMULAPP_BINDINGS; struct MELT_OBJECT_STRUCT (3) dsym_65__NMULAPP_BODY; struct MELT_STRING_STRUCT (12) dstr_66__NMULAPP_BODY; struct MELT_OBJECT_STRUCT (4) dobj_67__NMULAPP_BODY; struct MELT_STRING_STRUCT (12) dstr_68__NMULAPP_BODY; struct MELT_OBJECT_STRUCT (3) dsym_69__CLASS_NREP_MSEND; struct MELT_STRING_STRUCT (16) dstr_70__CLASS_NREP_MSEND; struct MELT_OBJECT_STRUCT (8) dobj_71__CLASS_NREP_MSEND; struct MELT_STRING_STRUCT (16) dstr_72__CLASS_NREP_MSEND; struct MELT_MULTIPLE_STRUCT (5) dtup_73__CLASS_NREP_MSEND; struct MELT_MULTIPLE_STRUCT (5) dtup_74__CLASS_NREP_MSEND; struct MELT_OBJECT_STRUCT (3) dsym_75__NSEND_SEL; struct MELT_STRING_STRUCT (9) dstr_76__NSEND_SEL; struct MELT_OBJECT_STRUCT (4) dobj_77__NSEND_SEL; struct MELT_STRING_STRUCT (9) dstr_78__NSEND_SEL; struct MELT_OBJECT_STRUCT (3) dsym_79__NSEND_RECV; struct MELT_STRING_STRUCT (10) dstr_80__NSEND_RECV; struct MELT_OBJECT_STRUCT (4) dobj_81__NSEND_RECV; struct MELT_STRING_STRUCT (10) dstr_82__NSEND_RECV; struct MELT_OBJECT_STRUCT (3) dsym_83__CLASS_NREP_MULTIMSEND; struct MELT_STRING_STRUCT (21) dstr_84__CLASS_NREP_MULTI; struct MELT_OBJECT_STRUCT (8) dobj_85__CLASS_NREP_MULTIMSEND; struct MELT_STRING_STRUCT (21) dstr_86__CLASS_NREP_MULTI; struct MELT_MULTIPLE_STRUCT (6) dtup_87__CLASS_NREP_MULTIMSEND; struct MELT_MULTIPLE_STRUCT (7) dtup_88__CLASS_NREP_MULTIMSEND; struct MELT_OBJECT_STRUCT (3) dsym_89__NMULSEND_BINDINGS; struct MELT_STRING_STRUCT (17) dstr_90__NMULSEND_BINDING; struct MELT_OBJECT_STRUCT (4) dobj_91__NMULSEND_BINDINGS; struct MELT_STRING_STRUCT (17) dstr_92__NMULSEND_BINDING; struct MELT_OBJECT_STRUCT (3) dsym_93__NMULSEND_BODY; struct MELT_STRING_STRUCT (13) dstr_94__NMULSEND_BODY; struct MELT_OBJECT_STRUCT (4) dobj_95__NMULSEND_BODY; struct MELT_STRING_STRUCT (13) dstr_96__NMULSEND_BODY; struct MELT_OBJECT_STRUCT (3) dsym_97__CLASS_NREP_CHUNK; struct MELT_STRING_STRUCT (16) dstr_98__CLASS_NREP_CHUNK; struct MELT_OBJECT_STRUCT (8) dobj_99__CLASS_NREP_CHUNK; struct MELT_STRING_STRUCT (16) dstr_100__CLASS_NREP_CHUNK; struct MELT_MULTIPLE_STRUCT (4) dtup_101__CLASS_NREP_CHUNK; struct MELT_MULTIPLE_STRUCT (4) dtup_102__CLASS_NREP_CHUNK; struct MELT_OBJECT_STRUCT (3) dsym_103__NCHUNK_EXPANSION; struct MELT_STRING_STRUCT (16) dstr_104__NCHUNK_EXPANSION; struct MELT_OBJECT_STRUCT (4) dobj_105__NCHUNK_EXPANSION; struct MELT_STRING_STRUCT (16) dstr_106__NCHUNK_EXPANSION; struct MELT_OBJECT_STRUCT (3) dsym_107__NCHUNK_OPER; struct MELT_STRING_STRUCT (11) dstr_108__NCHUNK_OPER; struct MELT_OBJECT_STRUCT (4) dobj_109__NCHUNK_OPER; struct MELT_STRING_STRUCT (11) dstr_110__NCHUNK_OPER; struct MELT_OBJECT_STRUCT (3) dsym_111__CLASS_NREP_COMMENT; struct MELT_STRING_STRUCT (18) dstr_112__CLASS_NREP_COMME; struct MELT_OBJECT_STRUCT (8) dobj_113__CLASS_NREP_COMMENT; struct MELT_STRING_STRUCT (18) dstr_114__CLASS_NREP_COMME; struct MELT_MULTIPLE_STRUCT (3) dtup_115__CLASS_NREP_COMMENT; struct MELT_MULTIPLE_STRUCT (2) dtup_116__CLASS_NREP_COMMENT; struct MELT_OBJECT_STRUCT (3) dsym_117__NCOMM_STRING; struct MELT_STRING_STRUCT (12) dstr_118__NCOMM_STRING; struct MELT_OBJECT_STRUCT (4) dobj_119__NCOMM_STRING; struct MELT_STRING_STRUCT (12) dstr_120__NCOMM_STRING; struct MELT_OBJECT_STRUCT (3) dsym_121__CLASS_NREP_LET; struct MELT_STRING_STRUCT (14) dstr_122__CLASS_NREP_LET; struct MELT_OBJECT_STRUCT (8) dobj_123__CLASS_NREP_LET; struct MELT_STRING_STRUCT (14) dstr_124__CLASS_NREP_LET; struct MELT_MULTIPLE_STRUCT (3) dtup_125__CLASS_NREP_LET; struct MELT_MULTIPLE_STRUCT (3) dtup_126__CLASS_NREP_LET; struct MELT_OBJECT_STRUCT (3) dsym_127__NLET_BINDINGS; struct MELT_STRING_STRUCT (13) dstr_128__NLET_BINDINGS; struct MELT_OBJECT_STRUCT (4) dobj_129__NLET_BINDINGS; struct MELT_STRING_STRUCT (13) dstr_130__NLET_BINDINGS; struct MELT_OBJECT_STRUCT (3) dsym_131__NLET_BODY; struct MELT_STRING_STRUCT (9) dstr_132__NLET_BODY; struct MELT_OBJECT_STRUCT (4) dobj_133__NLET_BODY; struct MELT_STRING_STRUCT (9) dstr_134__NLET_BODY; struct MELT_OBJECT_STRUCT (3) dsym_135__CLASS_NREP_LETREC; struct MELT_STRING_STRUCT (17) dstr_136__CLASS_NREP_LETRE; struct MELT_OBJECT_STRUCT (8) dobj_137__CLASS_NREP_LETREC; struct MELT_STRING_STRUCT (17) dstr_138__CLASS_NREP_LETRE; struct MELT_MULTIPLE_STRUCT (4) dtup_139__CLASS_NREP_LETREC; struct MELT_MULTIPLE_STRUCT (6) dtup_140__CLASS_NREP_LETREC; struct MELT_OBJECT_STRUCT (3) dsym_141__NLETREC_FILL_BINDINGS; struct MELT_STRING_STRUCT (21) dstr_142__NLETREC_FILL_BIN; struct MELT_OBJECT_STRUCT (4) dobj_143__NLETREC_FILL_BINDINGS; struct MELT_STRING_STRUCT (21) dstr_144__NLETREC_FILL_BIN; struct MELT_OBJECT_STRUCT (3) dsym_145__NLETREC_BODY_BINDINGS; struct MELT_STRING_STRUCT (21) dstr_146__NLETREC_BODY_BIN; struct MELT_OBJECT_STRUCT (4) dobj_147__NLETREC_BODY_BINDINGS; struct MELT_STRING_STRUCT (21) dstr_148__NLETREC_BODY_BIN; struct MELT_OBJECT_STRUCT (3) dsym_149__NLETREC_LOCSYMS; struct MELT_STRING_STRUCT (15) dstr_150__NLETREC_LOCSYMS; struct MELT_OBJECT_STRUCT (4) dobj_151__NLETREC_LOCSYMS; struct MELT_STRING_STRUCT (15) dstr_152__NLETREC_LOCSYMS; struct MELT_OBJECT_STRUCT (3) dsym_153__CLASS_NREP_RETURN; struct MELT_STRING_STRUCT (17) dstr_154__CLASS_NREP_RETUR; struct MELT_OBJECT_STRUCT (8) dobj_155__CLASS_NREP_RETURN; struct MELT_STRING_STRUCT (17) dstr_156__CLASS_NREP_RETUR; struct MELT_MULTIPLE_STRUCT (3) dtup_157__CLASS_NREP_RETURN; struct MELT_MULTIPLE_STRUCT (3) dtup_158__CLASS_NREP_RETURN; struct MELT_OBJECT_STRUCT (3) dsym_159__NRET_MAIN; struct MELT_STRING_STRUCT (9) dstr_160__NRET_MAIN; struct MELT_OBJECT_STRUCT (4) dobj_161__NRET_MAIN; struct MELT_STRING_STRUCT (9) dstr_162__NRET_MAIN; struct MELT_OBJECT_STRUCT (3) dsym_163__NRET_REST; struct MELT_STRING_STRUCT (9) dstr_164__NRET_REST; struct MELT_OBJECT_STRUCT (4) dobj_165__NRET_REST; struct MELT_STRING_STRUCT (9) dstr_166__NRET_REST; struct MELT_OBJECT_STRUCT (3) dsym_167__CLASS_NREP_IFCOMMON; struct MELT_STRING_STRUCT (19) dstr_168__CLASS_NREP_IFCOM; struct MELT_OBJECT_STRUCT (8) dobj_169__CLASS_NREP_IFCOMMON; struct MELT_STRING_STRUCT (19) dstr_170__CLASS_NREP_IFCOM; struct MELT_MULTIPLE_STRUCT (4) dtup_171__CLASS_NREP_IFCOMMON; struct MELT_MULTIPLE_STRUCT (4) dtup_172__CLASS_NREP_IFCOMMON; struct MELT_OBJECT_STRUCT (3) dsym_173__NIF_THEN; struct MELT_STRING_STRUCT (8) dstr_174__NIF_THEN; struct MELT_OBJECT_STRUCT (4) dobj_175__NIF_THEN; struct MELT_STRING_STRUCT (8) dstr_176__NIF_THEN; struct MELT_OBJECT_STRUCT (3) dsym_177__NIF_ELSE; struct MELT_STRING_STRUCT (8) dstr_178__NIF_ELSE; struct MELT_OBJECT_STRUCT (4) dobj_179__NIF_ELSE; struct MELT_STRING_STRUCT (8) dstr_180__NIF_ELSE; struct MELT_OBJECT_STRUCT (3) dsym_181__CLASS_NREP_IFTESTVALUE; struct MELT_STRING_STRUCT (22) dstr_182__CLASS_NREP_IFTES; struct MELT_OBJECT_STRUCT (8) dobj_183__CLASS_NREP_IFTESTVALUE; struct MELT_STRING_STRUCT (22) dstr_184__CLASS_NREP_IFTES; struct MELT_MULTIPLE_STRUCT (5) dtup_185__CLASS_NREP_IFTESTVALUE; struct MELT_MULTIPLE_STRUCT (5) dtup_186__CLASS_NREP_IFTESTVALUE; struct MELT_OBJECT_STRUCT (3) dsym_187__NIF_TESTVAL; struct MELT_STRING_STRUCT (11) dstr_188__NIF_TESTVAL; struct MELT_OBJECT_STRUCT (4) dobj_189__NIF_TESTVAL; struct MELT_STRING_STRUCT (11) dstr_190__NIF_TESTVAL; struct MELT_OBJECT_STRUCT (3) dsym_191__CLASS_NREP_IFISA; struct MELT_STRING_STRUCT (16) dstr_192__CLASS_NREP_IFISA; struct MELT_OBJECT_STRUCT (8) dobj_193__CLASS_NREP_IFISA; struct MELT_STRING_STRUCT (16) dstr_194__CLASS_NREP_IFISA; struct MELT_MULTIPLE_STRUCT (6) dtup_195__CLASS_NREP_IFISA; struct MELT_MULTIPLE_STRUCT (6) dtup_196__CLASS_NREP_IFISA; struct MELT_OBJECT_STRUCT (3) dsym_197__NIFA_CLASS; struct MELT_STRING_STRUCT (10) dstr_198__NIFA_CLASS; struct MELT_OBJECT_STRUCT (4) dobj_199__NIFA_CLASS; struct MELT_STRING_STRUCT (10) dstr_200__NIFA_CLASS; struct MELT_OBJECT_STRUCT (3) dsym_201__CLASS_NREP_IFTUPLESIZED; struct MELT_STRING_STRUCT (23) dstr_202__CLASS_NREP_IFTUP; struct MELT_OBJECT_STRUCT (8) dobj_203__CLASS_NREP_IFTUPLESIZED; struct MELT_STRING_STRUCT (23) dstr_204__CLASS_NREP_IFTUP; struct MELT_MULTIPLE_STRUCT (6) dtup_205__CLASS_NREP_IFTUPLESIZED; struct MELT_MULTIPLE_STRUCT (6) dtup_206__CLASS_NREP_IFTUPLESIZED; struct MELT_OBJECT_STRUCT (3) dsym_207__NIF_TUPSIZ; struct MELT_STRING_STRUCT (10) dstr_208__NIF_TUPSIZ; struct MELT_OBJECT_STRUCT (4) dobj_209__NIF_TUPSIZ; struct MELT_STRING_STRUCT (10) dstr_210__NIF_TUPSIZ; struct MELT_OBJECT_STRUCT (3) dsym_211__CLASS_NREP_IFVARIADIC; struct MELT_STRING_STRUCT (21) dstr_212__CLASS_NREP_IFVAR; struct MELT_OBJECT_STRUCT (8) dobj_213__CLASS_NREP_IFVARIADIC; struct MELT_STRING_STRUCT (21) dstr_214__CLASS_NREP_IFVAR; struct MELT_MULTIPLE_STRUCT (5) dtup_215__CLASS_NREP_IFVARIADIC; struct MELT_MULTIPLE_STRUCT (6) dtup_216__CLASS_NREP_IFVARIADIC; struct MELT_OBJECT_STRUCT (3) dsym_217__NIFV_VARIADIC; struct MELT_STRING_STRUCT (13) dstr_218__NIFV_VARIADIC; struct MELT_OBJECT_STRUCT (4) dobj_219__NIFV_VARIADIC; struct MELT_STRING_STRUCT (13) dstr_220__NIFV_VARIADIC; struct MELT_OBJECT_STRUCT (3) dsym_221__NIFV_CTYPES; struct MELT_STRING_STRUCT (11) dstr_222__NIFV_CTYPES; struct MELT_OBJECT_STRUCT (4) dobj_223__NIFV_CTYPES; struct MELT_STRING_STRUCT (11) dstr_224__NIFV_CTYPES; struct MELT_OBJECT_STRUCT (3) dsym_225__CLASS_NREP_CONSUME_VARIADIC; struct MELT_STRING_STRUCT (27) dstr_226__CLASS_NREP_CONSU; struct MELT_OBJECT_STRUCT (8) dobj_227__CLASS_NREP_CONSUME_VARIADIC; struct MELT_STRING_STRUCT (27) dstr_228__CLASS_NREP_CONSU; struct MELT_MULTIPLE_STRUCT (3) dtup_229__CLASS_NREP_CONSUME_VARIADIC; struct MELT_MULTIPLE_STRUCT (3) dtup_230__CLASS_NREP_CONSUME_VARIADIC; struct MELT_OBJECT_STRUCT (3) dsym_231__NCONSVA_VARIADIC; struct MELT_STRING_STRUCT (16) dstr_232__NCONSVA_VARIADIC; struct MELT_OBJECT_STRUCT (4) dobj_233__NCONSVA_VARIADIC; struct MELT_STRING_STRUCT (16) dstr_234__NCONSVA_VARIADIC; struct MELT_OBJECT_STRUCT (3) dsym_235__NCONSVA_CTYPES; struct MELT_STRING_STRUCT (14) dstr_236__NCONSVA_CTYPES; struct MELT_OBJECT_STRUCT (4) dobj_237__NCONSVA_CTYPES; struct MELT_STRING_STRUCT (14) dstr_238__NCONSVA_CTYPES; struct MELT_OBJECT_STRUCT (3) dsym_239__CLASS_NREP_IFSAME; struct MELT_STRING_STRUCT (17) dstr_240__CLASS_NREP_IFSAM; struct MELT_OBJECT_STRUCT (8) dobj_241__CLASS_NREP_IFSAME; struct MELT_STRING_STRUCT (17) dstr_242__CLASS_NREP_IFSAM; struct MELT_MULTIPLE_STRUCT (5) dtup_243__CLASS_NREP_IFSAME; struct MELT_MULTIPLE_STRUCT (6) dtup_244__CLASS_NREP_IFSAME; struct MELT_OBJECT_STRUCT (3) dsym_245__NIFS_LEFT; struct MELT_STRING_STRUCT (9) dstr_246__NIFS_LEFT; struct MELT_OBJECT_STRUCT (4) dobj_247__NIFS_LEFT; struct MELT_STRING_STRUCT (9) dstr_248__NIFS_LEFT; struct MELT_OBJECT_STRUCT (3) dsym_249__NIFS_RIGHT; struct MELT_STRING_STRUCT (10) dstr_250__NIFS_RIGHT; struct MELT_OBJECT_STRUCT (4) dobj_251__NIFS_RIGHT; struct MELT_STRING_STRUCT (10) dstr_252__NIFS_RIGHT; struct MELT_OBJECT_STRUCT (3) dsym_253__CLASS_NREP_IF; struct MELT_STRING_STRUCT (13) dstr_254__CLASS_NREP_IF; struct MELT_OBJECT_STRUCT (8) dobj_255__CLASS_NREP_IF; struct MELT_STRING_STRUCT (13) dstr_256__CLASS_NREP_IF; struct MELT_MULTIPLE_STRUCT (5) dtup_257__CLASS_NREP_IF; struct MELT_MULTIPLE_STRUCT (5) dtup_258__CLASS_NREP_IF; struct MELT_OBJECT_STRUCT (3) dsym_259__NIF_TEST; struct MELT_STRING_STRUCT (8) dstr_260__NIF_TEST; struct MELT_OBJECT_STRUCT (4) dobj_261__NIF_TEST; struct MELT_STRING_STRUCT (8) dstr_262__NIF_TEST; struct MELT_OBJECT_STRUCT (3) dsym_263__CLASS_NREP_CPPIF; struct MELT_STRING_STRUCT (16) dstr_264__CLASS_NREP_CPPIF; struct MELT_OBJECT_STRUCT (8) dobj_265__CLASS_NREP_CPPIF; struct MELT_STRING_STRUCT (16) dstr_266__CLASS_NREP_CPPIF; struct MELT_MULTIPLE_STRUCT (3) dtup_267__CLASS_NREP_CPPIF; struct MELT_MULTIPLE_STRUCT (5) dtup_268__CLASS_NREP_CPPIF; struct MELT_OBJECT_STRUCT (3) dsym_269__NIFP_COND; struct MELT_STRING_STRUCT (9) dstr_270__NIFP_COND; struct MELT_OBJECT_STRUCT (4) dobj_271__NIFP_COND; struct MELT_STRING_STRUCT (9) dstr_272__NIFP_COND; struct MELT_OBJECT_STRUCT (3) dsym_273__NIFP_THEN; struct MELT_STRING_STRUCT (9) dstr_274__NIFP_THEN; struct MELT_OBJECT_STRUCT (4) dobj_275__NIFP_THEN; struct MELT_STRING_STRUCT (9) dstr_276__NIFP_THEN; struct MELT_OBJECT_STRUCT (3) dsym_277__NIFP_ELSE; struct MELT_STRING_STRUCT (9) dstr_278__NIFP_ELSE; struct MELT_OBJECT_STRUCT (4) dobj_279__NIFP_ELSE; struct MELT_STRING_STRUCT (9) dstr_280__NIFP_ELSE; struct MELT_OBJECT_STRUCT (3) dsym_281__NIFP_CTYP; struct MELT_STRING_STRUCT (9) dstr_282__NIFP_CTYP; struct MELT_OBJECT_STRUCT (4) dobj_283__NIFP_CTYP; struct MELT_STRING_STRUCT (9) dstr_284__NIFP_CTYP; struct MELT_OBJECT_STRUCT (3) dsym_285__CLASS_NREP_PROGN; struct MELT_STRING_STRUCT (16) dstr_286__CLASS_NREP_PROGN; struct MELT_OBJECT_STRUCT (8) dobj_287__CLASS_NREP_PROGN; struct MELT_STRING_STRUCT (16) dstr_288__CLASS_NREP_PROGN; struct MELT_MULTIPLE_STRUCT (3) dtup_289__CLASS_NREP_PROGN; struct MELT_MULTIPLE_STRUCT (3) dtup_290__CLASS_NREP_PROGN; struct MELT_OBJECT_STRUCT (3) dsym_291__NPROGN_SEQ; struct MELT_STRING_STRUCT (10) dstr_292__NPROGN_SEQ; struct MELT_OBJECT_STRUCT (4) dobj_293__NPROGN_SEQ; struct MELT_STRING_STRUCT (10) dstr_294__NPROGN_SEQ; struct MELT_OBJECT_STRUCT (3) dsym_295__NPROGN_LAST; struct MELT_STRING_STRUCT (11) dstr_296__NPROGN_LAST; struct MELT_OBJECT_STRUCT (4) dobj_297__NPROGN_LAST; struct MELT_STRING_STRUCT (11) dstr_298__NPROGN_LAST; struct MELT_OBJECT_STRUCT (3) dsym_299__CLASS_NREP_CHECKSIGNAL; struct MELT_STRING_STRUCT (22) dstr_300__CLASS_NREP_CHECK; struct MELT_OBJECT_STRUCT (8) dobj_301__CLASS_NREP_CHECKSIGNAL; struct MELT_STRING_STRUCT (22) dstr_302__CLASS_NREP_CHECK; struct MELT_MULTIPLE_STRUCT (3) dtup_303__CLASS_NREP_CHECKSIGNAL; struct MELT_MULTIPLE_STRUCT (1) dtup_304__CLASS_NREP_CHECKSIGNAL; struct MELT_OBJECT_STRUCT (3) dsym_305__CLASS_NREP_UNSAFE_GET_FIELD; struct MELT_STRING_STRUCT (27) dstr_306__CLASS_NREP_UNSAF; struct MELT_OBJECT_STRUCT (8) dobj_307__CLASS_NREP_UNSAFE_GET_FIELD; struct MELT_STRING_STRUCT (27) dstr_308__CLASS_NREP_UNSAF; struct MELT_MULTIPLE_STRUCT (3) dtup_309__CLASS_NREP_UNSAFE_GET_FIELD; struct MELT_MULTIPLE_STRUCT (3) dtup_310__CLASS_NREP_UNSAFE_GET_FIELD; struct MELT_OBJECT_STRUCT (3) dsym_311__NUGET_OBJ; struct MELT_STRING_STRUCT (9) dstr_312__NUGET_OBJ; struct MELT_OBJECT_STRUCT (4) dobj_313__NUGET_OBJ; struct MELT_STRING_STRUCT (9) dstr_314__NUGET_OBJ; struct MELT_OBJECT_STRUCT (3) dsym_315__NUGET_FIELD; struct MELT_STRING_STRUCT (11) dstr_316__NUGET_FIELD; struct MELT_OBJECT_STRUCT (4) dobj_317__NUGET_FIELD; struct MELT_STRING_STRUCT (11) dstr_318__NUGET_FIELD; struct MELT_OBJECT_STRUCT (3) dsym_319__CLASS_NREP_UNSAFE_PUT_FIELDS; struct MELT_STRING_STRUCT (28) dstr_320__CLASS_NREP_UNSAF; struct MELT_OBJECT_STRUCT (8) dobj_321__CLASS_NREP_UNSAFE_PUT_FIELDS; struct MELT_STRING_STRUCT (28) dstr_322__CLASS_NREP_UNSAF; struct MELT_MULTIPLE_STRUCT (3) dtup_323__CLASS_NREP_UNSAFE_PUT_FIELDS; struct MELT_MULTIPLE_STRUCT (3) dtup_324__CLASS_NREP_UNSAFE_PUT_FIELDS; struct MELT_OBJECT_STRUCT (3) dsym_325__NUPUT_OBJ; struct MELT_STRING_STRUCT (9) dstr_326__NUPUT_OBJ; struct MELT_OBJECT_STRUCT (4) dobj_327__NUPUT_OBJ; struct MELT_STRING_STRUCT (9) dstr_328__NUPUT_OBJ; struct MELT_OBJECT_STRUCT (3) dsym_329__NUPUT_FIELDS; struct MELT_STRING_STRUCT (12) dstr_330__NUPUT_FIELDS; struct MELT_OBJECT_STRUCT (4) dobj_331__NUPUT_FIELDS; struct MELT_STRING_STRUCT (12) dstr_332__NUPUT_FIELDS; struct MELT_OBJECT_STRUCT (3) dsym_333__CLASS_NREP_UNSAFE_NTH_COMPONENT; struct MELT_STRING_STRUCT (31) dstr_334__CLASS_NREP_UNSAF; struct MELT_OBJECT_STRUCT (8) dobj_335__CLASS_NREP_UNSAFE_NTH_COMPONENT; struct MELT_STRING_STRUCT (31) dstr_336__CLASS_NREP_UNSAF; struct MELT_MULTIPLE_STRUCT (3) dtup_337__CLASS_NREP_UNSAFE_NTH_COMPONENT; struct MELT_MULTIPLE_STRUCT (3) dtup_338__CLASS_NREP_UNSAFE_NTH_COMPONENT; struct MELT_OBJECT_STRUCT (3) dsym_339__NUNTH_TUPLE; struct MELT_STRING_STRUCT (11) dstr_340__NUNTH_TUPLE; struct MELT_OBJECT_STRUCT (4) dobj_341__NUNTH_TUPLE; struct MELT_STRING_STRUCT (11) dstr_342__NUNTH_TUPLE; struct MELT_OBJECT_STRUCT (3) dsym_343__NUNTH_INDEX; struct MELT_STRING_STRUCT (11) dstr_344__NUNTH_INDEX; struct MELT_OBJECT_STRUCT (4) dobj_345__NUNTH_INDEX; struct MELT_STRING_STRUCT (11) dstr_346__NUNTH_INDEX; struct MELT_OBJECT_STRUCT (3) dsym_347__CLASS_NREP_SETQ; struct MELT_STRING_STRUCT (15) dstr_348__CLASS_NREP_SETQ; struct MELT_OBJECT_STRUCT (8) dobj_349__CLASS_NREP_SETQ; struct MELT_STRING_STRUCT (15) dstr_350__CLASS_NREP_SETQ; struct MELT_MULTIPLE_STRUCT (3) dtup_351__CLASS_NREP_SETQ; struct MELT_MULTIPLE_STRUCT (3) dtup_352__CLASS_NREP_SETQ; struct MELT_OBJECT_STRUCT (3) dsym_353__NSTQ_VAR; struct MELT_STRING_STRUCT (8) dstr_354__NSTQ_VAR; struct MELT_OBJECT_STRUCT (4) dobj_355__NSTQ_VAR; struct MELT_STRING_STRUCT (8) dstr_356__NSTQ_VAR; struct MELT_OBJECT_STRUCT (3) dsym_357__NSTQ_EXP; struct MELT_STRING_STRUCT (8) dstr_358__NSTQ_EXP; struct MELT_OBJECT_STRUCT (4) dobj_359__NSTQ_EXP; struct MELT_STRING_STRUCT (8) dstr_360__NSTQ_EXP; struct MELT_OBJECT_STRUCT (3) dsym_361__CLASS_NREP_FOREVER; struct MELT_STRING_STRUCT (18) dstr_362__CLASS_NREP_FOREV; struct MELT_OBJECT_STRUCT (8) dobj_363__CLASS_NREP_FOREVER; struct MELT_STRING_STRUCT (18) dstr_364__CLASS_NREP_FOREV; struct MELT_MULTIPLE_STRUCT (3) dtup_365__CLASS_NREP_FOREVER; struct MELT_MULTIPLE_STRUCT (4) dtup_366__CLASS_NREP_FOREVER; struct MELT_OBJECT_STRUCT (3) dsym_367__NFOREVER_BIND; struct MELT_STRING_STRUCT (13) dstr_368__NFOREVER_BIND; struct MELT_OBJECT_STRUCT (4) dobj_369__NFOREVER_BIND; struct MELT_STRING_STRUCT (13) dstr_370__NFOREVER_BIND; struct MELT_OBJECT_STRUCT (3) dsym_371__NFOREVER_BODY; struct MELT_STRING_STRUCT (13) dstr_372__NFOREVER_BODY; struct MELT_OBJECT_STRUCT (4) dobj_373__NFOREVER_BODY; struct MELT_STRING_STRUCT (13) dstr_374__NFOREVER_BODY; struct MELT_OBJECT_STRUCT (3) dsym_375__NFOREVER_RESULT; struct MELT_STRING_STRUCT (15) dstr_376__NFOREVER_RESULT; struct MELT_OBJECT_STRUCT (4) dobj_377__NFOREVER_RESULT; struct MELT_STRING_STRUCT (15) dstr_378__NFOREVER_RESULT; struct MELT_OBJECT_STRUCT (3) dsym_379__CLASS_NREP_EXIT; struct MELT_STRING_STRUCT (15) dstr_380__CLASS_NREP_EXIT; struct MELT_OBJECT_STRUCT (8) dobj_381__CLASS_NREP_EXIT; struct MELT_STRING_STRUCT (15) dstr_382__CLASS_NREP_EXIT; struct MELT_MULTIPLE_STRUCT (3) dtup_383__CLASS_NREP_EXIT; struct MELT_MULTIPLE_STRUCT (3) dtup_384__CLASS_NREP_EXIT; struct MELT_OBJECT_STRUCT (3) dsym_385__NEXIT_BIND; struct MELT_STRING_STRUCT (10) dstr_386__NEXIT_BIND; struct MELT_OBJECT_STRUCT (4) dobj_387__NEXIT_BIND; struct MELT_STRING_STRUCT (10) dstr_388__NEXIT_BIND; struct MELT_OBJECT_STRUCT (3) dsym_389__NEXIT_VAL; struct MELT_STRING_STRUCT (9) dstr_390__NEXIT_VAL; struct MELT_OBJECT_STRUCT (4) dobj_391__NEXIT_VAL; struct MELT_STRING_STRUCT (9) dstr_392__NEXIT_VAL; struct MELT_OBJECT_STRUCT (3) dsym_393__CLASS_NREP_AGAIN; struct MELT_STRING_STRUCT (16) dstr_394__CLASS_NREP_AGAIN; struct MELT_OBJECT_STRUCT (8) dobj_395__CLASS_NREP_AGAIN; struct MELT_STRING_STRUCT (16) dstr_396__CLASS_NREP_AGAIN; struct MELT_MULTIPLE_STRUCT (3) dtup_397__CLASS_NREP_AGAIN; struct MELT_MULTIPLE_STRUCT (2) dtup_398__CLASS_NREP_AGAIN; struct MELT_OBJECT_STRUCT (3) dsym_399__NAGAIN_BIND; struct MELT_STRING_STRUCT (11) dstr_400__NAGAIN_BIND; struct MELT_OBJECT_STRUCT (4) dobj_401__NAGAIN_BIND; struct MELT_STRING_STRUCT (11) dstr_402__NAGAIN_BIND; struct MELT_OBJECT_STRUCT (3) dsym_403__CLASS_NREP_FIELDASSIGN; struct MELT_STRING_STRUCT (22) dstr_404__CLASS_NREP_FIELD; struct MELT_OBJECT_STRUCT (8) dobj_405__CLASS_NREP_FIELDASSIGN; struct MELT_STRING_STRUCT (22) dstr_406__CLASS_NREP_FIELD; struct MELT_MULTIPLE_STRUCT (2) dtup_407__CLASS_NREP_FIELDASSIGN; struct MELT_MULTIPLE_STRUCT (3) dtup_408__CLASS_NREP_FIELDASSIGN; struct MELT_OBJECT_STRUCT (3) dsym_409__NFLA_FIELD; struct MELT_STRING_STRUCT (10) dstr_410__NFLA_FIELD; struct MELT_OBJECT_STRUCT (4) dobj_411__NFLA_FIELD; struct MELT_STRING_STRUCT (10) dstr_412__NFLA_FIELD; struct MELT_OBJECT_STRUCT (3) dsym_413__NFLA_VAL; struct MELT_STRING_STRUCT (8) dstr_414__NFLA_VAL; struct MELT_OBJECT_STRUCT (4) dobj_415__NFLA_VAL; struct MELT_STRING_STRUCT (8) dstr_416__NFLA_VAL; struct MELT_OBJECT_STRUCT (3) dsym_417__CLASS_NREP_INSTANCE; struct MELT_STRING_STRUCT (19) dstr_418__CLASS_NREP_INSTA; struct MELT_OBJECT_STRUCT (8) dobj_419__CLASS_NREP_INSTANCE; struct MELT_STRING_STRUCT (19) dstr_420__CLASS_NREP_INSTA; struct MELT_MULTIPLE_STRUCT (3) dtup_421__CLASS_NREP_INSTANCE; struct MELT_MULTIPLE_STRUCT (4) dtup_422__CLASS_NREP_INSTANCE; struct MELT_OBJECT_STRUCT (3) dsym_423__NMINS_CLASS; struct MELT_STRING_STRUCT (11) dstr_424__NMINS_CLASS; struct MELT_OBJECT_STRUCT (4) dobj_425__NMINS_CLASS; struct MELT_STRING_STRUCT (11) dstr_426__NMINS_CLASS; struct MELT_OBJECT_STRUCT (3) dsym_427__NMINS_CLADATA; struct MELT_STRING_STRUCT (13) dstr_428__NMINS_CLADATA; struct MELT_OBJECT_STRUCT (4) dobj_429__NMINS_CLADATA; struct MELT_STRING_STRUCT (13) dstr_430__NMINS_CLADATA; struct MELT_OBJECT_STRUCT (3) dsym_431__NMINS_FIELDS; struct MELT_STRING_STRUCT (12) dstr_432__NMINS_FIELDS; struct MELT_OBJECT_STRUCT (4) dobj_433__NMINS_FIELDS; struct MELT_STRING_STRUCT (12) dstr_434__NMINS_FIELDS; struct MELT_OBJECT_STRUCT (3) dsym_435__CLASS_NREP_VARIADIC_ARGUMENT; struct MELT_STRING_STRUCT (28) dstr_436__CLASS_NREP_VARIA; struct MELT_OBJECT_STRUCT (8) dobj_437__CLASS_NREP_VARIADIC_ARGUMENT; struct MELT_STRING_STRUCT (28) dstr_438__CLASS_NREP_VARIA; struct MELT_MULTIPLE_STRUCT (3) dtup_439__CLASS_NREP_VARIADIC_ARGUMENT; struct MELT_MULTIPLE_STRUCT (4) dtup_440__CLASS_NREP_VARIADIC_ARGUMENT; struct MELT_OBJECT_STRUCT (3) dsym_441__NVARG_VARIADIC; struct MELT_STRING_STRUCT (14) dstr_442__NVARG_VARIADIC; struct MELT_OBJECT_STRUCT (4) dobj_443__NVARG_VARIADIC; struct MELT_STRING_STRUCT (14) dstr_444__NVARG_VARIADIC; struct MELT_OBJECT_STRUCT (3) dsym_445__NVARG_CTYP; struct MELT_STRING_STRUCT (10) dstr_446__NVARG_CTYP; struct MELT_OBJECT_STRUCT (4) dobj_447__NVARG_CTYP; struct MELT_STRING_STRUCT (10) dstr_448__NVARG_CTYP; struct MELT_OBJECT_STRUCT (3) dsym_449__NVARG_OFFSET; struct MELT_STRING_STRUCT (12) dstr_450__NVARG_OFFSET; struct MELT_OBJECT_STRUCT (4) dobj_451__NVARG_OFFSET; struct MELT_STRING_STRUCT (12) dstr_452__NVARG_OFFSET; struct MELT_OBJECT_STRUCT (3) dsym_453__CLASS_NREP_LAMBDA; struct MELT_STRING_STRUCT (17) dstr_454__CLASS_NREP_LAMBD; struct MELT_OBJECT_STRUCT (8) dobj_455__CLASS_NREP_LAMBDA; struct MELT_STRING_STRUCT (17) dstr_456__CLASS_NREP_LAMBD; struct MELT_MULTIPLE_STRUCT (3) dtup_457__CLASS_NREP_LAMBDA; struct MELT_MULTIPLE_STRUCT (4) dtup_458__CLASS_NREP_LAMBDA; struct MELT_OBJECT_STRUCT (3) dsym_459__NLAMBDA_PROC; struct MELT_STRING_STRUCT (12) dstr_460__NLAMBDA_PROC; struct MELT_OBJECT_STRUCT (4) dobj_461__NLAMBDA_PROC; struct MELT_STRING_STRUCT (12) dstr_462__NLAMBDA_PROC; struct MELT_OBJECT_STRUCT (3) dsym_463__NLAMBDA_CONSTROUT; struct MELT_STRING_STRUCT (17) dstr_464__NLAMBDA_CONSTROU; struct MELT_OBJECT_STRUCT (4) dobj_465__NLAMBDA_CONSTROUT; struct MELT_STRING_STRUCT (17) dstr_466__NLAMBDA_CONSTROU; struct MELT_OBJECT_STRUCT (3) dsym_467__NLAMBDA_CLOSEDV; struct MELT_STRING_STRUCT (15) dstr_468__NLAMBDA_CLOSEDV; struct MELT_OBJECT_STRUCT (4) dobj_469__NLAMBDA_CLOSEDV; struct MELT_STRING_STRUCT (15) dstr_470__NLAMBDA_CLOSEDV; struct MELT_OBJECT_STRUCT (3) dsym_471__CLASS_NREP_CITERATION; struct MELT_STRING_STRUCT (21) dstr_472__CLASS_NREP_CITER; struct MELT_OBJECT_STRUCT (8) dobj_473__CLASS_NREP_CITERATION; struct MELT_STRING_STRUCT (21) dstr_474__CLASS_NREP_CITER; struct MELT_MULTIPLE_STRUCT (3) dtup_475__CLASS_NREP_CITERATION; struct MELT_MULTIPLE_STRUCT (8) dtup_476__CLASS_NREP_CITERATION; struct MELT_OBJECT_STRUCT (3) dsym_477__NCITER_CITERATOR; struct MELT_STRING_STRUCT (16) dstr_478__NCITER_CITERATOR; struct MELT_OBJECT_STRUCT (4) dobj_479__NCITER_CITERATOR; struct MELT_STRING_STRUCT (16) dstr_480__NCITER_CITERATOR; struct MELT_OBJECT_STRUCT (3) dsym_481__NCITER_CHUNKBEFORE; struct MELT_STRING_STRUCT (18) dstr_482__NCITER_CHUNKBEFO; struct MELT_OBJECT_STRUCT (4) dobj_483__NCITER_CHUNKBEFORE; struct MELT_STRING_STRUCT (18) dstr_484__NCITER_CHUNKBEFO; struct MELT_OBJECT_STRUCT (3) dsym_485__NCITER_CHUNKAFTER; struct MELT_STRING_STRUCT (17) dstr_486__NCITER_CHUNKAFTE; struct MELT_OBJECT_STRUCT (4) dobj_487__NCITER_CHUNKAFTER; struct MELT_STRING_STRUCT (17) dstr_488__NCITER_CHUNKAFTE; struct MELT_OBJECT_STRUCT (3) dsym_489__NCITER_BODY; struct MELT_STRING_STRUCT (11) dstr_490__NCITER_BODY; struct MELT_OBJECT_STRUCT (4) dobj_491__NCITER_BODY; struct MELT_STRING_STRUCT (11) dstr_492__NCITER_BODY; struct MELT_OBJECT_STRUCT (3) dsym_493__NCITER_STATOCC; struct MELT_STRING_STRUCT (14) dstr_494__NCITER_STATOCC; struct MELT_OBJECT_STRUCT (4) dobj_495__NCITER_STATOCC; struct MELT_STRING_STRUCT (14) dstr_496__NCITER_STATOCC; struct MELT_OBJECT_STRUCT (3) dsym_497__NCITER_LOCBINDINGS; struct MELT_STRING_STRUCT (18) dstr_498__NCITER_LOCBINDIN; struct MELT_OBJECT_STRUCT (4) dobj_499__NCITER_LOCBINDINGS; struct MELT_STRING_STRUCT (18) dstr_500__NCITER_LOCBINDIN; struct MELT_OBJECT_STRUCT (3) dsym_501__NCITER_BODBINDINGS; struct MELT_STRING_STRUCT (18) dstr_502__NCITER_BODBINDIN; struct MELT_OBJECT_STRUCT (4) dobj_503__NCITER_BODBINDINGS; struct MELT_STRING_STRUCT (18) dstr_504__NCITER_BODBINDIN; struct MELT_OBJECT_STRUCT (3) dsym_505__CLASS_NREP_TESTS; struct MELT_STRING_STRUCT (16) dstr_506__CLASS_NREP_TESTS; struct MELT_OBJECT_STRUCT (8) dobj_507__CLASS_NREP_TESTS; struct MELT_STRING_STRUCT (16) dstr_508__CLASS_NREP_TESTS; struct MELT_MULTIPLE_STRUCT (3) dtup_509__CLASS_NREP_TESTS; struct MELT_MULTIPLE_STRUCT (2) dtup_510__CLASS_NREP_TESTS; struct MELT_OBJECT_STRUCT (3) dsym_511__NTESTS_TESTSEQ; struct MELT_STRING_STRUCT (14) dstr_512__NTESTS_TESTSEQ; struct MELT_OBJECT_STRUCT (4) dobj_513__NTESTS_TESTSEQ; struct MELT_STRING_STRUCT (14) dstr_514__NTESTS_TESTSEQ; struct MELT_OBJECT_STRUCT (3) dsym_515__CLASS_NORMAL_CONSTRUCTOR_BINDING; struct MELT_STRING_STRUCT (32) dstr_516__CLASS_NORMAL_CON; struct MELT_OBJECT_STRUCT (3) dsym_517__CLASS_ANY_BINDING; struct MELT_STRING_STRUCT (17) dstr_518__CLASS_ANY_BINDIN; struct MELT_OBJECT_STRUCT (8) dobj_519__CLASS_NORMAL_CONSTRUCTOR_BINDING; struct MELT_STRING_STRUCT (32) dstr_520__CLASS_NORMAL_CON; struct MELT_MULTIPLE_STRUCT (2) dtup_521__CLASS_NORMAL_CONSTRUCTOR_BINDING; struct MELT_MULTIPLE_STRUCT (4) dtup_522__CLASS_NORMAL_CONSTRUCTOR_BINDING; struct MELT_OBJECT_STRUCT (3) dsym_523__NCONSB_LOC; struct MELT_STRING_STRUCT (10) dstr_524__NCONSB_LOC; struct MELT_OBJECT_STRUCT (4) dobj_525__NCONSB_LOC; struct MELT_STRING_STRUCT (10) dstr_526__NCONSB_LOC; struct MELT_OBJECT_STRUCT (3) dsym_527__NCONSB_DISCR; struct MELT_STRING_STRUCT (12) dstr_528__NCONSB_DISCR; struct MELT_OBJECT_STRUCT (4) dobj_529__NCONSB_DISCR; struct MELT_STRING_STRUCT (12) dstr_530__NCONSB_DISCR; struct MELT_OBJECT_STRUCT (3) dsym_531__NCONSB_NLETREC; struct MELT_STRING_STRUCT (14) dstr_532__NCONSB_NLETREC; struct MELT_OBJECT_STRUCT (4) dobj_533__NCONSB_NLETREC; struct MELT_STRING_STRUCT (14) dstr_534__NCONSB_NLETREC; struct MELT_OBJECT_STRUCT (3) dsym_535__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING; struct MELT_STRING_STRUCT (38) dstr_536__CLASS_NORMAL_CON; struct MELT_OBJECT_STRUCT (8) dobj_537__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING; struct MELT_STRING_STRUCT (38) dstr_538__CLASS_NORMAL_CON; struct MELT_MULTIPLE_STRUCT (3) dtup_539__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING; struct MELT_MULTIPLE_STRUCT (5) dtup_540__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING; struct MELT_OBJECT_STRUCT (3) dsym_541__NTUPB_COMP; struct MELT_STRING_STRUCT (10) dstr_542__NTUPB_COMP; struct MELT_OBJECT_STRUCT (4) dobj_543__NTUPB_COMP; struct MELT_STRING_STRUCT (10) dstr_544__NTUPB_COMP; struct MELT_OBJECT_STRUCT (3) dsym_545__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING; struct MELT_STRING_STRUCT (37) dstr_546__CLASS_NORMAL_CON; struct MELT_OBJECT_STRUCT (8) dobj_547__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING; struct MELT_STRING_STRUCT (37) dstr_548__CLASS_NORMAL_CON; struct MELT_MULTIPLE_STRUCT (3) dtup_549__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING; struct MELT_MULTIPLE_STRUCT (6) dtup_550__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING; struct MELT_OBJECT_STRUCT (3) dsym_551__NPAIRB_HEAD; struct MELT_STRING_STRUCT (11) dstr_552__NPAIRB_HEAD; struct MELT_OBJECT_STRUCT (4) dobj_553__NPAIRB_HEAD; struct MELT_STRING_STRUCT (11) dstr_554__NPAIRB_HEAD; struct MELT_OBJECT_STRUCT (3) dsym_555__NPAIRB_TAIL; struct MELT_STRING_STRUCT (11) dstr_556__NPAIRB_TAIL; struct MELT_OBJECT_STRUCT (4) dobj_557__NPAIRB_TAIL; struct MELT_STRING_STRUCT (11) dstr_558__NPAIRB_TAIL; struct MELT_OBJECT_STRUCT (3) dsym_559__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING; struct MELT_STRING_STRUCT (37) dstr_560__CLASS_NORMAL_CON; struct MELT_OBJECT_STRUCT (8) dobj_561__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING; struct MELT_STRING_STRUCT (37) dstr_562__CLASS_NORMAL_CON; struct MELT_MULTIPLE_STRUCT (3) dtup_563__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING; struct MELT_MULTIPLE_STRUCT (7) dtup_564__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING; struct MELT_OBJECT_STRUCT (3) dsym_565__NLISTB_FIRST; struct MELT_STRING_STRUCT (12) dstr_566__NLISTB_FIRST; struct MELT_OBJECT_STRUCT (4) dobj_567__NLISTB_FIRST; struct MELT_STRING_STRUCT (12) dstr_568__NLISTB_FIRST; struct MELT_OBJECT_STRUCT (3) dsym_569__NLISTB_LAST; struct MELT_STRING_STRUCT (11) dstr_570__NLISTB_LAST; struct MELT_OBJECT_STRUCT (4) dobj_571__NLISTB_LAST; struct MELT_STRING_STRUCT (11) dstr_572__NLISTB_LAST; struct MELT_OBJECT_STRUCT (3) dsym_573__NLISTB_PAIRSB; struct MELT_STRING_STRUCT (13) dstr_574__NLISTB_PAIRSB; struct MELT_OBJECT_STRUCT (4) dobj_575__NLISTB_PAIRSB; struct MELT_STRING_STRUCT (13) dstr_576__NLISTB_PAIRSB; struct MELT_OBJECT_STRUCT (3) dsym_577__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING; struct MELT_STRING_STRUCT (39) dstr_578__CLASS_NORMAL_CON; struct MELT_OBJECT_STRUCT (8) dobj_579__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING; struct MELT_STRING_STRUCT (39) dstr_580__CLASS_NORMAL_CON; struct MELT_MULTIPLE_STRUCT (3) dtup_581__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING; struct MELT_MULTIPLE_STRUCT (7) dtup_582__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING; struct MELT_OBJECT_STRUCT (3) dsym_583__NLAMBDAB_NCLOSED; struct MELT_STRING_STRUCT (16) dstr_584__NLAMBDAB_NCLOSED; struct MELT_OBJECT_STRUCT (4) dobj_585__NLAMBDAB_NCLOSED; struct MELT_STRING_STRUCT (16) dstr_586__NLAMBDAB_NCLOSED; struct MELT_OBJECT_STRUCT (3) dsym_587__NLAMBDAB_CONSTROUT; struct MELT_STRING_STRUCT (18) dstr_588__NLAMBDAB_CONSTRO; struct MELT_OBJECT_STRUCT (4) dobj_589__NLAMBDAB_CONSTROUT; struct MELT_STRING_STRUCT (18) dstr_590__NLAMBDAB_CONSTRO; struct MELT_OBJECT_STRUCT (3) dsym_591__NLAMBDAB_DATAROUT; struct MELT_STRING_STRUCT (17) dstr_592__NLAMBDAB_DATAROU; struct MELT_OBJECT_STRUCT (4) dobj_593__NLAMBDAB_DATAROUT; struct MELT_STRING_STRUCT (17) dstr_594__NLAMBDAB_DATAROU; struct MELT_OBJECT_STRUCT (3) dsym_595__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING; struct MELT_STRING_STRUCT (41) dstr_596__CLASS_NORMAL_CON; struct MELT_OBJECT_STRUCT (8) dobj_597__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING; struct MELT_STRING_STRUCT (41) dstr_598__CLASS_NORMAL_CON; struct MELT_MULTIPLE_STRUCT (3) dtup_599__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING; struct MELT_MULTIPLE_STRUCT (6) dtup_600__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING; struct MELT_OBJECT_STRUCT (3) dsym_601__NINSTB_SLOTS; struct MELT_STRING_STRUCT (12) dstr_602__NINSTB_SLOTS; struct MELT_OBJECT_STRUCT (4) dobj_603__NINSTB_SLOTS; struct MELT_STRING_STRUCT (12) dstr_604__NINSTB_SLOTS; struct MELT_OBJECT_STRUCT (3) dsym_605__NINSTB_CLABIND; struct MELT_STRING_STRUCT (14) dstr_606__NINSTB_CLABIND; struct MELT_OBJECT_STRUCT (4) dobj_607__NINSTB_CLABIND; struct MELT_STRING_STRUCT (14) dstr_608__NINSTB_CLABIND; struct MELT_OBJECT_STRUCT (3) dsym_609__CLASS_NREP_ANYPROC; struct MELT_STRING_STRUCT (18) dstr_610__CLASS_NREP_ANYPR; struct MELT_OBJECT_STRUCT (8) dobj_611__CLASS_NREP_ANYPROC; struct MELT_STRING_STRUCT (18) dstr_612__CLASS_NREP_ANYPR; struct MELT_MULTIPLE_STRUCT (2) dtup_613__CLASS_NREP_ANYPROC; struct MELT_MULTIPLE_STRUCT (2) dtup_614__CLASS_NREP_ANYPROC; struct MELT_OBJECT_STRUCT (3) dsym_615__NPROC_BODY; struct MELT_STRING_STRUCT (10) dstr_616__NPROC_BODY; struct MELT_OBJECT_STRUCT (4) dobj_617__NPROC_BODY; struct MELT_STRING_STRUCT (10) dstr_618__NPROC_BODY; struct MELT_OBJECT_STRUCT (3) dsym_619__CLASS_NREP_INITPROC; struct MELT_STRING_STRUCT (19) dstr_620__CLASS_NREP_INITP; struct MELT_OBJECT_STRUCT (8) dobj_621__CLASS_NREP_INITPROC; struct MELT_STRING_STRUCT (19) dstr_622__CLASS_NREP_INITP; struct MELT_MULTIPLE_STRUCT (3) dtup_623__CLASS_NREP_INITPROC; struct MELT_MULTIPLE_STRUCT (4) dtup_624__CLASS_NREP_INITPROC; struct MELT_OBJECT_STRUCT (3) dsym_625__NINIT_TOPL; struct MELT_STRING_STRUCT (10) dstr_626__NINIT_TOPL; struct MELT_OBJECT_STRUCT (4) dobj_627__NINIT_TOPL; struct MELT_STRING_STRUCT (10) dstr_628__NINIT_TOPL; struct MELT_OBJECT_STRUCT (3) dsym_629__NINIT_DEFBINDS; struct MELT_STRING_STRUCT (14) dstr_630__NINIT_DEFBINDS; struct MELT_OBJECT_STRUCT (4) dobj_631__NINIT_DEFBINDS; struct MELT_STRING_STRUCT (14) dstr_632__NINIT_DEFBINDS; struct MELT_OBJECT_STRUCT (3) dsym_633__CLASS_NREP_INITEXTENDPROC; struct MELT_STRING_STRUCT (25) dstr_634__CLASS_NREP_INITE; struct MELT_OBJECT_STRUCT (8) dobj_635__CLASS_NREP_INITEXTENDPROC; struct MELT_STRING_STRUCT (25) dstr_636__CLASS_NREP_INITE; struct MELT_MULTIPLE_STRUCT (4) dtup_637__CLASS_NREP_INITEXTENDPROC; struct MELT_MULTIPLE_STRUCT (5) dtup_638__CLASS_NREP_INITEXTENDPROC; struct MELT_OBJECT_STRUCT (3) dsym_639__NINITEXTEND_MODENV; struct MELT_STRING_STRUCT (18) dstr_640__NINITEXTEND_MODE; struct MELT_OBJECT_STRUCT (4) dobj_641__NINITEXTEND_MODENV; struct MELT_STRING_STRUCT (18) dstr_642__NINITEXTEND_MODE; struct MELT_OBJECT_STRUCT (3) dsym_643__CLASS_NREP_ROUTPROC; struct MELT_STRING_STRUCT (19) dstr_644__CLASS_NREP_ROUTP; struct MELT_OBJECT_STRUCT (8) dobj_645__CLASS_NREP_ROUTPROC; struct MELT_STRING_STRUCT (19) dstr_646__CLASS_NREP_ROUTP; struct MELT_MULTIPLE_STRUCT (3) dtup_647__CLASS_NREP_ROUTPROC; struct MELT_MULTIPLE_STRUCT (10) dtup_648__CLASS_NREP_ROUTPROC; struct MELT_OBJECT_STRUCT (3) dsym_649__NRPRO_NAME; struct MELT_STRING_STRUCT (10) dstr_650__NRPRO_NAME; struct MELT_OBJECT_STRUCT (4) dobj_651__NRPRO_NAME; struct MELT_STRING_STRUCT (10) dstr_652__NRPRO_NAME; struct MELT_OBJECT_STRUCT (3) dsym_653__NRPRO_ARGB; struct MELT_STRING_STRUCT (10) dstr_654__NRPRO_ARGB; struct MELT_OBJECT_STRUCT (4) dobj_655__NRPRO_ARGB; struct MELT_STRING_STRUCT (10) dstr_656__NRPRO_ARGB; struct MELT_OBJECT_STRUCT (3) dsym_657__NRPRO_CLOSEDB; struct MELT_STRING_STRUCT (13) dstr_658__NRPRO_CLOSEDB; struct MELT_OBJECT_STRUCT (4) dobj_659__NRPRO_CLOSEDB; struct MELT_STRING_STRUCT (13) dstr_660__NRPRO_CLOSEDB; struct MELT_OBJECT_STRUCT (3) dsym_661__NRPRO_CONST; struct MELT_STRING_STRUCT (11) dstr_662__NRPRO_CONST; struct MELT_OBJECT_STRUCT (4) dobj_663__NRPRO_CONST; struct MELT_STRING_STRUCT (11) dstr_664__NRPRO_CONST; struct MELT_OBJECT_STRUCT (3) dsym_665__NRPRO_DATAROUT; struct MELT_STRING_STRUCT (14) dstr_666__NRPRO_DATAROUT; struct MELT_OBJECT_STRUCT (4) dobj_667__NRPRO_DATAROUT; struct MELT_STRING_STRUCT (14) dstr_668__NRPRO_DATAROUT; struct MELT_OBJECT_STRUCT (3) dsym_669__NRPRO_DATACLOS; struct MELT_STRING_STRUCT (14) dstr_670__NRPRO_DATACLOS; struct MELT_OBJECT_STRUCT (4) dobj_671__NRPRO_DATACLOS; struct MELT_STRING_STRUCT (14) dstr_672__NRPRO_DATACLOS; struct MELT_OBJECT_STRUCT (3) dsym_673__NRPRO_THUNKLIST; struct MELT_STRING_STRUCT (15) dstr_674__NRPRO_THUNKLIST; struct MELT_OBJECT_STRUCT (4) dobj_675__NRPRO_THUNKLIST; struct MELT_STRING_STRUCT (15) dstr_676__NRPRO_THUNKLIST; struct MELT_OBJECT_STRUCT (3) dsym_677__NRPRO_VARIADIC; struct MELT_STRING_STRUCT (14) dstr_678__NRPRO_VARIADIC; struct MELT_OBJECT_STRUCT (4) dobj_679__NRPRO_VARIADIC; struct MELT_STRING_STRUCT (14) dstr_680__NRPRO_VARIADIC; struct MELT_OBJECT_STRUCT (3) dsym_681__CLASS_NREP_LAMBDAROUTPROC; struct MELT_STRING_STRUCT (25) dstr_682__CLASS_NREP_LAMBD; struct MELT_OBJECT_STRUCT (8) dobj_683__CLASS_NREP_LAMBDAROUTPROC; struct MELT_STRING_STRUCT (25) dstr_684__CLASS_NREP_LAMBD; struct MELT_MULTIPLE_STRUCT (4) dtup_685__CLASS_NREP_LAMBDAROUTPROC; struct MELT_MULTIPLE_STRUCT (10) dtup_686__CLASS_NREP_LAMBDAROUTPROC; struct MELT_OBJECT_STRUCT (3) dsym_687__CLASS_NREP_DEFUNROUTPROC; struct MELT_STRING_STRUCT (24) dstr_688__CLASS_NREP_DEFUN; struct MELT_OBJECT_STRUCT (8) dobj_689__CLASS_NREP_DEFUNROUTPROC; struct MELT_STRING_STRUCT (24) dstr_690__CLASS_NREP_DEFUN; struct MELT_MULTIPLE_STRUCT (4) dtup_691__CLASS_NREP_DEFUNROUTPROC; struct MELT_MULTIPLE_STRUCT (10) dtup_692__CLASS_NREP_DEFUNROUTPROC; struct MELT_OBJECT_STRUCT (3) dsym_693__CLASS_NREP_PREDEF; struct MELT_STRING_STRUCT (17) dstr_694__CLASS_NREP_PREDE; struct MELT_OBJECT_STRUCT (8) dobj_695__CLASS_NREP_PREDEF; struct MELT_STRING_STRUCT (17) dstr_696__CLASS_NREP_PREDE; struct MELT_MULTIPLE_STRUCT (3) dtup_697__CLASS_NREP_PREDEF; struct MELT_MULTIPLE_STRUCT (2) dtup_698__CLASS_NREP_PREDEF; struct MELT_OBJECT_STRUCT (3) dsym_699__NRPREDEF; struct MELT_STRING_STRUCT (8) dstr_700__NRPREDEF; struct MELT_OBJECT_STRUCT (4) dobj_701__NRPREDEF; struct MELT_STRING_STRUCT (8) dstr_702__NRPREDEF; struct MELT_OBJECT_STRUCT (3) dsym_703__CLASS_NREP_NIL; struct MELT_STRING_STRUCT (14) dstr_704__CLASS_NREP_NIL; struct MELT_OBJECT_STRUCT (8) dobj_705__CLASS_NREP_NIL; struct MELT_STRING_STRUCT (14) dstr_706__CLASS_NREP_NIL; struct MELT_MULTIPLE_STRUCT (3) dtup_707__CLASS_NREP_NIL; struct MELT_MULTIPLE_STRUCT (1) dtup_708__CLASS_NREP_NIL; struct MELT_OBJECT_STRUCT (3) dsym_709__CLASS_NREP_QUASIDATA; struct MELT_STRING_STRUCT (20) dstr_710__CLASS_NREP_QUASI; struct MELT_OBJECT_STRUCT (8) dobj_711__CLASS_NREP_QUASIDATA; struct MELT_STRING_STRUCT (20) dstr_712__CLASS_NREP_QUASI; struct MELT_MULTIPLE_STRUCT (2) dtup_713__CLASS_NREP_QUASIDATA; struct MELT_MULTIPLE_STRUCT (1) dtup_714__CLASS_NREP_QUASIDATA; struct MELT_OBJECT_STRUCT (3) dsym_715__CLASS_NREP_BOUND_DATA; struct MELT_STRING_STRUCT (21) dstr_716__CLASS_NREP_BOUND; struct MELT_OBJECT_STRUCT (8) dobj_717__CLASS_NREP_BOUND_DATA; struct MELT_STRING_STRUCT (21) dstr_718__CLASS_NREP_BOUND; struct MELT_MULTIPLE_STRUCT (3) dtup_719__CLASS_NREP_BOUND_DATA; struct MELT_MULTIPLE_STRUCT (4) dtup_720__CLASS_NREP_BOUND_DATA; struct MELT_OBJECT_STRUCT (3) dsym_721__NDATA_NAME; struct MELT_STRING_STRUCT (10) dstr_722__NDATA_NAME; struct MELT_OBJECT_STRUCT (4) dobj_723__NDATA_NAME; struct MELT_STRING_STRUCT (10) dstr_724__NDATA_NAME; struct MELT_OBJECT_STRUCT (3) dsym_725__NDATA_RANK; struct MELT_STRING_STRUCT (10) dstr_726__NDATA_RANK; struct MELT_OBJECT_STRUCT (4) dobj_727__NDATA_RANK; struct MELT_STRING_STRUCT (10) dstr_728__NDATA_RANK; struct MELT_OBJECT_STRUCT (3) dsym_729__NDATA_LOCBIND; struct MELT_STRING_STRUCT (13) dstr_730__NDATA_LOCBIND; struct MELT_OBJECT_STRUCT (4) dobj_731__NDATA_LOCBIND; struct MELT_STRING_STRUCT (13) dstr_732__NDATA_LOCBIND; struct MELT_OBJECT_STRUCT (3) dsym_733__CLASS_NREP_DISCRIMINATED_DATA; struct MELT_STRING_STRUCT (29) dstr_734__CLASS_NREP_DISCR; struct MELT_OBJECT_STRUCT (8) dobj_735__CLASS_NREP_DISCRIMINATED_DATA; struct MELT_STRING_STRUCT (29) dstr_736__CLASS_NREP_DISCR; struct MELT_MULTIPLE_STRUCT (4) dtup_737__CLASS_NREP_DISCRIMINATED_DATA; struct MELT_MULTIPLE_STRUCT (5) dtup_738__CLASS_NREP_DISCRIMINATED_DATA; struct MELT_OBJECT_STRUCT (3) dsym_739__NDATA_DISCRX; struct MELT_STRING_STRUCT (12) dstr_740__NDATA_DISCRX; struct MELT_OBJECT_STRUCT (4) dobj_741__NDATA_DISCRX; struct MELT_STRING_STRUCT (12) dstr_742__NDATA_DISCRX; struct MELT_OBJECT_STRUCT (3) dsym_743__CLASS_NREP_DATAINSTANCE; struct MELT_STRING_STRUCT (23) dstr_744__CLASS_NREP_DATAI; struct MELT_OBJECT_STRUCT (8) dobj_745__CLASS_NREP_DATAINSTANCE; struct MELT_STRING_STRUCT (23) dstr_746__CLASS_NREP_DATAI; struct MELT_MULTIPLE_STRUCT (5) dtup_747__CLASS_NREP_DATAINSTANCE; struct MELT_MULTIPLE_STRUCT (9) dtup_748__CLASS_NREP_DATAINSTANCE; struct MELT_OBJECT_STRUCT (3) dsym_749__NINST_OBJNUM; struct MELT_STRING_STRUCT (12) dstr_750__NINST_OBJNUM; struct MELT_OBJECT_STRUCT (4) dobj_751__NINST_OBJNUM; struct MELT_STRING_STRUCT (12) dstr_752__NINST_OBJNUM; struct MELT_OBJECT_STRUCT (3) dsym_753__NINST_PREDEF; struct MELT_STRING_STRUCT (12) dstr_754__NINST_PREDEF; struct MELT_OBJECT_STRUCT (4) dobj_755__NINST_PREDEF; struct MELT_STRING_STRUCT (12) dstr_756__NINST_PREDEF; struct MELT_OBJECT_STRUCT (3) dsym_757__NINST_HASH; struct MELT_STRING_STRUCT (10) dstr_758__NINST_HASH; struct MELT_OBJECT_STRUCT (4) dobj_759__NINST_HASH; struct MELT_STRING_STRUCT (10) dstr_760__NINST_HASH; struct MELT_OBJECT_STRUCT (3) dsym_761__NINST_SLOTS; struct MELT_STRING_STRUCT (11) dstr_762__NINST_SLOTS; struct MELT_OBJECT_STRUCT (4) dobj_763__NINST_SLOTS; struct MELT_STRING_STRUCT (11) dstr_764__NINST_SLOTS; struct MELT_OBJECT_STRUCT (3) dsym_765__CLASS_NREP_DATASTRING; struct MELT_STRING_STRUCT (21) dstr_766__CLASS_NREP_DATAS; struct MELT_OBJECT_STRUCT (8) dobj_767__CLASS_NREP_DATASTRING; struct MELT_STRING_STRUCT (21) dstr_768__CLASS_NREP_DATAS; struct MELT_MULTIPLE_STRUCT (5) dtup_769__CLASS_NREP_DATASTRING; struct MELT_MULTIPLE_STRUCT (6) dtup_770__CLASS_NREP_DATASTRING; struct MELT_OBJECT_STRUCT (3) dsym_771__NSTR_STRING; struct MELT_STRING_STRUCT (11) dstr_772__NSTR_STRING; struct MELT_OBJECT_STRUCT (4) dobj_773__NSTR_STRING; struct MELT_STRING_STRUCT (11) dstr_774__NSTR_STRING; struct MELT_OBJECT_STRUCT (3) dsym_775__CLASS_NREP_DATABOXEDINTEGER; struct MELT_STRING_STRUCT (27) dstr_776__CLASS_NREP_DATAB; struct MELT_OBJECT_STRUCT (8) dobj_777__CLASS_NREP_DATABOXEDINTEGER; struct MELT_STRING_STRUCT (27) dstr_778__CLASS_NREP_DATAB; struct MELT_MULTIPLE_STRUCT (5) dtup_779__CLASS_NREP_DATABOXEDINTEGER; struct MELT_MULTIPLE_STRUCT (6) dtup_780__CLASS_NREP_DATABOXEDINTEGER; struct MELT_OBJECT_STRUCT (3) dsym_781__NBOXINT_NUM; struct MELT_STRING_STRUCT (11) dstr_782__NBOXINT_NUM; struct MELT_OBJECT_STRUCT (4) dobj_783__NBOXINT_NUM; struct MELT_STRING_STRUCT (11) dstr_784__NBOXINT_NUM; struct MELT_OBJECT_STRUCT (3) dsym_785__CLASS_NREP_DATATUPLE; struct MELT_STRING_STRUCT (20) dstr_786__CLASS_NREP_DATAT; struct MELT_OBJECT_STRUCT (8) dobj_787__CLASS_NREP_DATATUPLE; struct MELT_STRING_STRUCT (20) dstr_788__CLASS_NREP_DATAT; struct MELT_MULTIPLE_STRUCT (5) dtup_789__CLASS_NREP_DATATUPLE; struct MELT_MULTIPLE_STRUCT (6) dtup_790__CLASS_NREP_DATATUPLE; struct MELT_OBJECT_STRUCT (3) dsym_791__NTUP_COMP; struct MELT_STRING_STRUCT (9) dstr_792__NTUP_COMP; struct MELT_OBJECT_STRUCT (4) dobj_793__NTUP_COMP; struct MELT_STRING_STRUCT (9) dstr_794__NTUP_COMP; struct MELT_OBJECT_STRUCT (3) dsym_795__CLASS_NREP_DATASYMBOL; struct MELT_STRING_STRUCT (21) dstr_796__CLASS_NREP_DATAS; struct MELT_OBJECT_STRUCT (8) dobj_797__CLASS_NREP_DATASYMBOL; struct MELT_STRING_STRUCT (21) dstr_798__CLASS_NREP_DATAS; struct MELT_MULTIPLE_STRUCT (6) dtup_799__CLASS_NREP_DATASYMBOL; struct MELT_MULTIPLE_STRUCT (10) dtup_800__CLASS_NREP_DATASYMBOL; struct MELT_OBJECT_STRUCT (3) dsym_801__NDSY_NAMESTR; struct MELT_STRING_STRUCT (12) dstr_802__NDSY_NAMESTR; struct MELT_OBJECT_STRUCT (4) dobj_803__NDSY_NAMESTR; struct MELT_STRING_STRUCT (12) dstr_804__NDSY_NAMESTR; struct MELT_OBJECT_STRUCT (3) dsym_805__CLASS_NREP_DATAKEYWORD; struct MELT_STRING_STRUCT (22) dstr_806__CLASS_NREP_DATAK; struct MELT_OBJECT_STRUCT (8) dobj_807__CLASS_NREP_DATAKEYWORD; struct MELT_STRING_STRUCT (22) dstr_808__CLASS_NREP_DATAK; struct MELT_MULTIPLE_STRUCT (7) dtup_809__CLASS_NREP_DATAKEYWORD; struct MELT_MULTIPLE_STRUCT (10) dtup_810__CLASS_NREP_DATAKEYWORD; struct MELT_OBJECT_STRUCT (3) dsym_811__CLASS_NREP_DATAROUTINE; struct MELT_STRING_STRUCT (22) dstr_812__CLASS_NREP_DATAR; struct MELT_OBJECT_STRUCT (8) dobj_813__CLASS_NREP_DATAROUTINE; struct MELT_STRING_STRUCT (22) dstr_814__CLASS_NREP_DATAR; struct MELT_MULTIPLE_STRUCT (5) dtup_815__CLASS_NREP_DATAROUTINE; struct MELT_MULTIPLE_STRUCT (6) dtup_816__CLASS_NREP_DATAROUTINE; struct MELT_OBJECT_STRUCT (3) dsym_817__NDROU_PROC; struct MELT_STRING_STRUCT (10) dstr_818__NDROU_PROC; struct MELT_OBJECT_STRUCT (4) dobj_819__NDROU_PROC; struct MELT_STRING_STRUCT (10) dstr_820__NDROU_PROC; struct MELT_OBJECT_STRUCT (3) dsym_821__CLASS_NREP_DATACLOSURE; struct MELT_STRING_STRUCT (22) dstr_822__CLASS_NREP_DATAC; struct MELT_OBJECT_STRUCT (8) dobj_823__CLASS_NREP_DATACLOSURE; struct MELT_STRING_STRUCT (22) dstr_824__CLASS_NREP_DATAC; struct MELT_MULTIPLE_STRUCT (5) dtup_825__CLASS_NREP_DATACLOSURE; struct MELT_MULTIPLE_STRUCT (7) dtup_826__CLASS_NREP_DATACLOSURE; struct MELT_OBJECT_STRUCT (3) dsym_827__NDCLO_PROC; struct MELT_STRING_STRUCT (10) dstr_828__NDCLO_PROC; struct MELT_OBJECT_STRUCT (4) dobj_829__NDCLO_PROC; struct MELT_STRING_STRUCT (10) dstr_830__NDCLO_PROC; struct MELT_OBJECT_STRUCT (3) dsym_831__NDCLO_CLOSV; struct MELT_STRING_STRUCT (11) dstr_832__NDCLO_CLOSV; struct MELT_OBJECT_STRUCT (4) dobj_833__NDCLO_CLOSV; struct MELT_STRING_STRUCT (11) dstr_834__NDCLO_CLOSV; struct MELT_OBJECT_STRUCT (3) dsym_835__CLASS_NREP_IMPORTEDVAL; struct MELT_STRING_STRUCT (22) dstr_836__CLASS_NREP_IMPOR; struct MELT_OBJECT_STRUCT (8) dobj_837__CLASS_NREP_IMPORTEDVAL; struct MELT_STRING_STRUCT (22) dstr_838__CLASS_NREP_IMPOR; struct MELT_MULTIPLE_STRUCT (3) dtup_839__CLASS_NREP_IMPORTEDVAL; struct MELT_MULTIPLE_STRUCT (3) dtup_840__CLASS_NREP_IMPORTEDVAL; struct MELT_OBJECT_STRUCT (3) dsym_841__NIMPORT_SYMB; struct MELT_STRING_STRUCT (12) dstr_842__NIMPORT_SYMB; struct MELT_OBJECT_STRUCT (4) dobj_843__NIMPORT_SYMB; struct MELT_STRING_STRUCT (12) dstr_844__NIMPORT_SYMB; struct MELT_OBJECT_STRUCT (3) dsym_845__NIMPORT_SYDATA; struct MELT_STRING_STRUCT (14) dstr_846__NIMPORT_SYDATA; struct MELT_OBJECT_STRUCT (4) dobj_847__NIMPORT_SYDATA; struct MELT_STRING_STRUCT (14) dstr_848__NIMPORT_SYDATA; struct MELT_OBJECT_STRUCT (3) dsym_849__CLASS_NREP_LITERALVALUE; struct MELT_STRING_STRUCT (23) dstr_850__CLASS_NREP_LITER; struct MELT_OBJECT_STRUCT (8) dobj_851__CLASS_NREP_LITERALVALUE; struct MELT_STRING_STRUCT (23) dstr_852__CLASS_NREP_LITER; struct MELT_MULTIPLE_STRUCT (3) dtup_853__CLASS_NREP_LITERALVALUE; struct MELT_MULTIPLE_STRUCT (2) dtup_854__CLASS_NREP_LITERALVALUE; struct MELT_OBJECT_STRUCT (3) dsym_855__NLITVAL_REGVAL; struct MELT_STRING_STRUCT (14) dstr_856__NLITVAL_REGVAL; struct MELT_OBJECT_STRUCT (4) dobj_857__NLITVAL_REGVAL; struct MELT_STRING_STRUCT (14) dstr_858__NLITVAL_REGVAL; struct MELT_OBJECT_STRUCT (3) dsym_859__CLASS_NREP_LITERALNAMEDVALUE; struct MELT_STRING_STRUCT (28) dstr_860__CLASS_NREP_LITER; struct MELT_OBJECT_STRUCT (8) dobj_861__CLASS_NREP_LITERALNAMEDVALUE; struct MELT_STRING_STRUCT (28) dstr_862__CLASS_NREP_LITER; struct MELT_MULTIPLE_STRUCT (4) dtup_863__CLASS_NREP_LITERALNAMEDVALUE; struct MELT_MULTIPLE_STRUCT (3) dtup_864__CLASS_NREP_LITERALNAMEDVALUE; struct MELT_OBJECT_STRUCT (3) dsym_865__NLITVAL_SYMBOL; struct MELT_STRING_STRUCT (14) dstr_866__NLITVAL_SYMBOL; struct MELT_OBJECT_STRUCT (4) dobj_867__NLITVAL_SYMBOL; struct MELT_STRING_STRUCT (14) dstr_868__NLITVAL_SYMBOL; struct MELT_OBJECT_STRUCT (3) dsym_869__CLASS_NREP_SYMOCC; struct MELT_STRING_STRUCT (17) dstr_870__CLASS_NREP_SYMOC; struct MELT_OBJECT_STRUCT (8) dobj_871__CLASS_NREP_SYMOCC; struct MELT_STRING_STRUCT (17) dstr_872__CLASS_NREP_SYMOC; struct MELT_MULTIPLE_STRUCT (3) dtup_873__CLASS_NREP_SYMOCC; struct MELT_MULTIPLE_STRUCT (4) dtup_874__CLASS_NREP_SYMOCC; struct MELT_OBJECT_STRUCT (3) dsym_875__NOCC_SYMB; struct MELT_STRING_STRUCT (9) dstr_876__NOCC_SYMB; struct MELT_OBJECT_STRUCT (4) dobj_877__NOCC_SYMB; struct MELT_STRING_STRUCT (9) dstr_878__NOCC_SYMB; struct MELT_OBJECT_STRUCT (3) dsym_879__NOCC_CTYP; struct MELT_STRING_STRUCT (9) dstr_880__NOCC_CTYP; struct MELT_OBJECT_STRUCT (4) dobj_881__NOCC_CTYP; struct MELT_STRING_STRUCT (9) dstr_882__NOCC_CTYP; struct MELT_OBJECT_STRUCT (3) dsym_883__NOCC_BIND; struct MELT_STRING_STRUCT (9) dstr_884__NOCC_BIND; struct MELT_OBJECT_STRUCT (4) dobj_885__NOCC_BIND; struct MELT_STRING_STRUCT (9) dstr_886__NOCC_BIND; struct MELT_OBJECT_STRUCT (3) dsym_887__CLASS_NREP_LOCSYMOCC; struct MELT_STRING_STRUCT (20) dstr_888__CLASS_NREP_LOCSY; struct MELT_OBJECT_STRUCT (8) dobj_889__CLASS_NREP_LOCSYMOCC; struct MELT_STRING_STRUCT (20) dstr_890__CLASS_NREP_LOCSY; struct MELT_MULTIPLE_STRUCT (4) dtup_891__CLASS_NREP_LOCSYMOCC; struct MELT_MULTIPLE_STRUCT (4) dtup_892__CLASS_NREP_LOCSYMOCC; struct MELT_OBJECT_STRUCT (3) dsym_893__CLASS_NREP_CLOSEDOCC; struct MELT_STRING_STRUCT (20) dstr_894__CLASS_NREP_CLOSE; struct MELT_OBJECT_STRUCT (8) dobj_895__CLASS_NREP_CLOSEDOCC; struct MELT_STRING_STRUCT (20) dstr_896__CLASS_NREP_CLOSE; struct MELT_MULTIPLE_STRUCT (4) dtup_897__CLASS_NREP_CLOSEDOCC; struct MELT_MULTIPLE_STRUCT (5) dtup_898__CLASS_NREP_CLOSEDOCC; struct MELT_OBJECT_STRUCT (3) dsym_899__NCLOC_PROCS; struct MELT_STRING_STRUCT (11) dstr_900__NCLOC_PROCS; struct MELT_OBJECT_STRUCT (4) dobj_901__NCLOC_PROCS; struct MELT_STRING_STRUCT (11) dstr_902__NCLOC_PROCS; struct MELT_OBJECT_STRUCT (3) dsym_903__CLASS_NREP_CONSTOCC; struct MELT_STRING_STRUCT (19) dstr_904__CLASS_NREP_CONST; struct MELT_OBJECT_STRUCT (8) dobj_905__CLASS_NREP_CONSTOCC; struct MELT_STRING_STRUCT (19) dstr_906__CLASS_NREP_CONST; struct MELT_MULTIPLE_STRUCT (5) dtup_907__CLASS_NREP_CONSTOCC; struct MELT_MULTIPLE_STRUCT (5) dtup_908__CLASS_NREP_CONSTOCC; struct MELT_OBJECT_STRUCT (3) dsym_909__CLASS_NREP_QUASICONSTANT; struct MELT_STRING_STRUCT (24) dstr_910__CLASS_NREP_QUASI; struct MELT_OBJECT_STRUCT (8) dobj_911__CLASS_NREP_QUASICONSTANT; struct MELT_STRING_STRUCT (24) dstr_912__CLASS_NREP_QUASI; struct MELT_MULTIPLE_STRUCT (3) dtup_913__CLASS_NREP_QUASICONSTANT; struct MELT_MULTIPLE_STRUCT (4) dtup_914__CLASS_NREP_QUASICONSTANT; struct MELT_OBJECT_STRUCT (3) dsym_915__NCONST_SVAL; struct MELT_STRING_STRUCT (11) dstr_916__NCONST_SVAL; struct MELT_OBJECT_STRUCT (4) dobj_917__NCONST_SVAL; struct MELT_STRING_STRUCT (11) dstr_918__NCONST_SVAL; struct MELT_OBJECT_STRUCT (3) dsym_919__NCONST_PROC; struct MELT_STRING_STRUCT (11) dstr_920__NCONST_PROC; struct MELT_OBJECT_STRUCT (4) dobj_921__NCONST_PROC; struct MELT_STRING_STRUCT (11) dstr_922__NCONST_PROC; struct MELT_OBJECT_STRUCT (3) dsym_923__NCONST_DATA; struct MELT_STRING_STRUCT (11) dstr_924__NCONST_DATA; struct MELT_OBJECT_STRUCT (4) dobj_925__NCONST_DATA; struct MELT_STRING_STRUCT (11) dstr_926__NCONST_DATA; struct MELT_OBJECT_STRUCT (3) dsym_927__CLASS_NREP_CONSTANT; struct MELT_STRING_STRUCT (19) dstr_928__CLASS_NREP_CONST; struct MELT_OBJECT_STRUCT (8) dobj_929__CLASS_NREP_CONSTANT; struct MELT_STRING_STRUCT (19) dstr_930__CLASS_NREP_CONST; struct MELT_MULTIPLE_STRUCT (4) dtup_931__CLASS_NREP_CONSTANT; struct MELT_MULTIPLE_STRUCT (4) dtup_932__CLASS_NREP_CONSTANT; struct MELT_OBJECT_STRUCT (3) dsym_933__CLASS_NREP_DEFINED_CONSTANT; struct MELT_STRING_STRUCT (27) dstr_934__CLASS_NREP_DEFIN; struct MELT_OBJECT_STRUCT (8) dobj_935__CLASS_NREP_DEFINED_CONSTANT; struct MELT_STRING_STRUCT (27) dstr_936__CLASS_NREP_DEFIN; struct MELT_MULTIPLE_STRUCT (4) dtup_937__CLASS_NREP_DEFINED_CONSTANT; struct MELT_MULTIPLE_STRUCT (5) dtup_938__CLASS_NREP_DEFINED_CONSTANT; struct MELT_OBJECT_STRUCT (3) dsym_939__NCONST_DEFBIND; struct MELT_STRING_STRUCT (14) dstr_940__NCONST_DEFBIND; struct MELT_OBJECT_STRUCT (4) dobj_941__NCONST_DEFBIND; struct MELT_STRING_STRUCT (14) dstr_942__NCONST_DEFBIND; struct MELT_OBJECT_STRUCT (3) dsym_943__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER; struct MELT_STRING_STRUCT (58) dstr_944__CLASS_NREP_QUASI; struct MELT_OBJECT_STRUCT (8) dobj_945__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER; struct MELT_STRING_STRUCT (58) dstr_946__CLASS_NREP_QUASI; struct MELT_MULTIPLE_STRUCT (4) dtup_947__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER; struct MELT_MULTIPLE_STRUCT (5) dtup_948__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER; struct MELT_OBJECT_STRUCT (3) dsym_949__NQCMEC_COMMENT; struct MELT_STRING_STRUCT (14) dstr_950__NQCMEC_COMMENT; struct MELT_OBJECT_STRUCT (4) dobj_951__NQCMEC_COMMENT; struct MELT_STRING_STRUCT (14) dstr_952__NQCMEC_COMMENT; struct MELT_OBJECT_STRUCT (3) dsym_953__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER; struct MELT_STRING_STRUCT (57) dstr_954__CLASS_NREP_QUASI; struct MELT_OBJECT_STRUCT (8) dobj_955__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER; struct MELT_STRING_STRUCT (57) dstr_956__CLASS_NREP_QUASI; struct MELT_MULTIPLE_STRUCT (3) dtup_957__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER; struct MELT_MULTIPLE_STRUCT (1) dtup_958__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER; struct MELT_OBJECT_STRUCT (3) dsym_959__CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT; struct MELT_STRING_STRUCT (47) dstr_960__CLASS_NREP_QUASI; struct MELT_OBJECT_STRUCT (8) dobj_961__CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT; struct MELT_STRING_STRUCT (47) dstr_962__CLASS_NREP_QUASI; struct MELT_MULTIPLE_STRUCT (4) dtup_963__CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT; struct MELT_MULTIPLE_STRUCT (4) dtup_964__CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT; struct MELT_OBJECT_STRUCT (3) dsym_965__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT; struct MELT_STRING_STRUCT (46) dstr_966__CLASS_NREP_QUASI; struct MELT_OBJECT_STRUCT (8) dobj_967__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT; struct MELT_STRING_STRUCT (46) dstr_968__CLASS_NREP_QUASI; struct MELT_MULTIPLE_STRUCT (3) dtup_969__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT; struct MELT_MULTIPLE_STRUCT (1) dtup_970__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT; struct MELT_OBJECT_STRUCT (3) dsym_971__CLASS_NREP_FIELDACC; struct MELT_STRING_STRUCT (19) dstr_972__CLASS_NREP_FIELD; struct MELT_OBJECT_STRUCT (8) dobj_973__CLASS_NREP_FIELDACC; struct MELT_STRING_STRUCT (19) dstr_974__CLASS_NREP_FIELD; struct MELT_MULTIPLE_STRUCT (3) dtup_975__CLASS_NREP_FIELDACC; struct MELT_MULTIPLE_STRUCT (3) dtup_976__CLASS_NREP_FIELDACC; struct MELT_OBJECT_STRUCT (3) dsym_977__NACCF_OBJ; struct MELT_STRING_STRUCT (9) dstr_978__NACCF_OBJ; struct MELT_OBJECT_STRUCT (4) dobj_979__NACCF_OBJ; struct MELT_STRING_STRUCT (9) dstr_980__NACCF_OBJ; struct MELT_OBJECT_STRUCT (3) dsym_981__NACCF_FLD; struct MELT_STRING_STRUCT (9) dstr_982__NACCF_FLD; struct MELT_OBJECT_STRUCT (4) dobj_983__NACCF_FLD; struct MELT_STRING_STRUCT (9) dstr_984__NACCF_FLD; struct MELT_OBJECT_STRUCT (3) dsym_985__CLASS_NREP_MULTACC; struct MELT_STRING_STRUCT (18) dstr_986__CLASS_NREP_MULTA; struct MELT_OBJECT_STRUCT (8) dobj_987__CLASS_NREP_MULTACC; struct MELT_STRING_STRUCT (18) dstr_988__CLASS_NREP_MULTA; struct MELT_MULTIPLE_STRUCT (3) dtup_989__CLASS_NREP_MULTACC; struct MELT_MULTIPLE_STRUCT (3) dtup_990__CLASS_NREP_MULTACC; struct MELT_OBJECT_STRUCT (3) dsym_991__NACCM_MUL; struct MELT_STRING_STRUCT (9) dstr_992__NACCM_MUL; struct MELT_OBJECT_STRUCT (4) dobj_993__NACCM_MUL; struct MELT_STRING_STRUCT (9) dstr_994__NACCM_MUL; struct MELT_OBJECT_STRUCT (3) dsym_995__NACCM_IX; struct MELT_STRING_STRUCT (8) dstr_996__NACCM_IX; struct MELT_OBJECT_STRUCT (4) dobj_997__NACCM_IX; struct MELT_STRING_STRUCT (8) dstr_998__NACCM_IX; struct MELT_OBJECT_STRUCT (3) dsym_999__CLASS_NREP_STORE_PREDEFINED; struct MELT_STRING_STRUCT (27) dstr_1000__CLASS_NREP_STORE; struct MELT_OBJECT_STRUCT (8) dobj_1001__CLASS_NREP_STORE_PREDEFINED; struct MELT_STRING_STRUCT (27) dstr_1002__CLASS_NREP_STORE; struct MELT_MULTIPLE_STRUCT (3) dtup_1003__CLASS_NREP_STORE_PREDEFINED; struct MELT_MULTIPLE_STRUCT (3) dtup_1004__CLASS_NREP_STORE_PREDEFINED; struct MELT_OBJECT_STRUCT (3) dsym_1005__NSTPD_PREDEF; struct MELT_STRING_STRUCT (12) dstr_1006__NSTPD_PREDEF; struct MELT_OBJECT_STRUCT (4) dobj_1007__NSTPD_PREDEF; struct MELT_STRING_STRUCT (12) dstr_1008__NSTPD_PREDEF; struct MELT_OBJECT_STRUCT (3) dsym_1009__NSTPD_VALUE; struct MELT_STRING_STRUCT (11) dstr_1010__NSTPD_VALUE; struct MELT_OBJECT_STRUCT (4) dobj_1011__NSTPD_VALUE; struct MELT_STRING_STRUCT (11) dstr_1012__NSTPD_VALUE; struct MELT_OBJECT_STRUCT (3) dsym_1013__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER; struct MELT_STRING_STRUCT (54) dstr_1014__CLASS_NREP_UPDAT; struct MELT_OBJECT_STRUCT (8) dobj_1015__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER; struct MELT_STRING_STRUCT (54) dstr_1016__CLASS_NREP_UPDAT; struct MELT_MULTIPLE_STRUCT (3) dtup_1017__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER; struct MELT_MULTIPLE_STRUCT (3) dtup_1018__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER; struct MELT_OBJECT_STRUCT (3) dsym_1019__NUCMEB_EXPR; struct MELT_STRING_STRUCT (11) dstr_1020__NUCMEB_EXPR; struct MELT_OBJECT_STRUCT (4) dobj_1021__NUCMEB_EXPR; struct MELT_STRING_STRUCT (11) dstr_1022__NUCMEB_EXPR; struct MELT_OBJECT_STRUCT (3) dsym_1023__NCUMEB_COMMENT; struct MELT_STRING_STRUCT (14) dstr_1024__NCUMEB_COMMENT; struct MELT_OBJECT_STRUCT (4) dobj_1025__NCUMEB_COMMENT; struct MELT_STRING_STRUCT (14) dstr_1026__NCUMEB_COMMENT; struct MELT_OBJECT_STRUCT (3) dsym_1027__CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER; struct MELT_STRING_STRUCT (53) dstr_1028__CLASS_NREP_CHECK; struct MELT_OBJECT_STRUCT (8) dobj_1029__CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER; struct MELT_STRING_STRUCT (53) dstr_1030__CLASS_NREP_CHECK; struct MELT_MULTIPLE_STRUCT (3) dtup_1031__CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER; struct MELT_MULTIPLE_STRUCT (2) dtup_1032__CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER; struct MELT_OBJECT_STRUCT (3) dsym_1033__NCHRUMOD_COMMENT; struct MELT_STRING_STRUCT (16) dstr_1034__NCHRUMOD_COMMENT; struct MELT_OBJECT_STRUCT (4) dobj_1035__NCHRUMOD_COMMENT; struct MELT_STRING_STRUCT (16) dstr_1036__NCHRUMOD_COMMENT; struct MELT_OBJECT_STRUCT (3) dsym_1037__HAS_EXTRA_WARNINGS; struct MELT_STRING_STRUCT (18) dstr_1038__HAS_EXTRA_WARNIN; struct MELT_OBJECT_STRUCT (5) dobj_1039__HAS_EXTRA_WARNINGS; struct MELT_MULTIPLE_STRUCT (1) dtup_1040__HAS_EXTRA_WARNINGS; struct MELT_MULTIPLE_STRUCT (0) dtup_1041__HAS_EXTRA_WARNINGS; struct MELT_STRING_STRUCT (16) dstr_1042__extra_warnings_; struct MELT_STRING_STRUCT (18) dstr_1043__HAS_EXTRA_WARNIN; struct MELT_ROUTINE_STRUCT (3) drout_1044__ADD_NCTX_DATA; struct MELT_CLOSURE_STRUCT (0) dclo_1045__ADD_NCTX_DATA; struct MELT_OBJECT_STRUCT (3) dsym_1046__CLASS_NORMALIZATION_CONTEXT; struct MELT_STRING_STRUCT (27) dstr_1047__CLASS_NORMALIZAT; struct MELT_OBJECT_STRUCT (3) dsym_1048__DISCR_INTEGER; struct MELT_STRING_STRUCT (13) dstr_1049__DISCR_INTEGER; struct MELT_ROUTINE_STRUCT (99) drout_1050__FILL_INITIAL_PREDEFMAP; struct MELT_CLOSURE_STRUCT (0) dclo_1051__FILL_INITIAL_PREDEFMAP; struct MELT_OBJECT_STRUCT (3) dsym_1052__CLASS_ALARM_HANDLER; struct MELT_STRING_STRUCT (19) dstr_1053__CLASS_ALARM_HAND; struct MELT_OBJECT_STRUCT (3) dsym_1054__CLASS_CHILD_PROCESS_HANDLER; struct MELT_STRING_STRUCT (27) dstr_1055__CLASS_CHILD_PROC; struct MELT_OBJECT_STRUCT (3) dsym_1056__CLASS_CITERATOR; struct MELT_STRING_STRUCT (15) dstr_1057__CLASS_CITERATOR; struct MELT_OBJECT_STRUCT (3) dsym_1058__CLASS_CLASS; struct MELT_STRING_STRUCT (11) dstr_1059__CLASS_CLASS; struct MELT_OBJECT_STRUCT (3) dsym_1060__CLASS_CMATCHER; struct MELT_STRING_STRUCT (14) dstr_1061__CLASS_CMATCHER; struct MELT_OBJECT_STRUCT (3) dsym_1062__CLASS_CTYPE; struct MELT_STRING_STRUCT (11) dstr_1063__CLASS_CTYPE; struct MELT_OBJECT_STRUCT (3) dsym_1064__CLASS_CTYPE_GTY; struct MELT_STRING_STRUCT (15) dstr_1065__CLASS_CTYPE_GTY; struct MELT_OBJECT_STRUCT (3) dsym_1066__CLASS_CTYPE_PLAIN; struct MELT_STRING_STRUCT (17) dstr_1067__CLASS_CTYPE_PLAI; struct MELT_OBJECT_STRUCT (3) dsym_1068__CLASS_DISCRIMINANT; struct MELT_STRING_STRUCT (18) dstr_1069__CLASS_DISCRIMINA; struct MELT_OBJECT_STRUCT (3) dsym_1070__CLASS_ENVIRONMENT; struct MELT_STRING_STRUCT (17) dstr_1071__CLASS_ENVIRONMEN; struct MELT_OBJECT_STRUCT (3) dsym_1072__CLASS_FIELD; struct MELT_STRING_STRUCT (11) dstr_1073__CLASS_FIELD; struct MELT_OBJECT_STRUCT (3) dsym_1074__CLASS_FORMAL_BINDING; struct MELT_STRING_STRUCT (20) dstr_1075__CLASS_FORMAL_BIN; struct MELT_OBJECT_STRUCT (3) dsym_1076__CLASS_FUNMATCHER; struct MELT_STRING_STRUCT (16) dstr_1077__CLASS_FUNMATCHER; struct MELT_OBJECT_STRUCT (3) dsym_1078__CLASS_GCC_GIMPLE_PASS; struct MELT_STRING_STRUCT (21) dstr_1079__CLASS_GCC_GIMPLE; struct MELT_OBJECT_STRUCT (3) dsym_1080__CLASS_GCC_PASS; struct MELT_STRING_STRUCT (14) dstr_1081__CLASS_GCC_PASS; struct MELT_OBJECT_STRUCT (3) dsym_1082__CLASS_GCC_PRAGMA; struct MELT_STRING_STRUCT (16) dstr_1083__CLASS_GCC_PRAGMA; struct MELT_OBJECT_STRUCT (3) dsym_1084__CLASS_GCC_RTL_PASS; struct MELT_STRING_STRUCT (18) dstr_1085__CLASS_GCC_RTL_PA; struct MELT_OBJECT_STRUCT (3) dsym_1086__CLASS_GCC_SIMPLE_IPA_PASS; struct MELT_STRING_STRUCT (25) dstr_1087__CLASS_GCC_SIMPLE; struct MELT_OBJECT_STRUCT (3) dsym_1088__CLASS_GCC_TRANSFORM_IPA_PASS; struct MELT_STRING_STRUCT (28) dstr_1089__CLASS_GCC_TRANSF; struct MELT_OBJECT_STRUCT (3) dsym_1090__CLASS_INPUT_CHANNEL_HANDLER; struct MELT_STRING_STRUCT (27) dstr_1091__CLASS_INPUT_CHAN; struct MELT_OBJECT_STRUCT (3) dsym_1092__CLASS_KEYWORD; struct MELT_STRING_STRUCT (13) dstr_1093__CLASS_KEYWORD; struct MELT_OBJECT_STRUCT (3) dsym_1094__CLASS_LOCATED; struct MELT_STRING_STRUCT (13) dstr_1095__CLASS_LOCATED; struct MELT_OBJECT_STRUCT (3) dsym_1096__CLASS_MELT_MODE; struct MELT_STRING_STRUCT (15) dstr_1097__CLASS_MELT_MODE; struct MELT_OBJECT_STRUCT (3) dsym_1098__CLASS_NAMED; struct MELT_STRING_STRUCT (11) dstr_1099__CLASS_NAMED; struct MELT_OBJECT_STRUCT (3) dsym_1100__CLASS_PRIMITIVE; struct MELT_STRING_STRUCT (15) dstr_1101__CLASS_PRIMITIVE; struct MELT_OBJECT_STRUCT (3) dsym_1102__CLASS_PROPED; struct MELT_STRING_STRUCT (12) dstr_1103__CLASS_PROPED; struct MELT_OBJECT_STRUCT (3) dsym_1104__CLASS_REFERENCE; struct MELT_STRING_STRUCT (15) dstr_1105__CLASS_REFERENCE; struct MELT_OBJECT_STRUCT (3) dsym_1106__CLASS_SELECTOR; struct MELT_STRING_STRUCT (14) dstr_1107__CLASS_SELECTOR; struct MELT_OBJECT_STRUCT (3) dsym_1108__CLASS_SEXPR; struct MELT_STRING_STRUCT (11) dstr_1109__CLASS_SEXPR; struct MELT_OBJECT_STRUCT (3) dsym_1110__CLASS_SEXPR_MACROSTRING; struct MELT_STRING_STRUCT (23) dstr_1111__CLASS_SEXPR_MACR; struct MELT_OBJECT_STRUCT (3) dsym_1112__CLASS_SYMBOL; struct MELT_STRING_STRUCT (12) dstr_1113__CLASS_SYMBOL; struct MELT_OBJECT_STRUCT (3) dsym_1114__CLASS_SYSTEM_DATA; struct MELT_STRING_STRUCT (17) dstr_1115__CLASS_SYSTEM_DAT; struct MELT_OBJECT_STRUCT (3) dsym_1116__CTYPE_BASIC_BLOCK; struct MELT_STRING_STRUCT (17) dstr_1117__CTYPE_BASIC_BLOC; struct MELT_OBJECT_STRUCT (3) dsym_1118__CTYPE_BITMAP; struct MELT_STRING_STRUCT (12) dstr_1119__CTYPE_BITMAP; struct MELT_OBJECT_STRUCT (3) dsym_1120__CTYPE_CSTRING; struct MELT_STRING_STRUCT (13) dstr_1121__CTYPE_CSTRING; struct MELT_OBJECT_STRUCT (3) dsym_1122__CTYPE_EDGE; struct MELT_STRING_STRUCT (10) dstr_1123__CTYPE_EDGE; struct MELT_OBJECT_STRUCT (3) dsym_1124__CTYPE_GIMPLE; struct MELT_STRING_STRUCT (12) dstr_1125__CTYPE_GIMPLE; struct MELT_OBJECT_STRUCT (3) dsym_1126__CTYPE_GIMPLE_SEQ; struct MELT_STRING_STRUCT (16) dstr_1127__CTYPE_GIMPLE_SEQ; struct MELT_OBJECT_STRUCT (3) dsym_1128__CTYPE_LONG; struct MELT_STRING_STRUCT (10) dstr_1129__CTYPE_LONG; struct MELT_OBJECT_STRUCT (3) dsym_1130__CTYPE_LOOP; struct MELT_STRING_STRUCT (10) dstr_1131__CTYPE_LOOP; struct MELT_OBJECT_STRUCT (3) dsym_1132__CTYPE_PPL_COEFFICIENT; struct MELT_STRING_STRUCT (21) dstr_1133__CTYPE_PPL_COEFFI; struct MELT_OBJECT_STRUCT (3) dsym_1134__CTYPE_PPL_CONSTRAINT; struct MELT_STRING_STRUCT (20) dstr_1135__CTYPE_PPL_CONSTR; struct MELT_OBJECT_STRUCT (3) dsym_1136__CTYPE_PPL_CONSTRAINT_SYSTEM; struct MELT_STRING_STRUCT (27) dstr_1137__CTYPE_PPL_CONSTR; struct MELT_OBJECT_STRUCT (3) dsym_1138__CTYPE_PPL_GENERATOR; struct MELT_STRING_STRUCT (19) dstr_1139__CTYPE_PPL_GENERA; struct MELT_OBJECT_STRUCT (3) dsym_1140__CTYPE_PPL_GENERATOR_SYSTEM; struct MELT_STRING_STRUCT (26) dstr_1141__CTYPE_PPL_GENERA; struct MELT_OBJECT_STRUCT (3) dsym_1142__CTYPE_PPL_LINEAR_EXPRESSION; struct MELT_STRING_STRUCT (27) dstr_1143__CTYPE_PPL_LINEAR; struct MELT_OBJECT_STRUCT (3) dsym_1144__CTYPE_PPL_POLYHEDRON; struct MELT_STRING_STRUCT (20) dstr_1145__CTYPE_PPL_POLYHE; struct MELT_OBJECT_STRUCT (3) dsym_1146__CTYPE_RTVEC; struct MELT_STRING_STRUCT (11) dstr_1147__CTYPE_RTVEC; struct MELT_OBJECT_STRUCT (3) dsym_1148__CTYPE_RTX; struct MELT_STRING_STRUCT (9) dstr_1149__CTYPE_RTX; struct MELT_OBJECT_STRUCT (3) dsym_1150__CTYPE_TREE; struct MELT_STRING_STRUCT (10) dstr_1151__CTYPE_TREE; struct MELT_OBJECT_STRUCT (3) dsym_1152__CTYPE_VALUE; struct MELT_STRING_STRUCT (11) dstr_1153__CTYPE_VALUE; struct MELT_OBJECT_STRUCT (3) dsym_1154__CTYPE_VOID; struct MELT_STRING_STRUCT (10) dstr_1155__CTYPE_VOID; struct MELT_OBJECT_STRUCT (3) dsym_1156__DISCR_ANY_RECEIVER; struct MELT_STRING_STRUCT (18) dstr_1157__DISCR_ANY_RECEIV; struct MELT_OBJECT_STRUCT (3) dsym_1158__DISCR_BASIC_BLOCK; struct MELT_STRING_STRUCT (17) dstr_1159__DISCR_BASIC_BLOC; struct MELT_OBJECT_STRUCT (3) dsym_1160__DISCR_BITMAP; struct MELT_STRING_STRUCT (12) dstr_1161__DISCR_BITMAP; struct MELT_OBJECT_STRUCT (3) dsym_1162__DISCR_BUCKET_LONGS; struct MELT_STRING_STRUCT (18) dstr_1163__DISCR_BUCKET_LON; struct MELT_OBJECT_STRUCT (3) dsym_1164__DISCR_CHARACTER_INTEGER; struct MELT_STRING_STRUCT (23) dstr_1165__DISCR_CHARACTER_; struct MELT_OBJECT_STRUCT (3) dsym_1166__DISCR_CLASS_SEQUENCE; struct MELT_STRING_STRUCT (20) dstr_1167__DISCR_CLASS_SEQU; struct MELT_OBJECT_STRUCT (3) dsym_1168__DISCR_CLOSURE; struct MELT_STRING_STRUCT (13) dstr_1169__DISCR_CLOSURE; struct MELT_OBJECT_STRUCT (3) dsym_1170__DISCR_CONSTANT_INTEGER; struct MELT_STRING_STRUCT (22) dstr_1171__DISCR_CONSTANT_I; struct MELT_OBJECT_STRUCT (3) dsym_1172__DISCR_EDGE; struct MELT_STRING_STRUCT (10) dstr_1173__DISCR_EDGE; struct MELT_OBJECT_STRUCT (3) dsym_1174__DISCR_FIELD_SEQUENCE; struct MELT_STRING_STRUCT (20) dstr_1175__DISCR_FIELD_SEQU; struct MELT_OBJECT_STRUCT (3) dsym_1176__DISCR_FILE; struct MELT_STRING_STRUCT (10) dstr_1177__DISCR_FILE; struct MELT_OBJECT_STRUCT (3) dsym_1178__DISCR_GIMPLE; struct MELT_STRING_STRUCT (12) dstr_1179__DISCR_GIMPLE; struct MELT_OBJECT_STRUCT (3) dsym_1180__DISCR_GIMPLE_SEQ; struct MELT_STRING_STRUCT (16) dstr_1181__DISCR_GIMPLE_SEQ; struct MELT_OBJECT_STRUCT (3) dsym_1182__DISCR_LIST; struct MELT_STRING_STRUCT (10) dstr_1183__DISCR_LIST; struct MELT_OBJECT_STRUCT (3) dsym_1184__DISCR_LOOP; struct MELT_STRING_STRUCT (10) dstr_1185__DISCR_LOOP; struct MELT_OBJECT_STRUCT (3) dsym_1186__DISCR_MAP_BASIC_BLOCKS; struct MELT_STRING_STRUCT (22) dstr_1187__DISCR_MAP_BASIC_; struct MELT_OBJECT_STRUCT (3) dsym_1188__DISCR_MAP_BITMAPS; struct MELT_STRING_STRUCT (17) dstr_1189__DISCR_MAP_BITMAP; struct MELT_OBJECT_STRUCT (3) dsym_1190__DISCR_MAP_EDGES; struct MELT_STRING_STRUCT (15) dstr_1191__DISCR_MAP_EDGES; struct MELT_OBJECT_STRUCT (3) dsym_1192__DISCR_MAP_GIMPLES; struct MELT_STRING_STRUCT (17) dstr_1193__DISCR_MAP_GIMPLE; struct MELT_OBJECT_STRUCT (3) dsym_1194__DISCR_MAP_GIMPLE_SEQS; struct MELT_STRING_STRUCT (21) dstr_1195__DISCR_MAP_GIMPLE; struct MELT_OBJECT_STRUCT (3) dsym_1196__DISCR_MAP_LOOPS; struct MELT_STRING_STRUCT (15) dstr_1197__DISCR_MAP_LOOPS; struct MELT_OBJECT_STRUCT (3) dsym_1198__DISCR_MAP_OBJECTS; struct MELT_STRING_STRUCT (17) dstr_1199__DISCR_MAP_OBJECT; struct MELT_OBJECT_STRUCT (3) dsym_1200__DISCR_MAP_RTVECS; struct MELT_STRING_STRUCT (16) dstr_1201__DISCR_MAP_RTVECS; struct MELT_OBJECT_STRUCT (3) dsym_1202__DISCR_MAP_RTXS; struct MELT_STRING_STRUCT (14) dstr_1203__DISCR_MAP_RTXS; struct MELT_OBJECT_STRUCT (3) dsym_1204__DISCR_MAP_STRINGS; struct MELT_STRING_STRUCT (17) dstr_1205__DISCR_MAP_STRING; struct MELT_OBJECT_STRUCT (3) dsym_1206__DISCR_MAP_TREES; struct MELT_STRING_STRUCT (15) dstr_1207__DISCR_MAP_TREES; struct MELT_OBJECT_STRUCT (3) dsym_1208__DISCR_METHOD_MAP; struct MELT_STRING_STRUCT (16) dstr_1209__DISCR_METHOD_MAP; struct MELT_OBJECT_STRUCT (3) dsym_1210__DISCR_MIXED_BIGINT; struct MELT_STRING_STRUCT (18) dstr_1211__DISCR_MIXED_BIGI; struct MELT_OBJECT_STRUCT (3) dsym_1212__DISCR_MIXED_INTEGER; struct MELT_STRING_STRUCT (19) dstr_1213__DISCR_MIXED_INTE; struct MELT_OBJECT_STRUCT (3) dsym_1214__DISCR_MIXED_LOCATION; struct MELT_STRING_STRUCT (20) dstr_1215__DISCR_MIXED_LOCA; struct MELT_OBJECT_STRUCT (3) dsym_1216__DISCR_MULTIPLE; struct MELT_STRING_STRUCT (14) dstr_1217__DISCR_MULTIPLE; struct MELT_OBJECT_STRUCT (3) dsym_1218__DISCR_NAME_STRING; struct MELT_STRING_STRUCT (17) dstr_1219__DISCR_NAME_STRIN; struct MELT_OBJECT_STRUCT (3) dsym_1220__DISCR_NULL_RECEIVER; struct MELT_STRING_STRUCT (19) dstr_1221__DISCR_NULL_RECEI; struct MELT_OBJECT_STRUCT (3) dsym_1222__DISCR_PAIR; struct MELT_STRING_STRUCT (10) dstr_1223__DISCR_PAIR; struct MELT_OBJECT_STRUCT (3) dsym_1224__DISCR_RAWFILE; struct MELT_STRING_STRUCT (13) dstr_1225__DISCR_RAWFILE; struct MELT_OBJECT_STRUCT (3) dsym_1226__DISCR_REAL; struct MELT_STRING_STRUCT (10) dstr_1227__DISCR_REAL; struct MELT_OBJECT_STRUCT (3) dsym_1228__DISCR_ROUTINE; struct MELT_STRING_STRUCT (13) dstr_1229__DISCR_ROUTINE; struct MELT_OBJECT_STRUCT (3) dsym_1230__DISCR_RTVEC; struct MELT_STRING_STRUCT (11) dstr_1231__DISCR_RTVEC; struct MELT_OBJECT_STRUCT (3) dsym_1232__DISCR_RTX; struct MELT_STRING_STRUCT (9) dstr_1233__DISCR_RTX; struct MELT_OBJECT_STRUCT (3) dsym_1234__DISCR_STRBUF; struct MELT_STRING_STRUCT (12) dstr_1235__DISCR_STRBUF; struct MELT_OBJECT_STRUCT (3) dsym_1236__DISCR_STRING; struct MELT_STRING_STRUCT (12) dstr_1237__DISCR_STRING; struct MELT_OBJECT_STRUCT (3) dsym_1238__DISCR_TREE; struct MELT_STRING_STRUCT (10) dstr_1239__DISCR_TREE; struct MELT_OBJECT_STRUCT (3) dsym_1240__DISCR_VERBATIM_STRING; struct MELT_STRING_STRUCT (21) dstr_1241__DISCR_VERBATIM_S; struct MELT_OBJECT_STRUCT (3) dsym_1242__INITIAL_SYSTEM_DATA; struct MELT_STRING_STRUCT (19) dstr_1243__INITIAL_SYSTEM_D; struct MELT_OBJECT_STRUCT (3) dsym_1244__TRUE; struct MELT_STRING_STRUCT (4) dstr_1245__TRUE; struct MELT_OBJECT_STRUCT (3) dsym_1246__LAST_GLOBPREDEF_INDEX; struct MELT_STRING_STRUCT (21) dstr_1247__LAST_GLOBPREDEF_; struct MELT_OBJECT_STRUCT (5) dobj_1248__LAST_GLOBPREDEF_INDEX; struct MELT_MULTIPLE_STRUCT (1) dtup_1249__LAST_GLOBPREDEF_INDEX; struct MELT_MULTIPLE_STRUCT (0) dtup_1250__LAST_GLOBPREDEF_INDEX; struct MELT_STRING_STRUCT (15) dstr_1251__BGLOB_LASTGLOB; struct MELT_STRING_STRUCT (21) dstr_1252__LAST_GLOBPREDEF_; struct MELT_OBJECT_STRUCT (3) dsym_1253__CLASS_LITERAL_VALUE; struct MELT_STRING_STRUCT (19) dstr_1254__CLASS_LITERAL_VA; struct MELT_OBJECT_STRUCT (8) dobj_1255__CLASS_LITERAL_VALUE; struct MELT_STRING_STRUCT (19) dstr_1256__CLASS_LITERAL_VA; struct MELT_MULTIPLE_STRUCT (2) dtup_1257__CLASS_LITERAL_VALUE; struct MELT_MULTIPLE_STRUCT (4) dtup_1258__CLASS_LITERAL_VALUE; struct MELT_OBJECT_STRUCT (3) dsym_1259__LITV_VALUE; struct MELT_STRING_STRUCT (10) dstr_1260__LITV_VALUE; struct MELT_OBJECT_STRUCT (4) dobj_1261__LITV_VALUE; struct MELT_STRING_STRUCT (10) dstr_1262__LITV_VALUE; struct MELT_OBJECT_STRUCT (3) dsym_1263__LITV_RANK; struct MELT_STRING_STRUCT (9) dstr_1264__LITV_RANK; struct MELT_OBJECT_STRUCT (4) dobj_1265__LITV_RANK; struct MELT_STRING_STRUCT (9) dstr_1266__LITV_RANK; struct MELT_OBJECT_STRUCT (3) dsym_1267__LITV_LOC; struct MELT_STRING_STRUCT (8) dstr_1268__LITV_LOC; struct MELT_OBJECT_STRUCT (4) dobj_1269__LITV_LOC; struct MELT_STRING_STRUCT (8) dstr_1270__LITV_LOC; struct MELT_ROUTINE_STRUCT (4) drout_1271__REGISTER_LITERAL_VALUE; struct MELT_CLOSURE_STRUCT (0) dclo_1272__REGISTER_LITERAL_VALUE; struct MELT_OBJECT_STRUCT (3) dsym_1273__MELT_DEBUG_FUN; struct MELT_STRING_STRUCT (14) dstr_1274__MELT_DEBUG_FUN; struct MELT_OBJECT_STRUCT (3) dsym_1275__CLASS_RUNNING_EXTENSION_MODULE_CONTEXT; struct MELT_STRING_STRUCT (38) dstr_1276__CLASS_RUNNING_EX; struct MELT_ROUTINE_STRUCT (11) drout_1277__CREATE_NORMCONTEXT; struct MELT_CLOSURE_STRUCT (0) dclo_1278__CREATE_NORMCONTEXT; struct MELT_OBJECT_STRUCT (3) dsym_1279__CLASS_MODULE_CONTEXT; struct MELT_STRING_STRUCT (20) dstr_1280__CLASS_MODULE_CON; struct MELT_ROUTINE_STRUCT (12) drout_1281__CREATE_NORMAL_EXTENDING_CONTEXT; struct MELT_CLOSURE_STRUCT (0) dclo_1282__CREATE_NORMAL_EXTENDING_CONTEXT; struct MELT_OBJECT_STRUCT (3) dsym_1283__NORMAL_EXP; struct MELT_STRING_STRUCT (10) dstr_1284__NORMAL_EXP; struct MELT_OBJECT_STRUCT (3) dsym_1285__RECV; struct MELT_STRING_STRUCT (4) dstr_1286__RECV; struct MELT_OBJECT_STRUCT (2) dobj_1287; struct MELT_OBJECT_STRUCT (3) dsym_1288__ENV; struct MELT_STRING_STRUCT (3) dstr_1289__ENV; struct MELT_OBJECT_STRUCT (2) dobj_1290; struct MELT_OBJECT_STRUCT (3) dsym_1291__NCX; struct MELT_STRING_STRUCT (3) dstr_1292__NCX; struct MELT_OBJECT_STRUCT (2) dobj_1293; struct MELT_OBJECT_STRUCT (3) dsym_1294__PSLOC; struct MELT_STRING_STRUCT (5) dstr_1295__PSLOC; struct MELT_OBJECT_STRUCT (2) dobj_1296; struct MELT_MULTIPLE_STRUCT (4) dtup_1297__NORMAL_EXP; struct MELT_OBJECT_STRUCT (4) dobj_1298__NORMAL_EXP; struct MELT_STRING_STRUCT (10) dstr_1299__NORMAL_EXP; struct MELT_ROUTINE_STRUCT (3) drout_1300__NORMEXP_IDENTICAL; struct MELT_CLOSURE_STRUCT (0) dclo_1301__NORMEXP_IDENTICAL; struct MELT_OBJECT_STRUCT (3) dsym_1302__INSTALL_METHOD; struct MELT_STRING_STRUCT (14) dstr_1303__INSTALL_METHOD; struct MELT_ROUTINE_STRUCT (4) drout_1304__NORMEXP_NULL; struct MELT_CLOSURE_STRUCT (0) dclo_1305__NORMEXP_NULL; struct MELT_ROUTINE_STRUCT (3) drout_1306__NORMEXP_ANY_OBJECT; struct MELT_CLOSURE_STRUCT (0) dclo_1307__NORMEXP_ANY_OBJECT; struct MELT_ROUTINE_STRUCT (3) drout_1308__NORMEXP_ANY_VALUE; struct MELT_CLOSURE_STRUCT (0) dclo_1309__NORMEXP_ANY_VALUE; struct MELT_ROUTINE_STRUCT (3) drout_1310__NORMEXP_SRC_CATCHALL; struct MELT_CLOSURE_STRUCT (0) dclo_1311__NORMEXP_SRC_CATCHALL; struct MELT_OBJECT_STRUCT (3) dsym_1312__CLASS_SOURCE; struct MELT_STRING_STRUCT (12) dstr_1313__CLASS_SOURCE; struct MELT_ROUTINE_STRUCT (8) drout_1314__NORMEXP_LAZYMACROEXP; struct MELT_CLOSURE_STRUCT (0) dclo_1315__NORMEXP_LAZYMACROEXP; struct MELT_OBJECT_STRUCT (3) dsym_1316__CLASS_SOURCE_LAZY_MACRO_EXPANSION; struct MELT_STRING_STRUCT (33) dstr_1317__CLASS_SOURCE_LAZ; struct MELT_OBJECT_STRUCT (3) dsym_1318__GET_CTYPE; struct MELT_STRING_STRUCT (9) dstr_1319__GET_CTYPE; struct MELT_OBJECT_STRUCT (4) dobj_1320__GET_CTYPE; struct MELT_STRING_STRUCT (9) dstr_1321__GET_CTYPE; struct MELT_OBJECT_STRUCT (3) dsym_1322__COMPILE_OBJ; struct MELT_STRING_STRUCT (11) dstr_1323__COMPILE_OBJ; struct MELT_OBJECT_STRUCT (4) dobj_1324__COMPILE_OBJ; struct MELT_STRING_STRUCT (11) dstr_1325__COMPILE_OBJ; struct MELT_ROUTINE_STRUCT (1) drout_1326__GECTYP_ANYRECV; struct MELT_CLOSURE_STRUCT (0) dclo_1327__GECTYP_ANYRECV; struct MELT_ROUTINE_STRUCT (1) drout_1328__GECTYP_ROOT; struct MELT_CLOSURE_STRUCT (0) dclo_1329__GECTYP_ROOT; struct MELT_ROUTINE_STRUCT (2) drout_1330__GECTYP_INTEGER; struct MELT_CLOSURE_STRUCT (0) dclo_1331__GECTYP_INTEGER; struct MELT_ROUTINE_STRUCT (1) drout_1332__GECTYP_STRING; struct MELT_CLOSURE_STRUCT (0) dclo_1333__GECTYP_STRING; struct MELT_ROUTINE_STRUCT (11) drout_1334__NORMALIZE_TUPLE; struct MELT_CLOSURE_STRUCT (0) dclo_1335__NORMALIZE_TUPLE; struct MELT_OBJECT_STRUCT (3) dsym_1336__MULTIPLE_MAP; struct MELT_STRING_STRUCT (12) dstr_1337__MULTIPLE_MAP; struct MELT_ROUTINE_STRUCT (6) drout_1338__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_1339__LIST_EVERY; struct MELT_STRING_STRUCT (10) dstr_1340__LIST_EVERY; struct MELT_ROUTINE_STRUCT (1) drout_1341__LAMBDA_; struct MELT_ROUTINE_STRUCT (6) drout_1342__WRAP_NORMAL_LET1; struct MELT_CLOSURE_STRUCT (0) dclo_1343__WRAP_NORMAL_LET1; struct MELT_ROUTINE_STRUCT (2) drout_1344__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_1345__CLASS_NORMAL_LET_BINDING; struct MELT_STRING_STRUCT (24) dstr_1346__CLASS_NORMAL_LET; struct MELT_OBJECT_STRUCT (3) dsym_1347__LIST_TO_MULTIPLE; struct MELT_STRING_STRUCT (16) dstr_1348__LIST_TO_MULTIPLE; struct MELT_ROUTINE_STRUCT (11) drout_1349__WRAP_NORMAL_LETSEQ; struct MELT_CLOSURE_STRUCT (0) dclo_1350__WRAP_NORMAL_LETSEQ; struct MELT_ROUTINE_STRUCT (2) drout_1351__LAMBDA_; struct MELT_ROUTINE_STRUCT (4) drout_1352__CHECK_CTYPE_NARGS; struct MELT_CLOSURE_STRUCT (0) dclo_1353__CHECK_CTYPE_NARGS; struct MELT_OBJECT_STRUCT (3) dsym_1354__MULTIPLE_EVERY; struct MELT_STRING_STRUCT (14) dstr_1355__MULTIPLE_EVERY; struct MELT_ROUTINE_STRUCT (2) drout_1356__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_1357__NORMALIZE_BINDING; struct MELT_STRING_STRUCT (17) dstr_1358__NORMALIZE_BINDIN; struct MELT_OBJECT_STRUCT (2) dobj_1359; struct MELT_OBJECT_STRUCT (2) dobj_1360; struct MELT_OBJECT_STRUCT (2) dobj_1361; struct MELT_OBJECT_STRUCT (3) dsym_1362__PROCS; struct MELT_STRING_STRUCT (5) dstr_1363__PROCS; struct MELT_OBJECT_STRUCT (2) dobj_1364; struct MELT_OBJECT_STRUCT (2) dobj_1365; struct MELT_MULTIPLE_STRUCT (5) dtup_1366__NORMALIZE_BINDING; struct MELT_OBJECT_STRUCT (4) dobj_1367__NORMALIZE_BINDING; struct MELT_STRING_STRUCT (17) dstr_1368__NORMALIZE_BINDIN; struct MELT_ROUTINE_STRUCT (2) drout_1369__NORMBIND_FAILANY; struct MELT_CLOSURE_STRUCT (0) dclo_1370__NORMBIND_FAILANY; struct MELT_ROUTINE_STRUCT (6) drout_1371__NORMBIND_ANYBIND; struct MELT_CLOSURE_STRUCT (0) dclo_1372__NORMBIND_ANYBIND; struct MELT_ROUTINE_STRUCT (5) drout_1373__NORMBIND_FORMALBIND; struct MELT_CLOSURE_STRUCT (0) dclo_1374__NORMBIND_FORMALBIND; struct MELT_ROUTINE_STRUCT (5) drout_1375__NORMBIND_LETBIND; struct MELT_CLOSURE_STRUCT (0) dclo_1376__NORMBIND_LETBIND; struct MELT_OBJECT_STRUCT (3) dsym_1377__CLASS_LET_BINDING; struct MELT_STRING_STRUCT (17) dstr_1378__CLASS_LET_BINDIN; struct MELT_ROUTINE_STRUCT (5) drout_1379__NORMBIND_FIXBIND; struct MELT_CLOSURE_STRUCT (0) dclo_1380__NORMBIND_FIXBIND; struct MELT_OBJECT_STRUCT (3) dsym_1381__CLASS_FIXED_BINDING; struct MELT_STRING_STRUCT (19) dstr_1382__CLASS_FIXED_BIND; struct MELT_ROUTINE_STRUCT (6) drout_1383__NORMBIND_DEFINEDVALBIND; struct MELT_CLOSURE_STRUCT (0) dclo_1384__NORMBIND_DEFINEDVALBIND; struct MELT_OBJECT_STRUCT (3) dsym_1385__CLASS_DEFINED_VALUE_BINDING; struct MELT_STRING_STRUCT (27) dstr_1386__CLASS_DEFINED_VA; struct MELT_ROUTINE_STRUCT (7) drout_1387__NORMBIND_CONSTRUCTBIND; struct MELT_CLOSURE_STRUCT (0) dclo_1388__NORMBIND_CONSTRUCTBIND; struct MELT_ROUTINE_STRUCT (33) drout_1389__NORMEXP_SYMBOL; struct MELT_CLOSURE_STRUCT (0) dclo_1390__NORMEXP_SYMBOL; struct MELT_OBJECT_STRUCT (3) dsym_1391__FIND_ENCLOSING_ENV; struct MELT_STRING_STRUCT (18) dstr_1392__FIND_ENCLOSING_E; struct MELT_OBJECT_STRUCT (3) dsym_1393__CLASS_VALUE_BINDING; struct MELT_STRING_STRUCT (19) dstr_1394__CLASS_VALUE_BIND; struct MELT_ROUTINE_STRUCT (5) drout_1395__LAMBDA_; struct MELT_ROUTINE_STRUCT (1) drout_1396__LAMBDA_; struct MELT_ROUTINE_STRUCT (5) drout_1397__LAMBDA_; struct MELT_ROUTINE_STRUCT (1) drout_1398__LAMBDA_; struct MELT_ROUTINE_STRUCT (5) drout_1399__LAMBDA_; struct MELT_ROUTINE_STRUCT (1) drout_1400__LAMBDA_; struct MELT_ROUTINE_STRUCT (1) drout_1401__GECTYP_SYMOCC; struct MELT_CLOSURE_STRUCT (0) dclo_1402__GECTYP_SYMOCC; struct MELT_ROUTINE_STRUCT (11) drout_1403__NORMEXP_CLASS; struct MELT_CLOSURE_STRUCT (0) dclo_1404__NORMEXP_CLASS; struct MELT_OBJECT_STRUCT (3) dsym_1405__FIND_ENV; struct MELT_STRING_STRUCT (8) dstr_1406__FIND_ENV; struct MELT_OBJECT_STRUCT (3) dsym_1407__CLASS_CLASS_BINDING; struct MELT_STRING_STRUCT (19) dstr_1408__CLASS_CLASS_BIND; struct MELT_ROUTINE_STRUCT (25) drout_1409__NORMEXP_PRIMITIVE; struct MELT_CLOSURE_STRUCT (0) dclo_1410__NORMEXP_PRIMITIVE; struct MELT_OBJECT_STRUCT (3) dsym_1411__CLASS_SOURCE_PRIMITIVE; struct MELT_STRING_STRUCT (22) dstr_1412__CLASS_SOURCE_PRI; struct MELT_ROUTINE_STRUCT (4) drout_1413__LAMBDA_; struct MELT_ROUTINE_STRUCT (3) drout_1414__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_1415__CLONE_SYMBOL; struct MELT_STRING_STRUCT (12) dstr_1416__CLONE_SYMBOL; struct MELT_ROUTINE_STRUCT (17) drout_1417__NORMEXP_CODE_CHUNK; struct MELT_CLOSURE_STRUCT (0) dclo_1418__NORMEXP_CODE_CHUNK; struct MELT_OBJECT_STRUCT (3) dsym_1419__CLASS_SOURCE_CODECHUNK; struct MELT_STRING_STRUCT (22) dstr_1420__CLASS_SOURCE_COD; struct MELT_OBJECT_STRUCT (3) dsym_1421__CLASS_CLONED_SYMBOL; struct MELT_STRING_STRUCT (19) dstr_1422__CLASS_CLONED_SYM; struct MELT_ROUTINE_STRUCT (2) drout_1423__LAMBDA_; struct MELT_ROUTINE_STRUCT (25) drout_1424__NORMEXP_CMATCHEXPR; struct MELT_CLOSURE_STRUCT (0) dclo_1425__NORMEXP_CMATCHEXPR; struct MELT_OBJECT_STRUCT (3) dsym_1426__CLASS_SOURCE_CMATCHEXPR; struct MELT_STRING_STRUCT (23) dstr_1427__CLASS_SOURCE_CMA; struct MELT_ROUTINE_STRUCT (4) drout_1428__LAMBDA_; struct MELT_ROUTINE_STRUCT (3) drout_1429__LAMBDA_; struct MELT_ROUTINE_STRUCT (19) drout_1430__NORMEXP_FUNMATCHEXPR; struct MELT_CLOSURE_STRUCT (0) dclo_1431__NORMEXP_FUNMATCHEXPR; struct MELT_OBJECT_STRUCT (3) dsym_1432__CLASS_SOURCE_FUNMATCHEXPR; struct MELT_STRING_STRUCT (25) dstr_1433__CLASS_SOURCE_FUN; struct MELT_OBJECT_STRUCT (3) dsym_1434__FMATCH_APPLYF; struct MELT_STRING_STRUCT (13) dstr_1435__FMATCH_APPLYF; struct MELT_OBJECT_STRUCT (3) dsym_1436__LIST_APPEND2LIST; struct MELT_STRING_STRUCT (16) dstr_1437__LIST_APPEND2LIST; struct MELT_ROUTINE_STRUCT (20) drout_1438__NORMEXP_APPLY; struct MELT_CLOSURE_STRUCT (0) dclo_1439__NORMEXP_APPLY; struct MELT_OBJECT_STRUCT (3) dsym_1440__CLASS_SOURCE_APPLY; struct MELT_STRING_STRUCT (18) dstr_1441__CLASS_SOURCE_APP; struct MELT_OBJECT_STRUCT (3) dsym_1442__FUN_; struct MELT_STRING_STRUCT (5) dstr_1443__FUN_; struct MELT_ROUTINE_STRUCT (27) drout_1444__NORMEXP_MSEND; struct MELT_CLOSURE_STRUCT (0) dclo_1445__NORMEXP_MSEND; struct MELT_OBJECT_STRUCT (3) dsym_1446__CLASS_SOURCE_MSEND; struct MELT_STRING_STRUCT (18) dstr_1447__CLASS_SOURCE_MSE; struct MELT_OBJECT_STRUCT (3) dsym_1448__CLASS_SELECTOR_BINDING; struct MELT_STRING_STRUCT (22) dstr_1449__CLASS_SELECTOR_B; struct MELT_OBJECT_STRUCT (3) dsym_1450__CLASS_SOURCE_DEFSELECTOR; struct MELT_STRING_STRUCT (24) dstr_1451__CLASS_SOURCE_DEF; struct MELT_ROUTINE_STRUCT (19) drout_1452__NORMEXP_RETURN; struct MELT_CLOSURE_STRUCT (0) dclo_1453__NORMEXP_RETURN; struct MELT_OBJECT_STRUCT (3) dsym_1454__CLASS_SOURCE_RETURN; struct MELT_STRING_STRUCT (19) dstr_1455__CLASS_SOURCE_RET; struct MELT_OBJECT_STRUCT (3) dsym_1456__RETURN_; struct MELT_STRING_STRUCT (7) dstr_1457__RETURN_; struct MELT_OBJECT_STRUCT (3) dsym_1458__RETINT_; struct MELT_STRING_STRUCT (8) dstr_1459__RETINT_; struct MELT_ROUTINE_STRUCT (20) drout_1460__NORMEXP_IF; struct MELT_CLOSURE_STRUCT (0) dclo_1461__NORMEXP_IF; struct MELT_OBJECT_STRUCT (3) dsym_1462__CLASS_SOURCE_IF; struct MELT_STRING_STRUCT (15) dstr_1463__CLASS_SOURCE_IF; struct MELT_OBJECT_STRUCT (3) dsym_1464__IF_INTER_; struct MELT_STRING_STRUCT (10) dstr_1465__IF_INTER_; struct MELT_OBJECT_STRUCT (3) dsym_1466__FRESH_ENV; struct MELT_STRING_STRUCT (9) dstr_1467__FRESH_ENV; struct MELT_ROUTINE_STRUCT (1) drout_1468__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_1469__PUT_ENV; struct MELT_STRING_STRUCT (7) dstr_1470__PUT_ENV; struct MELT_OBJECT_STRUCT (3) dsym_1471__IF_; struct MELT_STRING_STRUCT (4) dstr_1472__IF_; struct MELT_ROUTINE_STRUCT (23) drout_1473__NORMEXP_IFELSE; struct MELT_CLOSURE_STRUCT (0) dclo_1474__NORMEXP_IFELSE; struct MELT_OBJECT_STRUCT (3) dsym_1475__CLASS_SOURCE_IFELSE; struct MELT_STRING_STRUCT (19) dstr_1476__CLASS_SOURCE_IFE; struct MELT_OBJECT_STRUCT (3) dsym_1477__IFELSE_INTER_; struct MELT_STRING_STRUCT (14) dstr_1478__IFELSE_INTER_; struct MELT_ROUTINE_STRUCT (1) drout_1479__LAMBDA_; struct MELT_ROUTINE_STRUCT (1) drout_1480__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_1481__IFELSE_; struct MELT_STRING_STRUCT (8) dstr_1482__IFELSE_; struct MELT_ROUTINE_STRUCT (21) drout_1483__NORMEXP_CPPIF; struct MELT_CLOSURE_STRUCT (0) dclo_1484__NORMEXP_CPPIF; struct MELT_OBJECT_STRUCT (3) dsym_1485__CLASS_SOURCE_CPPIF; struct MELT_STRING_STRUCT (18) dstr_1486__CLASS_SOURCE_CPP; struct MELT_ROUTINE_STRUCT (1) drout_1487__LAMBDA_; struct MELT_ROUTINE_STRUCT (1) drout_1488__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_1489__IFCPP_; struct MELT_STRING_STRUCT (6) dstr_1490__IFCPP_; struct MELT_ROUTINE_STRUCT (25) drout_1491__NORMEXP_OR; struct MELT_CLOSURE_STRUCT (0) dclo_1492__NORMEXP_OR; struct MELT_OBJECT_STRUCT (3) dsym_1493__CLASS_SOURCE_OR; struct MELT_STRING_STRUCT (15) dstr_1494__CLASS_SOURCE_OR; struct MELT_OBJECT_STRUCT (3) dsym_1495__MULTIPLE_BACKWARD_EVERY; struct MELT_STRING_STRUCT (23) dstr_1496__MULTIPLE_BACKWAR; struct MELT_ROUTINE_STRUCT (16) drout_1497__LAMBDA_; struct MELT_ROUTINE_STRUCT (1) drout_1498__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_1499__OR_; struct MELT_STRING_STRUCT (3) dstr_1500__OR_; struct MELT_ROUTINE_STRUCT (15) drout_1501__NORMEXP_PROGN; struct MELT_CLOSURE_STRUCT (0) dclo_1502__NORMEXP_PROGN; struct MELT_OBJECT_STRUCT (3) dsym_1503__CLASS_SOURCE_PROGN; struct MELT_STRING_STRUCT (18) dstr_1504__CLASS_SOURCE_PRO; struct MELT_OBJECT_STRUCT (3) dsym_1505__PROGN_; struct MELT_STRING_STRUCT (6) dstr_1506__PROGN_; struct MELT_ROUTINE_STRUCT (1) drout_1507__LAMBDA_; struct MELT_ROUTINE_STRUCT (30) drout_1508__NORMEXP_LET; struct MELT_CLOSURE_STRUCT (0) dclo_1509__NORMEXP_LET; struct MELT_OBJECT_STRUCT (3) dsym_1510__CLASS_SOURCE_LET; struct MELT_STRING_STRUCT (16) dstr_1511__CLASS_SOURCE_LET; struct MELT_ROUTINE_STRUCT (12) drout_1512__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_1513__CLASS_SOURCE_LET_BINDING; struct MELT_STRING_STRUCT (24) dstr_1514__CLASS_SOURCE_LET; struct MELT_ROUTINE_STRUCT (0) drout_1515__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_1516__LET_; struct MELT_STRING_STRUCT (4) dstr_1517__LET_; struct MELT_ROUTINE_STRUCT (2) drout_1518__LAMBDA_; struct MELT_ROUTINE_STRUCT (12) drout_1519__NORMEXP_UNSAFE_GET_FIELD; struct MELT_CLOSURE_STRUCT (0) dclo_1520__NORMEXP_UNSAFE_GET_FIELD; struct MELT_OBJECT_STRUCT (3) dsym_1521__CLASS_SOURCE_UNSAFE_GET_FIELD; struct MELT_STRING_STRUCT (29) dstr_1522__CLASS_SOURCE_UNS; struct MELT_ROUTINE_STRUCT (13) drout_1523__NORMEXP_GET_FIELD; struct MELT_CLOSURE_STRUCT (0) dclo_1524__NORMEXP_GET_FIELD; struct MELT_OBJECT_STRUCT (3) dsym_1525__CLASS_SOURCE_GET_FIELD; struct MELT_STRING_STRUCT (22) dstr_1526__CLASS_SOURCE_GET; struct MELT_ROUTINE_STRUCT (26) drout_1527__NORMEXP_UNSAFE_PUT_FIELDS; struct MELT_CLOSURE_STRUCT (0) dclo_1528__NORMEXP_UNSAFE_PUT_FIELDS; struct MELT_OBJECT_STRUCT (3) dsym_1529__CLASS_SOURCE_UNSAFE_PUT_FIELDS; struct MELT_STRING_STRUCT (30) dstr_1530__CLASS_SOURCE_UNS; struct MELT_OBJECT_STRUCT (3) dsym_1531__UNSAFPUT_; struct MELT_STRING_STRUCT (9) dstr_1532__UNSAFPUT_; struct MELT_OBJECT_STRUCT (3) dsym_1533__UNSAFPUT_INTER_; struct MELT_STRING_STRUCT (15) dstr_1534__UNSAFPUT_INTER_; struct MELT_ROUTINE_STRUCT (9) drout_1535__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_1536__CLASS_SOURCE_FIELDASSIGN; struct MELT_STRING_STRUCT (24) dstr_1537__CLASS_SOURCE_FIE; struct MELT_ROUTINE_STRUCT (1) drout_1538__LAMBDA_; struct MELT_ROUTINE_STRUCT (23) drout_1539__NORMEXP_PUT_FIELDS; struct MELT_CLOSURE_STRUCT (0) dclo_1540__NORMEXP_PUT_FIELDS; struct MELT_OBJECT_STRUCT (3) dsym_1541__CLASS_SOURCE_PUT_FIELDS; struct MELT_STRING_STRUCT (23) dstr_1542__CLASS_SOURCE_PUT; struct MELT_OBJECT_STRUCT (3) dsym_1543__PUTFLD_; struct MELT_STRING_STRUCT (7) dstr_1544__PUTFLD_; struct MELT_OBJECT_STRUCT (3) dsym_1545__PUTFLD_INTER_; struct MELT_STRING_STRUCT (13) dstr_1546__PUTFLD_INTER_; struct MELT_ROUTINE_STRUCT (15) drout_1547__NORMEXP_SETQ; struct MELT_CLOSURE_STRUCT (0) dclo_1548__NORMEXP_SETQ; struct MELT_OBJECT_STRUCT (3) dsym_1549__CLASS_SOURCE_SETQ; struct MELT_STRING_STRUCT (17) dstr_1550__CLASS_SOURCE_SET; struct MELT_OBJECT_STRUCT (3) dsym_1551__SETQ_; struct MELT_STRING_STRUCT (5) dstr_1552__SETQ_; struct MELT_ROUTINE_STRUCT (1) drout_1553__LAMBDA_; struct MELT_ROUTINE_STRUCT (30) drout_1554__NORMEXP_INSTANCE; struct MELT_CLOSURE_STRUCT (0) dclo_1555__NORMEXP_INSTANCE; struct MELT_OBJECT_STRUCT (3) dsym_1556__CLASS_SOURCE_INSTANCE; struct MELT_STRING_STRUCT (21) dstr_1557__CLASS_SOURCE_INS; struct MELT_OBJECT_STRUCT (3) dsym_1558__INSTANCE_INTER_; struct MELT_STRING_STRUCT (15) dstr_1559__INSTANCE_INTER_; struct MELT_ROUTINE_STRUCT (9) drout_1560__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_1561__INST_; struct MELT_STRING_STRUCT (5) dstr_1562__INST_; struct MELT_ROUTINE_STRUCT (1) drout_1563__LAMBDA_; struct MELT_ROUTINE_STRUCT (21) drout_1564__NORMEXP_FOREVER; struct MELT_CLOSURE_STRUCT (0) dclo_1565__NORMEXP_FOREVER; struct MELT_OBJECT_STRUCT (3) dsym_1566__CLASS_SOURCE_FOREVER; struct MELT_STRING_STRUCT (20) dstr_1567__CLASS_SOURCE_FOR; struct MELT_OBJECT_STRUCT (3) dsym_1568__CLASS_LABEL_BINDING; struct MELT_STRING_STRUCT (19) dstr_1569__CLASS_LABEL_BIND; struct MELT_OBJECT_STRUCT (3) dsym_1570__FOREVER_INTER_; struct MELT_STRING_STRUCT (14) dstr_1571__FOREVER_INTER_; struct MELT_OBJECT_STRUCT (3) dsym_1572__LABIND_CLONSY; struct MELT_STRING_STRUCT (13) dstr_1573__LABIND_CLONSY; struct MELT_OBJECT_STRUCT (3) dsym_1574__FOREVER_; struct MELT_STRING_STRUCT (8) dstr_1575__FOREVER_; struct MELT_ROUTINE_STRUCT (15) drout_1576__NORMEXP_EXIT; struct MELT_CLOSURE_STRUCT (0) dclo_1577__NORMEXP_EXIT; struct MELT_OBJECT_STRUCT (3) dsym_1578__CLASS_SOURCE_EXIT; struct MELT_STRING_STRUCT (17) dstr_1579__CLASS_SOURCE_EXI; struct MELT_OBJECT_STRUCT (3) dsym_1580__EXIT_; struct MELT_STRING_STRUCT (5) dstr_1581__EXIT_; struct MELT_ROUTINE_STRUCT (11) drout_1582__NORMEXP_AGAIN; struct MELT_CLOSURE_STRUCT (0) dclo_1583__NORMEXP_AGAIN; struct MELT_OBJECT_STRUCT (3) dsym_1584__CLASS_SOURCE_AGAIN; struct MELT_STRING_STRUCT (18) dstr_1585__CLASS_SOURCE_AGA; struct MELT_OBJECT_STRUCT (3) dsym_1586__AGAIN_; struct MELT_STRING_STRUCT (6) dstr_1587__AGAIN_; struct MELT_ROUTINE_STRUCT (26) drout_1588__NORMEXP_IFVARIADIC; struct MELT_CLOSURE_STRUCT (0) dclo_1589__NORMEXP_IFVARIADIC; struct MELT_OBJECT_STRUCT (3) dsym_1590__CLASS_SOURCE_IFVARIADIC; struct MELT_STRING_STRUCT (23) dstr_1591__CLASS_SOURCE_IFV; struct MELT_OBJECT_STRUCT (3) dsym_1592__DISCR_VARIADIC_FORMAL_SEQUENCE; struct MELT_STRING_STRUCT (30) dstr_1593__DISCR_VARIADIC_F; struct MELT_OBJECT_STRUCT (3) dsym_1594__CONSUMVARIADIC_; struct MELT_STRING_STRUCT (15) dstr_1595__CONSUMVARIADIC_; struct MELT_OBJECT_STRUCT (3) dsym_1596__IFVARIADIC_; struct MELT_STRING_STRUCT (11) dstr_1597__IFVARIADIC_; struct MELT_ROUTINE_STRUCT (5) drout_1598__NORMEXP_COMPILEWARNING; struct MELT_CLOSURE_STRUCT (0) dclo_1599__NORMEXP_COMPILEWARNING; struct MELT_OBJECT_STRUCT (3) dsym_1600__CLASS_SOURCE_COMPILEWARNING; struct MELT_STRING_STRUCT (27) dstr_1601__CLASS_SOURCE_COM; struct MELT_ROUTINE_STRUCT (1) drout_1602__LAMBDA_; struct MELT_ROUTINE_STRUCT (17) drout_1603__REPLACE_LAST_BY_RETURN; struct MELT_CLOSURE_STRUCT (0) dclo_1604__REPLACE_LAST_BY_RETURN; struct MELT_ROUTINE_STRUCT (1) drout_1605__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_1606__RETVAL_; struct MELT_STRING_STRUCT (8) dstr_1607__RETVAL_; struct MELT_ROUTINE_STRUCT (33) drout_1608__NORMEXP_DEFUN; struct MELT_CLOSURE_STRUCT (0) dclo_1609__NORMEXP_DEFUN; struct MELT_OBJECT_STRUCT (3) dsym_1610__CLASS_SOURCE_DEFUN; struct MELT_STRING_STRUCT (18) dstr_1611__CLASS_SOURCE_DEF; struct MELT_OBJECT_STRUCT (3) dsym_1612__CLASS_FUNCTION_BINDING; struct MELT_STRING_STRUCT (22) dstr_1613__CLASS_FUNCTION_B; struct MELT_ROUTINE_STRUCT (1) drout_1614__LAMBDA_; struct MELT_ROUTINE_STRUCT (2) drout_1615__LAMBDA_; struct MELT_ROUTINE_STRUCT (28) drout_1616__NORMALIZE_LAMBDA; struct MELT_CLOSURE_STRUCT (0) dclo_1617__NORMALIZE_LAMBDA; struct MELT_OBJECT_STRUCT (3) dsym_1618__CLASS_SOURCE_LAMBDA; struct MELT_STRING_STRUCT (19) dstr_1619__CLASS_SOURCE_LAM; struct MELT_OBJECT_STRUCT (3) dsym_1620__LAMBDA_; struct MELT_STRING_STRUCT (7) dstr_1621__LAMBDA_; struct MELT_ROUTINE_STRUCT (2) drout_1622__LAMBDA_; struct MELT_ROUTINE_STRUCT (10) drout_1623__NORMEXP_LAMBDA; struct MELT_CLOSURE_STRUCT (0) dclo_1624__NORMEXP_LAMBDA; struct MELT_ROUTINE_STRUCT (30) drout_1625__NORMEXP_MULTICALL; struct MELT_CLOSURE_STRUCT (0) dclo_1626__NORMEXP_MULTICALL; struct MELT_OBJECT_STRUCT (3) dsym_1627__CLASS_SOURCE_MULTICALL; struct MELT_STRING_STRUCT (22) dstr_1628__CLASS_SOURCE_MUL; struct MELT_OBJECT_STRUCT (3) dsym_1629__LIST_ITERATE_TEST; struct MELT_STRING_STRUCT (17) dstr_1630__LIST_ITERATE_TES; struct MELT_ROUTINE_STRUCT (2) drout_1631__LAMBDA_; struct MELT_ROUTINE_STRUCT (1) drout_1632__LAMBDA_; struct MELT_ROUTINE_STRUCT (0) drout_1633__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_1634__MULTI_; struct MELT_STRING_STRUCT (6) dstr_1635__MULTI_; struct MELT_ROUTINE_STRUCT (18) drout_1636__NORMEXP_TUPLE; struct MELT_CLOSURE_STRUCT (0) dclo_1637__NORMEXP_TUPLE; struct MELT_OBJECT_STRUCT (3) dsym_1638__CLASS_SOURCE_TUPLE; struct MELT_STRING_STRUCT (18) dstr_1639__CLASS_SOURCE_TUP; struct MELT_OBJECT_STRUCT (3) dsym_1640__TUPLREC_; struct MELT_STRING_STRUCT (8) dstr_1641__TUPLREC_; struct MELT_OBJECT_STRUCT (3) dsym_1642__TUPLE_; struct MELT_STRING_STRUCT (6) dstr_1643__TUPLE_; struct MELT_ROUTINE_STRUCT (33) drout_1644__NORMEXP_LIST; struct MELT_CLOSURE_STRUCT (0) dclo_1645__NORMEXP_LIST; struct MELT_OBJECT_STRUCT (3) dsym_1646__CLASS_SOURCE_LIST; struct MELT_STRING_STRUCT (17) dstr_1647__CLASS_SOURCE_LIS; struct MELT_OBJECT_STRUCT (3) dsym_1648__LISTREC_; struct MELT_STRING_STRUCT (8) dstr_1649__LISTREC_; struct MELT_OBJECT_STRUCT (3) dsym_1650__LIST_; struct MELT_STRING_STRUCT (5) dstr_1651__LIST_; struct MELT_ROUTINE_STRUCT (5) drout_1652__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_1653__PREPARE_CONSTRUCTOR_BINDING; struct MELT_STRING_STRUCT (27) dstr_1654__PREPARE_CONSTRUC; struct MELT_OBJECT_STRUCT (2) dobj_1655; struct MELT_OBJECT_STRUCT (3) dsym_1656__SYMB; struct MELT_STRING_STRUCT (4) dstr_1657__SYMB; struct MELT_OBJECT_STRUCT (2) dobj_1658; struct MELT_OBJECT_STRUCT (2) dobj_1659; struct MELT_OBJECT_STRUCT (3) dsym_1660__SLOC; struct MELT_STRING_STRUCT (4) dstr_1661__SLOC; struct MELT_OBJECT_STRUCT (2) dobj_1662; struct MELT_MULTIPLE_STRUCT (4) dtup_1663__PREPARE_CONSTRUCTOR_BINDING; struct MELT_OBJECT_STRUCT (4) dobj_1664__PREPARE_CONSTRUCTOR_BINDING; struct MELT_STRING_STRUCT (27) dstr_1665__PREPARE_CONSTRUC; struct MELT_ROUTINE_STRUCT (2) drout_1666__BADMETH_PREPARE_CONSTRUCTOR_BINDING; struct MELT_CLOSURE_STRUCT (0) dclo_1667__BADMETH_PREPARE_CONSTRUCTOR_BINDING; struct MELT_OBJECT_STRUCT (3) dsym_1668__NORMAL_LETREC_CONSTRUCTIVE; struct MELT_STRING_STRUCT (26) dstr_1669__NORMAL_LETREC_CO; struct MELT_OBJECT_STRUCT (3) dsym_1670__CEXPR; struct MELT_STRING_STRUCT (5) dstr_1671__CEXPR; struct MELT_OBJECT_STRUCT (2) dobj_1672; struct MELT_OBJECT_STRUCT (2) dobj_1673; struct MELT_OBJECT_STRUCT (3) dsym_1674__CBIND; struct MELT_STRING_STRUCT (5) dstr_1675__CBIND; struct MELT_OBJECT_STRUCT (2) dobj_1676; struct MELT_OBJECT_STRUCT (2) dobj_1677; struct MELT_OBJECT_STRUCT (2) dobj_1678; struct MELT_OBJECT_STRUCT (2) dobj_1679; struct MELT_MULTIPLE_STRUCT (6) dtup_1680__NORMAL_LETREC_CONSTRUCTIVE; struct MELT_OBJECT_STRUCT (4) dobj_1681__NORMAL_LETREC_CONSTRUCTIVE; struct MELT_STRING_STRUCT (26) dstr_1682__NORMAL_LETREC_CO; struct MELT_ROUTINE_STRUCT (2) drout_1683__BADMETH_NORMAL_LETREC_CONSTRUCTIVE; struct MELT_CLOSURE_STRUCT (0) dclo_1684__BADMETH_NORMAL_LETREC_CONSTRUCTIVE; struct MELT_ROUTINE_STRUCT (5) drout_1685__PREPCONS_LAMBDA; struct MELT_CLOSURE_STRUCT (0) dclo_1686__PREPCONS_LAMBDA; struct MELT_ROUTINE_STRUCT (5) drout_1687__NORMLETREC_LAMBDA; struct MELT_CLOSURE_STRUCT (0) dclo_1688__NORMLETREC_LAMBDA; struct MELT_ROUTINE_STRUCT (7) drout_1689__PREPCONS_TUPLE; struct MELT_CLOSURE_STRUCT (0) dclo_1690__PREPCONS_TUPLE; struct MELT_OBJECT_STRUCT (3) dsym_1691__CLASS_SOURCE_ARGUMENTED_OPERATOR; struct MELT_STRING_STRUCT (32) dstr_1692__CLASS_SOURCE_ARG; struct MELT_ROUTINE_STRUCT (9) drout_1693__NORMLETREC_TUPLE; struct MELT_CLOSURE_STRUCT (0) dclo_1694__NORMLETREC_TUPLE; struct MELT_ROUTINE_STRUCT (13) drout_1695__PREPCONS_LIST; struct MELT_CLOSURE_STRUCT (0) dclo_1696__PREPCONS_LIST; struct MELT_OBJECT_STRUCT (3) dsym_1697__PAIROFLIST; struct MELT_STRING_STRUCT (11) dstr_1698__PAIROFLIST; struct MELT_ROUTINE_STRUCT (4) drout_1699__NRECLIST_FIND_LOCSYM; struct MELT_CLOSURE_STRUCT (0) dclo_1700__NRECLIST_FIND_LOCSYM; struct MELT_ROUTINE_STRUCT (12) drout_1701__NORMLETREC_LIST; struct MELT_CLOSURE_STRUCT (0) dclo_1702__NORMLETREC_LIST; struct MELT_ROUTINE_STRUCT (7) drout_1703__PREPCONS_INSTANCE; struct MELT_CLOSURE_STRUCT (0) dclo_1704__PREPCONS_INSTANCE; struct MELT_ROUTINE_STRUCT (22) drout_1705__NORMLETREC_INSTANCE; struct MELT_CLOSURE_STRUCT (0) dclo_1706__NORMLETREC_INSTANCE; struct MELT_ROUTINE_STRUCT (5) drout_1707__LAMBDA_; struct MELT_ROUTINE_STRUCT (29) drout_1708__NORMEXP_LETREC; struct MELT_CLOSURE_STRUCT (0) dclo_1709__NORMEXP_LETREC; struct MELT_OBJECT_STRUCT (3) dsym_1710__CLASS_SOURCE_LETREC; struct MELT_STRING_STRUCT (19) dstr_1711__CLASS_SOURCE_LET; struct MELT_OBJECT_STRUCT (3) dsym_1712__CLASS_SOURCE_LETREC_BINDING; struct MELT_STRING_STRUCT (27) dstr_1713__CLASS_SOURCE_LET; struct MELT_OBJECT_STRUCT (3) dsym_1714__LETREC_; struct MELT_STRING_STRUCT (7) dstr_1715__LETREC_; struct MELT_ROUTINE_STRUCT (4) drout_1716__NORMAL_PREDEF; struct MELT_CLOSURE_STRUCT (0) dclo_1717__NORMAL_PREDEF; struct MELT_ROUTINE_STRUCT (11) drout_1718__NORMAL_SYMBOL_DATA; struct MELT_CLOSURE_STRUCT (0) dclo_1719__NORMAL_SYMBOL_DATA; struct MELT_OBJECT_STRUCT (3) dsym_1720__NAMED_NAME; struct MELT_STRING_STRUCT (10) dstr_1721__NAMED_NAME; struct MELT_ROUTINE_STRUCT (10) drout_1722__NORMAL_KEYWORD_DATA; struct MELT_CLOSURE_STRUCT (0) dclo_1723__NORMAL_KEYWORD_DATA; struct MELT_ROUTINE_STRUCT (3) drout_1724__CREATE_DATA_SLOTS; struct MELT_CLOSURE_STRUCT (0) dclo_1725__CREATE_DATA_SLOTS; struct MELT_ROUTINE_STRUCT (2) drout_1726__FILL_DATA_SLOT; struct MELT_CLOSURE_STRUCT (0) dclo_1727__FILL_DATA_SLOT; struct MELT_ROUTINE_STRUCT (14) drout_1728__NORMEXP_QUOTE; struct MELT_CLOSURE_STRUCT (0) dclo_1729__NORMEXP_QUOTE; struct MELT_OBJECT_STRUCT (3) dsym_1730__CLASS_SOURCE_QUOTE; struct MELT_STRING_STRUCT (18) dstr_1731__CLASS_SOURCE_QUO; struct MELT_ROUTINE_STRUCT (11) drout_1732__NORMEXP_COMMENT; struct MELT_CLOSURE_STRUCT (0) dclo_1733__NORMEXP_COMMENT; struct MELT_OBJECT_STRUCT (3) dsym_1734__CLASS_SOURCE_COMMENT; struct MELT_STRING_STRUCT (20) dstr_1735__CLASS_SOURCE_COM; struct MELT_OBJECT_STRUCT (3) dsym_1736__COMMENT_; struct MELT_STRING_STRUCT (8) dstr_1737__COMMENT_; struct MELT_ROUTINE_STRUCT (8) drout_1738__NORMEXP_KEYWORD; struct MELT_CLOSURE_STRUCT (0) dclo_1739__NORMEXP_KEYWORD; struct MELT_ROUTINE_STRUCT (11) drout_1740__FILL_NORMAL_FORMALBIND; struct MELT_CLOSURE_STRUCT (0) dclo_1741__FILL_NORMAL_FORMALBIND; struct MELT_OBJECT_STRUCT (3) dsym_1742__BINDER; struct MELT_STRING_STRUCT (6) dstr_1743__BINDER; struct MELT_OBJECT_STRUCT (3) dsym_1744__FBIND_TYPE; struct MELT_STRING_STRUCT (10) dstr_1745__FBIND_TYPE; struct MELT_ROUTINE_STRUCT (3) drout_1746__FILL_NORMAL_FORMALS; struct MELT_CLOSURE_STRUCT (0) dclo_1747__FILL_NORMAL_FORMALS; struct MELT_ROUTINE_STRUCT (9) drout_1748__FILL_NORMAL_EXPANSION; struct MELT_CLOSURE_STRUCT (0) dclo_1749__FILL_NORMAL_EXPANSION; struct MELT_ROUTINE_STRUCT (7) drout_1750__LAMBDA_; struct MELT_ROUTINE_STRUCT (25) drout_1751__NORMEXP_DEFPRIMITIVE; struct MELT_CLOSURE_STRUCT (0) dclo_1752__NORMEXP_DEFPRIMITIVE; struct MELT_OBJECT_STRUCT (3) dsym_1753__CLASS_SOURCE_DEFPRIMITIVE; struct MELT_STRING_STRUCT (25) dstr_1754__CLASS_SOURCE_DEF; struct MELT_OBJECT_STRUCT (3) dsym_1755__PRIM_FORMALS; struct MELT_STRING_STRUCT (12) dstr_1756__PRIM_FORMALS; struct MELT_OBJECT_STRUCT (3) dsym_1757__PRIM_EXPANSION; struct MELT_STRING_STRUCT (14) dstr_1758__PRIM_EXPANSION; struct MELT_OBJECT_STRUCT (3) dsym_1759__PRIM_TYPE; struct MELT_STRING_STRUCT (9) dstr_1760__PRIM_TYPE; struct MELT_OBJECT_STRUCT (3) dsym_1761__CLASS_PRIMITIVE_BINDING; struct MELT_STRING_STRUCT (23) dstr_1762__CLASS_PRIMITIVE_; struct MELT_ROUTINE_STRUCT (27) drout_1763__NORMEXP_DEFCITERATOR; struct MELT_CLOSURE_STRUCT (0) dclo_1764__NORMEXP_DEFCITERATOR; struct MELT_OBJECT_STRUCT (3) dsym_1765__CLASS_SOURCE_DEFCITERATOR; struct MELT_STRING_STRUCT (25) dstr_1766__CLASS_SOURCE_DEF; struct MELT_OBJECT_STRUCT (3) dsym_1767__CITER_START_FORMALS; struct MELT_STRING_STRUCT (19) dstr_1768__CITER_START_FORM; struct MELT_OBJECT_STRUCT (3) dsym_1769__CITER_STATE; struct MELT_STRING_STRUCT (11) dstr_1770__CITER_STATE; struct MELT_OBJECT_STRUCT (3) dsym_1771__CITER_BODY_FORMALS; struct MELT_STRING_STRUCT (18) dstr_1772__CITER_BODY_FORMA; struct MELT_OBJECT_STRUCT (3) dsym_1773__CITER_EXPBEFORE; struct MELT_STRING_STRUCT (15) dstr_1774__CITER_EXPBEFORE; struct MELT_OBJECT_STRUCT (3) dsym_1775__CITER_EXPAFTER; struct MELT_STRING_STRUCT (14) dstr_1776__CITER_EXPAFTER; struct MELT_OBJECT_STRUCT (3) dsym_1777__CLASS_CITERATOR_BINDING; struct MELT_STRING_STRUCT (23) dstr_1778__CLASS_CITERATOR_; struct MELT_ROUTINE_STRUCT (40) drout_1779__NORMEXP_CITERATION; struct MELT_CLOSURE_STRUCT (0) dclo_1780__NORMEXP_CITERATION; struct MELT_OBJECT_STRUCT (3) dsym_1781__CLASS_SOURCE_CITERATION; struct MELT_STRING_STRUCT (23) dstr_1782__CLASS_SOURCE_CIT; struct MELT_OBJECT_STRUCT (3) dsym_1783__MULTIPLE_EVERY_BOTH; struct MELT_STRING_STRUCT (19) dstr_1784__MULTIPLE_EVERY_B; struct MELT_ROUTINE_STRUCT (4) drout_1785__LAMBDA_; struct MELT_ROUTINE_STRUCT (5) drout_1786__LAMBDA_; struct MELT_ROUTINE_STRUCT (5) drout_1787__LAMBDA_; struct MELT_ROUTINE_STRUCT (2) drout_1788__LAMBDA_; struct MELT_ROUTINE_STRUCT (1) drout_1789__LAMBDA_; struct MELT_ROUTINE_STRUCT (1) drout_1790__LAMBDA_; struct MELT_ROUTINE_STRUCT (0) drout_1791__LAMBDA_; struct MELT_ROUTINE_STRUCT (30) drout_1792__NORMEXP_DEFCMATCHER; struct MELT_CLOSURE_STRUCT (0) dclo_1793__NORMEXP_DEFCMATCHER; struct MELT_OBJECT_STRUCT (3) dsym_1794__CLASS_SOURCE_DEFCMATCHER; struct MELT_STRING_STRUCT (24) dstr_1795__CLASS_SOURCE_DEF; struct MELT_OBJECT_STRUCT (3) dsym_1796__CLASS_CMATCHER_BINDING; struct MELT_STRING_STRUCT (22) dstr_1797__CLASS_CMATCHER_B; struct MELT_OBJECT_STRUCT (3) dsym_1798__AMATCH_IN; struct MELT_STRING_STRUCT (9) dstr_1799__AMATCH_IN; struct MELT_OBJECT_STRUCT (3) dsym_1800__AMATCH_MATCHBIND; struct MELT_STRING_STRUCT (16) dstr_1801__AMATCH_MATCHBIND; struct MELT_OBJECT_STRUCT (3) dsym_1802__AMATCH_OUT; struct MELT_STRING_STRUCT (10) dstr_1803__AMATCH_OUT; struct MELT_OBJECT_STRUCT (3) dsym_1804__CMATCH_STATE; struct MELT_STRING_STRUCT (12) dstr_1805__CMATCH_STATE; struct MELT_OBJECT_STRUCT (3) dsym_1806__CMATCH_EXPTEST; struct MELT_STRING_STRUCT (14) dstr_1807__CMATCH_EXPTEST; struct MELT_OBJECT_STRUCT (3) dsym_1808__CMATCH_EXPFILL; struct MELT_STRING_STRUCT (14) dstr_1809__CMATCH_EXPFILL; struct MELT_OBJECT_STRUCT (3) dsym_1810__CMATCH_EXPOPER; struct MELT_STRING_STRUCT (14) dstr_1811__CMATCH_EXPOPER; struct MELT_ROUTINE_STRUCT (31) drout_1812__NORMEXP_DEFUNMATCHER; struct MELT_CLOSURE_STRUCT (0) dclo_1813__NORMEXP_DEFUNMATCHER; struct MELT_OBJECT_STRUCT (3) dsym_1814__CLASS_SOURCE_DEFUNMATCHER; struct MELT_STRING_STRUCT (25) dstr_1815__CLASS_SOURCE_DEF; struct MELT_OBJECT_STRUCT (3) dsym_1816__CLASS_SOURCE_DEFINITION_FORMAL; struct MELT_STRING_STRUCT (30) dstr_1817__CLASS_SOURCE_DEF; struct MELT_OBJECT_STRUCT (3) dsym_1818__CLASS_FUNMATCHER_BINDING; struct MELT_STRING_STRUCT (24) dstr_1819__CLASS_FUNMATCHER; struct MELT_OBJECT_STRUCT (3) dsym_1820__FMATCH_MATCHF; struct MELT_STRING_STRUCT (13) dstr_1821__FMATCH_MATCHF; struct MELT_OBJECT_STRUCT (3) dsym_1822__FMATCH_DATA; struct MELT_STRING_STRUCT (11) dstr_1823__FMATCH_DATA; struct MELT_ROUTINE_STRUCT (31) drout_1824__NORMEXP_DEFCLASS; struct MELT_CLOSURE_STRUCT (0) dclo_1825__NORMEXP_DEFCLASS; struct MELT_OBJECT_STRUCT (3) dsym_1826__CLASS_SOURCE_DEFCLASS; struct MELT_STRING_STRUCT (21) dstr_1827__CLASS_SOURCE_DEF; struct MELT_OBJECT_STRUCT (3) dsym_1828__MELTOBMAG_OBJECT; struct MELT_STRING_STRUCT (16) dstr_1829__MELTOBMAG_OBJECT; struct MELT_OBJECT_STRUCT (3) dsym_1830__CLASS_ANCESTORS; struct MELT_STRING_STRUCT (15) dstr_1831__CLASS_ANCESTORS; struct MELT_OBJECT_STRUCT (3) dsym_1832__CLASS_FIELDS; struct MELT_STRING_STRUCT (12) dstr_1833__CLASS_FIELDS; struct MELT_OBJECT_STRUCT (3) dsym_1834__CLASS_FIELD_BINDING; struct MELT_STRING_STRUCT (19) dstr_1835__CLASS_FIELD_BIND; struct MELT_OBJECT_STRUCT (3) dsym_1836__FLD_OWNCLASS; struct MELT_STRING_STRUCT (12) dstr_1837__FLD_OWNCLASS; struct MELT_OBJECT_STRUCT (3) dsym_1838__DISC_SUPER; struct MELT_STRING_STRUCT (10) dstr_1839__DISC_SUPER; struct MELT_ROUTINE_STRUCT (32) drout_1840__NORMEXP_DEFINSTANCE; struct MELT_CLOSURE_STRUCT (0) dclo_1841__NORMEXP_DEFINSTANCE; struct MELT_OBJECT_STRUCT (3) dsym_1842__CLASS_SOURCE_DEFINSTANCE; struct MELT_STRING_STRUCT (24) dstr_1843__CLASS_SOURCE_DEF; struct MELT_OBJECT_STRUCT (3) dsym_1844__CLASS_INSTANCE_BINDING; struct MELT_STRING_STRUCT (22) dstr_1845__CLASS_INSTANCE_B; struct MELT_ROUTINE_STRUCT (9) drout_1846__LAMBDA_; struct MELT_ROUTINE_STRUCT (24) drout_1847__NORMEXP_DEFINE; struct MELT_CLOSURE_STRUCT (0) dclo_1848__NORMEXP_DEFINE; struct MELT_OBJECT_STRUCT (3) dsym_1849__CLASS_SOURCE_DEFINE; struct MELT_STRING_STRUCT (19) dstr_1850__CLASS_SOURCE_DEF; struct MELT_ROUTINE_STRUCT (1) drout_1851__LAMBDA_; struct MELT_ROUTINE_STRUCT (36) drout_1852__NORMEXP_DEFSELECTOR; struct MELT_CLOSURE_STRUCT (0) dclo_1853__NORMEXP_DEFSELECTOR; struct MELT_OBJECT_STRUCT (3) dsym_1854__SDEFSEL_FORMALS; struct MELT_STRING_STRUCT (15) dstr_1855__SDEFSEL_FORMALS; struct MELT_ROUTINE_STRUCT (5) drout_1856__LAMBDA_; struct MELT_ROUTINE_STRUCT (11) drout_1857__NORMAL_VALUE_EXPORTER; struct MELT_CLOSURE_STRUCT (0) dclo_1858__NORMAL_VALUE_EXPORTER; struct MELT_OBJECT_STRUCT (3) dsym_1859__VALUEXPORTER_; struct MELT_STRING_STRUCT (14) dstr_1860__VALUEXPORTER_; struct MELT_OBJECT_STRUCT (3) dsym_1861__SYSDATA_VALUE_EXPORTER; struct MELT_STRING_STRUCT (22) dstr_1862__SYSDATA_VALUE_EX; struct MELT_ROUTINE_STRUCT (18) drout_1863__NORMAL_EXPORTED_VALUE; struct MELT_CLOSURE_STRUCT (0) dclo_1864__NORMAL_EXPORTED_VALUE; struct MELT_OBJECT_STRUCT (3) dsym_1865__EXPORTED_; struct MELT_STRING_STRUCT (10) dstr_1866__EXPORTED_; struct MELT_OBJECT_STRUCT (3) dsym_1867__CLASS_SOURCE_CURRENT_MODULE_ENVIRONMENT_CONTAINER; struct MELT_STRING_STRUCT (49) dstr_1868__CLASS_SOURCE_CUR; struct MELT_ROUTINE_STRUCT (11) drout_1869__NORMEXP_EXPORT_VALUES; struct MELT_CLOSURE_STRUCT (0) dclo_1870__NORMEXP_EXPORT_VALUES; struct MELT_OBJECT_STRUCT (3) dsym_1871__CLASS_SOURCE_EXPORT_VALUES; struct MELT_STRING_STRUCT (26) dstr_1872__CLASS_SOURCE_EXP; struct MELT_ROUTINE_STRUCT (11) drout_1873__NORMEXP_EXPORT_SYNONYM; struct MELT_CLOSURE_STRUCT (0) dclo_1874__NORMEXP_EXPORT_SYNONYM; struct MELT_OBJECT_STRUCT (3) dsym_1875__CLASS_SOURCE_EXPORT_SYNONYM; struct MELT_STRING_STRUCT (27) dstr_1876__CLASS_SOURCE_EXP; struct MELT_ROUTINE_STRUCT (26) drout_1877__NORMEXP_EXPORT_CLASS; struct MELT_CLOSURE_STRUCT (0) dclo_1878__NORMEXP_EXPORT_CLASS; struct MELT_OBJECT_STRUCT (3) dsym_1879__CLASS_SOURCE_EXPORT_CLASS; struct MELT_STRING_STRUCT (25) dstr_1880__CLASS_SOURCE_EXP; struct MELT_ROUTINE_STRUCT (17) drout_1881__LAMBDA_; struct MELT_ROUTINE_STRUCT (5) drout_1882__LAMBDA_; struct MELT_ROUTINE_STRUCT (12) drout_1883__NORMAL_MACRO_EXPORTER; struct MELT_CLOSURE_STRUCT (0) dclo_1884__NORMAL_MACRO_EXPORTER; struct MELT_OBJECT_STRUCT (3) dsym_1885__MACROXPORTER_; struct MELT_STRING_STRUCT (14) dstr_1886__MACROXPORTER_; struct MELT_OBJECT_STRUCT (3) dsym_1887__SYSDATA_MACRO_EXPORTER; struct MELT_STRING_STRUCT (22) dstr_1888__SYSDATA_MACRO_EX; struct MELT_ROUTINE_STRUCT (12) drout_1889__NORMAL_PATMACRO_EXPORTER; struct MELT_CLOSURE_STRUCT (0) dclo_1890__NORMAL_PATMACRO_EXPORTER; struct MELT_OBJECT_STRUCT (3) dsym_1891__PATMACROXPORTER_; struct MELT_STRING_STRUCT (17) dstr_1892__PATMACROXPORTER; struct MELT_OBJECT_STRUCT (3) dsym_1893__SYSDATA_PATMACRO_EXPORTER; struct MELT_STRING_STRUCT (25) dstr_1894__SYSDATA_PATMACRO; struct MELT_ROUTINE_STRUCT (17) drout_1895__NORMAL_EXPORTED_MACRO; struct MELT_CLOSURE_STRUCT (0) dclo_1896__NORMAL_EXPORTED_MACRO; struct MELT_OBJECT_STRUCT (3) dsym_1897__EXPORTEDM_; struct MELT_STRING_STRUCT (11) dstr_1898__EXPORTEDM_; struct MELT_ROUTINE_STRUCT (11) drout_1899__NORMEXP_EXPORT_MACRO; struct MELT_CLOSURE_STRUCT (0) dclo_1900__NORMEXP_EXPORT_MACRO; struct MELT_OBJECT_STRUCT (3) dsym_1901__CLASS_SOURCE_EXPORT_MACRO; struct MELT_STRING_STRUCT (25) dstr_1902__CLASS_SOURCE_EXP; struct MELT_ROUTINE_STRUCT (17) drout_1903__NORMAL_EXPORTED_PATMACRO; struct MELT_CLOSURE_STRUCT (0) dclo_1904__NORMAL_EXPORTED_PATMACRO; struct MELT_OBJECT_STRUCT (3) dsym_1905__EXPORTEDPAT_; struct MELT_STRING_STRUCT (13) dstr_1906__EXPORTEDPAT_; struct MELT_ROUTINE_STRUCT (11) drout_1907__NORMEXP_EXPORT_PATMACRO; struct MELT_CLOSURE_STRUCT (0) dclo_1908__NORMEXP_EXPORT_PATMACRO; struct MELT_OBJECT_STRUCT (3) dsym_1909__CLASS_SOURCE_EXPORT_PATMACRO; struct MELT_STRING_STRUCT (28) dstr_1910__CLASS_SOURCE_EXP; struct MELT_ROUTINE_STRUCT (7) drout_1911__NORMEXP_CURRENT_MODULE_ENVIRONMENT_CONTAINER; struct MELT_CLOSURE_STRUCT (0) dclo_1912__NORMEXP_CURRENT_MODULE_ENVIRONMENT_CONTAINER; struct MELT_ROUTINE_STRUCT (7) drout_1913__NORMEXP_PARENT_MODULE_ENVIRONMENT; struct MELT_CLOSURE_STRUCT (0) dclo_1914__NORMEXP_PARENT_MODULE_ENVIRONMENT; struct MELT_OBJECT_STRUCT (3) dsym_1915__CLASS_SOURCE_PARENT_MODULE_ENVIRONMENT; struct MELT_STRING_STRUCT (38) dstr_1916__CLASS_SOURCE_PAR; struct MELT_ROUTINE_STRUCT (25) drout_1917__NORMEXP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER; struct MELT_CLOSURE_STRUCT (0) dclo_1918__NORMEXP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER; struct MELT_OBJECT_STRUCT (3) dsym_1919__CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER; struct MELT_STRING_STRUCT (56) dstr_1920__CLASS_SOURCE_UPD; struct MELT_OBJECT_STRUCT (3) dsym_1921__CHECKRUNMODENVBOX_; struct MELT_STRING_STRUCT (18) dstr_1922__CHECKRUNMODENVBO; struct MELT_OBJECT_STRUCT (3) dsym_1923__UPDATCURMODENVBOX_; struct MELT_STRING_STRUCT (18) dstr_1924__UPDATCURMODENVBO; struct MELT_OBJECT_STRUCT (3) dsym_1925__CLASS_SOURCE_FETCH_PREDEFINED; struct MELT_STRING_STRUCT (29) dstr_1926__CLASS_SOURCE_FET; struct MELT_OBJECT_STRUCT (3) dsym_1927__SYSDATA_CONT_FRESH_ENV; struct MELT_STRING_STRUCT (22) dstr_1928__SYSDATA_CONT_FRE; struct MELT_ROUTINE_STRUCT (10) drout_1929__NORMEXP_FETCH_PREDEFINED; struct MELT_CLOSURE_STRUCT (0) dclo_1930__NORMEXP_FETCH_PREDEFINED; struct MELT_OBJECT_STRUCT (3) dsym_1931__MAPOBJECT_EVERY; struct MELT_STRING_STRUCT (15) dstr_1932__MAPOBJECT_EVERY; struct MELT_ROUTINE_STRUCT (1) drout_1933__LAMBDA_; struct MELT_ROUTINE_STRUCT (17) drout_1934__NORMEXP_STORE_PREDEFINED; struct MELT_CLOSURE_STRUCT (0) dclo_1935__NORMEXP_STORE_PREDEFINED; struct MELT_OBJECT_STRUCT (3) dsym_1936__CLASS_SOURCE_STORE_PREDEFINED; struct MELT_STRING_STRUCT (29) dstr_1937__CLASS_SOURCE_STO; struct MELT_ROUTINE_STRUCT (1) drout_1938__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_1939__STOREPREDEF_; struct MELT_STRING_STRUCT (13) dstr_1940__STOREPREDEF_; struct MELT_ROUTINE_STRUCT (5) drout_1941__NORMEXP_CHEADER; struct MELT_CLOSURE_STRUCT (0) dclo_1942__NORMEXP_CHEADER; struct MELT_OBJECT_STRUCT (3) dsym_1943__CLASS_SOURCE_CHEADER; struct MELT_STRING_STRUCT (20) dstr_1944__CLASS_SOURCE_CHE; struct MELT_ROUTINE_STRUCT (5) drout_1945__NORMEXP_USE_PACKAGE_FROM_PKG_CONFIG; struct MELT_CLOSURE_STRUCT (0) dclo_1946__NORMEXP_USE_PACKAGE_FROM_PKG_CONFIG; struct MELT_OBJECT_STRUCT (3) dsym_1947__CLASS_SOURCE_USE_PACKAGE_FROM_PKG_CONFIG; struct MELT_STRING_STRUCT (40) dstr_1948__CLASS_SOURCE_USE; struct MELT_OBJECT_STRUCT (3) dsym_1949__CHECK_CTYPE_NARGS; struct MELT_STRING_STRUCT (17) dstr_1950__CHECK_CTYPE_NARG; struct MELT_OBJECT_STRUCT (3) dsym_1951__CREATE_NORMCONTEXT; struct MELT_STRING_STRUCT (18) dstr_1952__CREATE_NORMCONTE; struct MELT_OBJECT_STRUCT (3) dsym_1953__CREATE_NORMAL_EXTENDING_CONTEXT; struct MELT_STRING_STRUCT (31) dstr_1954__CREATE_NORMAL_EX; struct MELT_OBJECT_STRUCT (3) dsym_1955__NORMAL_PREDEF; struct MELT_STRING_STRUCT (13) dstr_1956__NORMAL_PREDEF; struct MELT_OBJECT_STRUCT (3) dsym_1957__NORMALIZE_TUPLE; struct MELT_STRING_STRUCT (15) dstr_1958__NORMALIZE_TUPLE; struct MELT_OBJECT_STRUCT (3) dsym_1959__REGISTER_LITERAL_VALUE; struct MELT_STRING_STRUCT (22) dstr_1960__REGISTER_LITERAL; struct MELT_OBJECT_STRUCT (3) dsym_1961__WRAP_NORMAL_LET1; struct MELT_STRING_STRUCT (16) dstr_1962__WRAP_NORMAL_LET1; struct MELT_OBJECT_STRUCT (3) dsym_1963__WRAP_NORMAL_LETSEQ; struct MELT_STRING_STRUCT (18) dstr_1964__WRAP_NORMAL_LETS; struct MELT_OBJECT_STRUCT (3) dsym_1965__CLASS_NREP_DATA; struct MELT_STRING_STRUCT (15) dstr_1966__CLASS_NREP_DATA; struct MELT_OBJECT_STRUCT (3) dsym_1967__CLASS_NREP_CHECKINTERRUPT; struct MELT_STRING_STRUCT (25) dstr_1968__CLASS_NREP_CHECK; long spare_; } *cdat = NULL; dbgprintf ("start initialize_module_meltdata_warmelt_normal iniframp__=%p", (void *) iniframp__); (void) meltpredefinited; /* avoid warning if non-used. */ melt_assertmsg ("check module initial frame", iniframp__->mcfr_nbvar == /*minihash */ -1730); cdat = (struct cdata_st *) meltgc_allocate (sizeof (*cdat), 0); melt_prohibit_garbcoll = TRUE; /*initial routine predef */ /*initial routine fill */ /*iniobj dsym_1__CLASS_NREP*/ /*uniqueobj*/ if (! /*_.VALDATA___V172*/ meltfptr[171]) /*_.VALDATA___V172*/ meltfptr[171] = (melt_ptr_t) & cdat->dsym_1__CLASS_NREP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1__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_1__CLASS_NREP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1__CLASS_NREP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1__CLASS_NREP.obj_hash = 704846736; cdat->dsym_1__CLASS_NREP.obj_len = 3; /*inistring dstr_2__CLASS_NREP*/ /*_.VALSTR___V173*/ meltfptr[172] = (melt_ptr_t) & cdat->dstr_2__CLASS_NREP; cdat->dstr_2__CLASS_NREP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_2__CLASS_NREP.val, "CLASS_NREP", sizeof (cdat->dstr_2__CLASS_NREP.val) - 1); cdat->dstr_2__CLASS_NREP.val[10] = (char) 0; cdat->dstr_2__CLASS_NREP.slen = 10; /*iniobj dsym_3__CLASS_ROOT*/ /*uniqueobj*/ if (! /*_.VALDATA___V174*/ meltfptr[173]) /*_.VALDATA___V174*/ meltfptr[173] = (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___V175*/ meltfptr[174] = (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-normal.melt:42:/ iniobj"); /*iniobj dobj_5__CLASS_NREP*/ /*_.VALDATA___V176*/ meltfptr[175] = (melt_ptr_t) & cdat->dobj_5__CLASS_NREP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_5__CLASS_NREP", 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_NREP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_5__CLASS_NREP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_5__CLASS_NREP.obj_num = MELTOBMAG_OBJECT; cdat->dobj_5__CLASS_NREP.obj_hash = 222486649; cdat->dobj_5__CLASS_NREP.obj_len = 8; /*inistring dstr_6__CLASS_NREP*/ /*_.VALSTR___V177*/ meltfptr[176] = (melt_ptr_t) & cdat->dstr_6__CLASS_NREP; cdat->dstr_6__CLASS_NREP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_6__CLASS_NREP.val, "CLASS_NREP", sizeof (cdat->dstr_6__CLASS_NREP.val) - 1); cdat->dstr_6__CLASS_NREP.val[10] = (char) 0; cdat->dstr_6__CLASS_NREP.slen = 10; /*inimult dtup_7__CLASS_NREP */ /*_.VALTUP___V178*/ meltfptr[177] = (melt_ptr_t) & cdat->dtup_7__CLASS_NREP; cdat->dtup_7__CLASS_NREP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_7__CLASS_NREP.nbval = 1; /*inimult dtup_8__CLASS_NREP */ /*_.VALTUP___V181*/ meltfptr[180] = (melt_ptr_t) & cdat->dtup_8__CLASS_NREP; cdat->dtup_8__CLASS_NREP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_8__CLASS_NREP.nbval = 1; /*iniobj dsym_9__NREP_LOC*/ /*uniqueobj*/ if (! /*_.VALDATA___V182*/ meltfptr[181]) /*_.VALDATA___V182*/ meltfptr[181] = (melt_ptr_t) & cdat->dsym_9__NREP_LOC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_9__NREP_LOC", melt_magic_discr ((melt_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__NREP_LOC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_9__NREP_LOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_9__NREP_LOC.obj_hash = 567925724; cdat->dsym_9__NREP_LOC.obj_len = 3; /*inistring dstr_10__NREP_LOC*/ /*_.VALSTR___V183*/ meltfptr[182] = (melt_ptr_t) & cdat->dstr_10__NREP_LOC; cdat->dstr_10__NREP_LOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_10__NREP_LOC.val, "NREP_LOC", sizeof (cdat->dstr_10__NREP_LOC.val) - 1); cdat->dstr_10__NREP_LOC.val[8] = (char) 0; cdat->dstr_10__NREP_LOC.slen = 8; /*^iniobj */ /*iniobj dobj_11__NREP_LOC*/ /*_.VALDATA___V179*/ meltfptr[178] = (melt_ptr_t) & cdat->dobj_11__NREP_LOC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_11__NREP_LOC", 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__NREP_LOC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_11__NREP_LOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_11__NREP_LOC.obj_num = 0; cdat->dobj_11__NREP_LOC.obj_hash = 271338440; cdat->dobj_11__NREP_LOC.obj_len = 4; /*inistring dstr_12__NREP_LOC*/ /*_.VALSTR___V180*/ meltfptr[179] = (melt_ptr_t) & cdat->dstr_12__NREP_LOC; cdat->dstr_12__NREP_LOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_12__NREP_LOC.val, "NREP_LOC", sizeof (cdat->dstr_12__NREP_LOC.val) - 1); cdat->dstr_12__NREP_LOC.val[8] = (char) 0; cdat->dstr_12__NREP_LOC.slen = 8; /*iniobj dsym_13__CLASS_NREP_SIMPLE*/ /*uniqueobj*/ if (! /*_.VALDATA___V184*/ meltfptr[183]) /*_.VALDATA___V184*/ meltfptr[183] = (melt_ptr_t) & cdat->dsym_13__CLASS_NREP_SIMPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_13__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_13__CLASS_NREP_SIMPLE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_13__CLASS_NREP_SIMPLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_13__CLASS_NREP_SIMPLE.obj_hash = 945537669; cdat->dsym_13__CLASS_NREP_SIMPLE.obj_len = 3; /*inistring dstr_14__CLASS_NREP_SIMPL*/ /*_.VALSTR___V185*/ meltfptr[184] = (melt_ptr_t) & cdat->dstr_14__CLASS_NREP_SIMPL; cdat->dstr_14__CLASS_NREP_SIMPL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_14__CLASS_NREP_SIMPL.val, "CLASS_NREP_SIMPLE", sizeof (cdat->dstr_14__CLASS_NREP_SIMPL.val) - 1); cdat->dstr_14__CLASS_NREP_SIMPL.val[17] = (char) 0; cdat->dstr_14__CLASS_NREP_SIMPL.slen = 17; MELT_LOCATION ("warmelt-normal.melt:52:/ iniobj"); /*iniobj dobj_15__CLASS_NREP_SIMPLE*/ /*_.VALDATA___V186*/ meltfptr[185] = (melt_ptr_t) & cdat->dobj_15__CLASS_NREP_SIMPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_15__CLASS_NREP_SIMPLE", 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_15__CLASS_NREP_SIMPLE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_15__CLASS_NREP_SIMPLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_15__CLASS_NREP_SIMPLE.obj_num = MELTOBMAG_OBJECT; cdat->dobj_15__CLASS_NREP_SIMPLE.obj_hash = 462371411; cdat->dobj_15__CLASS_NREP_SIMPLE.obj_len = 8; /*inistring dstr_16__CLASS_NREP_SIMPL*/ /*_.VALSTR___V187*/ meltfptr[186] = (melt_ptr_t) & cdat->dstr_16__CLASS_NREP_SIMPL; cdat->dstr_16__CLASS_NREP_SIMPL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_16__CLASS_NREP_SIMPL.val, "CLASS_NREP_SIMPLE", sizeof (cdat->dstr_16__CLASS_NREP_SIMPL.val) - 1); cdat->dstr_16__CLASS_NREP_SIMPL.val[17] = (char) 0; cdat->dstr_16__CLASS_NREP_SIMPL.slen = 17; /*inimult dtup_17__CLASS_NREP_SIMPLE */ /*_.VALTUP___V188*/ meltfptr[187] = (melt_ptr_t) & cdat->dtup_17__CLASS_NREP_SIMPLE; cdat->dtup_17__CLASS_NREP_SIMPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_17__CLASS_NREP_SIMPLE.nbval = 2; /*inimult dtup_18__CLASS_NREP_SIMPLE */ /*_.VALTUP___V189*/ meltfptr[188] = (melt_ptr_t) & cdat->dtup_18__CLASS_NREP_SIMPLE; cdat->dtup_18__CLASS_NREP_SIMPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_18__CLASS_NREP_SIMPLE.nbval = 1; /*iniobj dsym_19__CLASS_NREP_EXPRESSION*/ /*uniqueobj*/ if (! /*_.VALDATA___V190*/ meltfptr[189]) /*_.VALDATA___V190*/ meltfptr[189] = (melt_ptr_t) & cdat->dsym_19__CLASS_NREP_EXPRESSION; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_19__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_19__CLASS_NREP_EXPRESSION", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_19__CLASS_NREP_EXPRESSION.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_19__CLASS_NREP_EXPRESSION.obj_hash = 413071326; cdat->dsym_19__CLASS_NREP_EXPRESSION.obj_len = 3; /*inistring dstr_20__CLASS_NREP_EXPRE*/ /*_.VALSTR___V191*/ meltfptr[190] = (melt_ptr_t) & cdat->dstr_20__CLASS_NREP_EXPRE; cdat->dstr_20__CLASS_NREP_EXPRE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_20__CLASS_NREP_EXPRE.val, "CLASS_NREP_EXPRESSION", sizeof (cdat->dstr_20__CLASS_NREP_EXPRE.val) - 1); cdat->dstr_20__CLASS_NREP_EXPRE.val[21] = (char) 0; cdat->dstr_20__CLASS_NREP_EXPRE.slen = 21; MELT_LOCATION ("warmelt-normal.melt:60:/ iniobj"); /*iniobj dobj_21__CLASS_NREP_EXPRESSION*/ /*_.VALDATA___V192*/ meltfptr[191] = (melt_ptr_t) & cdat->dobj_21__CLASS_NREP_EXPRESSION; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_21__CLASS_NREP_EXPRESSION", 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_21__CLASS_NREP_EXPRESSION", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_21__CLASS_NREP_EXPRESSION.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_21__CLASS_NREP_EXPRESSION.obj_num = MELTOBMAG_OBJECT; cdat->dobj_21__CLASS_NREP_EXPRESSION.obj_hash = 502324042; cdat->dobj_21__CLASS_NREP_EXPRESSION.obj_len = 8; /*inistring dstr_22__CLASS_NREP_EXPRE*/ /*_.VALSTR___V193*/ meltfptr[192] = (melt_ptr_t) & cdat->dstr_22__CLASS_NREP_EXPRE; cdat->dstr_22__CLASS_NREP_EXPRE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_22__CLASS_NREP_EXPRE.val, "CLASS_NREP_EXPRESSION", sizeof (cdat->dstr_22__CLASS_NREP_EXPRE.val) - 1); cdat->dstr_22__CLASS_NREP_EXPRE.val[21] = (char) 0; cdat->dstr_22__CLASS_NREP_EXPRE.slen = 21; /*inimult dtup_23__CLASS_NREP_EXPRESSION */ /*_.VALTUP___V194*/ meltfptr[193] = (melt_ptr_t) & cdat->dtup_23__CLASS_NREP_EXPRESSION; cdat->dtup_23__CLASS_NREP_EXPRESSION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_23__CLASS_NREP_EXPRESSION.nbval = 2; /*inimult dtup_24__CLASS_NREP_EXPRESSION */ /*_.VALTUP___V195*/ meltfptr[194] = (melt_ptr_t) & cdat->dtup_24__CLASS_NREP_EXPRESSION; cdat->dtup_24__CLASS_NREP_EXPRESSION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_24__CLASS_NREP_EXPRESSION.nbval = 1; /*iniobj dsym_25__CLASS_NREP_TYPED_EXPRESSION*/ /*uniqueobj*/ if (! /*_.VALDATA___V196*/ meltfptr[195]) /*_.VALDATA___V196*/ meltfptr[195] = (melt_ptr_t) & cdat->dsym_25__CLASS_NREP_TYPED_EXPRESSION; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_25__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_25__CLASS_NREP_TYPED_EXPRESSION", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_25__CLASS_NREP_TYPED_EXPRESSION.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_25__CLASS_NREP_TYPED_EXPRESSION.obj_hash = 826853213; cdat->dsym_25__CLASS_NREP_TYPED_EXPRESSION.obj_len = 3; /*inistring dstr_26__CLASS_NREP_TYPED*/ /*_.VALSTR___V197*/ meltfptr[196] = (melt_ptr_t) & cdat->dstr_26__CLASS_NREP_TYPED; cdat->dstr_26__CLASS_NREP_TYPED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_26__CLASS_NREP_TYPED.val, "CLASS_NREP_TYPED_EXPRESSION", sizeof (cdat->dstr_26__CLASS_NREP_TYPED.val) - 1); cdat->dstr_26__CLASS_NREP_TYPED.val[27] = (char) 0; cdat->dstr_26__CLASS_NREP_TYPED.slen = 27; MELT_LOCATION ("warmelt-normal.melt:67:/ iniobj"); /*iniobj dobj_27__CLASS_NREP_TYPED_EXPRESSION*/ /*_.VALDATA___V198*/ meltfptr[197] = (melt_ptr_t) & cdat->dobj_27__CLASS_NREP_TYPED_EXPRESSION; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_27__CLASS_NREP_TYPED_EXPRESSION", 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_27__CLASS_NREP_TYPED_EXPRESSION", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_27__CLASS_NREP_TYPED_EXPRESSION.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_27__CLASS_NREP_TYPED_EXPRESSION.obj_num = MELTOBMAG_OBJECT; cdat->dobj_27__CLASS_NREP_TYPED_EXPRESSION.obj_hash = 92167478; cdat->dobj_27__CLASS_NREP_TYPED_EXPRESSION.obj_len = 8; /*inistring dstr_28__CLASS_NREP_TYPED*/ /*_.VALSTR___V199*/ meltfptr[198] = (melt_ptr_t) & cdat->dstr_28__CLASS_NREP_TYPED; cdat->dstr_28__CLASS_NREP_TYPED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_28__CLASS_NREP_TYPED.val, "CLASS_NREP_TYPED_EXPRESSION", sizeof (cdat->dstr_28__CLASS_NREP_TYPED.val) - 1); cdat->dstr_28__CLASS_NREP_TYPED.val[27] = (char) 0; cdat->dstr_28__CLASS_NREP_TYPED.slen = 27; /*inimult dtup_29__CLASS_NREP_TYPED_EXPRESSION */ /*_.VALTUP___V200*/ meltfptr[199] = (melt_ptr_t) & cdat->dtup_29__CLASS_NREP_TYPED_EXPRESSION; cdat->dtup_29__CLASS_NREP_TYPED_EXPRESSION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_29__CLASS_NREP_TYPED_EXPRESSION.nbval = 3; /*inimult dtup_30__CLASS_NREP_TYPED_EXPRESSION */ /*_.VALTUP___V203*/ meltfptr[202] = (melt_ptr_t) & cdat->dtup_30__CLASS_NREP_TYPED_EXPRESSION; cdat->dtup_30__CLASS_NREP_TYPED_EXPRESSION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_30__CLASS_NREP_TYPED_EXPRESSION.nbval = 2; /*iniobj dsym_31__NEXPR_CTYP*/ /*uniqueobj*/ if (! /*_.VALDATA___V204*/ meltfptr[203]) /*_.VALDATA___V204*/ meltfptr[203] = (melt_ptr_t) & cdat->dsym_31__NEXPR_CTYP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_31__NEXPR_CTYP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_31__NEXPR_CTYP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_31__NEXPR_CTYP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_31__NEXPR_CTYP.obj_hash = 400768111; cdat->dsym_31__NEXPR_CTYP.obj_len = 3; /*inistring dstr_32__NEXPR_CTYP*/ /*_.VALSTR___V205*/ meltfptr[204] = (melt_ptr_t) & cdat->dstr_32__NEXPR_CTYP; cdat->dstr_32__NEXPR_CTYP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_32__NEXPR_CTYP.val, "NEXPR_CTYP", sizeof (cdat->dstr_32__NEXPR_CTYP.val) - 1); cdat->dstr_32__NEXPR_CTYP.val[10] = (char) 0; cdat->dstr_32__NEXPR_CTYP.slen = 10; /*^iniobj */ /*iniobj dobj_33__NEXPR_CTYP*/ /*_.VALDATA___V201*/ meltfptr[200] = (melt_ptr_t) & cdat->dobj_33__NEXPR_CTYP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_33__NEXPR_CTYP", 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_33__NEXPR_CTYP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_33__NEXPR_CTYP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_33__NEXPR_CTYP.obj_num = 1; cdat->dobj_33__NEXPR_CTYP.obj_hash = 990127326; cdat->dobj_33__NEXPR_CTYP.obj_len = 4; /*inistring dstr_34__NEXPR_CTYP*/ /*_.VALSTR___V202*/ meltfptr[201] = (melt_ptr_t) & cdat->dstr_34__NEXPR_CTYP; cdat->dstr_34__NEXPR_CTYP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_34__NEXPR_CTYP.val, "NEXPR_CTYP", sizeof (cdat->dstr_34__NEXPR_CTYP.val) - 1); cdat->dstr_34__NEXPR_CTYP.val[10] = (char) 0; cdat->dstr_34__NEXPR_CTYP.slen = 10; /*iniobj dsym_35__CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS*/ /*uniqueobj*/ if (! /*_.VALDATA___V206*/ meltfptr[205]) /*_.VALDATA___V206*/ meltfptr[205] = (melt_ptr_t) & cdat-> dsym_35__CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_35__CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_35__CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_35__CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_35__CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS.obj_hash = 633290962; cdat->dsym_35__CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS.obj_len = 3; /*inistring dstr_36__CLASS_NREP_TYPED*/ /*_.VALSTR___V207*/ meltfptr[206] = (melt_ptr_t) & cdat->dstr_36__CLASS_NREP_TYPED; cdat->dstr_36__CLASS_NREP_TYPED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_36__CLASS_NREP_TYPED.val, "CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS", sizeof (cdat->dstr_36__CLASS_NREP_TYPED.val) - 1); cdat->dstr_36__CLASS_NREP_TYPED.val[42] = (char) 0; cdat->dstr_36__CLASS_NREP_TYPED.slen = 42; MELT_LOCATION ("warmelt-normal.melt:75:/ iniobj"); /*iniobj dobj_37__CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS*/ /*_.VALDATA___V208*/ meltfptr[207] = (melt_ptr_t) & cdat->dobj_37__CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_37__CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS", 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_37__CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_37__CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_37__CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS.obj_num = MELTOBMAG_OBJECT; cdat->dobj_37__CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS.obj_hash = 23231316; cdat->dobj_37__CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS.obj_len = 8; /*inistring dstr_38__CLASS_NREP_TYPED*/ /*_.VALSTR___V209*/ meltfptr[208] = (melt_ptr_t) & cdat->dstr_38__CLASS_NREP_TYPED; cdat->dstr_38__CLASS_NREP_TYPED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_38__CLASS_NREP_TYPED.val, "CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS", sizeof (cdat->dstr_38__CLASS_NREP_TYPED.val) - 1); cdat->dstr_38__CLASS_NREP_TYPED.val[42] = (char) 0; cdat->dstr_38__CLASS_NREP_TYPED.slen = 42; /*inimult dtup_39__CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS */ /*_.VALTUP___V210*/ meltfptr[209] = (melt_ptr_t) & cdat->dtup_39__CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS; cdat->dtup_39__CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_39__CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS.nbval = 4; /*inimult dtup_40__CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS */ /*_.VALTUP___V213*/ meltfptr[212] = (melt_ptr_t) & cdat->dtup_40__CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS; cdat->dtup_40__CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_40__CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS.nbval = 3; /*iniobj dsym_41__NEXPR_ARGS*/ /*uniqueobj*/ if (! /*_.VALDATA___V214*/ meltfptr[213]) /*_.VALDATA___V214*/ meltfptr[213] = (melt_ptr_t) & cdat->dsym_41__NEXPR_ARGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_41__NEXPR_ARGS", melt_magic_discr ((melt_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__NEXPR_ARGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_41__NEXPR_ARGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_41__NEXPR_ARGS.obj_hash = 356878225; cdat->dsym_41__NEXPR_ARGS.obj_len = 3; /*inistring dstr_42__NEXPR_ARGS*/ /*_.VALSTR___V215*/ meltfptr[214] = (melt_ptr_t) & cdat->dstr_42__NEXPR_ARGS; cdat->dstr_42__NEXPR_ARGS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_42__NEXPR_ARGS.val, "NEXPR_ARGS", sizeof (cdat->dstr_42__NEXPR_ARGS.val) - 1); cdat->dstr_42__NEXPR_ARGS.val[10] = (char) 0; cdat->dstr_42__NEXPR_ARGS.slen = 10; /*^iniobj */ /*iniobj dobj_43__NEXPR_ARGS*/ /*_.VALDATA___V211*/ meltfptr[210] = (melt_ptr_t) & cdat->dobj_43__NEXPR_ARGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_43__NEXPR_ARGS", 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__NEXPR_ARGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_43__NEXPR_ARGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_43__NEXPR_ARGS.obj_num = 2; cdat->dobj_43__NEXPR_ARGS.obj_hash = 543805263; cdat->dobj_43__NEXPR_ARGS.obj_len = 4; /*inistring dstr_44__NEXPR_ARGS*/ /*_.VALSTR___V212*/ meltfptr[211] = (melt_ptr_t) & cdat->dstr_44__NEXPR_ARGS; cdat->dstr_44__NEXPR_ARGS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_44__NEXPR_ARGS.val, "NEXPR_ARGS", sizeof (cdat->dstr_44__NEXPR_ARGS.val) - 1); cdat->dstr_44__NEXPR_ARGS.val[10] = (char) 0; cdat->dstr_44__NEXPR_ARGS.slen = 10; /*iniobj dsym_45__CLASS_NREP_APPLY*/ /*uniqueobj*/ if (! /*_.VALDATA___V216*/ meltfptr[215]) /*_.VALDATA___V216*/ meltfptr[215] = (melt_ptr_t) & cdat->dsym_45__CLASS_NREP_APPLY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_45__CLASS_NREP_APPLY", melt_magic_discr ((melt_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__CLASS_NREP_APPLY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_45__CLASS_NREP_APPLY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_45__CLASS_NREP_APPLY.obj_hash = 866094506; cdat->dsym_45__CLASS_NREP_APPLY.obj_len = 3; /*inistring dstr_46__CLASS_NREP_APPLY*/ /*_.VALSTR___V217*/ meltfptr[216] = (melt_ptr_t) & cdat->dstr_46__CLASS_NREP_APPLY; cdat->dstr_46__CLASS_NREP_APPLY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_46__CLASS_NREP_APPLY.val, "CLASS_NREP_APPLY", sizeof (cdat->dstr_46__CLASS_NREP_APPLY.val) - 1); cdat->dstr_46__CLASS_NREP_APPLY.val[16] = (char) 0; cdat->dstr_46__CLASS_NREP_APPLY.slen = 16; MELT_LOCATION ("warmelt-normal.melt:84:/ iniobj"); /*iniobj dobj_47__CLASS_NREP_APPLY*/ /*_.VALDATA___V218*/ meltfptr[217] = (melt_ptr_t) & cdat->dobj_47__CLASS_NREP_APPLY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_47__CLASS_NREP_APPLY", 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_47__CLASS_NREP_APPLY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_47__CLASS_NREP_APPLY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_47__CLASS_NREP_APPLY.obj_num = MELTOBMAG_OBJECT; cdat->dobj_47__CLASS_NREP_APPLY.obj_hash = 18088647; cdat->dobj_47__CLASS_NREP_APPLY.obj_len = 8; /*inistring dstr_48__CLASS_NREP_APPLY*/ /*_.VALSTR___V219*/ meltfptr[218] = (melt_ptr_t) & cdat->dstr_48__CLASS_NREP_APPLY; cdat->dstr_48__CLASS_NREP_APPLY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_48__CLASS_NREP_APPLY.val, "CLASS_NREP_APPLY", sizeof (cdat->dstr_48__CLASS_NREP_APPLY.val) - 1); cdat->dstr_48__CLASS_NREP_APPLY.val[16] = (char) 0; cdat->dstr_48__CLASS_NREP_APPLY.slen = 16; /*inimult dtup_49__CLASS_NREP_APPLY */ /*_.VALTUP___V220*/ meltfptr[219] = (melt_ptr_t) & cdat->dtup_49__CLASS_NREP_APPLY; cdat->dtup_49__CLASS_NREP_APPLY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_49__CLASS_NREP_APPLY.nbval = 5; /*inimult dtup_50__CLASS_NREP_APPLY */ /*_.VALTUP___V223*/ meltfptr[222] = (melt_ptr_t) & cdat->dtup_50__CLASS_NREP_APPLY; cdat->dtup_50__CLASS_NREP_APPLY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_50__CLASS_NREP_APPLY.nbval = 4; /*iniobj dsym_51__NAPP_FUN*/ /*uniqueobj*/ if (! /*_.VALDATA___V224*/ meltfptr[223]) /*_.VALDATA___V224*/ meltfptr[223] = (melt_ptr_t) & cdat->dsym_51__NAPP_FUN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_51__NAPP_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_51__NAPP_FUN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_51__NAPP_FUN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_51__NAPP_FUN.obj_hash = 135971900; cdat->dsym_51__NAPP_FUN.obj_len = 3; /*inistring dstr_52__NAPP_FUN*/ /*_.VALSTR___V225*/ meltfptr[224] = (melt_ptr_t) & cdat->dstr_52__NAPP_FUN; cdat->dstr_52__NAPP_FUN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_52__NAPP_FUN.val, "NAPP_FUN", sizeof (cdat->dstr_52__NAPP_FUN.val) - 1); cdat->dstr_52__NAPP_FUN.val[8] = (char) 0; cdat->dstr_52__NAPP_FUN.slen = 8; /*^iniobj */ /*iniobj dobj_53__NAPP_FUN*/ /*_.VALDATA___V221*/ meltfptr[220] = (melt_ptr_t) & cdat->dobj_53__NAPP_FUN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_53__NAPP_FUN", 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_53__NAPP_FUN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_53__NAPP_FUN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_53__NAPP_FUN.obj_num = 3; cdat->dobj_53__NAPP_FUN.obj_hash = 716179317; cdat->dobj_53__NAPP_FUN.obj_len = 4; /*inistring dstr_54__NAPP_FUN*/ /*_.VALSTR___V222*/ meltfptr[221] = (melt_ptr_t) & cdat->dstr_54__NAPP_FUN; cdat->dstr_54__NAPP_FUN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_54__NAPP_FUN.val, "NAPP_FUN", sizeof (cdat->dstr_54__NAPP_FUN.val) - 1); cdat->dstr_54__NAPP_FUN.val[8] = (char) 0; cdat->dstr_54__NAPP_FUN.slen = 8; /*iniobj dsym_55__CLASS_NREP_MULTIAPPLY*/ /*uniqueobj*/ if (! /*_.VALDATA___V226*/ meltfptr[225]) /*_.VALDATA___V226*/ meltfptr[225] = (melt_ptr_t) & cdat->dsym_55__CLASS_NREP_MULTIAPPLY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_55__CLASS_NREP_MULTIAPPLY", melt_magic_discr ((melt_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_NREP_MULTIAPPLY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_55__CLASS_NREP_MULTIAPPLY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_55__CLASS_NREP_MULTIAPPLY.obj_hash = 257736327; cdat->dsym_55__CLASS_NREP_MULTIAPPLY.obj_len = 3; /*inistring dstr_56__CLASS_NREP_MULTI*/ /*_.VALSTR___V227*/ meltfptr[226] = (melt_ptr_t) & cdat->dstr_56__CLASS_NREP_MULTI; cdat->dstr_56__CLASS_NREP_MULTI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_56__CLASS_NREP_MULTI.val, "CLASS_NREP_MULTIAPPLY", sizeof (cdat->dstr_56__CLASS_NREP_MULTI.val) - 1); cdat->dstr_56__CLASS_NREP_MULTI.val[21] = (char) 0; cdat->dstr_56__CLASS_NREP_MULTI.slen = 21; MELT_LOCATION ("warmelt-normal.melt:93:/ iniobj"); /*iniobj dobj_57__CLASS_NREP_MULTIAPPLY*/ /*_.VALDATA___V228*/ meltfptr[227] = (melt_ptr_t) & cdat->dobj_57__CLASS_NREP_MULTIAPPLY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_57__CLASS_NREP_MULTIAPPLY", 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_57__CLASS_NREP_MULTIAPPLY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_57__CLASS_NREP_MULTIAPPLY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_57__CLASS_NREP_MULTIAPPLY.obj_num = MELTOBMAG_OBJECT; cdat->dobj_57__CLASS_NREP_MULTIAPPLY.obj_hash = 76586278; cdat->dobj_57__CLASS_NREP_MULTIAPPLY.obj_len = 8; /*inistring dstr_58__CLASS_NREP_MULTI*/ /*_.VALSTR___V229*/ meltfptr[228] = (melt_ptr_t) & cdat->dstr_58__CLASS_NREP_MULTI; cdat->dstr_58__CLASS_NREP_MULTI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_58__CLASS_NREP_MULTI.val, "CLASS_NREP_MULTIAPPLY", sizeof (cdat->dstr_58__CLASS_NREP_MULTI.val) - 1); cdat->dstr_58__CLASS_NREP_MULTI.val[21] = (char) 0; cdat->dstr_58__CLASS_NREP_MULTI.slen = 21; /*inimult dtup_59__CLASS_NREP_MULTIAPPLY */ /*_.VALTUP___V230*/ meltfptr[229] = (melt_ptr_t) & cdat->dtup_59__CLASS_NREP_MULTIAPPLY; cdat->dtup_59__CLASS_NREP_MULTIAPPLY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_59__CLASS_NREP_MULTIAPPLY.nbval = 6; /*inimult dtup_60__CLASS_NREP_MULTIAPPLY */ /*_.VALTUP___V235*/ meltfptr[234] = (melt_ptr_t) & cdat->dtup_60__CLASS_NREP_MULTIAPPLY; cdat->dtup_60__CLASS_NREP_MULTIAPPLY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_60__CLASS_NREP_MULTIAPPLY.nbval = 6; /*iniobj dsym_61__NMULAPP_BINDINGS*/ /*uniqueobj*/ if (! /*_.VALDATA___V236*/ meltfptr[235]) /*_.VALDATA___V236*/ meltfptr[235] = (melt_ptr_t) & cdat->dsym_61__NMULAPP_BINDINGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_61__NMULAPP_BINDINGS", melt_magic_discr ((melt_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__NMULAPP_BINDINGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_61__NMULAPP_BINDINGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_61__NMULAPP_BINDINGS.obj_hash = 483118889; cdat->dsym_61__NMULAPP_BINDINGS.obj_len = 3; /*inistring dstr_62__NMULAPP_BINDINGS*/ /*_.VALSTR___V237*/ meltfptr[236] = (melt_ptr_t) & cdat->dstr_62__NMULAPP_BINDINGS; cdat->dstr_62__NMULAPP_BINDINGS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_62__NMULAPP_BINDINGS.val, "NMULAPP_BINDINGS", sizeof (cdat->dstr_62__NMULAPP_BINDINGS.val) - 1); cdat->dstr_62__NMULAPP_BINDINGS.val[16] = (char) 0; cdat->dstr_62__NMULAPP_BINDINGS.slen = 16; /*^iniobj */ /*iniobj dobj_63__NMULAPP_BINDINGS*/ /*_.VALDATA___V231*/ meltfptr[230] = (melt_ptr_t) & cdat->dobj_63__NMULAPP_BINDINGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_63__NMULAPP_BINDINGS", 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_63__NMULAPP_BINDINGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_63__NMULAPP_BINDINGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_63__NMULAPP_BINDINGS.obj_num = 4; cdat->dobj_63__NMULAPP_BINDINGS.obj_hash = 449315673; cdat->dobj_63__NMULAPP_BINDINGS.obj_len = 4; /*inistring dstr_64__NMULAPP_BINDINGS*/ /*_.VALSTR___V232*/ meltfptr[231] = (melt_ptr_t) & cdat->dstr_64__NMULAPP_BINDINGS; cdat->dstr_64__NMULAPP_BINDINGS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_64__NMULAPP_BINDINGS.val, "NMULAPP_BINDINGS", sizeof (cdat->dstr_64__NMULAPP_BINDINGS.val) - 1); cdat->dstr_64__NMULAPP_BINDINGS.val[16] = (char) 0; cdat->dstr_64__NMULAPP_BINDINGS.slen = 16; /*iniobj dsym_65__NMULAPP_BODY*/ /*uniqueobj*/ if (! /*_.VALDATA___V238*/ meltfptr[237]) /*_.VALDATA___V238*/ meltfptr[237] = (melt_ptr_t) & cdat->dsym_65__NMULAPP_BODY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_65__NMULAPP_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_65__NMULAPP_BODY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_65__NMULAPP_BODY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_65__NMULAPP_BODY.obj_hash = 409103655; cdat->dsym_65__NMULAPP_BODY.obj_len = 3; /*inistring dstr_66__NMULAPP_BODY*/ /*_.VALSTR___V239*/ meltfptr[238] = (melt_ptr_t) & cdat->dstr_66__NMULAPP_BODY; cdat->dstr_66__NMULAPP_BODY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_66__NMULAPP_BODY.val, "NMULAPP_BODY", sizeof (cdat->dstr_66__NMULAPP_BODY.val) - 1); cdat->dstr_66__NMULAPP_BODY.val[12] = (char) 0; cdat->dstr_66__NMULAPP_BODY.slen = 12; /*^iniobj */ /*iniobj dobj_67__NMULAPP_BODY*/ /*_.VALDATA___V233*/ meltfptr[232] = (melt_ptr_t) & cdat->dobj_67__NMULAPP_BODY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_67__NMULAPP_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_67__NMULAPP_BODY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_67__NMULAPP_BODY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_67__NMULAPP_BODY.obj_num = 5; cdat->dobj_67__NMULAPP_BODY.obj_hash = 778140642; cdat->dobj_67__NMULAPP_BODY.obj_len = 4; /*inistring dstr_68__NMULAPP_BODY*/ /*_.VALSTR___V234*/ meltfptr[233] = (melt_ptr_t) & cdat->dstr_68__NMULAPP_BODY; cdat->dstr_68__NMULAPP_BODY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_68__NMULAPP_BODY.val, "NMULAPP_BODY", sizeof (cdat->dstr_68__NMULAPP_BODY.val) - 1); cdat->dstr_68__NMULAPP_BODY.val[12] = (char) 0; cdat->dstr_68__NMULAPP_BODY.slen = 12; /*iniobj dsym_69__CLASS_NREP_MSEND*/ /*uniqueobj*/ if (! /*_.VALDATA___V240*/ meltfptr[239]) /*_.VALDATA___V240*/ meltfptr[239] = (melt_ptr_t) & cdat->dsym_69__CLASS_NREP_MSEND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_69__CLASS_NREP_MSEND", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_69__CLASS_NREP_MSEND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_69__CLASS_NREP_MSEND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_69__CLASS_NREP_MSEND.obj_hash = 263475785; cdat->dsym_69__CLASS_NREP_MSEND.obj_len = 3; /*inistring dstr_70__CLASS_NREP_MSEND*/ /*_.VALSTR___V241*/ meltfptr[240] = (melt_ptr_t) & cdat->dstr_70__CLASS_NREP_MSEND; cdat->dstr_70__CLASS_NREP_MSEND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_70__CLASS_NREP_MSEND.val, "CLASS_NREP_MSEND", sizeof (cdat->dstr_70__CLASS_NREP_MSEND.val) - 1); cdat->dstr_70__CLASS_NREP_MSEND.val[16] = (char) 0; cdat->dstr_70__CLASS_NREP_MSEND.slen = 16; MELT_LOCATION ("warmelt-normal.melt:104:/ iniobj"); /*iniobj dobj_71__CLASS_NREP_MSEND*/ /*_.VALDATA___V242*/ meltfptr[241] = (melt_ptr_t) & cdat->dobj_71__CLASS_NREP_MSEND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_71__CLASS_NREP_MSEND", 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_71__CLASS_NREP_MSEND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_71__CLASS_NREP_MSEND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_71__CLASS_NREP_MSEND.obj_num = MELTOBMAG_OBJECT; cdat->dobj_71__CLASS_NREP_MSEND.obj_hash = 946019496; cdat->dobj_71__CLASS_NREP_MSEND.obj_len = 8; /*inistring dstr_72__CLASS_NREP_MSEND*/ /*_.VALSTR___V243*/ meltfptr[242] = (melt_ptr_t) & cdat->dstr_72__CLASS_NREP_MSEND; cdat->dstr_72__CLASS_NREP_MSEND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_72__CLASS_NREP_MSEND.val, "CLASS_NREP_MSEND", sizeof (cdat->dstr_72__CLASS_NREP_MSEND.val) - 1); cdat->dstr_72__CLASS_NREP_MSEND.val[16] = (char) 0; cdat->dstr_72__CLASS_NREP_MSEND.slen = 16; /*inimult dtup_73__CLASS_NREP_MSEND */ /*_.VALTUP___V244*/ meltfptr[243] = (melt_ptr_t) & cdat->dtup_73__CLASS_NREP_MSEND; cdat->dtup_73__CLASS_NREP_MSEND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_73__CLASS_NREP_MSEND.nbval = 5; /*inimult dtup_74__CLASS_NREP_MSEND */ /*_.VALTUP___V249*/ meltfptr[248] = (melt_ptr_t) & cdat->dtup_74__CLASS_NREP_MSEND; cdat->dtup_74__CLASS_NREP_MSEND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_74__CLASS_NREP_MSEND.nbval = 5; /*iniobj dsym_75__NSEND_SEL*/ /*uniqueobj*/ if (! /*_.VALDATA___V250*/ meltfptr[249]) /*_.VALDATA___V250*/ meltfptr[249] = (melt_ptr_t) & cdat->dsym_75__NSEND_SEL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_75__NSEND_SEL", melt_magic_discr ((melt_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__NSEND_SEL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_75__NSEND_SEL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_75__NSEND_SEL.obj_hash = 606725080; cdat->dsym_75__NSEND_SEL.obj_len = 3; /*inistring dstr_76__NSEND_SEL*/ /*_.VALSTR___V251*/ meltfptr[250] = (melt_ptr_t) & cdat->dstr_76__NSEND_SEL; cdat->dstr_76__NSEND_SEL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_76__NSEND_SEL.val, "NSEND_SEL", sizeof (cdat->dstr_76__NSEND_SEL.val) - 1); cdat->dstr_76__NSEND_SEL.val[9] = (char) 0; cdat->dstr_76__NSEND_SEL.slen = 9; /*^iniobj */ /*iniobj dobj_77__NSEND_SEL*/ /*_.VALDATA___V245*/ meltfptr[244] = (melt_ptr_t) & cdat->dobj_77__NSEND_SEL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_77__NSEND_SEL", 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_77__NSEND_SEL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_77__NSEND_SEL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_77__NSEND_SEL.obj_num = 3; cdat->dobj_77__NSEND_SEL.obj_hash = 750252574; cdat->dobj_77__NSEND_SEL.obj_len = 4; /*inistring dstr_78__NSEND_SEL*/ /*_.VALSTR___V246*/ meltfptr[245] = (melt_ptr_t) & cdat->dstr_78__NSEND_SEL; cdat->dstr_78__NSEND_SEL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_78__NSEND_SEL.val, "NSEND_SEL", sizeof (cdat->dstr_78__NSEND_SEL.val) - 1); cdat->dstr_78__NSEND_SEL.val[9] = (char) 0; cdat->dstr_78__NSEND_SEL.slen = 9; /*iniobj dsym_79__NSEND_RECV*/ /*uniqueobj*/ if (! /*_.VALDATA___V252*/ meltfptr[251]) /*_.VALDATA___V252*/ meltfptr[251] = (melt_ptr_t) & cdat->dsym_79__NSEND_RECV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_79__NSEND_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_79__NSEND_RECV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_79__NSEND_RECV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_79__NSEND_RECV.obj_hash = 381881307; cdat->dsym_79__NSEND_RECV.obj_len = 3; /*inistring dstr_80__NSEND_RECV*/ /*_.VALSTR___V253*/ meltfptr[252] = (melt_ptr_t) & cdat->dstr_80__NSEND_RECV; cdat->dstr_80__NSEND_RECV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_80__NSEND_RECV.val, "NSEND_RECV", sizeof (cdat->dstr_80__NSEND_RECV.val) - 1); cdat->dstr_80__NSEND_RECV.val[10] = (char) 0; cdat->dstr_80__NSEND_RECV.slen = 10; /*^iniobj */ /*iniobj dobj_81__NSEND_RECV*/ /*_.VALDATA___V247*/ meltfptr[246] = (melt_ptr_t) & cdat->dobj_81__NSEND_RECV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_81__NSEND_RECV", 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_81__NSEND_RECV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_81__NSEND_RECV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_81__NSEND_RECV.obj_num = 4; cdat->dobj_81__NSEND_RECV.obj_hash = 213481716; cdat->dobj_81__NSEND_RECV.obj_len = 4; /*inistring dstr_82__NSEND_RECV*/ /*_.VALSTR___V248*/ meltfptr[247] = (melt_ptr_t) & cdat->dstr_82__NSEND_RECV; cdat->dstr_82__NSEND_RECV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_82__NSEND_RECV.val, "NSEND_RECV", sizeof (cdat->dstr_82__NSEND_RECV.val) - 1); cdat->dstr_82__NSEND_RECV.val[10] = (char) 0; cdat->dstr_82__NSEND_RECV.slen = 10; /*iniobj dsym_83__CLASS_NREP_MULTIMSEND*/ /*uniqueobj*/ if (! /*_.VALDATA___V254*/ meltfptr[253]) /*_.VALDATA___V254*/ meltfptr[253] = (melt_ptr_t) & cdat->dsym_83__CLASS_NREP_MULTIMSEND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_83__CLASS_NREP_MULTIMSEND", melt_magic_discr ((melt_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_NREP_MULTIMSEND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_83__CLASS_NREP_MULTIMSEND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_83__CLASS_NREP_MULTIMSEND.obj_hash = 247075982; cdat->dsym_83__CLASS_NREP_MULTIMSEND.obj_len = 3; /*inistring dstr_84__CLASS_NREP_MULTI*/ /*_.VALSTR___V255*/ meltfptr[254] = (melt_ptr_t) & cdat->dstr_84__CLASS_NREP_MULTI; cdat->dstr_84__CLASS_NREP_MULTI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_84__CLASS_NREP_MULTI.val, "CLASS_NREP_MULTIMSEND", sizeof (cdat->dstr_84__CLASS_NREP_MULTI.val) - 1); cdat->dstr_84__CLASS_NREP_MULTI.val[21] = (char) 0; cdat->dstr_84__CLASS_NREP_MULTI.slen = 21; MELT_LOCATION ("warmelt-normal.melt:117:/ iniobj"); /*iniobj dobj_85__CLASS_NREP_MULTIMSEND*/ /*_.VALDATA___V256*/ meltfptr[255] = (melt_ptr_t) & cdat->dobj_85__CLASS_NREP_MULTIMSEND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_85__CLASS_NREP_MULTIMSEND", 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_85__CLASS_NREP_MULTIMSEND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_85__CLASS_NREP_MULTIMSEND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_85__CLASS_NREP_MULTIMSEND.obj_num = MELTOBMAG_OBJECT; cdat->dobj_85__CLASS_NREP_MULTIMSEND.obj_hash = 557962260; cdat->dobj_85__CLASS_NREP_MULTIMSEND.obj_len = 8; /*inistring dstr_86__CLASS_NREP_MULTI*/ /*_.VALSTR___V257*/ meltfptr[256] = (melt_ptr_t) & cdat->dstr_86__CLASS_NREP_MULTI; cdat->dstr_86__CLASS_NREP_MULTI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_86__CLASS_NREP_MULTI.val, "CLASS_NREP_MULTIMSEND", sizeof (cdat->dstr_86__CLASS_NREP_MULTI.val) - 1); cdat->dstr_86__CLASS_NREP_MULTI.val[21] = (char) 0; cdat->dstr_86__CLASS_NREP_MULTI.slen = 21; /*inimult dtup_87__CLASS_NREP_MULTIMSEND */ /*_.VALTUP___V258*/ meltfptr[257] = (melt_ptr_t) & cdat->dtup_87__CLASS_NREP_MULTIMSEND; cdat->dtup_87__CLASS_NREP_MULTIMSEND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_87__CLASS_NREP_MULTIMSEND.nbval = 6; /*inimult dtup_88__CLASS_NREP_MULTIMSEND */ /*_.VALTUP___V263*/ meltfptr[262] = (melt_ptr_t) & cdat->dtup_88__CLASS_NREP_MULTIMSEND; cdat->dtup_88__CLASS_NREP_MULTIMSEND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_88__CLASS_NREP_MULTIMSEND.nbval = 7; /*iniobj dsym_89__NMULSEND_BINDINGS*/ /*uniqueobj*/ if (! /*_.VALDATA___V264*/ meltfptr[263]) /*_.VALDATA___V264*/ meltfptr[263] = (melt_ptr_t) & cdat->dsym_89__NMULSEND_BINDINGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_89__NMULSEND_BINDINGS", melt_magic_discr ((melt_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__NMULSEND_BINDINGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_89__NMULSEND_BINDINGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_89__NMULSEND_BINDINGS.obj_hash = 101567715; cdat->dsym_89__NMULSEND_BINDINGS.obj_len = 3; /*inistring dstr_90__NMULSEND_BINDING*/ /*_.VALSTR___V265*/ meltfptr[264] = (melt_ptr_t) & cdat->dstr_90__NMULSEND_BINDING; cdat->dstr_90__NMULSEND_BINDING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_90__NMULSEND_BINDING.val, "NMULSEND_BINDINGS", sizeof (cdat->dstr_90__NMULSEND_BINDING.val) - 1); cdat->dstr_90__NMULSEND_BINDING.val[17] = (char) 0; cdat->dstr_90__NMULSEND_BINDING.slen = 17; /*^iniobj */ /*iniobj dobj_91__NMULSEND_BINDINGS*/ /*_.VALDATA___V259*/ meltfptr[258] = (melt_ptr_t) & cdat->dobj_91__NMULSEND_BINDINGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_91__NMULSEND_BINDINGS", 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_91__NMULSEND_BINDINGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_91__NMULSEND_BINDINGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_91__NMULSEND_BINDINGS.obj_num = 5; cdat->dobj_91__NMULSEND_BINDINGS.obj_hash = 278314086; cdat->dobj_91__NMULSEND_BINDINGS.obj_len = 4; /*inistring dstr_92__NMULSEND_BINDING*/ /*_.VALSTR___V260*/ meltfptr[259] = (melt_ptr_t) & cdat->dstr_92__NMULSEND_BINDING; cdat->dstr_92__NMULSEND_BINDING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_92__NMULSEND_BINDING.val, "NMULSEND_BINDINGS", sizeof (cdat->dstr_92__NMULSEND_BINDING.val) - 1); cdat->dstr_92__NMULSEND_BINDING.val[17] = (char) 0; cdat->dstr_92__NMULSEND_BINDING.slen = 17; /*iniobj dsym_93__NMULSEND_BODY*/ /*uniqueobj*/ if (! /*_.VALDATA___V266*/ meltfptr[265]) /*_.VALDATA___V266*/ meltfptr[265] = (melt_ptr_t) & cdat->dsym_93__NMULSEND_BODY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_93__NMULSEND_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_93__NMULSEND_BODY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_93__NMULSEND_BODY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_93__NMULSEND_BODY.obj_hash = 552748717; cdat->dsym_93__NMULSEND_BODY.obj_len = 3; /*inistring dstr_94__NMULSEND_BODY*/ /*_.VALSTR___V267*/ meltfptr[266] = (melt_ptr_t) & cdat->dstr_94__NMULSEND_BODY; cdat->dstr_94__NMULSEND_BODY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_94__NMULSEND_BODY.val, "NMULSEND_BODY", sizeof (cdat->dstr_94__NMULSEND_BODY.val) - 1); cdat->dstr_94__NMULSEND_BODY.val[13] = (char) 0; cdat->dstr_94__NMULSEND_BODY.slen = 13; /*^iniobj */ /*iniobj dobj_95__NMULSEND_BODY*/ /*_.VALDATA___V261*/ meltfptr[260] = (melt_ptr_t) & cdat->dobj_95__NMULSEND_BODY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_95__NMULSEND_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_95__NMULSEND_BODY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_95__NMULSEND_BODY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_95__NMULSEND_BODY.obj_num = 6; cdat->dobj_95__NMULSEND_BODY.obj_hash = 754407166; cdat->dobj_95__NMULSEND_BODY.obj_len = 4; /*inistring dstr_96__NMULSEND_BODY*/ /*_.VALSTR___V262*/ meltfptr[261] = (melt_ptr_t) & cdat->dstr_96__NMULSEND_BODY; cdat->dstr_96__NMULSEND_BODY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_96__NMULSEND_BODY.val, "NMULSEND_BODY", sizeof (cdat->dstr_96__NMULSEND_BODY.val) - 1); cdat->dstr_96__NMULSEND_BODY.val[13] = (char) 0; cdat->dstr_96__NMULSEND_BODY.slen = 13; /*iniobj dsym_97__CLASS_NREP_CHUNK*/ /*uniqueobj*/ if (! /*_.VALDATA___V268*/ meltfptr[267]) /*_.VALDATA___V268*/ meltfptr[267] = (melt_ptr_t) & cdat->dsym_97__CLASS_NREP_CHUNK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_97__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_97__CLASS_NREP_CHUNK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_97__CLASS_NREP_CHUNK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_97__CLASS_NREP_CHUNK.obj_hash = 877025959; cdat->dsym_97__CLASS_NREP_CHUNK.obj_len = 3; /*inistring dstr_98__CLASS_NREP_CHUNK*/ /*_.VALSTR___V269*/ meltfptr[268] = (melt_ptr_t) & cdat->dstr_98__CLASS_NREP_CHUNK; cdat->dstr_98__CLASS_NREP_CHUNK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_98__CLASS_NREP_CHUNK.val, "CLASS_NREP_CHUNK", sizeof (cdat->dstr_98__CLASS_NREP_CHUNK.val) - 1); cdat->dstr_98__CLASS_NREP_CHUNK.val[16] = (char) 0; cdat->dstr_98__CLASS_NREP_CHUNK.slen = 16; MELT_LOCATION ("warmelt-normal.melt:127:/ iniobj"); /*iniobj dobj_99__CLASS_NREP_CHUNK*/ /*_.VALDATA___V270*/ meltfptr[269] = (melt_ptr_t) & cdat->dobj_99__CLASS_NREP_CHUNK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_99__CLASS_NREP_CHUNK", 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_99__CLASS_NREP_CHUNK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_99__CLASS_NREP_CHUNK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_99__CLASS_NREP_CHUNK.obj_num = MELTOBMAG_OBJECT; cdat->dobj_99__CLASS_NREP_CHUNK.obj_hash = 805672081; cdat->dobj_99__CLASS_NREP_CHUNK.obj_len = 8; /*inistring dstr_100__CLASS_NREP_CHUNK*/ /*_.VALSTR___V271*/ meltfptr[270] = (melt_ptr_t) & cdat->dstr_100__CLASS_NREP_CHUNK; cdat->dstr_100__CLASS_NREP_CHUNK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_100__CLASS_NREP_CHUNK.val, "CLASS_NREP_CHUNK", sizeof (cdat->dstr_100__CLASS_NREP_CHUNK. val) - 1); cdat->dstr_100__CLASS_NREP_CHUNK.val[16] = (char) 0; cdat->dstr_100__CLASS_NREP_CHUNK.slen = 16; /*inimult dtup_101__CLASS_NREP_CHUNK */ /*_.VALTUP___V272*/ meltfptr[271] = (melt_ptr_t) & cdat->dtup_101__CLASS_NREP_CHUNK; cdat->dtup_101__CLASS_NREP_CHUNK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_101__CLASS_NREP_CHUNK.nbval = 4; /*inimult dtup_102__CLASS_NREP_CHUNK */ /*_.VALTUP___V277*/ meltfptr[276] = (melt_ptr_t) & cdat->dtup_102__CLASS_NREP_CHUNK; cdat->dtup_102__CLASS_NREP_CHUNK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_102__CLASS_NREP_CHUNK.nbval = 4; /*iniobj dsym_103__NCHUNK_EXPANSION*/ /*uniqueobj*/ if (! /*_.VALDATA___V278*/ meltfptr[277]) /*_.VALDATA___V278*/ meltfptr[277] = (melt_ptr_t) & cdat->dsym_103__NCHUNK_EXPANSION; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_103__NCHUNK_EXPANSION", melt_magic_discr ((melt_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__NCHUNK_EXPANSION", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_103__NCHUNK_EXPANSION.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_103__NCHUNK_EXPANSION.obj_hash = 1032608834; cdat->dsym_103__NCHUNK_EXPANSION.obj_len = 3; /*inistring dstr_104__NCHUNK_EXPANSION*/ /*_.VALSTR___V279*/ meltfptr[278] = (melt_ptr_t) & cdat->dstr_104__NCHUNK_EXPANSION; cdat->dstr_104__NCHUNK_EXPANSION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_104__NCHUNK_EXPANSION.val, "NCHUNK_EXPANSION", sizeof (cdat->dstr_104__NCHUNK_EXPANSION. val) - 1); cdat->dstr_104__NCHUNK_EXPANSION.val[16] = (char) 0; cdat->dstr_104__NCHUNK_EXPANSION.slen = 16; /*^iniobj */ /*iniobj dobj_105__NCHUNK_EXPANSION*/ /*_.VALDATA___V273*/ meltfptr[272] = (melt_ptr_t) & cdat->dobj_105__NCHUNK_EXPANSION; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_105__NCHUNK_EXPANSION", 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_105__NCHUNK_EXPANSION", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_105__NCHUNK_EXPANSION.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_105__NCHUNK_EXPANSION.obj_num = 2; cdat->dobj_105__NCHUNK_EXPANSION.obj_hash = 850075141; cdat->dobj_105__NCHUNK_EXPANSION.obj_len = 4; /*inistring dstr_106__NCHUNK_EXPANSION*/ /*_.VALSTR___V274*/ meltfptr[273] = (melt_ptr_t) & cdat->dstr_106__NCHUNK_EXPANSION; cdat->dstr_106__NCHUNK_EXPANSION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_106__NCHUNK_EXPANSION.val, "NCHUNK_EXPANSION", sizeof (cdat->dstr_106__NCHUNK_EXPANSION. val) - 1); cdat->dstr_106__NCHUNK_EXPANSION.val[16] = (char) 0; cdat->dstr_106__NCHUNK_EXPANSION.slen = 16; /*iniobj dsym_107__NCHUNK_OPER*/ /*uniqueobj*/ if (! /*_.VALDATA___V280*/ meltfptr[279]) /*_.VALDATA___V280*/ meltfptr[279] = (melt_ptr_t) & cdat->dsym_107__NCHUNK_OPER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_107__NCHUNK_OPER", melt_magic_discr ((melt_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__NCHUNK_OPER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_107__NCHUNK_OPER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_107__NCHUNK_OPER.obj_hash = 824160223; cdat->dsym_107__NCHUNK_OPER.obj_len = 3; /*inistring dstr_108__NCHUNK_OPER*/ /*_.VALSTR___V281*/ meltfptr[280] = (melt_ptr_t) & cdat->dstr_108__NCHUNK_OPER; cdat->dstr_108__NCHUNK_OPER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_108__NCHUNK_OPER.val, "NCHUNK_OPER", sizeof (cdat->dstr_108__NCHUNK_OPER.val) - 1); cdat->dstr_108__NCHUNK_OPER.val[11] = (char) 0; cdat->dstr_108__NCHUNK_OPER.slen = 11; /*^iniobj */ /*iniobj dobj_109__NCHUNK_OPER*/ /*_.VALDATA___V275*/ meltfptr[274] = (melt_ptr_t) & cdat->dobj_109__NCHUNK_OPER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_109__NCHUNK_OPER", 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_109__NCHUNK_OPER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_109__NCHUNK_OPER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_109__NCHUNK_OPER.obj_num = 3; cdat->dobj_109__NCHUNK_OPER.obj_hash = 390278551; cdat->dobj_109__NCHUNK_OPER.obj_len = 4; /*inistring dstr_110__NCHUNK_OPER*/ /*_.VALSTR___V276*/ meltfptr[275] = (melt_ptr_t) & cdat->dstr_110__NCHUNK_OPER; cdat->dstr_110__NCHUNK_OPER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_110__NCHUNK_OPER.val, "NCHUNK_OPER", sizeof (cdat->dstr_110__NCHUNK_OPER.val) - 1); cdat->dstr_110__NCHUNK_OPER.val[11] = (char) 0; cdat->dstr_110__NCHUNK_OPER.slen = 11; /*iniobj dsym_111__CLASS_NREP_COMMENT*/ /*uniqueobj*/ if (! /*_.VALDATA___V282*/ meltfptr[281]) /*_.VALDATA___V282*/ meltfptr[281] = (melt_ptr_t) & cdat->dsym_111__CLASS_NREP_COMMENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_111__CLASS_NREP_COMMENT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_111__CLASS_NREP_COMMENT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_111__CLASS_NREP_COMMENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_111__CLASS_NREP_COMMENT.obj_hash = 351814368; cdat->dsym_111__CLASS_NREP_COMMENT.obj_len = 3; /*inistring dstr_112__CLASS_NREP_COMME*/ /*_.VALSTR___V283*/ meltfptr[282] = (melt_ptr_t) & cdat->dstr_112__CLASS_NREP_COMME; cdat->dstr_112__CLASS_NREP_COMME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_112__CLASS_NREP_COMME.val, "CLASS_NREP_COMMENT", sizeof (cdat->dstr_112__CLASS_NREP_COMME. val) - 1); cdat->dstr_112__CLASS_NREP_COMME.val[18] = (char) 0; cdat->dstr_112__CLASS_NREP_COMME.slen = 18; MELT_LOCATION ("warmelt-normal.melt:138:/ iniobj"); /*iniobj dobj_113__CLASS_NREP_COMMENT*/ /*_.VALDATA___V284*/ meltfptr[283] = (melt_ptr_t) & cdat->dobj_113__CLASS_NREP_COMMENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_113__CLASS_NREP_COMMENT", 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_113__CLASS_NREP_COMMENT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_113__CLASS_NREP_COMMENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_113__CLASS_NREP_COMMENT.obj_num = MELTOBMAG_OBJECT; cdat->dobj_113__CLASS_NREP_COMMENT.obj_hash = 103524164; cdat->dobj_113__CLASS_NREP_COMMENT.obj_len = 8; /*inistring dstr_114__CLASS_NREP_COMME*/ /*_.VALSTR___V285*/ meltfptr[284] = (melt_ptr_t) & cdat->dstr_114__CLASS_NREP_COMME; cdat->dstr_114__CLASS_NREP_COMME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_114__CLASS_NREP_COMME.val, "CLASS_NREP_COMMENT", sizeof (cdat->dstr_114__CLASS_NREP_COMME. val) - 1); cdat->dstr_114__CLASS_NREP_COMME.val[18] = (char) 0; cdat->dstr_114__CLASS_NREP_COMME.slen = 18; /*inimult dtup_115__CLASS_NREP_COMMENT */ /*_.VALTUP___V286*/ meltfptr[285] = (melt_ptr_t) & cdat->dtup_115__CLASS_NREP_COMMENT; cdat->dtup_115__CLASS_NREP_COMMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_115__CLASS_NREP_COMMENT.nbval = 3; /*inimult dtup_116__CLASS_NREP_COMMENT */ /*_.VALTUP___V289*/ meltfptr[288] = (melt_ptr_t) & cdat->dtup_116__CLASS_NREP_COMMENT; cdat->dtup_116__CLASS_NREP_COMMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_116__CLASS_NREP_COMMENT.nbval = 2; /*iniobj dsym_117__NCOMM_STRING*/ /*uniqueobj*/ if (! /*_.VALDATA___V290*/ meltfptr[289]) /*_.VALDATA___V290*/ meltfptr[289] = (melt_ptr_t) & cdat->dsym_117__NCOMM_STRING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_117__NCOMM_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_117__NCOMM_STRING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_117__NCOMM_STRING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_117__NCOMM_STRING.obj_hash = 540109865; cdat->dsym_117__NCOMM_STRING.obj_len = 3; /*inistring dstr_118__NCOMM_STRING*/ /*_.VALSTR___V291*/ meltfptr[290] = (melt_ptr_t) & cdat->dstr_118__NCOMM_STRING; cdat->dstr_118__NCOMM_STRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_118__NCOMM_STRING.val, "NCOMM_STRING", sizeof (cdat->dstr_118__NCOMM_STRING.val) - 1); cdat->dstr_118__NCOMM_STRING.val[12] = (char) 0; cdat->dstr_118__NCOMM_STRING.slen = 12; /*^iniobj */ /*iniobj dobj_119__NCOMM_STRING*/ /*_.VALDATA___V287*/ meltfptr[286] = (melt_ptr_t) & cdat->dobj_119__NCOMM_STRING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_119__NCOMM_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_119__NCOMM_STRING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_119__NCOMM_STRING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_119__NCOMM_STRING.obj_num = 1; cdat->dobj_119__NCOMM_STRING.obj_hash = 163555899; cdat->dobj_119__NCOMM_STRING.obj_len = 4; /*inistring dstr_120__NCOMM_STRING*/ /*_.VALSTR___V288*/ meltfptr[287] = (melt_ptr_t) & cdat->dstr_120__NCOMM_STRING; cdat->dstr_120__NCOMM_STRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_120__NCOMM_STRING.val, "NCOMM_STRING", sizeof (cdat->dstr_120__NCOMM_STRING.val) - 1); cdat->dstr_120__NCOMM_STRING.val[12] = (char) 0; cdat->dstr_120__NCOMM_STRING.slen = 12; /*iniobj dsym_121__CLASS_NREP_LET*/ /*uniqueobj*/ if (! /*_.VALDATA___V292*/ meltfptr[291]) /*_.VALDATA___V292*/ meltfptr[291] = (melt_ptr_t) & cdat->dsym_121__CLASS_NREP_LET; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_121__CLASS_NREP_LET", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_121__CLASS_NREP_LET", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_121__CLASS_NREP_LET.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_121__CLASS_NREP_LET.obj_hash = 726308322; cdat->dsym_121__CLASS_NREP_LET.obj_len = 3; /*inistring dstr_122__CLASS_NREP_LET*/ /*_.VALSTR___V293*/ meltfptr[292] = (melt_ptr_t) & cdat->dstr_122__CLASS_NREP_LET; cdat->dstr_122__CLASS_NREP_LET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_122__CLASS_NREP_LET.val, "CLASS_NREP_LET", sizeof (cdat->dstr_122__CLASS_NREP_LET.val) - 1); cdat->dstr_122__CLASS_NREP_LET.val[14] = (char) 0; cdat->dstr_122__CLASS_NREP_LET.slen = 14; MELT_LOCATION ("warmelt-normal.melt:146:/ iniobj"); /*iniobj dobj_123__CLASS_NREP_LET*/ /*_.VALDATA___V294*/ meltfptr[293] = (melt_ptr_t) & cdat->dobj_123__CLASS_NREP_LET; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_123__CLASS_NREP_LET", 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_123__CLASS_NREP_LET", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_123__CLASS_NREP_LET.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_123__CLASS_NREP_LET.obj_num = MELTOBMAG_OBJECT; cdat->dobj_123__CLASS_NREP_LET.obj_hash = 27009049; cdat->dobj_123__CLASS_NREP_LET.obj_len = 8; /*inistring dstr_124__CLASS_NREP_LET*/ /*_.VALSTR___V295*/ meltfptr[294] = (melt_ptr_t) & cdat->dstr_124__CLASS_NREP_LET; cdat->dstr_124__CLASS_NREP_LET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_124__CLASS_NREP_LET.val, "CLASS_NREP_LET", sizeof (cdat->dstr_124__CLASS_NREP_LET.val) - 1); cdat->dstr_124__CLASS_NREP_LET.val[14] = (char) 0; cdat->dstr_124__CLASS_NREP_LET.slen = 14; /*inimult dtup_125__CLASS_NREP_LET */ /*_.VALTUP___V296*/ meltfptr[295] = (melt_ptr_t) & cdat->dtup_125__CLASS_NREP_LET; cdat->dtup_125__CLASS_NREP_LET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_125__CLASS_NREP_LET.nbval = 3; /*inimult dtup_126__CLASS_NREP_LET */ /*_.VALTUP___V301*/ meltfptr[300] = (melt_ptr_t) & cdat->dtup_126__CLASS_NREP_LET; cdat->dtup_126__CLASS_NREP_LET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_126__CLASS_NREP_LET.nbval = 3; /*iniobj dsym_127__NLET_BINDINGS*/ /*uniqueobj*/ if (! /*_.VALDATA___V302*/ meltfptr[301]) /*_.VALDATA___V302*/ meltfptr[301] = (melt_ptr_t) & cdat->dsym_127__NLET_BINDINGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_127__NLET_BINDINGS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_127__NLET_BINDINGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_127__NLET_BINDINGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_127__NLET_BINDINGS.obj_hash = 736029644; cdat->dsym_127__NLET_BINDINGS.obj_len = 3; /*inistring dstr_128__NLET_BINDINGS*/ /*_.VALSTR___V303*/ meltfptr[302] = (melt_ptr_t) & cdat->dstr_128__NLET_BINDINGS; cdat->dstr_128__NLET_BINDINGS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_128__NLET_BINDINGS.val, "NLET_BINDINGS", sizeof (cdat->dstr_128__NLET_BINDINGS.val) - 1); cdat->dstr_128__NLET_BINDINGS.val[13] = (char) 0; cdat->dstr_128__NLET_BINDINGS.slen = 13; /*^iniobj */ /*iniobj dobj_129__NLET_BINDINGS*/ /*_.VALDATA___V297*/ meltfptr[296] = (melt_ptr_t) & cdat->dobj_129__NLET_BINDINGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_129__NLET_BINDINGS", 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_129__NLET_BINDINGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_129__NLET_BINDINGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_129__NLET_BINDINGS.obj_num = 1; cdat->dobj_129__NLET_BINDINGS.obj_hash = 42714719; cdat->dobj_129__NLET_BINDINGS.obj_len = 4; /*inistring dstr_130__NLET_BINDINGS*/ /*_.VALSTR___V298*/ meltfptr[297] = (melt_ptr_t) & cdat->dstr_130__NLET_BINDINGS; cdat->dstr_130__NLET_BINDINGS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_130__NLET_BINDINGS.val, "NLET_BINDINGS", sizeof (cdat->dstr_130__NLET_BINDINGS.val) - 1); cdat->dstr_130__NLET_BINDINGS.val[13] = (char) 0; cdat->dstr_130__NLET_BINDINGS.slen = 13; /*iniobj dsym_131__NLET_BODY*/ /*uniqueobj*/ if (! /*_.VALDATA___V304*/ meltfptr[303]) /*_.VALDATA___V304*/ meltfptr[303] = (melt_ptr_t) & cdat->dsym_131__NLET_BODY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_131__NLET_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_131__NLET_BODY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_131__NLET_BODY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_131__NLET_BODY.obj_hash = 870540515; cdat->dsym_131__NLET_BODY.obj_len = 3; /*inistring dstr_132__NLET_BODY*/ /*_.VALSTR___V305*/ meltfptr[304] = (melt_ptr_t) & cdat->dstr_132__NLET_BODY; cdat->dstr_132__NLET_BODY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_132__NLET_BODY.val, "NLET_BODY", sizeof (cdat->dstr_132__NLET_BODY.val) - 1); cdat->dstr_132__NLET_BODY.val[9] = (char) 0; cdat->dstr_132__NLET_BODY.slen = 9; /*^iniobj */ /*iniobj dobj_133__NLET_BODY*/ /*_.VALDATA___V299*/ meltfptr[298] = (melt_ptr_t) & cdat->dobj_133__NLET_BODY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_133__NLET_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_133__NLET_BODY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_133__NLET_BODY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_133__NLET_BODY.obj_num = 2; cdat->dobj_133__NLET_BODY.obj_hash = 1017058549; cdat->dobj_133__NLET_BODY.obj_len = 4; /*inistring dstr_134__NLET_BODY*/ /*_.VALSTR___V300*/ meltfptr[299] = (melt_ptr_t) & cdat->dstr_134__NLET_BODY; cdat->dstr_134__NLET_BODY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_134__NLET_BODY.val, "NLET_BODY", sizeof (cdat->dstr_134__NLET_BODY.val) - 1); cdat->dstr_134__NLET_BODY.val[9] = (char) 0; cdat->dstr_134__NLET_BODY.slen = 9; /*iniobj dsym_135__CLASS_NREP_LETREC*/ /*uniqueobj*/ if (! /*_.VALDATA___V306*/ meltfptr[305]) /*_.VALDATA___V306*/ meltfptr[305] = (melt_ptr_t) & cdat->dsym_135__CLASS_NREP_LETREC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_135__CLASS_NREP_LETREC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_135__CLASS_NREP_LETREC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_135__CLASS_NREP_LETREC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_135__CLASS_NREP_LETREC.obj_hash = 229582462; cdat->dsym_135__CLASS_NREP_LETREC.obj_len = 3; /*inistring dstr_136__CLASS_NREP_LETRE*/ /*_.VALSTR___V307*/ meltfptr[306] = (melt_ptr_t) & cdat->dstr_136__CLASS_NREP_LETRE; cdat->dstr_136__CLASS_NREP_LETRE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_136__CLASS_NREP_LETRE.val, "CLASS_NREP_LETREC", sizeof (cdat->dstr_136__CLASS_NREP_LETRE. val) - 1); cdat->dstr_136__CLASS_NREP_LETRE.val[17] = (char) 0; cdat->dstr_136__CLASS_NREP_LETRE.slen = 17; MELT_LOCATION ("warmelt-normal.melt:157:/ iniobj"); /*iniobj dobj_137__CLASS_NREP_LETREC*/ /*_.VALDATA___V308*/ meltfptr[307] = (melt_ptr_t) & cdat->dobj_137__CLASS_NREP_LETREC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_137__CLASS_NREP_LETREC", 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_137__CLASS_NREP_LETREC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_137__CLASS_NREP_LETREC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_137__CLASS_NREP_LETREC.obj_num = MELTOBMAG_OBJECT; cdat->dobj_137__CLASS_NREP_LETREC.obj_hash = 653024069; cdat->dobj_137__CLASS_NREP_LETREC.obj_len = 8; /*inistring dstr_138__CLASS_NREP_LETRE*/ /*_.VALSTR___V309*/ meltfptr[308] = (melt_ptr_t) & cdat->dstr_138__CLASS_NREP_LETRE; cdat->dstr_138__CLASS_NREP_LETRE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_138__CLASS_NREP_LETRE.val, "CLASS_NREP_LETREC", sizeof (cdat->dstr_138__CLASS_NREP_LETRE. val) - 1); cdat->dstr_138__CLASS_NREP_LETRE.val[17] = (char) 0; cdat->dstr_138__CLASS_NREP_LETRE.slen = 17; /*inimult dtup_139__CLASS_NREP_LETREC */ /*_.VALTUP___V310*/ meltfptr[309] = (melt_ptr_t) & cdat->dtup_139__CLASS_NREP_LETREC; cdat->dtup_139__CLASS_NREP_LETREC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_139__CLASS_NREP_LETREC.nbval = 4; /*inimult dtup_140__CLASS_NREP_LETREC */ /*_.VALTUP___V317*/ meltfptr[316] = (melt_ptr_t) & cdat->dtup_140__CLASS_NREP_LETREC; cdat->dtup_140__CLASS_NREP_LETREC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_140__CLASS_NREP_LETREC.nbval = 6; /*iniobj dsym_141__NLETREC_FILL_BINDINGS*/ /*uniqueobj*/ if (! /*_.VALDATA___V318*/ meltfptr[317]) /*_.VALDATA___V318*/ meltfptr[317] = (melt_ptr_t) & cdat->dsym_141__NLETREC_FILL_BINDINGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_141__NLETREC_FILL_BINDINGS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_141__NLETREC_FILL_BINDINGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_141__NLETREC_FILL_BINDINGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_141__NLETREC_FILL_BINDINGS.obj_hash = 929770297; cdat->dsym_141__NLETREC_FILL_BINDINGS.obj_len = 3; /*inistring dstr_142__NLETREC_FILL_BIN*/ /*_.VALSTR___V319*/ meltfptr[318] = (melt_ptr_t) & cdat->dstr_142__NLETREC_FILL_BIN; cdat->dstr_142__NLETREC_FILL_BIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_142__NLETREC_FILL_BIN.val, "NLETREC_FILL_BINDINGS", sizeof (cdat->dstr_142__NLETREC_FILL_BIN. val) - 1); cdat->dstr_142__NLETREC_FILL_BIN.val[21] = (char) 0; cdat->dstr_142__NLETREC_FILL_BIN.slen = 21; /*^iniobj */ /*iniobj dobj_143__NLETREC_FILL_BINDINGS*/ /*_.VALDATA___V311*/ meltfptr[310] = (melt_ptr_t) & cdat->dobj_143__NLETREC_FILL_BINDINGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_143__NLETREC_FILL_BINDINGS", 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_143__NLETREC_FILL_BINDINGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_143__NLETREC_FILL_BINDINGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_143__NLETREC_FILL_BINDINGS.obj_num = 3; cdat->dobj_143__NLETREC_FILL_BINDINGS.obj_hash = 434889911; cdat->dobj_143__NLETREC_FILL_BINDINGS.obj_len = 4; /*inistring dstr_144__NLETREC_FILL_BIN*/ /*_.VALSTR___V312*/ meltfptr[311] = (melt_ptr_t) & cdat->dstr_144__NLETREC_FILL_BIN; cdat->dstr_144__NLETREC_FILL_BIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_144__NLETREC_FILL_BIN.val, "NLETREC_FILL_BINDINGS", sizeof (cdat->dstr_144__NLETREC_FILL_BIN. val) - 1); cdat->dstr_144__NLETREC_FILL_BIN.val[21] = (char) 0; cdat->dstr_144__NLETREC_FILL_BIN.slen = 21; /*iniobj dsym_145__NLETREC_BODY_BINDINGS*/ /*uniqueobj*/ if (! /*_.VALDATA___V320*/ meltfptr[319]) /*_.VALDATA___V320*/ meltfptr[319] = (melt_ptr_t) & cdat->dsym_145__NLETREC_BODY_BINDINGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_145__NLETREC_BODY_BINDINGS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_145__NLETREC_BODY_BINDINGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_145__NLETREC_BODY_BINDINGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_145__NLETREC_BODY_BINDINGS.obj_hash = 386622818; cdat->dsym_145__NLETREC_BODY_BINDINGS.obj_len = 3; /*inistring dstr_146__NLETREC_BODY_BIN*/ /*_.VALSTR___V321*/ meltfptr[320] = (melt_ptr_t) & cdat->dstr_146__NLETREC_BODY_BIN; cdat->dstr_146__NLETREC_BODY_BIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_146__NLETREC_BODY_BIN.val, "NLETREC_BODY_BINDINGS", sizeof (cdat->dstr_146__NLETREC_BODY_BIN. val) - 1); cdat->dstr_146__NLETREC_BODY_BIN.val[21] = (char) 0; cdat->dstr_146__NLETREC_BODY_BIN.slen = 21; /*^iniobj */ /*iniobj dobj_147__NLETREC_BODY_BINDINGS*/ /*_.VALDATA___V313*/ meltfptr[312] = (melt_ptr_t) & cdat->dobj_147__NLETREC_BODY_BINDINGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_147__NLETREC_BODY_BINDINGS", 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_147__NLETREC_BODY_BINDINGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_147__NLETREC_BODY_BINDINGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_147__NLETREC_BODY_BINDINGS.obj_num = 4; cdat->dobj_147__NLETREC_BODY_BINDINGS.obj_hash = 245797350; cdat->dobj_147__NLETREC_BODY_BINDINGS.obj_len = 4; /*inistring dstr_148__NLETREC_BODY_BIN*/ /*_.VALSTR___V314*/ meltfptr[313] = (melt_ptr_t) & cdat->dstr_148__NLETREC_BODY_BIN; cdat->dstr_148__NLETREC_BODY_BIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_148__NLETREC_BODY_BIN.val, "NLETREC_BODY_BINDINGS", sizeof (cdat->dstr_148__NLETREC_BODY_BIN. val) - 1); cdat->dstr_148__NLETREC_BODY_BIN.val[21] = (char) 0; cdat->dstr_148__NLETREC_BODY_BIN.slen = 21; /*iniobj dsym_149__NLETREC_LOCSYMS*/ /*uniqueobj*/ if (! /*_.VALDATA___V322*/ meltfptr[321]) /*_.VALDATA___V322*/ meltfptr[321] = (melt_ptr_t) & cdat->dsym_149__NLETREC_LOCSYMS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_149__NLETREC_LOCSYMS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_149__NLETREC_LOCSYMS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_149__NLETREC_LOCSYMS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_149__NLETREC_LOCSYMS.obj_hash = 86399232; cdat->dsym_149__NLETREC_LOCSYMS.obj_len = 3; /*inistring dstr_150__NLETREC_LOCSYMS*/ /*_.VALSTR___V323*/ meltfptr[322] = (melt_ptr_t) & cdat->dstr_150__NLETREC_LOCSYMS; cdat->dstr_150__NLETREC_LOCSYMS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_150__NLETREC_LOCSYMS.val, "NLETREC_LOCSYMS", sizeof (cdat->dstr_150__NLETREC_LOCSYMS.val) - 1); cdat->dstr_150__NLETREC_LOCSYMS.val[15] = (char) 0; cdat->dstr_150__NLETREC_LOCSYMS.slen = 15; /*^iniobj */ /*iniobj dobj_151__NLETREC_LOCSYMS*/ /*_.VALDATA___V315*/ meltfptr[314] = (melt_ptr_t) & cdat->dobj_151__NLETREC_LOCSYMS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_151__NLETREC_LOCSYMS", 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_151__NLETREC_LOCSYMS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_151__NLETREC_LOCSYMS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_151__NLETREC_LOCSYMS.obj_num = 5; cdat->dobj_151__NLETREC_LOCSYMS.obj_hash = 641959604; cdat->dobj_151__NLETREC_LOCSYMS.obj_len = 4; /*inistring dstr_152__NLETREC_LOCSYMS*/ /*_.VALSTR___V316*/ meltfptr[315] = (melt_ptr_t) & cdat->dstr_152__NLETREC_LOCSYMS; cdat->dstr_152__NLETREC_LOCSYMS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_152__NLETREC_LOCSYMS.val, "NLETREC_LOCSYMS", sizeof (cdat->dstr_152__NLETREC_LOCSYMS.val) - 1); cdat->dstr_152__NLETREC_LOCSYMS.val[15] = (char) 0; cdat->dstr_152__NLETREC_LOCSYMS.slen = 15; /*iniobj dsym_153__CLASS_NREP_RETURN*/ /*uniqueobj*/ if (! /*_.VALDATA___V324*/ meltfptr[323]) /*_.VALDATA___V324*/ meltfptr[323] = (melt_ptr_t) & cdat->dsym_153__CLASS_NREP_RETURN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_153__CLASS_NREP_RETURN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_153__CLASS_NREP_RETURN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_153__CLASS_NREP_RETURN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_153__CLASS_NREP_RETURN.obj_hash = 622944524; cdat->dsym_153__CLASS_NREP_RETURN.obj_len = 3; /*inistring dstr_154__CLASS_NREP_RETUR*/ /*_.VALSTR___V325*/ meltfptr[324] = (melt_ptr_t) & cdat->dstr_154__CLASS_NREP_RETUR; cdat->dstr_154__CLASS_NREP_RETUR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_154__CLASS_NREP_RETUR.val, "CLASS_NREP_RETURN", sizeof (cdat->dstr_154__CLASS_NREP_RETUR. val) - 1); cdat->dstr_154__CLASS_NREP_RETUR.val[17] = (char) 0; cdat->dstr_154__CLASS_NREP_RETUR.slen = 17; MELT_LOCATION ("warmelt-normal.melt:172:/ iniobj"); /*iniobj dobj_155__CLASS_NREP_RETURN*/ /*_.VALDATA___V326*/ meltfptr[325] = (melt_ptr_t) & cdat->dobj_155__CLASS_NREP_RETURN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_155__CLASS_NREP_RETURN", 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_155__CLASS_NREP_RETURN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_155__CLASS_NREP_RETURN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_155__CLASS_NREP_RETURN.obj_num = MELTOBMAG_OBJECT; cdat->dobj_155__CLASS_NREP_RETURN.obj_hash = 754982968; cdat->dobj_155__CLASS_NREP_RETURN.obj_len = 8; /*inistring dstr_156__CLASS_NREP_RETUR*/ /*_.VALSTR___V327*/ meltfptr[326] = (melt_ptr_t) & cdat->dstr_156__CLASS_NREP_RETUR; cdat->dstr_156__CLASS_NREP_RETUR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_156__CLASS_NREP_RETUR.val, "CLASS_NREP_RETURN", sizeof (cdat->dstr_156__CLASS_NREP_RETUR. val) - 1); cdat->dstr_156__CLASS_NREP_RETUR.val[17] = (char) 0; cdat->dstr_156__CLASS_NREP_RETUR.slen = 17; /*inimult dtup_157__CLASS_NREP_RETURN */ /*_.VALTUP___V328*/ meltfptr[327] = (melt_ptr_t) & cdat->dtup_157__CLASS_NREP_RETURN; cdat->dtup_157__CLASS_NREP_RETURN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_157__CLASS_NREP_RETURN.nbval = 3; /*inimult dtup_158__CLASS_NREP_RETURN */ /*_.VALTUP___V333*/ meltfptr[332] = (melt_ptr_t) & cdat->dtup_158__CLASS_NREP_RETURN; cdat->dtup_158__CLASS_NREP_RETURN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_158__CLASS_NREP_RETURN.nbval = 3; /*iniobj dsym_159__NRET_MAIN*/ /*uniqueobj*/ if (! /*_.VALDATA___V334*/ meltfptr[333]) /*_.VALDATA___V334*/ meltfptr[333] = (melt_ptr_t) & cdat->dsym_159__NRET_MAIN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_159__NRET_MAIN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_159__NRET_MAIN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_159__NRET_MAIN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_159__NRET_MAIN.obj_hash = 309164651; cdat->dsym_159__NRET_MAIN.obj_len = 3; /*inistring dstr_160__NRET_MAIN*/ /*_.VALSTR___V335*/ meltfptr[334] = (melt_ptr_t) & cdat->dstr_160__NRET_MAIN; cdat->dstr_160__NRET_MAIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_160__NRET_MAIN.val, "NRET_MAIN", sizeof (cdat->dstr_160__NRET_MAIN.val) - 1); cdat->dstr_160__NRET_MAIN.val[9] = (char) 0; cdat->dstr_160__NRET_MAIN.slen = 9; /*^iniobj */ /*iniobj dobj_161__NRET_MAIN*/ /*_.VALDATA___V329*/ meltfptr[328] = (melt_ptr_t) & cdat->dobj_161__NRET_MAIN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_161__NRET_MAIN", 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_161__NRET_MAIN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_161__NRET_MAIN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_161__NRET_MAIN.obj_num = 1; cdat->dobj_161__NRET_MAIN.obj_hash = 752341393; cdat->dobj_161__NRET_MAIN.obj_len = 4; /*inistring dstr_162__NRET_MAIN*/ /*_.VALSTR___V330*/ meltfptr[329] = (melt_ptr_t) & cdat->dstr_162__NRET_MAIN; cdat->dstr_162__NRET_MAIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_162__NRET_MAIN.val, "NRET_MAIN", sizeof (cdat->dstr_162__NRET_MAIN.val) - 1); cdat->dstr_162__NRET_MAIN.val[9] = (char) 0; cdat->dstr_162__NRET_MAIN.slen = 9; /*iniobj dsym_163__NRET_REST*/ /*uniqueobj*/ if (! /*_.VALDATA___V336*/ meltfptr[335]) /*_.VALDATA___V336*/ meltfptr[335] = (melt_ptr_t) & cdat->dsym_163__NRET_REST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_163__NRET_REST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_163__NRET_REST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_163__NRET_REST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_163__NRET_REST.obj_hash = 750081371; cdat->dsym_163__NRET_REST.obj_len = 3; /*inistring dstr_164__NRET_REST*/ /*_.VALSTR___V337*/ meltfptr[336] = (melt_ptr_t) & cdat->dstr_164__NRET_REST; cdat->dstr_164__NRET_REST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_164__NRET_REST.val, "NRET_REST", sizeof (cdat->dstr_164__NRET_REST.val) - 1); cdat->dstr_164__NRET_REST.val[9] = (char) 0; cdat->dstr_164__NRET_REST.slen = 9; /*^iniobj */ /*iniobj dobj_165__NRET_REST*/ /*_.VALDATA___V331*/ meltfptr[330] = (melt_ptr_t) & cdat->dobj_165__NRET_REST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_165__NRET_REST", 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_165__NRET_REST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_165__NRET_REST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_165__NRET_REST.obj_num = 2; cdat->dobj_165__NRET_REST.obj_hash = 890060649; cdat->dobj_165__NRET_REST.obj_len = 4; /*inistring dstr_166__NRET_REST*/ /*_.VALSTR___V332*/ meltfptr[331] = (melt_ptr_t) & cdat->dstr_166__NRET_REST; cdat->dstr_166__NRET_REST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_166__NRET_REST.val, "NRET_REST", sizeof (cdat->dstr_166__NRET_REST.val) - 1); cdat->dstr_166__NRET_REST.val[9] = (char) 0; cdat->dstr_166__NRET_REST.slen = 9; /*iniobj dsym_167__CLASS_NREP_IFCOMMON*/ /*uniqueobj*/ if (! /*_.VALDATA___V338*/ meltfptr[337]) /*_.VALDATA___V338*/ meltfptr[337] = (melt_ptr_t) & cdat->dsym_167__CLASS_NREP_IFCOMMON; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_167__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_167__CLASS_NREP_IFCOMMON", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_167__CLASS_NREP_IFCOMMON.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_167__CLASS_NREP_IFCOMMON.obj_hash = 334041360; cdat->dsym_167__CLASS_NREP_IFCOMMON.obj_len = 3; /*inistring dstr_168__CLASS_NREP_IFCOM*/ /*_.VALSTR___V339*/ meltfptr[338] = (melt_ptr_t) & cdat->dstr_168__CLASS_NREP_IFCOM; cdat->dstr_168__CLASS_NREP_IFCOM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_168__CLASS_NREP_IFCOM.val, "CLASS_NREP_IFCOMMON", sizeof (cdat->dstr_168__CLASS_NREP_IFCOM. val) - 1); cdat->dstr_168__CLASS_NREP_IFCOM.val[19] = (char) 0; cdat->dstr_168__CLASS_NREP_IFCOM.slen = 19; MELT_LOCATION ("warmelt-normal.melt:182:/ iniobj"); /*iniobj dobj_169__CLASS_NREP_IFCOMMON*/ /*_.VALDATA___V340*/ meltfptr[339] = (melt_ptr_t) & cdat->dobj_169__CLASS_NREP_IFCOMMON; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_169__CLASS_NREP_IFCOMMON", 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_169__CLASS_NREP_IFCOMMON", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_169__CLASS_NREP_IFCOMMON.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_169__CLASS_NREP_IFCOMMON.obj_num = MELTOBMAG_OBJECT; cdat->dobj_169__CLASS_NREP_IFCOMMON.obj_hash = 230594197; cdat->dobj_169__CLASS_NREP_IFCOMMON.obj_len = 8; /*inistring dstr_170__CLASS_NREP_IFCOM*/ /*_.VALSTR___V341*/ meltfptr[340] = (melt_ptr_t) & cdat->dstr_170__CLASS_NREP_IFCOM; cdat->dstr_170__CLASS_NREP_IFCOM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_170__CLASS_NREP_IFCOM.val, "CLASS_NREP_IFCOMMON", sizeof (cdat->dstr_170__CLASS_NREP_IFCOM. val) - 1); cdat->dstr_170__CLASS_NREP_IFCOM.val[19] = (char) 0; cdat->dstr_170__CLASS_NREP_IFCOM.slen = 19; /*inimult dtup_171__CLASS_NREP_IFCOMMON */ /*_.VALTUP___V342*/ meltfptr[341] = (melt_ptr_t) & cdat->dtup_171__CLASS_NREP_IFCOMMON; cdat->dtup_171__CLASS_NREP_IFCOMMON.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_171__CLASS_NREP_IFCOMMON.nbval = 4; /*inimult dtup_172__CLASS_NREP_IFCOMMON */ /*_.VALTUP___V347*/ meltfptr[346] = (melt_ptr_t) & cdat->dtup_172__CLASS_NREP_IFCOMMON; cdat->dtup_172__CLASS_NREP_IFCOMMON.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_172__CLASS_NREP_IFCOMMON.nbval = 4; /*iniobj dsym_173__NIF_THEN*/ /*uniqueobj*/ if (! /*_.VALDATA___V348*/ meltfptr[347]) /*_.VALDATA___V348*/ meltfptr[347] = (melt_ptr_t) & cdat->dsym_173__NIF_THEN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_173__NIF_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_173__NIF_THEN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_173__NIF_THEN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_173__NIF_THEN.obj_hash = 383896540; cdat->dsym_173__NIF_THEN.obj_len = 3; /*inistring dstr_174__NIF_THEN*/ /*_.VALSTR___V349*/ meltfptr[348] = (melt_ptr_t) & cdat->dstr_174__NIF_THEN; cdat->dstr_174__NIF_THEN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_174__NIF_THEN.val, "NIF_THEN", sizeof (cdat->dstr_174__NIF_THEN.val) - 1); cdat->dstr_174__NIF_THEN.val[8] = (char) 0; cdat->dstr_174__NIF_THEN.slen = 8; /*^iniobj */ /*iniobj dobj_175__NIF_THEN*/ /*_.VALDATA___V343*/ meltfptr[342] = (melt_ptr_t) & cdat->dobj_175__NIF_THEN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_175__NIF_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_175__NIF_THEN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_175__NIF_THEN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_175__NIF_THEN.obj_num = 2; cdat->dobj_175__NIF_THEN.obj_hash = 431372338; cdat->dobj_175__NIF_THEN.obj_len = 4; /*inistring dstr_176__NIF_THEN*/ /*_.VALSTR___V344*/ meltfptr[343] = (melt_ptr_t) & cdat->dstr_176__NIF_THEN; cdat->dstr_176__NIF_THEN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_176__NIF_THEN.val, "NIF_THEN", sizeof (cdat->dstr_176__NIF_THEN.val) - 1); cdat->dstr_176__NIF_THEN.val[8] = (char) 0; cdat->dstr_176__NIF_THEN.slen = 8; /*iniobj dsym_177__NIF_ELSE*/ /*uniqueobj*/ if (! /*_.VALDATA___V350*/ meltfptr[349]) /*_.VALDATA___V350*/ meltfptr[349] = (melt_ptr_t) & cdat->dsym_177__NIF_ELSE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_177__NIF_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_177__NIF_ELSE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_177__NIF_ELSE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_177__NIF_ELSE.obj_hash = 964634185; cdat->dsym_177__NIF_ELSE.obj_len = 3; /*inistring dstr_178__NIF_ELSE*/ /*_.VALSTR___V351*/ meltfptr[350] = (melt_ptr_t) & cdat->dstr_178__NIF_ELSE; cdat->dstr_178__NIF_ELSE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_178__NIF_ELSE.val, "NIF_ELSE", sizeof (cdat->dstr_178__NIF_ELSE.val) - 1); cdat->dstr_178__NIF_ELSE.val[8] = (char) 0; cdat->dstr_178__NIF_ELSE.slen = 8; /*^iniobj */ /*iniobj dobj_179__NIF_ELSE*/ /*_.VALDATA___V345*/ meltfptr[344] = (melt_ptr_t) & cdat->dobj_179__NIF_ELSE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_179__NIF_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_179__NIF_ELSE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_179__NIF_ELSE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_179__NIF_ELSE.obj_num = 3; cdat->dobj_179__NIF_ELSE.obj_hash = 864990501; cdat->dobj_179__NIF_ELSE.obj_len = 4; /*inistring dstr_180__NIF_ELSE*/ /*_.VALSTR___V346*/ meltfptr[345] = (melt_ptr_t) & cdat->dstr_180__NIF_ELSE; cdat->dstr_180__NIF_ELSE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_180__NIF_ELSE.val, "NIF_ELSE", sizeof (cdat->dstr_180__NIF_ELSE.val) - 1); cdat->dstr_180__NIF_ELSE.val[8] = (char) 0; cdat->dstr_180__NIF_ELSE.slen = 8; /*iniobj dsym_181__CLASS_NREP_IFTESTVALUE*/ /*uniqueobj*/ if (! /*_.VALDATA___V352*/ meltfptr[351]) /*_.VALDATA___V352*/ meltfptr[351] = (melt_ptr_t) & cdat->dsym_181__CLASS_NREP_IFTESTVALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_181__CLASS_NREP_IFTESTVALUE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_181__CLASS_NREP_IFTESTVALUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_181__CLASS_NREP_IFTESTVALUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_181__CLASS_NREP_IFTESTVALUE.obj_hash = 613467083; cdat->dsym_181__CLASS_NREP_IFTESTVALUE.obj_len = 3; /*inistring dstr_182__CLASS_NREP_IFTES*/ /*_.VALSTR___V353*/ meltfptr[352] = (melt_ptr_t) & cdat->dstr_182__CLASS_NREP_IFTES; cdat->dstr_182__CLASS_NREP_IFTES.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_182__CLASS_NREP_IFTES.val, "CLASS_NREP_IFTESTVALUE", sizeof (cdat->dstr_182__CLASS_NREP_IFTES. val) - 1); cdat->dstr_182__CLASS_NREP_IFTES.val[22] = (char) 0; cdat->dstr_182__CLASS_NREP_IFTES.slen = 22; MELT_LOCATION ("warmelt-normal.melt:192:/ iniobj"); /*iniobj dobj_183__CLASS_NREP_IFTESTVALUE*/ /*_.VALDATA___V354*/ meltfptr[353] = (melt_ptr_t) & cdat->dobj_183__CLASS_NREP_IFTESTVALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_183__CLASS_NREP_IFTESTVALUE", 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_183__CLASS_NREP_IFTESTVALUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_183__CLASS_NREP_IFTESTVALUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_183__CLASS_NREP_IFTESTVALUE.obj_num = MELTOBMAG_OBJECT; cdat->dobj_183__CLASS_NREP_IFTESTVALUE.obj_hash = 47238125; cdat->dobj_183__CLASS_NREP_IFTESTVALUE.obj_len = 8; /*inistring dstr_184__CLASS_NREP_IFTES*/ /*_.VALSTR___V355*/ meltfptr[354] = (melt_ptr_t) & cdat->dstr_184__CLASS_NREP_IFTES; cdat->dstr_184__CLASS_NREP_IFTES.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_184__CLASS_NREP_IFTES.val, "CLASS_NREP_IFTESTVALUE", sizeof (cdat->dstr_184__CLASS_NREP_IFTES. val) - 1); cdat->dstr_184__CLASS_NREP_IFTES.val[22] = (char) 0; cdat->dstr_184__CLASS_NREP_IFTES.slen = 22; /*inimult dtup_185__CLASS_NREP_IFTESTVALUE */ /*_.VALTUP___V356*/ meltfptr[355] = (melt_ptr_t) & cdat->dtup_185__CLASS_NREP_IFTESTVALUE; cdat->dtup_185__CLASS_NREP_IFTESTVALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_185__CLASS_NREP_IFTESTVALUE.nbval = 5; /*inimult dtup_186__CLASS_NREP_IFTESTVALUE */ /*_.VALTUP___V359*/ meltfptr[358] = (melt_ptr_t) & cdat->dtup_186__CLASS_NREP_IFTESTVALUE; cdat->dtup_186__CLASS_NREP_IFTESTVALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_186__CLASS_NREP_IFTESTVALUE.nbval = 5; /*iniobj dsym_187__NIF_TESTVAL*/ /*uniqueobj*/ if (! /*_.VALDATA___V360*/ meltfptr[359]) /*_.VALDATA___V360*/ meltfptr[359] = (melt_ptr_t) & cdat->dsym_187__NIF_TESTVAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_187__NIF_TESTVAL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_187__NIF_TESTVAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_187__NIF_TESTVAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_187__NIF_TESTVAL.obj_hash = 988140040; cdat->dsym_187__NIF_TESTVAL.obj_len = 3; /*inistring dstr_188__NIF_TESTVAL*/ /*_.VALSTR___V361*/ meltfptr[360] = (melt_ptr_t) & cdat->dstr_188__NIF_TESTVAL; cdat->dstr_188__NIF_TESTVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_188__NIF_TESTVAL.val, "NIF_TESTVAL", sizeof (cdat->dstr_188__NIF_TESTVAL.val) - 1); cdat->dstr_188__NIF_TESTVAL.val[11] = (char) 0; cdat->dstr_188__NIF_TESTVAL.slen = 11; /*^iniobj */ /*iniobj dobj_189__NIF_TESTVAL*/ /*_.VALDATA___V357*/ meltfptr[356] = (melt_ptr_t) & cdat->dobj_189__NIF_TESTVAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_189__NIF_TESTVAL", 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_189__NIF_TESTVAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_189__NIF_TESTVAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_189__NIF_TESTVAL.obj_num = 4; cdat->dobj_189__NIF_TESTVAL.obj_hash = 335013257; cdat->dobj_189__NIF_TESTVAL.obj_len = 4; /*inistring dstr_190__NIF_TESTVAL*/ /*_.VALSTR___V358*/ meltfptr[357] = (melt_ptr_t) & cdat->dstr_190__NIF_TESTVAL; cdat->dstr_190__NIF_TESTVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_190__NIF_TESTVAL.val, "NIF_TESTVAL", sizeof (cdat->dstr_190__NIF_TESTVAL.val) - 1); cdat->dstr_190__NIF_TESTVAL.val[11] = (char) 0; cdat->dstr_190__NIF_TESTVAL.slen = 11; /*iniobj dsym_191__CLASS_NREP_IFISA*/ /*uniqueobj*/ if (! /*_.VALDATA___V362*/ meltfptr[361]) /*_.VALDATA___V362*/ meltfptr[361] = (melt_ptr_t) & cdat->dsym_191__CLASS_NREP_IFISA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_191__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_191__CLASS_NREP_IFISA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_191__CLASS_NREP_IFISA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_191__CLASS_NREP_IFISA.obj_hash = 974189077; cdat->dsym_191__CLASS_NREP_IFISA.obj_len = 3; /*inistring dstr_192__CLASS_NREP_IFISA*/ /*_.VALSTR___V363*/ meltfptr[362] = (melt_ptr_t) & cdat->dstr_192__CLASS_NREP_IFISA; cdat->dstr_192__CLASS_NREP_IFISA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_192__CLASS_NREP_IFISA.val, "CLASS_NREP_IFISA", sizeof (cdat->dstr_192__CLASS_NREP_IFISA. val) - 1); cdat->dstr_192__CLASS_NREP_IFISA.val[16] = (char) 0; cdat->dstr_192__CLASS_NREP_IFISA.slen = 16; MELT_LOCATION ("warmelt-normal.melt:200:/ iniobj"); /*iniobj dobj_193__CLASS_NREP_IFISA*/ /*_.VALDATA___V364*/ meltfptr[363] = (melt_ptr_t) & cdat->dobj_193__CLASS_NREP_IFISA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_193__CLASS_NREP_IFISA", 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_193__CLASS_NREP_IFISA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_193__CLASS_NREP_IFISA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_193__CLASS_NREP_IFISA.obj_num = MELTOBMAG_OBJECT; cdat->dobj_193__CLASS_NREP_IFISA.obj_hash = 957113648; cdat->dobj_193__CLASS_NREP_IFISA.obj_len = 8; /*inistring dstr_194__CLASS_NREP_IFISA*/ /*_.VALSTR___V365*/ meltfptr[364] = (melt_ptr_t) & cdat->dstr_194__CLASS_NREP_IFISA; cdat->dstr_194__CLASS_NREP_IFISA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_194__CLASS_NREP_IFISA.val, "CLASS_NREP_IFISA", sizeof (cdat->dstr_194__CLASS_NREP_IFISA. val) - 1); cdat->dstr_194__CLASS_NREP_IFISA.val[16] = (char) 0; cdat->dstr_194__CLASS_NREP_IFISA.slen = 16; /*inimult dtup_195__CLASS_NREP_IFISA */ /*_.VALTUP___V366*/ meltfptr[365] = (melt_ptr_t) & cdat->dtup_195__CLASS_NREP_IFISA; cdat->dtup_195__CLASS_NREP_IFISA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_195__CLASS_NREP_IFISA.nbval = 6; /*inimult dtup_196__CLASS_NREP_IFISA */ /*_.VALTUP___V369*/ meltfptr[368] = (melt_ptr_t) & cdat->dtup_196__CLASS_NREP_IFISA; cdat->dtup_196__CLASS_NREP_IFISA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_196__CLASS_NREP_IFISA.nbval = 6; /*iniobj dsym_197__NIFA_CLASS*/ /*uniqueobj*/ if (! /*_.VALDATA___V370*/ meltfptr[369]) /*_.VALDATA___V370*/ meltfptr[369] = (melt_ptr_t) & cdat->dsym_197__NIFA_CLASS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_197__NIFA_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_197__NIFA_CLASS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_197__NIFA_CLASS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_197__NIFA_CLASS.obj_hash = 950921528; cdat->dsym_197__NIFA_CLASS.obj_len = 3; /*inistring dstr_198__NIFA_CLASS*/ /*_.VALSTR___V371*/ meltfptr[370] = (melt_ptr_t) & cdat->dstr_198__NIFA_CLASS; cdat->dstr_198__NIFA_CLASS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_198__NIFA_CLASS.val, "NIFA_CLASS", sizeof (cdat->dstr_198__NIFA_CLASS.val) - 1); cdat->dstr_198__NIFA_CLASS.val[10] = (char) 0; cdat->dstr_198__NIFA_CLASS.slen = 10; /*^iniobj */ /*iniobj dobj_199__NIFA_CLASS*/ /*_.VALDATA___V367*/ meltfptr[366] = (melt_ptr_t) & cdat->dobj_199__NIFA_CLASS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_199__NIFA_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_199__NIFA_CLASS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_199__NIFA_CLASS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_199__NIFA_CLASS.obj_num = 5; cdat->dobj_199__NIFA_CLASS.obj_hash = 988560882; cdat->dobj_199__NIFA_CLASS.obj_len = 4; /*inistring dstr_200__NIFA_CLASS*/ /*_.VALSTR___V368*/ meltfptr[367] = (melt_ptr_t) & cdat->dstr_200__NIFA_CLASS; cdat->dstr_200__NIFA_CLASS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_200__NIFA_CLASS.val, "NIFA_CLASS", sizeof (cdat->dstr_200__NIFA_CLASS.val) - 1); cdat->dstr_200__NIFA_CLASS.val[10] = (char) 0; cdat->dstr_200__NIFA_CLASS.slen = 10; /*iniobj dsym_201__CLASS_NREP_IFTUPLESIZED*/ /*uniqueobj*/ if (! /*_.VALDATA___V372*/ meltfptr[371]) /*_.VALDATA___V372*/ meltfptr[371] = (melt_ptr_t) & cdat->dsym_201__CLASS_NREP_IFTUPLESIZED; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_201__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_201__CLASS_NREP_IFTUPLESIZED", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_201__CLASS_NREP_IFTUPLESIZED.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_201__CLASS_NREP_IFTUPLESIZED.obj_hash = 768158499; cdat->dsym_201__CLASS_NREP_IFTUPLESIZED.obj_len = 3; /*inistring dstr_202__CLASS_NREP_IFTUP*/ /*_.VALSTR___V373*/ meltfptr[372] = (melt_ptr_t) & cdat->dstr_202__CLASS_NREP_IFTUP; cdat->dstr_202__CLASS_NREP_IFTUP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_202__CLASS_NREP_IFTUP.val, "CLASS_NREP_IFTUPLESIZED", sizeof (cdat->dstr_202__CLASS_NREP_IFTUP. val) - 1); cdat->dstr_202__CLASS_NREP_IFTUP.val[23] = (char) 0; cdat->dstr_202__CLASS_NREP_IFTUP.slen = 23; MELT_LOCATION ("warmelt-normal.melt:209:/ iniobj"); /*iniobj dobj_203__CLASS_NREP_IFTUPLESIZED*/ /*_.VALDATA___V374*/ meltfptr[373] = (melt_ptr_t) & cdat->dobj_203__CLASS_NREP_IFTUPLESIZED; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_203__CLASS_NREP_IFTUPLESIZED", 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_203__CLASS_NREP_IFTUPLESIZED", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_203__CLASS_NREP_IFTUPLESIZED.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_203__CLASS_NREP_IFTUPLESIZED.obj_num = MELTOBMAG_OBJECT; cdat->dobj_203__CLASS_NREP_IFTUPLESIZED.obj_hash = 732960910; cdat->dobj_203__CLASS_NREP_IFTUPLESIZED.obj_len = 8; /*inistring dstr_204__CLASS_NREP_IFTUP*/ /*_.VALSTR___V375*/ meltfptr[374] = (melt_ptr_t) & cdat->dstr_204__CLASS_NREP_IFTUP; cdat->dstr_204__CLASS_NREP_IFTUP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_204__CLASS_NREP_IFTUP.val, "CLASS_NREP_IFTUPLESIZED", sizeof (cdat->dstr_204__CLASS_NREP_IFTUP. val) - 1); cdat->dstr_204__CLASS_NREP_IFTUP.val[23] = (char) 0; cdat->dstr_204__CLASS_NREP_IFTUP.slen = 23; /*inimult dtup_205__CLASS_NREP_IFTUPLESIZED */ /*_.VALTUP___V376*/ meltfptr[375] = (melt_ptr_t) & cdat->dtup_205__CLASS_NREP_IFTUPLESIZED; cdat->dtup_205__CLASS_NREP_IFTUPLESIZED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_205__CLASS_NREP_IFTUPLESIZED.nbval = 6; /*inimult dtup_206__CLASS_NREP_IFTUPLESIZED */ /*_.VALTUP___V379*/ meltfptr[378] = (melt_ptr_t) & cdat->dtup_206__CLASS_NREP_IFTUPLESIZED; cdat->dtup_206__CLASS_NREP_IFTUPLESIZED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_206__CLASS_NREP_IFTUPLESIZED.nbval = 6; /*iniobj dsym_207__NIF_TUPSIZ*/ /*uniqueobj*/ if (! /*_.VALDATA___V380*/ meltfptr[379]) /*_.VALDATA___V380*/ meltfptr[379] = (melt_ptr_t) & cdat->dsym_207__NIF_TUPSIZ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_207__NIF_TUPSIZ", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_207__NIF_TUPSIZ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_207__NIF_TUPSIZ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_207__NIF_TUPSIZ.obj_hash = 598929805; cdat->dsym_207__NIF_TUPSIZ.obj_len = 3; /*inistring dstr_208__NIF_TUPSIZ*/ /*_.VALSTR___V381*/ meltfptr[380] = (melt_ptr_t) & cdat->dstr_208__NIF_TUPSIZ; cdat->dstr_208__NIF_TUPSIZ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_208__NIF_TUPSIZ.val, "NIF_TUPSIZ", sizeof (cdat->dstr_208__NIF_TUPSIZ.val) - 1); cdat->dstr_208__NIF_TUPSIZ.val[10] = (char) 0; cdat->dstr_208__NIF_TUPSIZ.slen = 10; /*^iniobj */ /*iniobj dobj_209__NIF_TUPSIZ*/ /*_.VALDATA___V377*/ meltfptr[376] = (melt_ptr_t) & cdat->dobj_209__NIF_TUPSIZ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_209__NIF_TUPSIZ", 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_209__NIF_TUPSIZ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_209__NIF_TUPSIZ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_209__NIF_TUPSIZ.obj_num = 5; cdat->dobj_209__NIF_TUPSIZ.obj_hash = 599048554; cdat->dobj_209__NIF_TUPSIZ.obj_len = 4; /*inistring dstr_210__NIF_TUPSIZ*/ /*_.VALSTR___V378*/ meltfptr[377] = (melt_ptr_t) & cdat->dstr_210__NIF_TUPSIZ; cdat->dstr_210__NIF_TUPSIZ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_210__NIF_TUPSIZ.val, "NIF_TUPSIZ", sizeof (cdat->dstr_210__NIF_TUPSIZ.val) - 1); cdat->dstr_210__NIF_TUPSIZ.val[10] = (char) 0; cdat->dstr_210__NIF_TUPSIZ.slen = 10; /*iniobj dsym_211__CLASS_NREP_IFVARIADIC*/ /*uniqueobj*/ if (! /*_.VALDATA___V382*/ meltfptr[381]) /*_.VALDATA___V382*/ meltfptr[381] = (melt_ptr_t) & cdat->dsym_211__CLASS_NREP_IFVARIADIC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_211__CLASS_NREP_IFVARIADIC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_211__CLASS_NREP_IFVARIADIC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_211__CLASS_NREP_IFVARIADIC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_211__CLASS_NREP_IFVARIADIC.obj_hash = 711812837; cdat->dsym_211__CLASS_NREP_IFVARIADIC.obj_len = 3; /*inistring dstr_212__CLASS_NREP_IFVAR*/ /*_.VALSTR___V383*/ meltfptr[382] = (melt_ptr_t) & cdat->dstr_212__CLASS_NREP_IFVAR; cdat->dstr_212__CLASS_NREP_IFVAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_212__CLASS_NREP_IFVAR.val, "CLASS_NREP_IFVARIADIC", sizeof (cdat->dstr_212__CLASS_NREP_IFVAR. val) - 1); cdat->dstr_212__CLASS_NREP_IFVAR.val[21] = (char) 0; cdat->dstr_212__CLASS_NREP_IFVAR.slen = 21; MELT_LOCATION ("warmelt-normal.melt:218:/ iniobj"); /*iniobj dobj_213__CLASS_NREP_IFVARIADIC*/ /*_.VALDATA___V384*/ meltfptr[383] = (melt_ptr_t) & cdat->dobj_213__CLASS_NREP_IFVARIADIC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_213__CLASS_NREP_IFVARIADIC", 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_213__CLASS_NREP_IFVARIADIC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_213__CLASS_NREP_IFVARIADIC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_213__CLASS_NREP_IFVARIADIC.obj_num = MELTOBMAG_OBJECT; cdat->dobj_213__CLASS_NREP_IFVARIADIC.obj_hash = 827129550; cdat->dobj_213__CLASS_NREP_IFVARIADIC.obj_len = 8; /*inistring dstr_214__CLASS_NREP_IFVAR*/ /*_.VALSTR___V385*/ meltfptr[384] = (melt_ptr_t) & cdat->dstr_214__CLASS_NREP_IFVAR; cdat->dstr_214__CLASS_NREP_IFVAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_214__CLASS_NREP_IFVAR.val, "CLASS_NREP_IFVARIADIC", sizeof (cdat->dstr_214__CLASS_NREP_IFVAR. val) - 1); cdat->dstr_214__CLASS_NREP_IFVAR.val[21] = (char) 0; cdat->dstr_214__CLASS_NREP_IFVAR.slen = 21; /*inimult dtup_215__CLASS_NREP_IFVARIADIC */ /*_.VALTUP___V386*/ meltfptr[385] = (melt_ptr_t) & cdat->dtup_215__CLASS_NREP_IFVARIADIC; cdat->dtup_215__CLASS_NREP_IFVARIADIC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_215__CLASS_NREP_IFVARIADIC.nbval = 5; /*inimult dtup_216__CLASS_NREP_IFVARIADIC */ /*_.VALTUP___V391*/ meltfptr[390] = (melt_ptr_t) & cdat->dtup_216__CLASS_NREP_IFVARIADIC; cdat->dtup_216__CLASS_NREP_IFVARIADIC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_216__CLASS_NREP_IFVARIADIC.nbval = 6; /*iniobj dsym_217__NIFV_VARIADIC*/ /*uniqueobj*/ if (! /*_.VALDATA___V392*/ meltfptr[391]) /*_.VALDATA___V392*/ meltfptr[391] = (melt_ptr_t) & cdat->dsym_217__NIFV_VARIADIC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_217__NIFV_VARIADIC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_217__NIFV_VARIADIC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_217__NIFV_VARIADIC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_217__NIFV_VARIADIC.obj_hash = 221858951; cdat->dsym_217__NIFV_VARIADIC.obj_len = 3; /*inistring dstr_218__NIFV_VARIADIC*/ /*_.VALSTR___V393*/ meltfptr[392] = (melt_ptr_t) & cdat->dstr_218__NIFV_VARIADIC; cdat->dstr_218__NIFV_VARIADIC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_218__NIFV_VARIADIC.val, "NIFV_VARIADIC", sizeof (cdat->dstr_218__NIFV_VARIADIC.val) - 1); cdat->dstr_218__NIFV_VARIADIC.val[13] = (char) 0; cdat->dstr_218__NIFV_VARIADIC.slen = 13; /*^iniobj */ /*iniobj dobj_219__NIFV_VARIADIC*/ /*_.VALDATA___V387*/ meltfptr[386] = (melt_ptr_t) & cdat->dobj_219__NIFV_VARIADIC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_219__NIFV_VARIADIC", 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_219__NIFV_VARIADIC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_219__NIFV_VARIADIC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_219__NIFV_VARIADIC.obj_num = 4; cdat->dobj_219__NIFV_VARIADIC.obj_hash = 495202858; cdat->dobj_219__NIFV_VARIADIC.obj_len = 4; /*inistring dstr_220__NIFV_VARIADIC*/ /*_.VALSTR___V388*/ meltfptr[387] = (melt_ptr_t) & cdat->dstr_220__NIFV_VARIADIC; cdat->dstr_220__NIFV_VARIADIC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_220__NIFV_VARIADIC.val, "NIFV_VARIADIC", sizeof (cdat->dstr_220__NIFV_VARIADIC.val) - 1); cdat->dstr_220__NIFV_VARIADIC.val[13] = (char) 0; cdat->dstr_220__NIFV_VARIADIC.slen = 13; /*iniobj dsym_221__NIFV_CTYPES*/ /*uniqueobj*/ if (! /*_.VALDATA___V394*/ meltfptr[393]) /*_.VALDATA___V394*/ meltfptr[393] = (melt_ptr_t) & cdat->dsym_221__NIFV_CTYPES; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_221__NIFV_CTYPES", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_221__NIFV_CTYPES", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_221__NIFV_CTYPES.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_221__NIFV_CTYPES.obj_hash = 620925896; cdat->dsym_221__NIFV_CTYPES.obj_len = 3; /*inistring dstr_222__NIFV_CTYPES*/ /*_.VALSTR___V395*/ meltfptr[394] = (melt_ptr_t) & cdat->dstr_222__NIFV_CTYPES; cdat->dstr_222__NIFV_CTYPES.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_222__NIFV_CTYPES.val, "NIFV_CTYPES", sizeof (cdat->dstr_222__NIFV_CTYPES.val) - 1); cdat->dstr_222__NIFV_CTYPES.val[11] = (char) 0; cdat->dstr_222__NIFV_CTYPES.slen = 11; /*^iniobj */ /*iniobj dobj_223__NIFV_CTYPES*/ /*_.VALDATA___V389*/ meltfptr[388] = (melt_ptr_t) & cdat->dobj_223__NIFV_CTYPES; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_223__NIFV_CTYPES", 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_223__NIFV_CTYPES", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_223__NIFV_CTYPES.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_223__NIFV_CTYPES.obj_num = 5; cdat->dobj_223__NIFV_CTYPES.obj_hash = 417978384; cdat->dobj_223__NIFV_CTYPES.obj_len = 4; /*inistring dstr_224__NIFV_CTYPES*/ /*_.VALSTR___V390*/ meltfptr[389] = (melt_ptr_t) & cdat->dstr_224__NIFV_CTYPES; cdat->dstr_224__NIFV_CTYPES.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_224__NIFV_CTYPES.val, "NIFV_CTYPES", sizeof (cdat->dstr_224__NIFV_CTYPES.val) - 1); cdat->dstr_224__NIFV_CTYPES.val[11] = (char) 0; cdat->dstr_224__NIFV_CTYPES.slen = 11; /*iniobj dsym_225__CLASS_NREP_CONSUME_VARIADIC*/ /*uniqueobj*/ if (! /*_.VALDATA___V396*/ meltfptr[395]) /*_.VALDATA___V396*/ meltfptr[395] = (melt_ptr_t) & cdat->dsym_225__CLASS_NREP_CONSUME_VARIADIC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_225__CLASS_NREP_CONSUME_VARIADIC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_225__CLASS_NREP_CONSUME_VARIADIC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_225__CLASS_NREP_CONSUME_VARIADIC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_225__CLASS_NREP_CONSUME_VARIADIC.obj_hash = 633396995; cdat->dsym_225__CLASS_NREP_CONSUME_VARIADIC.obj_len = 3; /*inistring dstr_226__CLASS_NREP_CONSU*/ /*_.VALSTR___V397*/ meltfptr[396] = (melt_ptr_t) & cdat->dstr_226__CLASS_NREP_CONSU; cdat->dstr_226__CLASS_NREP_CONSU.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_226__CLASS_NREP_CONSU.val, "CLASS_NREP_CONSUME_VARIADIC", sizeof (cdat->dstr_226__CLASS_NREP_CONSU. val) - 1); cdat->dstr_226__CLASS_NREP_CONSU.val[27] = (char) 0; cdat->dstr_226__CLASS_NREP_CONSU.slen = 27; MELT_LOCATION ("warmelt-normal.melt:227:/ iniobj"); /*iniobj dobj_227__CLASS_NREP_CONSUME_VARIADIC*/ /*_.VALDATA___V398*/ meltfptr[397] = (melt_ptr_t) & cdat->dobj_227__CLASS_NREP_CONSUME_VARIADIC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_227__CLASS_NREP_CONSUME_VARIADIC", 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_227__CLASS_NREP_CONSUME_VARIADIC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_227__CLASS_NREP_CONSUME_VARIADIC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_227__CLASS_NREP_CONSUME_VARIADIC.obj_num = MELTOBMAG_OBJECT; cdat->dobj_227__CLASS_NREP_CONSUME_VARIADIC.obj_hash = 281638267; cdat->dobj_227__CLASS_NREP_CONSUME_VARIADIC.obj_len = 8; /*inistring dstr_228__CLASS_NREP_CONSU*/ /*_.VALSTR___V399*/ meltfptr[398] = (melt_ptr_t) & cdat->dstr_228__CLASS_NREP_CONSU; cdat->dstr_228__CLASS_NREP_CONSU.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_228__CLASS_NREP_CONSU.val, "CLASS_NREP_CONSUME_VARIADIC", sizeof (cdat->dstr_228__CLASS_NREP_CONSU. val) - 1); cdat->dstr_228__CLASS_NREP_CONSU.val[27] = (char) 0; cdat->dstr_228__CLASS_NREP_CONSU.slen = 27; /*inimult dtup_229__CLASS_NREP_CONSUME_VARIADIC */ /*_.VALTUP___V400*/ meltfptr[399] = (melt_ptr_t) & cdat->dtup_229__CLASS_NREP_CONSUME_VARIADIC; cdat->dtup_229__CLASS_NREP_CONSUME_VARIADIC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_229__CLASS_NREP_CONSUME_VARIADIC.nbval = 3; /*inimult dtup_230__CLASS_NREP_CONSUME_VARIADIC */ /*_.VALTUP___V405*/ meltfptr[404] = (melt_ptr_t) & cdat->dtup_230__CLASS_NREP_CONSUME_VARIADIC; cdat->dtup_230__CLASS_NREP_CONSUME_VARIADIC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_230__CLASS_NREP_CONSUME_VARIADIC.nbval = 3; /*iniobj dsym_231__NCONSVA_VARIADIC*/ /*uniqueobj*/ if (! /*_.VALDATA___V406*/ meltfptr[405]) /*_.VALDATA___V406*/ meltfptr[405] = (melt_ptr_t) & cdat->dsym_231__NCONSVA_VARIADIC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_231__NCONSVA_VARIADIC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_231__NCONSVA_VARIADIC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_231__NCONSVA_VARIADIC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_231__NCONSVA_VARIADIC.obj_hash = 3458781; cdat->dsym_231__NCONSVA_VARIADIC.obj_len = 3; /*inistring dstr_232__NCONSVA_VARIADIC*/ /*_.VALSTR___V407*/ meltfptr[406] = (melt_ptr_t) & cdat->dstr_232__NCONSVA_VARIADIC; cdat->dstr_232__NCONSVA_VARIADIC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_232__NCONSVA_VARIADIC.val, "NCONSVA_VARIADIC", sizeof (cdat->dstr_232__NCONSVA_VARIADIC. val) - 1); cdat->dstr_232__NCONSVA_VARIADIC.val[16] = (char) 0; cdat->dstr_232__NCONSVA_VARIADIC.slen = 16; /*^iniobj */ /*iniobj dobj_233__NCONSVA_VARIADIC*/ /*_.VALDATA___V401*/ meltfptr[400] = (melt_ptr_t) & cdat->dobj_233__NCONSVA_VARIADIC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_233__NCONSVA_VARIADIC", 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_233__NCONSVA_VARIADIC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_233__NCONSVA_VARIADIC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_233__NCONSVA_VARIADIC.obj_num = 1; cdat->dobj_233__NCONSVA_VARIADIC.obj_hash = 332652360; cdat->dobj_233__NCONSVA_VARIADIC.obj_len = 4; /*inistring dstr_234__NCONSVA_VARIADIC*/ /*_.VALSTR___V402*/ meltfptr[401] = (melt_ptr_t) & cdat->dstr_234__NCONSVA_VARIADIC; cdat->dstr_234__NCONSVA_VARIADIC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_234__NCONSVA_VARIADIC.val, "NCONSVA_VARIADIC", sizeof (cdat->dstr_234__NCONSVA_VARIADIC. val) - 1); cdat->dstr_234__NCONSVA_VARIADIC.val[16] = (char) 0; cdat->dstr_234__NCONSVA_VARIADIC.slen = 16; /*iniobj dsym_235__NCONSVA_CTYPES*/ /*uniqueobj*/ if (! /*_.VALDATA___V408*/ meltfptr[407]) /*_.VALDATA___V408*/ meltfptr[407] = (melt_ptr_t) & cdat->dsym_235__NCONSVA_CTYPES; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_235__NCONSVA_CTYPES", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_235__NCONSVA_CTYPES", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_235__NCONSVA_CTYPES.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_235__NCONSVA_CTYPES.obj_hash = 558628622; cdat->dsym_235__NCONSVA_CTYPES.obj_len = 3; /*inistring dstr_236__NCONSVA_CTYPES*/ /*_.VALSTR___V409*/ meltfptr[408] = (melt_ptr_t) & cdat->dstr_236__NCONSVA_CTYPES; cdat->dstr_236__NCONSVA_CTYPES.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_236__NCONSVA_CTYPES.val, "NCONSVA_CTYPES", sizeof (cdat->dstr_236__NCONSVA_CTYPES.val) - 1); cdat->dstr_236__NCONSVA_CTYPES.val[14] = (char) 0; cdat->dstr_236__NCONSVA_CTYPES.slen = 14; /*^iniobj */ /*iniobj dobj_237__NCONSVA_CTYPES*/ /*_.VALDATA___V403*/ meltfptr[402] = (melt_ptr_t) & cdat->dobj_237__NCONSVA_CTYPES; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_237__NCONSVA_CTYPES", 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_237__NCONSVA_CTYPES", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_237__NCONSVA_CTYPES.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_237__NCONSVA_CTYPES.obj_num = 2; cdat->dobj_237__NCONSVA_CTYPES.obj_hash = 965529183; cdat->dobj_237__NCONSVA_CTYPES.obj_len = 4; /*inistring dstr_238__NCONSVA_CTYPES*/ /*_.VALSTR___V404*/ meltfptr[403] = (melt_ptr_t) & cdat->dstr_238__NCONSVA_CTYPES; cdat->dstr_238__NCONSVA_CTYPES.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_238__NCONSVA_CTYPES.val, "NCONSVA_CTYPES", sizeof (cdat->dstr_238__NCONSVA_CTYPES.val) - 1); cdat->dstr_238__NCONSVA_CTYPES.val[14] = (char) 0; cdat->dstr_238__NCONSVA_CTYPES.slen = 14; /*iniobj dsym_239__CLASS_NREP_IFSAME*/ /*uniqueobj*/ if (! /*_.VALDATA___V410*/ meltfptr[409]) /*_.VALDATA___V410*/ meltfptr[409] = (melt_ptr_t) & cdat->dsym_239__CLASS_NREP_IFSAME; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_239__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_239__CLASS_NREP_IFSAME", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_239__CLASS_NREP_IFSAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_239__CLASS_NREP_IFSAME.obj_hash = 280475710; cdat->dsym_239__CLASS_NREP_IFSAME.obj_len = 3; /*inistring dstr_240__CLASS_NREP_IFSAM*/ /*_.VALSTR___V411*/ meltfptr[410] = (melt_ptr_t) & cdat->dstr_240__CLASS_NREP_IFSAM; cdat->dstr_240__CLASS_NREP_IFSAM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_240__CLASS_NREP_IFSAM.val, "CLASS_NREP_IFSAME", sizeof (cdat->dstr_240__CLASS_NREP_IFSAM. val) - 1); cdat->dstr_240__CLASS_NREP_IFSAM.val[17] = (char) 0; cdat->dstr_240__CLASS_NREP_IFSAM.slen = 17; MELT_LOCATION ("warmelt-normal.melt:238:/ iniobj"); /*iniobj dobj_241__CLASS_NREP_IFSAME*/ /*_.VALDATA___V412*/ meltfptr[411] = (melt_ptr_t) & cdat->dobj_241__CLASS_NREP_IFSAME; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_241__CLASS_NREP_IFSAME", 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_241__CLASS_NREP_IFSAME", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_241__CLASS_NREP_IFSAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_241__CLASS_NREP_IFSAME.obj_num = MELTOBMAG_OBJECT; cdat->dobj_241__CLASS_NREP_IFSAME.obj_hash = 603173473; cdat->dobj_241__CLASS_NREP_IFSAME.obj_len = 8; /*inistring dstr_242__CLASS_NREP_IFSAM*/ /*_.VALSTR___V413*/ meltfptr[412] = (melt_ptr_t) & cdat->dstr_242__CLASS_NREP_IFSAM; cdat->dstr_242__CLASS_NREP_IFSAM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_242__CLASS_NREP_IFSAM.val, "CLASS_NREP_IFSAME", sizeof (cdat->dstr_242__CLASS_NREP_IFSAM. val) - 1); cdat->dstr_242__CLASS_NREP_IFSAM.val[17] = (char) 0; cdat->dstr_242__CLASS_NREP_IFSAM.slen = 17; /*inimult dtup_243__CLASS_NREP_IFSAME */ /*_.VALTUP___V414*/ meltfptr[413] = (melt_ptr_t) & cdat->dtup_243__CLASS_NREP_IFSAME; cdat->dtup_243__CLASS_NREP_IFSAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_243__CLASS_NREP_IFSAME.nbval = 5; /*inimult dtup_244__CLASS_NREP_IFSAME */ /*_.VALTUP___V419*/ meltfptr[418] = (melt_ptr_t) & cdat->dtup_244__CLASS_NREP_IFSAME; cdat->dtup_244__CLASS_NREP_IFSAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_244__CLASS_NREP_IFSAME.nbval = 6; /*iniobj dsym_245__NIFS_LEFT*/ /*uniqueobj*/ if (! /*_.VALDATA___V420*/ meltfptr[419]) /*_.VALDATA___V420*/ meltfptr[419] = (melt_ptr_t) & cdat->dsym_245__NIFS_LEFT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_245__NIFS_LEFT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_245__NIFS_LEFT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_245__NIFS_LEFT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_245__NIFS_LEFT.obj_hash = 1073568942; cdat->dsym_245__NIFS_LEFT.obj_len = 3; /*inistring dstr_246__NIFS_LEFT*/ /*_.VALSTR___V421*/ meltfptr[420] = (melt_ptr_t) & cdat->dstr_246__NIFS_LEFT; cdat->dstr_246__NIFS_LEFT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_246__NIFS_LEFT.val, "NIFS_LEFT", sizeof (cdat->dstr_246__NIFS_LEFT.val) - 1); cdat->dstr_246__NIFS_LEFT.val[9] = (char) 0; cdat->dstr_246__NIFS_LEFT.slen = 9; /*^iniobj */ /*iniobj dobj_247__NIFS_LEFT*/ /*_.VALDATA___V415*/ meltfptr[414] = (melt_ptr_t) & cdat->dobj_247__NIFS_LEFT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_247__NIFS_LEFT", 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_247__NIFS_LEFT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_247__NIFS_LEFT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_247__NIFS_LEFT.obj_num = 4; cdat->dobj_247__NIFS_LEFT.obj_hash = 681124312; cdat->dobj_247__NIFS_LEFT.obj_len = 4; /*inistring dstr_248__NIFS_LEFT*/ /*_.VALSTR___V416*/ meltfptr[415] = (melt_ptr_t) & cdat->dstr_248__NIFS_LEFT; cdat->dstr_248__NIFS_LEFT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_248__NIFS_LEFT.val, "NIFS_LEFT", sizeof (cdat->dstr_248__NIFS_LEFT.val) - 1); cdat->dstr_248__NIFS_LEFT.val[9] = (char) 0; cdat->dstr_248__NIFS_LEFT.slen = 9; /*iniobj dsym_249__NIFS_RIGHT*/ /*uniqueobj*/ if (! /*_.VALDATA___V422*/ meltfptr[421]) /*_.VALDATA___V422*/ meltfptr[421] = (melt_ptr_t) & cdat->dsym_249__NIFS_RIGHT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_249__NIFS_RIGHT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_249__NIFS_RIGHT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_249__NIFS_RIGHT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_249__NIFS_RIGHT.obj_hash = 606685282; cdat->dsym_249__NIFS_RIGHT.obj_len = 3; /*inistring dstr_250__NIFS_RIGHT*/ /*_.VALSTR___V423*/ meltfptr[422] = (melt_ptr_t) & cdat->dstr_250__NIFS_RIGHT; cdat->dstr_250__NIFS_RIGHT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_250__NIFS_RIGHT.val, "NIFS_RIGHT", sizeof (cdat->dstr_250__NIFS_RIGHT.val) - 1); cdat->dstr_250__NIFS_RIGHT.val[10] = (char) 0; cdat->dstr_250__NIFS_RIGHT.slen = 10; /*^iniobj */ /*iniobj dobj_251__NIFS_RIGHT*/ /*_.VALDATA___V417*/ meltfptr[416] = (melt_ptr_t) & cdat->dobj_251__NIFS_RIGHT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_251__NIFS_RIGHT", 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_251__NIFS_RIGHT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_251__NIFS_RIGHT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_251__NIFS_RIGHT.obj_num = 5; cdat->dobj_251__NIFS_RIGHT.obj_hash = 52314199; cdat->dobj_251__NIFS_RIGHT.obj_len = 4; /*inistring dstr_252__NIFS_RIGHT*/ /*_.VALSTR___V418*/ meltfptr[417] = (melt_ptr_t) & cdat->dstr_252__NIFS_RIGHT; cdat->dstr_252__NIFS_RIGHT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_252__NIFS_RIGHT.val, "NIFS_RIGHT", sizeof (cdat->dstr_252__NIFS_RIGHT.val) - 1); cdat->dstr_252__NIFS_RIGHT.val[10] = (char) 0; cdat->dstr_252__NIFS_RIGHT.slen = 10; /*iniobj dsym_253__CLASS_NREP_IF*/ /*uniqueobj*/ if (! /*_.VALDATA___V424*/ meltfptr[423]) /*_.VALDATA___V424*/ meltfptr[423] = (melt_ptr_t) & cdat->dsym_253__CLASS_NREP_IF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_253__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_253__CLASS_NREP_IF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_253__CLASS_NREP_IF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_253__CLASS_NREP_IF.obj_hash = 942597626; cdat->dsym_253__CLASS_NREP_IF.obj_len = 3; /*inistring dstr_254__CLASS_NREP_IF*/ /*_.VALSTR___V425*/ meltfptr[424] = (melt_ptr_t) & cdat->dstr_254__CLASS_NREP_IF; cdat->dstr_254__CLASS_NREP_IF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_254__CLASS_NREP_IF.val, "CLASS_NREP_IF", sizeof (cdat->dstr_254__CLASS_NREP_IF.val) - 1); cdat->dstr_254__CLASS_NREP_IF.val[13] = (char) 0; cdat->dstr_254__CLASS_NREP_IF.slen = 13; MELT_LOCATION ("warmelt-normal.melt:245:/ iniobj"); /*iniobj dobj_255__CLASS_NREP_IF*/ /*_.VALDATA___V426*/ meltfptr[425] = (melt_ptr_t) & cdat->dobj_255__CLASS_NREP_IF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_255__CLASS_NREP_IF", 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_255__CLASS_NREP_IF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_255__CLASS_NREP_IF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_255__CLASS_NREP_IF.obj_num = MELTOBMAG_OBJECT; cdat->dobj_255__CLASS_NREP_IF.obj_hash = 351716671; cdat->dobj_255__CLASS_NREP_IF.obj_len = 8; /*inistring dstr_256__CLASS_NREP_IF*/ /*_.VALSTR___V427*/ meltfptr[426] = (melt_ptr_t) & cdat->dstr_256__CLASS_NREP_IF; cdat->dstr_256__CLASS_NREP_IF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_256__CLASS_NREP_IF.val, "CLASS_NREP_IF", sizeof (cdat->dstr_256__CLASS_NREP_IF.val) - 1); cdat->dstr_256__CLASS_NREP_IF.val[13] = (char) 0; cdat->dstr_256__CLASS_NREP_IF.slen = 13; /*inimult dtup_257__CLASS_NREP_IF */ /*_.VALTUP___V428*/ meltfptr[427] = (melt_ptr_t) & cdat->dtup_257__CLASS_NREP_IF; cdat->dtup_257__CLASS_NREP_IF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_257__CLASS_NREP_IF.nbval = 5; /*inimult dtup_258__CLASS_NREP_IF */ /*_.VALTUP___V431*/ meltfptr[430] = (melt_ptr_t) & cdat->dtup_258__CLASS_NREP_IF; cdat->dtup_258__CLASS_NREP_IF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_258__CLASS_NREP_IF.nbval = 5; /*iniobj dsym_259__NIF_TEST*/ /*uniqueobj*/ if (! /*_.VALDATA___V432*/ meltfptr[431]) /*_.VALDATA___V432*/ meltfptr[431] = (melt_ptr_t) & cdat->dsym_259__NIF_TEST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_259__NIF_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_259__NIF_TEST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_259__NIF_TEST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_259__NIF_TEST.obj_hash = 721603485; cdat->dsym_259__NIF_TEST.obj_len = 3; /*inistring dstr_260__NIF_TEST*/ /*_.VALSTR___V433*/ meltfptr[432] = (melt_ptr_t) & cdat->dstr_260__NIF_TEST; cdat->dstr_260__NIF_TEST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_260__NIF_TEST.val, "NIF_TEST", sizeof (cdat->dstr_260__NIF_TEST.val) - 1); cdat->dstr_260__NIF_TEST.val[8] = (char) 0; cdat->dstr_260__NIF_TEST.slen = 8; /*^iniobj */ /*iniobj dobj_261__NIF_TEST*/ /*_.VALDATA___V429*/ meltfptr[428] = (melt_ptr_t) & cdat->dobj_261__NIF_TEST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_261__NIF_TEST", 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_261__NIF_TEST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_261__NIF_TEST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_261__NIF_TEST.obj_num = 4; cdat->dobj_261__NIF_TEST.obj_hash = 592402726; cdat->dobj_261__NIF_TEST.obj_len = 4; /*inistring dstr_262__NIF_TEST*/ /*_.VALSTR___V430*/ meltfptr[429] = (melt_ptr_t) & cdat->dstr_262__NIF_TEST; cdat->dstr_262__NIF_TEST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_262__NIF_TEST.val, "NIF_TEST", sizeof (cdat->dstr_262__NIF_TEST.val) - 1); cdat->dstr_262__NIF_TEST.val[8] = (char) 0; cdat->dstr_262__NIF_TEST.slen = 8; /*iniobj dsym_263__CLASS_NREP_CPPIF*/ /*uniqueobj*/ if (! /*_.VALDATA___V434*/ meltfptr[433]) /*_.VALDATA___V434*/ meltfptr[433] = (melt_ptr_t) & cdat->dsym_263__CLASS_NREP_CPPIF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_263__CLASS_NREP_CPPIF", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_263__CLASS_NREP_CPPIF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_263__CLASS_NREP_CPPIF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_263__CLASS_NREP_CPPIF.obj_hash = 768655685; cdat->dsym_263__CLASS_NREP_CPPIF.obj_len = 3; /*inistring dstr_264__CLASS_NREP_CPPIF*/ /*_.VALSTR___V435*/ meltfptr[434] = (melt_ptr_t) & cdat->dstr_264__CLASS_NREP_CPPIF; cdat->dstr_264__CLASS_NREP_CPPIF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_264__CLASS_NREP_CPPIF.val, "CLASS_NREP_CPPIF", sizeof (cdat->dstr_264__CLASS_NREP_CPPIF. val) - 1); cdat->dstr_264__CLASS_NREP_CPPIF.val[16] = (char) 0; cdat->dstr_264__CLASS_NREP_CPPIF.slen = 16; MELT_LOCATION ("warmelt-normal.melt:254:/ iniobj"); /*iniobj dobj_265__CLASS_NREP_CPPIF*/ /*_.VALDATA___V436*/ meltfptr[435] = (melt_ptr_t) & cdat->dobj_265__CLASS_NREP_CPPIF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_265__CLASS_NREP_CPPIF", 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_265__CLASS_NREP_CPPIF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_265__CLASS_NREP_CPPIF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_265__CLASS_NREP_CPPIF.obj_num = MELTOBMAG_OBJECT; cdat->dobj_265__CLASS_NREP_CPPIF.obj_hash = 143669556; cdat->dobj_265__CLASS_NREP_CPPIF.obj_len = 8; /*inistring dstr_266__CLASS_NREP_CPPIF*/ /*_.VALSTR___V437*/ meltfptr[436] = (melt_ptr_t) & cdat->dstr_266__CLASS_NREP_CPPIF; cdat->dstr_266__CLASS_NREP_CPPIF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_266__CLASS_NREP_CPPIF.val, "CLASS_NREP_CPPIF", sizeof (cdat->dstr_266__CLASS_NREP_CPPIF. val) - 1); cdat->dstr_266__CLASS_NREP_CPPIF.val[16] = (char) 0; cdat->dstr_266__CLASS_NREP_CPPIF.slen = 16; /*inimult dtup_267__CLASS_NREP_CPPIF */ /*_.VALTUP___V438*/ meltfptr[437] = (melt_ptr_t) & cdat->dtup_267__CLASS_NREP_CPPIF; cdat->dtup_267__CLASS_NREP_CPPIF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_267__CLASS_NREP_CPPIF.nbval = 3; /*inimult dtup_268__CLASS_NREP_CPPIF */ /*_.VALTUP___V447*/ meltfptr[446] = (melt_ptr_t) & cdat->dtup_268__CLASS_NREP_CPPIF; cdat->dtup_268__CLASS_NREP_CPPIF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_268__CLASS_NREP_CPPIF.nbval = 5; /*iniobj dsym_269__NIFP_COND*/ /*uniqueobj*/ if (! /*_.VALDATA___V448*/ meltfptr[447]) /*_.VALDATA___V448*/ meltfptr[447] = (melt_ptr_t) & cdat->dsym_269__NIFP_COND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_269__NIFP_COND", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_269__NIFP_COND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_269__NIFP_COND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_269__NIFP_COND.obj_hash = 955960638; cdat->dsym_269__NIFP_COND.obj_len = 3; /*inistring dstr_270__NIFP_COND*/ /*_.VALSTR___V449*/ meltfptr[448] = (melt_ptr_t) & cdat->dstr_270__NIFP_COND; cdat->dstr_270__NIFP_COND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_270__NIFP_COND.val, "NIFP_COND", sizeof (cdat->dstr_270__NIFP_COND.val) - 1); cdat->dstr_270__NIFP_COND.val[9] = (char) 0; cdat->dstr_270__NIFP_COND.slen = 9; /*^iniobj */ /*iniobj dobj_271__NIFP_COND*/ /*_.VALDATA___V439*/ meltfptr[438] = (melt_ptr_t) & cdat->dobj_271__NIFP_COND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_271__NIFP_COND", 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_271__NIFP_COND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_271__NIFP_COND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_271__NIFP_COND.obj_num = 1; cdat->dobj_271__NIFP_COND.obj_hash = 461456589; cdat->dobj_271__NIFP_COND.obj_len = 4; /*inistring dstr_272__NIFP_COND*/ /*_.VALSTR___V440*/ meltfptr[439] = (melt_ptr_t) & cdat->dstr_272__NIFP_COND; cdat->dstr_272__NIFP_COND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_272__NIFP_COND.val, "NIFP_COND", sizeof (cdat->dstr_272__NIFP_COND.val) - 1); cdat->dstr_272__NIFP_COND.val[9] = (char) 0; cdat->dstr_272__NIFP_COND.slen = 9; /*iniobj dsym_273__NIFP_THEN*/ /*uniqueobj*/ if (! /*_.VALDATA___V450*/ meltfptr[449]) /*_.VALDATA___V450*/ meltfptr[449] = (melt_ptr_t) & cdat->dsym_273__NIFP_THEN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_273__NIFP_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_273__NIFP_THEN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_273__NIFP_THEN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_273__NIFP_THEN.obj_hash = 1050966842; cdat->dsym_273__NIFP_THEN.obj_len = 3; /*inistring dstr_274__NIFP_THEN*/ /*_.VALSTR___V451*/ meltfptr[450] = (melt_ptr_t) & cdat->dstr_274__NIFP_THEN; cdat->dstr_274__NIFP_THEN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_274__NIFP_THEN.val, "NIFP_THEN", sizeof (cdat->dstr_274__NIFP_THEN.val) - 1); cdat->dstr_274__NIFP_THEN.val[9] = (char) 0; cdat->dstr_274__NIFP_THEN.slen = 9; /*^iniobj */ /*iniobj dobj_275__NIFP_THEN*/ /*_.VALDATA___V441*/ meltfptr[440] = (melt_ptr_t) & cdat->dobj_275__NIFP_THEN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_275__NIFP_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_275__NIFP_THEN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_275__NIFP_THEN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_275__NIFP_THEN.obj_num = 2; cdat->dobj_275__NIFP_THEN.obj_hash = 452772766; cdat->dobj_275__NIFP_THEN.obj_len = 4; /*inistring dstr_276__NIFP_THEN*/ /*_.VALSTR___V442*/ meltfptr[441] = (melt_ptr_t) & cdat->dstr_276__NIFP_THEN; cdat->dstr_276__NIFP_THEN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_276__NIFP_THEN.val, "NIFP_THEN", sizeof (cdat->dstr_276__NIFP_THEN.val) - 1); cdat->dstr_276__NIFP_THEN.val[9] = (char) 0; cdat->dstr_276__NIFP_THEN.slen = 9; /*iniobj dsym_277__NIFP_ELSE*/ /*uniqueobj*/ if (! /*_.VALDATA___V452*/ meltfptr[451]) /*_.VALDATA___V452*/ meltfptr[451] = (melt_ptr_t) & cdat->dsym_277__NIFP_ELSE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_277__NIFP_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_277__NIFP_ELSE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_277__NIFP_ELSE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_277__NIFP_ELSE.obj_hash = 641642630; cdat->dsym_277__NIFP_ELSE.obj_len = 3; /*inistring dstr_278__NIFP_ELSE*/ /*_.VALSTR___V453*/ meltfptr[452] = (melt_ptr_t) & cdat->dstr_278__NIFP_ELSE; cdat->dstr_278__NIFP_ELSE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_278__NIFP_ELSE.val, "NIFP_ELSE", sizeof (cdat->dstr_278__NIFP_ELSE.val) - 1); cdat->dstr_278__NIFP_ELSE.val[9] = (char) 0; cdat->dstr_278__NIFP_ELSE.slen = 9; /*^iniobj */ /*iniobj dobj_279__NIFP_ELSE*/ /*_.VALDATA___V443*/ meltfptr[442] = (melt_ptr_t) & cdat->dobj_279__NIFP_ELSE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_279__NIFP_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_279__NIFP_ELSE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_279__NIFP_ELSE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_279__NIFP_ELSE.obj_num = 3; cdat->dobj_279__NIFP_ELSE.obj_hash = 771222022; cdat->dobj_279__NIFP_ELSE.obj_len = 4; /*inistring dstr_280__NIFP_ELSE*/ /*_.VALSTR___V444*/ meltfptr[443] = (melt_ptr_t) & cdat->dstr_280__NIFP_ELSE; cdat->dstr_280__NIFP_ELSE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_280__NIFP_ELSE.val, "NIFP_ELSE", sizeof (cdat->dstr_280__NIFP_ELSE.val) - 1); cdat->dstr_280__NIFP_ELSE.val[9] = (char) 0; cdat->dstr_280__NIFP_ELSE.slen = 9; /*iniobj dsym_281__NIFP_CTYP*/ /*uniqueobj*/ if (! /*_.VALDATA___V454*/ meltfptr[453]) /*_.VALDATA___V454*/ meltfptr[453] = (melt_ptr_t) & cdat->dsym_281__NIFP_CTYP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_281__NIFP_CTYP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_281__NIFP_CTYP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_281__NIFP_CTYP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_281__NIFP_CTYP.obj_hash = 1026490910; cdat->dsym_281__NIFP_CTYP.obj_len = 3; /*inistring dstr_282__NIFP_CTYP*/ /*_.VALSTR___V455*/ meltfptr[454] = (melt_ptr_t) & cdat->dstr_282__NIFP_CTYP; cdat->dstr_282__NIFP_CTYP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_282__NIFP_CTYP.val, "NIFP_CTYP", sizeof (cdat->dstr_282__NIFP_CTYP.val) - 1); cdat->dstr_282__NIFP_CTYP.val[9] = (char) 0; cdat->dstr_282__NIFP_CTYP.slen = 9; /*^iniobj */ /*iniobj dobj_283__NIFP_CTYP*/ /*_.VALDATA___V445*/ meltfptr[444] = (melt_ptr_t) & cdat->dobj_283__NIFP_CTYP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_283__NIFP_CTYP", 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_283__NIFP_CTYP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_283__NIFP_CTYP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_283__NIFP_CTYP.obj_num = 4; cdat->dobj_283__NIFP_CTYP.obj_hash = 666514012; cdat->dobj_283__NIFP_CTYP.obj_len = 4; /*inistring dstr_284__NIFP_CTYP*/ /*_.VALSTR___V446*/ meltfptr[445] = (melt_ptr_t) & cdat->dstr_284__NIFP_CTYP; cdat->dstr_284__NIFP_CTYP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_284__NIFP_CTYP.val, "NIFP_CTYP", sizeof (cdat->dstr_284__NIFP_CTYP.val) - 1); cdat->dstr_284__NIFP_CTYP.val[9] = (char) 0; cdat->dstr_284__NIFP_CTYP.slen = 9; /*iniobj dsym_285__CLASS_NREP_PROGN*/ /*uniqueobj*/ if (! /*_.VALDATA___V456*/ meltfptr[455]) /*_.VALDATA___V456*/ meltfptr[455] = (melt_ptr_t) & cdat->dsym_285__CLASS_NREP_PROGN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_285__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_285__CLASS_NREP_PROGN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_285__CLASS_NREP_PROGN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_285__CLASS_NREP_PROGN.obj_hash = 378668026; cdat->dsym_285__CLASS_NREP_PROGN.obj_len = 3; /*inistring dstr_286__CLASS_NREP_PROGN*/ /*_.VALSTR___V457*/ meltfptr[456] = (melt_ptr_t) & cdat->dstr_286__CLASS_NREP_PROGN; cdat->dstr_286__CLASS_NREP_PROGN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_286__CLASS_NREP_PROGN.val, "CLASS_NREP_PROGN", sizeof (cdat->dstr_286__CLASS_NREP_PROGN. val) - 1); cdat->dstr_286__CLASS_NREP_PROGN.val[16] = (char) 0; cdat->dstr_286__CLASS_NREP_PROGN.slen = 16; MELT_LOCATION ("warmelt-normal.melt:266:/ iniobj"); /*iniobj dobj_287__CLASS_NREP_PROGN*/ /*_.VALDATA___V458*/ meltfptr[457] = (melt_ptr_t) & cdat->dobj_287__CLASS_NREP_PROGN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_287__CLASS_NREP_PROGN", 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_287__CLASS_NREP_PROGN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_287__CLASS_NREP_PROGN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_287__CLASS_NREP_PROGN.obj_num = MELTOBMAG_OBJECT; cdat->dobj_287__CLASS_NREP_PROGN.obj_hash = 589924500; cdat->dobj_287__CLASS_NREP_PROGN.obj_len = 8; /*inistring dstr_288__CLASS_NREP_PROGN*/ /*_.VALSTR___V459*/ meltfptr[458] = (melt_ptr_t) & cdat->dstr_288__CLASS_NREP_PROGN; cdat->dstr_288__CLASS_NREP_PROGN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_288__CLASS_NREP_PROGN.val, "CLASS_NREP_PROGN", sizeof (cdat->dstr_288__CLASS_NREP_PROGN. val) - 1); cdat->dstr_288__CLASS_NREP_PROGN.val[16] = (char) 0; cdat->dstr_288__CLASS_NREP_PROGN.slen = 16; /*inimult dtup_289__CLASS_NREP_PROGN */ /*_.VALTUP___V460*/ meltfptr[459] = (melt_ptr_t) & cdat->dtup_289__CLASS_NREP_PROGN; cdat->dtup_289__CLASS_NREP_PROGN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_289__CLASS_NREP_PROGN.nbval = 3; /*inimult dtup_290__CLASS_NREP_PROGN */ /*_.VALTUP___V465*/ meltfptr[464] = (melt_ptr_t) & cdat->dtup_290__CLASS_NREP_PROGN; cdat->dtup_290__CLASS_NREP_PROGN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_290__CLASS_NREP_PROGN.nbval = 3; /*iniobj dsym_291__NPROGN_SEQ*/ /*uniqueobj*/ if (! /*_.VALDATA___V466*/ meltfptr[465]) /*_.VALDATA___V466*/ meltfptr[465] = (melt_ptr_t) & cdat->dsym_291__NPROGN_SEQ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_291__NPROGN_SEQ", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_291__NPROGN_SEQ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_291__NPROGN_SEQ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_291__NPROGN_SEQ.obj_hash = 39398709; cdat->dsym_291__NPROGN_SEQ.obj_len = 3; /*inistring dstr_292__NPROGN_SEQ*/ /*_.VALSTR___V467*/ meltfptr[466] = (melt_ptr_t) & cdat->dstr_292__NPROGN_SEQ; cdat->dstr_292__NPROGN_SEQ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_292__NPROGN_SEQ.val, "NPROGN_SEQ", sizeof (cdat->dstr_292__NPROGN_SEQ.val) - 1); cdat->dstr_292__NPROGN_SEQ.val[10] = (char) 0; cdat->dstr_292__NPROGN_SEQ.slen = 10; /*^iniobj */ /*iniobj dobj_293__NPROGN_SEQ*/ /*_.VALDATA___V461*/ meltfptr[460] = (melt_ptr_t) & cdat->dobj_293__NPROGN_SEQ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_293__NPROGN_SEQ", 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_293__NPROGN_SEQ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_293__NPROGN_SEQ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_293__NPROGN_SEQ.obj_num = 1; cdat->dobj_293__NPROGN_SEQ.obj_hash = 818374395; cdat->dobj_293__NPROGN_SEQ.obj_len = 4; /*inistring dstr_294__NPROGN_SEQ*/ /*_.VALSTR___V462*/ meltfptr[461] = (melt_ptr_t) & cdat->dstr_294__NPROGN_SEQ; cdat->dstr_294__NPROGN_SEQ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_294__NPROGN_SEQ.val, "NPROGN_SEQ", sizeof (cdat->dstr_294__NPROGN_SEQ.val) - 1); cdat->dstr_294__NPROGN_SEQ.val[10] = (char) 0; cdat->dstr_294__NPROGN_SEQ.slen = 10; /*iniobj dsym_295__NPROGN_LAST*/ /*uniqueobj*/ if (! /*_.VALDATA___V468*/ meltfptr[467]) /*_.VALDATA___V468*/ meltfptr[467] = (melt_ptr_t) & cdat->dsym_295__NPROGN_LAST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_295__NPROGN_LAST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_295__NPROGN_LAST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_295__NPROGN_LAST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_295__NPROGN_LAST.obj_hash = 257289658; cdat->dsym_295__NPROGN_LAST.obj_len = 3; /*inistring dstr_296__NPROGN_LAST*/ /*_.VALSTR___V469*/ meltfptr[468] = (melt_ptr_t) & cdat->dstr_296__NPROGN_LAST; cdat->dstr_296__NPROGN_LAST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_296__NPROGN_LAST.val, "NPROGN_LAST", sizeof (cdat->dstr_296__NPROGN_LAST.val) - 1); cdat->dstr_296__NPROGN_LAST.val[11] = (char) 0; cdat->dstr_296__NPROGN_LAST.slen = 11; /*^iniobj */ /*iniobj dobj_297__NPROGN_LAST*/ /*_.VALDATA___V463*/ meltfptr[462] = (melt_ptr_t) & cdat->dobj_297__NPROGN_LAST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_297__NPROGN_LAST", 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_297__NPROGN_LAST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_297__NPROGN_LAST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_297__NPROGN_LAST.obj_num = 2; cdat->dobj_297__NPROGN_LAST.obj_hash = 232103389; cdat->dobj_297__NPROGN_LAST.obj_len = 4; /*inistring dstr_298__NPROGN_LAST*/ /*_.VALSTR___V464*/ meltfptr[463] = (melt_ptr_t) & cdat->dstr_298__NPROGN_LAST; cdat->dstr_298__NPROGN_LAST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_298__NPROGN_LAST.val, "NPROGN_LAST", sizeof (cdat->dstr_298__NPROGN_LAST.val) - 1); cdat->dstr_298__NPROGN_LAST.val[11] = (char) 0; cdat->dstr_298__NPROGN_LAST.slen = 11; /*iniobj dsym_299__CLASS_NREP_CHECKSIGNAL*/ /*uniqueobj*/ if (! /*_.VALDATA___V470*/ meltfptr[469]) /*_.VALDATA___V470*/ meltfptr[469] = (melt_ptr_t) & cdat->dsym_299__CLASS_NREP_CHECKSIGNAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_299__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_299__CLASS_NREP_CHECKSIGNAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_299__CLASS_NREP_CHECKSIGNAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_299__CLASS_NREP_CHECKSIGNAL.obj_hash = 33589219; cdat->dsym_299__CLASS_NREP_CHECKSIGNAL.obj_len = 3; /*inistring dstr_300__CLASS_NREP_CHECK*/ /*_.VALSTR___V471*/ meltfptr[470] = (melt_ptr_t) & cdat->dstr_300__CLASS_NREP_CHECK; cdat->dstr_300__CLASS_NREP_CHECK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_300__CLASS_NREP_CHECK.val, "CLASS_NREP_CHECKSIGNAL", sizeof (cdat->dstr_300__CLASS_NREP_CHECK. val) - 1); cdat->dstr_300__CLASS_NREP_CHECK.val[22] = (char) 0; cdat->dstr_300__CLASS_NREP_CHECK.slen = 22; MELT_LOCATION ("warmelt-normal.melt:275:/ iniobj"); /*iniobj dobj_301__CLASS_NREP_CHECKSIGNAL*/ /*_.VALDATA___V472*/ meltfptr[471] = (melt_ptr_t) & cdat->dobj_301__CLASS_NREP_CHECKSIGNAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_301__CLASS_NREP_CHECKSIGNAL", 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_301__CLASS_NREP_CHECKSIGNAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_301__CLASS_NREP_CHECKSIGNAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_301__CLASS_NREP_CHECKSIGNAL.obj_num = MELTOBMAG_OBJECT; cdat->dobj_301__CLASS_NREP_CHECKSIGNAL.obj_hash = 370117743; cdat->dobj_301__CLASS_NREP_CHECKSIGNAL.obj_len = 8; /*inistring dstr_302__CLASS_NREP_CHECK*/ /*_.VALSTR___V473*/ meltfptr[472] = (melt_ptr_t) & cdat->dstr_302__CLASS_NREP_CHECK; cdat->dstr_302__CLASS_NREP_CHECK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_302__CLASS_NREP_CHECK.val, "CLASS_NREP_CHECKSIGNAL", sizeof (cdat->dstr_302__CLASS_NREP_CHECK. val) - 1); cdat->dstr_302__CLASS_NREP_CHECK.val[22] = (char) 0; cdat->dstr_302__CLASS_NREP_CHECK.slen = 22; /*inimult dtup_303__CLASS_NREP_CHECKSIGNAL */ /*_.VALTUP___V474*/ meltfptr[473] = (melt_ptr_t) & cdat->dtup_303__CLASS_NREP_CHECKSIGNAL; cdat->dtup_303__CLASS_NREP_CHECKSIGNAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_303__CLASS_NREP_CHECKSIGNAL.nbval = 3; /*inimult dtup_304__CLASS_NREP_CHECKSIGNAL */ /*_.VALTUP___V475*/ meltfptr[474] = (melt_ptr_t) & cdat->dtup_304__CLASS_NREP_CHECKSIGNAL; cdat->dtup_304__CLASS_NREP_CHECKSIGNAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_304__CLASS_NREP_CHECKSIGNAL.nbval = 1; /*iniobj dsym_305__CLASS_NREP_UNSAFE_GET_FIELD*/ /*uniqueobj*/ if (! /*_.VALDATA___V476*/ meltfptr[475]) /*_.VALDATA___V476*/ meltfptr[475] = (melt_ptr_t) & cdat->dsym_305__CLASS_NREP_UNSAFE_GET_FIELD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_305__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_305__CLASS_NREP_UNSAFE_GET_FIELD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_305__CLASS_NREP_UNSAFE_GET_FIELD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_305__CLASS_NREP_UNSAFE_GET_FIELD.obj_hash = 71587717; cdat->dsym_305__CLASS_NREP_UNSAFE_GET_FIELD.obj_len = 3; /*inistring dstr_306__CLASS_NREP_UNSAF*/ /*_.VALSTR___V477*/ meltfptr[476] = (melt_ptr_t) & cdat->dstr_306__CLASS_NREP_UNSAF; cdat->dstr_306__CLASS_NREP_UNSAF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_306__CLASS_NREP_UNSAF.val, "CLASS_NREP_UNSAFE_GET_FIELD", sizeof (cdat->dstr_306__CLASS_NREP_UNSAF. val) - 1); cdat->dstr_306__CLASS_NREP_UNSAF.val[27] = (char) 0; cdat->dstr_306__CLASS_NREP_UNSAF.slen = 27; MELT_LOCATION ("warmelt-normal.melt:286:/ iniobj"); /*iniobj dobj_307__CLASS_NREP_UNSAFE_GET_FIELD*/ /*_.VALDATA___V478*/ meltfptr[477] = (melt_ptr_t) & cdat->dobj_307__CLASS_NREP_UNSAFE_GET_FIELD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_307__CLASS_NREP_UNSAFE_GET_FIELD", 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_307__CLASS_NREP_UNSAFE_GET_FIELD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_307__CLASS_NREP_UNSAFE_GET_FIELD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_307__CLASS_NREP_UNSAFE_GET_FIELD.obj_num = MELTOBMAG_OBJECT; cdat->dobj_307__CLASS_NREP_UNSAFE_GET_FIELD.obj_hash = 74305629; cdat->dobj_307__CLASS_NREP_UNSAFE_GET_FIELD.obj_len = 8; /*inistring dstr_308__CLASS_NREP_UNSAF*/ /*_.VALSTR___V479*/ meltfptr[478] = (melt_ptr_t) & cdat->dstr_308__CLASS_NREP_UNSAF; cdat->dstr_308__CLASS_NREP_UNSAF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_308__CLASS_NREP_UNSAF.val, "CLASS_NREP_UNSAFE_GET_FIELD", sizeof (cdat->dstr_308__CLASS_NREP_UNSAF. val) - 1); cdat->dstr_308__CLASS_NREP_UNSAF.val[27] = (char) 0; cdat->dstr_308__CLASS_NREP_UNSAF.slen = 27; /*inimult dtup_309__CLASS_NREP_UNSAFE_GET_FIELD */ /*_.VALTUP___V480*/ meltfptr[479] = (melt_ptr_t) & cdat->dtup_309__CLASS_NREP_UNSAFE_GET_FIELD; cdat->dtup_309__CLASS_NREP_UNSAFE_GET_FIELD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_309__CLASS_NREP_UNSAFE_GET_FIELD.nbval = 3; /*inimult dtup_310__CLASS_NREP_UNSAFE_GET_FIELD */ /*_.VALTUP___V485*/ meltfptr[484] = (melt_ptr_t) & cdat->dtup_310__CLASS_NREP_UNSAFE_GET_FIELD; cdat->dtup_310__CLASS_NREP_UNSAFE_GET_FIELD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_310__CLASS_NREP_UNSAFE_GET_FIELD.nbval = 3; /*iniobj dsym_311__NUGET_OBJ*/ /*uniqueobj*/ if (! /*_.VALDATA___V486*/ meltfptr[485]) /*_.VALDATA___V486*/ meltfptr[485] = (melt_ptr_t) & cdat->dsym_311__NUGET_OBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_311__NUGET_OBJ", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_311__NUGET_OBJ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_311__NUGET_OBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_311__NUGET_OBJ.obj_hash = 587709903; cdat->dsym_311__NUGET_OBJ.obj_len = 3; /*inistring dstr_312__NUGET_OBJ*/ /*_.VALSTR___V487*/ meltfptr[486] = (melt_ptr_t) & cdat->dstr_312__NUGET_OBJ; cdat->dstr_312__NUGET_OBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_312__NUGET_OBJ.val, "NUGET_OBJ", sizeof (cdat->dstr_312__NUGET_OBJ.val) - 1); cdat->dstr_312__NUGET_OBJ.val[9] = (char) 0; cdat->dstr_312__NUGET_OBJ.slen = 9; /*^iniobj */ /*iniobj dobj_313__NUGET_OBJ*/ /*_.VALDATA___V481*/ meltfptr[480] = (melt_ptr_t) & cdat->dobj_313__NUGET_OBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_313__NUGET_OBJ", 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_313__NUGET_OBJ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_313__NUGET_OBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_313__NUGET_OBJ.obj_num = 1; cdat->dobj_313__NUGET_OBJ.obj_hash = 9951251; cdat->dobj_313__NUGET_OBJ.obj_len = 4; /*inistring dstr_314__NUGET_OBJ*/ /*_.VALSTR___V482*/ meltfptr[481] = (melt_ptr_t) & cdat->dstr_314__NUGET_OBJ; cdat->dstr_314__NUGET_OBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_314__NUGET_OBJ.val, "NUGET_OBJ", sizeof (cdat->dstr_314__NUGET_OBJ.val) - 1); cdat->dstr_314__NUGET_OBJ.val[9] = (char) 0; cdat->dstr_314__NUGET_OBJ.slen = 9; /*iniobj dsym_315__NUGET_FIELD*/ /*uniqueobj*/ if (! /*_.VALDATA___V488*/ meltfptr[487]) /*_.VALDATA___V488*/ meltfptr[487] = (melt_ptr_t) & cdat->dsym_315__NUGET_FIELD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_315__NUGET_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_315__NUGET_FIELD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_315__NUGET_FIELD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_315__NUGET_FIELD.obj_hash = 498678117; cdat->dsym_315__NUGET_FIELD.obj_len = 3; /*inistring dstr_316__NUGET_FIELD*/ /*_.VALSTR___V489*/ meltfptr[488] = (melt_ptr_t) & cdat->dstr_316__NUGET_FIELD; cdat->dstr_316__NUGET_FIELD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_316__NUGET_FIELD.val, "NUGET_FIELD", sizeof (cdat->dstr_316__NUGET_FIELD.val) - 1); cdat->dstr_316__NUGET_FIELD.val[11] = (char) 0; cdat->dstr_316__NUGET_FIELD.slen = 11; /*^iniobj */ /*iniobj dobj_317__NUGET_FIELD*/ /*_.VALDATA___V483*/ meltfptr[482] = (melt_ptr_t) & cdat->dobj_317__NUGET_FIELD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_317__NUGET_FIELD", 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_317__NUGET_FIELD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_317__NUGET_FIELD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_317__NUGET_FIELD.obj_num = 2; cdat->dobj_317__NUGET_FIELD.obj_hash = 753501021; cdat->dobj_317__NUGET_FIELD.obj_len = 4; /*inistring dstr_318__NUGET_FIELD*/ /*_.VALSTR___V484*/ meltfptr[483] = (melt_ptr_t) & cdat->dstr_318__NUGET_FIELD; cdat->dstr_318__NUGET_FIELD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_318__NUGET_FIELD.val, "NUGET_FIELD", sizeof (cdat->dstr_318__NUGET_FIELD.val) - 1); cdat->dstr_318__NUGET_FIELD.val[11] = (char) 0; cdat->dstr_318__NUGET_FIELD.slen = 11; /*iniobj dsym_319__CLASS_NREP_UNSAFE_PUT_FIELDS*/ /*uniqueobj*/ if (! /*_.VALDATA___V490*/ meltfptr[489]) /*_.VALDATA___V490*/ meltfptr[489] = (melt_ptr_t) & cdat->dsym_319__CLASS_NREP_UNSAFE_PUT_FIELDS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_319__CLASS_NREP_UNSAFE_PUT_FIELDS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_319__CLASS_NREP_UNSAFE_PUT_FIELDS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_319__CLASS_NREP_UNSAFE_PUT_FIELDS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_319__CLASS_NREP_UNSAFE_PUT_FIELDS.obj_hash = 7092667; cdat->dsym_319__CLASS_NREP_UNSAFE_PUT_FIELDS.obj_len = 3; /*inistring dstr_320__CLASS_NREP_UNSAF*/ /*_.VALSTR___V491*/ meltfptr[490] = (melt_ptr_t) & cdat->dstr_320__CLASS_NREP_UNSAF; cdat->dstr_320__CLASS_NREP_UNSAF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_320__CLASS_NREP_UNSAF.val, "CLASS_NREP_UNSAFE_PUT_FIELDS", sizeof (cdat->dstr_320__CLASS_NREP_UNSAF. val) - 1); cdat->dstr_320__CLASS_NREP_UNSAF.val[28] = (char) 0; cdat->dstr_320__CLASS_NREP_UNSAF.slen = 28; MELT_LOCATION ("warmelt-normal.melt:295:/ iniobj"); /*iniobj dobj_321__CLASS_NREP_UNSAFE_PUT_FIELDS*/ /*_.VALDATA___V492*/ meltfptr[491] = (melt_ptr_t) & cdat->dobj_321__CLASS_NREP_UNSAFE_PUT_FIELDS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_321__CLASS_NREP_UNSAFE_PUT_FIELDS", 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_321__CLASS_NREP_UNSAFE_PUT_FIELDS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_321__CLASS_NREP_UNSAFE_PUT_FIELDS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_321__CLASS_NREP_UNSAFE_PUT_FIELDS.obj_num = MELTOBMAG_OBJECT; cdat->dobj_321__CLASS_NREP_UNSAFE_PUT_FIELDS.obj_hash = 215811473; cdat->dobj_321__CLASS_NREP_UNSAFE_PUT_FIELDS.obj_len = 8; /*inistring dstr_322__CLASS_NREP_UNSAF*/ /*_.VALSTR___V493*/ meltfptr[492] = (melt_ptr_t) & cdat->dstr_322__CLASS_NREP_UNSAF; cdat->dstr_322__CLASS_NREP_UNSAF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_322__CLASS_NREP_UNSAF.val, "CLASS_NREP_UNSAFE_PUT_FIELDS", sizeof (cdat->dstr_322__CLASS_NREP_UNSAF. val) - 1); cdat->dstr_322__CLASS_NREP_UNSAF.val[28] = (char) 0; cdat->dstr_322__CLASS_NREP_UNSAF.slen = 28; /*inimult dtup_323__CLASS_NREP_UNSAFE_PUT_FIELDS */ /*_.VALTUP___V494*/ meltfptr[493] = (melt_ptr_t) & cdat->dtup_323__CLASS_NREP_UNSAFE_PUT_FIELDS; cdat->dtup_323__CLASS_NREP_UNSAFE_PUT_FIELDS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_323__CLASS_NREP_UNSAFE_PUT_FIELDS.nbval = 3; /*inimult dtup_324__CLASS_NREP_UNSAFE_PUT_FIELDS */ /*_.VALTUP___V499*/ meltfptr[498] = (melt_ptr_t) & cdat->dtup_324__CLASS_NREP_UNSAFE_PUT_FIELDS; cdat->dtup_324__CLASS_NREP_UNSAFE_PUT_FIELDS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_324__CLASS_NREP_UNSAFE_PUT_FIELDS.nbval = 3; /*iniobj dsym_325__NUPUT_OBJ*/ /*uniqueobj*/ if (! /*_.VALDATA___V500*/ meltfptr[499]) /*_.VALDATA___V500*/ meltfptr[499] = (melt_ptr_t) & cdat->dsym_325__NUPUT_OBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_325__NUPUT_OBJ", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_325__NUPUT_OBJ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_325__NUPUT_OBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_325__NUPUT_OBJ.obj_hash = 418867224; cdat->dsym_325__NUPUT_OBJ.obj_len = 3; /*inistring dstr_326__NUPUT_OBJ*/ /*_.VALSTR___V501*/ meltfptr[500] = (melt_ptr_t) & cdat->dstr_326__NUPUT_OBJ; cdat->dstr_326__NUPUT_OBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_326__NUPUT_OBJ.val, "NUPUT_OBJ", sizeof (cdat->dstr_326__NUPUT_OBJ.val) - 1); cdat->dstr_326__NUPUT_OBJ.val[9] = (char) 0; cdat->dstr_326__NUPUT_OBJ.slen = 9; /*^iniobj */ /*iniobj dobj_327__NUPUT_OBJ*/ /*_.VALDATA___V495*/ meltfptr[494] = (melt_ptr_t) & cdat->dobj_327__NUPUT_OBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_327__NUPUT_OBJ", 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_327__NUPUT_OBJ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_327__NUPUT_OBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_327__NUPUT_OBJ.obj_num = 1; cdat->dobj_327__NUPUT_OBJ.obj_hash = 993818966; cdat->dobj_327__NUPUT_OBJ.obj_len = 4; /*inistring dstr_328__NUPUT_OBJ*/ /*_.VALSTR___V496*/ meltfptr[495] = (melt_ptr_t) & cdat->dstr_328__NUPUT_OBJ; cdat->dstr_328__NUPUT_OBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_328__NUPUT_OBJ.val, "NUPUT_OBJ", sizeof (cdat->dstr_328__NUPUT_OBJ.val) - 1); cdat->dstr_328__NUPUT_OBJ.val[9] = (char) 0; cdat->dstr_328__NUPUT_OBJ.slen = 9; /*iniobj dsym_329__NUPUT_FIELDS*/ /*uniqueobj*/ if (! /*_.VALDATA___V502*/ meltfptr[501]) /*_.VALDATA___V502*/ meltfptr[501] = (melt_ptr_t) & cdat->dsym_329__NUPUT_FIELDS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_329__NUPUT_FIELDS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_329__NUPUT_FIELDS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_329__NUPUT_FIELDS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_329__NUPUT_FIELDS.obj_hash = 645552429; cdat->dsym_329__NUPUT_FIELDS.obj_len = 3; /*inistring dstr_330__NUPUT_FIELDS*/ /*_.VALSTR___V503*/ meltfptr[502] = (melt_ptr_t) & cdat->dstr_330__NUPUT_FIELDS; cdat->dstr_330__NUPUT_FIELDS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_330__NUPUT_FIELDS.val, "NUPUT_FIELDS", sizeof (cdat->dstr_330__NUPUT_FIELDS.val) - 1); cdat->dstr_330__NUPUT_FIELDS.val[12] = (char) 0; cdat->dstr_330__NUPUT_FIELDS.slen = 12; /*^iniobj */ /*iniobj dobj_331__NUPUT_FIELDS*/ /*_.VALDATA___V497*/ meltfptr[496] = (melt_ptr_t) & cdat->dobj_331__NUPUT_FIELDS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_331__NUPUT_FIELDS", 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_331__NUPUT_FIELDS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_331__NUPUT_FIELDS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_331__NUPUT_FIELDS.obj_num = 2; cdat->dobj_331__NUPUT_FIELDS.obj_hash = 274149818; cdat->dobj_331__NUPUT_FIELDS.obj_len = 4; /*inistring dstr_332__NUPUT_FIELDS*/ /*_.VALSTR___V498*/ meltfptr[497] = (melt_ptr_t) & cdat->dstr_332__NUPUT_FIELDS; cdat->dstr_332__NUPUT_FIELDS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_332__NUPUT_FIELDS.val, "NUPUT_FIELDS", sizeof (cdat->dstr_332__NUPUT_FIELDS.val) - 1); cdat->dstr_332__NUPUT_FIELDS.val[12] = (char) 0; cdat->dstr_332__NUPUT_FIELDS.slen = 12; /*iniobj dsym_333__CLASS_NREP_UNSAFE_NTH_COMPONENT*/ /*uniqueobj*/ if (! /*_.VALDATA___V504*/ meltfptr[503]) /*_.VALDATA___V504*/ meltfptr[503] = (melt_ptr_t) & cdat->dsym_333__CLASS_NREP_UNSAFE_NTH_COMPONENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_333__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_333__CLASS_NREP_UNSAFE_NTH_COMPONENT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_333__CLASS_NREP_UNSAFE_NTH_COMPONENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_333__CLASS_NREP_UNSAFE_NTH_COMPONENT.obj_hash = 888296044; cdat->dsym_333__CLASS_NREP_UNSAFE_NTH_COMPONENT.obj_len = 3; /*inistring dstr_334__CLASS_NREP_UNSAF*/ /*_.VALSTR___V505*/ meltfptr[504] = (melt_ptr_t) & cdat->dstr_334__CLASS_NREP_UNSAF; cdat->dstr_334__CLASS_NREP_UNSAF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_334__CLASS_NREP_UNSAF.val, "CLASS_NREP_UNSAFE_NTH_COMPONENT", sizeof (cdat->dstr_334__CLASS_NREP_UNSAF. val) - 1); cdat->dstr_334__CLASS_NREP_UNSAF.val[31] = (char) 0; cdat->dstr_334__CLASS_NREP_UNSAF.slen = 31; MELT_LOCATION ("warmelt-normal.melt:301:/ iniobj"); /*iniobj dobj_335__CLASS_NREP_UNSAFE_NTH_COMPONENT*/ /*_.VALDATA___V506*/ meltfptr[505] = (melt_ptr_t) & cdat->dobj_335__CLASS_NREP_UNSAFE_NTH_COMPONENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_335__CLASS_NREP_UNSAFE_NTH_COMPONENT", 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_335__CLASS_NREP_UNSAFE_NTH_COMPONENT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_335__CLASS_NREP_UNSAFE_NTH_COMPONENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_335__CLASS_NREP_UNSAFE_NTH_COMPONENT.obj_num = MELTOBMAG_OBJECT; cdat->dobj_335__CLASS_NREP_UNSAFE_NTH_COMPONENT.obj_hash = 672250857; cdat->dobj_335__CLASS_NREP_UNSAFE_NTH_COMPONENT.obj_len = 8; /*inistring dstr_336__CLASS_NREP_UNSAF*/ /*_.VALSTR___V507*/ meltfptr[506] = (melt_ptr_t) & cdat->dstr_336__CLASS_NREP_UNSAF; cdat->dstr_336__CLASS_NREP_UNSAF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_336__CLASS_NREP_UNSAF.val, "CLASS_NREP_UNSAFE_NTH_COMPONENT", sizeof (cdat->dstr_336__CLASS_NREP_UNSAF. val) - 1); cdat->dstr_336__CLASS_NREP_UNSAF.val[31] = (char) 0; cdat->dstr_336__CLASS_NREP_UNSAF.slen = 31; /*inimult dtup_337__CLASS_NREP_UNSAFE_NTH_COMPONENT */ /*_.VALTUP___V508*/ meltfptr[507] = (melt_ptr_t) & cdat->dtup_337__CLASS_NREP_UNSAFE_NTH_COMPONENT; cdat->dtup_337__CLASS_NREP_UNSAFE_NTH_COMPONENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_337__CLASS_NREP_UNSAFE_NTH_COMPONENT.nbval = 3; /*inimult dtup_338__CLASS_NREP_UNSAFE_NTH_COMPONENT */ /*_.VALTUP___V513*/ meltfptr[512] = (melt_ptr_t) & cdat->dtup_338__CLASS_NREP_UNSAFE_NTH_COMPONENT; cdat->dtup_338__CLASS_NREP_UNSAFE_NTH_COMPONENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_338__CLASS_NREP_UNSAFE_NTH_COMPONENT.nbval = 3; /*iniobj dsym_339__NUNTH_TUPLE*/ /*uniqueobj*/ if (! /*_.VALDATA___V514*/ meltfptr[513]) /*_.VALDATA___V514*/ meltfptr[513] = (melt_ptr_t) & cdat->dsym_339__NUNTH_TUPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_339__NUNTH_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_339__NUNTH_TUPLE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_339__NUNTH_TUPLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_339__NUNTH_TUPLE.obj_hash = 158282506; cdat->dsym_339__NUNTH_TUPLE.obj_len = 3; /*inistring dstr_340__NUNTH_TUPLE*/ /*_.VALSTR___V515*/ meltfptr[514] = (melt_ptr_t) & cdat->dstr_340__NUNTH_TUPLE; cdat->dstr_340__NUNTH_TUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_340__NUNTH_TUPLE.val, "NUNTH_TUPLE", sizeof (cdat->dstr_340__NUNTH_TUPLE.val) - 1); cdat->dstr_340__NUNTH_TUPLE.val[11] = (char) 0; cdat->dstr_340__NUNTH_TUPLE.slen = 11; /*^iniobj */ /*iniobj dobj_341__NUNTH_TUPLE*/ /*_.VALDATA___V509*/ meltfptr[508] = (melt_ptr_t) & cdat->dobj_341__NUNTH_TUPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_341__NUNTH_TUPLE", 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_341__NUNTH_TUPLE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_341__NUNTH_TUPLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_341__NUNTH_TUPLE.obj_num = 1; cdat->dobj_341__NUNTH_TUPLE.obj_hash = 1058641920; cdat->dobj_341__NUNTH_TUPLE.obj_len = 4; /*inistring dstr_342__NUNTH_TUPLE*/ /*_.VALSTR___V510*/ meltfptr[509] = (melt_ptr_t) & cdat->dstr_342__NUNTH_TUPLE; cdat->dstr_342__NUNTH_TUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_342__NUNTH_TUPLE.val, "NUNTH_TUPLE", sizeof (cdat->dstr_342__NUNTH_TUPLE.val) - 1); cdat->dstr_342__NUNTH_TUPLE.val[11] = (char) 0; cdat->dstr_342__NUNTH_TUPLE.slen = 11; /*iniobj dsym_343__NUNTH_INDEX*/ /*uniqueobj*/ if (! /*_.VALDATA___V516*/ meltfptr[515]) /*_.VALDATA___V516*/ meltfptr[515] = (melt_ptr_t) & cdat->dsym_343__NUNTH_INDEX; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_343__NUNTH_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_343__NUNTH_INDEX", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_343__NUNTH_INDEX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_343__NUNTH_INDEX.obj_hash = 865398703; cdat->dsym_343__NUNTH_INDEX.obj_len = 3; /*inistring dstr_344__NUNTH_INDEX*/ /*_.VALSTR___V517*/ meltfptr[516] = (melt_ptr_t) & cdat->dstr_344__NUNTH_INDEX; cdat->dstr_344__NUNTH_INDEX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_344__NUNTH_INDEX.val, "NUNTH_INDEX", sizeof (cdat->dstr_344__NUNTH_INDEX.val) - 1); cdat->dstr_344__NUNTH_INDEX.val[11] = (char) 0; cdat->dstr_344__NUNTH_INDEX.slen = 11; /*^iniobj */ /*iniobj dobj_345__NUNTH_INDEX*/ /*_.VALDATA___V511*/ meltfptr[510] = (melt_ptr_t) & cdat->dobj_345__NUNTH_INDEX; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_345__NUNTH_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_345__NUNTH_INDEX", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_345__NUNTH_INDEX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_345__NUNTH_INDEX.obj_num = 2; cdat->dobj_345__NUNTH_INDEX.obj_hash = 816097395; cdat->dobj_345__NUNTH_INDEX.obj_len = 4; /*inistring dstr_346__NUNTH_INDEX*/ /*_.VALSTR___V512*/ meltfptr[511] = (melt_ptr_t) & cdat->dstr_346__NUNTH_INDEX; cdat->dstr_346__NUNTH_INDEX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_346__NUNTH_INDEX.val, "NUNTH_INDEX", sizeof (cdat->dstr_346__NUNTH_INDEX.val) - 1); cdat->dstr_346__NUNTH_INDEX.val[11] = (char) 0; cdat->dstr_346__NUNTH_INDEX.slen = 11; /*iniobj dsym_347__CLASS_NREP_SETQ*/ /*uniqueobj*/ if (! /*_.VALDATA___V518*/ meltfptr[517]) /*_.VALDATA___V518*/ meltfptr[517] = (melt_ptr_t) & cdat->dsym_347__CLASS_NREP_SETQ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_347__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_347__CLASS_NREP_SETQ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_347__CLASS_NREP_SETQ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_347__CLASS_NREP_SETQ.obj_hash = 314084823; cdat->dsym_347__CLASS_NREP_SETQ.obj_len = 3; /*inistring dstr_348__CLASS_NREP_SETQ*/ /*_.VALSTR___V519*/ meltfptr[518] = (melt_ptr_t) & cdat->dstr_348__CLASS_NREP_SETQ; cdat->dstr_348__CLASS_NREP_SETQ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_348__CLASS_NREP_SETQ.val, "CLASS_NREP_SETQ", sizeof (cdat->dstr_348__CLASS_NREP_SETQ.val) - 1); cdat->dstr_348__CLASS_NREP_SETQ.val[15] = (char) 0; cdat->dstr_348__CLASS_NREP_SETQ.slen = 15; MELT_LOCATION ("warmelt-normal.melt:307:/ iniobj"); /*iniobj dobj_349__CLASS_NREP_SETQ*/ /*_.VALDATA___V520*/ meltfptr[519] = (melt_ptr_t) & cdat->dobj_349__CLASS_NREP_SETQ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_349__CLASS_NREP_SETQ", 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_349__CLASS_NREP_SETQ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_349__CLASS_NREP_SETQ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_349__CLASS_NREP_SETQ.obj_num = MELTOBMAG_OBJECT; cdat->dobj_349__CLASS_NREP_SETQ.obj_hash = 943487077; cdat->dobj_349__CLASS_NREP_SETQ.obj_len = 8; /*inistring dstr_350__CLASS_NREP_SETQ*/ /*_.VALSTR___V521*/ meltfptr[520] = (melt_ptr_t) & cdat->dstr_350__CLASS_NREP_SETQ; cdat->dstr_350__CLASS_NREP_SETQ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_350__CLASS_NREP_SETQ.val, "CLASS_NREP_SETQ", sizeof (cdat->dstr_350__CLASS_NREP_SETQ.val) - 1); cdat->dstr_350__CLASS_NREP_SETQ.val[15] = (char) 0; cdat->dstr_350__CLASS_NREP_SETQ.slen = 15; /*inimult dtup_351__CLASS_NREP_SETQ */ /*_.VALTUP___V522*/ meltfptr[521] = (melt_ptr_t) & cdat->dtup_351__CLASS_NREP_SETQ; cdat->dtup_351__CLASS_NREP_SETQ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_351__CLASS_NREP_SETQ.nbval = 3; /*inimult dtup_352__CLASS_NREP_SETQ */ /*_.VALTUP___V527*/ meltfptr[526] = (melt_ptr_t) & cdat->dtup_352__CLASS_NREP_SETQ; cdat->dtup_352__CLASS_NREP_SETQ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_352__CLASS_NREP_SETQ.nbval = 3; /*iniobj dsym_353__NSTQ_VAR*/ /*uniqueobj*/ if (! /*_.VALDATA___V528*/ meltfptr[527]) /*_.VALDATA___V528*/ meltfptr[527] = (melt_ptr_t) & cdat->dsym_353__NSTQ_VAR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_353__NSTQ_VAR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_353__NSTQ_VAR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_353__NSTQ_VAR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_353__NSTQ_VAR.obj_hash = 768128544; cdat->dsym_353__NSTQ_VAR.obj_len = 3; /*inistring dstr_354__NSTQ_VAR*/ /*_.VALSTR___V529*/ meltfptr[528] = (melt_ptr_t) & cdat->dstr_354__NSTQ_VAR; cdat->dstr_354__NSTQ_VAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_354__NSTQ_VAR.val, "NSTQ_VAR", sizeof (cdat->dstr_354__NSTQ_VAR.val) - 1); cdat->dstr_354__NSTQ_VAR.val[8] = (char) 0; cdat->dstr_354__NSTQ_VAR.slen = 8; /*^iniobj */ /*iniobj dobj_355__NSTQ_VAR*/ /*_.VALDATA___V523*/ meltfptr[522] = (melt_ptr_t) & cdat->dobj_355__NSTQ_VAR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_355__NSTQ_VAR", 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_355__NSTQ_VAR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_355__NSTQ_VAR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_355__NSTQ_VAR.obj_num = 1; cdat->dobj_355__NSTQ_VAR.obj_hash = 957640222; cdat->dobj_355__NSTQ_VAR.obj_len = 4; /*inistring dstr_356__NSTQ_VAR*/ /*_.VALSTR___V524*/ meltfptr[523] = (melt_ptr_t) & cdat->dstr_356__NSTQ_VAR; cdat->dstr_356__NSTQ_VAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_356__NSTQ_VAR.val, "NSTQ_VAR", sizeof (cdat->dstr_356__NSTQ_VAR.val) - 1); cdat->dstr_356__NSTQ_VAR.val[8] = (char) 0; cdat->dstr_356__NSTQ_VAR.slen = 8; /*iniobj dsym_357__NSTQ_EXP*/ /*uniqueobj*/ if (! /*_.VALDATA___V530*/ meltfptr[529]) /*_.VALDATA___V530*/ meltfptr[529] = (melt_ptr_t) & cdat->dsym_357__NSTQ_EXP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_357__NSTQ_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_357__NSTQ_EXP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_357__NSTQ_EXP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_357__NSTQ_EXP.obj_hash = 945762796; cdat->dsym_357__NSTQ_EXP.obj_len = 3; /*inistring dstr_358__NSTQ_EXP*/ /*_.VALSTR___V531*/ meltfptr[530] = (melt_ptr_t) & cdat->dstr_358__NSTQ_EXP; cdat->dstr_358__NSTQ_EXP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_358__NSTQ_EXP.val, "NSTQ_EXP", sizeof (cdat->dstr_358__NSTQ_EXP.val) - 1); cdat->dstr_358__NSTQ_EXP.val[8] = (char) 0; cdat->dstr_358__NSTQ_EXP.slen = 8; /*^iniobj */ /*iniobj dobj_359__NSTQ_EXP*/ /*_.VALDATA___V525*/ meltfptr[524] = (melt_ptr_t) & cdat->dobj_359__NSTQ_EXP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_359__NSTQ_EXP", 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_359__NSTQ_EXP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_359__NSTQ_EXP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_359__NSTQ_EXP.obj_num = 2; cdat->dobj_359__NSTQ_EXP.obj_hash = 135172485; cdat->dobj_359__NSTQ_EXP.obj_len = 4; /*inistring dstr_360__NSTQ_EXP*/ /*_.VALSTR___V526*/ meltfptr[525] = (melt_ptr_t) & cdat->dstr_360__NSTQ_EXP; cdat->dstr_360__NSTQ_EXP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_360__NSTQ_EXP.val, "NSTQ_EXP", sizeof (cdat->dstr_360__NSTQ_EXP.val) - 1); cdat->dstr_360__NSTQ_EXP.val[8] = (char) 0; cdat->dstr_360__NSTQ_EXP.slen = 8; /*iniobj dsym_361__CLASS_NREP_FOREVER*/ /*uniqueobj*/ if (! /*_.VALDATA___V532*/ meltfptr[531]) /*_.VALDATA___V532*/ meltfptr[531] = (melt_ptr_t) & cdat->dsym_361__CLASS_NREP_FOREVER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_361__CLASS_NREP_FOREVER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_361__CLASS_NREP_FOREVER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_361__CLASS_NREP_FOREVER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_361__CLASS_NREP_FOREVER.obj_hash = 590813330; cdat->dsym_361__CLASS_NREP_FOREVER.obj_len = 3; /*inistring dstr_362__CLASS_NREP_FOREV*/ /*_.VALSTR___V533*/ meltfptr[532] = (melt_ptr_t) & cdat->dstr_362__CLASS_NREP_FOREV; cdat->dstr_362__CLASS_NREP_FOREV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_362__CLASS_NREP_FOREV.val, "CLASS_NREP_FOREVER", sizeof (cdat->dstr_362__CLASS_NREP_FOREV. val) - 1); cdat->dstr_362__CLASS_NREP_FOREV.val[18] = (char) 0; cdat->dstr_362__CLASS_NREP_FOREV.slen = 18; MELT_LOCATION ("warmelt-normal.melt:314:/ iniobj"); /*iniobj dobj_363__CLASS_NREP_FOREVER*/ /*_.VALDATA___V534*/ meltfptr[533] = (melt_ptr_t) & cdat->dobj_363__CLASS_NREP_FOREVER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_363__CLASS_NREP_FOREVER", 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_363__CLASS_NREP_FOREVER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_363__CLASS_NREP_FOREVER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_363__CLASS_NREP_FOREVER.obj_num = MELTOBMAG_OBJECT; cdat->dobj_363__CLASS_NREP_FOREVER.obj_hash = 273120208; cdat->dobj_363__CLASS_NREP_FOREVER.obj_len = 8; /*inistring dstr_364__CLASS_NREP_FOREV*/ /*_.VALSTR___V535*/ meltfptr[534] = (melt_ptr_t) & cdat->dstr_364__CLASS_NREP_FOREV; cdat->dstr_364__CLASS_NREP_FOREV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_364__CLASS_NREP_FOREV.val, "CLASS_NREP_FOREVER", sizeof (cdat->dstr_364__CLASS_NREP_FOREV. val) - 1); cdat->dstr_364__CLASS_NREP_FOREV.val[18] = (char) 0; cdat->dstr_364__CLASS_NREP_FOREV.slen = 18; /*inimult dtup_365__CLASS_NREP_FOREVER */ /*_.VALTUP___V536*/ meltfptr[535] = (melt_ptr_t) & cdat->dtup_365__CLASS_NREP_FOREVER; cdat->dtup_365__CLASS_NREP_FOREVER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_365__CLASS_NREP_FOREVER.nbval = 3; /*inimult dtup_366__CLASS_NREP_FOREVER */ /*_.VALTUP___V543*/ meltfptr[542] = (melt_ptr_t) & cdat->dtup_366__CLASS_NREP_FOREVER; cdat->dtup_366__CLASS_NREP_FOREVER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_366__CLASS_NREP_FOREVER.nbval = 4; /*iniobj dsym_367__NFOREVER_BIND*/ /*uniqueobj*/ if (! /*_.VALDATA___V544*/ meltfptr[543]) /*_.VALDATA___V544*/ meltfptr[543] = (melt_ptr_t) & cdat->dsym_367__NFOREVER_BIND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_367__NFOREVER_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_367__NFOREVER_BIND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_367__NFOREVER_BIND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_367__NFOREVER_BIND.obj_hash = 279567937; cdat->dsym_367__NFOREVER_BIND.obj_len = 3; /*inistring dstr_368__NFOREVER_BIND*/ /*_.VALSTR___V545*/ meltfptr[544] = (melt_ptr_t) & cdat->dstr_368__NFOREVER_BIND; cdat->dstr_368__NFOREVER_BIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_368__NFOREVER_BIND.val, "NFOREVER_BIND", sizeof (cdat->dstr_368__NFOREVER_BIND.val) - 1); cdat->dstr_368__NFOREVER_BIND.val[13] = (char) 0; cdat->dstr_368__NFOREVER_BIND.slen = 13; /*^iniobj */ /*iniobj dobj_369__NFOREVER_BIND*/ /*_.VALDATA___V537*/ meltfptr[536] = (melt_ptr_t) & cdat->dobj_369__NFOREVER_BIND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_369__NFOREVER_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_369__NFOREVER_BIND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_369__NFOREVER_BIND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_369__NFOREVER_BIND.obj_num = 1; cdat->dobj_369__NFOREVER_BIND.obj_hash = 503972089; cdat->dobj_369__NFOREVER_BIND.obj_len = 4; /*inistring dstr_370__NFOREVER_BIND*/ /*_.VALSTR___V538*/ meltfptr[537] = (melt_ptr_t) & cdat->dstr_370__NFOREVER_BIND; cdat->dstr_370__NFOREVER_BIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_370__NFOREVER_BIND.val, "NFOREVER_BIND", sizeof (cdat->dstr_370__NFOREVER_BIND.val) - 1); cdat->dstr_370__NFOREVER_BIND.val[13] = (char) 0; cdat->dstr_370__NFOREVER_BIND.slen = 13; /*iniobj dsym_371__NFOREVER_BODY*/ /*uniqueobj*/ if (! /*_.VALDATA___V546*/ meltfptr[545]) /*_.VALDATA___V546*/ meltfptr[545] = (melt_ptr_t) & cdat->dsym_371__NFOREVER_BODY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_371__NFOREVER_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_371__NFOREVER_BODY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_371__NFOREVER_BODY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_371__NFOREVER_BODY.obj_hash = 1033225738; cdat->dsym_371__NFOREVER_BODY.obj_len = 3; /*inistring dstr_372__NFOREVER_BODY*/ /*_.VALSTR___V547*/ meltfptr[546] = (melt_ptr_t) & cdat->dstr_372__NFOREVER_BODY; cdat->dstr_372__NFOREVER_BODY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_372__NFOREVER_BODY.val, "NFOREVER_BODY", sizeof (cdat->dstr_372__NFOREVER_BODY.val) - 1); cdat->dstr_372__NFOREVER_BODY.val[13] = (char) 0; cdat->dstr_372__NFOREVER_BODY.slen = 13; /*^iniobj */ /*iniobj dobj_373__NFOREVER_BODY*/ /*_.VALDATA___V539*/ meltfptr[538] = (melt_ptr_t) & cdat->dobj_373__NFOREVER_BODY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_373__NFOREVER_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_373__NFOREVER_BODY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_373__NFOREVER_BODY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_373__NFOREVER_BODY.obj_num = 2; cdat->dobj_373__NFOREVER_BODY.obj_hash = 316347957; cdat->dobj_373__NFOREVER_BODY.obj_len = 4; /*inistring dstr_374__NFOREVER_BODY*/ /*_.VALSTR___V540*/ meltfptr[539] = (melt_ptr_t) & cdat->dstr_374__NFOREVER_BODY; cdat->dstr_374__NFOREVER_BODY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_374__NFOREVER_BODY.val, "NFOREVER_BODY", sizeof (cdat->dstr_374__NFOREVER_BODY.val) - 1); cdat->dstr_374__NFOREVER_BODY.val[13] = (char) 0; cdat->dstr_374__NFOREVER_BODY.slen = 13; /*iniobj dsym_375__NFOREVER_RESULT*/ /*uniqueobj*/ if (! /*_.VALDATA___V548*/ meltfptr[547]) /*_.VALDATA___V548*/ meltfptr[547] = (melt_ptr_t) & cdat->dsym_375__NFOREVER_RESULT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_375__NFOREVER_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_375__NFOREVER_RESULT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_375__NFOREVER_RESULT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_375__NFOREVER_RESULT.obj_hash = 473948656; cdat->dsym_375__NFOREVER_RESULT.obj_len = 3; /*inistring dstr_376__NFOREVER_RESULT*/ /*_.VALSTR___V549*/ meltfptr[548] = (melt_ptr_t) & cdat->dstr_376__NFOREVER_RESULT; cdat->dstr_376__NFOREVER_RESULT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_376__NFOREVER_RESULT.val, "NFOREVER_RESULT", sizeof (cdat->dstr_376__NFOREVER_RESULT.val) - 1); cdat->dstr_376__NFOREVER_RESULT.val[15] = (char) 0; cdat->dstr_376__NFOREVER_RESULT.slen = 15; /*^iniobj */ /*iniobj dobj_377__NFOREVER_RESULT*/ /*_.VALDATA___V541*/ meltfptr[540] = (melt_ptr_t) & cdat->dobj_377__NFOREVER_RESULT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_377__NFOREVER_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_377__NFOREVER_RESULT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_377__NFOREVER_RESULT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_377__NFOREVER_RESULT.obj_num = 3; cdat->dobj_377__NFOREVER_RESULT.obj_hash = 162777494; cdat->dobj_377__NFOREVER_RESULT.obj_len = 4; /*inistring dstr_378__NFOREVER_RESULT*/ /*_.VALSTR___V542*/ meltfptr[541] = (melt_ptr_t) & cdat->dstr_378__NFOREVER_RESULT; cdat->dstr_378__NFOREVER_RESULT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_378__NFOREVER_RESULT.val, "NFOREVER_RESULT", sizeof (cdat->dstr_378__NFOREVER_RESULT.val) - 1); cdat->dstr_378__NFOREVER_RESULT.val[15] = (char) 0; cdat->dstr_378__NFOREVER_RESULT.slen = 15; /*iniobj dsym_379__CLASS_NREP_EXIT*/ /*uniqueobj*/ if (! /*_.VALDATA___V550*/ meltfptr[549]) /*_.VALDATA___V550*/ meltfptr[549] = (melt_ptr_t) & cdat->dsym_379__CLASS_NREP_EXIT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_379__CLASS_NREP_EXIT", melt_magic_discr ((melt_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_EXIT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_379__CLASS_NREP_EXIT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_379__CLASS_NREP_EXIT.obj_hash = 563709683; cdat->dsym_379__CLASS_NREP_EXIT.obj_len = 3; /*inistring dstr_380__CLASS_NREP_EXIT*/ /*_.VALSTR___V551*/ meltfptr[550] = (melt_ptr_t) & cdat->dstr_380__CLASS_NREP_EXIT; cdat->dstr_380__CLASS_NREP_EXIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_380__CLASS_NREP_EXIT.val, "CLASS_NREP_EXIT", sizeof (cdat->dstr_380__CLASS_NREP_EXIT.val) - 1); cdat->dstr_380__CLASS_NREP_EXIT.val[15] = (char) 0; cdat->dstr_380__CLASS_NREP_EXIT.slen = 15; MELT_LOCATION ("warmelt-normal.melt:322:/ iniobj"); /*iniobj dobj_381__CLASS_NREP_EXIT*/ /*_.VALDATA___V552*/ meltfptr[551] = (melt_ptr_t) & cdat->dobj_381__CLASS_NREP_EXIT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_381__CLASS_NREP_EXIT", 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_381__CLASS_NREP_EXIT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_381__CLASS_NREP_EXIT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_381__CLASS_NREP_EXIT.obj_num = MELTOBMAG_OBJECT; cdat->dobj_381__CLASS_NREP_EXIT.obj_hash = 859223527; cdat->dobj_381__CLASS_NREP_EXIT.obj_len = 8; /*inistring dstr_382__CLASS_NREP_EXIT*/ /*_.VALSTR___V553*/ meltfptr[552] = (melt_ptr_t) & cdat->dstr_382__CLASS_NREP_EXIT; cdat->dstr_382__CLASS_NREP_EXIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_382__CLASS_NREP_EXIT.val, "CLASS_NREP_EXIT", sizeof (cdat->dstr_382__CLASS_NREP_EXIT.val) - 1); cdat->dstr_382__CLASS_NREP_EXIT.val[15] = (char) 0; cdat->dstr_382__CLASS_NREP_EXIT.slen = 15; /*inimult dtup_383__CLASS_NREP_EXIT */ /*_.VALTUP___V554*/ meltfptr[553] = (melt_ptr_t) & cdat->dtup_383__CLASS_NREP_EXIT; cdat->dtup_383__CLASS_NREP_EXIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_383__CLASS_NREP_EXIT.nbval = 3; /*inimult dtup_384__CLASS_NREP_EXIT */ /*_.VALTUP___V559*/ meltfptr[558] = (melt_ptr_t) & cdat->dtup_384__CLASS_NREP_EXIT; cdat->dtup_384__CLASS_NREP_EXIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_384__CLASS_NREP_EXIT.nbval = 3; /*iniobj dsym_385__NEXIT_BIND*/ /*uniqueobj*/ if (! /*_.VALDATA___V560*/ meltfptr[559]) /*_.VALDATA___V560*/ meltfptr[559] = (melt_ptr_t) & cdat->dsym_385__NEXIT_BIND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_385__NEXIT_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_385__NEXIT_BIND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_385__NEXIT_BIND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_385__NEXIT_BIND.obj_hash = 471417909; cdat->dsym_385__NEXIT_BIND.obj_len = 3; /*inistring dstr_386__NEXIT_BIND*/ /*_.VALSTR___V561*/ meltfptr[560] = (melt_ptr_t) & cdat->dstr_386__NEXIT_BIND; cdat->dstr_386__NEXIT_BIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_386__NEXIT_BIND.val, "NEXIT_BIND", sizeof (cdat->dstr_386__NEXIT_BIND.val) - 1); cdat->dstr_386__NEXIT_BIND.val[10] = (char) 0; cdat->dstr_386__NEXIT_BIND.slen = 10; /*^iniobj */ /*iniobj dobj_387__NEXIT_BIND*/ /*_.VALDATA___V555*/ meltfptr[554] = (melt_ptr_t) & cdat->dobj_387__NEXIT_BIND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_387__NEXIT_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_387__NEXIT_BIND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_387__NEXIT_BIND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_387__NEXIT_BIND.obj_num = 1; cdat->dobj_387__NEXIT_BIND.obj_hash = 1025807480; cdat->dobj_387__NEXIT_BIND.obj_len = 4; /*inistring dstr_388__NEXIT_BIND*/ /*_.VALSTR___V556*/ meltfptr[555] = (melt_ptr_t) & cdat->dstr_388__NEXIT_BIND; cdat->dstr_388__NEXIT_BIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_388__NEXIT_BIND.val, "NEXIT_BIND", sizeof (cdat->dstr_388__NEXIT_BIND.val) - 1); cdat->dstr_388__NEXIT_BIND.val[10] = (char) 0; cdat->dstr_388__NEXIT_BIND.slen = 10; /*iniobj dsym_389__NEXIT_VAL*/ /*uniqueobj*/ if (! /*_.VALDATA___V562*/ meltfptr[561]) /*_.VALDATA___V562*/ meltfptr[561] = (melt_ptr_t) & cdat->dsym_389__NEXIT_VAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_389__NEXIT_VAL", melt_magic_discr ((melt_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__NEXIT_VAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_389__NEXIT_VAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_389__NEXIT_VAL.obj_hash = 356046513; cdat->dsym_389__NEXIT_VAL.obj_len = 3; /*inistring dstr_390__NEXIT_VAL*/ /*_.VALSTR___V563*/ meltfptr[562] = (melt_ptr_t) & cdat->dstr_390__NEXIT_VAL; cdat->dstr_390__NEXIT_VAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_390__NEXIT_VAL.val, "NEXIT_VAL", sizeof (cdat->dstr_390__NEXIT_VAL.val) - 1); cdat->dstr_390__NEXIT_VAL.val[9] = (char) 0; cdat->dstr_390__NEXIT_VAL.slen = 9; /*^iniobj */ /*iniobj dobj_391__NEXIT_VAL*/ /*_.VALDATA___V557*/ meltfptr[556] = (melt_ptr_t) & cdat->dobj_391__NEXIT_VAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_391__NEXIT_VAL", 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__NEXIT_VAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_391__NEXIT_VAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_391__NEXIT_VAL.obj_num = 2; cdat->dobj_391__NEXIT_VAL.obj_hash = 105663078; cdat->dobj_391__NEXIT_VAL.obj_len = 4; /*inistring dstr_392__NEXIT_VAL*/ /*_.VALSTR___V558*/ meltfptr[557] = (melt_ptr_t) & cdat->dstr_392__NEXIT_VAL; cdat->dstr_392__NEXIT_VAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_392__NEXIT_VAL.val, "NEXIT_VAL", sizeof (cdat->dstr_392__NEXIT_VAL.val) - 1); cdat->dstr_392__NEXIT_VAL.val[9] = (char) 0; cdat->dstr_392__NEXIT_VAL.slen = 9; /*iniobj dsym_393__CLASS_NREP_AGAIN*/ /*uniqueobj*/ if (! /*_.VALDATA___V564*/ meltfptr[563]) /*_.VALDATA___V564*/ meltfptr[563] = (melt_ptr_t) & cdat->dsym_393__CLASS_NREP_AGAIN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_393__CLASS_NREP_AGAIN", melt_magic_discr ((melt_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__CLASS_NREP_AGAIN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_393__CLASS_NREP_AGAIN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_393__CLASS_NREP_AGAIN.obj_hash = 330426153; cdat->dsym_393__CLASS_NREP_AGAIN.obj_len = 3; /*inistring dstr_394__CLASS_NREP_AGAIN*/ /*_.VALSTR___V565*/ meltfptr[564] = (melt_ptr_t) & cdat->dstr_394__CLASS_NREP_AGAIN; cdat->dstr_394__CLASS_NREP_AGAIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_394__CLASS_NREP_AGAIN.val, "CLASS_NREP_AGAIN", sizeof (cdat->dstr_394__CLASS_NREP_AGAIN. val) - 1); cdat->dstr_394__CLASS_NREP_AGAIN.val[16] = (char) 0; cdat->dstr_394__CLASS_NREP_AGAIN.slen = 16; MELT_LOCATION ("warmelt-normal.melt:329:/ iniobj"); /*iniobj dobj_395__CLASS_NREP_AGAIN*/ /*_.VALDATA___V566*/ meltfptr[565] = (melt_ptr_t) & cdat->dobj_395__CLASS_NREP_AGAIN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_395__CLASS_NREP_AGAIN", 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_395__CLASS_NREP_AGAIN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_395__CLASS_NREP_AGAIN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_395__CLASS_NREP_AGAIN.obj_num = MELTOBMAG_OBJECT; cdat->dobj_395__CLASS_NREP_AGAIN.obj_hash = 41525162; cdat->dobj_395__CLASS_NREP_AGAIN.obj_len = 8; /*inistring dstr_396__CLASS_NREP_AGAIN*/ /*_.VALSTR___V567*/ meltfptr[566] = (melt_ptr_t) & cdat->dstr_396__CLASS_NREP_AGAIN; cdat->dstr_396__CLASS_NREP_AGAIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_396__CLASS_NREP_AGAIN.val, "CLASS_NREP_AGAIN", sizeof (cdat->dstr_396__CLASS_NREP_AGAIN. val) - 1); cdat->dstr_396__CLASS_NREP_AGAIN.val[16] = (char) 0; cdat->dstr_396__CLASS_NREP_AGAIN.slen = 16; /*inimult dtup_397__CLASS_NREP_AGAIN */ /*_.VALTUP___V568*/ meltfptr[567] = (melt_ptr_t) & cdat->dtup_397__CLASS_NREP_AGAIN; cdat->dtup_397__CLASS_NREP_AGAIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_397__CLASS_NREP_AGAIN.nbval = 3; /*inimult dtup_398__CLASS_NREP_AGAIN */ /*_.VALTUP___V571*/ meltfptr[570] = (melt_ptr_t) & cdat->dtup_398__CLASS_NREP_AGAIN; cdat->dtup_398__CLASS_NREP_AGAIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_398__CLASS_NREP_AGAIN.nbval = 2; /*iniobj dsym_399__NAGAIN_BIND*/ /*uniqueobj*/ if (! /*_.VALDATA___V572*/ meltfptr[571]) /*_.VALDATA___V572*/ meltfptr[571] = (melt_ptr_t) & cdat->dsym_399__NAGAIN_BIND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_399__NAGAIN_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_399__NAGAIN_BIND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_399__NAGAIN_BIND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_399__NAGAIN_BIND.obj_hash = 874397387; cdat->dsym_399__NAGAIN_BIND.obj_len = 3; /*inistring dstr_400__NAGAIN_BIND*/ /*_.VALSTR___V573*/ meltfptr[572] = (melt_ptr_t) & cdat->dstr_400__NAGAIN_BIND; cdat->dstr_400__NAGAIN_BIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_400__NAGAIN_BIND.val, "NAGAIN_BIND", sizeof (cdat->dstr_400__NAGAIN_BIND.val) - 1); cdat->dstr_400__NAGAIN_BIND.val[11] = (char) 0; cdat->dstr_400__NAGAIN_BIND.slen = 11; /*^iniobj */ /*iniobj dobj_401__NAGAIN_BIND*/ /*_.VALDATA___V569*/ meltfptr[568] = (melt_ptr_t) & cdat->dobj_401__NAGAIN_BIND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_401__NAGAIN_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_401__NAGAIN_BIND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_401__NAGAIN_BIND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_401__NAGAIN_BIND.obj_num = 1; cdat->dobj_401__NAGAIN_BIND.obj_hash = 864259545; cdat->dobj_401__NAGAIN_BIND.obj_len = 4; /*inistring dstr_402__NAGAIN_BIND*/ /*_.VALSTR___V570*/ meltfptr[569] = (melt_ptr_t) & cdat->dstr_402__NAGAIN_BIND; cdat->dstr_402__NAGAIN_BIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_402__NAGAIN_BIND.val, "NAGAIN_BIND", sizeof (cdat->dstr_402__NAGAIN_BIND.val) - 1); cdat->dstr_402__NAGAIN_BIND.val[11] = (char) 0; cdat->dstr_402__NAGAIN_BIND.slen = 11; /*iniobj dsym_403__CLASS_NREP_FIELDASSIGN*/ /*uniqueobj*/ if (! /*_.VALDATA___V574*/ meltfptr[573]) /*_.VALDATA___V574*/ meltfptr[573] = (melt_ptr_t) & cdat->dsym_403__CLASS_NREP_FIELDASSIGN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_403__CLASS_NREP_FIELDASSIGN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_403__CLASS_NREP_FIELDASSIGN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_403__CLASS_NREP_FIELDASSIGN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_403__CLASS_NREP_FIELDASSIGN.obj_hash = 500200612; cdat->dsym_403__CLASS_NREP_FIELDASSIGN.obj_len = 3; /*inistring dstr_404__CLASS_NREP_FIELD*/ /*_.VALSTR___V575*/ meltfptr[574] = (melt_ptr_t) & cdat->dstr_404__CLASS_NREP_FIELD; cdat->dstr_404__CLASS_NREP_FIELD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_404__CLASS_NREP_FIELD.val, "CLASS_NREP_FIELDASSIGN", sizeof (cdat->dstr_404__CLASS_NREP_FIELD. val) - 1); cdat->dstr_404__CLASS_NREP_FIELD.val[22] = (char) 0; cdat->dstr_404__CLASS_NREP_FIELD.slen = 22; MELT_LOCATION ("warmelt-normal.melt:335:/ iniobj"); /*iniobj dobj_405__CLASS_NREP_FIELDASSIGN*/ /*_.VALDATA___V576*/ meltfptr[575] = (melt_ptr_t) & cdat->dobj_405__CLASS_NREP_FIELDASSIGN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_405__CLASS_NREP_FIELDASSIGN", 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_405__CLASS_NREP_FIELDASSIGN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_405__CLASS_NREP_FIELDASSIGN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_405__CLASS_NREP_FIELDASSIGN.obj_num = MELTOBMAG_OBJECT; cdat->dobj_405__CLASS_NREP_FIELDASSIGN.obj_hash = 754598237; cdat->dobj_405__CLASS_NREP_FIELDASSIGN.obj_len = 8; /*inistring dstr_406__CLASS_NREP_FIELD*/ /*_.VALSTR___V577*/ meltfptr[576] = (melt_ptr_t) & cdat->dstr_406__CLASS_NREP_FIELD; cdat->dstr_406__CLASS_NREP_FIELD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_406__CLASS_NREP_FIELD.val, "CLASS_NREP_FIELDASSIGN", sizeof (cdat->dstr_406__CLASS_NREP_FIELD. val) - 1); cdat->dstr_406__CLASS_NREP_FIELD.val[22] = (char) 0; cdat->dstr_406__CLASS_NREP_FIELD.slen = 22; /*inimult dtup_407__CLASS_NREP_FIELDASSIGN */ /*_.VALTUP___V578*/ meltfptr[577] = (melt_ptr_t) & cdat->dtup_407__CLASS_NREP_FIELDASSIGN; cdat->dtup_407__CLASS_NREP_FIELDASSIGN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_407__CLASS_NREP_FIELDASSIGN.nbval = 2; /*inimult dtup_408__CLASS_NREP_FIELDASSIGN */ /*_.VALTUP___V583*/ meltfptr[582] = (melt_ptr_t) & cdat->dtup_408__CLASS_NREP_FIELDASSIGN; cdat->dtup_408__CLASS_NREP_FIELDASSIGN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_408__CLASS_NREP_FIELDASSIGN.nbval = 3; /*iniobj dsym_409__NFLA_FIELD*/ /*uniqueobj*/ if (! /*_.VALDATA___V584*/ meltfptr[583]) /*_.VALDATA___V584*/ meltfptr[583] = (melt_ptr_t) & cdat->dsym_409__NFLA_FIELD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_409__NFLA_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_409__NFLA_FIELD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_409__NFLA_FIELD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_409__NFLA_FIELD.obj_hash = 30439580; cdat->dsym_409__NFLA_FIELD.obj_len = 3; /*inistring dstr_410__NFLA_FIELD*/ /*_.VALSTR___V585*/ meltfptr[584] = (melt_ptr_t) & cdat->dstr_410__NFLA_FIELD; cdat->dstr_410__NFLA_FIELD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_410__NFLA_FIELD.val, "NFLA_FIELD", sizeof (cdat->dstr_410__NFLA_FIELD.val) - 1); cdat->dstr_410__NFLA_FIELD.val[10] = (char) 0; cdat->dstr_410__NFLA_FIELD.slen = 10; /*^iniobj */ /*iniobj dobj_411__NFLA_FIELD*/ /*_.VALDATA___V579*/ meltfptr[578] = (melt_ptr_t) & cdat->dobj_411__NFLA_FIELD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_411__NFLA_FIELD", 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_411__NFLA_FIELD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_411__NFLA_FIELD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_411__NFLA_FIELD.obj_num = 1; cdat->dobj_411__NFLA_FIELD.obj_hash = 540046520; cdat->dobj_411__NFLA_FIELD.obj_len = 4; /*inistring dstr_412__NFLA_FIELD*/ /*_.VALSTR___V580*/ meltfptr[579] = (melt_ptr_t) & cdat->dstr_412__NFLA_FIELD; cdat->dstr_412__NFLA_FIELD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_412__NFLA_FIELD.val, "NFLA_FIELD", sizeof (cdat->dstr_412__NFLA_FIELD.val) - 1); cdat->dstr_412__NFLA_FIELD.val[10] = (char) 0; cdat->dstr_412__NFLA_FIELD.slen = 10; /*iniobj dsym_413__NFLA_VAL*/ /*uniqueobj*/ if (! /*_.VALDATA___V586*/ meltfptr[585]) /*_.VALDATA___V586*/ meltfptr[585] = (melt_ptr_t) & cdat->dsym_413__NFLA_VAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_413__NFLA_VAL", melt_magic_discr ((melt_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__NFLA_VAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_413__NFLA_VAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_413__NFLA_VAL.obj_hash = 828883014; cdat->dsym_413__NFLA_VAL.obj_len = 3; /*inistring dstr_414__NFLA_VAL*/ /*_.VALSTR___V587*/ meltfptr[586] = (melt_ptr_t) & cdat->dstr_414__NFLA_VAL; cdat->dstr_414__NFLA_VAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_414__NFLA_VAL.val, "NFLA_VAL", sizeof (cdat->dstr_414__NFLA_VAL.val) - 1); cdat->dstr_414__NFLA_VAL.val[8] = (char) 0; cdat->dstr_414__NFLA_VAL.slen = 8; /*^iniobj */ /*iniobj dobj_415__NFLA_VAL*/ /*_.VALDATA___V581*/ meltfptr[580] = (melt_ptr_t) & cdat->dobj_415__NFLA_VAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_415__NFLA_VAL", 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_415__NFLA_VAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_415__NFLA_VAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_415__NFLA_VAL.obj_num = 2; cdat->dobj_415__NFLA_VAL.obj_hash = 786739846; cdat->dobj_415__NFLA_VAL.obj_len = 4; /*inistring dstr_416__NFLA_VAL*/ /*_.VALSTR___V582*/ meltfptr[581] = (melt_ptr_t) & cdat->dstr_416__NFLA_VAL; cdat->dstr_416__NFLA_VAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_416__NFLA_VAL.val, "NFLA_VAL", sizeof (cdat->dstr_416__NFLA_VAL.val) - 1); cdat->dstr_416__NFLA_VAL.val[8] = (char) 0; cdat->dstr_416__NFLA_VAL.slen = 8; /*iniobj dsym_417__CLASS_NREP_INSTANCE*/ /*uniqueobj*/ if (! /*_.VALDATA___V588*/ meltfptr[587]) /*_.VALDATA___V588*/ meltfptr[587] = (melt_ptr_t) & cdat->dsym_417__CLASS_NREP_INSTANCE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_417__CLASS_NREP_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_417__CLASS_NREP_INSTANCE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_417__CLASS_NREP_INSTANCE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_417__CLASS_NREP_INSTANCE.obj_hash = 832794532; cdat->dsym_417__CLASS_NREP_INSTANCE.obj_len = 3; /*inistring dstr_418__CLASS_NREP_INSTA*/ /*_.VALSTR___V589*/ meltfptr[588] = (melt_ptr_t) & cdat->dstr_418__CLASS_NREP_INSTA; cdat->dstr_418__CLASS_NREP_INSTA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_418__CLASS_NREP_INSTA.val, "CLASS_NREP_INSTANCE", sizeof (cdat->dstr_418__CLASS_NREP_INSTA. val) - 1); cdat->dstr_418__CLASS_NREP_INSTA.val[19] = (char) 0; cdat->dstr_418__CLASS_NREP_INSTA.slen = 19; MELT_LOCATION ("warmelt-normal.melt:342:/ iniobj"); /*iniobj dobj_419__CLASS_NREP_INSTANCE*/ /*_.VALDATA___V590*/ meltfptr[589] = (melt_ptr_t) & cdat->dobj_419__CLASS_NREP_INSTANCE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_419__CLASS_NREP_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_419__CLASS_NREP_INSTANCE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_419__CLASS_NREP_INSTANCE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_419__CLASS_NREP_INSTANCE.obj_num = MELTOBMAG_OBJECT; cdat->dobj_419__CLASS_NREP_INSTANCE.obj_hash = 627189726; cdat->dobj_419__CLASS_NREP_INSTANCE.obj_len = 8; /*inistring dstr_420__CLASS_NREP_INSTA*/ /*_.VALSTR___V591*/ meltfptr[590] = (melt_ptr_t) & cdat->dstr_420__CLASS_NREP_INSTA; cdat->dstr_420__CLASS_NREP_INSTA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_420__CLASS_NREP_INSTA.val, "CLASS_NREP_INSTANCE", sizeof (cdat->dstr_420__CLASS_NREP_INSTA. val) - 1); cdat->dstr_420__CLASS_NREP_INSTA.val[19] = (char) 0; cdat->dstr_420__CLASS_NREP_INSTA.slen = 19; /*inimult dtup_421__CLASS_NREP_INSTANCE */ /*_.VALTUP___V592*/ meltfptr[591] = (melt_ptr_t) & cdat->dtup_421__CLASS_NREP_INSTANCE; cdat->dtup_421__CLASS_NREP_INSTANCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_421__CLASS_NREP_INSTANCE.nbval = 3; /*inimult dtup_422__CLASS_NREP_INSTANCE */ /*_.VALTUP___V599*/ meltfptr[598] = (melt_ptr_t) & cdat->dtup_422__CLASS_NREP_INSTANCE; cdat->dtup_422__CLASS_NREP_INSTANCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_422__CLASS_NREP_INSTANCE.nbval = 4; /*iniobj dsym_423__NMINS_CLASS*/ /*uniqueobj*/ if (! /*_.VALDATA___V600*/ meltfptr[599]) /*_.VALDATA___V600*/ meltfptr[599] = (melt_ptr_t) & cdat->dsym_423__NMINS_CLASS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_423__NMINS_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_423__NMINS_CLASS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_423__NMINS_CLASS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_423__NMINS_CLASS.obj_hash = 449094436; cdat->dsym_423__NMINS_CLASS.obj_len = 3; /*inistring dstr_424__NMINS_CLASS*/ /*_.VALSTR___V601*/ meltfptr[600] = (melt_ptr_t) & cdat->dstr_424__NMINS_CLASS; cdat->dstr_424__NMINS_CLASS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_424__NMINS_CLASS.val, "NMINS_CLASS", sizeof (cdat->dstr_424__NMINS_CLASS.val) - 1); cdat->dstr_424__NMINS_CLASS.val[11] = (char) 0; cdat->dstr_424__NMINS_CLASS.slen = 11; /*^iniobj */ /*iniobj dobj_425__NMINS_CLASS*/ /*_.VALDATA___V593*/ meltfptr[592] = (melt_ptr_t) & cdat->dobj_425__NMINS_CLASS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_425__NMINS_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_425__NMINS_CLASS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_425__NMINS_CLASS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_425__NMINS_CLASS.obj_num = 1; cdat->dobj_425__NMINS_CLASS.obj_hash = 180124205; cdat->dobj_425__NMINS_CLASS.obj_len = 4; /*inistring dstr_426__NMINS_CLASS*/ /*_.VALSTR___V594*/ meltfptr[593] = (melt_ptr_t) & cdat->dstr_426__NMINS_CLASS; cdat->dstr_426__NMINS_CLASS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_426__NMINS_CLASS.val, "NMINS_CLASS", sizeof (cdat->dstr_426__NMINS_CLASS.val) - 1); cdat->dstr_426__NMINS_CLASS.val[11] = (char) 0; cdat->dstr_426__NMINS_CLASS.slen = 11; /*iniobj dsym_427__NMINS_CLADATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V602*/ meltfptr[601]) /*_.VALDATA___V602*/ meltfptr[601] = (melt_ptr_t) & cdat->dsym_427__NMINS_CLADATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_427__NMINS_CLADATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_427__NMINS_CLADATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_427__NMINS_CLADATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_427__NMINS_CLADATA.obj_hash = 778155382; cdat->dsym_427__NMINS_CLADATA.obj_len = 3; /*inistring dstr_428__NMINS_CLADATA*/ /*_.VALSTR___V603*/ meltfptr[602] = (melt_ptr_t) & cdat->dstr_428__NMINS_CLADATA; cdat->dstr_428__NMINS_CLADATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_428__NMINS_CLADATA.val, "NMINS_CLADATA", sizeof (cdat->dstr_428__NMINS_CLADATA.val) - 1); cdat->dstr_428__NMINS_CLADATA.val[13] = (char) 0; cdat->dstr_428__NMINS_CLADATA.slen = 13; /*^iniobj */ /*iniobj dobj_429__NMINS_CLADATA*/ /*_.VALDATA___V595*/ meltfptr[594] = (melt_ptr_t) & cdat->dobj_429__NMINS_CLADATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_429__NMINS_CLADATA", 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_429__NMINS_CLADATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_429__NMINS_CLADATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_429__NMINS_CLADATA.obj_num = 2; cdat->dobj_429__NMINS_CLADATA.obj_hash = 71735609; cdat->dobj_429__NMINS_CLADATA.obj_len = 4; /*inistring dstr_430__NMINS_CLADATA*/ /*_.VALSTR___V596*/ meltfptr[595] = (melt_ptr_t) & cdat->dstr_430__NMINS_CLADATA; cdat->dstr_430__NMINS_CLADATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_430__NMINS_CLADATA.val, "NMINS_CLADATA", sizeof (cdat->dstr_430__NMINS_CLADATA.val) - 1); cdat->dstr_430__NMINS_CLADATA.val[13] = (char) 0; cdat->dstr_430__NMINS_CLADATA.slen = 13; /*iniobj dsym_431__NMINS_FIELDS*/ /*uniqueobj*/ if (! /*_.VALDATA___V604*/ meltfptr[603]) /*_.VALDATA___V604*/ meltfptr[603] = (melt_ptr_t) & cdat->dsym_431__NMINS_FIELDS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_431__NMINS_FIELDS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_431__NMINS_FIELDS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_431__NMINS_FIELDS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_431__NMINS_FIELDS.obj_hash = 543377753; cdat->dsym_431__NMINS_FIELDS.obj_len = 3; /*inistring dstr_432__NMINS_FIELDS*/ /*_.VALSTR___V605*/ meltfptr[604] = (melt_ptr_t) & cdat->dstr_432__NMINS_FIELDS; cdat->dstr_432__NMINS_FIELDS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_432__NMINS_FIELDS.val, "NMINS_FIELDS", sizeof (cdat->dstr_432__NMINS_FIELDS.val) - 1); cdat->dstr_432__NMINS_FIELDS.val[12] = (char) 0; cdat->dstr_432__NMINS_FIELDS.slen = 12; /*^iniobj */ /*iniobj dobj_433__NMINS_FIELDS*/ /*_.VALDATA___V597*/ meltfptr[596] = (melt_ptr_t) & cdat->dobj_433__NMINS_FIELDS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_433__NMINS_FIELDS", 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_433__NMINS_FIELDS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_433__NMINS_FIELDS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_433__NMINS_FIELDS.obj_num = 3; cdat->dobj_433__NMINS_FIELDS.obj_hash = 488940125; cdat->dobj_433__NMINS_FIELDS.obj_len = 4; /*inistring dstr_434__NMINS_FIELDS*/ /*_.VALSTR___V598*/ meltfptr[597] = (melt_ptr_t) & cdat->dstr_434__NMINS_FIELDS; cdat->dstr_434__NMINS_FIELDS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_434__NMINS_FIELDS.val, "NMINS_FIELDS", sizeof (cdat->dstr_434__NMINS_FIELDS.val) - 1); cdat->dstr_434__NMINS_FIELDS.val[12] = (char) 0; cdat->dstr_434__NMINS_FIELDS.slen = 12; /*iniobj dsym_435__CLASS_NREP_VARIADIC_ARGUMENT*/ /*uniqueobj*/ if (! /*_.VALDATA___V606*/ meltfptr[605]) /*_.VALDATA___V606*/ meltfptr[605] = (melt_ptr_t) & cdat->dsym_435__CLASS_NREP_VARIADIC_ARGUMENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_435__CLASS_NREP_VARIADIC_ARGUMENT", melt_magic_discr ((melt_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__CLASS_NREP_VARIADIC_ARGUMENT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_435__CLASS_NREP_VARIADIC_ARGUMENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_435__CLASS_NREP_VARIADIC_ARGUMENT.obj_hash = 758212506; cdat->dsym_435__CLASS_NREP_VARIADIC_ARGUMENT.obj_len = 3; /*inistring dstr_436__CLASS_NREP_VARIA*/ /*_.VALSTR___V607*/ meltfptr[606] = (melt_ptr_t) & cdat->dstr_436__CLASS_NREP_VARIA; cdat->dstr_436__CLASS_NREP_VARIA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_436__CLASS_NREP_VARIA.val, "CLASS_NREP_VARIADIC_ARGUMENT", sizeof (cdat->dstr_436__CLASS_NREP_VARIA. val) - 1); cdat->dstr_436__CLASS_NREP_VARIA.val[28] = (char) 0; cdat->dstr_436__CLASS_NREP_VARIA.slen = 28; MELT_LOCATION ("warmelt-normal.melt:350:/ iniobj"); /*iniobj dobj_437__CLASS_NREP_VARIADIC_ARGUMENT*/ /*_.VALDATA___V608*/ meltfptr[607] = (melt_ptr_t) & cdat->dobj_437__CLASS_NREP_VARIADIC_ARGUMENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_437__CLASS_NREP_VARIADIC_ARGUMENT", 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_437__CLASS_NREP_VARIADIC_ARGUMENT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_437__CLASS_NREP_VARIADIC_ARGUMENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_437__CLASS_NREP_VARIADIC_ARGUMENT.obj_num = MELTOBMAG_OBJECT; cdat->dobj_437__CLASS_NREP_VARIADIC_ARGUMENT.obj_hash = 85158044; cdat->dobj_437__CLASS_NREP_VARIADIC_ARGUMENT.obj_len = 8; /*inistring dstr_438__CLASS_NREP_VARIA*/ /*_.VALSTR___V609*/ meltfptr[608] = (melt_ptr_t) & cdat->dstr_438__CLASS_NREP_VARIA; cdat->dstr_438__CLASS_NREP_VARIA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_438__CLASS_NREP_VARIA.val, "CLASS_NREP_VARIADIC_ARGUMENT", sizeof (cdat->dstr_438__CLASS_NREP_VARIA. val) - 1); cdat->dstr_438__CLASS_NREP_VARIA.val[28] = (char) 0; cdat->dstr_438__CLASS_NREP_VARIA.slen = 28; /*inimult dtup_439__CLASS_NREP_VARIADIC_ARGUMENT */ /*_.VALTUP___V610*/ meltfptr[609] = (melt_ptr_t) & cdat->dtup_439__CLASS_NREP_VARIADIC_ARGUMENT; cdat->dtup_439__CLASS_NREP_VARIADIC_ARGUMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_439__CLASS_NREP_VARIADIC_ARGUMENT.nbval = 3; /*inimult dtup_440__CLASS_NREP_VARIADIC_ARGUMENT */ /*_.VALTUP___V617*/ meltfptr[616] = (melt_ptr_t) & cdat->dtup_440__CLASS_NREP_VARIADIC_ARGUMENT; cdat->dtup_440__CLASS_NREP_VARIADIC_ARGUMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_440__CLASS_NREP_VARIADIC_ARGUMENT.nbval = 4; /*iniobj dsym_441__NVARG_VARIADIC*/ /*uniqueobj*/ if (! /*_.VALDATA___V618*/ meltfptr[617]) /*_.VALDATA___V618*/ meltfptr[617] = (melt_ptr_t) & cdat->dsym_441__NVARG_VARIADIC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_441__NVARG_VARIADIC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_441__NVARG_VARIADIC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_441__NVARG_VARIADIC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_441__NVARG_VARIADIC.obj_hash = 313548176; cdat->dsym_441__NVARG_VARIADIC.obj_len = 3; /*inistring dstr_442__NVARG_VARIADIC*/ /*_.VALSTR___V619*/ meltfptr[618] = (melt_ptr_t) & cdat->dstr_442__NVARG_VARIADIC; cdat->dstr_442__NVARG_VARIADIC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_442__NVARG_VARIADIC.val, "NVARG_VARIADIC", sizeof (cdat->dstr_442__NVARG_VARIADIC.val) - 1); cdat->dstr_442__NVARG_VARIADIC.val[14] = (char) 0; cdat->dstr_442__NVARG_VARIADIC.slen = 14; /*^iniobj */ /*iniobj dobj_443__NVARG_VARIADIC*/ /*_.VALDATA___V611*/ meltfptr[610] = (melt_ptr_t) & cdat->dobj_443__NVARG_VARIADIC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_443__NVARG_VARIADIC", 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_443__NVARG_VARIADIC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_443__NVARG_VARIADIC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_443__NVARG_VARIADIC.obj_num = 1; cdat->dobj_443__NVARG_VARIADIC.obj_hash = 144929570; cdat->dobj_443__NVARG_VARIADIC.obj_len = 4; /*inistring dstr_444__NVARG_VARIADIC*/ /*_.VALSTR___V612*/ meltfptr[611] = (melt_ptr_t) & cdat->dstr_444__NVARG_VARIADIC; cdat->dstr_444__NVARG_VARIADIC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_444__NVARG_VARIADIC.val, "NVARG_VARIADIC", sizeof (cdat->dstr_444__NVARG_VARIADIC.val) - 1); cdat->dstr_444__NVARG_VARIADIC.val[14] = (char) 0; cdat->dstr_444__NVARG_VARIADIC.slen = 14; /*iniobj dsym_445__NVARG_CTYP*/ /*uniqueobj*/ if (! /*_.VALDATA___V620*/ meltfptr[619]) /*_.VALDATA___V620*/ meltfptr[619] = (melt_ptr_t) & cdat->dsym_445__NVARG_CTYP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_445__NVARG_CTYP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_445__NVARG_CTYP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_445__NVARG_CTYP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_445__NVARG_CTYP.obj_hash = 989433689; cdat->dsym_445__NVARG_CTYP.obj_len = 3; /*inistring dstr_446__NVARG_CTYP*/ /*_.VALSTR___V621*/ meltfptr[620] = (melt_ptr_t) & cdat->dstr_446__NVARG_CTYP; cdat->dstr_446__NVARG_CTYP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_446__NVARG_CTYP.val, "NVARG_CTYP", sizeof (cdat->dstr_446__NVARG_CTYP.val) - 1); cdat->dstr_446__NVARG_CTYP.val[10] = (char) 0; cdat->dstr_446__NVARG_CTYP.slen = 10; /*^iniobj */ /*iniobj dobj_447__NVARG_CTYP*/ /*_.VALDATA___V613*/ meltfptr[612] = (melt_ptr_t) & cdat->dobj_447__NVARG_CTYP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_447__NVARG_CTYP", 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_447__NVARG_CTYP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_447__NVARG_CTYP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_447__NVARG_CTYP.obj_num = 2; cdat->dobj_447__NVARG_CTYP.obj_hash = 994294487; cdat->dobj_447__NVARG_CTYP.obj_len = 4; /*inistring dstr_448__NVARG_CTYP*/ /*_.VALSTR___V614*/ meltfptr[613] = (melt_ptr_t) & cdat->dstr_448__NVARG_CTYP; cdat->dstr_448__NVARG_CTYP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_448__NVARG_CTYP.val, "NVARG_CTYP", sizeof (cdat->dstr_448__NVARG_CTYP.val) - 1); cdat->dstr_448__NVARG_CTYP.val[10] = (char) 0; cdat->dstr_448__NVARG_CTYP.slen = 10; /*iniobj dsym_449__NVARG_OFFSET*/ /*uniqueobj*/ if (! /*_.VALDATA___V622*/ meltfptr[621]) /*_.VALDATA___V622*/ meltfptr[621] = (melt_ptr_t) & cdat->dsym_449__NVARG_OFFSET; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_449__NVARG_OFFSET", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_449__NVARG_OFFSET", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_449__NVARG_OFFSET.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_449__NVARG_OFFSET.obj_hash = 553702523; cdat->dsym_449__NVARG_OFFSET.obj_len = 3; /*inistring dstr_450__NVARG_OFFSET*/ /*_.VALSTR___V623*/ meltfptr[622] = (melt_ptr_t) & cdat->dstr_450__NVARG_OFFSET; cdat->dstr_450__NVARG_OFFSET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_450__NVARG_OFFSET.val, "NVARG_OFFSET", sizeof (cdat->dstr_450__NVARG_OFFSET.val) - 1); cdat->dstr_450__NVARG_OFFSET.val[12] = (char) 0; cdat->dstr_450__NVARG_OFFSET.slen = 12; /*^iniobj */ /*iniobj dobj_451__NVARG_OFFSET*/ /*_.VALDATA___V615*/ meltfptr[614] = (melt_ptr_t) & cdat->dobj_451__NVARG_OFFSET; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_451__NVARG_OFFSET", 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_451__NVARG_OFFSET", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_451__NVARG_OFFSET.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_451__NVARG_OFFSET.obj_num = 3; cdat->dobj_451__NVARG_OFFSET.obj_hash = 726269711; cdat->dobj_451__NVARG_OFFSET.obj_len = 4; /*inistring dstr_452__NVARG_OFFSET*/ /*_.VALSTR___V616*/ meltfptr[615] = (melt_ptr_t) & cdat->dstr_452__NVARG_OFFSET; cdat->dstr_452__NVARG_OFFSET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_452__NVARG_OFFSET.val, "NVARG_OFFSET", sizeof (cdat->dstr_452__NVARG_OFFSET.val) - 1); cdat->dstr_452__NVARG_OFFSET.val[12] = (char) 0; cdat->dstr_452__NVARG_OFFSET.slen = 12; /*iniobj dsym_453__CLASS_NREP_LAMBDA*/ /*uniqueobj*/ if (! /*_.VALDATA___V624*/ meltfptr[623]) /*_.VALDATA___V624*/ meltfptr[623] = (melt_ptr_t) & cdat->dsym_453__CLASS_NREP_LAMBDA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_453__CLASS_NREP_LAMBDA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_453__CLASS_NREP_LAMBDA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_453__CLASS_NREP_LAMBDA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_453__CLASS_NREP_LAMBDA.obj_hash = 16774872; cdat->dsym_453__CLASS_NREP_LAMBDA.obj_len = 3; /*inistring dstr_454__CLASS_NREP_LAMBD*/ /*_.VALSTR___V625*/ meltfptr[624] = (melt_ptr_t) & cdat->dstr_454__CLASS_NREP_LAMBD; cdat->dstr_454__CLASS_NREP_LAMBD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_454__CLASS_NREP_LAMBD.val, "CLASS_NREP_LAMBDA", sizeof (cdat->dstr_454__CLASS_NREP_LAMBD. val) - 1); cdat->dstr_454__CLASS_NREP_LAMBD.val[17] = (char) 0; cdat->dstr_454__CLASS_NREP_LAMBD.slen = 17; MELT_LOCATION ("warmelt-normal.melt:358:/ iniobj"); /*iniobj dobj_455__CLASS_NREP_LAMBDA*/ /*_.VALDATA___V626*/ meltfptr[625] = (melt_ptr_t) & cdat->dobj_455__CLASS_NREP_LAMBDA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_455__CLASS_NREP_LAMBDA", 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_455__CLASS_NREP_LAMBDA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_455__CLASS_NREP_LAMBDA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_455__CLASS_NREP_LAMBDA.obj_num = MELTOBMAG_OBJECT; cdat->dobj_455__CLASS_NREP_LAMBDA.obj_hash = 263624531; cdat->dobj_455__CLASS_NREP_LAMBDA.obj_len = 8; /*inistring dstr_456__CLASS_NREP_LAMBD*/ /*_.VALSTR___V627*/ meltfptr[626] = (melt_ptr_t) & cdat->dstr_456__CLASS_NREP_LAMBD; cdat->dstr_456__CLASS_NREP_LAMBD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_456__CLASS_NREP_LAMBD.val, "CLASS_NREP_LAMBDA", sizeof (cdat->dstr_456__CLASS_NREP_LAMBD. val) - 1); cdat->dstr_456__CLASS_NREP_LAMBD.val[17] = (char) 0; cdat->dstr_456__CLASS_NREP_LAMBD.slen = 17; /*inimult dtup_457__CLASS_NREP_LAMBDA */ /*_.VALTUP___V628*/ meltfptr[627] = (melt_ptr_t) & cdat->dtup_457__CLASS_NREP_LAMBDA; cdat->dtup_457__CLASS_NREP_LAMBDA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_457__CLASS_NREP_LAMBDA.nbval = 3; /*inimult dtup_458__CLASS_NREP_LAMBDA */ /*_.VALTUP___V635*/ meltfptr[634] = (melt_ptr_t) & cdat->dtup_458__CLASS_NREP_LAMBDA; cdat->dtup_458__CLASS_NREP_LAMBDA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_458__CLASS_NREP_LAMBDA.nbval = 4; /*iniobj dsym_459__NLAMBDA_PROC*/ /*uniqueobj*/ if (! /*_.VALDATA___V636*/ meltfptr[635]) /*_.VALDATA___V636*/ meltfptr[635] = (melt_ptr_t) & cdat->dsym_459__NLAMBDA_PROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_459__NLAMBDA_PROC", melt_magic_discr ((melt_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__NLAMBDA_PROC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_459__NLAMBDA_PROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_459__NLAMBDA_PROC.obj_hash = 217629846; cdat->dsym_459__NLAMBDA_PROC.obj_len = 3; /*inistring dstr_460__NLAMBDA_PROC*/ /*_.VALSTR___V637*/ meltfptr[636] = (melt_ptr_t) & cdat->dstr_460__NLAMBDA_PROC; cdat->dstr_460__NLAMBDA_PROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_460__NLAMBDA_PROC.val, "NLAMBDA_PROC", sizeof (cdat->dstr_460__NLAMBDA_PROC.val) - 1); cdat->dstr_460__NLAMBDA_PROC.val[12] = (char) 0; cdat->dstr_460__NLAMBDA_PROC.slen = 12; /*^iniobj */ /*iniobj dobj_461__NLAMBDA_PROC*/ /*_.VALDATA___V629*/ meltfptr[628] = (melt_ptr_t) & cdat->dobj_461__NLAMBDA_PROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_461__NLAMBDA_PROC", 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_461__NLAMBDA_PROC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_461__NLAMBDA_PROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_461__NLAMBDA_PROC.obj_num = 1; cdat->dobj_461__NLAMBDA_PROC.obj_hash = 829663964; cdat->dobj_461__NLAMBDA_PROC.obj_len = 4; /*inistring dstr_462__NLAMBDA_PROC*/ /*_.VALSTR___V630*/ meltfptr[629] = (melt_ptr_t) & cdat->dstr_462__NLAMBDA_PROC; cdat->dstr_462__NLAMBDA_PROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_462__NLAMBDA_PROC.val, "NLAMBDA_PROC", sizeof (cdat->dstr_462__NLAMBDA_PROC.val) - 1); cdat->dstr_462__NLAMBDA_PROC.val[12] = (char) 0; cdat->dstr_462__NLAMBDA_PROC.slen = 12; /*iniobj dsym_463__NLAMBDA_CONSTROUT*/ /*uniqueobj*/ if (! /*_.VALDATA___V638*/ meltfptr[637]) /*_.VALDATA___V638*/ meltfptr[637] = (melt_ptr_t) & cdat->dsym_463__NLAMBDA_CONSTROUT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_463__NLAMBDA_CONSTROUT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_463__NLAMBDA_CONSTROUT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_463__NLAMBDA_CONSTROUT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_463__NLAMBDA_CONSTROUT.obj_hash = 627511020; cdat->dsym_463__NLAMBDA_CONSTROUT.obj_len = 3; /*inistring dstr_464__NLAMBDA_CONSTROU*/ /*_.VALSTR___V639*/ meltfptr[638] = (melt_ptr_t) & cdat->dstr_464__NLAMBDA_CONSTROU; cdat->dstr_464__NLAMBDA_CONSTROU.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_464__NLAMBDA_CONSTROU.val, "NLAMBDA_CONSTROUT", sizeof (cdat->dstr_464__NLAMBDA_CONSTROU. val) - 1); cdat->dstr_464__NLAMBDA_CONSTROU.val[17] = (char) 0; cdat->dstr_464__NLAMBDA_CONSTROU.slen = 17; /*^iniobj */ /*iniobj dobj_465__NLAMBDA_CONSTROUT*/ /*_.VALDATA___V631*/ meltfptr[630] = (melt_ptr_t) & cdat->dobj_465__NLAMBDA_CONSTROUT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_465__NLAMBDA_CONSTROUT", 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_465__NLAMBDA_CONSTROUT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_465__NLAMBDA_CONSTROUT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_465__NLAMBDA_CONSTROUT.obj_num = 2; cdat->dobj_465__NLAMBDA_CONSTROUT.obj_hash = 538776434; cdat->dobj_465__NLAMBDA_CONSTROUT.obj_len = 4; /*inistring dstr_466__NLAMBDA_CONSTROU*/ /*_.VALSTR___V632*/ meltfptr[631] = (melt_ptr_t) & cdat->dstr_466__NLAMBDA_CONSTROU; cdat->dstr_466__NLAMBDA_CONSTROU.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_466__NLAMBDA_CONSTROU.val, "NLAMBDA_CONSTROUT", sizeof (cdat->dstr_466__NLAMBDA_CONSTROU. val) - 1); cdat->dstr_466__NLAMBDA_CONSTROU.val[17] = (char) 0; cdat->dstr_466__NLAMBDA_CONSTROU.slen = 17; /*iniobj dsym_467__NLAMBDA_CLOSEDV*/ /*uniqueobj*/ if (! /*_.VALDATA___V640*/ meltfptr[639]) /*_.VALDATA___V640*/ meltfptr[639] = (melt_ptr_t) & cdat->dsym_467__NLAMBDA_CLOSEDV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_467__NLAMBDA_CLOSEDV", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_467__NLAMBDA_CLOSEDV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_467__NLAMBDA_CLOSEDV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_467__NLAMBDA_CLOSEDV.obj_hash = 930362074; cdat->dsym_467__NLAMBDA_CLOSEDV.obj_len = 3; /*inistring dstr_468__NLAMBDA_CLOSEDV*/ /*_.VALSTR___V641*/ meltfptr[640] = (melt_ptr_t) & cdat->dstr_468__NLAMBDA_CLOSEDV; cdat->dstr_468__NLAMBDA_CLOSEDV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_468__NLAMBDA_CLOSEDV.val, "NLAMBDA_CLOSEDV", sizeof (cdat->dstr_468__NLAMBDA_CLOSEDV.val) - 1); cdat->dstr_468__NLAMBDA_CLOSEDV.val[15] = (char) 0; cdat->dstr_468__NLAMBDA_CLOSEDV.slen = 15; /*^iniobj */ /*iniobj dobj_469__NLAMBDA_CLOSEDV*/ /*_.VALDATA___V633*/ meltfptr[632] = (melt_ptr_t) & cdat->dobj_469__NLAMBDA_CLOSEDV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_469__NLAMBDA_CLOSEDV", 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_469__NLAMBDA_CLOSEDV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_469__NLAMBDA_CLOSEDV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_469__NLAMBDA_CLOSEDV.obj_num = 3; cdat->dobj_469__NLAMBDA_CLOSEDV.obj_hash = 831956170; cdat->dobj_469__NLAMBDA_CLOSEDV.obj_len = 4; /*inistring dstr_470__NLAMBDA_CLOSEDV*/ /*_.VALSTR___V634*/ meltfptr[633] = (melt_ptr_t) & cdat->dstr_470__NLAMBDA_CLOSEDV; cdat->dstr_470__NLAMBDA_CLOSEDV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_470__NLAMBDA_CLOSEDV.val, "NLAMBDA_CLOSEDV", sizeof (cdat->dstr_470__NLAMBDA_CLOSEDV.val) - 1); cdat->dstr_470__NLAMBDA_CLOSEDV.val[15] = (char) 0; cdat->dstr_470__NLAMBDA_CLOSEDV.slen = 15; /*iniobj dsym_471__CLASS_NREP_CITERATION*/ /*uniqueobj*/ if (! /*_.VALDATA___V642*/ meltfptr[641]) /*_.VALDATA___V642*/ meltfptr[641] = (melt_ptr_t) & cdat->dsym_471__CLASS_NREP_CITERATION; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_471__CLASS_NREP_CITERATION", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_471__CLASS_NREP_CITERATION", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_471__CLASS_NREP_CITERATION.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_471__CLASS_NREP_CITERATION.obj_hash = 933737875; cdat->dsym_471__CLASS_NREP_CITERATION.obj_len = 3; /*inistring dstr_472__CLASS_NREP_CITER*/ /*_.VALSTR___V643*/ meltfptr[642] = (melt_ptr_t) & cdat->dstr_472__CLASS_NREP_CITER; cdat->dstr_472__CLASS_NREP_CITER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_472__CLASS_NREP_CITER.val, "CLASS_NREP_CITERATION", sizeof (cdat->dstr_472__CLASS_NREP_CITER. val) - 1); cdat->dstr_472__CLASS_NREP_CITER.val[21] = (char) 0; cdat->dstr_472__CLASS_NREP_CITER.slen = 21; MELT_LOCATION ("warmelt-normal.melt:367:/ iniobj"); /*iniobj dobj_473__CLASS_NREP_CITERATION*/ /*_.VALDATA___V644*/ meltfptr[643] = (melt_ptr_t) & cdat->dobj_473__CLASS_NREP_CITERATION; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_473__CLASS_NREP_CITERATION", 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_473__CLASS_NREP_CITERATION", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_473__CLASS_NREP_CITERATION.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_473__CLASS_NREP_CITERATION.obj_num = MELTOBMAG_OBJECT; cdat->dobj_473__CLASS_NREP_CITERATION.obj_hash = 842835969; cdat->dobj_473__CLASS_NREP_CITERATION.obj_len = 8; /*inistring dstr_474__CLASS_NREP_CITER*/ /*_.VALSTR___V645*/ meltfptr[644] = (melt_ptr_t) & cdat->dstr_474__CLASS_NREP_CITER; cdat->dstr_474__CLASS_NREP_CITER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_474__CLASS_NREP_CITER.val, "CLASS_NREP_CITERATION", sizeof (cdat->dstr_474__CLASS_NREP_CITER. val) - 1); cdat->dstr_474__CLASS_NREP_CITER.val[21] = (char) 0; cdat->dstr_474__CLASS_NREP_CITER.slen = 21; /*inimult dtup_475__CLASS_NREP_CITERATION */ /*_.VALTUP___V646*/ meltfptr[645] = (melt_ptr_t) & cdat->dtup_475__CLASS_NREP_CITERATION; cdat->dtup_475__CLASS_NREP_CITERATION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_475__CLASS_NREP_CITERATION.nbval = 3; /*inimult dtup_476__CLASS_NREP_CITERATION */ /*_.VALTUP___V661*/ meltfptr[660] = (melt_ptr_t) & cdat->dtup_476__CLASS_NREP_CITERATION; cdat->dtup_476__CLASS_NREP_CITERATION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_476__CLASS_NREP_CITERATION.nbval = 8; /*iniobj dsym_477__NCITER_CITERATOR*/ /*uniqueobj*/ if (! /*_.VALDATA___V662*/ meltfptr[661]) /*_.VALDATA___V662*/ meltfptr[661] = (melt_ptr_t) & cdat->dsym_477__NCITER_CITERATOR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_477__NCITER_CITERATOR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_477__NCITER_CITERATOR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_477__NCITER_CITERATOR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_477__NCITER_CITERATOR.obj_hash = 476770695; cdat->dsym_477__NCITER_CITERATOR.obj_len = 3; /*inistring dstr_478__NCITER_CITERATOR*/ /*_.VALSTR___V663*/ meltfptr[662] = (melt_ptr_t) & cdat->dstr_478__NCITER_CITERATOR; cdat->dstr_478__NCITER_CITERATOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_478__NCITER_CITERATOR.val, "NCITER_CITERATOR", sizeof (cdat->dstr_478__NCITER_CITERATOR. val) - 1); cdat->dstr_478__NCITER_CITERATOR.val[16] = (char) 0; cdat->dstr_478__NCITER_CITERATOR.slen = 16; /*^iniobj */ /*iniobj dobj_479__NCITER_CITERATOR*/ /*_.VALDATA___V647*/ meltfptr[646] = (melt_ptr_t) & cdat->dobj_479__NCITER_CITERATOR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_479__NCITER_CITERATOR", 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_479__NCITER_CITERATOR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_479__NCITER_CITERATOR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_479__NCITER_CITERATOR.obj_num = 1; cdat->dobj_479__NCITER_CITERATOR.obj_hash = 77554955; cdat->dobj_479__NCITER_CITERATOR.obj_len = 4; /*inistring dstr_480__NCITER_CITERATOR*/ /*_.VALSTR___V648*/ meltfptr[647] = (melt_ptr_t) & cdat->dstr_480__NCITER_CITERATOR; cdat->dstr_480__NCITER_CITERATOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_480__NCITER_CITERATOR.val, "NCITER_CITERATOR", sizeof (cdat->dstr_480__NCITER_CITERATOR. val) - 1); cdat->dstr_480__NCITER_CITERATOR.val[16] = (char) 0; cdat->dstr_480__NCITER_CITERATOR.slen = 16; /*iniobj dsym_481__NCITER_CHUNKBEFORE*/ /*uniqueobj*/ if (! /*_.VALDATA___V664*/ meltfptr[663]) /*_.VALDATA___V664*/ meltfptr[663] = (melt_ptr_t) & cdat->dsym_481__NCITER_CHUNKBEFORE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_481__NCITER_CHUNKBEFORE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_481__NCITER_CHUNKBEFORE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_481__NCITER_CHUNKBEFORE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_481__NCITER_CHUNKBEFORE.obj_hash = 955072848; cdat->dsym_481__NCITER_CHUNKBEFORE.obj_len = 3; /*inistring dstr_482__NCITER_CHUNKBEFO*/ /*_.VALSTR___V665*/ meltfptr[664] = (melt_ptr_t) & cdat->dstr_482__NCITER_CHUNKBEFO; cdat->dstr_482__NCITER_CHUNKBEFO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_482__NCITER_CHUNKBEFO.val, "NCITER_CHUNKBEFORE", sizeof (cdat->dstr_482__NCITER_CHUNKBEFO. val) - 1); cdat->dstr_482__NCITER_CHUNKBEFO.val[18] = (char) 0; cdat->dstr_482__NCITER_CHUNKBEFO.slen = 18; /*^iniobj */ /*iniobj dobj_483__NCITER_CHUNKBEFORE*/ /*_.VALDATA___V649*/ meltfptr[648] = (melt_ptr_t) & cdat->dobj_483__NCITER_CHUNKBEFORE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_483__NCITER_CHUNKBEFORE", 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_483__NCITER_CHUNKBEFORE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_483__NCITER_CHUNKBEFORE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_483__NCITER_CHUNKBEFORE.obj_num = 2; cdat->dobj_483__NCITER_CHUNKBEFORE.obj_hash = 905967641; cdat->dobj_483__NCITER_CHUNKBEFORE.obj_len = 4; /*inistring dstr_484__NCITER_CHUNKBEFO*/ /*_.VALSTR___V650*/ meltfptr[649] = (melt_ptr_t) & cdat->dstr_484__NCITER_CHUNKBEFO; cdat->dstr_484__NCITER_CHUNKBEFO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_484__NCITER_CHUNKBEFO.val, "NCITER_CHUNKBEFORE", sizeof (cdat->dstr_484__NCITER_CHUNKBEFO. val) - 1); cdat->dstr_484__NCITER_CHUNKBEFO.val[18] = (char) 0; cdat->dstr_484__NCITER_CHUNKBEFO.slen = 18; /*iniobj dsym_485__NCITER_CHUNKAFTER*/ /*uniqueobj*/ if (! /*_.VALDATA___V666*/ meltfptr[665]) /*_.VALDATA___V666*/ meltfptr[665] = (melt_ptr_t) & cdat->dsym_485__NCITER_CHUNKAFTER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_485__NCITER_CHUNKAFTER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_485__NCITER_CHUNKAFTER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_485__NCITER_CHUNKAFTER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_485__NCITER_CHUNKAFTER.obj_hash = 530911159; cdat->dsym_485__NCITER_CHUNKAFTER.obj_len = 3; /*inistring dstr_486__NCITER_CHUNKAFTE*/ /*_.VALSTR___V667*/ meltfptr[666] = (melt_ptr_t) & cdat->dstr_486__NCITER_CHUNKAFTE; cdat->dstr_486__NCITER_CHUNKAFTE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_486__NCITER_CHUNKAFTE.val, "NCITER_CHUNKAFTER", sizeof (cdat->dstr_486__NCITER_CHUNKAFTE. val) - 1); cdat->dstr_486__NCITER_CHUNKAFTE.val[17] = (char) 0; cdat->dstr_486__NCITER_CHUNKAFTE.slen = 17; /*^iniobj */ /*iniobj dobj_487__NCITER_CHUNKAFTER*/ /*_.VALDATA___V651*/ meltfptr[650] = (melt_ptr_t) & cdat->dobj_487__NCITER_CHUNKAFTER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_487__NCITER_CHUNKAFTER", 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_487__NCITER_CHUNKAFTER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_487__NCITER_CHUNKAFTER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_487__NCITER_CHUNKAFTER.obj_num = 3; cdat->dobj_487__NCITER_CHUNKAFTER.obj_hash = 160323419; cdat->dobj_487__NCITER_CHUNKAFTER.obj_len = 4; /*inistring dstr_488__NCITER_CHUNKAFTE*/ /*_.VALSTR___V652*/ meltfptr[651] = (melt_ptr_t) & cdat->dstr_488__NCITER_CHUNKAFTE; cdat->dstr_488__NCITER_CHUNKAFTE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_488__NCITER_CHUNKAFTE.val, "NCITER_CHUNKAFTER", sizeof (cdat->dstr_488__NCITER_CHUNKAFTE. val) - 1); cdat->dstr_488__NCITER_CHUNKAFTE.val[17] = (char) 0; cdat->dstr_488__NCITER_CHUNKAFTE.slen = 17; /*iniobj dsym_489__NCITER_BODY*/ /*uniqueobj*/ if (! /*_.VALDATA___V668*/ meltfptr[667]) /*_.VALDATA___V668*/ meltfptr[667] = (melt_ptr_t) & cdat->dsym_489__NCITER_BODY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_489__NCITER_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_489__NCITER_BODY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_489__NCITER_BODY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_489__NCITER_BODY.obj_hash = 490749718; cdat->dsym_489__NCITER_BODY.obj_len = 3; /*inistring dstr_490__NCITER_BODY*/ /*_.VALSTR___V669*/ meltfptr[668] = (melt_ptr_t) & cdat->dstr_490__NCITER_BODY; cdat->dstr_490__NCITER_BODY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_490__NCITER_BODY.val, "NCITER_BODY", sizeof (cdat->dstr_490__NCITER_BODY.val) - 1); cdat->dstr_490__NCITER_BODY.val[11] = (char) 0; cdat->dstr_490__NCITER_BODY.slen = 11; /*^iniobj */ /*iniobj dobj_491__NCITER_BODY*/ /*_.VALDATA___V653*/ meltfptr[652] = (melt_ptr_t) & cdat->dobj_491__NCITER_BODY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_491__NCITER_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_491__NCITER_BODY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_491__NCITER_BODY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_491__NCITER_BODY.obj_num = 4; cdat->dobj_491__NCITER_BODY.obj_hash = 270026616; cdat->dobj_491__NCITER_BODY.obj_len = 4; /*inistring dstr_492__NCITER_BODY*/ /*_.VALSTR___V654*/ meltfptr[653] = (melt_ptr_t) & cdat->dstr_492__NCITER_BODY; cdat->dstr_492__NCITER_BODY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_492__NCITER_BODY.val, "NCITER_BODY", sizeof (cdat->dstr_492__NCITER_BODY.val) - 1); cdat->dstr_492__NCITER_BODY.val[11] = (char) 0; cdat->dstr_492__NCITER_BODY.slen = 11; /*iniobj dsym_493__NCITER_STATOCC*/ /*uniqueobj*/ if (! /*_.VALDATA___V670*/ meltfptr[669]) /*_.VALDATA___V670*/ meltfptr[669] = (melt_ptr_t) & cdat->dsym_493__NCITER_STATOCC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_493__NCITER_STATOCC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_493__NCITER_STATOCC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_493__NCITER_STATOCC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_493__NCITER_STATOCC.obj_hash = 146019073; cdat->dsym_493__NCITER_STATOCC.obj_len = 3; /*inistring dstr_494__NCITER_STATOCC*/ /*_.VALSTR___V671*/ meltfptr[670] = (melt_ptr_t) & cdat->dstr_494__NCITER_STATOCC; cdat->dstr_494__NCITER_STATOCC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_494__NCITER_STATOCC.val, "NCITER_STATOCC", sizeof (cdat->dstr_494__NCITER_STATOCC.val) - 1); cdat->dstr_494__NCITER_STATOCC.val[14] = (char) 0; cdat->dstr_494__NCITER_STATOCC.slen = 14; /*^iniobj */ /*iniobj dobj_495__NCITER_STATOCC*/ /*_.VALDATA___V655*/ meltfptr[654] = (melt_ptr_t) & cdat->dobj_495__NCITER_STATOCC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_495__NCITER_STATOCC", 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_495__NCITER_STATOCC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_495__NCITER_STATOCC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_495__NCITER_STATOCC.obj_num = 5; cdat->dobj_495__NCITER_STATOCC.obj_hash = 104169924; cdat->dobj_495__NCITER_STATOCC.obj_len = 4; /*inistring dstr_496__NCITER_STATOCC*/ /*_.VALSTR___V656*/ meltfptr[655] = (melt_ptr_t) & cdat->dstr_496__NCITER_STATOCC; cdat->dstr_496__NCITER_STATOCC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_496__NCITER_STATOCC.val, "NCITER_STATOCC", sizeof (cdat->dstr_496__NCITER_STATOCC.val) - 1); cdat->dstr_496__NCITER_STATOCC.val[14] = (char) 0; cdat->dstr_496__NCITER_STATOCC.slen = 14; /*iniobj dsym_497__NCITER_LOCBINDINGS*/ /*uniqueobj*/ if (! /*_.VALDATA___V672*/ meltfptr[671]) /*_.VALDATA___V672*/ meltfptr[671] = (melt_ptr_t) & cdat->dsym_497__NCITER_LOCBINDINGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_497__NCITER_LOCBINDINGS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_497__NCITER_LOCBINDINGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_497__NCITER_LOCBINDINGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_497__NCITER_LOCBINDINGS.obj_hash = 107102968; cdat->dsym_497__NCITER_LOCBINDINGS.obj_len = 3; /*inistring dstr_498__NCITER_LOCBINDIN*/ /*_.VALSTR___V673*/ meltfptr[672] = (melt_ptr_t) & cdat->dstr_498__NCITER_LOCBINDIN; cdat->dstr_498__NCITER_LOCBINDIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_498__NCITER_LOCBINDIN.val, "NCITER_LOCBINDINGS", sizeof (cdat->dstr_498__NCITER_LOCBINDIN. val) - 1); cdat->dstr_498__NCITER_LOCBINDIN.val[18] = (char) 0; cdat->dstr_498__NCITER_LOCBINDIN.slen = 18; /*^iniobj */ /*iniobj dobj_499__NCITER_LOCBINDINGS*/ /*_.VALDATA___V657*/ meltfptr[656] = (melt_ptr_t) & cdat->dobj_499__NCITER_LOCBINDINGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_499__NCITER_LOCBINDINGS", 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_499__NCITER_LOCBINDINGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_499__NCITER_LOCBINDINGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_499__NCITER_LOCBINDINGS.obj_num = 6; cdat->dobj_499__NCITER_LOCBINDINGS.obj_hash = 189247773; cdat->dobj_499__NCITER_LOCBINDINGS.obj_len = 4; /*inistring dstr_500__NCITER_LOCBINDIN*/ /*_.VALSTR___V658*/ meltfptr[657] = (melt_ptr_t) & cdat->dstr_500__NCITER_LOCBINDIN; cdat->dstr_500__NCITER_LOCBINDIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_500__NCITER_LOCBINDIN.val, "NCITER_LOCBINDINGS", sizeof (cdat->dstr_500__NCITER_LOCBINDIN. val) - 1); cdat->dstr_500__NCITER_LOCBINDIN.val[18] = (char) 0; cdat->dstr_500__NCITER_LOCBINDIN.slen = 18; /*iniobj dsym_501__NCITER_BODBINDINGS*/ /*uniqueobj*/ if (! /*_.VALDATA___V674*/ meltfptr[673]) /*_.VALDATA___V674*/ meltfptr[673] = (melt_ptr_t) & cdat->dsym_501__NCITER_BODBINDINGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_501__NCITER_BODBINDINGS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_501__NCITER_BODBINDINGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_501__NCITER_BODBINDINGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_501__NCITER_BODBINDINGS.obj_hash = 239846626; cdat->dsym_501__NCITER_BODBINDINGS.obj_len = 3; /*inistring dstr_502__NCITER_BODBINDIN*/ /*_.VALSTR___V675*/ meltfptr[674] = (melt_ptr_t) & cdat->dstr_502__NCITER_BODBINDIN; cdat->dstr_502__NCITER_BODBINDIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_502__NCITER_BODBINDIN.val, "NCITER_BODBINDINGS", sizeof (cdat->dstr_502__NCITER_BODBINDIN. val) - 1); cdat->dstr_502__NCITER_BODBINDIN.val[18] = (char) 0; cdat->dstr_502__NCITER_BODBINDIN.slen = 18; /*^iniobj */ /*iniobj dobj_503__NCITER_BODBINDINGS*/ /*_.VALDATA___V659*/ meltfptr[658] = (melt_ptr_t) & cdat->dobj_503__NCITER_BODBINDINGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_503__NCITER_BODBINDINGS", 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_503__NCITER_BODBINDINGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_503__NCITER_BODBINDINGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_503__NCITER_BODBINDINGS.obj_num = 7; cdat->dobj_503__NCITER_BODBINDINGS.obj_hash = 992978628; cdat->dobj_503__NCITER_BODBINDINGS.obj_len = 4; /*inistring dstr_504__NCITER_BODBINDIN*/ /*_.VALSTR___V660*/ meltfptr[659] = (melt_ptr_t) & cdat->dstr_504__NCITER_BODBINDIN; cdat->dstr_504__NCITER_BODBINDIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_504__NCITER_BODBINDIN.val, "NCITER_BODBINDINGS", sizeof (cdat->dstr_504__NCITER_BODBINDIN. val) - 1); cdat->dstr_504__NCITER_BODBINDIN.val[18] = (char) 0; cdat->dstr_504__NCITER_BODBINDIN.slen = 18; /*iniobj dsym_505__CLASS_NREP_TESTS*/ /*uniqueobj*/ if (! /*_.VALDATA___V676*/ meltfptr[675]) /*_.VALDATA___V676*/ meltfptr[675] = (melt_ptr_t) & cdat->dsym_505__CLASS_NREP_TESTS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_505__CLASS_NREP_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_505__CLASS_NREP_TESTS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_505__CLASS_NREP_TESTS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_505__CLASS_NREP_TESTS.obj_hash = 434187004; cdat->dsym_505__CLASS_NREP_TESTS.obj_len = 3; /*inistring dstr_506__CLASS_NREP_TESTS*/ /*_.VALSTR___V677*/ meltfptr[676] = (melt_ptr_t) & cdat->dstr_506__CLASS_NREP_TESTS; cdat->dstr_506__CLASS_NREP_TESTS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_506__CLASS_NREP_TESTS.val, "CLASS_NREP_TESTS", sizeof (cdat->dstr_506__CLASS_NREP_TESTS. val) - 1); cdat->dstr_506__CLASS_NREP_TESTS.val[16] = (char) 0; cdat->dstr_506__CLASS_NREP_TESTS.slen = 16; MELT_LOCATION ("warmelt-normal.melt:379:/ iniobj"); /*iniobj dobj_507__CLASS_NREP_TESTS*/ /*_.VALDATA___V678*/ meltfptr[677] = (melt_ptr_t) & cdat->dobj_507__CLASS_NREP_TESTS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_507__CLASS_NREP_TESTS", 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_507__CLASS_NREP_TESTS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_507__CLASS_NREP_TESTS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_507__CLASS_NREP_TESTS.obj_num = MELTOBMAG_OBJECT; cdat->dobj_507__CLASS_NREP_TESTS.obj_hash = 471408132; cdat->dobj_507__CLASS_NREP_TESTS.obj_len = 8; /*inistring dstr_508__CLASS_NREP_TESTS*/ /*_.VALSTR___V679*/ meltfptr[678] = (melt_ptr_t) & cdat->dstr_508__CLASS_NREP_TESTS; cdat->dstr_508__CLASS_NREP_TESTS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_508__CLASS_NREP_TESTS.val, "CLASS_NREP_TESTS", sizeof (cdat->dstr_508__CLASS_NREP_TESTS. val) - 1); cdat->dstr_508__CLASS_NREP_TESTS.val[16] = (char) 0; cdat->dstr_508__CLASS_NREP_TESTS.slen = 16; /*inimult dtup_509__CLASS_NREP_TESTS */ /*_.VALTUP___V680*/ meltfptr[679] = (melt_ptr_t) & cdat->dtup_509__CLASS_NREP_TESTS; cdat->dtup_509__CLASS_NREP_TESTS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_509__CLASS_NREP_TESTS.nbval = 3; /*inimult dtup_510__CLASS_NREP_TESTS */ /*_.VALTUP___V683*/ meltfptr[682] = (melt_ptr_t) & cdat->dtup_510__CLASS_NREP_TESTS; cdat->dtup_510__CLASS_NREP_TESTS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_510__CLASS_NREP_TESTS.nbval = 2; /*iniobj dsym_511__NTESTS_TESTSEQ*/ /*uniqueobj*/ if (! /*_.VALDATA___V684*/ meltfptr[683]) /*_.VALDATA___V684*/ meltfptr[683] = (melt_ptr_t) & cdat->dsym_511__NTESTS_TESTSEQ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_511__NTESTS_TESTSEQ", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_511__NTESTS_TESTSEQ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_511__NTESTS_TESTSEQ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_511__NTESTS_TESTSEQ.obj_hash = 194113497; cdat->dsym_511__NTESTS_TESTSEQ.obj_len = 3; /*inistring dstr_512__NTESTS_TESTSEQ*/ /*_.VALSTR___V685*/ meltfptr[684] = (melt_ptr_t) & cdat->dstr_512__NTESTS_TESTSEQ; cdat->dstr_512__NTESTS_TESTSEQ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_512__NTESTS_TESTSEQ.val, "NTESTS_TESTSEQ", sizeof (cdat->dstr_512__NTESTS_TESTSEQ.val) - 1); cdat->dstr_512__NTESTS_TESTSEQ.val[14] = (char) 0; cdat->dstr_512__NTESTS_TESTSEQ.slen = 14; /*^iniobj */ /*iniobj dobj_513__NTESTS_TESTSEQ*/ /*_.VALDATA___V681*/ meltfptr[680] = (melt_ptr_t) & cdat->dobj_513__NTESTS_TESTSEQ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_513__NTESTS_TESTSEQ", 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_513__NTESTS_TESTSEQ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_513__NTESTS_TESTSEQ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_513__NTESTS_TESTSEQ.obj_num = 1; cdat->dobj_513__NTESTS_TESTSEQ.obj_hash = 791516185; cdat->dobj_513__NTESTS_TESTSEQ.obj_len = 4; /*inistring dstr_514__NTESTS_TESTSEQ*/ /*_.VALSTR___V682*/ meltfptr[681] = (melt_ptr_t) & cdat->dstr_514__NTESTS_TESTSEQ; cdat->dstr_514__NTESTS_TESTSEQ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_514__NTESTS_TESTSEQ.val, "NTESTS_TESTSEQ", sizeof (cdat->dstr_514__NTESTS_TESTSEQ.val) - 1); cdat->dstr_514__NTESTS_TESTSEQ.val[14] = (char) 0; cdat->dstr_514__NTESTS_TESTSEQ.slen = 14; /*iniobj dsym_515__CLASS_NORMAL_CONSTRUCTOR_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V686*/ meltfptr[685]) /*_.VALDATA___V686*/ meltfptr[685] = (melt_ptr_t) & cdat->dsym_515__CLASS_NORMAL_CONSTRUCTOR_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_515__CLASS_NORMAL_CONSTRUCTOR_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_515__CLASS_NORMAL_CONSTRUCTOR_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_515__CLASS_NORMAL_CONSTRUCTOR_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_515__CLASS_NORMAL_CONSTRUCTOR_BINDING.obj_hash = 828004188; cdat->dsym_515__CLASS_NORMAL_CONSTRUCTOR_BINDING.obj_len = 3; /*inistring dstr_516__CLASS_NORMAL_CON*/ /*_.VALSTR___V687*/ meltfptr[686] = (melt_ptr_t) & cdat->dstr_516__CLASS_NORMAL_CON; cdat->dstr_516__CLASS_NORMAL_CON.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_516__CLASS_NORMAL_CON.val, "CLASS_NORMAL_CONSTRUCTOR_BINDING", sizeof (cdat->dstr_516__CLASS_NORMAL_CON. val) - 1); cdat->dstr_516__CLASS_NORMAL_CON.val[32] = (char) 0; cdat->dstr_516__CLASS_NORMAL_CON.slen = 32; /*iniobj dsym_517__CLASS_ANY_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V688*/ meltfptr[687]) /*_.VALDATA___V688*/ meltfptr[687] = (melt_ptr_t) & cdat->dsym_517__CLASS_ANY_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_517__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_517__CLASS_ANY_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_517__CLASS_ANY_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_517__CLASS_ANY_BINDING.obj_hash = 935770; cdat->dsym_517__CLASS_ANY_BINDING.obj_len = 3; /*inistring dstr_518__CLASS_ANY_BINDIN*/ /*_.VALSTR___V689*/ meltfptr[688] = (melt_ptr_t) & cdat->dstr_518__CLASS_ANY_BINDIN; cdat->dstr_518__CLASS_ANY_BINDIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_518__CLASS_ANY_BINDIN.val, "CLASS_ANY_BINDING", sizeof (cdat->dstr_518__CLASS_ANY_BINDIN. val) - 1); cdat->dstr_518__CLASS_ANY_BINDIN.val[17] = (char) 0; cdat->dstr_518__CLASS_ANY_BINDIN.slen = 17; MELT_LOCATION ("warmelt-normal.melt:386:/ iniobj"); /*iniobj dobj_519__CLASS_NORMAL_CONSTRUCTOR_BINDING*/ /*_.VALDATA___V690*/ meltfptr[689] = (melt_ptr_t) & cdat->dobj_519__CLASS_NORMAL_CONSTRUCTOR_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_519__CLASS_NORMAL_CONSTRUCTOR_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_519__CLASS_NORMAL_CONSTRUCTOR_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_519__CLASS_NORMAL_CONSTRUCTOR_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_519__CLASS_NORMAL_CONSTRUCTOR_BINDING.obj_num = MELTOBMAG_OBJECT; cdat->dobj_519__CLASS_NORMAL_CONSTRUCTOR_BINDING.obj_hash = 49535820; cdat->dobj_519__CLASS_NORMAL_CONSTRUCTOR_BINDING.obj_len = 8; /*inistring dstr_520__CLASS_NORMAL_CON*/ /*_.VALSTR___V691*/ meltfptr[690] = (melt_ptr_t) & cdat->dstr_520__CLASS_NORMAL_CON; cdat->dstr_520__CLASS_NORMAL_CON.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_520__CLASS_NORMAL_CON.val, "CLASS_NORMAL_CONSTRUCTOR_BINDING", sizeof (cdat->dstr_520__CLASS_NORMAL_CON. val) - 1); cdat->dstr_520__CLASS_NORMAL_CON.val[32] = (char) 0; cdat->dstr_520__CLASS_NORMAL_CON.slen = 32; /*inimult dtup_521__CLASS_NORMAL_CONSTRUCTOR_BINDING */ /*_.VALTUP___V692*/ meltfptr[691] = (melt_ptr_t) & cdat->dtup_521__CLASS_NORMAL_CONSTRUCTOR_BINDING; cdat->dtup_521__CLASS_NORMAL_CONSTRUCTOR_BINDING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_521__CLASS_NORMAL_CONSTRUCTOR_BINDING.nbval = 2; /*inimult dtup_522__CLASS_NORMAL_CONSTRUCTOR_BINDING */ /*_.VALTUP___V699*/ meltfptr[698] = (melt_ptr_t) & cdat->dtup_522__CLASS_NORMAL_CONSTRUCTOR_BINDING; cdat->dtup_522__CLASS_NORMAL_CONSTRUCTOR_BINDING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_522__CLASS_NORMAL_CONSTRUCTOR_BINDING.nbval = 4; /*iniobj dsym_523__NCONSB_LOC*/ /*uniqueobj*/ if (! /*_.VALDATA___V700*/ meltfptr[699]) /*_.VALDATA___V700*/ meltfptr[699] = (melt_ptr_t) & cdat->dsym_523__NCONSB_LOC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_523__NCONSB_LOC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_523__NCONSB_LOC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_523__NCONSB_LOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_523__NCONSB_LOC.obj_hash = 104386040; cdat->dsym_523__NCONSB_LOC.obj_len = 3; /*inistring dstr_524__NCONSB_LOC*/ /*_.VALSTR___V701*/ meltfptr[700] = (melt_ptr_t) & cdat->dstr_524__NCONSB_LOC; cdat->dstr_524__NCONSB_LOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_524__NCONSB_LOC.val, "NCONSB_LOC", sizeof (cdat->dstr_524__NCONSB_LOC.val) - 1); cdat->dstr_524__NCONSB_LOC.val[10] = (char) 0; cdat->dstr_524__NCONSB_LOC.slen = 10; /*^iniobj */ /*iniobj dobj_525__NCONSB_LOC*/ /*_.VALDATA___V693*/ meltfptr[692] = (melt_ptr_t) & cdat->dobj_525__NCONSB_LOC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_525__NCONSB_LOC", 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_525__NCONSB_LOC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_525__NCONSB_LOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_525__NCONSB_LOC.obj_num = 1; cdat->dobj_525__NCONSB_LOC.obj_hash = 737056711; cdat->dobj_525__NCONSB_LOC.obj_len = 4; /*inistring dstr_526__NCONSB_LOC*/ /*_.VALSTR___V694*/ meltfptr[693] = (melt_ptr_t) & cdat->dstr_526__NCONSB_LOC; cdat->dstr_526__NCONSB_LOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_526__NCONSB_LOC.val, "NCONSB_LOC", sizeof (cdat->dstr_526__NCONSB_LOC.val) - 1); cdat->dstr_526__NCONSB_LOC.val[10] = (char) 0; cdat->dstr_526__NCONSB_LOC.slen = 10; /*iniobj dsym_527__NCONSB_DISCR*/ /*uniqueobj*/ if (! /*_.VALDATA___V702*/ meltfptr[701]) /*_.VALDATA___V702*/ meltfptr[701] = (melt_ptr_t) & cdat->dsym_527__NCONSB_DISCR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_527__NCONSB_DISCR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_527__NCONSB_DISCR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_527__NCONSB_DISCR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_527__NCONSB_DISCR.obj_hash = 6154141; cdat->dsym_527__NCONSB_DISCR.obj_len = 3; /*inistring dstr_528__NCONSB_DISCR*/ /*_.VALSTR___V703*/ meltfptr[702] = (melt_ptr_t) & cdat->dstr_528__NCONSB_DISCR; cdat->dstr_528__NCONSB_DISCR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_528__NCONSB_DISCR.val, "NCONSB_DISCR", sizeof (cdat->dstr_528__NCONSB_DISCR.val) - 1); cdat->dstr_528__NCONSB_DISCR.val[12] = (char) 0; cdat->dstr_528__NCONSB_DISCR.slen = 12; /*^iniobj */ /*iniobj dobj_529__NCONSB_DISCR*/ /*_.VALDATA___V695*/ meltfptr[694] = (melt_ptr_t) & cdat->dobj_529__NCONSB_DISCR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_529__NCONSB_DISCR", 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_529__NCONSB_DISCR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_529__NCONSB_DISCR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_529__NCONSB_DISCR.obj_num = 2; cdat->dobj_529__NCONSB_DISCR.obj_hash = 355298027; cdat->dobj_529__NCONSB_DISCR.obj_len = 4; /*inistring dstr_530__NCONSB_DISCR*/ /*_.VALSTR___V696*/ meltfptr[695] = (melt_ptr_t) & cdat->dstr_530__NCONSB_DISCR; cdat->dstr_530__NCONSB_DISCR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_530__NCONSB_DISCR.val, "NCONSB_DISCR", sizeof (cdat->dstr_530__NCONSB_DISCR.val) - 1); cdat->dstr_530__NCONSB_DISCR.val[12] = (char) 0; cdat->dstr_530__NCONSB_DISCR.slen = 12; /*iniobj dsym_531__NCONSB_NLETREC*/ /*uniqueobj*/ if (! /*_.VALDATA___V704*/ meltfptr[703]) /*_.VALDATA___V704*/ meltfptr[703] = (melt_ptr_t) & cdat->dsym_531__NCONSB_NLETREC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_531__NCONSB_NLETREC", melt_magic_discr ((melt_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__NCONSB_NLETREC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_531__NCONSB_NLETREC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_531__NCONSB_NLETREC.obj_hash = 124276570; cdat->dsym_531__NCONSB_NLETREC.obj_len = 3; /*inistring dstr_532__NCONSB_NLETREC*/ /*_.VALSTR___V705*/ meltfptr[704] = (melt_ptr_t) & cdat->dstr_532__NCONSB_NLETREC; cdat->dstr_532__NCONSB_NLETREC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_532__NCONSB_NLETREC.val, "NCONSB_NLETREC", sizeof (cdat->dstr_532__NCONSB_NLETREC.val) - 1); cdat->dstr_532__NCONSB_NLETREC.val[14] = (char) 0; cdat->dstr_532__NCONSB_NLETREC.slen = 14; /*^iniobj */ /*iniobj dobj_533__NCONSB_NLETREC*/ /*_.VALDATA___V697*/ meltfptr[696] = (melt_ptr_t) & cdat->dobj_533__NCONSB_NLETREC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_533__NCONSB_NLETREC", 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_533__NCONSB_NLETREC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_533__NCONSB_NLETREC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_533__NCONSB_NLETREC.obj_num = 3; cdat->dobj_533__NCONSB_NLETREC.obj_hash = 246124133; cdat->dobj_533__NCONSB_NLETREC.obj_len = 4; /*inistring dstr_534__NCONSB_NLETREC*/ /*_.VALSTR___V698*/ meltfptr[697] = (melt_ptr_t) & cdat->dstr_534__NCONSB_NLETREC; cdat->dstr_534__NCONSB_NLETREC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_534__NCONSB_NLETREC.val, "NCONSB_NLETREC", sizeof (cdat->dstr_534__NCONSB_NLETREC.val) - 1); cdat->dstr_534__NCONSB_NLETREC.val[14] = (char) 0; cdat->dstr_534__NCONSB_NLETREC.slen = 14; /*iniobj dsym_535__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V706*/ meltfptr[705]) /*_.VALDATA___V706*/ meltfptr[705] = (melt_ptr_t) & cdat->dsym_535__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_535__CLASS_NORMAL_CONSTRUCTED_TUPLE_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_535__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_535__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_535__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING.obj_hash = 529357655; cdat->dsym_535__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING.obj_len = 3; /*inistring dstr_536__CLASS_NORMAL_CON*/ /*_.VALSTR___V707*/ meltfptr[706] = (melt_ptr_t) & cdat->dstr_536__CLASS_NORMAL_CON; cdat->dstr_536__CLASS_NORMAL_CON.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_536__CLASS_NORMAL_CON.val, "CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING", sizeof (cdat->dstr_536__CLASS_NORMAL_CON. val) - 1); cdat->dstr_536__CLASS_NORMAL_CON.val[38] = (char) 0; cdat->dstr_536__CLASS_NORMAL_CON.slen = 38; MELT_LOCATION ("warmelt-normal.melt:395:/ iniobj"); /*iniobj dobj_537__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING*/ /*_.VALDATA___V708*/ meltfptr[707] = (melt_ptr_t) & cdat->dobj_537__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_537__CLASS_NORMAL_CONSTRUCTED_TUPLE_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_537__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_537__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_537__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING.obj_num = MELTOBMAG_OBJECT; cdat->dobj_537__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING.obj_hash = 287716033; cdat->dobj_537__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING.obj_len = 8; /*inistring dstr_538__CLASS_NORMAL_CON*/ /*_.VALSTR___V709*/ meltfptr[708] = (melt_ptr_t) & cdat->dstr_538__CLASS_NORMAL_CON; cdat->dstr_538__CLASS_NORMAL_CON.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_538__CLASS_NORMAL_CON.val, "CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING", sizeof (cdat->dstr_538__CLASS_NORMAL_CON. val) - 1); cdat->dstr_538__CLASS_NORMAL_CON.val[38] = (char) 0; cdat->dstr_538__CLASS_NORMAL_CON.slen = 38; /*inimult dtup_539__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING */ /*_.VALTUP___V710*/ meltfptr[709] = (melt_ptr_t) & cdat->dtup_539__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING; cdat->dtup_539__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_539__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING.nbval = 3; /*inimult dtup_540__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING */ /*_.VALTUP___V713*/ meltfptr[712] = (melt_ptr_t) & cdat->dtup_540__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING; cdat->dtup_540__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_540__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING.nbval = 5; /*iniobj dsym_541__NTUPB_COMP*/ /*uniqueobj*/ if (! /*_.VALDATA___V714*/ meltfptr[713]) /*_.VALDATA___V714*/ meltfptr[713] = (melt_ptr_t) & cdat->dsym_541__NTUPB_COMP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_541__NTUPB_COMP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_541__NTUPB_COMP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_541__NTUPB_COMP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_541__NTUPB_COMP.obj_hash = 23210722; cdat->dsym_541__NTUPB_COMP.obj_len = 3; /*inistring dstr_542__NTUPB_COMP*/ /*_.VALSTR___V715*/ meltfptr[714] = (melt_ptr_t) & cdat->dstr_542__NTUPB_COMP; cdat->dstr_542__NTUPB_COMP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_542__NTUPB_COMP.val, "NTUPB_COMP", sizeof (cdat->dstr_542__NTUPB_COMP.val) - 1); cdat->dstr_542__NTUPB_COMP.val[10] = (char) 0; cdat->dstr_542__NTUPB_COMP.slen = 10; /*^iniobj */ /*iniobj dobj_543__NTUPB_COMP*/ /*_.VALDATA___V711*/ meltfptr[710] = (melt_ptr_t) & cdat->dobj_543__NTUPB_COMP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_543__NTUPB_COMP", 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_543__NTUPB_COMP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_543__NTUPB_COMP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_543__NTUPB_COMP.obj_num = 4; cdat->dobj_543__NTUPB_COMP.obj_hash = 47928109; cdat->dobj_543__NTUPB_COMP.obj_len = 4; /*inistring dstr_544__NTUPB_COMP*/ /*_.VALSTR___V712*/ meltfptr[711] = (melt_ptr_t) & cdat->dstr_544__NTUPB_COMP; cdat->dstr_544__NTUPB_COMP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_544__NTUPB_COMP.val, "NTUPB_COMP", sizeof (cdat->dstr_544__NTUPB_COMP.val) - 1); cdat->dstr_544__NTUPB_COMP.val[10] = (char) 0; cdat->dstr_544__NTUPB_COMP.slen = 10; /*iniobj dsym_545__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V716*/ meltfptr[715]) /*_.VALDATA___V716*/ meltfptr[715] = (melt_ptr_t) & cdat->dsym_545__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_545__CLASS_NORMAL_CONSTRUCTED_PAIR_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_545__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_545__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_545__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING.obj_hash = 175512947; cdat->dsym_545__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING.obj_len = 3; /*inistring dstr_546__CLASS_NORMAL_CON*/ /*_.VALSTR___V717*/ meltfptr[716] = (melt_ptr_t) & cdat->dstr_546__CLASS_NORMAL_CON; cdat->dstr_546__CLASS_NORMAL_CON.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_546__CLASS_NORMAL_CON.val, "CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING", sizeof (cdat->dstr_546__CLASS_NORMAL_CON. val) - 1); cdat->dstr_546__CLASS_NORMAL_CON.val[37] = (char) 0; cdat->dstr_546__CLASS_NORMAL_CON.slen = 37; MELT_LOCATION ("warmelt-normal.melt:402:/ iniobj"); /*iniobj dobj_547__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING*/ /*_.VALDATA___V718*/ meltfptr[717] = (melt_ptr_t) & cdat->dobj_547__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_547__CLASS_NORMAL_CONSTRUCTED_PAIR_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_547__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_547__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_547__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING.obj_num = MELTOBMAG_OBJECT; cdat->dobj_547__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING.obj_hash = 268370266; cdat->dobj_547__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING.obj_len = 8; /*inistring dstr_548__CLASS_NORMAL_CON*/ /*_.VALSTR___V719*/ meltfptr[718] = (melt_ptr_t) & cdat->dstr_548__CLASS_NORMAL_CON; cdat->dstr_548__CLASS_NORMAL_CON.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_548__CLASS_NORMAL_CON.val, "CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING", sizeof (cdat->dstr_548__CLASS_NORMAL_CON. val) - 1); cdat->dstr_548__CLASS_NORMAL_CON.val[37] = (char) 0; cdat->dstr_548__CLASS_NORMAL_CON.slen = 37; /*inimult dtup_549__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING */ /*_.VALTUP___V720*/ meltfptr[719] = (melt_ptr_t) & cdat->dtup_549__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING; cdat->dtup_549__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_549__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING.nbval = 3; /*inimult dtup_550__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING */ /*_.VALTUP___V725*/ meltfptr[724] = (melt_ptr_t) & cdat->dtup_550__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING; cdat->dtup_550__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_550__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING.nbval = 6; /*iniobj dsym_551__NPAIRB_HEAD*/ /*uniqueobj*/ if (! /*_.VALDATA___V726*/ meltfptr[725]) /*_.VALDATA___V726*/ meltfptr[725] = (melt_ptr_t) & cdat->dsym_551__NPAIRB_HEAD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_551__NPAIRB_HEAD", melt_magic_discr ((melt_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__NPAIRB_HEAD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_551__NPAIRB_HEAD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_551__NPAIRB_HEAD.obj_hash = 928562128; cdat->dsym_551__NPAIRB_HEAD.obj_len = 3; /*inistring dstr_552__NPAIRB_HEAD*/ /*_.VALSTR___V727*/ meltfptr[726] = (melt_ptr_t) & cdat->dstr_552__NPAIRB_HEAD; cdat->dstr_552__NPAIRB_HEAD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_552__NPAIRB_HEAD.val, "NPAIRB_HEAD", sizeof (cdat->dstr_552__NPAIRB_HEAD.val) - 1); cdat->dstr_552__NPAIRB_HEAD.val[11] = (char) 0; cdat->dstr_552__NPAIRB_HEAD.slen = 11; /*^iniobj */ /*iniobj dobj_553__NPAIRB_HEAD*/ /*_.VALDATA___V721*/ meltfptr[720] = (melt_ptr_t) & cdat->dobj_553__NPAIRB_HEAD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_553__NPAIRB_HEAD", 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__NPAIRB_HEAD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_553__NPAIRB_HEAD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_553__NPAIRB_HEAD.obj_num = 4; cdat->dobj_553__NPAIRB_HEAD.obj_hash = 833378866; cdat->dobj_553__NPAIRB_HEAD.obj_len = 4; /*inistring dstr_554__NPAIRB_HEAD*/ /*_.VALSTR___V722*/ meltfptr[721] = (melt_ptr_t) & cdat->dstr_554__NPAIRB_HEAD; cdat->dstr_554__NPAIRB_HEAD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_554__NPAIRB_HEAD.val, "NPAIRB_HEAD", sizeof (cdat->dstr_554__NPAIRB_HEAD.val) - 1); cdat->dstr_554__NPAIRB_HEAD.val[11] = (char) 0; cdat->dstr_554__NPAIRB_HEAD.slen = 11; /*iniobj dsym_555__NPAIRB_TAIL*/ /*uniqueobj*/ if (! /*_.VALDATA___V728*/ meltfptr[727]) /*_.VALDATA___V728*/ meltfptr[727] = (melt_ptr_t) & cdat->dsym_555__NPAIRB_TAIL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_555__NPAIRB_TAIL", melt_magic_discr ((melt_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__NPAIRB_TAIL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_555__NPAIRB_TAIL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_555__NPAIRB_TAIL.obj_hash = 493955770; cdat->dsym_555__NPAIRB_TAIL.obj_len = 3; /*inistring dstr_556__NPAIRB_TAIL*/ /*_.VALSTR___V729*/ meltfptr[728] = (melt_ptr_t) & cdat->dstr_556__NPAIRB_TAIL; cdat->dstr_556__NPAIRB_TAIL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_556__NPAIRB_TAIL.val, "NPAIRB_TAIL", sizeof (cdat->dstr_556__NPAIRB_TAIL.val) - 1); cdat->dstr_556__NPAIRB_TAIL.val[11] = (char) 0; cdat->dstr_556__NPAIRB_TAIL.slen = 11; /*^iniobj */ /*iniobj dobj_557__NPAIRB_TAIL*/ /*_.VALDATA___V723*/ meltfptr[722] = (melt_ptr_t) & cdat->dobj_557__NPAIRB_TAIL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_557__NPAIRB_TAIL", 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__NPAIRB_TAIL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_557__NPAIRB_TAIL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_557__NPAIRB_TAIL.obj_num = 5; cdat->dobj_557__NPAIRB_TAIL.obj_hash = 187511818; cdat->dobj_557__NPAIRB_TAIL.obj_len = 4; /*inistring dstr_558__NPAIRB_TAIL*/ /*_.VALSTR___V724*/ meltfptr[723] = (melt_ptr_t) & cdat->dstr_558__NPAIRB_TAIL; cdat->dstr_558__NPAIRB_TAIL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_558__NPAIRB_TAIL.val, "NPAIRB_TAIL", sizeof (cdat->dstr_558__NPAIRB_TAIL.val) - 1); cdat->dstr_558__NPAIRB_TAIL.val[11] = (char) 0; cdat->dstr_558__NPAIRB_TAIL.slen = 11; /*iniobj dsym_559__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V730*/ meltfptr[729]) /*_.VALDATA___V730*/ meltfptr[729] = (melt_ptr_t) & cdat->dsym_559__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_559__CLASS_NORMAL_CONSTRUCTED_LIST_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_559__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_559__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_559__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING.obj_hash = 377142415; cdat->dsym_559__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING.obj_len = 3; /*inistring dstr_560__CLASS_NORMAL_CON*/ /*_.VALSTR___V731*/ meltfptr[730] = (melt_ptr_t) & cdat->dstr_560__CLASS_NORMAL_CON; cdat->dstr_560__CLASS_NORMAL_CON.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_560__CLASS_NORMAL_CON.val, "CLASS_NORMAL_CONSTRUCTED_LIST_BINDING", sizeof (cdat->dstr_560__CLASS_NORMAL_CON. val) - 1); cdat->dstr_560__CLASS_NORMAL_CON.val[37] = (char) 0; cdat->dstr_560__CLASS_NORMAL_CON.slen = 37; MELT_LOCATION ("warmelt-normal.melt:409:/ iniobj"); /*iniobj dobj_561__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING*/ /*_.VALDATA___V732*/ meltfptr[731] = (melt_ptr_t) & cdat->dobj_561__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_561__CLASS_NORMAL_CONSTRUCTED_LIST_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_561__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_561__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_561__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING.obj_num = MELTOBMAG_OBJECT; cdat->dobj_561__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING.obj_hash = 191154281; cdat->dobj_561__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING.obj_len = 8; /*inistring dstr_562__CLASS_NORMAL_CON*/ /*_.VALSTR___V733*/ meltfptr[732] = (melt_ptr_t) & cdat->dstr_562__CLASS_NORMAL_CON; cdat->dstr_562__CLASS_NORMAL_CON.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_562__CLASS_NORMAL_CON.val, "CLASS_NORMAL_CONSTRUCTED_LIST_BINDING", sizeof (cdat->dstr_562__CLASS_NORMAL_CON. val) - 1); cdat->dstr_562__CLASS_NORMAL_CON.val[37] = (char) 0; cdat->dstr_562__CLASS_NORMAL_CON.slen = 37; /*inimult dtup_563__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING */ /*_.VALTUP___V734*/ meltfptr[733] = (melt_ptr_t) & cdat->dtup_563__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING; cdat->dtup_563__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_563__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING.nbval = 3; /*inimult dtup_564__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING */ /*_.VALTUP___V741*/ meltfptr[740] = (melt_ptr_t) & cdat->dtup_564__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING; cdat->dtup_564__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_564__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING.nbval = 7; /*iniobj dsym_565__NLISTB_FIRST*/ /*uniqueobj*/ if (! /*_.VALDATA___V742*/ meltfptr[741]) /*_.VALDATA___V742*/ meltfptr[741] = (melt_ptr_t) & cdat->dsym_565__NLISTB_FIRST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_565__NLISTB_FIRST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_565__NLISTB_FIRST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_565__NLISTB_FIRST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_565__NLISTB_FIRST.obj_hash = 81730529; cdat->dsym_565__NLISTB_FIRST.obj_len = 3; /*inistring dstr_566__NLISTB_FIRST*/ /*_.VALSTR___V743*/ meltfptr[742] = (melt_ptr_t) & cdat->dstr_566__NLISTB_FIRST; cdat->dstr_566__NLISTB_FIRST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_566__NLISTB_FIRST.val, "NLISTB_FIRST", sizeof (cdat->dstr_566__NLISTB_FIRST.val) - 1); cdat->dstr_566__NLISTB_FIRST.val[12] = (char) 0; cdat->dstr_566__NLISTB_FIRST.slen = 12; /*^iniobj */ /*iniobj dobj_567__NLISTB_FIRST*/ /*_.VALDATA___V735*/ meltfptr[734] = (melt_ptr_t) & cdat->dobj_567__NLISTB_FIRST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_567__NLISTB_FIRST", 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_567__NLISTB_FIRST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_567__NLISTB_FIRST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_567__NLISTB_FIRST.obj_num = 4; cdat->dobj_567__NLISTB_FIRST.obj_hash = 745699359; cdat->dobj_567__NLISTB_FIRST.obj_len = 4; /*inistring dstr_568__NLISTB_FIRST*/ /*_.VALSTR___V736*/ meltfptr[735] = (melt_ptr_t) & cdat->dstr_568__NLISTB_FIRST; cdat->dstr_568__NLISTB_FIRST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_568__NLISTB_FIRST.val, "NLISTB_FIRST", sizeof (cdat->dstr_568__NLISTB_FIRST.val) - 1); cdat->dstr_568__NLISTB_FIRST.val[12] = (char) 0; cdat->dstr_568__NLISTB_FIRST.slen = 12; /*iniobj dsym_569__NLISTB_LAST*/ /*uniqueobj*/ if (! /*_.VALDATA___V744*/ meltfptr[743]) /*_.VALDATA___V744*/ meltfptr[743] = (melt_ptr_t) & cdat->dsym_569__NLISTB_LAST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_569__NLISTB_LAST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_569__NLISTB_LAST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_569__NLISTB_LAST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_569__NLISTB_LAST.obj_hash = 714664655; cdat->dsym_569__NLISTB_LAST.obj_len = 3; /*inistring dstr_570__NLISTB_LAST*/ /*_.VALSTR___V745*/ meltfptr[744] = (melt_ptr_t) & cdat->dstr_570__NLISTB_LAST; cdat->dstr_570__NLISTB_LAST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_570__NLISTB_LAST.val, "NLISTB_LAST", sizeof (cdat->dstr_570__NLISTB_LAST.val) - 1); cdat->dstr_570__NLISTB_LAST.val[11] = (char) 0; cdat->dstr_570__NLISTB_LAST.slen = 11; /*^iniobj */ /*iniobj dobj_571__NLISTB_LAST*/ /*_.VALDATA___V737*/ meltfptr[736] = (melt_ptr_t) & cdat->dobj_571__NLISTB_LAST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_571__NLISTB_LAST", 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_571__NLISTB_LAST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_571__NLISTB_LAST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_571__NLISTB_LAST.obj_num = 5; cdat->dobj_571__NLISTB_LAST.obj_hash = 85956468; cdat->dobj_571__NLISTB_LAST.obj_len = 4; /*inistring dstr_572__NLISTB_LAST*/ /*_.VALSTR___V738*/ meltfptr[737] = (melt_ptr_t) & cdat->dstr_572__NLISTB_LAST; cdat->dstr_572__NLISTB_LAST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_572__NLISTB_LAST.val, "NLISTB_LAST", sizeof (cdat->dstr_572__NLISTB_LAST.val) - 1); cdat->dstr_572__NLISTB_LAST.val[11] = (char) 0; cdat->dstr_572__NLISTB_LAST.slen = 11; /*iniobj dsym_573__NLISTB_PAIRSB*/ /*uniqueobj*/ if (! /*_.VALDATA___V746*/ meltfptr[745]) /*_.VALDATA___V746*/ meltfptr[745] = (melt_ptr_t) & cdat->dsym_573__NLISTB_PAIRSB; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_573__NLISTB_PAIRSB", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_573__NLISTB_PAIRSB", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_573__NLISTB_PAIRSB.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_573__NLISTB_PAIRSB.obj_hash = 977330658; cdat->dsym_573__NLISTB_PAIRSB.obj_len = 3; /*inistring dstr_574__NLISTB_PAIRSB*/ /*_.VALSTR___V747*/ meltfptr[746] = (melt_ptr_t) & cdat->dstr_574__NLISTB_PAIRSB; cdat->dstr_574__NLISTB_PAIRSB.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_574__NLISTB_PAIRSB.val, "NLISTB_PAIRSB", sizeof (cdat->dstr_574__NLISTB_PAIRSB.val) - 1); cdat->dstr_574__NLISTB_PAIRSB.val[13] = (char) 0; cdat->dstr_574__NLISTB_PAIRSB.slen = 13; /*^iniobj */ /*iniobj dobj_575__NLISTB_PAIRSB*/ /*_.VALDATA___V739*/ meltfptr[738] = (melt_ptr_t) & cdat->dobj_575__NLISTB_PAIRSB; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_575__NLISTB_PAIRSB", 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_575__NLISTB_PAIRSB", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_575__NLISTB_PAIRSB.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_575__NLISTB_PAIRSB.obj_num = 6; cdat->dobj_575__NLISTB_PAIRSB.obj_hash = 379446312; cdat->dobj_575__NLISTB_PAIRSB.obj_len = 4; /*inistring dstr_576__NLISTB_PAIRSB*/ /*_.VALSTR___V740*/ meltfptr[739] = (melt_ptr_t) & cdat->dstr_576__NLISTB_PAIRSB; cdat->dstr_576__NLISTB_PAIRSB.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_576__NLISTB_PAIRSB.val, "NLISTB_PAIRSB", sizeof (cdat->dstr_576__NLISTB_PAIRSB.val) - 1); cdat->dstr_576__NLISTB_PAIRSB.val[13] = (char) 0; cdat->dstr_576__NLISTB_PAIRSB.slen = 13; /*iniobj dsym_577__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V748*/ meltfptr[747]) /*_.VALDATA___V748*/ meltfptr[747] = (melt_ptr_t) & cdat->dsym_577__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_577__CLASS_NORMAL_CONSTRUCTED_LAMBDA_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_577__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_577__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_577__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING.obj_hash = 444318231; cdat->dsym_577__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING.obj_len = 3; /*inistring dstr_578__CLASS_NORMAL_CON*/ /*_.VALSTR___V749*/ meltfptr[748] = (melt_ptr_t) & cdat->dstr_578__CLASS_NORMAL_CON; cdat->dstr_578__CLASS_NORMAL_CON.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_578__CLASS_NORMAL_CON.val, "CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING", sizeof (cdat->dstr_578__CLASS_NORMAL_CON. val) - 1); cdat->dstr_578__CLASS_NORMAL_CON.val[39] = (char) 0; cdat->dstr_578__CLASS_NORMAL_CON.slen = 39; MELT_LOCATION ("warmelt-normal.melt:417:/ iniobj"); /*iniobj dobj_579__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING*/ /*_.VALDATA___V750*/ meltfptr[749] = (melt_ptr_t) & cdat->dobj_579__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_579__CLASS_NORMAL_CONSTRUCTED_LAMBDA_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_579__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_579__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_579__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING.obj_num = MELTOBMAG_OBJECT; cdat->dobj_579__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING.obj_hash = 307666462; cdat->dobj_579__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING.obj_len = 8; /*inistring dstr_580__CLASS_NORMAL_CON*/ /*_.VALSTR___V751*/ meltfptr[750] = (melt_ptr_t) & cdat->dstr_580__CLASS_NORMAL_CON; cdat->dstr_580__CLASS_NORMAL_CON.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_580__CLASS_NORMAL_CON.val, "CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING", sizeof (cdat->dstr_580__CLASS_NORMAL_CON. val) - 1); cdat->dstr_580__CLASS_NORMAL_CON.val[39] = (char) 0; cdat->dstr_580__CLASS_NORMAL_CON.slen = 39; /*inimult dtup_581__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING */ /*_.VALTUP___V752*/ meltfptr[751] = (melt_ptr_t) & cdat->dtup_581__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING; cdat->dtup_581__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_581__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING.nbval = 3; /*inimult dtup_582__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING */ /*_.VALTUP___V759*/ meltfptr[758] = (melt_ptr_t) & cdat->dtup_582__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING; cdat->dtup_582__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_582__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING.nbval = 7; /*iniobj dsym_583__NLAMBDAB_NCLOSED*/ /*uniqueobj*/ if (! /*_.VALDATA___V760*/ meltfptr[759]) /*_.VALDATA___V760*/ meltfptr[759] = (melt_ptr_t) & cdat->dsym_583__NLAMBDAB_NCLOSED; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_583__NLAMBDAB_NCLOSED", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_583__NLAMBDAB_NCLOSED", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_583__NLAMBDAB_NCLOSED.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_583__NLAMBDAB_NCLOSED.obj_hash = 202352400; cdat->dsym_583__NLAMBDAB_NCLOSED.obj_len = 3; /*inistring dstr_584__NLAMBDAB_NCLOSED*/ /*_.VALSTR___V761*/ meltfptr[760] = (melt_ptr_t) & cdat->dstr_584__NLAMBDAB_NCLOSED; cdat->dstr_584__NLAMBDAB_NCLOSED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_584__NLAMBDAB_NCLOSED.val, "NLAMBDAB_NCLOSED", sizeof (cdat->dstr_584__NLAMBDAB_NCLOSED. val) - 1); cdat->dstr_584__NLAMBDAB_NCLOSED.val[16] = (char) 0; cdat->dstr_584__NLAMBDAB_NCLOSED.slen = 16; /*^iniobj */ /*iniobj dobj_585__NLAMBDAB_NCLOSED*/ /*_.VALDATA___V753*/ meltfptr[752] = (melt_ptr_t) & cdat->dobj_585__NLAMBDAB_NCLOSED; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_585__NLAMBDAB_NCLOSED", 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_585__NLAMBDAB_NCLOSED", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_585__NLAMBDAB_NCLOSED.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_585__NLAMBDAB_NCLOSED.obj_num = 4; cdat->dobj_585__NLAMBDAB_NCLOSED.obj_hash = 95438281; cdat->dobj_585__NLAMBDAB_NCLOSED.obj_len = 4; /*inistring dstr_586__NLAMBDAB_NCLOSED*/ /*_.VALSTR___V754*/ meltfptr[753] = (melt_ptr_t) & cdat->dstr_586__NLAMBDAB_NCLOSED; cdat->dstr_586__NLAMBDAB_NCLOSED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_586__NLAMBDAB_NCLOSED.val, "NLAMBDAB_NCLOSED", sizeof (cdat->dstr_586__NLAMBDAB_NCLOSED. val) - 1); cdat->dstr_586__NLAMBDAB_NCLOSED.val[16] = (char) 0; cdat->dstr_586__NLAMBDAB_NCLOSED.slen = 16; /*iniobj dsym_587__NLAMBDAB_CONSTROUT*/ /*uniqueobj*/ if (! /*_.VALDATA___V762*/ meltfptr[761]) /*_.VALDATA___V762*/ meltfptr[761] = (melt_ptr_t) & cdat->dsym_587__NLAMBDAB_CONSTROUT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_587__NLAMBDAB_CONSTROUT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_587__NLAMBDAB_CONSTROUT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_587__NLAMBDAB_CONSTROUT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_587__NLAMBDAB_CONSTROUT.obj_hash = 907004639; cdat->dsym_587__NLAMBDAB_CONSTROUT.obj_len = 3; /*inistring dstr_588__NLAMBDAB_CONSTRO*/ /*_.VALSTR___V763*/ meltfptr[762] = (melt_ptr_t) & cdat->dstr_588__NLAMBDAB_CONSTRO; cdat->dstr_588__NLAMBDAB_CONSTRO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_588__NLAMBDAB_CONSTRO.val, "NLAMBDAB_CONSTROUT", sizeof (cdat->dstr_588__NLAMBDAB_CONSTRO. val) - 1); cdat->dstr_588__NLAMBDAB_CONSTRO.val[18] = (char) 0; cdat->dstr_588__NLAMBDAB_CONSTRO.slen = 18; /*^iniobj */ /*iniobj dobj_589__NLAMBDAB_CONSTROUT*/ /*_.VALDATA___V755*/ meltfptr[754] = (melt_ptr_t) & cdat->dobj_589__NLAMBDAB_CONSTROUT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_589__NLAMBDAB_CONSTROUT", 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_589__NLAMBDAB_CONSTROUT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_589__NLAMBDAB_CONSTROUT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_589__NLAMBDAB_CONSTROUT.obj_num = 5; cdat->dobj_589__NLAMBDAB_CONSTROUT.obj_hash = 387713729; cdat->dobj_589__NLAMBDAB_CONSTROUT.obj_len = 4; /*inistring dstr_590__NLAMBDAB_CONSTRO*/ /*_.VALSTR___V756*/ meltfptr[755] = (melt_ptr_t) & cdat->dstr_590__NLAMBDAB_CONSTRO; cdat->dstr_590__NLAMBDAB_CONSTRO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_590__NLAMBDAB_CONSTRO.val, "NLAMBDAB_CONSTROUT", sizeof (cdat->dstr_590__NLAMBDAB_CONSTRO. val) - 1); cdat->dstr_590__NLAMBDAB_CONSTRO.val[18] = (char) 0; cdat->dstr_590__NLAMBDAB_CONSTRO.slen = 18; /*iniobj dsym_591__NLAMBDAB_DATAROUT*/ /*uniqueobj*/ if (! /*_.VALDATA___V764*/ meltfptr[763]) /*_.VALDATA___V764*/ meltfptr[763] = (melt_ptr_t) & cdat->dsym_591__NLAMBDAB_DATAROUT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_591__NLAMBDAB_DATAROUT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_591__NLAMBDAB_DATAROUT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_591__NLAMBDAB_DATAROUT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_591__NLAMBDAB_DATAROUT.obj_hash = 864991825; cdat->dsym_591__NLAMBDAB_DATAROUT.obj_len = 3; /*inistring dstr_592__NLAMBDAB_DATAROU*/ /*_.VALSTR___V765*/ meltfptr[764] = (melt_ptr_t) & cdat->dstr_592__NLAMBDAB_DATAROU; cdat->dstr_592__NLAMBDAB_DATAROU.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_592__NLAMBDAB_DATAROU.val, "NLAMBDAB_DATAROUT", sizeof (cdat->dstr_592__NLAMBDAB_DATAROU. val) - 1); cdat->dstr_592__NLAMBDAB_DATAROU.val[17] = (char) 0; cdat->dstr_592__NLAMBDAB_DATAROU.slen = 17; /*^iniobj */ /*iniobj dobj_593__NLAMBDAB_DATAROUT*/ /*_.VALDATA___V757*/ meltfptr[756] = (melt_ptr_t) & cdat->dobj_593__NLAMBDAB_DATAROUT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_593__NLAMBDAB_DATAROUT", 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_593__NLAMBDAB_DATAROUT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_593__NLAMBDAB_DATAROUT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_593__NLAMBDAB_DATAROUT.obj_num = 6; cdat->dobj_593__NLAMBDAB_DATAROUT.obj_hash = 108159507; cdat->dobj_593__NLAMBDAB_DATAROUT.obj_len = 4; /*inistring dstr_594__NLAMBDAB_DATAROU*/ /*_.VALSTR___V758*/ meltfptr[757] = (melt_ptr_t) & cdat->dstr_594__NLAMBDAB_DATAROU; cdat->dstr_594__NLAMBDAB_DATAROU.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_594__NLAMBDAB_DATAROU.val, "NLAMBDAB_DATAROUT", sizeof (cdat->dstr_594__NLAMBDAB_DATAROU. val) - 1); cdat->dstr_594__NLAMBDAB_DATAROU.val[17] = (char) 0; cdat->dstr_594__NLAMBDAB_DATAROU.slen = 17; /*iniobj dsym_595__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V766*/ meltfptr[765]) /*_.VALDATA___V766*/ meltfptr[765] = (melt_ptr_t) & cdat-> dsym_595__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_595__CLASS_NORMAL_CONSTRUCTED_INSTANCE_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_595__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_595__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_595__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING.obj_hash = 123856315; cdat->dsym_595__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING.obj_len = 3; /*inistring dstr_596__CLASS_NORMAL_CON*/ /*_.VALSTR___V767*/ meltfptr[766] = (melt_ptr_t) & cdat->dstr_596__CLASS_NORMAL_CON; cdat->dstr_596__CLASS_NORMAL_CON.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_596__CLASS_NORMAL_CON.val, "CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING", sizeof (cdat->dstr_596__CLASS_NORMAL_CON. val) - 1); cdat->dstr_596__CLASS_NORMAL_CON.val[41] = (char) 0; cdat->dstr_596__CLASS_NORMAL_CON.slen = 41; MELT_LOCATION ("warmelt-normal.melt:424:/ iniobj"); /*iniobj dobj_597__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING*/ /*_.VALDATA___V768*/ meltfptr[767] = (melt_ptr_t) & cdat->dobj_597__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_597__CLASS_NORMAL_CONSTRUCTED_INSTANCE_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_597__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_597__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_597__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING.obj_num = MELTOBMAG_OBJECT; cdat->dobj_597__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING.obj_hash = 1049446989; cdat->dobj_597__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING.obj_len = 8; /*inistring dstr_598__CLASS_NORMAL_CON*/ /*_.VALSTR___V769*/ meltfptr[768] = (melt_ptr_t) & cdat->dstr_598__CLASS_NORMAL_CON; cdat->dstr_598__CLASS_NORMAL_CON.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_598__CLASS_NORMAL_CON.val, "CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING", sizeof (cdat->dstr_598__CLASS_NORMAL_CON. val) - 1); cdat->dstr_598__CLASS_NORMAL_CON.val[41] = (char) 0; cdat->dstr_598__CLASS_NORMAL_CON.slen = 41; /*inimult dtup_599__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING */ /*_.VALTUP___V770*/ meltfptr[769] = (melt_ptr_t) & cdat->dtup_599__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING; cdat->dtup_599__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_599__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING.nbval = 3; /*inimult dtup_600__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING */ /*_.VALTUP___V775*/ meltfptr[774] = (melt_ptr_t) & cdat->dtup_600__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING; cdat->dtup_600__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_600__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING.nbval = 6; /*iniobj dsym_601__NINSTB_SLOTS*/ /*uniqueobj*/ if (! /*_.VALDATA___V776*/ meltfptr[775]) /*_.VALDATA___V776*/ meltfptr[775] = (melt_ptr_t) & cdat->dsym_601__NINSTB_SLOTS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_601__NINSTB_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_601__NINSTB_SLOTS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_601__NINSTB_SLOTS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_601__NINSTB_SLOTS.obj_hash = 850526974; cdat->dsym_601__NINSTB_SLOTS.obj_len = 3; /*inistring dstr_602__NINSTB_SLOTS*/ /*_.VALSTR___V777*/ meltfptr[776] = (melt_ptr_t) & cdat->dstr_602__NINSTB_SLOTS; cdat->dstr_602__NINSTB_SLOTS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_602__NINSTB_SLOTS.val, "NINSTB_SLOTS", sizeof (cdat->dstr_602__NINSTB_SLOTS.val) - 1); cdat->dstr_602__NINSTB_SLOTS.val[12] = (char) 0; cdat->dstr_602__NINSTB_SLOTS.slen = 12; /*^iniobj */ /*iniobj dobj_603__NINSTB_SLOTS*/ /*_.VALDATA___V771*/ meltfptr[770] = (melt_ptr_t) & cdat->dobj_603__NINSTB_SLOTS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_603__NINSTB_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_603__NINSTB_SLOTS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_603__NINSTB_SLOTS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_603__NINSTB_SLOTS.obj_num = 4; cdat->dobj_603__NINSTB_SLOTS.obj_hash = 791093013; cdat->dobj_603__NINSTB_SLOTS.obj_len = 4; /*inistring dstr_604__NINSTB_SLOTS*/ /*_.VALSTR___V772*/ meltfptr[771] = (melt_ptr_t) & cdat->dstr_604__NINSTB_SLOTS; cdat->dstr_604__NINSTB_SLOTS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_604__NINSTB_SLOTS.val, "NINSTB_SLOTS", sizeof (cdat->dstr_604__NINSTB_SLOTS.val) - 1); cdat->dstr_604__NINSTB_SLOTS.val[12] = (char) 0; cdat->dstr_604__NINSTB_SLOTS.slen = 12; /*iniobj dsym_605__NINSTB_CLABIND*/ /*uniqueobj*/ if (! /*_.VALDATA___V778*/ meltfptr[777]) /*_.VALDATA___V778*/ meltfptr[777] = (melt_ptr_t) & cdat->dsym_605__NINSTB_CLABIND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_605__NINSTB_CLABIND", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_605__NINSTB_CLABIND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_605__NINSTB_CLABIND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_605__NINSTB_CLABIND.obj_hash = 356432164; cdat->dsym_605__NINSTB_CLABIND.obj_len = 3; /*inistring dstr_606__NINSTB_CLABIND*/ /*_.VALSTR___V779*/ meltfptr[778] = (melt_ptr_t) & cdat->dstr_606__NINSTB_CLABIND; cdat->dstr_606__NINSTB_CLABIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_606__NINSTB_CLABIND.val, "NINSTB_CLABIND", sizeof (cdat->dstr_606__NINSTB_CLABIND.val) - 1); cdat->dstr_606__NINSTB_CLABIND.val[14] = (char) 0; cdat->dstr_606__NINSTB_CLABIND.slen = 14; /*^iniobj */ /*iniobj dobj_607__NINSTB_CLABIND*/ /*_.VALDATA___V773*/ meltfptr[772] = (melt_ptr_t) & cdat->dobj_607__NINSTB_CLABIND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_607__NINSTB_CLABIND", 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_607__NINSTB_CLABIND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_607__NINSTB_CLABIND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_607__NINSTB_CLABIND.obj_num = 5; cdat->dobj_607__NINSTB_CLABIND.obj_hash = 878760674; cdat->dobj_607__NINSTB_CLABIND.obj_len = 4; /*inistring dstr_608__NINSTB_CLABIND*/ /*_.VALSTR___V774*/ meltfptr[773] = (melt_ptr_t) & cdat->dstr_608__NINSTB_CLABIND; cdat->dstr_608__NINSTB_CLABIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_608__NINSTB_CLABIND.val, "NINSTB_CLABIND", sizeof (cdat->dstr_608__NINSTB_CLABIND.val) - 1); cdat->dstr_608__NINSTB_CLABIND.val[14] = (char) 0; cdat->dstr_608__NINSTB_CLABIND.slen = 14; /*iniobj dsym_609__CLASS_NREP_ANYPROC*/ /*uniqueobj*/ if (! /*_.VALDATA___V780*/ meltfptr[779]) /*_.VALDATA___V780*/ meltfptr[779] = (melt_ptr_t) & cdat->dsym_609__CLASS_NREP_ANYPROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_609__CLASS_NREP_ANYPROC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_609__CLASS_NREP_ANYPROC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_609__CLASS_NREP_ANYPROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_609__CLASS_NREP_ANYPROC.obj_hash = 605230702; cdat->dsym_609__CLASS_NREP_ANYPROC.obj_len = 3; /*inistring dstr_610__CLASS_NREP_ANYPR*/ /*_.VALSTR___V781*/ meltfptr[780] = (melt_ptr_t) & cdat->dstr_610__CLASS_NREP_ANYPR; cdat->dstr_610__CLASS_NREP_ANYPR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_610__CLASS_NREP_ANYPR.val, "CLASS_NREP_ANYPROC", sizeof (cdat->dstr_610__CLASS_NREP_ANYPR. val) - 1); cdat->dstr_610__CLASS_NREP_ANYPR.val[18] = (char) 0; cdat->dstr_610__CLASS_NREP_ANYPR.slen = 18; MELT_LOCATION ("warmelt-normal.melt:433:/ iniobj"); /*iniobj dobj_611__CLASS_NREP_ANYPROC*/ /*_.VALDATA___V782*/ meltfptr[781] = (melt_ptr_t) & cdat->dobj_611__CLASS_NREP_ANYPROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_611__CLASS_NREP_ANYPROC", 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_611__CLASS_NREP_ANYPROC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_611__CLASS_NREP_ANYPROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_611__CLASS_NREP_ANYPROC.obj_num = MELTOBMAG_OBJECT; cdat->dobj_611__CLASS_NREP_ANYPROC.obj_hash = 608709901; cdat->dobj_611__CLASS_NREP_ANYPROC.obj_len = 8; /*inistring dstr_612__CLASS_NREP_ANYPR*/ /*_.VALSTR___V783*/ meltfptr[782] = (melt_ptr_t) & cdat->dstr_612__CLASS_NREP_ANYPR; cdat->dstr_612__CLASS_NREP_ANYPR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_612__CLASS_NREP_ANYPR.val, "CLASS_NREP_ANYPROC", sizeof (cdat->dstr_612__CLASS_NREP_ANYPR. val) - 1); cdat->dstr_612__CLASS_NREP_ANYPR.val[18] = (char) 0; cdat->dstr_612__CLASS_NREP_ANYPR.slen = 18; /*inimult dtup_613__CLASS_NREP_ANYPROC */ /*_.VALTUP___V784*/ meltfptr[783] = (melt_ptr_t) & cdat->dtup_613__CLASS_NREP_ANYPROC; cdat->dtup_613__CLASS_NREP_ANYPROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_613__CLASS_NREP_ANYPROC.nbval = 2; /*inimult dtup_614__CLASS_NREP_ANYPROC */ /*_.VALTUP___V787*/ meltfptr[786] = (melt_ptr_t) & cdat->dtup_614__CLASS_NREP_ANYPROC; cdat->dtup_614__CLASS_NREP_ANYPROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_614__CLASS_NREP_ANYPROC.nbval = 2; /*iniobj dsym_615__NPROC_BODY*/ /*uniqueobj*/ if (! /*_.VALDATA___V788*/ meltfptr[787]) /*_.VALDATA___V788*/ meltfptr[787] = (melt_ptr_t) & cdat->dsym_615__NPROC_BODY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_615__NPROC_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_615__NPROC_BODY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_615__NPROC_BODY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_615__NPROC_BODY.obj_hash = 964488607; cdat->dsym_615__NPROC_BODY.obj_len = 3; /*inistring dstr_616__NPROC_BODY*/ /*_.VALSTR___V789*/ meltfptr[788] = (melt_ptr_t) & cdat->dstr_616__NPROC_BODY; cdat->dstr_616__NPROC_BODY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_616__NPROC_BODY.val, "NPROC_BODY", sizeof (cdat->dstr_616__NPROC_BODY.val) - 1); cdat->dstr_616__NPROC_BODY.val[10] = (char) 0; cdat->dstr_616__NPROC_BODY.slen = 10; /*^iniobj */ /*iniobj dobj_617__NPROC_BODY*/ /*_.VALDATA___V785*/ meltfptr[784] = (melt_ptr_t) & cdat->dobj_617__NPROC_BODY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_617__NPROC_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_617__NPROC_BODY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_617__NPROC_BODY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_617__NPROC_BODY.obj_num = 1; cdat->dobj_617__NPROC_BODY.obj_hash = 377090923; cdat->dobj_617__NPROC_BODY.obj_len = 4; /*inistring dstr_618__NPROC_BODY*/ /*_.VALSTR___V786*/ meltfptr[785] = (melt_ptr_t) & cdat->dstr_618__NPROC_BODY; cdat->dstr_618__NPROC_BODY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_618__NPROC_BODY.val, "NPROC_BODY", sizeof (cdat->dstr_618__NPROC_BODY.val) - 1); cdat->dstr_618__NPROC_BODY.val[10] = (char) 0; cdat->dstr_618__NPROC_BODY.slen = 10; /*iniobj dsym_619__CLASS_NREP_INITPROC*/ /*uniqueobj*/ if (! /*_.VALDATA___V790*/ meltfptr[789]) /*_.VALDATA___V790*/ meltfptr[789] = (melt_ptr_t) & cdat->dsym_619__CLASS_NREP_INITPROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_619__CLASS_NREP_INITPROC", melt_magic_discr ((melt_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__CLASS_NREP_INITPROC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_619__CLASS_NREP_INITPROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_619__CLASS_NREP_INITPROC.obj_hash = 915122709; cdat->dsym_619__CLASS_NREP_INITPROC.obj_len = 3; /*inistring dstr_620__CLASS_NREP_INITP*/ /*_.VALSTR___V791*/ meltfptr[790] = (melt_ptr_t) & cdat->dstr_620__CLASS_NREP_INITP; cdat->dstr_620__CLASS_NREP_INITP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_620__CLASS_NREP_INITP.val, "CLASS_NREP_INITPROC", sizeof (cdat->dstr_620__CLASS_NREP_INITP. val) - 1); cdat->dstr_620__CLASS_NREP_INITP.val[19] = (char) 0; cdat->dstr_620__CLASS_NREP_INITP.slen = 19; MELT_LOCATION ("warmelt-normal.melt:443:/ iniobj"); /*iniobj dobj_621__CLASS_NREP_INITPROC*/ /*_.VALDATA___V792*/ meltfptr[791] = (melt_ptr_t) & cdat->dobj_621__CLASS_NREP_INITPROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_621__CLASS_NREP_INITPROC", 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_621__CLASS_NREP_INITPROC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_621__CLASS_NREP_INITPROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_621__CLASS_NREP_INITPROC.obj_num = MELTOBMAG_OBJECT; cdat->dobj_621__CLASS_NREP_INITPROC.obj_hash = 57026442; cdat->dobj_621__CLASS_NREP_INITPROC.obj_len = 8; /*inistring dstr_622__CLASS_NREP_INITP*/ /*_.VALSTR___V793*/ meltfptr[792] = (melt_ptr_t) & cdat->dstr_622__CLASS_NREP_INITP; cdat->dstr_622__CLASS_NREP_INITP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_622__CLASS_NREP_INITP.val, "CLASS_NREP_INITPROC", sizeof (cdat->dstr_622__CLASS_NREP_INITP. val) - 1); cdat->dstr_622__CLASS_NREP_INITP.val[19] = (char) 0; cdat->dstr_622__CLASS_NREP_INITP.slen = 19; /*inimult dtup_623__CLASS_NREP_INITPROC */ /*_.VALTUP___V794*/ meltfptr[793] = (melt_ptr_t) & cdat->dtup_623__CLASS_NREP_INITPROC; cdat->dtup_623__CLASS_NREP_INITPROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_623__CLASS_NREP_INITPROC.nbval = 3; /*inimult dtup_624__CLASS_NREP_INITPROC */ /*_.VALTUP___V799*/ meltfptr[798] = (melt_ptr_t) & cdat->dtup_624__CLASS_NREP_INITPROC; cdat->dtup_624__CLASS_NREP_INITPROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_624__CLASS_NREP_INITPROC.nbval = 4; /*iniobj dsym_625__NINIT_TOPL*/ /*uniqueobj*/ if (! /*_.VALDATA___V800*/ meltfptr[799]) /*_.VALDATA___V800*/ meltfptr[799] = (melt_ptr_t) & cdat->dsym_625__NINIT_TOPL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_625__NINIT_TOPL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_625__NINIT_TOPL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_625__NINIT_TOPL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_625__NINIT_TOPL.obj_hash = 412312786; cdat->dsym_625__NINIT_TOPL.obj_len = 3; /*inistring dstr_626__NINIT_TOPL*/ /*_.VALSTR___V801*/ meltfptr[800] = (melt_ptr_t) & cdat->dstr_626__NINIT_TOPL; cdat->dstr_626__NINIT_TOPL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_626__NINIT_TOPL.val, "NINIT_TOPL", sizeof (cdat->dstr_626__NINIT_TOPL.val) - 1); cdat->dstr_626__NINIT_TOPL.val[10] = (char) 0; cdat->dstr_626__NINIT_TOPL.slen = 10; /*^iniobj */ /*iniobj dobj_627__NINIT_TOPL*/ /*_.VALDATA___V795*/ meltfptr[794] = (melt_ptr_t) & cdat->dobj_627__NINIT_TOPL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_627__NINIT_TOPL", 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_627__NINIT_TOPL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_627__NINIT_TOPL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_627__NINIT_TOPL.obj_num = 2; cdat->dobj_627__NINIT_TOPL.obj_hash = 122390809; cdat->dobj_627__NINIT_TOPL.obj_len = 4; /*inistring dstr_628__NINIT_TOPL*/ /*_.VALSTR___V796*/ meltfptr[795] = (melt_ptr_t) & cdat->dstr_628__NINIT_TOPL; cdat->dstr_628__NINIT_TOPL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_628__NINIT_TOPL.val, "NINIT_TOPL", sizeof (cdat->dstr_628__NINIT_TOPL.val) - 1); cdat->dstr_628__NINIT_TOPL.val[10] = (char) 0; cdat->dstr_628__NINIT_TOPL.slen = 10; /*iniobj dsym_629__NINIT_DEFBINDS*/ /*uniqueobj*/ if (! /*_.VALDATA___V802*/ meltfptr[801]) /*_.VALDATA___V802*/ meltfptr[801] = (melt_ptr_t) & cdat->dsym_629__NINIT_DEFBINDS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_629__NINIT_DEFBINDS", melt_magic_discr ((melt_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__NINIT_DEFBINDS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_629__NINIT_DEFBINDS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_629__NINIT_DEFBINDS.obj_hash = 532696337; cdat->dsym_629__NINIT_DEFBINDS.obj_len = 3; /*inistring dstr_630__NINIT_DEFBINDS*/ /*_.VALSTR___V803*/ meltfptr[802] = (melt_ptr_t) & cdat->dstr_630__NINIT_DEFBINDS; cdat->dstr_630__NINIT_DEFBINDS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_630__NINIT_DEFBINDS.val, "NINIT_DEFBINDS", sizeof (cdat->dstr_630__NINIT_DEFBINDS.val) - 1); cdat->dstr_630__NINIT_DEFBINDS.val[14] = (char) 0; cdat->dstr_630__NINIT_DEFBINDS.slen = 14; /*^iniobj */ /*iniobj dobj_631__NINIT_DEFBINDS*/ /*_.VALDATA___V797*/ meltfptr[796] = (melt_ptr_t) & cdat->dobj_631__NINIT_DEFBINDS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_631__NINIT_DEFBINDS", 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_631__NINIT_DEFBINDS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_631__NINIT_DEFBINDS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_631__NINIT_DEFBINDS.obj_num = 3; cdat->dobj_631__NINIT_DEFBINDS.obj_hash = 270846384; cdat->dobj_631__NINIT_DEFBINDS.obj_len = 4; /*inistring dstr_632__NINIT_DEFBINDS*/ /*_.VALSTR___V798*/ meltfptr[797] = (melt_ptr_t) & cdat->dstr_632__NINIT_DEFBINDS; cdat->dstr_632__NINIT_DEFBINDS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_632__NINIT_DEFBINDS.val, "NINIT_DEFBINDS", sizeof (cdat->dstr_632__NINIT_DEFBINDS.val) - 1); cdat->dstr_632__NINIT_DEFBINDS.val[14] = (char) 0; cdat->dstr_632__NINIT_DEFBINDS.slen = 14; /*iniobj dsym_633__CLASS_NREP_INITEXTENDPROC*/ /*uniqueobj*/ if (! /*_.VALDATA___V804*/ meltfptr[803]) /*_.VALDATA___V804*/ meltfptr[803] = (melt_ptr_t) & cdat->dsym_633__CLASS_NREP_INITEXTENDPROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_633__CLASS_NREP_INITEXTENDPROC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_633__CLASS_NREP_INITEXTENDPROC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_633__CLASS_NREP_INITEXTENDPROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_633__CLASS_NREP_INITEXTENDPROC.obj_hash = 446278172; cdat->dsym_633__CLASS_NREP_INITEXTENDPROC.obj_len = 3; /*inistring dstr_634__CLASS_NREP_INITE*/ /*_.VALSTR___V805*/ meltfptr[804] = (melt_ptr_t) & cdat->dstr_634__CLASS_NREP_INITE; cdat->dstr_634__CLASS_NREP_INITE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_634__CLASS_NREP_INITE.val, "CLASS_NREP_INITEXTENDPROC", sizeof (cdat->dstr_634__CLASS_NREP_INITE. val) - 1); cdat->dstr_634__CLASS_NREP_INITE.val[25] = (char) 0; cdat->dstr_634__CLASS_NREP_INITE.slen = 25; MELT_LOCATION ("warmelt-normal.melt:453:/ iniobj"); /*iniobj dobj_635__CLASS_NREP_INITEXTENDPROC*/ /*_.VALDATA___V806*/ meltfptr[805] = (melt_ptr_t) & cdat->dobj_635__CLASS_NREP_INITEXTENDPROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_635__CLASS_NREP_INITEXTENDPROC", 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_635__CLASS_NREP_INITEXTENDPROC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_635__CLASS_NREP_INITEXTENDPROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_635__CLASS_NREP_INITEXTENDPROC.obj_num = MELTOBMAG_OBJECT; cdat->dobj_635__CLASS_NREP_INITEXTENDPROC.obj_hash = 1025109673; cdat->dobj_635__CLASS_NREP_INITEXTENDPROC.obj_len = 8; /*inistring dstr_636__CLASS_NREP_INITE*/ /*_.VALSTR___V807*/ meltfptr[806] = (melt_ptr_t) & cdat->dstr_636__CLASS_NREP_INITE; cdat->dstr_636__CLASS_NREP_INITE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_636__CLASS_NREP_INITE.val, "CLASS_NREP_INITEXTENDPROC", sizeof (cdat->dstr_636__CLASS_NREP_INITE. val) - 1); cdat->dstr_636__CLASS_NREP_INITE.val[25] = (char) 0; cdat->dstr_636__CLASS_NREP_INITE.slen = 25; /*inimult dtup_637__CLASS_NREP_INITEXTENDPROC */ /*_.VALTUP___V808*/ meltfptr[807] = (melt_ptr_t) & cdat->dtup_637__CLASS_NREP_INITEXTENDPROC; cdat->dtup_637__CLASS_NREP_INITEXTENDPROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_637__CLASS_NREP_INITEXTENDPROC.nbval = 4; /*inimult dtup_638__CLASS_NREP_INITEXTENDPROC */ /*_.VALTUP___V811*/ meltfptr[810] = (melt_ptr_t) & cdat->dtup_638__CLASS_NREP_INITEXTENDPROC; cdat->dtup_638__CLASS_NREP_INITEXTENDPROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_638__CLASS_NREP_INITEXTENDPROC.nbval = 5; /*iniobj dsym_639__NINITEXTEND_MODENV*/ /*uniqueobj*/ if (! /*_.VALDATA___V812*/ meltfptr[811]) /*_.VALDATA___V812*/ meltfptr[811] = (melt_ptr_t) & cdat->dsym_639__NINITEXTEND_MODENV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_639__NINITEXTEND_MODENV", melt_magic_discr ((melt_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__NINITEXTEND_MODENV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_639__NINITEXTEND_MODENV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_639__NINITEXTEND_MODENV.obj_hash = 418334992; cdat->dsym_639__NINITEXTEND_MODENV.obj_len = 3; /*inistring dstr_640__NINITEXTEND_MODE*/ /*_.VALSTR___V813*/ meltfptr[812] = (melt_ptr_t) & cdat->dstr_640__NINITEXTEND_MODE; cdat->dstr_640__NINITEXTEND_MODE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_640__NINITEXTEND_MODE.val, "NINITEXTEND_MODENV", sizeof (cdat->dstr_640__NINITEXTEND_MODE. val) - 1); cdat->dstr_640__NINITEXTEND_MODE.val[18] = (char) 0; cdat->dstr_640__NINITEXTEND_MODE.slen = 18; /*^iniobj */ /*iniobj dobj_641__NINITEXTEND_MODENV*/ /*_.VALDATA___V809*/ meltfptr[808] = (melt_ptr_t) & cdat->dobj_641__NINITEXTEND_MODENV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_641__NINITEXTEND_MODENV", 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__NINITEXTEND_MODENV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_641__NINITEXTEND_MODENV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_641__NINITEXTEND_MODENV.obj_num = 4; cdat->dobj_641__NINITEXTEND_MODENV.obj_hash = 310742796; cdat->dobj_641__NINITEXTEND_MODENV.obj_len = 4; /*inistring dstr_642__NINITEXTEND_MODE*/ /*_.VALSTR___V810*/ meltfptr[809] = (melt_ptr_t) & cdat->dstr_642__NINITEXTEND_MODE; cdat->dstr_642__NINITEXTEND_MODE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_642__NINITEXTEND_MODE.val, "NINITEXTEND_MODENV", sizeof (cdat->dstr_642__NINITEXTEND_MODE. val) - 1); cdat->dstr_642__NINITEXTEND_MODE.val[18] = (char) 0; cdat->dstr_642__NINITEXTEND_MODE.slen = 18; /*iniobj dsym_643__CLASS_NREP_ROUTPROC*/ /*uniqueobj*/ if (! /*_.VALDATA___V814*/ meltfptr[813]) /*_.VALDATA___V814*/ meltfptr[813] = (melt_ptr_t) & cdat->dsym_643__CLASS_NREP_ROUTPROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_643__CLASS_NREP_ROUTPROC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_643__CLASS_NREP_ROUTPROC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_643__CLASS_NREP_ROUTPROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_643__CLASS_NREP_ROUTPROC.obj_hash = 959677762; cdat->dsym_643__CLASS_NREP_ROUTPROC.obj_len = 3; /*inistring dstr_644__CLASS_NREP_ROUTP*/ /*_.VALSTR___V815*/ meltfptr[814] = (melt_ptr_t) & cdat->dstr_644__CLASS_NREP_ROUTP; cdat->dstr_644__CLASS_NREP_ROUTP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_644__CLASS_NREP_ROUTP.val, "CLASS_NREP_ROUTPROC", sizeof (cdat->dstr_644__CLASS_NREP_ROUTP. val) - 1); cdat->dstr_644__CLASS_NREP_ROUTP.val[19] = (char) 0; cdat->dstr_644__CLASS_NREP_ROUTP.slen = 19; MELT_LOCATION ("warmelt-normal.melt:462:/ iniobj"); /*iniobj dobj_645__CLASS_NREP_ROUTPROC*/ /*_.VALDATA___V816*/ meltfptr[815] = (melt_ptr_t) & cdat->dobj_645__CLASS_NREP_ROUTPROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_645__CLASS_NREP_ROUTPROC", 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_645__CLASS_NREP_ROUTPROC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_645__CLASS_NREP_ROUTPROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_645__CLASS_NREP_ROUTPROC.obj_num = MELTOBMAG_OBJECT; cdat->dobj_645__CLASS_NREP_ROUTPROC.obj_hash = 325505911; cdat->dobj_645__CLASS_NREP_ROUTPROC.obj_len = 8; /*inistring dstr_646__CLASS_NREP_ROUTP*/ /*_.VALSTR___V817*/ meltfptr[816] = (melt_ptr_t) & cdat->dstr_646__CLASS_NREP_ROUTP; cdat->dstr_646__CLASS_NREP_ROUTP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_646__CLASS_NREP_ROUTP.val, "CLASS_NREP_ROUTPROC", sizeof (cdat->dstr_646__CLASS_NREP_ROUTP. val) - 1); cdat->dstr_646__CLASS_NREP_ROUTP.val[19] = (char) 0; cdat->dstr_646__CLASS_NREP_ROUTP.slen = 19; /*inimult dtup_647__CLASS_NREP_ROUTPROC */ /*_.VALTUP___V818*/ meltfptr[817] = (melt_ptr_t) & cdat->dtup_647__CLASS_NREP_ROUTPROC; cdat->dtup_647__CLASS_NREP_ROUTPROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_647__CLASS_NREP_ROUTPROC.nbval = 3; /*inimult dtup_648__CLASS_NREP_ROUTPROC */ /*_.VALTUP___V835*/ meltfptr[834] = (melt_ptr_t) & cdat->dtup_648__CLASS_NREP_ROUTPROC; cdat->dtup_648__CLASS_NREP_ROUTPROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_648__CLASS_NREP_ROUTPROC.nbval = 10; /*iniobj dsym_649__NRPRO_NAME*/ /*uniqueobj*/ if (! /*_.VALDATA___V836*/ meltfptr[835]) /*_.VALDATA___V836*/ meltfptr[835] = (melt_ptr_t) & cdat->dsym_649__NRPRO_NAME; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_649__NRPRO_NAME", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_649__NRPRO_NAME", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_649__NRPRO_NAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_649__NRPRO_NAME.obj_hash = 96818313; cdat->dsym_649__NRPRO_NAME.obj_len = 3; /*inistring dstr_650__NRPRO_NAME*/ /*_.VALSTR___V837*/ meltfptr[836] = (melt_ptr_t) & cdat->dstr_650__NRPRO_NAME; cdat->dstr_650__NRPRO_NAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_650__NRPRO_NAME.val, "NRPRO_NAME", sizeof (cdat->dstr_650__NRPRO_NAME.val) - 1); cdat->dstr_650__NRPRO_NAME.val[10] = (char) 0; cdat->dstr_650__NRPRO_NAME.slen = 10; /*^iniobj */ /*iniobj dobj_651__NRPRO_NAME*/ /*_.VALDATA___V819*/ meltfptr[818] = (melt_ptr_t) & cdat->dobj_651__NRPRO_NAME; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_651__NRPRO_NAME", 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_651__NRPRO_NAME", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_651__NRPRO_NAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_651__NRPRO_NAME.obj_num = 2; cdat->dobj_651__NRPRO_NAME.obj_hash = 577226469; cdat->dobj_651__NRPRO_NAME.obj_len = 4; /*inistring dstr_652__NRPRO_NAME*/ /*_.VALSTR___V820*/ meltfptr[819] = (melt_ptr_t) & cdat->dstr_652__NRPRO_NAME; cdat->dstr_652__NRPRO_NAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_652__NRPRO_NAME.val, "NRPRO_NAME", sizeof (cdat->dstr_652__NRPRO_NAME.val) - 1); cdat->dstr_652__NRPRO_NAME.val[10] = (char) 0; cdat->dstr_652__NRPRO_NAME.slen = 10; /*iniobj dsym_653__NRPRO_ARGB*/ /*uniqueobj*/ if (! /*_.VALDATA___V838*/ meltfptr[837]) /*_.VALDATA___V838*/ meltfptr[837] = (melt_ptr_t) & cdat->dsym_653__NRPRO_ARGB; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_653__NRPRO_ARGB", melt_magic_discr ((melt_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__NRPRO_ARGB", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_653__NRPRO_ARGB.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_653__NRPRO_ARGB.obj_hash = 659478173; cdat->dsym_653__NRPRO_ARGB.obj_len = 3; /*inistring dstr_654__NRPRO_ARGB*/ /*_.VALSTR___V839*/ meltfptr[838] = (melt_ptr_t) & cdat->dstr_654__NRPRO_ARGB; cdat->dstr_654__NRPRO_ARGB.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_654__NRPRO_ARGB.val, "NRPRO_ARGB", sizeof (cdat->dstr_654__NRPRO_ARGB.val) - 1); cdat->dstr_654__NRPRO_ARGB.val[10] = (char) 0; cdat->dstr_654__NRPRO_ARGB.slen = 10; /*^iniobj */ /*iniobj dobj_655__NRPRO_ARGB*/ /*_.VALDATA___V821*/ meltfptr[820] = (melt_ptr_t) & cdat->dobj_655__NRPRO_ARGB; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_655__NRPRO_ARGB", 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__NRPRO_ARGB", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_655__NRPRO_ARGB.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_655__NRPRO_ARGB.obj_num = 3; cdat->dobj_655__NRPRO_ARGB.obj_hash = 35090996; cdat->dobj_655__NRPRO_ARGB.obj_len = 4; /*inistring dstr_656__NRPRO_ARGB*/ /*_.VALSTR___V822*/ meltfptr[821] = (melt_ptr_t) & cdat->dstr_656__NRPRO_ARGB; cdat->dstr_656__NRPRO_ARGB.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_656__NRPRO_ARGB.val, "NRPRO_ARGB", sizeof (cdat->dstr_656__NRPRO_ARGB.val) - 1); cdat->dstr_656__NRPRO_ARGB.val[10] = (char) 0; cdat->dstr_656__NRPRO_ARGB.slen = 10; /*iniobj dsym_657__NRPRO_CLOSEDB*/ /*uniqueobj*/ if (! /*_.VALDATA___V840*/ meltfptr[839]) /*_.VALDATA___V840*/ meltfptr[839] = (melt_ptr_t) & cdat->dsym_657__NRPRO_CLOSEDB; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_657__NRPRO_CLOSEDB", melt_magic_discr ((melt_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__NRPRO_CLOSEDB", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_657__NRPRO_CLOSEDB.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_657__NRPRO_CLOSEDB.obj_hash = 321070777; cdat->dsym_657__NRPRO_CLOSEDB.obj_len = 3; /*inistring dstr_658__NRPRO_CLOSEDB*/ /*_.VALSTR___V841*/ meltfptr[840] = (melt_ptr_t) & cdat->dstr_658__NRPRO_CLOSEDB; cdat->dstr_658__NRPRO_CLOSEDB.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_658__NRPRO_CLOSEDB.val, "NRPRO_CLOSEDB", sizeof (cdat->dstr_658__NRPRO_CLOSEDB.val) - 1); cdat->dstr_658__NRPRO_CLOSEDB.val[13] = (char) 0; cdat->dstr_658__NRPRO_CLOSEDB.slen = 13; /*^iniobj */ /*iniobj dobj_659__NRPRO_CLOSEDB*/ /*_.VALDATA___V823*/ meltfptr[822] = (melt_ptr_t) & cdat->dobj_659__NRPRO_CLOSEDB; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_659__NRPRO_CLOSEDB", 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__NRPRO_CLOSEDB", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_659__NRPRO_CLOSEDB.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_659__NRPRO_CLOSEDB.obj_num = 4; cdat->dobj_659__NRPRO_CLOSEDB.obj_hash = 35007578; cdat->dobj_659__NRPRO_CLOSEDB.obj_len = 4; /*inistring dstr_660__NRPRO_CLOSEDB*/ /*_.VALSTR___V824*/ meltfptr[823] = (melt_ptr_t) & cdat->dstr_660__NRPRO_CLOSEDB; cdat->dstr_660__NRPRO_CLOSEDB.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_660__NRPRO_CLOSEDB.val, "NRPRO_CLOSEDB", sizeof (cdat->dstr_660__NRPRO_CLOSEDB.val) - 1); cdat->dstr_660__NRPRO_CLOSEDB.val[13] = (char) 0; cdat->dstr_660__NRPRO_CLOSEDB.slen = 13; /*iniobj dsym_661__NRPRO_CONST*/ /*uniqueobj*/ if (! /*_.VALDATA___V842*/ meltfptr[841]) /*_.VALDATA___V842*/ meltfptr[841] = (melt_ptr_t) & cdat->dsym_661__NRPRO_CONST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_661__NRPRO_CONST", melt_magic_discr ((melt_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__NRPRO_CONST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_661__NRPRO_CONST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_661__NRPRO_CONST.obj_hash = 887071892; cdat->dsym_661__NRPRO_CONST.obj_len = 3; /*inistring dstr_662__NRPRO_CONST*/ /*_.VALSTR___V843*/ meltfptr[842] = (melt_ptr_t) & cdat->dstr_662__NRPRO_CONST; cdat->dstr_662__NRPRO_CONST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_662__NRPRO_CONST.val, "NRPRO_CONST", sizeof (cdat->dstr_662__NRPRO_CONST.val) - 1); cdat->dstr_662__NRPRO_CONST.val[11] = (char) 0; cdat->dstr_662__NRPRO_CONST.slen = 11; /*^iniobj */ /*iniobj dobj_663__NRPRO_CONST*/ /*_.VALDATA___V825*/ meltfptr[824] = (melt_ptr_t) & cdat->dobj_663__NRPRO_CONST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_663__NRPRO_CONST", 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__NRPRO_CONST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_663__NRPRO_CONST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_663__NRPRO_CONST.obj_num = 5; cdat->dobj_663__NRPRO_CONST.obj_hash = 180197037; cdat->dobj_663__NRPRO_CONST.obj_len = 4; /*inistring dstr_664__NRPRO_CONST*/ /*_.VALSTR___V826*/ meltfptr[825] = (melt_ptr_t) & cdat->dstr_664__NRPRO_CONST; cdat->dstr_664__NRPRO_CONST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_664__NRPRO_CONST.val, "NRPRO_CONST", sizeof (cdat->dstr_664__NRPRO_CONST.val) - 1); cdat->dstr_664__NRPRO_CONST.val[11] = (char) 0; cdat->dstr_664__NRPRO_CONST.slen = 11; /*iniobj dsym_665__NRPRO_DATAROUT*/ /*uniqueobj*/ if (! /*_.VALDATA___V844*/ meltfptr[843]) /*_.VALDATA___V844*/ meltfptr[843] = (melt_ptr_t) & cdat->dsym_665__NRPRO_DATAROUT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_665__NRPRO_DATAROUT", melt_magic_discr ((melt_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__NRPRO_DATAROUT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_665__NRPRO_DATAROUT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_665__NRPRO_DATAROUT.obj_hash = 434111557; cdat->dsym_665__NRPRO_DATAROUT.obj_len = 3; /*inistring dstr_666__NRPRO_DATAROUT*/ /*_.VALSTR___V845*/ meltfptr[844] = (melt_ptr_t) & cdat->dstr_666__NRPRO_DATAROUT; cdat->dstr_666__NRPRO_DATAROUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_666__NRPRO_DATAROUT.val, "NRPRO_DATAROUT", sizeof (cdat->dstr_666__NRPRO_DATAROUT.val) - 1); cdat->dstr_666__NRPRO_DATAROUT.val[14] = (char) 0; cdat->dstr_666__NRPRO_DATAROUT.slen = 14; /*^iniobj */ /*iniobj dobj_667__NRPRO_DATAROUT*/ /*_.VALDATA___V827*/ meltfptr[826] = (melt_ptr_t) & cdat->dobj_667__NRPRO_DATAROUT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_667__NRPRO_DATAROUT", 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__NRPRO_DATAROUT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_667__NRPRO_DATAROUT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_667__NRPRO_DATAROUT.obj_num = 6; cdat->dobj_667__NRPRO_DATAROUT.obj_hash = 1034914466; cdat->dobj_667__NRPRO_DATAROUT.obj_len = 4; /*inistring dstr_668__NRPRO_DATAROUT*/ /*_.VALSTR___V828*/ meltfptr[827] = (melt_ptr_t) & cdat->dstr_668__NRPRO_DATAROUT; cdat->dstr_668__NRPRO_DATAROUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_668__NRPRO_DATAROUT.val, "NRPRO_DATAROUT", sizeof (cdat->dstr_668__NRPRO_DATAROUT.val) - 1); cdat->dstr_668__NRPRO_DATAROUT.val[14] = (char) 0; cdat->dstr_668__NRPRO_DATAROUT.slen = 14; /*iniobj dsym_669__NRPRO_DATACLOS*/ /*uniqueobj*/ if (! /*_.VALDATA___V846*/ meltfptr[845]) /*_.VALDATA___V846*/ meltfptr[845] = (melt_ptr_t) & cdat->dsym_669__NRPRO_DATACLOS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_669__NRPRO_DATACLOS", melt_magic_discr ((melt_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__NRPRO_DATACLOS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_669__NRPRO_DATACLOS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_669__NRPRO_DATACLOS.obj_hash = 72191194; cdat->dsym_669__NRPRO_DATACLOS.obj_len = 3; /*inistring dstr_670__NRPRO_DATACLOS*/ /*_.VALSTR___V847*/ meltfptr[846] = (melt_ptr_t) & cdat->dstr_670__NRPRO_DATACLOS; cdat->dstr_670__NRPRO_DATACLOS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_670__NRPRO_DATACLOS.val, "NRPRO_DATACLOS", sizeof (cdat->dstr_670__NRPRO_DATACLOS.val) - 1); cdat->dstr_670__NRPRO_DATACLOS.val[14] = (char) 0; cdat->dstr_670__NRPRO_DATACLOS.slen = 14; /*^iniobj */ /*iniobj dobj_671__NRPRO_DATACLOS*/ /*_.VALDATA___V829*/ meltfptr[828] = (melt_ptr_t) & cdat->dobj_671__NRPRO_DATACLOS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_671__NRPRO_DATACLOS", 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_671__NRPRO_DATACLOS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_671__NRPRO_DATACLOS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_671__NRPRO_DATACLOS.obj_num = 7; cdat->dobj_671__NRPRO_DATACLOS.obj_hash = 344767974; cdat->dobj_671__NRPRO_DATACLOS.obj_len = 4; /*inistring dstr_672__NRPRO_DATACLOS*/ /*_.VALSTR___V830*/ meltfptr[829] = (melt_ptr_t) & cdat->dstr_672__NRPRO_DATACLOS; cdat->dstr_672__NRPRO_DATACLOS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_672__NRPRO_DATACLOS.val, "NRPRO_DATACLOS", sizeof (cdat->dstr_672__NRPRO_DATACLOS.val) - 1); cdat->dstr_672__NRPRO_DATACLOS.val[14] = (char) 0; cdat->dstr_672__NRPRO_DATACLOS.slen = 14; /*iniobj dsym_673__NRPRO_THUNKLIST*/ /*uniqueobj*/ if (! /*_.VALDATA___V848*/ meltfptr[847]) /*_.VALDATA___V848*/ meltfptr[847] = (melt_ptr_t) & cdat->dsym_673__NRPRO_THUNKLIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_673__NRPRO_THUNKLIST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_673__NRPRO_THUNKLIST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_673__NRPRO_THUNKLIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_673__NRPRO_THUNKLIST.obj_hash = 363626861; cdat->dsym_673__NRPRO_THUNKLIST.obj_len = 3; /*inistring dstr_674__NRPRO_THUNKLIST*/ /*_.VALSTR___V849*/ meltfptr[848] = (melt_ptr_t) & cdat->dstr_674__NRPRO_THUNKLIST; cdat->dstr_674__NRPRO_THUNKLIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_674__NRPRO_THUNKLIST.val, "NRPRO_THUNKLIST", sizeof (cdat->dstr_674__NRPRO_THUNKLIST.val) - 1); cdat->dstr_674__NRPRO_THUNKLIST.val[15] = (char) 0; cdat->dstr_674__NRPRO_THUNKLIST.slen = 15; /*^iniobj */ /*iniobj dobj_675__NRPRO_THUNKLIST*/ /*_.VALDATA___V831*/ meltfptr[830] = (melt_ptr_t) & cdat->dobj_675__NRPRO_THUNKLIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_675__NRPRO_THUNKLIST", 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_675__NRPRO_THUNKLIST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_675__NRPRO_THUNKLIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_675__NRPRO_THUNKLIST.obj_num = 8; cdat->dobj_675__NRPRO_THUNKLIST.obj_hash = 449127088; cdat->dobj_675__NRPRO_THUNKLIST.obj_len = 4; /*inistring dstr_676__NRPRO_THUNKLIST*/ /*_.VALSTR___V832*/ meltfptr[831] = (melt_ptr_t) & cdat->dstr_676__NRPRO_THUNKLIST; cdat->dstr_676__NRPRO_THUNKLIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_676__NRPRO_THUNKLIST.val, "NRPRO_THUNKLIST", sizeof (cdat->dstr_676__NRPRO_THUNKLIST.val) - 1); cdat->dstr_676__NRPRO_THUNKLIST.val[15] = (char) 0; cdat->dstr_676__NRPRO_THUNKLIST.slen = 15; /*iniobj dsym_677__NRPRO_VARIADIC*/ /*uniqueobj*/ if (! /*_.VALDATA___V850*/ meltfptr[849]) /*_.VALDATA___V850*/ meltfptr[849] = (melt_ptr_t) & cdat->dsym_677__NRPRO_VARIADIC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_677__NRPRO_VARIADIC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_677__NRPRO_VARIADIC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_677__NRPRO_VARIADIC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_677__NRPRO_VARIADIC.obj_hash = 994586081; cdat->dsym_677__NRPRO_VARIADIC.obj_len = 3; /*inistring dstr_678__NRPRO_VARIADIC*/ /*_.VALSTR___V851*/ meltfptr[850] = (melt_ptr_t) & cdat->dstr_678__NRPRO_VARIADIC; cdat->dstr_678__NRPRO_VARIADIC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_678__NRPRO_VARIADIC.val, "NRPRO_VARIADIC", sizeof (cdat->dstr_678__NRPRO_VARIADIC.val) - 1); cdat->dstr_678__NRPRO_VARIADIC.val[14] = (char) 0; cdat->dstr_678__NRPRO_VARIADIC.slen = 14; /*^iniobj */ /*iniobj dobj_679__NRPRO_VARIADIC*/ /*_.VALDATA___V833*/ meltfptr[832] = (melt_ptr_t) & cdat->dobj_679__NRPRO_VARIADIC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_679__NRPRO_VARIADIC", 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_679__NRPRO_VARIADIC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_679__NRPRO_VARIADIC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_679__NRPRO_VARIADIC.obj_num = 9; cdat->dobj_679__NRPRO_VARIADIC.obj_hash = 360755265; cdat->dobj_679__NRPRO_VARIADIC.obj_len = 4; /*inistring dstr_680__NRPRO_VARIADIC*/ /*_.VALSTR___V834*/ meltfptr[833] = (melt_ptr_t) & cdat->dstr_680__NRPRO_VARIADIC; cdat->dstr_680__NRPRO_VARIADIC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_680__NRPRO_VARIADIC.val, "NRPRO_VARIADIC", sizeof (cdat->dstr_680__NRPRO_VARIADIC.val) - 1); cdat->dstr_680__NRPRO_VARIADIC.val[14] = (char) 0; cdat->dstr_680__NRPRO_VARIADIC.slen = 14; /*iniobj dsym_681__CLASS_NREP_LAMBDAROUTPROC*/ /*uniqueobj*/ if (! /*_.VALDATA___V852*/ meltfptr[851]) /*_.VALDATA___V852*/ meltfptr[851] = (melt_ptr_t) & cdat->dsym_681__CLASS_NREP_LAMBDAROUTPROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_681__CLASS_NREP_LAMBDAROUTPROC", melt_magic_discr ((melt_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__CLASS_NREP_LAMBDAROUTPROC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_681__CLASS_NREP_LAMBDAROUTPROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_681__CLASS_NREP_LAMBDAROUTPROC.obj_hash = 400147300; cdat->dsym_681__CLASS_NREP_LAMBDAROUTPROC.obj_len = 3; /*inistring dstr_682__CLASS_NREP_LAMBD*/ /*_.VALSTR___V853*/ meltfptr[852] = (melt_ptr_t) & cdat->dstr_682__CLASS_NREP_LAMBD; cdat->dstr_682__CLASS_NREP_LAMBD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_682__CLASS_NREP_LAMBD.val, "CLASS_NREP_LAMBDAROUTPROC", sizeof (cdat->dstr_682__CLASS_NREP_LAMBD. val) - 1); cdat->dstr_682__CLASS_NREP_LAMBD.val[25] = (char) 0; cdat->dstr_682__CLASS_NREP_LAMBD.slen = 25; MELT_LOCATION ("warmelt-normal.melt:483:/ iniobj"); /*iniobj dobj_683__CLASS_NREP_LAMBDAROUTPROC*/ /*_.VALDATA___V854*/ meltfptr[853] = (melt_ptr_t) & cdat->dobj_683__CLASS_NREP_LAMBDAROUTPROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_683__CLASS_NREP_LAMBDAROUTPROC", 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_683__CLASS_NREP_LAMBDAROUTPROC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_683__CLASS_NREP_LAMBDAROUTPROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_683__CLASS_NREP_LAMBDAROUTPROC.obj_num = MELTOBMAG_OBJECT; cdat->dobj_683__CLASS_NREP_LAMBDAROUTPROC.obj_hash = 1048894440; cdat->dobj_683__CLASS_NREP_LAMBDAROUTPROC.obj_len = 8; /*inistring dstr_684__CLASS_NREP_LAMBD*/ /*_.VALSTR___V855*/ meltfptr[854] = (melt_ptr_t) & cdat->dstr_684__CLASS_NREP_LAMBD; cdat->dstr_684__CLASS_NREP_LAMBD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_684__CLASS_NREP_LAMBD.val, "CLASS_NREP_LAMBDAROUTPROC", sizeof (cdat->dstr_684__CLASS_NREP_LAMBD. val) - 1); cdat->dstr_684__CLASS_NREP_LAMBD.val[25] = (char) 0; cdat->dstr_684__CLASS_NREP_LAMBD.slen = 25; /*inimult dtup_685__CLASS_NREP_LAMBDAROUTPROC */ /*_.VALTUP___V856*/ meltfptr[855] = (melt_ptr_t) & cdat->dtup_685__CLASS_NREP_LAMBDAROUTPROC; cdat->dtup_685__CLASS_NREP_LAMBDAROUTPROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_685__CLASS_NREP_LAMBDAROUTPROC.nbval = 4; /*inimult dtup_686__CLASS_NREP_LAMBDAROUTPROC */ /*_.VALTUP___V857*/ meltfptr[856] = (melt_ptr_t) & cdat->dtup_686__CLASS_NREP_LAMBDAROUTPROC; cdat->dtup_686__CLASS_NREP_LAMBDAROUTPROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_686__CLASS_NREP_LAMBDAROUTPROC.nbval = 10; /*iniobj dsym_687__CLASS_NREP_DEFUNROUTPROC*/ /*uniqueobj*/ if (! /*_.VALDATA___V858*/ meltfptr[857]) /*_.VALDATA___V858*/ meltfptr[857] = (melt_ptr_t) & cdat->dsym_687__CLASS_NREP_DEFUNROUTPROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_687__CLASS_NREP_DEFUNROUTPROC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_687__CLASS_NREP_DEFUNROUTPROC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_687__CLASS_NREP_DEFUNROUTPROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_687__CLASS_NREP_DEFUNROUTPROC.obj_hash = 84907065; cdat->dsym_687__CLASS_NREP_DEFUNROUTPROC.obj_len = 3; /*inistring dstr_688__CLASS_NREP_DEFUN*/ /*_.VALSTR___V859*/ meltfptr[858] = (melt_ptr_t) & cdat->dstr_688__CLASS_NREP_DEFUN; cdat->dstr_688__CLASS_NREP_DEFUN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_688__CLASS_NREP_DEFUN.val, "CLASS_NREP_DEFUNROUTPROC", sizeof (cdat->dstr_688__CLASS_NREP_DEFUN. val) - 1); cdat->dstr_688__CLASS_NREP_DEFUN.val[24] = (char) 0; cdat->dstr_688__CLASS_NREP_DEFUN.slen = 24; MELT_LOCATION ("warmelt-normal.melt:489:/ iniobj"); /*iniobj dobj_689__CLASS_NREP_DEFUNROUTPROC*/ /*_.VALDATA___V860*/ meltfptr[859] = (melt_ptr_t) & cdat->dobj_689__CLASS_NREP_DEFUNROUTPROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_689__CLASS_NREP_DEFUNROUTPROC", 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_689__CLASS_NREP_DEFUNROUTPROC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_689__CLASS_NREP_DEFUNROUTPROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_689__CLASS_NREP_DEFUNROUTPROC.obj_num = MELTOBMAG_OBJECT; cdat->dobj_689__CLASS_NREP_DEFUNROUTPROC.obj_hash = 549973568; cdat->dobj_689__CLASS_NREP_DEFUNROUTPROC.obj_len = 8; /*inistring dstr_690__CLASS_NREP_DEFUN*/ /*_.VALSTR___V861*/ meltfptr[860] = (melt_ptr_t) & cdat->dstr_690__CLASS_NREP_DEFUN; cdat->dstr_690__CLASS_NREP_DEFUN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_690__CLASS_NREP_DEFUN.val, "CLASS_NREP_DEFUNROUTPROC", sizeof (cdat->dstr_690__CLASS_NREP_DEFUN. val) - 1); cdat->dstr_690__CLASS_NREP_DEFUN.val[24] = (char) 0; cdat->dstr_690__CLASS_NREP_DEFUN.slen = 24; /*inimult dtup_691__CLASS_NREP_DEFUNROUTPROC */ /*_.VALTUP___V862*/ meltfptr[861] = (melt_ptr_t) & cdat->dtup_691__CLASS_NREP_DEFUNROUTPROC; cdat->dtup_691__CLASS_NREP_DEFUNROUTPROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_691__CLASS_NREP_DEFUNROUTPROC.nbval = 4; /*inimult dtup_692__CLASS_NREP_DEFUNROUTPROC */ /*_.VALTUP___V863*/ meltfptr[862] = (melt_ptr_t) & cdat->dtup_692__CLASS_NREP_DEFUNROUTPROC; cdat->dtup_692__CLASS_NREP_DEFUNROUTPROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_692__CLASS_NREP_DEFUNROUTPROC.nbval = 10; /*iniobj dsym_693__CLASS_NREP_PREDEF*/ /*uniqueobj*/ if (! /*_.VALDATA___V864*/ meltfptr[863]) /*_.VALDATA___V864*/ meltfptr[863] = (melt_ptr_t) & cdat->dsym_693__CLASS_NREP_PREDEF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_693__CLASS_NREP_PREDEF", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_693__CLASS_NREP_PREDEF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_693__CLASS_NREP_PREDEF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_693__CLASS_NREP_PREDEF.obj_hash = 422259469; cdat->dsym_693__CLASS_NREP_PREDEF.obj_len = 3; /*inistring dstr_694__CLASS_NREP_PREDE*/ /*_.VALSTR___V865*/ meltfptr[864] = (melt_ptr_t) & cdat->dstr_694__CLASS_NREP_PREDE; cdat->dstr_694__CLASS_NREP_PREDE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_694__CLASS_NREP_PREDE.val, "CLASS_NREP_PREDEF", sizeof (cdat->dstr_694__CLASS_NREP_PREDE. val) - 1); cdat->dstr_694__CLASS_NREP_PREDE.val[17] = (char) 0; cdat->dstr_694__CLASS_NREP_PREDE.slen = 17; MELT_LOCATION ("warmelt-normal.melt:497:/ iniobj"); /*iniobj dobj_695__CLASS_NREP_PREDEF*/ /*_.VALDATA___V866*/ meltfptr[865] = (melt_ptr_t) & cdat->dobj_695__CLASS_NREP_PREDEF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_695__CLASS_NREP_PREDEF", 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_695__CLASS_NREP_PREDEF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_695__CLASS_NREP_PREDEF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_695__CLASS_NREP_PREDEF.obj_num = MELTOBMAG_OBJECT; cdat->dobj_695__CLASS_NREP_PREDEF.obj_hash = 1015220033; cdat->dobj_695__CLASS_NREP_PREDEF.obj_len = 8; /*inistring dstr_696__CLASS_NREP_PREDE*/ /*_.VALSTR___V867*/ meltfptr[866] = (melt_ptr_t) & cdat->dstr_696__CLASS_NREP_PREDE; cdat->dstr_696__CLASS_NREP_PREDE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_696__CLASS_NREP_PREDE.val, "CLASS_NREP_PREDEF", sizeof (cdat->dstr_696__CLASS_NREP_PREDE. val) - 1); cdat->dstr_696__CLASS_NREP_PREDE.val[17] = (char) 0; cdat->dstr_696__CLASS_NREP_PREDE.slen = 17; /*inimult dtup_697__CLASS_NREP_PREDEF */ /*_.VALTUP___V868*/ meltfptr[867] = (melt_ptr_t) & cdat->dtup_697__CLASS_NREP_PREDEF; cdat->dtup_697__CLASS_NREP_PREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_697__CLASS_NREP_PREDEF.nbval = 3; /*inimult dtup_698__CLASS_NREP_PREDEF */ /*_.VALTUP___V871*/ meltfptr[870] = (melt_ptr_t) & cdat->dtup_698__CLASS_NREP_PREDEF; cdat->dtup_698__CLASS_NREP_PREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_698__CLASS_NREP_PREDEF.nbval = 2; /*iniobj dsym_699__NRPREDEF*/ /*uniqueobj*/ if (! /*_.VALDATA___V872*/ meltfptr[871]) /*_.VALDATA___V872*/ meltfptr[871] = (melt_ptr_t) & cdat->dsym_699__NRPREDEF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_699__NRPREDEF", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_699__NRPREDEF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_699__NRPREDEF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_699__NRPREDEF.obj_hash = 503066626; cdat->dsym_699__NRPREDEF.obj_len = 3; /*inistring dstr_700__NRPREDEF*/ /*_.VALSTR___V873*/ meltfptr[872] = (melt_ptr_t) & cdat->dstr_700__NRPREDEF; cdat->dstr_700__NRPREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_700__NRPREDEF.val, "NRPREDEF", sizeof (cdat->dstr_700__NRPREDEF.val) - 1); cdat->dstr_700__NRPREDEF.val[8] = (char) 0; cdat->dstr_700__NRPREDEF.slen = 8; /*^iniobj */ /*iniobj dobj_701__NRPREDEF*/ /*_.VALDATA___V869*/ meltfptr[868] = (melt_ptr_t) & cdat->dobj_701__NRPREDEF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_701__NRPREDEF", 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_701__NRPREDEF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_701__NRPREDEF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_701__NRPREDEF.obj_num = 1; cdat->dobj_701__NRPREDEF.obj_hash = 491286486; cdat->dobj_701__NRPREDEF.obj_len = 4; /*inistring dstr_702__NRPREDEF*/ /*_.VALSTR___V870*/ meltfptr[869] = (melt_ptr_t) & cdat->dstr_702__NRPREDEF; cdat->dstr_702__NRPREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_702__NRPREDEF.val, "NRPREDEF", sizeof (cdat->dstr_702__NRPREDEF.val) - 1); cdat->dstr_702__NRPREDEF.val[8] = (char) 0; cdat->dstr_702__NRPREDEF.slen = 8; /*iniobj dsym_703__CLASS_NREP_NIL*/ /*uniqueobj*/ if (! /*_.VALDATA___V874*/ meltfptr[873]) /*_.VALDATA___V874*/ meltfptr[873] = (melt_ptr_t) & cdat->dsym_703__CLASS_NREP_NIL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_703__CLASS_NREP_NIL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_703__CLASS_NREP_NIL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_703__CLASS_NREP_NIL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_703__CLASS_NREP_NIL.obj_hash = 607452589; cdat->dsym_703__CLASS_NREP_NIL.obj_len = 3; /*inistring dstr_704__CLASS_NREP_NIL*/ /*_.VALSTR___V875*/ meltfptr[874] = (melt_ptr_t) & cdat->dstr_704__CLASS_NREP_NIL; cdat->dstr_704__CLASS_NREP_NIL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_704__CLASS_NREP_NIL.val, "CLASS_NREP_NIL", sizeof (cdat->dstr_704__CLASS_NREP_NIL.val) - 1); cdat->dstr_704__CLASS_NREP_NIL.val[14] = (char) 0; cdat->dstr_704__CLASS_NREP_NIL.slen = 14; MELT_LOCATION ("warmelt-normal.melt:506:/ iniobj"); /*iniobj dobj_705__CLASS_NREP_NIL*/ /*_.VALDATA___V876*/ meltfptr[875] = (melt_ptr_t) & cdat->dobj_705__CLASS_NREP_NIL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_705__CLASS_NREP_NIL", 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_705__CLASS_NREP_NIL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_705__CLASS_NREP_NIL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_705__CLASS_NREP_NIL.obj_num = MELTOBMAG_OBJECT; cdat->dobj_705__CLASS_NREP_NIL.obj_hash = 1025633410; cdat->dobj_705__CLASS_NREP_NIL.obj_len = 8; /*inistring dstr_706__CLASS_NREP_NIL*/ /*_.VALSTR___V877*/ meltfptr[876] = (melt_ptr_t) & cdat->dstr_706__CLASS_NREP_NIL; cdat->dstr_706__CLASS_NREP_NIL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_706__CLASS_NREP_NIL.val, "CLASS_NREP_NIL", sizeof (cdat->dstr_706__CLASS_NREP_NIL.val) - 1); cdat->dstr_706__CLASS_NREP_NIL.val[14] = (char) 0; cdat->dstr_706__CLASS_NREP_NIL.slen = 14; /*inimult dtup_707__CLASS_NREP_NIL */ /*_.VALTUP___V878*/ meltfptr[877] = (melt_ptr_t) & cdat->dtup_707__CLASS_NREP_NIL; cdat->dtup_707__CLASS_NREP_NIL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_707__CLASS_NREP_NIL.nbval = 3; /*inimult dtup_708__CLASS_NREP_NIL */ /*_.VALTUP___V879*/ meltfptr[878] = (melt_ptr_t) & cdat->dtup_708__CLASS_NREP_NIL; cdat->dtup_708__CLASS_NREP_NIL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_708__CLASS_NREP_NIL.nbval = 1; /*iniobj dsym_709__CLASS_NREP_QUASIDATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V880*/ meltfptr[879]) /*_.VALDATA___V880*/ meltfptr[879] = (melt_ptr_t) & cdat->dsym_709__CLASS_NREP_QUASIDATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_709__CLASS_NREP_QUASIDATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_709__CLASS_NREP_QUASIDATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_709__CLASS_NREP_QUASIDATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_709__CLASS_NREP_QUASIDATA.obj_hash = 752535427; cdat->dsym_709__CLASS_NREP_QUASIDATA.obj_len = 3; /*inistring dstr_710__CLASS_NREP_QUASI*/ /*_.VALSTR___V881*/ meltfptr[880] = (melt_ptr_t) & cdat->dstr_710__CLASS_NREP_QUASI; cdat->dstr_710__CLASS_NREP_QUASI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_710__CLASS_NREP_QUASI.val, "CLASS_NREP_QUASIDATA", sizeof (cdat->dstr_710__CLASS_NREP_QUASI. val) - 1); cdat->dstr_710__CLASS_NREP_QUASI.val[20] = (char) 0; cdat->dstr_710__CLASS_NREP_QUASI.slen = 20; MELT_LOCATION ("warmelt-normal.melt:517:/ iniobj"); /*iniobj dobj_711__CLASS_NREP_QUASIDATA*/ /*_.VALDATA___V882*/ meltfptr[881] = (melt_ptr_t) & cdat->dobj_711__CLASS_NREP_QUASIDATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_711__CLASS_NREP_QUASIDATA", 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_711__CLASS_NREP_QUASIDATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_711__CLASS_NREP_QUASIDATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_711__CLASS_NREP_QUASIDATA.obj_num = MELTOBMAG_OBJECT; cdat->dobj_711__CLASS_NREP_QUASIDATA.obj_hash = 630619262; cdat->dobj_711__CLASS_NREP_QUASIDATA.obj_len = 8; /*inistring dstr_712__CLASS_NREP_QUASI*/ /*_.VALSTR___V883*/ meltfptr[882] = (melt_ptr_t) & cdat->dstr_712__CLASS_NREP_QUASI; cdat->dstr_712__CLASS_NREP_QUASI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_712__CLASS_NREP_QUASI.val, "CLASS_NREP_QUASIDATA", sizeof (cdat->dstr_712__CLASS_NREP_QUASI. val) - 1); cdat->dstr_712__CLASS_NREP_QUASI.val[20] = (char) 0; cdat->dstr_712__CLASS_NREP_QUASI.slen = 20; /*inimult dtup_713__CLASS_NREP_QUASIDATA */ /*_.VALTUP___V884*/ meltfptr[883] = (melt_ptr_t) & cdat->dtup_713__CLASS_NREP_QUASIDATA; cdat->dtup_713__CLASS_NREP_QUASIDATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_713__CLASS_NREP_QUASIDATA.nbval = 2; /*inimult dtup_714__CLASS_NREP_QUASIDATA */ /*_.VALTUP___V885*/ meltfptr[884] = (melt_ptr_t) & cdat->dtup_714__CLASS_NREP_QUASIDATA; cdat->dtup_714__CLASS_NREP_QUASIDATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_714__CLASS_NREP_QUASIDATA.nbval = 1; /*iniobj dsym_715__CLASS_NREP_BOUND_DATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V886*/ meltfptr[885]) /*_.VALDATA___V886*/ meltfptr[885] = (melt_ptr_t) & cdat->dsym_715__CLASS_NREP_BOUND_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_715__CLASS_NREP_BOUND_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_715__CLASS_NREP_BOUND_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_715__CLASS_NREP_BOUND_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_715__CLASS_NREP_BOUND_DATA.obj_hash = 580314803; cdat->dsym_715__CLASS_NREP_BOUND_DATA.obj_len = 3; /*inistring dstr_716__CLASS_NREP_BOUND*/ /*_.VALSTR___V887*/ meltfptr[886] = (melt_ptr_t) & cdat->dstr_716__CLASS_NREP_BOUND; cdat->dstr_716__CLASS_NREP_BOUND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_716__CLASS_NREP_BOUND.val, "CLASS_NREP_BOUND_DATA", sizeof (cdat->dstr_716__CLASS_NREP_BOUND. val) - 1); cdat->dstr_716__CLASS_NREP_BOUND.val[21] = (char) 0; cdat->dstr_716__CLASS_NREP_BOUND.slen = 21; MELT_LOCATION ("warmelt-normal.melt:524:/ iniobj"); /*iniobj dobj_717__CLASS_NREP_BOUND_DATA*/ /*_.VALDATA___V888*/ meltfptr[887] = (melt_ptr_t) & cdat->dobj_717__CLASS_NREP_BOUND_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_717__CLASS_NREP_BOUND_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_717__CLASS_NREP_BOUND_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_717__CLASS_NREP_BOUND_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_717__CLASS_NREP_BOUND_DATA.obj_num = MELTOBMAG_OBJECT; cdat->dobj_717__CLASS_NREP_BOUND_DATA.obj_hash = 967438133; cdat->dobj_717__CLASS_NREP_BOUND_DATA.obj_len = 8; /*inistring dstr_718__CLASS_NREP_BOUND*/ /*_.VALSTR___V889*/ meltfptr[888] = (melt_ptr_t) & cdat->dstr_718__CLASS_NREP_BOUND; cdat->dstr_718__CLASS_NREP_BOUND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_718__CLASS_NREP_BOUND.val, "CLASS_NREP_BOUND_DATA", sizeof (cdat->dstr_718__CLASS_NREP_BOUND. val) - 1); cdat->dstr_718__CLASS_NREP_BOUND.val[21] = (char) 0; cdat->dstr_718__CLASS_NREP_BOUND.slen = 21; /*inimult dtup_719__CLASS_NREP_BOUND_DATA */ /*_.VALTUP___V890*/ meltfptr[889] = (melt_ptr_t) & cdat->dtup_719__CLASS_NREP_BOUND_DATA; cdat->dtup_719__CLASS_NREP_BOUND_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_719__CLASS_NREP_BOUND_DATA.nbval = 3; /*inimult dtup_720__CLASS_NREP_BOUND_DATA */ /*_.VALTUP___V897*/ meltfptr[896] = (melt_ptr_t) & cdat->dtup_720__CLASS_NREP_BOUND_DATA; cdat->dtup_720__CLASS_NREP_BOUND_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_720__CLASS_NREP_BOUND_DATA.nbval = 4; /*iniobj dsym_721__NDATA_NAME*/ /*uniqueobj*/ if (! /*_.VALDATA___V898*/ meltfptr[897]) /*_.VALDATA___V898*/ meltfptr[897] = (melt_ptr_t) & cdat->dsym_721__NDATA_NAME; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_721__NDATA_NAME", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_721__NDATA_NAME", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_721__NDATA_NAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_721__NDATA_NAME.obj_hash = 310715668; cdat->dsym_721__NDATA_NAME.obj_len = 3; /*inistring dstr_722__NDATA_NAME*/ /*_.VALSTR___V899*/ meltfptr[898] = (melt_ptr_t) & cdat->dstr_722__NDATA_NAME; cdat->dstr_722__NDATA_NAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_722__NDATA_NAME.val, "NDATA_NAME", sizeof (cdat->dstr_722__NDATA_NAME.val) - 1); cdat->dstr_722__NDATA_NAME.val[10] = (char) 0; cdat->dstr_722__NDATA_NAME.slen = 10; /*^iniobj */ /*iniobj dobj_723__NDATA_NAME*/ /*_.VALDATA___V891*/ meltfptr[890] = (melt_ptr_t) & cdat->dobj_723__NDATA_NAME; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_723__NDATA_NAME", 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_723__NDATA_NAME", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_723__NDATA_NAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_723__NDATA_NAME.obj_num = 1; cdat->dobj_723__NDATA_NAME.obj_hash = 91516094; cdat->dobj_723__NDATA_NAME.obj_len = 4; /*inistring dstr_724__NDATA_NAME*/ /*_.VALSTR___V892*/ meltfptr[891] = (melt_ptr_t) & cdat->dstr_724__NDATA_NAME; cdat->dstr_724__NDATA_NAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_724__NDATA_NAME.val, "NDATA_NAME", sizeof (cdat->dstr_724__NDATA_NAME.val) - 1); cdat->dstr_724__NDATA_NAME.val[10] = (char) 0; cdat->dstr_724__NDATA_NAME.slen = 10; /*iniobj dsym_725__NDATA_RANK*/ /*uniqueobj*/ if (! /*_.VALDATA___V900*/ meltfptr[899]) /*_.VALDATA___V900*/ meltfptr[899] = (melt_ptr_t) & cdat->dsym_725__NDATA_RANK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_725__NDATA_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_725__NDATA_RANK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_725__NDATA_RANK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_725__NDATA_RANK.obj_hash = 941446399; cdat->dsym_725__NDATA_RANK.obj_len = 3; /*inistring dstr_726__NDATA_RANK*/ /*_.VALSTR___V901*/ meltfptr[900] = (melt_ptr_t) & cdat->dstr_726__NDATA_RANK; cdat->dstr_726__NDATA_RANK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_726__NDATA_RANK.val, "NDATA_RANK", sizeof (cdat->dstr_726__NDATA_RANK.val) - 1); cdat->dstr_726__NDATA_RANK.val[10] = (char) 0; cdat->dstr_726__NDATA_RANK.slen = 10; /*^iniobj */ /*iniobj dobj_727__NDATA_RANK*/ /*_.VALDATA___V893*/ meltfptr[892] = (melt_ptr_t) & cdat->dobj_727__NDATA_RANK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_727__NDATA_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_727__NDATA_RANK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_727__NDATA_RANK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_727__NDATA_RANK.obj_num = 2; cdat->dobj_727__NDATA_RANK.obj_hash = 566283687; cdat->dobj_727__NDATA_RANK.obj_len = 4; /*inistring dstr_728__NDATA_RANK*/ /*_.VALSTR___V894*/ meltfptr[893] = (melt_ptr_t) & cdat->dstr_728__NDATA_RANK; cdat->dstr_728__NDATA_RANK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_728__NDATA_RANK.val, "NDATA_RANK", sizeof (cdat->dstr_728__NDATA_RANK.val) - 1); cdat->dstr_728__NDATA_RANK.val[10] = (char) 0; cdat->dstr_728__NDATA_RANK.slen = 10; /*iniobj dsym_729__NDATA_LOCBIND*/ /*uniqueobj*/ if (! /*_.VALDATA___V902*/ meltfptr[901]) /*_.VALDATA___V902*/ meltfptr[901] = (melt_ptr_t) & cdat->dsym_729__NDATA_LOCBIND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_729__NDATA_LOCBIND", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_729__NDATA_LOCBIND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_729__NDATA_LOCBIND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_729__NDATA_LOCBIND.obj_hash = 221454573; cdat->dsym_729__NDATA_LOCBIND.obj_len = 3; /*inistring dstr_730__NDATA_LOCBIND*/ /*_.VALSTR___V903*/ meltfptr[902] = (melt_ptr_t) & cdat->dstr_730__NDATA_LOCBIND; cdat->dstr_730__NDATA_LOCBIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_730__NDATA_LOCBIND.val, "NDATA_LOCBIND", sizeof (cdat->dstr_730__NDATA_LOCBIND.val) - 1); cdat->dstr_730__NDATA_LOCBIND.val[13] = (char) 0; cdat->dstr_730__NDATA_LOCBIND.slen = 13; /*^iniobj */ /*iniobj dobj_731__NDATA_LOCBIND*/ /*_.VALDATA___V895*/ meltfptr[894] = (melt_ptr_t) & cdat->dobj_731__NDATA_LOCBIND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_731__NDATA_LOCBIND", 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_731__NDATA_LOCBIND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_731__NDATA_LOCBIND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_731__NDATA_LOCBIND.obj_num = 3; cdat->dobj_731__NDATA_LOCBIND.obj_hash = 21443501; cdat->dobj_731__NDATA_LOCBIND.obj_len = 4; /*inistring dstr_732__NDATA_LOCBIND*/ /*_.VALSTR___V896*/ meltfptr[895] = (melt_ptr_t) & cdat->dstr_732__NDATA_LOCBIND; cdat->dstr_732__NDATA_LOCBIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_732__NDATA_LOCBIND.val, "NDATA_LOCBIND", sizeof (cdat->dstr_732__NDATA_LOCBIND.val) - 1); cdat->dstr_732__NDATA_LOCBIND.val[13] = (char) 0; cdat->dstr_732__NDATA_LOCBIND.slen = 13; /*iniobj dsym_733__CLASS_NREP_DISCRIMINATED_DATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V904*/ meltfptr[903]) /*_.VALDATA___V904*/ meltfptr[903] = (melt_ptr_t) & cdat->dsym_733__CLASS_NREP_DISCRIMINATED_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_733__CLASS_NREP_DISCRIMINATED_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_733__CLASS_NREP_DISCRIMINATED_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_733__CLASS_NREP_DISCRIMINATED_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_733__CLASS_NREP_DISCRIMINATED_DATA.obj_hash = 275239; cdat->dsym_733__CLASS_NREP_DISCRIMINATED_DATA.obj_len = 3; /*inistring dstr_734__CLASS_NREP_DISCR*/ /*_.VALSTR___V905*/ meltfptr[904] = (melt_ptr_t) & cdat->dstr_734__CLASS_NREP_DISCR; cdat->dstr_734__CLASS_NREP_DISCR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_734__CLASS_NREP_DISCR.val, "CLASS_NREP_DISCRIMINATED_DATA", sizeof (cdat->dstr_734__CLASS_NREP_DISCR. val) - 1); cdat->dstr_734__CLASS_NREP_DISCR.val[29] = (char) 0; cdat->dstr_734__CLASS_NREP_DISCR.slen = 29; MELT_LOCATION ("warmelt-normal.melt:538:/ iniobj"); /*iniobj dobj_735__CLASS_NREP_DISCRIMINATED_DATA*/ /*_.VALDATA___V906*/ meltfptr[905] = (melt_ptr_t) & cdat->dobj_735__CLASS_NREP_DISCRIMINATED_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_735__CLASS_NREP_DISCRIMINATED_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_735__CLASS_NREP_DISCRIMINATED_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_735__CLASS_NREP_DISCRIMINATED_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_735__CLASS_NREP_DISCRIMINATED_DATA.obj_num = MELTOBMAG_OBJECT; cdat->dobj_735__CLASS_NREP_DISCRIMINATED_DATA.obj_hash = 791972503; cdat->dobj_735__CLASS_NREP_DISCRIMINATED_DATA.obj_len = 8; /*inistring dstr_736__CLASS_NREP_DISCR*/ /*_.VALSTR___V907*/ meltfptr[906] = (melt_ptr_t) & cdat->dstr_736__CLASS_NREP_DISCR; cdat->dstr_736__CLASS_NREP_DISCR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_736__CLASS_NREP_DISCR.val, "CLASS_NREP_DISCRIMINATED_DATA", sizeof (cdat->dstr_736__CLASS_NREP_DISCR. val) - 1); cdat->dstr_736__CLASS_NREP_DISCR.val[29] = (char) 0; cdat->dstr_736__CLASS_NREP_DISCR.slen = 29; /*inimult dtup_737__CLASS_NREP_DISCRIMINATED_DATA */ /*_.VALTUP___V908*/ meltfptr[907] = (melt_ptr_t) & cdat->dtup_737__CLASS_NREP_DISCRIMINATED_DATA; cdat->dtup_737__CLASS_NREP_DISCRIMINATED_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_737__CLASS_NREP_DISCRIMINATED_DATA.nbval = 4; /*inimult dtup_738__CLASS_NREP_DISCRIMINATED_DATA */ /*_.VALTUP___V911*/ meltfptr[910] = (melt_ptr_t) & cdat->dtup_738__CLASS_NREP_DISCRIMINATED_DATA; cdat->dtup_738__CLASS_NREP_DISCRIMINATED_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_738__CLASS_NREP_DISCRIMINATED_DATA.nbval = 5; /*iniobj dsym_739__NDATA_DISCRX*/ /*uniqueobj*/ if (! /*_.VALDATA___V912*/ meltfptr[911]) /*_.VALDATA___V912*/ meltfptr[911] = (melt_ptr_t) & cdat->dsym_739__NDATA_DISCRX; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_739__NDATA_DISCRX", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_739__NDATA_DISCRX", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_739__NDATA_DISCRX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_739__NDATA_DISCRX.obj_hash = 573180223; cdat->dsym_739__NDATA_DISCRX.obj_len = 3; /*inistring dstr_740__NDATA_DISCRX*/ /*_.VALSTR___V913*/ meltfptr[912] = (melt_ptr_t) & cdat->dstr_740__NDATA_DISCRX; cdat->dstr_740__NDATA_DISCRX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_740__NDATA_DISCRX.val, "NDATA_DISCRX", sizeof (cdat->dstr_740__NDATA_DISCRX.val) - 1); cdat->dstr_740__NDATA_DISCRX.val[12] = (char) 0; cdat->dstr_740__NDATA_DISCRX.slen = 12; /*^iniobj */ /*iniobj dobj_741__NDATA_DISCRX*/ /*_.VALDATA___V909*/ meltfptr[908] = (melt_ptr_t) & cdat->dobj_741__NDATA_DISCRX; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_741__NDATA_DISCRX", 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_741__NDATA_DISCRX", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_741__NDATA_DISCRX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_741__NDATA_DISCRX.obj_num = 4; cdat->dobj_741__NDATA_DISCRX.obj_hash = 602654362; cdat->dobj_741__NDATA_DISCRX.obj_len = 4; /*inistring dstr_742__NDATA_DISCRX*/ /*_.VALSTR___V910*/ meltfptr[909] = (melt_ptr_t) & cdat->dstr_742__NDATA_DISCRX; cdat->dstr_742__NDATA_DISCRX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_742__NDATA_DISCRX.val, "NDATA_DISCRX", sizeof (cdat->dstr_742__NDATA_DISCRX.val) - 1); cdat->dstr_742__NDATA_DISCRX.val[12] = (char) 0; cdat->dstr_742__NDATA_DISCRX.slen = 12; /*iniobj dsym_743__CLASS_NREP_DATAINSTANCE*/ /*uniqueobj*/ if (! /*_.VALDATA___V914*/ meltfptr[913]) /*_.VALDATA___V914*/ meltfptr[913] = (melt_ptr_t) & cdat->dsym_743__CLASS_NREP_DATAINSTANCE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_743__CLASS_NREP_DATAINSTANCE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_743__CLASS_NREP_DATAINSTANCE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_743__CLASS_NREP_DATAINSTANCE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_743__CLASS_NREP_DATAINSTANCE.obj_hash = 475932459; cdat->dsym_743__CLASS_NREP_DATAINSTANCE.obj_len = 3; /*inistring dstr_744__CLASS_NREP_DATAI*/ /*_.VALSTR___V915*/ meltfptr[914] = (melt_ptr_t) & cdat->dstr_744__CLASS_NREP_DATAI; cdat->dstr_744__CLASS_NREP_DATAI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_744__CLASS_NREP_DATAI.val, "CLASS_NREP_DATAINSTANCE", sizeof (cdat->dstr_744__CLASS_NREP_DATAI. val) - 1); cdat->dstr_744__CLASS_NREP_DATAI.val[23] = (char) 0; cdat->dstr_744__CLASS_NREP_DATAI.slen = 23; MELT_LOCATION ("warmelt-normal.melt:547:/ iniobj"); /*iniobj dobj_745__CLASS_NREP_DATAINSTANCE*/ /*_.VALDATA___V916*/ meltfptr[915] = (melt_ptr_t) & cdat->dobj_745__CLASS_NREP_DATAINSTANCE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_745__CLASS_NREP_DATAINSTANCE", 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_745__CLASS_NREP_DATAINSTANCE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_745__CLASS_NREP_DATAINSTANCE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_745__CLASS_NREP_DATAINSTANCE.obj_num = MELTOBMAG_OBJECT; cdat->dobj_745__CLASS_NREP_DATAINSTANCE.obj_hash = 252936330; cdat->dobj_745__CLASS_NREP_DATAINSTANCE.obj_len = 8; /*inistring dstr_746__CLASS_NREP_DATAI*/ /*_.VALSTR___V917*/ meltfptr[916] = (melt_ptr_t) & cdat->dstr_746__CLASS_NREP_DATAI; cdat->dstr_746__CLASS_NREP_DATAI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_746__CLASS_NREP_DATAI.val, "CLASS_NREP_DATAINSTANCE", sizeof (cdat->dstr_746__CLASS_NREP_DATAI. val) - 1); cdat->dstr_746__CLASS_NREP_DATAI.val[23] = (char) 0; cdat->dstr_746__CLASS_NREP_DATAI.slen = 23; /*inimult dtup_747__CLASS_NREP_DATAINSTANCE */ /*_.VALTUP___V918*/ meltfptr[917] = (melt_ptr_t) & cdat->dtup_747__CLASS_NREP_DATAINSTANCE; cdat->dtup_747__CLASS_NREP_DATAINSTANCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_747__CLASS_NREP_DATAINSTANCE.nbval = 5; /*inimult dtup_748__CLASS_NREP_DATAINSTANCE */ /*_.VALTUP___V927*/ meltfptr[926] = (melt_ptr_t) & cdat->dtup_748__CLASS_NREP_DATAINSTANCE; cdat->dtup_748__CLASS_NREP_DATAINSTANCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_748__CLASS_NREP_DATAINSTANCE.nbval = 9; /*iniobj dsym_749__NINST_OBJNUM*/ /*uniqueobj*/ if (! /*_.VALDATA___V928*/ meltfptr[927]) /*_.VALDATA___V928*/ meltfptr[927] = (melt_ptr_t) & cdat->dsym_749__NINST_OBJNUM; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_749__NINST_OBJNUM", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_749__NINST_OBJNUM", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_749__NINST_OBJNUM.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_749__NINST_OBJNUM.obj_hash = 387715935; cdat->dsym_749__NINST_OBJNUM.obj_len = 3; /*inistring dstr_750__NINST_OBJNUM*/ /*_.VALSTR___V929*/ meltfptr[928] = (melt_ptr_t) & cdat->dstr_750__NINST_OBJNUM; cdat->dstr_750__NINST_OBJNUM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_750__NINST_OBJNUM.val, "NINST_OBJNUM", sizeof (cdat->dstr_750__NINST_OBJNUM.val) - 1); cdat->dstr_750__NINST_OBJNUM.val[12] = (char) 0; cdat->dstr_750__NINST_OBJNUM.slen = 12; /*^iniobj */ /*iniobj dobj_751__NINST_OBJNUM*/ /*_.VALDATA___V919*/ meltfptr[918] = (melt_ptr_t) & cdat->dobj_751__NINST_OBJNUM; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_751__NINST_OBJNUM", 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_751__NINST_OBJNUM", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_751__NINST_OBJNUM.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_751__NINST_OBJNUM.obj_num = 5; cdat->dobj_751__NINST_OBJNUM.obj_hash = 661911652; cdat->dobj_751__NINST_OBJNUM.obj_len = 4; /*inistring dstr_752__NINST_OBJNUM*/ /*_.VALSTR___V920*/ meltfptr[919] = (melt_ptr_t) & cdat->dstr_752__NINST_OBJNUM; cdat->dstr_752__NINST_OBJNUM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_752__NINST_OBJNUM.val, "NINST_OBJNUM", sizeof (cdat->dstr_752__NINST_OBJNUM.val) - 1); cdat->dstr_752__NINST_OBJNUM.val[12] = (char) 0; cdat->dstr_752__NINST_OBJNUM.slen = 12; /*iniobj dsym_753__NINST_PREDEF*/ /*uniqueobj*/ if (! /*_.VALDATA___V930*/ meltfptr[929]) /*_.VALDATA___V930*/ meltfptr[929] = (melt_ptr_t) & cdat->dsym_753__NINST_PREDEF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_753__NINST_PREDEF", melt_magic_discr ((melt_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__NINST_PREDEF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_753__NINST_PREDEF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_753__NINST_PREDEF.obj_hash = 160057821; cdat->dsym_753__NINST_PREDEF.obj_len = 3; /*inistring dstr_754__NINST_PREDEF*/ /*_.VALSTR___V931*/ meltfptr[930] = (melt_ptr_t) & cdat->dstr_754__NINST_PREDEF; cdat->dstr_754__NINST_PREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_754__NINST_PREDEF.val, "NINST_PREDEF", sizeof (cdat->dstr_754__NINST_PREDEF.val) - 1); cdat->dstr_754__NINST_PREDEF.val[12] = (char) 0; cdat->dstr_754__NINST_PREDEF.slen = 12; /*^iniobj */ /*iniobj dobj_755__NINST_PREDEF*/ /*_.VALDATA___V921*/ meltfptr[920] = (melt_ptr_t) & cdat->dobj_755__NINST_PREDEF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_755__NINST_PREDEF", 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__NINST_PREDEF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_755__NINST_PREDEF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_755__NINST_PREDEF.obj_num = 6; cdat->dobj_755__NINST_PREDEF.obj_hash = 1061987042; cdat->dobj_755__NINST_PREDEF.obj_len = 4; /*inistring dstr_756__NINST_PREDEF*/ /*_.VALSTR___V922*/ meltfptr[921] = (melt_ptr_t) & cdat->dstr_756__NINST_PREDEF; cdat->dstr_756__NINST_PREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_756__NINST_PREDEF.val, "NINST_PREDEF", sizeof (cdat->dstr_756__NINST_PREDEF.val) - 1); cdat->dstr_756__NINST_PREDEF.val[12] = (char) 0; cdat->dstr_756__NINST_PREDEF.slen = 12; /*iniobj dsym_757__NINST_HASH*/ /*uniqueobj*/ if (! /*_.VALDATA___V932*/ meltfptr[931]) /*_.VALDATA___V932*/ meltfptr[931] = (melt_ptr_t) & cdat->dsym_757__NINST_HASH; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_757__NINST_HASH", melt_magic_discr ((melt_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__NINST_HASH", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_757__NINST_HASH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_757__NINST_HASH.obj_hash = 973148096; cdat->dsym_757__NINST_HASH.obj_len = 3; /*inistring dstr_758__NINST_HASH*/ /*_.VALSTR___V933*/ meltfptr[932] = (melt_ptr_t) & cdat->dstr_758__NINST_HASH; cdat->dstr_758__NINST_HASH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_758__NINST_HASH.val, "NINST_HASH", sizeof (cdat->dstr_758__NINST_HASH.val) - 1); cdat->dstr_758__NINST_HASH.val[10] = (char) 0; cdat->dstr_758__NINST_HASH.slen = 10; /*^iniobj */ /*iniobj dobj_759__NINST_HASH*/ /*_.VALDATA___V923*/ meltfptr[922] = (melt_ptr_t) & cdat->dobj_759__NINST_HASH; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_759__NINST_HASH", 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__NINST_HASH", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_759__NINST_HASH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_759__NINST_HASH.obj_num = 7; cdat->dobj_759__NINST_HASH.obj_hash = 900203277; cdat->dobj_759__NINST_HASH.obj_len = 4; /*inistring dstr_760__NINST_HASH*/ /*_.VALSTR___V924*/ meltfptr[923] = (melt_ptr_t) & cdat->dstr_760__NINST_HASH; cdat->dstr_760__NINST_HASH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_760__NINST_HASH.val, "NINST_HASH", sizeof (cdat->dstr_760__NINST_HASH.val) - 1); cdat->dstr_760__NINST_HASH.val[10] = (char) 0; cdat->dstr_760__NINST_HASH.slen = 10; /*iniobj dsym_761__NINST_SLOTS*/ /*uniqueobj*/ if (! /*_.VALDATA___V934*/ meltfptr[933]) /*_.VALDATA___V934*/ meltfptr[933] = (melt_ptr_t) & cdat->dsym_761__NINST_SLOTS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_761__NINST_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_761__NINST_SLOTS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_761__NINST_SLOTS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_761__NINST_SLOTS.obj_hash = 679600969; cdat->dsym_761__NINST_SLOTS.obj_len = 3; /*inistring dstr_762__NINST_SLOTS*/ /*_.VALSTR___V935*/ meltfptr[934] = (melt_ptr_t) & cdat->dstr_762__NINST_SLOTS; cdat->dstr_762__NINST_SLOTS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_762__NINST_SLOTS.val, "NINST_SLOTS", sizeof (cdat->dstr_762__NINST_SLOTS.val) - 1); cdat->dstr_762__NINST_SLOTS.val[11] = (char) 0; cdat->dstr_762__NINST_SLOTS.slen = 11; /*^iniobj */ /*iniobj dobj_763__NINST_SLOTS*/ /*_.VALDATA___V925*/ meltfptr[924] = (melt_ptr_t) & cdat->dobj_763__NINST_SLOTS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_763__NINST_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_763__NINST_SLOTS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_763__NINST_SLOTS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_763__NINST_SLOTS.obj_num = 8; cdat->dobj_763__NINST_SLOTS.obj_hash = 440361699; cdat->dobj_763__NINST_SLOTS.obj_len = 4; /*inistring dstr_764__NINST_SLOTS*/ /*_.VALSTR___V926*/ meltfptr[925] = (melt_ptr_t) & cdat->dstr_764__NINST_SLOTS; cdat->dstr_764__NINST_SLOTS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_764__NINST_SLOTS.val, "NINST_SLOTS", sizeof (cdat->dstr_764__NINST_SLOTS.val) - 1); cdat->dstr_764__NINST_SLOTS.val[11] = (char) 0; cdat->dstr_764__NINST_SLOTS.slen = 11; /*iniobj dsym_765__CLASS_NREP_DATASTRING*/ /*uniqueobj*/ if (! /*_.VALDATA___V936*/ meltfptr[935]) /*_.VALDATA___V936*/ meltfptr[935] = (melt_ptr_t) & cdat->dsym_765__CLASS_NREP_DATASTRING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_765__CLASS_NREP_DATASTRING", melt_magic_discr ((melt_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_NREP_DATASTRING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_765__CLASS_NREP_DATASTRING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_765__CLASS_NREP_DATASTRING.obj_hash = 1030159655; cdat->dsym_765__CLASS_NREP_DATASTRING.obj_len = 3; /*inistring dstr_766__CLASS_NREP_DATAS*/ /*_.VALSTR___V937*/ meltfptr[936] = (melt_ptr_t) & cdat->dstr_766__CLASS_NREP_DATAS; cdat->dstr_766__CLASS_NREP_DATAS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_766__CLASS_NREP_DATAS.val, "CLASS_NREP_DATASTRING", sizeof (cdat->dstr_766__CLASS_NREP_DATAS. val) - 1); cdat->dstr_766__CLASS_NREP_DATAS.val[21] = (char) 0; cdat->dstr_766__CLASS_NREP_DATAS.slen = 21; MELT_LOCATION ("warmelt-normal.melt:556:/ iniobj"); /*iniobj dobj_767__CLASS_NREP_DATASTRING*/ /*_.VALDATA___V938*/ meltfptr[937] = (melt_ptr_t) & cdat->dobj_767__CLASS_NREP_DATASTRING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_767__CLASS_NREP_DATASTRING", 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_NREP_DATASTRING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_767__CLASS_NREP_DATASTRING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_767__CLASS_NREP_DATASTRING.obj_num = MELTOBMAG_OBJECT; cdat->dobj_767__CLASS_NREP_DATASTRING.obj_hash = 1055955147; cdat->dobj_767__CLASS_NREP_DATASTRING.obj_len = 8; /*inistring dstr_768__CLASS_NREP_DATAS*/ /*_.VALSTR___V939*/ meltfptr[938] = (melt_ptr_t) & cdat->dstr_768__CLASS_NREP_DATAS; cdat->dstr_768__CLASS_NREP_DATAS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_768__CLASS_NREP_DATAS.val, "CLASS_NREP_DATASTRING", sizeof (cdat->dstr_768__CLASS_NREP_DATAS. val) - 1); cdat->dstr_768__CLASS_NREP_DATAS.val[21] = (char) 0; cdat->dstr_768__CLASS_NREP_DATAS.slen = 21; /*inimult dtup_769__CLASS_NREP_DATASTRING */ /*_.VALTUP___V940*/ meltfptr[939] = (melt_ptr_t) & cdat->dtup_769__CLASS_NREP_DATASTRING; cdat->dtup_769__CLASS_NREP_DATASTRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_769__CLASS_NREP_DATASTRING.nbval = 5; /*inimult dtup_770__CLASS_NREP_DATASTRING */ /*_.VALTUP___V943*/ meltfptr[942] = (melt_ptr_t) & cdat->dtup_770__CLASS_NREP_DATASTRING; cdat->dtup_770__CLASS_NREP_DATASTRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_770__CLASS_NREP_DATASTRING.nbval = 6; /*iniobj dsym_771__NSTR_STRING*/ /*uniqueobj*/ if (! /*_.VALDATA___V944*/ meltfptr[943]) /*_.VALDATA___V944*/ meltfptr[943] = (melt_ptr_t) & cdat->dsym_771__NSTR_STRING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_771__NSTR_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_771__NSTR_STRING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_771__NSTR_STRING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_771__NSTR_STRING.obj_hash = 36717001; cdat->dsym_771__NSTR_STRING.obj_len = 3; /*inistring dstr_772__NSTR_STRING*/ /*_.VALSTR___V945*/ meltfptr[944] = (melt_ptr_t) & cdat->dstr_772__NSTR_STRING; cdat->dstr_772__NSTR_STRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_772__NSTR_STRING.val, "NSTR_STRING", sizeof (cdat->dstr_772__NSTR_STRING.val) - 1); cdat->dstr_772__NSTR_STRING.val[11] = (char) 0; cdat->dstr_772__NSTR_STRING.slen = 11; /*^iniobj */ /*iniobj dobj_773__NSTR_STRING*/ /*_.VALDATA___V941*/ meltfptr[940] = (melt_ptr_t) & cdat->dobj_773__NSTR_STRING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_773__NSTR_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_773__NSTR_STRING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_773__NSTR_STRING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_773__NSTR_STRING.obj_num = 5; cdat->dobj_773__NSTR_STRING.obj_hash = 705069425; cdat->dobj_773__NSTR_STRING.obj_len = 4; /*inistring dstr_774__NSTR_STRING*/ /*_.VALSTR___V942*/ meltfptr[941] = (melt_ptr_t) & cdat->dstr_774__NSTR_STRING; cdat->dstr_774__NSTR_STRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_774__NSTR_STRING.val, "NSTR_STRING", sizeof (cdat->dstr_774__NSTR_STRING.val) - 1); cdat->dstr_774__NSTR_STRING.val[11] = (char) 0; cdat->dstr_774__NSTR_STRING.slen = 11; /*iniobj dsym_775__CLASS_NREP_DATABOXEDINTEGER*/ /*uniqueobj*/ if (! /*_.VALDATA___V946*/ meltfptr[945]) /*_.VALDATA___V946*/ meltfptr[945] = (melt_ptr_t) & cdat->dsym_775__CLASS_NREP_DATABOXEDINTEGER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_775__CLASS_NREP_DATABOXEDINTEGER", melt_magic_discr ((melt_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_NREP_DATABOXEDINTEGER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_775__CLASS_NREP_DATABOXEDINTEGER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_775__CLASS_NREP_DATABOXEDINTEGER.obj_hash = 874991843; cdat->dsym_775__CLASS_NREP_DATABOXEDINTEGER.obj_len = 3; /*inistring dstr_776__CLASS_NREP_DATAB*/ /*_.VALSTR___V947*/ meltfptr[946] = (melt_ptr_t) & cdat->dstr_776__CLASS_NREP_DATAB; cdat->dstr_776__CLASS_NREP_DATAB.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_776__CLASS_NREP_DATAB.val, "CLASS_NREP_DATABOXEDINTEGER", sizeof (cdat->dstr_776__CLASS_NREP_DATAB. val) - 1); cdat->dstr_776__CLASS_NREP_DATAB.val[27] = (char) 0; cdat->dstr_776__CLASS_NREP_DATAB.slen = 27; MELT_LOCATION ("warmelt-normal.melt:562:/ iniobj"); /*iniobj dobj_777__CLASS_NREP_DATABOXEDINTEGER*/ /*_.VALDATA___V948*/ meltfptr[947] = (melt_ptr_t) & cdat->dobj_777__CLASS_NREP_DATABOXEDINTEGER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_777__CLASS_NREP_DATABOXEDINTEGER", 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_NREP_DATABOXEDINTEGER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_777__CLASS_NREP_DATABOXEDINTEGER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_777__CLASS_NREP_DATABOXEDINTEGER.obj_num = MELTOBMAG_OBJECT; cdat->dobj_777__CLASS_NREP_DATABOXEDINTEGER.obj_hash = 379558871; cdat->dobj_777__CLASS_NREP_DATABOXEDINTEGER.obj_len = 8; /*inistring dstr_778__CLASS_NREP_DATAB*/ /*_.VALSTR___V949*/ meltfptr[948] = (melt_ptr_t) & cdat->dstr_778__CLASS_NREP_DATAB; cdat->dstr_778__CLASS_NREP_DATAB.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_778__CLASS_NREP_DATAB.val, "CLASS_NREP_DATABOXEDINTEGER", sizeof (cdat->dstr_778__CLASS_NREP_DATAB. val) - 1); cdat->dstr_778__CLASS_NREP_DATAB.val[27] = (char) 0; cdat->dstr_778__CLASS_NREP_DATAB.slen = 27; /*inimult dtup_779__CLASS_NREP_DATABOXEDINTEGER */ /*_.VALTUP___V950*/ meltfptr[949] = (melt_ptr_t) & cdat->dtup_779__CLASS_NREP_DATABOXEDINTEGER; cdat->dtup_779__CLASS_NREP_DATABOXEDINTEGER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_779__CLASS_NREP_DATABOXEDINTEGER.nbval = 5; /*inimult dtup_780__CLASS_NREP_DATABOXEDINTEGER */ /*_.VALTUP___V953*/ meltfptr[952] = (melt_ptr_t) & cdat->dtup_780__CLASS_NREP_DATABOXEDINTEGER; cdat->dtup_780__CLASS_NREP_DATABOXEDINTEGER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_780__CLASS_NREP_DATABOXEDINTEGER.nbval = 6; /*iniobj dsym_781__NBOXINT_NUM*/ /*uniqueobj*/ if (! /*_.VALDATA___V954*/ meltfptr[953]) /*_.VALDATA___V954*/ meltfptr[953] = (melt_ptr_t) & cdat->dsym_781__NBOXINT_NUM; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_781__NBOXINT_NUM", melt_magic_discr ((melt_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__NBOXINT_NUM", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_781__NBOXINT_NUM.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_781__NBOXINT_NUM.obj_hash = 207447110; cdat->dsym_781__NBOXINT_NUM.obj_len = 3; /*inistring dstr_782__NBOXINT_NUM*/ /*_.VALSTR___V955*/ meltfptr[954] = (melt_ptr_t) & cdat->dstr_782__NBOXINT_NUM; cdat->dstr_782__NBOXINT_NUM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_782__NBOXINT_NUM.val, "NBOXINT_NUM", sizeof (cdat->dstr_782__NBOXINT_NUM.val) - 1); cdat->dstr_782__NBOXINT_NUM.val[11] = (char) 0; cdat->dstr_782__NBOXINT_NUM.slen = 11; /*^iniobj */ /*iniobj dobj_783__NBOXINT_NUM*/ /*_.VALDATA___V951*/ meltfptr[950] = (melt_ptr_t) & cdat->dobj_783__NBOXINT_NUM; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_783__NBOXINT_NUM", 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__NBOXINT_NUM", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_783__NBOXINT_NUM.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_783__NBOXINT_NUM.obj_num = 5; cdat->dobj_783__NBOXINT_NUM.obj_hash = 900943907; cdat->dobj_783__NBOXINT_NUM.obj_len = 4; /*inistring dstr_784__NBOXINT_NUM*/ /*_.VALSTR___V952*/ meltfptr[951] = (melt_ptr_t) & cdat->dstr_784__NBOXINT_NUM; cdat->dstr_784__NBOXINT_NUM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_784__NBOXINT_NUM.val, "NBOXINT_NUM", sizeof (cdat->dstr_784__NBOXINT_NUM.val) - 1); cdat->dstr_784__NBOXINT_NUM.val[11] = (char) 0; cdat->dstr_784__NBOXINT_NUM.slen = 11; /*iniobj dsym_785__CLASS_NREP_DATATUPLE*/ /*uniqueobj*/ if (! /*_.VALDATA___V956*/ meltfptr[955]) /*_.VALDATA___V956*/ meltfptr[955] = (melt_ptr_t) & cdat->dsym_785__CLASS_NREP_DATATUPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_785__CLASS_NREP_DATATUPLE", melt_magic_discr ((melt_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_NREP_DATATUPLE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_785__CLASS_NREP_DATATUPLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_785__CLASS_NREP_DATATUPLE.obj_hash = 100529129; cdat->dsym_785__CLASS_NREP_DATATUPLE.obj_len = 3; /*inistring dstr_786__CLASS_NREP_DATAT*/ /*_.VALSTR___V957*/ meltfptr[956] = (melt_ptr_t) & cdat->dstr_786__CLASS_NREP_DATAT; cdat->dstr_786__CLASS_NREP_DATAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_786__CLASS_NREP_DATAT.val, "CLASS_NREP_DATATUPLE", sizeof (cdat->dstr_786__CLASS_NREP_DATAT. val) - 1); cdat->dstr_786__CLASS_NREP_DATAT.val[20] = (char) 0; cdat->dstr_786__CLASS_NREP_DATAT.slen = 20; MELT_LOCATION ("warmelt-normal.melt:568:/ iniobj"); /*iniobj dobj_787__CLASS_NREP_DATATUPLE*/ /*_.VALDATA___V958*/ meltfptr[957] = (melt_ptr_t) & cdat->dobj_787__CLASS_NREP_DATATUPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_787__CLASS_NREP_DATATUPLE", 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_NREP_DATATUPLE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_787__CLASS_NREP_DATATUPLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_787__CLASS_NREP_DATATUPLE.obj_num = MELTOBMAG_OBJECT; cdat->dobj_787__CLASS_NREP_DATATUPLE.obj_hash = 539756290; cdat->dobj_787__CLASS_NREP_DATATUPLE.obj_len = 8; /*inistring dstr_788__CLASS_NREP_DATAT*/ /*_.VALSTR___V959*/ meltfptr[958] = (melt_ptr_t) & cdat->dstr_788__CLASS_NREP_DATAT; cdat->dstr_788__CLASS_NREP_DATAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_788__CLASS_NREP_DATAT.val, "CLASS_NREP_DATATUPLE", sizeof (cdat->dstr_788__CLASS_NREP_DATAT. val) - 1); cdat->dstr_788__CLASS_NREP_DATAT.val[20] = (char) 0; cdat->dstr_788__CLASS_NREP_DATAT.slen = 20; /*inimult dtup_789__CLASS_NREP_DATATUPLE */ /*_.VALTUP___V960*/ meltfptr[959] = (melt_ptr_t) & cdat->dtup_789__CLASS_NREP_DATATUPLE; cdat->dtup_789__CLASS_NREP_DATATUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_789__CLASS_NREP_DATATUPLE.nbval = 5; /*inimult dtup_790__CLASS_NREP_DATATUPLE */ /*_.VALTUP___V963*/ meltfptr[962] = (melt_ptr_t) & cdat->dtup_790__CLASS_NREP_DATATUPLE; cdat->dtup_790__CLASS_NREP_DATATUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_790__CLASS_NREP_DATATUPLE.nbval = 6; /*iniobj dsym_791__NTUP_COMP*/ /*uniqueobj*/ if (! /*_.VALDATA___V964*/ meltfptr[963]) /*_.VALDATA___V964*/ meltfptr[963] = (melt_ptr_t) & cdat->dsym_791__NTUP_COMP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_791__NTUP_COMP", melt_magic_discr ((melt_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__NTUP_COMP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_791__NTUP_COMP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_791__NTUP_COMP.obj_hash = 855040037; cdat->dsym_791__NTUP_COMP.obj_len = 3; /*inistring dstr_792__NTUP_COMP*/ /*_.VALSTR___V965*/ meltfptr[964] = (melt_ptr_t) & cdat->dstr_792__NTUP_COMP; cdat->dstr_792__NTUP_COMP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_792__NTUP_COMP.val, "NTUP_COMP", sizeof (cdat->dstr_792__NTUP_COMP.val) - 1); cdat->dstr_792__NTUP_COMP.val[9] = (char) 0; cdat->dstr_792__NTUP_COMP.slen = 9; /*^iniobj */ /*iniobj dobj_793__NTUP_COMP*/ /*_.VALDATA___V961*/ meltfptr[960] = (melt_ptr_t) & cdat->dobj_793__NTUP_COMP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_793__NTUP_COMP", 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__NTUP_COMP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_793__NTUP_COMP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_793__NTUP_COMP.obj_num = 5; cdat->dobj_793__NTUP_COMP.obj_hash = 975758638; cdat->dobj_793__NTUP_COMP.obj_len = 4; /*inistring dstr_794__NTUP_COMP*/ /*_.VALSTR___V962*/ meltfptr[961] = (melt_ptr_t) & cdat->dstr_794__NTUP_COMP; cdat->dstr_794__NTUP_COMP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_794__NTUP_COMP.val, "NTUP_COMP", sizeof (cdat->dstr_794__NTUP_COMP.val) - 1); cdat->dstr_794__NTUP_COMP.val[9] = (char) 0; cdat->dstr_794__NTUP_COMP.slen = 9; /*iniobj dsym_795__CLASS_NREP_DATASYMBOL*/ /*uniqueobj*/ if (! /*_.VALDATA___V966*/ meltfptr[965]) /*_.VALDATA___V966*/ meltfptr[965] = (melt_ptr_t) & cdat->dsym_795__CLASS_NREP_DATASYMBOL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_795__CLASS_NREP_DATASYMBOL", melt_magic_discr ((melt_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__CLASS_NREP_DATASYMBOL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_795__CLASS_NREP_DATASYMBOL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_795__CLASS_NREP_DATASYMBOL.obj_hash = 55902456; cdat->dsym_795__CLASS_NREP_DATASYMBOL.obj_len = 3; /*inistring dstr_796__CLASS_NREP_DATAS*/ /*_.VALSTR___V967*/ meltfptr[966] = (melt_ptr_t) & cdat->dstr_796__CLASS_NREP_DATAS; cdat->dstr_796__CLASS_NREP_DATAS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_796__CLASS_NREP_DATAS.val, "CLASS_NREP_DATASYMBOL", sizeof (cdat->dstr_796__CLASS_NREP_DATAS. val) - 1); cdat->dstr_796__CLASS_NREP_DATAS.val[21] = (char) 0; cdat->dstr_796__CLASS_NREP_DATAS.slen = 21; MELT_LOCATION ("warmelt-normal.melt:574:/ iniobj"); /*iniobj dobj_797__CLASS_NREP_DATASYMBOL*/ /*_.VALDATA___V968*/ meltfptr[967] = (melt_ptr_t) & cdat->dobj_797__CLASS_NREP_DATASYMBOL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_797__CLASS_NREP_DATASYMBOL", 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_797__CLASS_NREP_DATASYMBOL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_797__CLASS_NREP_DATASYMBOL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_797__CLASS_NREP_DATASYMBOL.obj_num = MELTOBMAG_OBJECT; cdat->dobj_797__CLASS_NREP_DATASYMBOL.obj_hash = 991518570; cdat->dobj_797__CLASS_NREP_DATASYMBOL.obj_len = 8; /*inistring dstr_798__CLASS_NREP_DATAS*/ /*_.VALSTR___V969*/ meltfptr[968] = (melt_ptr_t) & cdat->dstr_798__CLASS_NREP_DATAS; cdat->dstr_798__CLASS_NREP_DATAS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_798__CLASS_NREP_DATAS.val, "CLASS_NREP_DATASYMBOL", sizeof (cdat->dstr_798__CLASS_NREP_DATAS. val) - 1); cdat->dstr_798__CLASS_NREP_DATAS.val[21] = (char) 0; cdat->dstr_798__CLASS_NREP_DATAS.slen = 21; /*inimult dtup_799__CLASS_NREP_DATASYMBOL */ /*_.VALTUP___V970*/ meltfptr[969] = (melt_ptr_t) & cdat->dtup_799__CLASS_NREP_DATASYMBOL; cdat->dtup_799__CLASS_NREP_DATASYMBOL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_799__CLASS_NREP_DATASYMBOL.nbval = 6; /*inimult dtup_800__CLASS_NREP_DATASYMBOL */ /*_.VALTUP___V973*/ meltfptr[972] = (melt_ptr_t) & cdat->dtup_800__CLASS_NREP_DATASYMBOL; cdat->dtup_800__CLASS_NREP_DATASYMBOL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_800__CLASS_NREP_DATASYMBOL.nbval = 10; /*iniobj dsym_801__NDSY_NAMESTR*/ /*uniqueobj*/ if (! /*_.VALDATA___V974*/ meltfptr[973]) /*_.VALDATA___V974*/ meltfptr[973] = (melt_ptr_t) & cdat->dsym_801__NDSY_NAMESTR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_801__NDSY_NAMESTR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_801__NDSY_NAMESTR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_801__NDSY_NAMESTR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_801__NDSY_NAMESTR.obj_hash = 25919283; cdat->dsym_801__NDSY_NAMESTR.obj_len = 3; /*inistring dstr_802__NDSY_NAMESTR*/ /*_.VALSTR___V975*/ meltfptr[974] = (melt_ptr_t) & cdat->dstr_802__NDSY_NAMESTR; cdat->dstr_802__NDSY_NAMESTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_802__NDSY_NAMESTR.val, "NDSY_NAMESTR", sizeof (cdat->dstr_802__NDSY_NAMESTR.val) - 1); cdat->dstr_802__NDSY_NAMESTR.val[12] = (char) 0; cdat->dstr_802__NDSY_NAMESTR.slen = 12; /*^iniobj */ /*iniobj dobj_803__NDSY_NAMESTR*/ /*_.VALDATA___V971*/ meltfptr[970] = (melt_ptr_t) & cdat->dobj_803__NDSY_NAMESTR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_803__NDSY_NAMESTR", 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_803__NDSY_NAMESTR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_803__NDSY_NAMESTR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_803__NDSY_NAMESTR.obj_num = 9; cdat->dobj_803__NDSY_NAMESTR.obj_hash = 49607035; cdat->dobj_803__NDSY_NAMESTR.obj_len = 4; /*inistring dstr_804__NDSY_NAMESTR*/ /*_.VALSTR___V972*/ meltfptr[971] = (melt_ptr_t) & cdat->dstr_804__NDSY_NAMESTR; cdat->dstr_804__NDSY_NAMESTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_804__NDSY_NAMESTR.val, "NDSY_NAMESTR", sizeof (cdat->dstr_804__NDSY_NAMESTR.val) - 1); cdat->dstr_804__NDSY_NAMESTR.val[12] = (char) 0; cdat->dstr_804__NDSY_NAMESTR.slen = 12; /*iniobj dsym_805__CLASS_NREP_DATAKEYWORD*/ /*uniqueobj*/ if (! /*_.VALDATA___V976*/ meltfptr[975]) /*_.VALDATA___V976*/ meltfptr[975] = (melt_ptr_t) & cdat->dsym_805__CLASS_NREP_DATAKEYWORD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_805__CLASS_NREP_DATAKEYWORD", melt_magic_discr ((melt_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__CLASS_NREP_DATAKEYWORD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_805__CLASS_NREP_DATAKEYWORD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_805__CLASS_NREP_DATAKEYWORD.obj_hash = 755124591; cdat->dsym_805__CLASS_NREP_DATAKEYWORD.obj_len = 3; /*inistring dstr_806__CLASS_NREP_DATAK*/ /*_.VALSTR___V977*/ meltfptr[976] = (melt_ptr_t) & cdat->dstr_806__CLASS_NREP_DATAK; cdat->dstr_806__CLASS_NREP_DATAK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_806__CLASS_NREP_DATAK.val, "CLASS_NREP_DATAKEYWORD", sizeof (cdat->dstr_806__CLASS_NREP_DATAK. val) - 1); cdat->dstr_806__CLASS_NREP_DATAK.val[22] = (char) 0; cdat->dstr_806__CLASS_NREP_DATAK.slen = 22; MELT_LOCATION ("warmelt-normal.melt:580:/ iniobj"); /*iniobj dobj_807__CLASS_NREP_DATAKEYWORD*/ /*_.VALDATA___V978*/ meltfptr[977] = (melt_ptr_t) & cdat->dobj_807__CLASS_NREP_DATAKEYWORD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_807__CLASS_NREP_DATAKEYWORD", 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_807__CLASS_NREP_DATAKEYWORD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_807__CLASS_NREP_DATAKEYWORD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_807__CLASS_NREP_DATAKEYWORD.obj_num = MELTOBMAG_OBJECT; cdat->dobj_807__CLASS_NREP_DATAKEYWORD.obj_hash = 521733294; cdat->dobj_807__CLASS_NREP_DATAKEYWORD.obj_len = 8; /*inistring dstr_808__CLASS_NREP_DATAK*/ /*_.VALSTR___V979*/ meltfptr[978] = (melt_ptr_t) & cdat->dstr_808__CLASS_NREP_DATAK; cdat->dstr_808__CLASS_NREP_DATAK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_808__CLASS_NREP_DATAK.val, "CLASS_NREP_DATAKEYWORD", sizeof (cdat->dstr_808__CLASS_NREP_DATAK. val) - 1); cdat->dstr_808__CLASS_NREP_DATAK.val[22] = (char) 0; cdat->dstr_808__CLASS_NREP_DATAK.slen = 22; /*inimult dtup_809__CLASS_NREP_DATAKEYWORD */ /*_.VALTUP___V980*/ meltfptr[979] = (melt_ptr_t) & cdat->dtup_809__CLASS_NREP_DATAKEYWORD; cdat->dtup_809__CLASS_NREP_DATAKEYWORD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_809__CLASS_NREP_DATAKEYWORD.nbval = 7; /*inimult dtup_810__CLASS_NREP_DATAKEYWORD */ /*_.VALTUP___V981*/ meltfptr[980] = (melt_ptr_t) & cdat->dtup_810__CLASS_NREP_DATAKEYWORD; cdat->dtup_810__CLASS_NREP_DATAKEYWORD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_810__CLASS_NREP_DATAKEYWORD.nbval = 10; /*iniobj dsym_811__CLASS_NREP_DATAROUTINE*/ /*uniqueobj*/ if (! /*_.VALDATA___V982*/ meltfptr[981]) /*_.VALDATA___V982*/ meltfptr[981] = (melt_ptr_t) & cdat->dsym_811__CLASS_NREP_DATAROUTINE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_811__CLASS_NREP_DATAROUTINE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_811__CLASS_NREP_DATAROUTINE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_811__CLASS_NREP_DATAROUTINE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_811__CLASS_NREP_DATAROUTINE.obj_hash = 675830344; cdat->dsym_811__CLASS_NREP_DATAROUTINE.obj_len = 3; /*inistring dstr_812__CLASS_NREP_DATAR*/ /*_.VALSTR___V983*/ meltfptr[982] = (melt_ptr_t) & cdat->dstr_812__CLASS_NREP_DATAR; cdat->dstr_812__CLASS_NREP_DATAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_812__CLASS_NREP_DATAR.val, "CLASS_NREP_DATAROUTINE", sizeof (cdat->dstr_812__CLASS_NREP_DATAR. val) - 1); cdat->dstr_812__CLASS_NREP_DATAR.val[22] = (char) 0; cdat->dstr_812__CLASS_NREP_DATAR.slen = 22; MELT_LOCATION ("warmelt-normal.melt:586:/ iniobj"); /*iniobj dobj_813__CLASS_NREP_DATAROUTINE*/ /*_.VALDATA___V984*/ meltfptr[983] = (melt_ptr_t) & cdat->dobj_813__CLASS_NREP_DATAROUTINE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_813__CLASS_NREP_DATAROUTINE", 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_813__CLASS_NREP_DATAROUTINE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_813__CLASS_NREP_DATAROUTINE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_813__CLASS_NREP_DATAROUTINE.obj_num = MELTOBMAG_OBJECT; cdat->dobj_813__CLASS_NREP_DATAROUTINE.obj_hash = 1045111342; cdat->dobj_813__CLASS_NREP_DATAROUTINE.obj_len = 8; /*inistring dstr_814__CLASS_NREP_DATAR*/ /*_.VALSTR___V985*/ meltfptr[984] = (melt_ptr_t) & cdat->dstr_814__CLASS_NREP_DATAR; cdat->dstr_814__CLASS_NREP_DATAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_814__CLASS_NREP_DATAR.val, "CLASS_NREP_DATAROUTINE", sizeof (cdat->dstr_814__CLASS_NREP_DATAR. val) - 1); cdat->dstr_814__CLASS_NREP_DATAR.val[22] = (char) 0; cdat->dstr_814__CLASS_NREP_DATAR.slen = 22; /*inimult dtup_815__CLASS_NREP_DATAROUTINE */ /*_.VALTUP___V986*/ meltfptr[985] = (melt_ptr_t) & cdat->dtup_815__CLASS_NREP_DATAROUTINE; cdat->dtup_815__CLASS_NREP_DATAROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_815__CLASS_NREP_DATAROUTINE.nbval = 5; /*inimult dtup_816__CLASS_NREP_DATAROUTINE */ /*_.VALTUP___V989*/ meltfptr[988] = (melt_ptr_t) & cdat->dtup_816__CLASS_NREP_DATAROUTINE; cdat->dtup_816__CLASS_NREP_DATAROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_816__CLASS_NREP_DATAROUTINE.nbval = 6; /*iniobj dsym_817__NDROU_PROC*/ /*uniqueobj*/ if (! /*_.VALDATA___V990*/ meltfptr[989]) /*_.VALDATA___V990*/ meltfptr[989] = (melt_ptr_t) & cdat->dsym_817__NDROU_PROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_817__NDROU_PROC", melt_magic_discr ((melt_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__NDROU_PROC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_817__NDROU_PROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_817__NDROU_PROC.obj_hash = 167596035; cdat->dsym_817__NDROU_PROC.obj_len = 3; /*inistring dstr_818__NDROU_PROC*/ /*_.VALSTR___V991*/ meltfptr[990] = (melt_ptr_t) & cdat->dstr_818__NDROU_PROC; cdat->dstr_818__NDROU_PROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_818__NDROU_PROC.val, "NDROU_PROC", sizeof (cdat->dstr_818__NDROU_PROC.val) - 1); cdat->dstr_818__NDROU_PROC.val[10] = (char) 0; cdat->dstr_818__NDROU_PROC.slen = 10; /*^iniobj */ /*iniobj dobj_819__NDROU_PROC*/ /*_.VALDATA___V987*/ meltfptr[986] = (melt_ptr_t) & cdat->dobj_819__NDROU_PROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_819__NDROU_PROC", 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_819__NDROU_PROC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_819__NDROU_PROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_819__NDROU_PROC.obj_num = 5; cdat->dobj_819__NDROU_PROC.obj_hash = 867312643; cdat->dobj_819__NDROU_PROC.obj_len = 4; /*inistring dstr_820__NDROU_PROC*/ /*_.VALSTR___V988*/ meltfptr[987] = (melt_ptr_t) & cdat->dstr_820__NDROU_PROC; cdat->dstr_820__NDROU_PROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_820__NDROU_PROC.val, "NDROU_PROC", sizeof (cdat->dstr_820__NDROU_PROC.val) - 1); cdat->dstr_820__NDROU_PROC.val[10] = (char) 0; cdat->dstr_820__NDROU_PROC.slen = 10; /*iniobj dsym_821__CLASS_NREP_DATACLOSURE*/ /*uniqueobj*/ if (! /*_.VALDATA___V992*/ meltfptr[991]) /*_.VALDATA___V992*/ meltfptr[991] = (melt_ptr_t) & cdat->dsym_821__CLASS_NREP_DATACLOSURE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_821__CLASS_NREP_DATACLOSURE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_821__CLASS_NREP_DATACLOSURE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_821__CLASS_NREP_DATACLOSURE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_821__CLASS_NREP_DATACLOSURE.obj_hash = 206205313; cdat->dsym_821__CLASS_NREP_DATACLOSURE.obj_len = 3; /*inistring dstr_822__CLASS_NREP_DATAC*/ /*_.VALSTR___V993*/ meltfptr[992] = (melt_ptr_t) & cdat->dstr_822__CLASS_NREP_DATAC; cdat->dstr_822__CLASS_NREP_DATAC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_822__CLASS_NREP_DATAC.val, "CLASS_NREP_DATACLOSURE", sizeof (cdat->dstr_822__CLASS_NREP_DATAC. val) - 1); cdat->dstr_822__CLASS_NREP_DATAC.val[22] = (char) 0; cdat->dstr_822__CLASS_NREP_DATAC.slen = 22; MELT_LOCATION ("warmelt-normal.melt:592:/ iniobj"); /*iniobj dobj_823__CLASS_NREP_DATACLOSURE*/ /*_.VALDATA___V994*/ meltfptr[993] = (melt_ptr_t) & cdat->dobj_823__CLASS_NREP_DATACLOSURE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_823__CLASS_NREP_DATACLOSURE", 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_823__CLASS_NREP_DATACLOSURE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_823__CLASS_NREP_DATACLOSURE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_823__CLASS_NREP_DATACLOSURE.obj_num = MELTOBMAG_OBJECT; cdat->dobj_823__CLASS_NREP_DATACLOSURE.obj_hash = 214641632; cdat->dobj_823__CLASS_NREP_DATACLOSURE.obj_len = 8; /*inistring dstr_824__CLASS_NREP_DATAC*/ /*_.VALSTR___V995*/ meltfptr[994] = (melt_ptr_t) & cdat->dstr_824__CLASS_NREP_DATAC; cdat->dstr_824__CLASS_NREP_DATAC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_824__CLASS_NREP_DATAC.val, "CLASS_NREP_DATACLOSURE", sizeof (cdat->dstr_824__CLASS_NREP_DATAC. val) - 1); cdat->dstr_824__CLASS_NREP_DATAC.val[22] = (char) 0; cdat->dstr_824__CLASS_NREP_DATAC.slen = 22; /*inimult dtup_825__CLASS_NREP_DATACLOSURE */ /*_.VALTUP___V996*/ meltfptr[995] = (melt_ptr_t) & cdat->dtup_825__CLASS_NREP_DATACLOSURE; cdat->dtup_825__CLASS_NREP_DATACLOSURE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_825__CLASS_NREP_DATACLOSURE.nbval = 5; /*inimult dtup_826__CLASS_NREP_DATACLOSURE */ /*_.VALTUP___V1001*/ meltfptr[1000] = (melt_ptr_t) & cdat->dtup_826__CLASS_NREP_DATACLOSURE; cdat->dtup_826__CLASS_NREP_DATACLOSURE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_826__CLASS_NREP_DATACLOSURE.nbval = 7; /*iniobj dsym_827__NDCLO_PROC*/ /*uniqueobj*/ if (! /*_.VALDATA___V1002*/ meltfptr[1001]) /*_.VALDATA___V1002*/ meltfptr[1001] = (melt_ptr_t) & cdat->dsym_827__NDCLO_PROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_827__NDCLO_PROC", melt_magic_discr ((melt_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__NDCLO_PROC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_827__NDCLO_PROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_827__NDCLO_PROC.obj_hash = 452648856; cdat->dsym_827__NDCLO_PROC.obj_len = 3; /*inistring dstr_828__NDCLO_PROC*/ /*_.VALSTR___V1003*/ meltfptr[1002] = (melt_ptr_t) & cdat->dstr_828__NDCLO_PROC; cdat->dstr_828__NDCLO_PROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_828__NDCLO_PROC.val, "NDCLO_PROC", sizeof (cdat->dstr_828__NDCLO_PROC.val) - 1); cdat->dstr_828__NDCLO_PROC.val[10] = (char) 0; cdat->dstr_828__NDCLO_PROC.slen = 10; /*^iniobj */ /*iniobj dobj_829__NDCLO_PROC*/ /*_.VALDATA___V997*/ meltfptr[996] = (melt_ptr_t) & cdat->dobj_829__NDCLO_PROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_829__NDCLO_PROC", 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__NDCLO_PROC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_829__NDCLO_PROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_829__NDCLO_PROC.obj_num = 5; cdat->dobj_829__NDCLO_PROC.obj_hash = 361555690; cdat->dobj_829__NDCLO_PROC.obj_len = 4; /*inistring dstr_830__NDCLO_PROC*/ /*_.VALSTR___V998*/ meltfptr[997] = (melt_ptr_t) & cdat->dstr_830__NDCLO_PROC; cdat->dstr_830__NDCLO_PROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_830__NDCLO_PROC.val, "NDCLO_PROC", sizeof (cdat->dstr_830__NDCLO_PROC.val) - 1); cdat->dstr_830__NDCLO_PROC.val[10] = (char) 0; cdat->dstr_830__NDCLO_PROC.slen = 10; /*iniobj dsym_831__NDCLO_CLOSV*/ /*uniqueobj*/ if (! /*_.VALDATA___V1004*/ meltfptr[1003]) /*_.VALDATA___V1004*/ meltfptr[1003] = (melt_ptr_t) & cdat->dsym_831__NDCLO_CLOSV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_831__NDCLO_CLOSV", melt_magic_discr ((melt_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__NDCLO_CLOSV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_831__NDCLO_CLOSV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_831__NDCLO_CLOSV.obj_hash = 941944987; cdat->dsym_831__NDCLO_CLOSV.obj_len = 3; /*inistring dstr_832__NDCLO_CLOSV*/ /*_.VALSTR___V1005*/ meltfptr[1004] = (melt_ptr_t) & cdat->dstr_832__NDCLO_CLOSV; cdat->dstr_832__NDCLO_CLOSV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_832__NDCLO_CLOSV.val, "NDCLO_CLOSV", sizeof (cdat->dstr_832__NDCLO_CLOSV.val) - 1); cdat->dstr_832__NDCLO_CLOSV.val[11] = (char) 0; cdat->dstr_832__NDCLO_CLOSV.slen = 11; /*^iniobj */ /*iniobj dobj_833__NDCLO_CLOSV*/ /*_.VALDATA___V999*/ meltfptr[998] = (melt_ptr_t) & cdat->dobj_833__NDCLO_CLOSV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_833__NDCLO_CLOSV", 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_833__NDCLO_CLOSV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_833__NDCLO_CLOSV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_833__NDCLO_CLOSV.obj_num = 6; cdat->dobj_833__NDCLO_CLOSV.obj_hash = 980211963; cdat->dobj_833__NDCLO_CLOSV.obj_len = 4; /*inistring dstr_834__NDCLO_CLOSV*/ /*_.VALSTR___V1000*/ meltfptr[999] = (melt_ptr_t) & cdat->dstr_834__NDCLO_CLOSV; cdat->dstr_834__NDCLO_CLOSV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_834__NDCLO_CLOSV.val, "NDCLO_CLOSV", sizeof (cdat->dstr_834__NDCLO_CLOSV.val) - 1); cdat->dstr_834__NDCLO_CLOSV.val[11] = (char) 0; cdat->dstr_834__NDCLO_CLOSV.slen = 11; /*iniobj dsym_835__CLASS_NREP_IMPORTEDVAL*/ /*uniqueobj*/ if (! /*_.VALDATA___V1006*/ meltfptr[1005]) /*_.VALDATA___V1006*/ meltfptr[1005] = (melt_ptr_t) & cdat->dsym_835__CLASS_NREP_IMPORTEDVAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_835__CLASS_NREP_IMPORTEDVAL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_835__CLASS_NREP_IMPORTEDVAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_835__CLASS_NREP_IMPORTEDVAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_835__CLASS_NREP_IMPORTEDVAL.obj_hash = 143332453; cdat->dsym_835__CLASS_NREP_IMPORTEDVAL.obj_len = 3; /*inistring dstr_836__CLASS_NREP_IMPOR*/ /*_.VALSTR___V1007*/ meltfptr[1006] = (melt_ptr_t) & cdat->dstr_836__CLASS_NREP_IMPOR; cdat->dstr_836__CLASS_NREP_IMPOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_836__CLASS_NREP_IMPOR.val, "CLASS_NREP_IMPORTEDVAL", sizeof (cdat->dstr_836__CLASS_NREP_IMPOR. val) - 1); cdat->dstr_836__CLASS_NREP_IMPOR.val[22] = (char) 0; cdat->dstr_836__CLASS_NREP_IMPOR.slen = 22; MELT_LOCATION ("warmelt-normal.melt:600:/ iniobj"); /*iniobj dobj_837__CLASS_NREP_IMPORTEDVAL*/ /*_.VALDATA___V1008*/ meltfptr[1007] = (melt_ptr_t) & cdat->dobj_837__CLASS_NREP_IMPORTEDVAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_837__CLASS_NREP_IMPORTEDVAL", 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_837__CLASS_NREP_IMPORTEDVAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_837__CLASS_NREP_IMPORTEDVAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_837__CLASS_NREP_IMPORTEDVAL.obj_num = MELTOBMAG_OBJECT; cdat->dobj_837__CLASS_NREP_IMPORTEDVAL.obj_hash = 62026828; cdat->dobj_837__CLASS_NREP_IMPORTEDVAL.obj_len = 8; /*inistring dstr_838__CLASS_NREP_IMPOR*/ /*_.VALSTR___V1009*/ meltfptr[1008] = (melt_ptr_t) & cdat->dstr_838__CLASS_NREP_IMPOR; cdat->dstr_838__CLASS_NREP_IMPOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_838__CLASS_NREP_IMPOR.val, "CLASS_NREP_IMPORTEDVAL", sizeof (cdat->dstr_838__CLASS_NREP_IMPOR. val) - 1); cdat->dstr_838__CLASS_NREP_IMPOR.val[22] = (char) 0; cdat->dstr_838__CLASS_NREP_IMPOR.slen = 22; /*inimult dtup_839__CLASS_NREP_IMPORTEDVAL */ /*_.VALTUP___V1010*/ meltfptr[1009] = (melt_ptr_t) & cdat->dtup_839__CLASS_NREP_IMPORTEDVAL; cdat->dtup_839__CLASS_NREP_IMPORTEDVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_839__CLASS_NREP_IMPORTEDVAL.nbval = 3; /*inimult dtup_840__CLASS_NREP_IMPORTEDVAL */ /*_.VALTUP___V1015*/ meltfptr[1014] = (melt_ptr_t) & cdat->dtup_840__CLASS_NREP_IMPORTEDVAL; cdat->dtup_840__CLASS_NREP_IMPORTEDVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_840__CLASS_NREP_IMPORTEDVAL.nbval = 3; /*iniobj dsym_841__NIMPORT_SYMB*/ /*uniqueobj*/ if (! /*_.VALDATA___V1016*/ meltfptr[1015]) /*_.VALDATA___V1016*/ meltfptr[1015] = (melt_ptr_t) & cdat->dsym_841__NIMPORT_SYMB; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_841__NIMPORT_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_841__NIMPORT_SYMB", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_841__NIMPORT_SYMB.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_841__NIMPORT_SYMB.obj_hash = 22382565; cdat->dsym_841__NIMPORT_SYMB.obj_len = 3; /*inistring dstr_842__NIMPORT_SYMB*/ /*_.VALSTR___V1017*/ meltfptr[1016] = (melt_ptr_t) & cdat->dstr_842__NIMPORT_SYMB; cdat->dstr_842__NIMPORT_SYMB.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_842__NIMPORT_SYMB.val, "NIMPORT_SYMB", sizeof (cdat->dstr_842__NIMPORT_SYMB.val) - 1); cdat->dstr_842__NIMPORT_SYMB.val[12] = (char) 0; cdat->dstr_842__NIMPORT_SYMB.slen = 12; /*^iniobj */ /*iniobj dobj_843__NIMPORT_SYMB*/ /*_.VALDATA___V1011*/ meltfptr[1010] = (melt_ptr_t) & cdat->dobj_843__NIMPORT_SYMB; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_843__NIMPORT_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_843__NIMPORT_SYMB", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_843__NIMPORT_SYMB.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_843__NIMPORT_SYMB.obj_num = 1; cdat->dobj_843__NIMPORT_SYMB.obj_hash = 155765141; cdat->dobj_843__NIMPORT_SYMB.obj_len = 4; /*inistring dstr_844__NIMPORT_SYMB*/ /*_.VALSTR___V1012*/ meltfptr[1011] = (melt_ptr_t) & cdat->dstr_844__NIMPORT_SYMB; cdat->dstr_844__NIMPORT_SYMB.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_844__NIMPORT_SYMB.val, "NIMPORT_SYMB", sizeof (cdat->dstr_844__NIMPORT_SYMB.val) - 1); cdat->dstr_844__NIMPORT_SYMB.val[12] = (char) 0; cdat->dstr_844__NIMPORT_SYMB.slen = 12; /*iniobj dsym_845__NIMPORT_SYDATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V1018*/ meltfptr[1017]) /*_.VALDATA___V1018*/ meltfptr[1017] = (melt_ptr_t) & cdat->dsym_845__NIMPORT_SYDATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_845__NIMPORT_SYDATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_845__NIMPORT_SYDATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_845__NIMPORT_SYDATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_845__NIMPORT_SYDATA.obj_hash = 950949061; cdat->dsym_845__NIMPORT_SYDATA.obj_len = 3; /*inistring dstr_846__NIMPORT_SYDATA*/ /*_.VALSTR___V1019*/ meltfptr[1018] = (melt_ptr_t) & cdat->dstr_846__NIMPORT_SYDATA; cdat->dstr_846__NIMPORT_SYDATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_846__NIMPORT_SYDATA.val, "NIMPORT_SYDATA", sizeof (cdat->dstr_846__NIMPORT_SYDATA.val) - 1); cdat->dstr_846__NIMPORT_SYDATA.val[14] = (char) 0; cdat->dstr_846__NIMPORT_SYDATA.slen = 14; /*^iniobj */ /*iniobj dobj_847__NIMPORT_SYDATA*/ /*_.VALDATA___V1013*/ meltfptr[1012] = (melt_ptr_t) & cdat->dobj_847__NIMPORT_SYDATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_847__NIMPORT_SYDATA", 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_847__NIMPORT_SYDATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_847__NIMPORT_SYDATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_847__NIMPORT_SYDATA.obj_num = 2; cdat->dobj_847__NIMPORT_SYDATA.obj_hash = 464192099; cdat->dobj_847__NIMPORT_SYDATA.obj_len = 4; /*inistring dstr_848__NIMPORT_SYDATA*/ /*_.VALSTR___V1014*/ meltfptr[1013] = (melt_ptr_t) & cdat->dstr_848__NIMPORT_SYDATA; cdat->dstr_848__NIMPORT_SYDATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_848__NIMPORT_SYDATA.val, "NIMPORT_SYDATA", sizeof (cdat->dstr_848__NIMPORT_SYDATA.val) - 1); cdat->dstr_848__NIMPORT_SYDATA.val[14] = (char) 0; cdat->dstr_848__NIMPORT_SYDATA.slen = 14; /*iniobj dsym_849__CLASS_NREP_LITERALVALUE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1020*/ meltfptr[1019]) /*_.VALDATA___V1020*/ meltfptr[1019] = (melt_ptr_t) & cdat->dsym_849__CLASS_NREP_LITERALVALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_849__CLASS_NREP_LITERALVALUE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_849__CLASS_NREP_LITERALVALUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_849__CLASS_NREP_LITERALVALUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_849__CLASS_NREP_LITERALVALUE.obj_hash = 562300827; cdat->dsym_849__CLASS_NREP_LITERALVALUE.obj_len = 3; /*inistring dstr_850__CLASS_NREP_LITER*/ /*_.VALSTR___V1021*/ meltfptr[1020] = (melt_ptr_t) & cdat->dstr_850__CLASS_NREP_LITER; cdat->dstr_850__CLASS_NREP_LITER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_850__CLASS_NREP_LITER.val, "CLASS_NREP_LITERALVALUE", sizeof (cdat->dstr_850__CLASS_NREP_LITER. val) - 1); cdat->dstr_850__CLASS_NREP_LITER.val[23] = (char) 0; cdat->dstr_850__CLASS_NREP_LITER.slen = 23; MELT_LOCATION ("warmelt-normal.melt:607:/ iniobj"); /*iniobj dobj_851__CLASS_NREP_LITERALVALUE*/ /*_.VALDATA___V1022*/ meltfptr[1021] = (melt_ptr_t) & cdat->dobj_851__CLASS_NREP_LITERALVALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_851__CLASS_NREP_LITERALVALUE", 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_851__CLASS_NREP_LITERALVALUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_851__CLASS_NREP_LITERALVALUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_851__CLASS_NREP_LITERALVALUE.obj_num = MELTOBMAG_OBJECT; cdat->dobj_851__CLASS_NREP_LITERALVALUE.obj_hash = 963631445; cdat->dobj_851__CLASS_NREP_LITERALVALUE.obj_len = 8; /*inistring dstr_852__CLASS_NREP_LITER*/ /*_.VALSTR___V1023*/ meltfptr[1022] = (melt_ptr_t) & cdat->dstr_852__CLASS_NREP_LITER; cdat->dstr_852__CLASS_NREP_LITER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_852__CLASS_NREP_LITER.val, "CLASS_NREP_LITERALVALUE", sizeof (cdat->dstr_852__CLASS_NREP_LITER. val) - 1); cdat->dstr_852__CLASS_NREP_LITER.val[23] = (char) 0; cdat->dstr_852__CLASS_NREP_LITER.slen = 23; /*inimult dtup_853__CLASS_NREP_LITERALVALUE */ /*_.VALTUP___V1024*/ meltfptr[1023] = (melt_ptr_t) & cdat->dtup_853__CLASS_NREP_LITERALVALUE; cdat->dtup_853__CLASS_NREP_LITERALVALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_853__CLASS_NREP_LITERALVALUE.nbval = 3; /*inimult dtup_854__CLASS_NREP_LITERALVALUE */ /*_.VALTUP___V1027*/ meltfptr[1026] = (melt_ptr_t) & cdat->dtup_854__CLASS_NREP_LITERALVALUE; cdat->dtup_854__CLASS_NREP_LITERALVALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_854__CLASS_NREP_LITERALVALUE.nbval = 2; /*iniobj dsym_855__NLITVAL_REGVAL*/ /*uniqueobj*/ if (! /*_.VALDATA___V1028*/ meltfptr[1027]) /*_.VALDATA___V1028*/ meltfptr[1027] = (melt_ptr_t) & cdat->dsym_855__NLITVAL_REGVAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_855__NLITVAL_REGVAL", melt_magic_discr ((melt_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__NLITVAL_REGVAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_855__NLITVAL_REGVAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_855__NLITVAL_REGVAL.obj_hash = 831040547; cdat->dsym_855__NLITVAL_REGVAL.obj_len = 3; /*inistring dstr_856__NLITVAL_REGVAL*/ /*_.VALSTR___V1029*/ meltfptr[1028] = (melt_ptr_t) & cdat->dstr_856__NLITVAL_REGVAL; cdat->dstr_856__NLITVAL_REGVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_856__NLITVAL_REGVAL.val, "NLITVAL_REGVAL", sizeof (cdat->dstr_856__NLITVAL_REGVAL.val) - 1); cdat->dstr_856__NLITVAL_REGVAL.val[14] = (char) 0; cdat->dstr_856__NLITVAL_REGVAL.slen = 14; /*^iniobj */ /*iniobj dobj_857__NLITVAL_REGVAL*/ /*_.VALDATA___V1025*/ meltfptr[1024] = (melt_ptr_t) & cdat->dobj_857__NLITVAL_REGVAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_857__NLITVAL_REGVAL", 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__NLITVAL_REGVAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_857__NLITVAL_REGVAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_857__NLITVAL_REGVAL.obj_num = 1; cdat->dobj_857__NLITVAL_REGVAL.obj_hash = 569593296; cdat->dobj_857__NLITVAL_REGVAL.obj_len = 4; /*inistring dstr_858__NLITVAL_REGVAL*/ /*_.VALSTR___V1026*/ meltfptr[1025] = (melt_ptr_t) & cdat->dstr_858__NLITVAL_REGVAL; cdat->dstr_858__NLITVAL_REGVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_858__NLITVAL_REGVAL.val, "NLITVAL_REGVAL", sizeof (cdat->dstr_858__NLITVAL_REGVAL.val) - 1); cdat->dstr_858__NLITVAL_REGVAL.val[14] = (char) 0; cdat->dstr_858__NLITVAL_REGVAL.slen = 14; /*iniobj dsym_859__CLASS_NREP_LITERALNAMEDVALUE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1030*/ meltfptr[1029]) /*_.VALDATA___V1030*/ meltfptr[1029] = (melt_ptr_t) & cdat->dsym_859__CLASS_NREP_LITERALNAMEDVALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_859__CLASS_NREP_LITERALNAMEDVALUE", melt_magic_discr ((melt_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__CLASS_NREP_LITERALNAMEDVALUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_859__CLASS_NREP_LITERALNAMEDVALUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_859__CLASS_NREP_LITERALNAMEDVALUE.obj_hash = 289245242; cdat->dsym_859__CLASS_NREP_LITERALNAMEDVALUE.obj_len = 3; /*inistring dstr_860__CLASS_NREP_LITER*/ /*_.VALSTR___V1031*/ meltfptr[1030] = (melt_ptr_t) & cdat->dstr_860__CLASS_NREP_LITER; cdat->dstr_860__CLASS_NREP_LITER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_860__CLASS_NREP_LITER.val, "CLASS_NREP_LITERALNAMEDVALUE", sizeof (cdat->dstr_860__CLASS_NREP_LITER. val) - 1); cdat->dstr_860__CLASS_NREP_LITER.val[28] = (char) 0; cdat->dstr_860__CLASS_NREP_LITER.slen = 28; MELT_LOCATION ("warmelt-normal.melt:613:/ iniobj"); /*iniobj dobj_861__CLASS_NREP_LITERALNAMEDVALUE*/ /*_.VALDATA___V1032*/ meltfptr[1031] = (melt_ptr_t) & cdat->dobj_861__CLASS_NREP_LITERALNAMEDVALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_861__CLASS_NREP_LITERALNAMEDVALUE", 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_861__CLASS_NREP_LITERALNAMEDVALUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_861__CLASS_NREP_LITERALNAMEDVALUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_861__CLASS_NREP_LITERALNAMEDVALUE.obj_num = MELTOBMAG_OBJECT; cdat->dobj_861__CLASS_NREP_LITERALNAMEDVALUE.obj_hash = 280149938; cdat->dobj_861__CLASS_NREP_LITERALNAMEDVALUE.obj_len = 8; /*inistring dstr_862__CLASS_NREP_LITER*/ /*_.VALSTR___V1033*/ meltfptr[1032] = (melt_ptr_t) & cdat->dstr_862__CLASS_NREP_LITER; cdat->dstr_862__CLASS_NREP_LITER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_862__CLASS_NREP_LITER.val, "CLASS_NREP_LITERALNAMEDVALUE", sizeof (cdat->dstr_862__CLASS_NREP_LITER. val) - 1); cdat->dstr_862__CLASS_NREP_LITER.val[28] = (char) 0; cdat->dstr_862__CLASS_NREP_LITER.slen = 28; /*inimult dtup_863__CLASS_NREP_LITERALNAMEDVALUE */ /*_.VALTUP___V1034*/ meltfptr[1033] = (melt_ptr_t) & cdat->dtup_863__CLASS_NREP_LITERALNAMEDVALUE; cdat->dtup_863__CLASS_NREP_LITERALNAMEDVALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_863__CLASS_NREP_LITERALNAMEDVALUE.nbval = 4; /*inimult dtup_864__CLASS_NREP_LITERALNAMEDVALUE */ /*_.VALTUP___V1037*/ meltfptr[1036] = (melt_ptr_t) & cdat->dtup_864__CLASS_NREP_LITERALNAMEDVALUE; cdat->dtup_864__CLASS_NREP_LITERALNAMEDVALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_864__CLASS_NREP_LITERALNAMEDVALUE.nbval = 3; /*iniobj dsym_865__NLITVAL_SYMBOL*/ /*uniqueobj*/ if (! /*_.VALDATA___V1038*/ meltfptr[1037]) /*_.VALDATA___V1038*/ meltfptr[1037] = (melt_ptr_t) & cdat->dsym_865__NLITVAL_SYMBOL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_865__NLITVAL_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_865__NLITVAL_SYMBOL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_865__NLITVAL_SYMBOL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_865__NLITVAL_SYMBOL.obj_hash = 378054298; cdat->dsym_865__NLITVAL_SYMBOL.obj_len = 3; /*inistring dstr_866__NLITVAL_SYMBOL*/ /*_.VALSTR___V1039*/ meltfptr[1038] = (melt_ptr_t) & cdat->dstr_866__NLITVAL_SYMBOL; cdat->dstr_866__NLITVAL_SYMBOL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_866__NLITVAL_SYMBOL.val, "NLITVAL_SYMBOL", sizeof (cdat->dstr_866__NLITVAL_SYMBOL.val) - 1); cdat->dstr_866__NLITVAL_SYMBOL.val[14] = (char) 0; cdat->dstr_866__NLITVAL_SYMBOL.slen = 14; /*^iniobj */ /*iniobj dobj_867__NLITVAL_SYMBOL*/ /*_.VALDATA___V1035*/ meltfptr[1034] = (melt_ptr_t) & cdat->dobj_867__NLITVAL_SYMBOL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_867__NLITVAL_SYMBOL", 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_867__NLITVAL_SYMBOL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_867__NLITVAL_SYMBOL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_867__NLITVAL_SYMBOL.obj_num = 2; cdat->dobj_867__NLITVAL_SYMBOL.obj_hash = 257290426; cdat->dobj_867__NLITVAL_SYMBOL.obj_len = 4; /*inistring dstr_868__NLITVAL_SYMBOL*/ /*_.VALSTR___V1036*/ meltfptr[1035] = (melt_ptr_t) & cdat->dstr_868__NLITVAL_SYMBOL; cdat->dstr_868__NLITVAL_SYMBOL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_868__NLITVAL_SYMBOL.val, "NLITVAL_SYMBOL", sizeof (cdat->dstr_868__NLITVAL_SYMBOL.val) - 1); cdat->dstr_868__NLITVAL_SYMBOL.val[14] = (char) 0; cdat->dstr_868__NLITVAL_SYMBOL.slen = 14; /*iniobj dsym_869__CLASS_NREP_SYMOCC*/ /*uniqueobj*/ if (! /*_.VALDATA___V1040*/ meltfptr[1039]) /*_.VALDATA___V1040*/ meltfptr[1039] = (melt_ptr_t) & cdat->dsym_869__CLASS_NREP_SYMOCC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_869__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_869__CLASS_NREP_SYMOCC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_869__CLASS_NREP_SYMOCC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_869__CLASS_NREP_SYMOCC.obj_hash = 643883390; cdat->dsym_869__CLASS_NREP_SYMOCC.obj_len = 3; /*inistring dstr_870__CLASS_NREP_SYMOC*/ /*_.VALSTR___V1041*/ meltfptr[1040] = (melt_ptr_t) & cdat->dstr_870__CLASS_NREP_SYMOC; cdat->dstr_870__CLASS_NREP_SYMOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_870__CLASS_NREP_SYMOC.val, "CLASS_NREP_SYMOCC", sizeof (cdat->dstr_870__CLASS_NREP_SYMOC. val) - 1); cdat->dstr_870__CLASS_NREP_SYMOC.val[17] = (char) 0; cdat->dstr_870__CLASS_NREP_SYMOC.slen = 17; MELT_LOCATION ("warmelt-normal.melt:619:/ iniobj"); /*iniobj dobj_871__CLASS_NREP_SYMOCC*/ /*_.VALDATA___V1042*/ meltfptr[1041] = (melt_ptr_t) & cdat->dobj_871__CLASS_NREP_SYMOCC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_871__CLASS_NREP_SYMOCC", 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_871__CLASS_NREP_SYMOCC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_871__CLASS_NREP_SYMOCC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_871__CLASS_NREP_SYMOCC.obj_num = MELTOBMAG_OBJECT; cdat->dobj_871__CLASS_NREP_SYMOCC.obj_hash = 179427513; cdat->dobj_871__CLASS_NREP_SYMOCC.obj_len = 8; /*inistring dstr_872__CLASS_NREP_SYMOC*/ /*_.VALSTR___V1043*/ meltfptr[1042] = (melt_ptr_t) & cdat->dstr_872__CLASS_NREP_SYMOC; cdat->dstr_872__CLASS_NREP_SYMOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_872__CLASS_NREP_SYMOC.val, "CLASS_NREP_SYMOCC", sizeof (cdat->dstr_872__CLASS_NREP_SYMOC. val) - 1); cdat->dstr_872__CLASS_NREP_SYMOC.val[17] = (char) 0; cdat->dstr_872__CLASS_NREP_SYMOC.slen = 17; /*inimult dtup_873__CLASS_NREP_SYMOCC */ /*_.VALTUP___V1044*/ meltfptr[1043] = (melt_ptr_t) & cdat->dtup_873__CLASS_NREP_SYMOCC; cdat->dtup_873__CLASS_NREP_SYMOCC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_873__CLASS_NREP_SYMOCC.nbval = 3; /*inimult dtup_874__CLASS_NREP_SYMOCC */ /*_.VALTUP___V1051*/ meltfptr[1050] = (melt_ptr_t) & cdat->dtup_874__CLASS_NREP_SYMOCC; cdat->dtup_874__CLASS_NREP_SYMOCC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_874__CLASS_NREP_SYMOCC.nbval = 4; /*iniobj dsym_875__NOCC_SYMB*/ /*uniqueobj*/ if (! /*_.VALDATA___V1052*/ meltfptr[1051]) /*_.VALDATA___V1052*/ meltfptr[1051] = (melt_ptr_t) & cdat->dsym_875__NOCC_SYMB; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_875__NOCC_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_875__NOCC_SYMB", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_875__NOCC_SYMB.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_875__NOCC_SYMB.obj_hash = 597261283; cdat->dsym_875__NOCC_SYMB.obj_len = 3; /*inistring dstr_876__NOCC_SYMB*/ /*_.VALSTR___V1053*/ meltfptr[1052] = (melt_ptr_t) & cdat->dstr_876__NOCC_SYMB; cdat->dstr_876__NOCC_SYMB.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_876__NOCC_SYMB.val, "NOCC_SYMB", sizeof (cdat->dstr_876__NOCC_SYMB.val) - 1); cdat->dstr_876__NOCC_SYMB.val[9] = (char) 0; cdat->dstr_876__NOCC_SYMB.slen = 9; /*^iniobj */ /*iniobj dobj_877__NOCC_SYMB*/ /*_.VALDATA___V1045*/ meltfptr[1044] = (melt_ptr_t) & cdat->dobj_877__NOCC_SYMB; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_877__NOCC_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_877__NOCC_SYMB", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_877__NOCC_SYMB.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_877__NOCC_SYMB.obj_num = 1; cdat->dobj_877__NOCC_SYMB.obj_hash = 186068561; cdat->dobj_877__NOCC_SYMB.obj_len = 4; /*inistring dstr_878__NOCC_SYMB*/ /*_.VALSTR___V1046*/ meltfptr[1045] = (melt_ptr_t) & cdat->dstr_878__NOCC_SYMB; cdat->dstr_878__NOCC_SYMB.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_878__NOCC_SYMB.val, "NOCC_SYMB", sizeof (cdat->dstr_878__NOCC_SYMB.val) - 1); cdat->dstr_878__NOCC_SYMB.val[9] = (char) 0; cdat->dstr_878__NOCC_SYMB.slen = 9; /*iniobj dsym_879__NOCC_CTYP*/ /*uniqueobj*/ if (! /*_.VALDATA___V1054*/ meltfptr[1053]) /*_.VALDATA___V1054*/ meltfptr[1053] = (melt_ptr_t) & cdat->dsym_879__NOCC_CTYP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_879__NOCC_CTYP", melt_magic_discr ((melt_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__NOCC_CTYP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_879__NOCC_CTYP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_879__NOCC_CTYP.obj_hash = 138326705; cdat->dsym_879__NOCC_CTYP.obj_len = 3; /*inistring dstr_880__NOCC_CTYP*/ /*_.VALSTR___V1055*/ meltfptr[1054] = (melt_ptr_t) & cdat->dstr_880__NOCC_CTYP; cdat->dstr_880__NOCC_CTYP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_880__NOCC_CTYP.val, "NOCC_CTYP", sizeof (cdat->dstr_880__NOCC_CTYP.val) - 1); cdat->dstr_880__NOCC_CTYP.val[9] = (char) 0; cdat->dstr_880__NOCC_CTYP.slen = 9; /*^iniobj */ /*iniobj dobj_881__NOCC_CTYP*/ /*_.VALDATA___V1047*/ meltfptr[1046] = (melt_ptr_t) & cdat->dobj_881__NOCC_CTYP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_881__NOCC_CTYP", 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_881__NOCC_CTYP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_881__NOCC_CTYP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_881__NOCC_CTYP.obj_num = 2; cdat->dobj_881__NOCC_CTYP.obj_hash = 28114430; cdat->dobj_881__NOCC_CTYP.obj_len = 4; /*inistring dstr_882__NOCC_CTYP*/ /*_.VALSTR___V1048*/ meltfptr[1047] = (melt_ptr_t) & cdat->dstr_882__NOCC_CTYP; cdat->dstr_882__NOCC_CTYP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_882__NOCC_CTYP.val, "NOCC_CTYP", sizeof (cdat->dstr_882__NOCC_CTYP.val) - 1); cdat->dstr_882__NOCC_CTYP.val[9] = (char) 0; cdat->dstr_882__NOCC_CTYP.slen = 9; /*iniobj dsym_883__NOCC_BIND*/ /*uniqueobj*/ if (! /*_.VALDATA___V1056*/ meltfptr[1055]) /*_.VALDATA___V1056*/ meltfptr[1055] = (melt_ptr_t) & cdat->dsym_883__NOCC_BIND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_883__NOCC_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_883__NOCC_BIND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_883__NOCC_BIND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_883__NOCC_BIND.obj_hash = 143816649; cdat->dsym_883__NOCC_BIND.obj_len = 3; /*inistring dstr_884__NOCC_BIND*/ /*_.VALSTR___V1057*/ meltfptr[1056] = (melt_ptr_t) & cdat->dstr_884__NOCC_BIND; cdat->dstr_884__NOCC_BIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_884__NOCC_BIND.val, "NOCC_BIND", sizeof (cdat->dstr_884__NOCC_BIND.val) - 1); cdat->dstr_884__NOCC_BIND.val[9] = (char) 0; cdat->dstr_884__NOCC_BIND.slen = 9; /*^iniobj */ /*iniobj dobj_885__NOCC_BIND*/ /*_.VALDATA___V1049*/ meltfptr[1048] = (melt_ptr_t) & cdat->dobj_885__NOCC_BIND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_885__NOCC_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_885__NOCC_BIND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_885__NOCC_BIND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_885__NOCC_BIND.obj_num = 3; cdat->dobj_885__NOCC_BIND.obj_hash = 48520172; cdat->dobj_885__NOCC_BIND.obj_len = 4; /*inistring dstr_886__NOCC_BIND*/ /*_.VALSTR___V1050*/ meltfptr[1049] = (melt_ptr_t) & cdat->dstr_886__NOCC_BIND; cdat->dstr_886__NOCC_BIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_886__NOCC_BIND.val, "NOCC_BIND", sizeof (cdat->dstr_886__NOCC_BIND.val) - 1); cdat->dstr_886__NOCC_BIND.val[9] = (char) 0; cdat->dstr_886__NOCC_BIND.slen = 9; /*iniobj dsym_887__CLASS_NREP_LOCSYMOCC*/ /*uniqueobj*/ if (! /*_.VALDATA___V1058*/ meltfptr[1057]) /*_.VALDATA___V1058*/ meltfptr[1057] = (melt_ptr_t) & cdat->dsym_887__CLASS_NREP_LOCSYMOCC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_887__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_887__CLASS_NREP_LOCSYMOCC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_887__CLASS_NREP_LOCSYMOCC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_887__CLASS_NREP_LOCSYMOCC.obj_hash = 614887922; cdat->dsym_887__CLASS_NREP_LOCSYMOCC.obj_len = 3; /*inistring dstr_888__CLASS_NREP_LOCSY*/ /*_.VALSTR___V1059*/ meltfptr[1058] = (melt_ptr_t) & cdat->dstr_888__CLASS_NREP_LOCSY; cdat->dstr_888__CLASS_NREP_LOCSY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_888__CLASS_NREP_LOCSY.val, "CLASS_NREP_LOCSYMOCC", sizeof (cdat->dstr_888__CLASS_NREP_LOCSY. val) - 1); cdat->dstr_888__CLASS_NREP_LOCSY.val[20] = (char) 0; cdat->dstr_888__CLASS_NREP_LOCSY.slen = 20; MELT_LOCATION ("warmelt-normal.melt:627:/ iniobj"); /*iniobj dobj_889__CLASS_NREP_LOCSYMOCC*/ /*_.VALDATA___V1060*/ meltfptr[1059] = (melt_ptr_t) & cdat->dobj_889__CLASS_NREP_LOCSYMOCC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_889__CLASS_NREP_LOCSYMOCC", 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_889__CLASS_NREP_LOCSYMOCC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_889__CLASS_NREP_LOCSYMOCC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_889__CLASS_NREP_LOCSYMOCC.obj_num = MELTOBMAG_OBJECT; cdat->dobj_889__CLASS_NREP_LOCSYMOCC.obj_hash = 659435927; cdat->dobj_889__CLASS_NREP_LOCSYMOCC.obj_len = 8; /*inistring dstr_890__CLASS_NREP_LOCSY*/ /*_.VALSTR___V1061*/ meltfptr[1060] = (melt_ptr_t) & cdat->dstr_890__CLASS_NREP_LOCSY; cdat->dstr_890__CLASS_NREP_LOCSY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_890__CLASS_NREP_LOCSY.val, "CLASS_NREP_LOCSYMOCC", sizeof (cdat->dstr_890__CLASS_NREP_LOCSY. val) - 1); cdat->dstr_890__CLASS_NREP_LOCSY.val[20] = (char) 0; cdat->dstr_890__CLASS_NREP_LOCSY.slen = 20; /*inimult dtup_891__CLASS_NREP_LOCSYMOCC */ /*_.VALTUP___V1062*/ meltfptr[1061] = (melt_ptr_t) & cdat->dtup_891__CLASS_NREP_LOCSYMOCC; cdat->dtup_891__CLASS_NREP_LOCSYMOCC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_891__CLASS_NREP_LOCSYMOCC.nbval = 4; /*inimult dtup_892__CLASS_NREP_LOCSYMOCC */ /*_.VALTUP___V1063*/ meltfptr[1062] = (melt_ptr_t) & cdat->dtup_892__CLASS_NREP_LOCSYMOCC; cdat->dtup_892__CLASS_NREP_LOCSYMOCC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_892__CLASS_NREP_LOCSYMOCC.nbval = 4; /*iniobj dsym_893__CLASS_NREP_CLOSEDOCC*/ /*uniqueobj*/ if (! /*_.VALDATA___V1064*/ meltfptr[1063]) /*_.VALDATA___V1064*/ meltfptr[1063] = (melt_ptr_t) & cdat->dsym_893__CLASS_NREP_CLOSEDOCC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_893__CLASS_NREP_CLOSEDOCC", melt_magic_discr ((melt_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__CLASS_NREP_CLOSEDOCC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_893__CLASS_NREP_CLOSEDOCC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_893__CLASS_NREP_CLOSEDOCC.obj_hash = 907150232; cdat->dsym_893__CLASS_NREP_CLOSEDOCC.obj_len = 3; /*inistring dstr_894__CLASS_NREP_CLOSE*/ /*_.VALSTR___V1065*/ meltfptr[1064] = (melt_ptr_t) & cdat->dstr_894__CLASS_NREP_CLOSE; cdat->dstr_894__CLASS_NREP_CLOSE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_894__CLASS_NREP_CLOSE.val, "CLASS_NREP_CLOSEDOCC", sizeof (cdat->dstr_894__CLASS_NREP_CLOSE. val) - 1); cdat->dstr_894__CLASS_NREP_CLOSE.val[20] = (char) 0; cdat->dstr_894__CLASS_NREP_CLOSE.slen = 20; MELT_LOCATION ("warmelt-normal.melt:633:/ iniobj"); /*iniobj dobj_895__CLASS_NREP_CLOSEDOCC*/ /*_.VALDATA___V1066*/ meltfptr[1065] = (melt_ptr_t) & cdat->dobj_895__CLASS_NREP_CLOSEDOCC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_895__CLASS_NREP_CLOSEDOCC", 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_895__CLASS_NREP_CLOSEDOCC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_895__CLASS_NREP_CLOSEDOCC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_895__CLASS_NREP_CLOSEDOCC.obj_num = MELTOBMAG_OBJECT; cdat->dobj_895__CLASS_NREP_CLOSEDOCC.obj_hash = 53008081; cdat->dobj_895__CLASS_NREP_CLOSEDOCC.obj_len = 8; /*inistring dstr_896__CLASS_NREP_CLOSE*/ /*_.VALSTR___V1067*/ meltfptr[1066] = (melt_ptr_t) & cdat->dstr_896__CLASS_NREP_CLOSE; cdat->dstr_896__CLASS_NREP_CLOSE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_896__CLASS_NREP_CLOSE.val, "CLASS_NREP_CLOSEDOCC", sizeof (cdat->dstr_896__CLASS_NREP_CLOSE. val) - 1); cdat->dstr_896__CLASS_NREP_CLOSE.val[20] = (char) 0; cdat->dstr_896__CLASS_NREP_CLOSE.slen = 20; /*inimult dtup_897__CLASS_NREP_CLOSEDOCC */ /*_.VALTUP___V1068*/ meltfptr[1067] = (melt_ptr_t) & cdat->dtup_897__CLASS_NREP_CLOSEDOCC; cdat->dtup_897__CLASS_NREP_CLOSEDOCC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_897__CLASS_NREP_CLOSEDOCC.nbval = 4; /*inimult dtup_898__CLASS_NREP_CLOSEDOCC */ /*_.VALTUP___V1071*/ meltfptr[1070] = (melt_ptr_t) & cdat->dtup_898__CLASS_NREP_CLOSEDOCC; cdat->dtup_898__CLASS_NREP_CLOSEDOCC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_898__CLASS_NREP_CLOSEDOCC.nbval = 5; /*iniobj dsym_899__NCLOC_PROCS*/ /*uniqueobj*/ if (! /*_.VALDATA___V1072*/ meltfptr[1071]) /*_.VALDATA___V1072*/ meltfptr[1071] = (melt_ptr_t) & cdat->dsym_899__NCLOC_PROCS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_899__NCLOC_PROCS", melt_magic_discr ((melt_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__NCLOC_PROCS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_899__NCLOC_PROCS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_899__NCLOC_PROCS.obj_hash = 863059591; cdat->dsym_899__NCLOC_PROCS.obj_len = 3; /*inistring dstr_900__NCLOC_PROCS*/ /*_.VALSTR___V1073*/ meltfptr[1072] = (melt_ptr_t) & cdat->dstr_900__NCLOC_PROCS; cdat->dstr_900__NCLOC_PROCS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_900__NCLOC_PROCS.val, "NCLOC_PROCS", sizeof (cdat->dstr_900__NCLOC_PROCS.val) - 1); cdat->dstr_900__NCLOC_PROCS.val[11] = (char) 0; cdat->dstr_900__NCLOC_PROCS.slen = 11; /*^iniobj */ /*iniobj dobj_901__NCLOC_PROCS*/ /*_.VALDATA___V1069*/ meltfptr[1068] = (melt_ptr_t) & cdat->dobj_901__NCLOC_PROCS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_901__NCLOC_PROCS", 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_901__NCLOC_PROCS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_901__NCLOC_PROCS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_901__NCLOC_PROCS.obj_num = 4; cdat->dobj_901__NCLOC_PROCS.obj_hash = 1059662214; cdat->dobj_901__NCLOC_PROCS.obj_len = 4; /*inistring dstr_902__NCLOC_PROCS*/ /*_.VALSTR___V1070*/ meltfptr[1069] = (melt_ptr_t) & cdat->dstr_902__NCLOC_PROCS; cdat->dstr_902__NCLOC_PROCS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_902__NCLOC_PROCS.val, "NCLOC_PROCS", sizeof (cdat->dstr_902__NCLOC_PROCS.val) - 1); cdat->dstr_902__NCLOC_PROCS.val[11] = (char) 0; cdat->dstr_902__NCLOC_PROCS.slen = 11; /*iniobj dsym_903__CLASS_NREP_CONSTOCC*/ /*uniqueobj*/ if (! /*_.VALDATA___V1074*/ meltfptr[1073]) /*_.VALDATA___V1074*/ meltfptr[1073] = (melt_ptr_t) & cdat->dsym_903__CLASS_NREP_CONSTOCC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_903__CLASS_NREP_CONSTOCC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_903__CLASS_NREP_CONSTOCC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_903__CLASS_NREP_CONSTOCC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_903__CLASS_NREP_CONSTOCC.obj_hash = 1065884175; cdat->dsym_903__CLASS_NREP_CONSTOCC.obj_len = 3; /*inistring dstr_904__CLASS_NREP_CONST*/ /*_.VALSTR___V1075*/ meltfptr[1074] = (melt_ptr_t) & cdat->dstr_904__CLASS_NREP_CONST; cdat->dstr_904__CLASS_NREP_CONST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_904__CLASS_NREP_CONST.val, "CLASS_NREP_CONSTOCC", sizeof (cdat->dstr_904__CLASS_NREP_CONST. val) - 1); cdat->dstr_904__CLASS_NREP_CONST.val[19] = (char) 0; cdat->dstr_904__CLASS_NREP_CONST.slen = 19; MELT_LOCATION ("warmelt-normal.melt:639:/ iniobj"); /*iniobj dobj_905__CLASS_NREP_CONSTOCC*/ /*_.VALDATA___V1076*/ meltfptr[1075] = (melt_ptr_t) & cdat->dobj_905__CLASS_NREP_CONSTOCC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_905__CLASS_NREP_CONSTOCC", 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_905__CLASS_NREP_CONSTOCC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_905__CLASS_NREP_CONSTOCC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_905__CLASS_NREP_CONSTOCC.obj_num = MELTOBMAG_OBJECT; cdat->dobj_905__CLASS_NREP_CONSTOCC.obj_hash = 958217691; cdat->dobj_905__CLASS_NREP_CONSTOCC.obj_len = 8; /*inistring dstr_906__CLASS_NREP_CONST*/ /*_.VALSTR___V1077*/ meltfptr[1076] = (melt_ptr_t) & cdat->dstr_906__CLASS_NREP_CONST; cdat->dstr_906__CLASS_NREP_CONST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_906__CLASS_NREP_CONST.val, "CLASS_NREP_CONSTOCC", sizeof (cdat->dstr_906__CLASS_NREP_CONST. val) - 1); cdat->dstr_906__CLASS_NREP_CONST.val[19] = (char) 0; cdat->dstr_906__CLASS_NREP_CONST.slen = 19; /*inimult dtup_907__CLASS_NREP_CONSTOCC */ /*_.VALTUP___V1078*/ meltfptr[1077] = (melt_ptr_t) & cdat->dtup_907__CLASS_NREP_CONSTOCC; cdat->dtup_907__CLASS_NREP_CONSTOCC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_907__CLASS_NREP_CONSTOCC.nbval = 5; /*inimult dtup_908__CLASS_NREP_CONSTOCC */ /*_.VALTUP___V1079*/ meltfptr[1078] = (melt_ptr_t) & cdat->dtup_908__CLASS_NREP_CONSTOCC; cdat->dtup_908__CLASS_NREP_CONSTOCC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_908__CLASS_NREP_CONSTOCC.nbval = 5; /*iniobj dsym_909__CLASS_NREP_QUASICONSTANT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1080*/ meltfptr[1079]) /*_.VALDATA___V1080*/ meltfptr[1079] = (melt_ptr_t) & cdat->dsym_909__CLASS_NREP_QUASICONSTANT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_909__CLASS_NREP_QUASICONSTANT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_909__CLASS_NREP_QUASICONSTANT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_909__CLASS_NREP_QUASICONSTANT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_909__CLASS_NREP_QUASICONSTANT.obj_hash = 430834528; cdat->dsym_909__CLASS_NREP_QUASICONSTANT.obj_len = 3; /*inistring dstr_910__CLASS_NREP_QUASI*/ /*_.VALSTR___V1081*/ meltfptr[1080] = (melt_ptr_t) & cdat->dstr_910__CLASS_NREP_QUASI; cdat->dstr_910__CLASS_NREP_QUASI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_910__CLASS_NREP_QUASI.val, "CLASS_NREP_QUASICONSTANT", sizeof (cdat->dstr_910__CLASS_NREP_QUASI. val) - 1); cdat->dstr_910__CLASS_NREP_QUASI.val[24] = (char) 0; cdat->dstr_910__CLASS_NREP_QUASI.slen = 24; MELT_LOCATION ("warmelt-normal.melt:645:/ iniobj"); /*iniobj dobj_911__CLASS_NREP_QUASICONSTANT*/ /*_.VALDATA___V1082*/ meltfptr[1081] = (melt_ptr_t) & cdat->dobj_911__CLASS_NREP_QUASICONSTANT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_911__CLASS_NREP_QUASICONSTANT", 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_911__CLASS_NREP_QUASICONSTANT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_911__CLASS_NREP_QUASICONSTANT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_911__CLASS_NREP_QUASICONSTANT.obj_num = MELTOBMAG_OBJECT; cdat->dobj_911__CLASS_NREP_QUASICONSTANT.obj_hash = 913144558; cdat->dobj_911__CLASS_NREP_QUASICONSTANT.obj_len = 8; /*inistring dstr_912__CLASS_NREP_QUASI*/ /*_.VALSTR___V1083*/ meltfptr[1082] = (melt_ptr_t) & cdat->dstr_912__CLASS_NREP_QUASI; cdat->dstr_912__CLASS_NREP_QUASI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_912__CLASS_NREP_QUASI.val, "CLASS_NREP_QUASICONSTANT", sizeof (cdat->dstr_912__CLASS_NREP_QUASI. val) - 1); cdat->dstr_912__CLASS_NREP_QUASI.val[24] = (char) 0; cdat->dstr_912__CLASS_NREP_QUASI.slen = 24; /*inimult dtup_913__CLASS_NREP_QUASICONSTANT */ /*_.VALTUP___V1084*/ meltfptr[1083] = (melt_ptr_t) & cdat->dtup_913__CLASS_NREP_QUASICONSTANT; cdat->dtup_913__CLASS_NREP_QUASICONSTANT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_913__CLASS_NREP_QUASICONSTANT.nbval = 3; /*inimult dtup_914__CLASS_NREP_QUASICONSTANT */ /*_.VALTUP___V1091*/ meltfptr[1090] = (melt_ptr_t) & cdat->dtup_914__CLASS_NREP_QUASICONSTANT; cdat->dtup_914__CLASS_NREP_QUASICONSTANT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_914__CLASS_NREP_QUASICONSTANT.nbval = 4; /*iniobj dsym_915__NCONST_SVAL*/ /*uniqueobj*/ if (! /*_.VALDATA___V1092*/ meltfptr[1091]) /*_.VALDATA___V1092*/ meltfptr[1091] = (melt_ptr_t) & cdat->dsym_915__NCONST_SVAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_915__NCONST_SVAL", melt_magic_discr ((melt_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__NCONST_SVAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_915__NCONST_SVAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_915__NCONST_SVAL.obj_hash = 583129471; cdat->dsym_915__NCONST_SVAL.obj_len = 3; /*inistring dstr_916__NCONST_SVAL*/ /*_.VALSTR___V1093*/ meltfptr[1092] = (melt_ptr_t) & cdat->dstr_916__NCONST_SVAL; cdat->dstr_916__NCONST_SVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_916__NCONST_SVAL.val, "NCONST_SVAL", sizeof (cdat->dstr_916__NCONST_SVAL.val) - 1); cdat->dstr_916__NCONST_SVAL.val[11] = (char) 0; cdat->dstr_916__NCONST_SVAL.slen = 11; /*^iniobj */ /*iniobj dobj_917__NCONST_SVAL*/ /*_.VALDATA___V1085*/ meltfptr[1084] = (melt_ptr_t) & cdat->dobj_917__NCONST_SVAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_917__NCONST_SVAL", 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_917__NCONST_SVAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_917__NCONST_SVAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_917__NCONST_SVAL.obj_num = 1; cdat->dobj_917__NCONST_SVAL.obj_hash = 475510816; cdat->dobj_917__NCONST_SVAL.obj_len = 4; /*inistring dstr_918__NCONST_SVAL*/ /*_.VALSTR___V1086*/ meltfptr[1085] = (melt_ptr_t) & cdat->dstr_918__NCONST_SVAL; cdat->dstr_918__NCONST_SVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_918__NCONST_SVAL.val, "NCONST_SVAL", sizeof (cdat->dstr_918__NCONST_SVAL.val) - 1); cdat->dstr_918__NCONST_SVAL.val[11] = (char) 0; cdat->dstr_918__NCONST_SVAL.slen = 11; /*iniobj dsym_919__NCONST_PROC*/ /*uniqueobj*/ if (! /*_.VALDATA___V1094*/ meltfptr[1093]) /*_.VALDATA___V1094*/ meltfptr[1093] = (melt_ptr_t) & cdat->dsym_919__NCONST_PROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_919__NCONST_PROC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_919__NCONST_PROC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_919__NCONST_PROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_919__NCONST_PROC.obj_hash = 258409049; cdat->dsym_919__NCONST_PROC.obj_len = 3; /*inistring dstr_920__NCONST_PROC*/ /*_.VALSTR___V1095*/ meltfptr[1094] = (melt_ptr_t) & cdat->dstr_920__NCONST_PROC; cdat->dstr_920__NCONST_PROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_920__NCONST_PROC.val, "NCONST_PROC", sizeof (cdat->dstr_920__NCONST_PROC.val) - 1); cdat->dstr_920__NCONST_PROC.val[11] = (char) 0; cdat->dstr_920__NCONST_PROC.slen = 11; /*^iniobj */ /*iniobj dobj_921__NCONST_PROC*/ /*_.VALDATA___V1087*/ meltfptr[1086] = (melt_ptr_t) & cdat->dobj_921__NCONST_PROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_921__NCONST_PROC", 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_921__NCONST_PROC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_921__NCONST_PROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_921__NCONST_PROC.obj_num = 2; cdat->dobj_921__NCONST_PROC.obj_hash = 68325300; cdat->dobj_921__NCONST_PROC.obj_len = 4; /*inistring dstr_922__NCONST_PROC*/ /*_.VALSTR___V1088*/ meltfptr[1087] = (melt_ptr_t) & cdat->dstr_922__NCONST_PROC; cdat->dstr_922__NCONST_PROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_922__NCONST_PROC.val, "NCONST_PROC", sizeof (cdat->dstr_922__NCONST_PROC.val) - 1); cdat->dstr_922__NCONST_PROC.val[11] = (char) 0; cdat->dstr_922__NCONST_PROC.slen = 11; /*iniobj dsym_923__NCONST_DATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V1096*/ meltfptr[1095]) /*_.VALDATA___V1096*/ meltfptr[1095] = (melt_ptr_t) & cdat->dsym_923__NCONST_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_923__NCONST_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_923__NCONST_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_923__NCONST_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_923__NCONST_DATA.obj_hash = 941031514; cdat->dsym_923__NCONST_DATA.obj_len = 3; /*inistring dstr_924__NCONST_DATA*/ /*_.VALSTR___V1097*/ meltfptr[1096] = (melt_ptr_t) & cdat->dstr_924__NCONST_DATA; cdat->dstr_924__NCONST_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_924__NCONST_DATA.val, "NCONST_DATA", sizeof (cdat->dstr_924__NCONST_DATA.val) - 1); cdat->dstr_924__NCONST_DATA.val[11] = (char) 0; cdat->dstr_924__NCONST_DATA.slen = 11; /*^iniobj */ /*iniobj dobj_925__NCONST_DATA*/ /*_.VALDATA___V1089*/ meltfptr[1088] = (melt_ptr_t) & cdat->dobj_925__NCONST_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_925__NCONST_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_925__NCONST_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_925__NCONST_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_925__NCONST_DATA.obj_num = 3; cdat->dobj_925__NCONST_DATA.obj_hash = 903933223; cdat->dobj_925__NCONST_DATA.obj_len = 4; /*inistring dstr_926__NCONST_DATA*/ /*_.VALSTR___V1090*/ meltfptr[1089] = (melt_ptr_t) & cdat->dstr_926__NCONST_DATA; cdat->dstr_926__NCONST_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_926__NCONST_DATA.val, "NCONST_DATA", sizeof (cdat->dstr_926__NCONST_DATA.val) - 1); cdat->dstr_926__NCONST_DATA.val[11] = (char) 0; cdat->dstr_926__NCONST_DATA.slen = 11; /*iniobj dsym_927__CLASS_NREP_CONSTANT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1098*/ meltfptr[1097]) /*_.VALDATA___V1098*/ meltfptr[1097] = (melt_ptr_t) & cdat->dsym_927__CLASS_NREP_CONSTANT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_927__CLASS_NREP_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_927__CLASS_NREP_CONSTANT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_927__CLASS_NREP_CONSTANT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_927__CLASS_NREP_CONSTANT.obj_hash = 348261459; cdat->dsym_927__CLASS_NREP_CONSTANT.obj_len = 3; /*inistring dstr_928__CLASS_NREP_CONST*/ /*_.VALSTR___V1099*/ meltfptr[1098] = (melt_ptr_t) & cdat->dstr_928__CLASS_NREP_CONST; cdat->dstr_928__CLASS_NREP_CONST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_928__CLASS_NREP_CONST.val, "CLASS_NREP_CONSTANT", sizeof (cdat->dstr_928__CLASS_NREP_CONST. val) - 1); cdat->dstr_928__CLASS_NREP_CONST.val[19] = (char) 0; cdat->dstr_928__CLASS_NREP_CONST.slen = 19; MELT_LOCATION ("warmelt-normal.melt:653:/ iniobj"); /*iniobj dobj_929__CLASS_NREP_CONSTANT*/ /*_.VALDATA___V1100*/ meltfptr[1099] = (melt_ptr_t) & cdat->dobj_929__CLASS_NREP_CONSTANT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_929__CLASS_NREP_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_929__CLASS_NREP_CONSTANT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_929__CLASS_NREP_CONSTANT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_929__CLASS_NREP_CONSTANT.obj_num = MELTOBMAG_OBJECT; cdat->dobj_929__CLASS_NREP_CONSTANT.obj_hash = 400419470; cdat->dobj_929__CLASS_NREP_CONSTANT.obj_len = 8; /*inistring dstr_930__CLASS_NREP_CONST*/ /*_.VALSTR___V1101*/ meltfptr[1100] = (melt_ptr_t) & cdat->dstr_930__CLASS_NREP_CONST; cdat->dstr_930__CLASS_NREP_CONST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_930__CLASS_NREP_CONST.val, "CLASS_NREP_CONSTANT", sizeof (cdat->dstr_930__CLASS_NREP_CONST. val) - 1); cdat->dstr_930__CLASS_NREP_CONST.val[19] = (char) 0; cdat->dstr_930__CLASS_NREP_CONST.slen = 19; /*inimult dtup_931__CLASS_NREP_CONSTANT */ /*_.VALTUP___V1102*/ meltfptr[1101] = (melt_ptr_t) & cdat->dtup_931__CLASS_NREP_CONSTANT; cdat->dtup_931__CLASS_NREP_CONSTANT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_931__CLASS_NREP_CONSTANT.nbval = 4; /*inimult dtup_932__CLASS_NREP_CONSTANT */ /*_.VALTUP___V1103*/ meltfptr[1102] = (melt_ptr_t) & cdat->dtup_932__CLASS_NREP_CONSTANT; cdat->dtup_932__CLASS_NREP_CONSTANT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_932__CLASS_NREP_CONSTANT.nbval = 4; /*iniobj dsym_933__CLASS_NREP_DEFINED_CONSTANT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1104*/ meltfptr[1103]) /*_.VALDATA___V1104*/ meltfptr[1103] = (melt_ptr_t) & cdat->dsym_933__CLASS_NREP_DEFINED_CONSTANT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_933__CLASS_NREP_DEFINED_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_933__CLASS_NREP_DEFINED_CONSTANT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_933__CLASS_NREP_DEFINED_CONSTANT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_933__CLASS_NREP_DEFINED_CONSTANT.obj_hash = 660592329; cdat->dsym_933__CLASS_NREP_DEFINED_CONSTANT.obj_len = 3; /*inistring dstr_934__CLASS_NREP_DEFIN*/ /*_.VALSTR___V1105*/ meltfptr[1104] = (melt_ptr_t) & cdat->dstr_934__CLASS_NREP_DEFIN; cdat->dstr_934__CLASS_NREP_DEFIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_934__CLASS_NREP_DEFIN.val, "CLASS_NREP_DEFINED_CONSTANT", sizeof (cdat->dstr_934__CLASS_NREP_DEFIN. val) - 1); cdat->dstr_934__CLASS_NREP_DEFIN.val[27] = (char) 0; cdat->dstr_934__CLASS_NREP_DEFIN.slen = 27; MELT_LOCATION ("warmelt-normal.melt:658:/ iniobj"); /*iniobj dobj_935__CLASS_NREP_DEFINED_CONSTANT*/ /*_.VALDATA___V1106*/ meltfptr[1105] = (melt_ptr_t) & cdat->dobj_935__CLASS_NREP_DEFINED_CONSTANT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_935__CLASS_NREP_DEFINED_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_935__CLASS_NREP_DEFINED_CONSTANT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_935__CLASS_NREP_DEFINED_CONSTANT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_935__CLASS_NREP_DEFINED_CONSTANT.obj_num = MELTOBMAG_OBJECT; cdat->dobj_935__CLASS_NREP_DEFINED_CONSTANT.obj_hash = 875976138; cdat->dobj_935__CLASS_NREP_DEFINED_CONSTANT.obj_len = 8; /*inistring dstr_936__CLASS_NREP_DEFIN*/ /*_.VALSTR___V1107*/ meltfptr[1106] = (melt_ptr_t) & cdat->dstr_936__CLASS_NREP_DEFIN; cdat->dstr_936__CLASS_NREP_DEFIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_936__CLASS_NREP_DEFIN.val, "CLASS_NREP_DEFINED_CONSTANT", sizeof (cdat->dstr_936__CLASS_NREP_DEFIN. val) - 1); cdat->dstr_936__CLASS_NREP_DEFIN.val[27] = (char) 0; cdat->dstr_936__CLASS_NREP_DEFIN.slen = 27; /*inimult dtup_937__CLASS_NREP_DEFINED_CONSTANT */ /*_.VALTUP___V1108*/ meltfptr[1107] = (melt_ptr_t) & cdat->dtup_937__CLASS_NREP_DEFINED_CONSTANT; cdat->dtup_937__CLASS_NREP_DEFINED_CONSTANT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_937__CLASS_NREP_DEFINED_CONSTANT.nbval = 4; /*inimult dtup_938__CLASS_NREP_DEFINED_CONSTANT */ /*_.VALTUP___V1111*/ meltfptr[1110] = (melt_ptr_t) & cdat->dtup_938__CLASS_NREP_DEFINED_CONSTANT; cdat->dtup_938__CLASS_NREP_DEFINED_CONSTANT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_938__CLASS_NREP_DEFINED_CONSTANT.nbval = 5; /*iniobj dsym_939__NCONST_DEFBIND*/ /*uniqueobj*/ if (! /*_.VALDATA___V1112*/ meltfptr[1111]) /*_.VALDATA___V1112*/ meltfptr[1111] = (melt_ptr_t) & cdat->dsym_939__NCONST_DEFBIND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_939__NCONST_DEFBIND", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_939__NCONST_DEFBIND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_939__NCONST_DEFBIND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_939__NCONST_DEFBIND.obj_hash = 33589219; cdat->dsym_939__NCONST_DEFBIND.obj_len = 3; /*inistring dstr_940__NCONST_DEFBIND*/ /*_.VALSTR___V1113*/ meltfptr[1112] = (melt_ptr_t) & cdat->dstr_940__NCONST_DEFBIND; cdat->dstr_940__NCONST_DEFBIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_940__NCONST_DEFBIND.val, "NCONST_DEFBIND", sizeof (cdat->dstr_940__NCONST_DEFBIND.val) - 1); cdat->dstr_940__NCONST_DEFBIND.val[14] = (char) 0; cdat->dstr_940__NCONST_DEFBIND.slen = 14; /*^iniobj */ /*iniobj dobj_941__NCONST_DEFBIND*/ /*_.VALDATA___V1109*/ meltfptr[1108] = (melt_ptr_t) & cdat->dobj_941__NCONST_DEFBIND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_941__NCONST_DEFBIND", 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_941__NCONST_DEFBIND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_941__NCONST_DEFBIND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_941__NCONST_DEFBIND.obj_num = 4; cdat->dobj_941__NCONST_DEFBIND.obj_hash = 111445307; cdat->dobj_941__NCONST_DEFBIND.obj_len = 4; /*inistring dstr_942__NCONST_DEFBIND*/ /*_.VALSTR___V1110*/ meltfptr[1109] = (melt_ptr_t) & cdat->dstr_942__NCONST_DEFBIND; cdat->dstr_942__NCONST_DEFBIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_942__NCONST_DEFBIND.val, "NCONST_DEFBIND", sizeof (cdat->dstr_942__NCONST_DEFBIND.val) - 1); cdat->dstr_942__NCONST_DEFBIND.val[14] = (char) 0; cdat->dstr_942__NCONST_DEFBIND.slen = 14; /*iniobj dsym_943__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1114*/ meltfptr[1113]) /*_.VALDATA___V1114*/ meltfptr[1113] = (melt_ptr_t) & cdat-> dsym_943__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_943__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_943__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_943__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER. meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_943__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER. obj_hash = 576407711; cdat->dsym_943__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER. obj_len = 3; /*inistring dstr_944__CLASS_NREP_QUASI*/ /*_.VALSTR___V1115*/ meltfptr[1114] = (melt_ptr_t) & cdat->dstr_944__CLASS_NREP_QUASI; cdat->dstr_944__CLASS_NREP_QUASI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_944__CLASS_NREP_QUASI.val, "CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER", sizeof (cdat->dstr_944__CLASS_NREP_QUASI. val) - 1); cdat->dstr_944__CLASS_NREP_QUASI.val[58] = (char) 0; cdat->dstr_944__CLASS_NREP_QUASI.slen = 58; MELT_LOCATION ("warmelt-normal.melt:665:/ iniobj"); /*iniobj dobj_945__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER*/ /*_.VALDATA___V1116*/ meltfptr[1115] = (melt_ptr_t) & cdat-> dobj_945__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_945__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER", 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_945__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_945__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER. meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_945__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER. obj_num = MELTOBMAG_OBJECT; cdat->dobj_945__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER. obj_hash = 350525904; cdat->dobj_945__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER. obj_len = 8; /*inistring dstr_946__CLASS_NREP_QUASI*/ /*_.VALSTR___V1117*/ meltfptr[1116] = (melt_ptr_t) & cdat->dstr_946__CLASS_NREP_QUASI; cdat->dstr_946__CLASS_NREP_QUASI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_946__CLASS_NREP_QUASI.val, "CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER", sizeof (cdat->dstr_946__CLASS_NREP_QUASI. val) - 1); cdat->dstr_946__CLASS_NREP_QUASI.val[58] = (char) 0; cdat->dstr_946__CLASS_NREP_QUASI.slen = 58; /*inimult dtup_947__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ /*_.VALTUP___V1118*/ meltfptr[1117] = (melt_ptr_t) & cdat-> dtup_947__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER; cdat->dtup_947__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER. discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_947__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER. nbval = 4; /*inimult dtup_948__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ /*_.VALTUP___V1121*/ meltfptr[1120] = (melt_ptr_t) & cdat-> dtup_948__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER; cdat->dtup_948__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER. discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_948__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER. nbval = 5; /*iniobj dsym_949__NQCMEC_COMMENT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1122*/ meltfptr[1121]) /*_.VALDATA___V1122*/ meltfptr[1121] = (melt_ptr_t) & cdat->dsym_949__NQCMEC_COMMENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_949__NQCMEC_COMMENT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_949__NQCMEC_COMMENT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_949__NQCMEC_COMMENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_949__NQCMEC_COMMENT.obj_hash = 49807455; cdat->dsym_949__NQCMEC_COMMENT.obj_len = 3; /*inistring dstr_950__NQCMEC_COMMENT*/ /*_.VALSTR___V1123*/ meltfptr[1122] = (melt_ptr_t) & cdat->dstr_950__NQCMEC_COMMENT; cdat->dstr_950__NQCMEC_COMMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_950__NQCMEC_COMMENT.val, "NQCMEC_COMMENT", sizeof (cdat->dstr_950__NQCMEC_COMMENT.val) - 1); cdat->dstr_950__NQCMEC_COMMENT.val[14] = (char) 0; cdat->dstr_950__NQCMEC_COMMENT.slen = 14; /*^iniobj */ /*iniobj dobj_951__NQCMEC_COMMENT*/ /*_.VALDATA___V1119*/ meltfptr[1118] = (melt_ptr_t) & cdat->dobj_951__NQCMEC_COMMENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_951__NQCMEC_COMMENT", 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_951__NQCMEC_COMMENT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_951__NQCMEC_COMMENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_951__NQCMEC_COMMENT.obj_num = 4; cdat->dobj_951__NQCMEC_COMMENT.obj_hash = 649645132; cdat->dobj_951__NQCMEC_COMMENT.obj_len = 4; /*inistring dstr_952__NQCMEC_COMMENT*/ /*_.VALSTR___V1120*/ meltfptr[1119] = (melt_ptr_t) & cdat->dstr_952__NQCMEC_COMMENT; cdat->dstr_952__NQCMEC_COMMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_952__NQCMEC_COMMENT.val, "NQCMEC_COMMENT", sizeof (cdat->dstr_952__NQCMEC_COMMENT.val) - 1); cdat->dstr_952__NQCMEC_COMMENT.val[14] = (char) 0; cdat->dstr_952__NQCMEC_COMMENT.slen = 14; /*iniobj dsym_953__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1124*/ meltfptr[1123]) /*_.VALDATA___V1124*/ meltfptr[1123] = (melt_ptr_t) & cdat-> dsym_953__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_953__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER", melt_magic_discr ((melt_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__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_953__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER. meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_953__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER. obj_hash = 940676789; cdat->dsym_953__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER. obj_len = 3; /*inistring dstr_954__CLASS_NREP_QUASI*/ /*_.VALSTR___V1125*/ meltfptr[1124] = (melt_ptr_t) & cdat->dstr_954__CLASS_NREP_QUASI; cdat->dstr_954__CLASS_NREP_QUASI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_954__CLASS_NREP_QUASI.val, "CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER", sizeof (cdat->dstr_954__CLASS_NREP_QUASI. val) - 1); cdat->dstr_954__CLASS_NREP_QUASI.val[57] = (char) 0; cdat->dstr_954__CLASS_NREP_QUASI.slen = 57; MELT_LOCATION ("warmelt-normal.melt:672:/ iniobj"); /*iniobj dobj_955__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER*/ /*_.VALDATA___V1126*/ meltfptr[1125] = (melt_ptr_t) & cdat-> dobj_955__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_955__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER", 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_955__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_955__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER. meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_955__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER. obj_num = MELTOBMAG_OBJECT; cdat->dobj_955__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER. obj_hash = 593696932; cdat->dobj_955__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER. obj_len = 8; /*inistring dstr_956__CLASS_NREP_QUASI*/ /*_.VALSTR___V1127*/ meltfptr[1126] = (melt_ptr_t) & cdat->dstr_956__CLASS_NREP_QUASI; cdat->dstr_956__CLASS_NREP_QUASI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_956__CLASS_NREP_QUASI.val, "CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER", sizeof (cdat->dstr_956__CLASS_NREP_QUASI. val) - 1); cdat->dstr_956__CLASS_NREP_QUASI.val[57] = (char) 0; cdat->dstr_956__CLASS_NREP_QUASI.slen = 57; /*inimult dtup_957__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ /*_.VALTUP___V1128*/ meltfptr[1127] = (melt_ptr_t) & cdat-> dtup_957__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER; cdat->dtup_957__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER. discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_957__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER. nbval = 3; /*inimult dtup_958__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ /*_.VALTUP___V1129*/ meltfptr[1128] = (melt_ptr_t) & cdat-> dtup_958__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER; cdat->dtup_958__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER. discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_958__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER. nbval = 1; /*iniobj dsym_959__CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1130*/ meltfptr[1129]) /*_.VALDATA___V1130*/ meltfptr[1129] = (melt_ptr_t) & cdat-> dsym_959__CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_959__CLASS_NREP_QUASICONST_PARENT_MODULE_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_959__CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_959__CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT. meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_959__CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT.obj_hash = 414632902; cdat->dsym_959__CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT.obj_len = 3; /*inistring dstr_960__CLASS_NREP_QUASI*/ /*_.VALSTR___V1131*/ meltfptr[1130] = (melt_ptr_t) & cdat->dstr_960__CLASS_NREP_QUASI; cdat->dstr_960__CLASS_NREP_QUASI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_960__CLASS_NREP_QUASI.val, "CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT", sizeof (cdat->dstr_960__CLASS_NREP_QUASI. val) - 1); cdat->dstr_960__CLASS_NREP_QUASI.val[47] = (char) 0; cdat->dstr_960__CLASS_NREP_QUASI.slen = 47; MELT_LOCATION ("warmelt-normal.melt:678:/ iniobj"); /*iniobj dobj_961__CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT*/ /*_.VALDATA___V1132*/ meltfptr[1131] = (melt_ptr_t) & cdat-> dobj_961__CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_961__CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT", 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_961__CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_961__CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT. meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_961__CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT.obj_num = MELTOBMAG_OBJECT; cdat->dobj_961__CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT.obj_hash = 380048581; cdat->dobj_961__CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT.obj_len = 8; /*inistring dstr_962__CLASS_NREP_QUASI*/ /*_.VALSTR___V1133*/ meltfptr[1132] = (melt_ptr_t) & cdat->dstr_962__CLASS_NREP_QUASI; cdat->dstr_962__CLASS_NREP_QUASI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_962__CLASS_NREP_QUASI.val, "CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT", sizeof (cdat->dstr_962__CLASS_NREP_QUASI. val) - 1); cdat->dstr_962__CLASS_NREP_QUASI.val[47] = (char) 0; cdat->dstr_962__CLASS_NREP_QUASI.slen = 47; /*inimult dtup_963__CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT */ /*_.VALTUP___V1134*/ meltfptr[1133] = (melt_ptr_t) & cdat-> dtup_963__CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT; cdat->dtup_963__CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_963__CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT.nbval = 4; /*inimult dtup_964__CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT */ /*_.VALTUP___V1135*/ meltfptr[1134] = (melt_ptr_t) & cdat-> dtup_964__CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT; cdat->dtup_964__CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_964__CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT.nbval = 4; /*iniobj dsym_965__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1136*/ meltfptr[1135]) /*_.VALDATA___V1136*/ meltfptr[1135] = (melt_ptr_t) & cdat-> dsym_965__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_965__CLASS_NREP_QUASIDATA_PARENT_MODULE_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_965__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_965__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT. meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_965__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT.obj_hash = 876593992; cdat->dsym_965__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT.obj_len = 3; /*inistring dstr_966__CLASS_NREP_QUASI*/ /*_.VALSTR___V1137*/ meltfptr[1136] = (melt_ptr_t) & cdat->dstr_966__CLASS_NREP_QUASI; cdat->dstr_966__CLASS_NREP_QUASI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_966__CLASS_NREP_QUASI.val, "CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT", sizeof (cdat->dstr_966__CLASS_NREP_QUASI. val) - 1); cdat->dstr_966__CLASS_NREP_QUASI.val[46] = (char) 0; cdat->dstr_966__CLASS_NREP_QUASI.slen = 46; MELT_LOCATION ("warmelt-normal.melt:684:/ iniobj"); /*iniobj dobj_967__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT*/ /*_.VALDATA___V1138*/ meltfptr[1137] = (melt_ptr_t) & cdat-> dobj_967__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_967__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT", 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_967__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_967__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT. meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_967__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT.obj_num = MELTOBMAG_OBJECT; cdat->dobj_967__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT.obj_hash = 349573115; cdat->dobj_967__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT.obj_len = 8; /*inistring dstr_968__CLASS_NREP_QUASI*/ /*_.VALSTR___V1139*/ meltfptr[1138] = (melt_ptr_t) & cdat->dstr_968__CLASS_NREP_QUASI; cdat->dstr_968__CLASS_NREP_QUASI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_968__CLASS_NREP_QUASI.val, "CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT", sizeof (cdat->dstr_968__CLASS_NREP_QUASI. val) - 1); cdat->dstr_968__CLASS_NREP_QUASI.val[46] = (char) 0; cdat->dstr_968__CLASS_NREP_QUASI.slen = 46; /*inimult dtup_969__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT */ /*_.VALTUP___V1140*/ meltfptr[1139] = (melt_ptr_t) & cdat-> dtup_969__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT; cdat->dtup_969__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_969__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT.nbval = 3; /*inimult dtup_970__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT */ /*_.VALTUP___V1141*/ meltfptr[1140] = (melt_ptr_t) & cdat-> dtup_970__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT; cdat->dtup_970__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_970__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT.nbval = 1; /*iniobj dsym_971__CLASS_NREP_FIELDACC*/ /*uniqueobj*/ if (! /*_.VALDATA___V1142*/ meltfptr[1141]) /*_.VALDATA___V1142*/ meltfptr[1141] = (melt_ptr_t) & cdat->dsym_971__CLASS_NREP_FIELDACC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_971__CLASS_NREP_FIELDACC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_971__CLASS_NREP_FIELDACC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_971__CLASS_NREP_FIELDACC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_971__CLASS_NREP_FIELDACC.obj_hash = 571372072; cdat->dsym_971__CLASS_NREP_FIELDACC.obj_len = 3; /*inistring dstr_972__CLASS_NREP_FIELD*/ /*_.VALSTR___V1143*/ meltfptr[1142] = (melt_ptr_t) & cdat->dstr_972__CLASS_NREP_FIELD; cdat->dstr_972__CLASS_NREP_FIELD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_972__CLASS_NREP_FIELD.val, "CLASS_NREP_FIELDACC", sizeof (cdat->dstr_972__CLASS_NREP_FIELD. val) - 1); cdat->dstr_972__CLASS_NREP_FIELD.val[19] = (char) 0; cdat->dstr_972__CLASS_NREP_FIELD.slen = 19; MELT_LOCATION ("warmelt-normal.melt:692:/ iniobj"); /*iniobj dobj_973__CLASS_NREP_FIELDACC*/ /*_.VALDATA___V1144*/ meltfptr[1143] = (melt_ptr_t) & cdat->dobj_973__CLASS_NREP_FIELDACC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_973__CLASS_NREP_FIELDACC", 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_973__CLASS_NREP_FIELDACC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_973__CLASS_NREP_FIELDACC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_973__CLASS_NREP_FIELDACC.obj_num = MELTOBMAG_OBJECT; cdat->dobj_973__CLASS_NREP_FIELDACC.obj_hash = 937204326; cdat->dobj_973__CLASS_NREP_FIELDACC.obj_len = 8; /*inistring dstr_974__CLASS_NREP_FIELD*/ /*_.VALSTR___V1145*/ meltfptr[1144] = (melt_ptr_t) & cdat->dstr_974__CLASS_NREP_FIELD; cdat->dstr_974__CLASS_NREP_FIELD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_974__CLASS_NREP_FIELD.val, "CLASS_NREP_FIELDACC", sizeof (cdat->dstr_974__CLASS_NREP_FIELD. val) - 1); cdat->dstr_974__CLASS_NREP_FIELD.val[19] = (char) 0; cdat->dstr_974__CLASS_NREP_FIELD.slen = 19; /*inimult dtup_975__CLASS_NREP_FIELDACC */ /*_.VALTUP___V1146*/ meltfptr[1145] = (melt_ptr_t) & cdat->dtup_975__CLASS_NREP_FIELDACC; cdat->dtup_975__CLASS_NREP_FIELDACC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_975__CLASS_NREP_FIELDACC.nbval = 3; /*inimult dtup_976__CLASS_NREP_FIELDACC */ /*_.VALTUP___V1151*/ meltfptr[1150] = (melt_ptr_t) & cdat->dtup_976__CLASS_NREP_FIELDACC; cdat->dtup_976__CLASS_NREP_FIELDACC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_976__CLASS_NREP_FIELDACC.nbval = 3; /*iniobj dsym_977__NACCF_OBJ*/ /*uniqueobj*/ if (! /*_.VALDATA___V1152*/ meltfptr[1151]) /*_.VALDATA___V1152*/ meltfptr[1151] = (melt_ptr_t) & cdat->dsym_977__NACCF_OBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_977__NACCF_OBJ", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_977__NACCF_OBJ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_977__NACCF_OBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_977__NACCF_OBJ.obj_hash = 162780640; cdat->dsym_977__NACCF_OBJ.obj_len = 3; /*inistring dstr_978__NACCF_OBJ*/ /*_.VALSTR___V1153*/ meltfptr[1152] = (melt_ptr_t) & cdat->dstr_978__NACCF_OBJ; cdat->dstr_978__NACCF_OBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_978__NACCF_OBJ.val, "NACCF_OBJ", sizeof (cdat->dstr_978__NACCF_OBJ.val) - 1); cdat->dstr_978__NACCF_OBJ.val[9] = (char) 0; cdat->dstr_978__NACCF_OBJ.slen = 9; /*^iniobj */ /*iniobj dobj_979__NACCF_OBJ*/ /*_.VALDATA___V1147*/ meltfptr[1146] = (melt_ptr_t) & cdat->dobj_979__NACCF_OBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_979__NACCF_OBJ", 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_979__NACCF_OBJ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_979__NACCF_OBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_979__NACCF_OBJ.obj_num = 1; cdat->dobj_979__NACCF_OBJ.obj_hash = 914778581; cdat->dobj_979__NACCF_OBJ.obj_len = 4; /*inistring dstr_980__NACCF_OBJ*/ /*_.VALSTR___V1148*/ meltfptr[1147] = (melt_ptr_t) & cdat->dstr_980__NACCF_OBJ; cdat->dstr_980__NACCF_OBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_980__NACCF_OBJ.val, "NACCF_OBJ", sizeof (cdat->dstr_980__NACCF_OBJ.val) - 1); cdat->dstr_980__NACCF_OBJ.val[9] = (char) 0; cdat->dstr_980__NACCF_OBJ.slen = 9; /*iniobj dsym_981__NACCF_FLD*/ /*uniqueobj*/ if (! /*_.VALDATA___V1154*/ meltfptr[1153]) /*_.VALDATA___V1154*/ meltfptr[1153] = (melt_ptr_t) & cdat->dsym_981__NACCF_FLD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_981__NACCF_FLD", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_981__NACCF_FLD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_981__NACCF_FLD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_981__NACCF_FLD.obj_hash = 369009460; cdat->dsym_981__NACCF_FLD.obj_len = 3; /*inistring dstr_982__NACCF_FLD*/ /*_.VALSTR___V1155*/ meltfptr[1154] = (melt_ptr_t) & cdat->dstr_982__NACCF_FLD; cdat->dstr_982__NACCF_FLD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_982__NACCF_FLD.val, "NACCF_FLD", sizeof (cdat->dstr_982__NACCF_FLD.val) - 1); cdat->dstr_982__NACCF_FLD.val[9] = (char) 0; cdat->dstr_982__NACCF_FLD.slen = 9; /*^iniobj */ /*iniobj dobj_983__NACCF_FLD*/ /*_.VALDATA___V1149*/ meltfptr[1148] = (melt_ptr_t) & cdat->dobj_983__NACCF_FLD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_983__NACCF_FLD", 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_983__NACCF_FLD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_983__NACCF_FLD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_983__NACCF_FLD.obj_num = 2; cdat->dobj_983__NACCF_FLD.obj_hash = 579740260; cdat->dobj_983__NACCF_FLD.obj_len = 4; /*inistring dstr_984__NACCF_FLD*/ /*_.VALSTR___V1150*/ meltfptr[1149] = (melt_ptr_t) & cdat->dstr_984__NACCF_FLD; cdat->dstr_984__NACCF_FLD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_984__NACCF_FLD.val, "NACCF_FLD", sizeof (cdat->dstr_984__NACCF_FLD.val) - 1); cdat->dstr_984__NACCF_FLD.val[9] = (char) 0; cdat->dstr_984__NACCF_FLD.slen = 9; /*iniobj dsym_985__CLASS_NREP_MULTACC*/ /*uniqueobj*/ if (! /*_.VALDATA___V1156*/ meltfptr[1155]) /*_.VALDATA___V1156*/ meltfptr[1155] = (melt_ptr_t) & cdat->dsym_985__CLASS_NREP_MULTACC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_985__CLASS_NREP_MULTACC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_985__CLASS_NREP_MULTACC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_985__CLASS_NREP_MULTACC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_985__CLASS_NREP_MULTACC.obj_hash = 444787444; cdat->dsym_985__CLASS_NREP_MULTACC.obj_len = 3; /*inistring dstr_986__CLASS_NREP_MULTA*/ /*_.VALSTR___V1157*/ meltfptr[1156] = (melt_ptr_t) & cdat->dstr_986__CLASS_NREP_MULTA; cdat->dstr_986__CLASS_NREP_MULTA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_986__CLASS_NREP_MULTA.val, "CLASS_NREP_MULTACC", sizeof (cdat->dstr_986__CLASS_NREP_MULTA. val) - 1); cdat->dstr_986__CLASS_NREP_MULTA.val[18] = (char) 0; cdat->dstr_986__CLASS_NREP_MULTA.slen = 18; MELT_LOCATION ("warmelt-normal.melt:701:/ iniobj"); /*iniobj dobj_987__CLASS_NREP_MULTACC*/ /*_.VALDATA___V1158*/ meltfptr[1157] = (melt_ptr_t) & cdat->dobj_987__CLASS_NREP_MULTACC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_987__CLASS_NREP_MULTACC", 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_987__CLASS_NREP_MULTACC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_987__CLASS_NREP_MULTACC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_987__CLASS_NREP_MULTACC.obj_num = MELTOBMAG_OBJECT; cdat->dobj_987__CLASS_NREP_MULTACC.obj_hash = 480339070; cdat->dobj_987__CLASS_NREP_MULTACC.obj_len = 8; /*inistring dstr_988__CLASS_NREP_MULTA*/ /*_.VALSTR___V1159*/ meltfptr[1158] = (melt_ptr_t) & cdat->dstr_988__CLASS_NREP_MULTA; cdat->dstr_988__CLASS_NREP_MULTA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_988__CLASS_NREP_MULTA.val, "CLASS_NREP_MULTACC", sizeof (cdat->dstr_988__CLASS_NREP_MULTA. val) - 1); cdat->dstr_988__CLASS_NREP_MULTA.val[18] = (char) 0; cdat->dstr_988__CLASS_NREP_MULTA.slen = 18; /*inimult dtup_989__CLASS_NREP_MULTACC */ /*_.VALTUP___V1160*/ meltfptr[1159] = (melt_ptr_t) & cdat->dtup_989__CLASS_NREP_MULTACC; cdat->dtup_989__CLASS_NREP_MULTACC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_989__CLASS_NREP_MULTACC.nbval = 3; /*inimult dtup_990__CLASS_NREP_MULTACC */ /*_.VALTUP___V1165*/ meltfptr[1164] = (melt_ptr_t) & cdat->dtup_990__CLASS_NREP_MULTACC; cdat->dtup_990__CLASS_NREP_MULTACC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_990__CLASS_NREP_MULTACC.nbval = 3; /*iniobj dsym_991__NACCM_MUL*/ /*uniqueobj*/ if (! /*_.VALDATA___V1166*/ meltfptr[1165]) /*_.VALDATA___V1166*/ meltfptr[1165] = (melt_ptr_t) & cdat->dsym_991__NACCM_MUL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_991__NACCM_MUL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_991__NACCM_MUL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_991__NACCM_MUL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_991__NACCM_MUL.obj_hash = 962511195; cdat->dsym_991__NACCM_MUL.obj_len = 3; /*inistring dstr_992__NACCM_MUL*/ /*_.VALSTR___V1167*/ meltfptr[1166] = (melt_ptr_t) & cdat->dstr_992__NACCM_MUL; cdat->dstr_992__NACCM_MUL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_992__NACCM_MUL.val, "NACCM_MUL", sizeof (cdat->dstr_992__NACCM_MUL.val) - 1); cdat->dstr_992__NACCM_MUL.val[9] = (char) 0; cdat->dstr_992__NACCM_MUL.slen = 9; /*^iniobj */ /*iniobj dobj_993__NACCM_MUL*/ /*_.VALDATA___V1161*/ meltfptr[1160] = (melt_ptr_t) & cdat->dobj_993__NACCM_MUL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_993__NACCM_MUL", 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_993__NACCM_MUL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_993__NACCM_MUL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_993__NACCM_MUL.obj_num = 1; cdat->dobj_993__NACCM_MUL.obj_hash = 485491872; cdat->dobj_993__NACCM_MUL.obj_len = 4; /*inistring dstr_994__NACCM_MUL*/ /*_.VALSTR___V1162*/ meltfptr[1161] = (melt_ptr_t) & cdat->dstr_994__NACCM_MUL; cdat->dstr_994__NACCM_MUL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_994__NACCM_MUL.val, "NACCM_MUL", sizeof (cdat->dstr_994__NACCM_MUL.val) - 1); cdat->dstr_994__NACCM_MUL.val[9] = (char) 0; cdat->dstr_994__NACCM_MUL.slen = 9; /*iniobj dsym_995__NACCM_IX*/ /*uniqueobj*/ if (! /*_.VALDATA___V1168*/ meltfptr[1167]) /*_.VALDATA___V1168*/ meltfptr[1167] = (melt_ptr_t) & cdat->dsym_995__NACCM_IX; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_995__NACCM_IX", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_995__NACCM_IX", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_995__NACCM_IX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_995__NACCM_IX.obj_hash = 79547630; cdat->dsym_995__NACCM_IX.obj_len = 3; /*inistring dstr_996__NACCM_IX*/ /*_.VALSTR___V1169*/ meltfptr[1168] = (melt_ptr_t) & cdat->dstr_996__NACCM_IX; cdat->dstr_996__NACCM_IX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_996__NACCM_IX.val, "NACCM_IX", sizeof (cdat->dstr_996__NACCM_IX.val) - 1); cdat->dstr_996__NACCM_IX.val[8] = (char) 0; cdat->dstr_996__NACCM_IX.slen = 8; /*^iniobj */ /*iniobj dobj_997__NACCM_IX*/ /*_.VALDATA___V1163*/ meltfptr[1162] = (melt_ptr_t) & cdat->dobj_997__NACCM_IX; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_997__NACCM_IX", 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_997__NACCM_IX", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_997__NACCM_IX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_997__NACCM_IX.obj_num = 2; cdat->dobj_997__NACCM_IX.obj_hash = 1028468221; cdat->dobj_997__NACCM_IX.obj_len = 4; /*inistring dstr_998__NACCM_IX*/ /*_.VALSTR___V1164*/ meltfptr[1163] = (melt_ptr_t) & cdat->dstr_998__NACCM_IX; cdat->dstr_998__NACCM_IX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_998__NACCM_IX.val, "NACCM_IX", sizeof (cdat->dstr_998__NACCM_IX.val) - 1); cdat->dstr_998__NACCM_IX.val[8] = (char) 0; cdat->dstr_998__NACCM_IX.slen = 8; /*iniobj dsym_999__CLASS_NREP_STORE_PREDEFINED*/ /*uniqueobj*/ if (! /*_.VALDATA___V1170*/ meltfptr[1169]) /*_.VALDATA___V1170*/ meltfptr[1169] = (melt_ptr_t) & cdat->dsym_999__CLASS_NREP_STORE_PREDEFINED; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_999__CLASS_NREP_STORE_PREDEFINED", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_999__CLASS_NREP_STORE_PREDEFINED", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_999__CLASS_NREP_STORE_PREDEFINED.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_999__CLASS_NREP_STORE_PREDEFINED.obj_hash = 391152767; cdat->dsym_999__CLASS_NREP_STORE_PREDEFINED.obj_len = 3; /*inistring dstr_1000__CLASS_NREP_STORE*/ /*_.VALSTR___V1171*/ meltfptr[1170] = (melt_ptr_t) & cdat->dstr_1000__CLASS_NREP_STORE; cdat->dstr_1000__CLASS_NREP_STORE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1000__CLASS_NREP_STORE.val, "CLASS_NREP_STORE_PREDEFINED", sizeof (cdat->dstr_1000__CLASS_NREP_STORE. val) - 1); cdat->dstr_1000__CLASS_NREP_STORE.val[27] = (char) 0; cdat->dstr_1000__CLASS_NREP_STORE.slen = 27; MELT_LOCATION ("warmelt-normal.melt:708:/ iniobj"); /*iniobj dobj_1001__CLASS_NREP_STORE_PREDEFINED*/ /*_.VALDATA___V1172*/ meltfptr[1171] = (melt_ptr_t) & cdat->dobj_1001__CLASS_NREP_STORE_PREDEFINED; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1001__CLASS_NREP_STORE_PREDEFINED", 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_1001__CLASS_NREP_STORE_PREDEFINED", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1001__CLASS_NREP_STORE_PREDEFINED.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_1001__CLASS_NREP_STORE_PREDEFINED.obj_num = MELTOBMAG_OBJECT; cdat->dobj_1001__CLASS_NREP_STORE_PREDEFINED.obj_hash = 436925964; cdat->dobj_1001__CLASS_NREP_STORE_PREDEFINED.obj_len = 8; /*inistring dstr_1002__CLASS_NREP_STORE*/ /*_.VALSTR___V1173*/ meltfptr[1172] = (melt_ptr_t) & cdat->dstr_1002__CLASS_NREP_STORE; cdat->dstr_1002__CLASS_NREP_STORE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1002__CLASS_NREP_STORE.val, "CLASS_NREP_STORE_PREDEFINED", sizeof (cdat->dstr_1002__CLASS_NREP_STORE. val) - 1); cdat->dstr_1002__CLASS_NREP_STORE.val[27] = (char) 0; cdat->dstr_1002__CLASS_NREP_STORE.slen = 27; /*inimult dtup_1003__CLASS_NREP_STORE_PREDEFINED */ /*_.VALTUP___V1174*/ meltfptr[1173] = (melt_ptr_t) & cdat->dtup_1003__CLASS_NREP_STORE_PREDEFINED; cdat->dtup_1003__CLASS_NREP_STORE_PREDEFINED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_1003__CLASS_NREP_STORE_PREDEFINED.nbval = 3; /*inimult dtup_1004__CLASS_NREP_STORE_PREDEFINED */ /*_.VALTUP___V1179*/ meltfptr[1178] = (melt_ptr_t) & cdat->dtup_1004__CLASS_NREP_STORE_PREDEFINED; cdat->dtup_1004__CLASS_NREP_STORE_PREDEFINED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_1004__CLASS_NREP_STORE_PREDEFINED.nbval = 3; /*iniobj dsym_1005__NSTPD_PREDEF*/ /*uniqueobj*/ if (! /*_.VALDATA___V1180*/ meltfptr[1179]) /*_.VALDATA___V1180*/ meltfptr[1179] = (melt_ptr_t) & cdat->dsym_1005__NSTPD_PREDEF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1005__NSTPD_PREDEF", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1005__NSTPD_PREDEF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1005__NSTPD_PREDEF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1005__NSTPD_PREDEF.obj_hash = 3064350; cdat->dsym_1005__NSTPD_PREDEF.obj_len = 3; /*inistring dstr_1006__NSTPD_PREDEF*/ /*_.VALSTR___V1181*/ meltfptr[1180] = (melt_ptr_t) & cdat->dstr_1006__NSTPD_PREDEF; cdat->dstr_1006__NSTPD_PREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1006__NSTPD_PREDEF.val, "NSTPD_PREDEF", sizeof (cdat->dstr_1006__NSTPD_PREDEF.val) - 1); cdat->dstr_1006__NSTPD_PREDEF.val[12] = (char) 0; cdat->dstr_1006__NSTPD_PREDEF.slen = 12; /*^iniobj */ /*iniobj dobj_1007__NSTPD_PREDEF*/ /*_.VALDATA___V1175*/ meltfptr[1174] = (melt_ptr_t) & cdat->dobj_1007__NSTPD_PREDEF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1007__NSTPD_PREDEF", 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_1007__NSTPD_PREDEF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1007__NSTPD_PREDEF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1007__NSTPD_PREDEF.obj_num = 1; cdat->dobj_1007__NSTPD_PREDEF.obj_hash = 593516466; cdat->dobj_1007__NSTPD_PREDEF.obj_len = 4; /*inistring dstr_1008__NSTPD_PREDEF*/ /*_.VALSTR___V1176*/ meltfptr[1175] = (melt_ptr_t) & cdat->dstr_1008__NSTPD_PREDEF; cdat->dstr_1008__NSTPD_PREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1008__NSTPD_PREDEF.val, "NSTPD_PREDEF", sizeof (cdat->dstr_1008__NSTPD_PREDEF.val) - 1); cdat->dstr_1008__NSTPD_PREDEF.val[12] = (char) 0; cdat->dstr_1008__NSTPD_PREDEF.slen = 12; /*iniobj dsym_1009__NSTPD_VALUE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1182*/ meltfptr[1181]) /*_.VALDATA___V1182*/ meltfptr[1181] = (melt_ptr_t) & cdat->dsym_1009__NSTPD_VALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1009__NSTPD_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_1009__NSTPD_VALUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1009__NSTPD_VALUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1009__NSTPD_VALUE.obj_hash = 736128081; cdat->dsym_1009__NSTPD_VALUE.obj_len = 3; /*inistring dstr_1010__NSTPD_VALUE*/ /*_.VALSTR___V1183*/ meltfptr[1182] = (melt_ptr_t) & cdat->dstr_1010__NSTPD_VALUE; cdat->dstr_1010__NSTPD_VALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1010__NSTPD_VALUE.val, "NSTPD_VALUE", sizeof (cdat->dstr_1010__NSTPD_VALUE.val) - 1); cdat->dstr_1010__NSTPD_VALUE.val[11] = (char) 0; cdat->dstr_1010__NSTPD_VALUE.slen = 11; /*^iniobj */ /*iniobj dobj_1011__NSTPD_VALUE*/ /*_.VALDATA___V1177*/ meltfptr[1176] = (melt_ptr_t) & cdat->dobj_1011__NSTPD_VALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1011__NSTPD_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_1011__NSTPD_VALUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1011__NSTPD_VALUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1011__NSTPD_VALUE.obj_num = 2; cdat->dobj_1011__NSTPD_VALUE.obj_hash = 1018733189; cdat->dobj_1011__NSTPD_VALUE.obj_len = 4; /*inistring dstr_1012__NSTPD_VALUE*/ /*_.VALSTR___V1178*/ meltfptr[1177] = (melt_ptr_t) & cdat->dstr_1012__NSTPD_VALUE; cdat->dstr_1012__NSTPD_VALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1012__NSTPD_VALUE.val, "NSTPD_VALUE", sizeof (cdat->dstr_1012__NSTPD_VALUE.val) - 1); cdat->dstr_1012__NSTPD_VALUE.val[11] = (char) 0; cdat->dstr_1012__NSTPD_VALUE.slen = 11; /*iniobj dsym_1013__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1184*/ meltfptr[1183]) /*_.VALDATA___V1184*/ meltfptr[1183] = (melt_ptr_t) & cdat-> dsym_1013__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1013__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1013__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1013__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER. meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1013__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER. obj_hash = 1007630346; cdat->dsym_1013__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER. obj_len = 3; /*inistring dstr_1014__CLASS_NREP_UPDAT*/ /*_.VALSTR___V1185*/ meltfptr[1184] = (melt_ptr_t) & cdat->dstr_1014__CLASS_NREP_UPDAT; cdat->dstr_1014__CLASS_NREP_UPDAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1014__CLASS_NREP_UPDAT.val, "CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER", sizeof (cdat->dstr_1014__CLASS_NREP_UPDAT. val) - 1); cdat->dstr_1014__CLASS_NREP_UPDAT.val[54] = (char) 0; cdat->dstr_1014__CLASS_NREP_UPDAT.slen = 54; MELT_LOCATION ("warmelt-normal.melt:715:/ iniobj"); /*iniobj dobj_1015__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER*/ /*_.VALDATA___V1186*/ meltfptr[1185] = (melt_ptr_t) & cdat-> dobj_1015__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1015__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER", 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_1015__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1015__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER. meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_1015__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER. obj_num = MELTOBMAG_OBJECT; cdat->dobj_1015__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER. obj_hash = 162138576; cdat->dobj_1015__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER. obj_len = 8; /*inistring dstr_1016__CLASS_NREP_UPDAT*/ /*_.VALSTR___V1187*/ meltfptr[1186] = (melt_ptr_t) & cdat->dstr_1016__CLASS_NREP_UPDAT; cdat->dstr_1016__CLASS_NREP_UPDAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1016__CLASS_NREP_UPDAT.val, "CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER", sizeof (cdat->dstr_1016__CLASS_NREP_UPDAT. val) - 1); cdat->dstr_1016__CLASS_NREP_UPDAT.val[54] = (char) 0; cdat->dstr_1016__CLASS_NREP_UPDAT.slen = 54; /*inimult dtup_1017__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ /*_.VALTUP___V1188*/ meltfptr[1187] = (melt_ptr_t) & cdat-> dtup_1017__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER; cdat->dtup_1017__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER. discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_1017__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER. nbval = 3; /*inimult dtup_1018__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ /*_.VALTUP___V1193*/ meltfptr[1192] = (melt_ptr_t) & cdat-> dtup_1018__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER; cdat->dtup_1018__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER. discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_1018__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER. nbval = 3; /*iniobj dsym_1019__NUCMEB_EXPR*/ /*uniqueobj*/ if (! /*_.VALDATA___V1194*/ meltfptr[1193]) /*_.VALDATA___V1194*/ meltfptr[1193] = (melt_ptr_t) & cdat->dsym_1019__NUCMEB_EXPR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1019__NUCMEB_EXPR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1019__NUCMEB_EXPR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1019__NUCMEB_EXPR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1019__NUCMEB_EXPR.obj_hash = 944890055; cdat->dsym_1019__NUCMEB_EXPR.obj_len = 3; /*inistring dstr_1020__NUCMEB_EXPR*/ /*_.VALSTR___V1195*/ meltfptr[1194] = (melt_ptr_t) & cdat->dstr_1020__NUCMEB_EXPR; cdat->dstr_1020__NUCMEB_EXPR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1020__NUCMEB_EXPR.val, "NUCMEB_EXPR", sizeof (cdat->dstr_1020__NUCMEB_EXPR.val) - 1); cdat->dstr_1020__NUCMEB_EXPR.val[11] = (char) 0; cdat->dstr_1020__NUCMEB_EXPR.slen = 11; /*^iniobj */ /*iniobj dobj_1021__NUCMEB_EXPR*/ /*_.VALDATA___V1189*/ meltfptr[1188] = (melt_ptr_t) & cdat->dobj_1021__NUCMEB_EXPR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1021__NUCMEB_EXPR", 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_1021__NUCMEB_EXPR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1021__NUCMEB_EXPR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1021__NUCMEB_EXPR.obj_num = 1; cdat->dobj_1021__NUCMEB_EXPR.obj_hash = 780445858; cdat->dobj_1021__NUCMEB_EXPR.obj_len = 4; /*inistring dstr_1022__NUCMEB_EXPR*/ /*_.VALSTR___V1190*/ meltfptr[1189] = (melt_ptr_t) & cdat->dstr_1022__NUCMEB_EXPR; cdat->dstr_1022__NUCMEB_EXPR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1022__NUCMEB_EXPR.val, "NUCMEB_EXPR", sizeof (cdat->dstr_1022__NUCMEB_EXPR.val) - 1); cdat->dstr_1022__NUCMEB_EXPR.val[11] = (char) 0; cdat->dstr_1022__NUCMEB_EXPR.slen = 11; /*iniobj dsym_1023__NCUMEB_COMMENT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1196*/ meltfptr[1195]) /*_.VALDATA___V1196*/ meltfptr[1195] = (melt_ptr_t) & cdat->dsym_1023__NCUMEB_COMMENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1023__NCUMEB_COMMENT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1023__NCUMEB_COMMENT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1023__NCUMEB_COMMENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1023__NCUMEB_COMMENT.obj_hash = 65039889; cdat->dsym_1023__NCUMEB_COMMENT.obj_len = 3; /*inistring dstr_1024__NCUMEB_COMMENT*/ /*_.VALSTR___V1197*/ meltfptr[1196] = (melt_ptr_t) & cdat->dstr_1024__NCUMEB_COMMENT; cdat->dstr_1024__NCUMEB_COMMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1024__NCUMEB_COMMENT.val, "NCUMEB_COMMENT", sizeof (cdat->dstr_1024__NCUMEB_COMMENT.val) - 1); cdat->dstr_1024__NCUMEB_COMMENT.val[14] = (char) 0; cdat->dstr_1024__NCUMEB_COMMENT.slen = 14; /*^iniobj */ /*iniobj dobj_1025__NCUMEB_COMMENT*/ /*_.VALDATA___V1191*/ meltfptr[1190] = (melt_ptr_t) & cdat->dobj_1025__NCUMEB_COMMENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1025__NCUMEB_COMMENT", 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_1025__NCUMEB_COMMENT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1025__NCUMEB_COMMENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1025__NCUMEB_COMMENT.obj_num = 2; cdat->dobj_1025__NCUMEB_COMMENT.obj_hash = 811624894; cdat->dobj_1025__NCUMEB_COMMENT.obj_len = 4; /*inistring dstr_1026__NCUMEB_COMMENT*/ /*_.VALSTR___V1192*/ meltfptr[1191] = (melt_ptr_t) & cdat->dstr_1026__NCUMEB_COMMENT; cdat->dstr_1026__NCUMEB_COMMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1026__NCUMEB_COMMENT.val, "NCUMEB_COMMENT", sizeof (cdat->dstr_1026__NCUMEB_COMMENT.val) - 1); cdat->dstr_1026__NCUMEB_COMMENT.val[14] = (char) 0; cdat->dstr_1026__NCUMEB_COMMENT.slen = 14; /*iniobj dsym_1027__CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1198*/ meltfptr[1197]) /*_.VALDATA___V1198*/ meltfptr[1197] = (melt_ptr_t) & cdat-> dsym_1027__CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1027__CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1027__CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1027__CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER. meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1027__CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER. obj_hash = 602914932; cdat->dsym_1027__CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER. obj_len = 3; /*inistring dstr_1028__CLASS_NREP_CHECK*/ /*_.VALSTR___V1199*/ meltfptr[1198] = (melt_ptr_t) & cdat->dstr_1028__CLASS_NREP_CHECK; cdat->dstr_1028__CLASS_NREP_CHECK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1028__CLASS_NREP_CHECK.val, "CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER", sizeof (cdat->dstr_1028__CLASS_NREP_CHECK. val) - 1); cdat->dstr_1028__CLASS_NREP_CHECK.val[53] = (char) 0; cdat->dstr_1028__CLASS_NREP_CHECK.slen = 53; MELT_LOCATION ("warmelt-normal.melt:724:/ iniobj"); /*iniobj dobj_1029__CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER*/ /*_.VALDATA___V1200*/ meltfptr[1199] = (melt_ptr_t) & cdat-> dobj_1029__CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1029__CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER", 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_1029__CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1029__CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER. meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_1029__CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER. obj_num = MELTOBMAG_OBJECT; cdat->dobj_1029__CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER. obj_hash = 734194805; cdat->dobj_1029__CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER. obj_len = 8; /*inistring dstr_1030__CLASS_NREP_CHECK*/ /*_.VALSTR___V1201*/ meltfptr[1200] = (melt_ptr_t) & cdat->dstr_1030__CLASS_NREP_CHECK; cdat->dstr_1030__CLASS_NREP_CHECK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1030__CLASS_NREP_CHECK.val, "CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER", sizeof (cdat->dstr_1030__CLASS_NREP_CHECK. val) - 1); cdat->dstr_1030__CLASS_NREP_CHECK.val[53] = (char) 0; cdat->dstr_1030__CLASS_NREP_CHECK.slen = 53; /*inimult dtup_1031__CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER */ /*_.VALTUP___V1202*/ meltfptr[1201] = (melt_ptr_t) & cdat-> dtup_1031__CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER; cdat->dtup_1031__CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER. discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_1031__CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER. nbval = 3; /*inimult dtup_1032__CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER */ /*_.VALTUP___V1205*/ meltfptr[1204] = (melt_ptr_t) & cdat-> dtup_1032__CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER; cdat->dtup_1032__CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER. discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_1032__CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER. nbval = 2; /*iniobj dsym_1033__NCHRUMOD_COMMENT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1206*/ meltfptr[1205]) /*_.VALDATA___V1206*/ meltfptr[1205] = (melt_ptr_t) & cdat->dsym_1033__NCHRUMOD_COMMENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1033__NCHRUMOD_COMMENT", melt_magic_discr ((melt_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__NCHRUMOD_COMMENT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1033__NCHRUMOD_COMMENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1033__NCHRUMOD_COMMENT.obj_hash = 312147066; cdat->dsym_1033__NCHRUMOD_COMMENT.obj_len = 3; /*inistring dstr_1034__NCHRUMOD_COMMENT*/ /*_.VALSTR___V1207*/ meltfptr[1206] = (melt_ptr_t) & cdat->dstr_1034__NCHRUMOD_COMMENT; cdat->dstr_1034__NCHRUMOD_COMMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1034__NCHRUMOD_COMMENT.val, "NCHRUMOD_COMMENT", sizeof (cdat->dstr_1034__NCHRUMOD_COMMENT. val) - 1); cdat->dstr_1034__NCHRUMOD_COMMENT.val[16] = (char) 0; cdat->dstr_1034__NCHRUMOD_COMMENT.slen = 16; /*^iniobj */ /*iniobj dobj_1035__NCHRUMOD_COMMENT*/ /*_.VALDATA___V1203*/ meltfptr[1202] = (melt_ptr_t) & cdat->dobj_1035__NCHRUMOD_COMMENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1035__NCHRUMOD_COMMENT", 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_1035__NCHRUMOD_COMMENT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1035__NCHRUMOD_COMMENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1035__NCHRUMOD_COMMENT.obj_num = 1; cdat->dobj_1035__NCHRUMOD_COMMENT.obj_hash = 921334544; cdat->dobj_1035__NCHRUMOD_COMMENT.obj_len = 4; /*inistring dstr_1036__NCHRUMOD_COMMENT*/ /*_.VALSTR___V1204*/ meltfptr[1203] = (melt_ptr_t) & cdat->dstr_1036__NCHRUMOD_COMMENT; cdat->dstr_1036__NCHRUMOD_COMMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1036__NCHRUMOD_COMMENT.val, "NCHRUMOD_COMMENT", sizeof (cdat->dstr_1036__NCHRUMOD_COMMENT. val) - 1); cdat->dstr_1036__NCHRUMOD_COMMENT.val[16] = (char) 0; cdat->dstr_1036__NCHRUMOD_COMMENT.slen = 16; /*iniobj dsym_1037__HAS_EXTRA_WARNINGS*/ /*uniqueobj*/ if (! /*_.VALDATA___V1208*/ meltfptr[1207]) /*_.VALDATA___V1208*/ meltfptr[1207] = (melt_ptr_t) & cdat->dsym_1037__HAS_EXTRA_WARNINGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1037__HAS_EXTRA_WARNINGS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1037__HAS_EXTRA_WARNINGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1037__HAS_EXTRA_WARNINGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1037__HAS_EXTRA_WARNINGS.obj_hash = 938530530; cdat->dsym_1037__HAS_EXTRA_WARNINGS.obj_len = 3; /*inistring dstr_1038__HAS_EXTRA_WARNIN*/ /*_.VALSTR___V1209*/ meltfptr[1208] = (melt_ptr_t) & cdat->dstr_1038__HAS_EXTRA_WARNIN; cdat->dstr_1038__HAS_EXTRA_WARNIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1038__HAS_EXTRA_WARNIN.val, "HAS_EXTRA_WARNINGS", sizeof (cdat->dstr_1038__HAS_EXTRA_WARNIN. val) - 1); cdat->dstr_1038__HAS_EXTRA_WARNIN.val[18] = (char) 0; cdat->dstr_1038__HAS_EXTRA_WARNIN.slen = 18; MELT_LOCATION ("warmelt-normal.melt:819:/ iniobj"); /*iniobj dobj_1039__HAS_EXTRA_WARNINGS*/ /*_.VALDATA___V1210*/ meltfptr[1209] = (melt_ptr_t) & cdat->dobj_1039__HAS_EXTRA_WARNINGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1039__HAS_EXTRA_WARNINGS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1039__HAS_EXTRA_WARNINGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1039__HAS_EXTRA_WARNINGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); cdat->dobj_1039__HAS_EXTRA_WARNINGS.obj_hash = 937602562; cdat->dobj_1039__HAS_EXTRA_WARNINGS.obj_len = 5; /*inimult dtup_1040__HAS_EXTRA_WARNINGS */ /*_.VALTUP___V1214*/ meltfptr[1213] = (melt_ptr_t) & cdat->dtup_1040__HAS_EXTRA_WARNINGS; cdat->dtup_1040__HAS_EXTRA_WARNINGS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_MULTIPLE)))); cdat->dtup_1040__HAS_EXTRA_WARNINGS.nbval = 1; /*inimult dtup_1041__HAS_EXTRA_WARNINGS */ /*_.VALTUP___V1212*/ meltfptr[1211] = (melt_ptr_t) & cdat->dtup_1041__HAS_EXTRA_WARNINGS; cdat->dtup_1041__HAS_EXTRA_WARNINGS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_MULTIPLE)))); cdat->dtup_1041__HAS_EXTRA_WARNINGS.nbval = 0; /*inistring dstr_1042__extra_warnings_*/ /*_.VALSTR___V1213*/ meltfptr[1212] = (melt_ptr_t) & cdat->dstr_1042__extra_warnings_; cdat->dstr_1042__extra_warnings_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_VERBATIM_STRING)))); /*small inistring */ strncpy (cdat->dstr_1042__extra_warnings_.val, "(extra_warnings)", sizeof (cdat->dstr_1042__extra_warnings_. val) - 1); cdat->dstr_1042__extra_warnings_.val[16] = (char) 0; cdat->dstr_1042__extra_warnings_.slen = 16; /*inistring dstr_1043__HAS_EXTRA_WARNIN*/ /*_.VALSTR___V1211*/ meltfptr[1210] = (melt_ptr_t) & cdat->dstr_1043__HAS_EXTRA_WARNIN; cdat->dstr_1043__HAS_EXTRA_WARNIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1043__HAS_EXTRA_WARNIN.val, "HAS_EXTRA_WARNINGS", sizeof (cdat->dstr_1043__HAS_EXTRA_WARNIN. val) - 1); cdat->dstr_1043__HAS_EXTRA_WARNIN.val[18] = (char) 0; cdat->dstr_1043__HAS_EXTRA_WARNIN.slen = 18; /*inirout drout_1044__ADD_NCTX_DATA */ /*_.VALROUT___V1215*/ meltfptr[1214] = (melt_ptr_t) & cdat->drout_1044__ADD_NCTX_DATA; cdat->drout_1044__ADD_NCTX_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1044__ADD_NCTX_DATA.routdescr, "ADD_NCTX_DATA @warmelt-normal.melt:828", MELT_ROUTDESCR_LEN - 1); cdat->drout_1044__ADD_NCTX_DATA.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1044__ADD_NCTX_DATA, meltrout_1_warmelt_normal_ADD_NCTX_DATA); /*iniclos dclo_1045__ADD_NCTX_DATA */ /*_.VALCLO___V1216*/ meltfptr[1215] = (melt_ptr_t) & cdat->dclo_1045__ADD_NCTX_DATA; cdat->dclo_1045__ADD_NCTX_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1045__ADD_NCTX_DATA.nbval = 0; /*iniobj dsym_1046__CLASS_NORMALIZATION_CONTEXT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1217*/ meltfptr[1216]) /*_.VALDATA___V1217*/ meltfptr[1216] = (melt_ptr_t) & cdat->dsym_1046__CLASS_NORMALIZATION_CONTEXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1046__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_1046__CLASS_NORMALIZATION_CONTEXT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1046__CLASS_NORMALIZATION_CONTEXT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1046__CLASS_NORMALIZATION_CONTEXT.obj_hash = 429657178; cdat->dsym_1046__CLASS_NORMALIZATION_CONTEXT.obj_len = 3; /*inistring dstr_1047__CLASS_NORMALIZAT*/ /*_.VALSTR___V1218*/ meltfptr[1217] = (melt_ptr_t) & cdat->dstr_1047__CLASS_NORMALIZAT; cdat->dstr_1047__CLASS_NORMALIZAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1047__CLASS_NORMALIZAT.val, "CLASS_NORMALIZATION_CONTEXT", sizeof (cdat->dstr_1047__CLASS_NORMALIZAT. val) - 1); cdat->dstr_1047__CLASS_NORMALIZAT.val[27] = (char) 0; cdat->dstr_1047__CLASS_NORMALIZAT.slen = 27; /*iniobj dsym_1048__DISCR_INTEGER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1219*/ meltfptr[1218]) /*_.VALDATA___V1219*/ meltfptr[1218] = (melt_ptr_t) & cdat->dsym_1048__DISCR_INTEGER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1048__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_1048__DISCR_INTEGER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1048__DISCR_INTEGER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1048__DISCR_INTEGER.obj_hash = 119182103; cdat->dsym_1048__DISCR_INTEGER.obj_len = 3; /*inistring dstr_1049__DISCR_INTEGER*/ /*_.VALSTR___V1220*/ meltfptr[1219] = (melt_ptr_t) & cdat->dstr_1049__DISCR_INTEGER; cdat->dstr_1049__DISCR_INTEGER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1049__DISCR_INTEGER.val, "DISCR_INTEGER", sizeof (cdat->dstr_1049__DISCR_INTEGER.val) - 1); cdat->dstr_1049__DISCR_INTEGER.val[13] = (char) 0; cdat->dstr_1049__DISCR_INTEGER.slen = 13; /*inirout drout_1050__FILL_INITIAL_PREDEFMAP */ /*_.VALROUT___V1221*/ meltfptr[1220] = (melt_ptr_t) & cdat->drout_1050__FILL_INITIAL_PREDEFMAP; cdat->drout_1050__FILL_INITIAL_PREDEFMAP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1050__FILL_INITIAL_PREDEFMAP.routdescr, "FILL_INITIAL_PREDEFMAP @warmelt-predef.melt:3", MELT_ROUTDESCR_LEN - 1); cdat->drout_1050__FILL_INITIAL_PREDEFMAP.nbval = 99; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1050__FILL_INITIAL_PREDEFMAP, meltrout_2_warmelt_normal_FILL_INITIAL_PREDEFMAP); /*iniclos dclo_1051__FILL_INITIAL_PREDEFMAP */ /*_.VALCLO___V1416*/ meltfptr[1415] = (melt_ptr_t) & cdat->dclo_1051__FILL_INITIAL_PREDEFMAP; cdat->dclo_1051__FILL_INITIAL_PREDEFMAP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1051__FILL_INITIAL_PREDEFMAP.nbval = 0; /*iniobj dsym_1052__CLASS_ALARM_HANDLER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1222*/ meltfptr[1221]) /*_.VALDATA___V1222*/ meltfptr[1221] = (melt_ptr_t) & cdat->dsym_1052__CLASS_ALARM_HANDLER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1052__CLASS_ALARM_HANDLER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1052__CLASS_ALARM_HANDLER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1052__CLASS_ALARM_HANDLER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1052__CLASS_ALARM_HANDLER.obj_hash = 841081062; cdat->dsym_1052__CLASS_ALARM_HANDLER.obj_len = 3; /*inistring dstr_1053__CLASS_ALARM_HAND*/ /*_.VALSTR___V1223*/ meltfptr[1222] = (melt_ptr_t) & cdat->dstr_1053__CLASS_ALARM_HAND; cdat->dstr_1053__CLASS_ALARM_HAND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1053__CLASS_ALARM_HAND.val, "CLASS_ALARM_HANDLER", sizeof (cdat->dstr_1053__CLASS_ALARM_HAND. val) - 1); cdat->dstr_1053__CLASS_ALARM_HAND.val[19] = (char) 0; cdat->dstr_1053__CLASS_ALARM_HAND.slen = 19; /*iniobj dsym_1054__CLASS_CHILD_PROCESS_HANDLER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1224*/ meltfptr[1223]) /*_.VALDATA___V1224*/ meltfptr[1223] = (melt_ptr_t) & cdat->dsym_1054__CLASS_CHILD_PROCESS_HANDLER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1054__CLASS_CHILD_PROCESS_HANDLER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1054__CLASS_CHILD_PROCESS_HANDLER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1054__CLASS_CHILD_PROCESS_HANDLER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1054__CLASS_CHILD_PROCESS_HANDLER.obj_hash = 438603295; cdat->dsym_1054__CLASS_CHILD_PROCESS_HANDLER.obj_len = 3; /*inistring dstr_1055__CLASS_CHILD_PROC*/ /*_.VALSTR___V1225*/ meltfptr[1224] = (melt_ptr_t) & cdat->dstr_1055__CLASS_CHILD_PROC; cdat->dstr_1055__CLASS_CHILD_PROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1055__CLASS_CHILD_PROC.val, "CLASS_CHILD_PROCESS_HANDLER", sizeof (cdat->dstr_1055__CLASS_CHILD_PROC. val) - 1); cdat->dstr_1055__CLASS_CHILD_PROC.val[27] = (char) 0; cdat->dstr_1055__CLASS_CHILD_PROC.slen = 27; /*iniobj dsym_1056__CLASS_CITERATOR*/ /*uniqueobj*/ if (! /*_.VALDATA___V1226*/ meltfptr[1225]) /*_.VALDATA___V1226*/ meltfptr[1225] = (melt_ptr_t) & cdat->dsym_1056__CLASS_CITERATOR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1056__CLASS_CITERATOR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1056__CLASS_CITERATOR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1056__CLASS_CITERATOR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1056__CLASS_CITERATOR.obj_hash = 650290054; cdat->dsym_1056__CLASS_CITERATOR.obj_len = 3; /*inistring dstr_1057__CLASS_CITERATOR*/ /*_.VALSTR___V1227*/ meltfptr[1226] = (melt_ptr_t) & cdat->dstr_1057__CLASS_CITERATOR; cdat->dstr_1057__CLASS_CITERATOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1057__CLASS_CITERATOR.val, "CLASS_CITERATOR", sizeof (cdat->dstr_1057__CLASS_CITERATOR. val) - 1); cdat->dstr_1057__CLASS_CITERATOR.val[15] = (char) 0; cdat->dstr_1057__CLASS_CITERATOR.slen = 15; /*iniobj dsym_1058__CLASS_CLASS*/ /*uniqueobj*/ if (! /*_.VALDATA___V1228*/ meltfptr[1227]) /*_.VALDATA___V1228*/ meltfptr[1227] = (melt_ptr_t) & cdat->dsym_1058__CLASS_CLASS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1058__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_1058__CLASS_CLASS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1058__CLASS_CLASS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1058__CLASS_CLASS.obj_hash = 60141292; cdat->dsym_1058__CLASS_CLASS.obj_len = 3; /*inistring dstr_1059__CLASS_CLASS*/ /*_.VALSTR___V1229*/ meltfptr[1228] = (melt_ptr_t) & cdat->dstr_1059__CLASS_CLASS; cdat->dstr_1059__CLASS_CLASS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1059__CLASS_CLASS.val, "CLASS_CLASS", sizeof (cdat->dstr_1059__CLASS_CLASS.val) - 1); cdat->dstr_1059__CLASS_CLASS.val[11] = (char) 0; cdat->dstr_1059__CLASS_CLASS.slen = 11; /*iniobj dsym_1060__CLASS_CMATCHER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1230*/ meltfptr[1229]) /*_.VALDATA___V1230*/ meltfptr[1229] = (melt_ptr_t) & cdat->dsym_1060__CLASS_CMATCHER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1060__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_1060__CLASS_CMATCHER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1060__CLASS_CMATCHER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1060__CLASS_CMATCHER.obj_hash = 544975672; cdat->dsym_1060__CLASS_CMATCHER.obj_len = 3; /*inistring dstr_1061__CLASS_CMATCHER*/ /*_.VALSTR___V1231*/ meltfptr[1230] = (melt_ptr_t) & cdat->dstr_1061__CLASS_CMATCHER; cdat->dstr_1061__CLASS_CMATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1061__CLASS_CMATCHER.val, "CLASS_CMATCHER", sizeof (cdat->dstr_1061__CLASS_CMATCHER.val) - 1); cdat->dstr_1061__CLASS_CMATCHER.val[14] = (char) 0; cdat->dstr_1061__CLASS_CMATCHER.slen = 14; /*iniobj dsym_1062__CLASS_CTYPE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1232*/ meltfptr[1231]) /*_.VALDATA___V1232*/ meltfptr[1231] = (melt_ptr_t) & cdat->dsym_1062__CLASS_CTYPE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1062__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_1062__CLASS_CTYPE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1062__CLASS_CTYPE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1062__CLASS_CTYPE.obj_hash = 78610803; cdat->dsym_1062__CLASS_CTYPE.obj_len = 3; /*inistring dstr_1063__CLASS_CTYPE*/ /*_.VALSTR___V1233*/ meltfptr[1232] = (melt_ptr_t) & cdat->dstr_1063__CLASS_CTYPE; cdat->dstr_1063__CLASS_CTYPE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1063__CLASS_CTYPE.val, "CLASS_CTYPE", sizeof (cdat->dstr_1063__CLASS_CTYPE.val) - 1); cdat->dstr_1063__CLASS_CTYPE.val[11] = (char) 0; cdat->dstr_1063__CLASS_CTYPE.slen = 11; /*iniobj dsym_1064__CLASS_CTYPE_GTY*/ /*uniqueobj*/ if (! /*_.VALDATA___V1234*/ meltfptr[1233]) /*_.VALDATA___V1234*/ meltfptr[1233] = (melt_ptr_t) & cdat->dsym_1064__CLASS_CTYPE_GTY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1064__CLASS_CTYPE_GTY", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1064__CLASS_CTYPE_GTY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1064__CLASS_CTYPE_GTY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1064__CLASS_CTYPE_GTY.obj_hash = 167272739; cdat->dsym_1064__CLASS_CTYPE_GTY.obj_len = 3; /*inistring dstr_1065__CLASS_CTYPE_GTY*/ /*_.VALSTR___V1235*/ meltfptr[1234] = (melt_ptr_t) & cdat->dstr_1065__CLASS_CTYPE_GTY; cdat->dstr_1065__CLASS_CTYPE_GTY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1065__CLASS_CTYPE_GTY.val, "CLASS_CTYPE_GTY", sizeof (cdat->dstr_1065__CLASS_CTYPE_GTY. val) - 1); cdat->dstr_1065__CLASS_CTYPE_GTY.val[15] = (char) 0; cdat->dstr_1065__CLASS_CTYPE_GTY.slen = 15; /*iniobj dsym_1066__CLASS_CTYPE_PLAIN*/ /*uniqueobj*/ if (! /*_.VALDATA___V1236*/ meltfptr[1235]) /*_.VALDATA___V1236*/ meltfptr[1235] = (melt_ptr_t) & cdat->dsym_1066__CLASS_CTYPE_PLAIN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1066__CLASS_CTYPE_PLAIN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1066__CLASS_CTYPE_PLAIN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1066__CLASS_CTYPE_PLAIN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1066__CLASS_CTYPE_PLAIN.obj_hash = 345014204; cdat->dsym_1066__CLASS_CTYPE_PLAIN.obj_len = 3; /*inistring dstr_1067__CLASS_CTYPE_PLAI*/ /*_.VALSTR___V1237*/ meltfptr[1236] = (melt_ptr_t) & cdat->dstr_1067__CLASS_CTYPE_PLAI; cdat->dstr_1067__CLASS_CTYPE_PLAI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1067__CLASS_CTYPE_PLAI.val, "CLASS_CTYPE_PLAIN", sizeof (cdat->dstr_1067__CLASS_CTYPE_PLAI. val) - 1); cdat->dstr_1067__CLASS_CTYPE_PLAI.val[17] = (char) 0; cdat->dstr_1067__CLASS_CTYPE_PLAI.slen = 17; /*iniobj dsym_1068__CLASS_DISCRIMINANT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1238*/ meltfptr[1237]) /*_.VALDATA___V1238*/ meltfptr[1237] = (melt_ptr_t) & cdat->dsym_1068__CLASS_DISCRIMINANT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1068__CLASS_DISCRIMINANT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1068__CLASS_DISCRIMINANT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1068__CLASS_DISCRIMINANT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1068__CLASS_DISCRIMINANT.obj_hash = 535191995; cdat->dsym_1068__CLASS_DISCRIMINANT.obj_len = 3; /*inistring dstr_1069__CLASS_DISCRIMINA*/ /*_.VALSTR___V1239*/ meltfptr[1238] = (melt_ptr_t) & cdat->dstr_1069__CLASS_DISCRIMINA; cdat->dstr_1069__CLASS_DISCRIMINA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1069__CLASS_DISCRIMINA.val, "CLASS_DISCRIMINANT", sizeof (cdat->dstr_1069__CLASS_DISCRIMINA. val) - 1); cdat->dstr_1069__CLASS_DISCRIMINA.val[18] = (char) 0; cdat->dstr_1069__CLASS_DISCRIMINA.slen = 18; /*iniobj dsym_1070__CLASS_ENVIRONMENT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1240*/ meltfptr[1239]) /*_.VALDATA___V1240*/ meltfptr[1239] = (melt_ptr_t) & cdat->dsym_1070__CLASS_ENVIRONMENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1070__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_1070__CLASS_ENVIRONMENT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1070__CLASS_ENVIRONMENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1070__CLASS_ENVIRONMENT.obj_hash = 59212821; cdat->dsym_1070__CLASS_ENVIRONMENT.obj_len = 3; /*inistring dstr_1071__CLASS_ENVIRONMEN*/ /*_.VALSTR___V1241*/ meltfptr[1240] = (melt_ptr_t) & cdat->dstr_1071__CLASS_ENVIRONMEN; cdat->dstr_1071__CLASS_ENVIRONMEN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1071__CLASS_ENVIRONMEN.val, "CLASS_ENVIRONMENT", sizeof (cdat->dstr_1071__CLASS_ENVIRONMEN. val) - 1); cdat->dstr_1071__CLASS_ENVIRONMEN.val[17] = (char) 0; cdat->dstr_1071__CLASS_ENVIRONMEN.slen = 17; /*iniobj dsym_1072__CLASS_FIELD*/ /*uniqueobj*/ if (! /*_.VALDATA___V1242*/ meltfptr[1241]) /*_.VALDATA___V1242*/ meltfptr[1241] = (melt_ptr_t) & cdat->dsym_1072__CLASS_FIELD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1072__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_1072__CLASS_FIELD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1072__CLASS_FIELD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1072__CLASS_FIELD.obj_hash = 523073; cdat->dsym_1072__CLASS_FIELD.obj_len = 3; /*inistring dstr_1073__CLASS_FIELD*/ /*_.VALSTR___V1243*/ meltfptr[1242] = (melt_ptr_t) & cdat->dstr_1073__CLASS_FIELD; cdat->dstr_1073__CLASS_FIELD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1073__CLASS_FIELD.val, "CLASS_FIELD", sizeof (cdat->dstr_1073__CLASS_FIELD.val) - 1); cdat->dstr_1073__CLASS_FIELD.val[11] = (char) 0; cdat->dstr_1073__CLASS_FIELD.slen = 11; /*iniobj dsym_1074__CLASS_FORMAL_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1244*/ meltfptr[1243]) /*_.VALDATA___V1244*/ meltfptr[1243] = (melt_ptr_t) & cdat->dsym_1074__CLASS_FORMAL_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1074__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_1074__CLASS_FORMAL_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1074__CLASS_FORMAL_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1074__CLASS_FORMAL_BINDING.obj_hash = 3733780; cdat->dsym_1074__CLASS_FORMAL_BINDING.obj_len = 3; /*inistring dstr_1075__CLASS_FORMAL_BIN*/ /*_.VALSTR___V1245*/ meltfptr[1244] = (melt_ptr_t) & cdat->dstr_1075__CLASS_FORMAL_BIN; cdat->dstr_1075__CLASS_FORMAL_BIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1075__CLASS_FORMAL_BIN.val, "CLASS_FORMAL_BINDING", sizeof (cdat->dstr_1075__CLASS_FORMAL_BIN. val) - 1); cdat->dstr_1075__CLASS_FORMAL_BIN.val[20] = (char) 0; cdat->dstr_1075__CLASS_FORMAL_BIN.slen = 20; /*iniobj dsym_1076__CLASS_FUNMATCHER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1246*/ meltfptr[1245]) /*_.VALDATA___V1246*/ meltfptr[1245] = (melt_ptr_t) & cdat->dsym_1076__CLASS_FUNMATCHER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1076__CLASS_FUNMATCHER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1076__CLASS_FUNMATCHER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1076__CLASS_FUNMATCHER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1076__CLASS_FUNMATCHER.obj_hash = 197743893; cdat->dsym_1076__CLASS_FUNMATCHER.obj_len = 3; /*inistring dstr_1077__CLASS_FUNMATCHER*/ /*_.VALSTR___V1247*/ meltfptr[1246] = (melt_ptr_t) & cdat->dstr_1077__CLASS_FUNMATCHER; cdat->dstr_1077__CLASS_FUNMATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1077__CLASS_FUNMATCHER.val, "CLASS_FUNMATCHER", sizeof (cdat->dstr_1077__CLASS_FUNMATCHER. val) - 1); cdat->dstr_1077__CLASS_FUNMATCHER.val[16] = (char) 0; cdat->dstr_1077__CLASS_FUNMATCHER.slen = 16; /*iniobj dsym_1078__CLASS_GCC_GIMPLE_PASS*/ /*uniqueobj*/ if (! /*_.VALDATA___V1248*/ meltfptr[1247]) /*_.VALDATA___V1248*/ meltfptr[1247] = (melt_ptr_t) & cdat->dsym_1078__CLASS_GCC_GIMPLE_PASS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1078__CLASS_GCC_GIMPLE_PASS", melt_magic_discr ((melt_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__CLASS_GCC_GIMPLE_PASS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1078__CLASS_GCC_GIMPLE_PASS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1078__CLASS_GCC_GIMPLE_PASS.obj_hash = 216040702; cdat->dsym_1078__CLASS_GCC_GIMPLE_PASS.obj_len = 3; /*inistring dstr_1079__CLASS_GCC_GIMPLE*/ /*_.VALSTR___V1249*/ meltfptr[1248] = (melt_ptr_t) & cdat->dstr_1079__CLASS_GCC_GIMPLE; cdat->dstr_1079__CLASS_GCC_GIMPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1079__CLASS_GCC_GIMPLE.val, "CLASS_GCC_GIMPLE_PASS", sizeof (cdat->dstr_1079__CLASS_GCC_GIMPLE. val) - 1); cdat->dstr_1079__CLASS_GCC_GIMPLE.val[21] = (char) 0; cdat->dstr_1079__CLASS_GCC_GIMPLE.slen = 21; /*iniobj dsym_1080__CLASS_GCC_PASS*/ /*uniqueobj*/ if (! /*_.VALDATA___V1250*/ meltfptr[1249]) /*_.VALDATA___V1250*/ meltfptr[1249] = (melt_ptr_t) & cdat->dsym_1080__CLASS_GCC_PASS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1080__CLASS_GCC_PASS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1080__CLASS_GCC_PASS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1080__CLASS_GCC_PASS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1080__CLASS_GCC_PASS.obj_hash = 271520587; cdat->dsym_1080__CLASS_GCC_PASS.obj_len = 3; /*inistring dstr_1081__CLASS_GCC_PASS*/ /*_.VALSTR___V1251*/ meltfptr[1250] = (melt_ptr_t) & cdat->dstr_1081__CLASS_GCC_PASS; cdat->dstr_1081__CLASS_GCC_PASS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1081__CLASS_GCC_PASS.val, "CLASS_GCC_PASS", sizeof (cdat->dstr_1081__CLASS_GCC_PASS.val) - 1); cdat->dstr_1081__CLASS_GCC_PASS.val[14] = (char) 0; cdat->dstr_1081__CLASS_GCC_PASS.slen = 14; /*iniobj dsym_1082__CLASS_GCC_PRAGMA*/ /*uniqueobj*/ if (! /*_.VALDATA___V1252*/ meltfptr[1251]) /*_.VALDATA___V1252*/ meltfptr[1251] = (melt_ptr_t) & cdat->dsym_1082__CLASS_GCC_PRAGMA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1082__CLASS_GCC_PRAGMA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1082__CLASS_GCC_PRAGMA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1082__CLASS_GCC_PRAGMA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1082__CLASS_GCC_PRAGMA.obj_hash = 315724751; cdat->dsym_1082__CLASS_GCC_PRAGMA.obj_len = 3; /*inistring dstr_1083__CLASS_GCC_PRAGMA*/ /*_.VALSTR___V1253*/ meltfptr[1252] = (melt_ptr_t) & cdat->dstr_1083__CLASS_GCC_PRAGMA; cdat->dstr_1083__CLASS_GCC_PRAGMA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1083__CLASS_GCC_PRAGMA.val, "CLASS_GCC_PRAGMA", sizeof (cdat->dstr_1083__CLASS_GCC_PRAGMA. val) - 1); cdat->dstr_1083__CLASS_GCC_PRAGMA.val[16] = (char) 0; cdat->dstr_1083__CLASS_GCC_PRAGMA.slen = 16; /*iniobj dsym_1084__CLASS_GCC_RTL_PASS*/ /*uniqueobj*/ if (! /*_.VALDATA___V1254*/ meltfptr[1253]) /*_.VALDATA___V1254*/ meltfptr[1253] = (melt_ptr_t) & cdat->dsym_1084__CLASS_GCC_RTL_PASS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1084__CLASS_GCC_RTL_PASS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1084__CLASS_GCC_RTL_PASS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1084__CLASS_GCC_RTL_PASS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1084__CLASS_GCC_RTL_PASS.obj_hash = 997542884; cdat->dsym_1084__CLASS_GCC_RTL_PASS.obj_len = 3; /*inistring dstr_1085__CLASS_GCC_RTL_PA*/ /*_.VALSTR___V1255*/ meltfptr[1254] = (melt_ptr_t) & cdat->dstr_1085__CLASS_GCC_RTL_PA; cdat->dstr_1085__CLASS_GCC_RTL_PA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1085__CLASS_GCC_RTL_PA.val, "CLASS_GCC_RTL_PASS", sizeof (cdat->dstr_1085__CLASS_GCC_RTL_PA. val) - 1); cdat->dstr_1085__CLASS_GCC_RTL_PA.val[18] = (char) 0; cdat->dstr_1085__CLASS_GCC_RTL_PA.slen = 18; /*iniobj dsym_1086__CLASS_GCC_SIMPLE_IPA_PASS*/ /*uniqueobj*/ if (! /*_.VALDATA___V1256*/ meltfptr[1255]) /*_.VALDATA___V1256*/ meltfptr[1255] = (melt_ptr_t) & cdat->dsym_1086__CLASS_GCC_SIMPLE_IPA_PASS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1086__CLASS_GCC_SIMPLE_IPA_PASS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1086__CLASS_GCC_SIMPLE_IPA_PASS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1086__CLASS_GCC_SIMPLE_IPA_PASS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1086__CLASS_GCC_SIMPLE_IPA_PASS.obj_hash = 827993790; cdat->dsym_1086__CLASS_GCC_SIMPLE_IPA_PASS.obj_len = 3; /*inistring dstr_1087__CLASS_GCC_SIMPLE*/ /*_.VALSTR___V1257*/ meltfptr[1256] = (melt_ptr_t) & cdat->dstr_1087__CLASS_GCC_SIMPLE; cdat->dstr_1087__CLASS_GCC_SIMPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1087__CLASS_GCC_SIMPLE.val, "CLASS_GCC_SIMPLE_IPA_PASS", sizeof (cdat->dstr_1087__CLASS_GCC_SIMPLE. val) - 1); cdat->dstr_1087__CLASS_GCC_SIMPLE.val[25] = (char) 0; cdat->dstr_1087__CLASS_GCC_SIMPLE.slen = 25; /*iniobj dsym_1088__CLASS_GCC_TRANSFORM_IPA_PASS*/ /*uniqueobj*/ if (! /*_.VALDATA___V1258*/ meltfptr[1257]) /*_.VALDATA___V1258*/ meltfptr[1257] = (melt_ptr_t) & cdat->dsym_1088__CLASS_GCC_TRANSFORM_IPA_PASS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1088__CLASS_GCC_TRANSFORM_IPA_PASS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1088__CLASS_GCC_TRANSFORM_IPA_PASS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1088__CLASS_GCC_TRANSFORM_IPA_PASS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1088__CLASS_GCC_TRANSFORM_IPA_PASS.obj_hash = 859168635; cdat->dsym_1088__CLASS_GCC_TRANSFORM_IPA_PASS.obj_len = 3; /*inistring dstr_1089__CLASS_GCC_TRANSF*/ /*_.VALSTR___V1259*/ meltfptr[1258] = (melt_ptr_t) & cdat->dstr_1089__CLASS_GCC_TRANSF; cdat->dstr_1089__CLASS_GCC_TRANSF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1089__CLASS_GCC_TRANSF.val, "CLASS_GCC_TRANSFORM_IPA_PASS", sizeof (cdat->dstr_1089__CLASS_GCC_TRANSF. val) - 1); cdat->dstr_1089__CLASS_GCC_TRANSF.val[28] = (char) 0; cdat->dstr_1089__CLASS_GCC_TRANSF.slen = 28; /*iniobj dsym_1090__CLASS_INPUT_CHANNEL_HANDLER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1260*/ meltfptr[1259]) /*_.VALDATA___V1260*/ meltfptr[1259] = (melt_ptr_t) & cdat->dsym_1090__CLASS_INPUT_CHANNEL_HANDLER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1090__CLASS_INPUT_CHANNEL_HANDLER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1090__CLASS_INPUT_CHANNEL_HANDLER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1090__CLASS_INPUT_CHANNEL_HANDLER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1090__CLASS_INPUT_CHANNEL_HANDLER.obj_hash = 94880076; cdat->dsym_1090__CLASS_INPUT_CHANNEL_HANDLER.obj_len = 3; /*inistring dstr_1091__CLASS_INPUT_CHAN*/ /*_.VALSTR___V1261*/ meltfptr[1260] = (melt_ptr_t) & cdat->dstr_1091__CLASS_INPUT_CHAN; cdat->dstr_1091__CLASS_INPUT_CHAN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1091__CLASS_INPUT_CHAN.val, "CLASS_INPUT_CHANNEL_HANDLER", sizeof (cdat->dstr_1091__CLASS_INPUT_CHAN. val) - 1); cdat->dstr_1091__CLASS_INPUT_CHAN.val[27] = (char) 0; cdat->dstr_1091__CLASS_INPUT_CHAN.slen = 27; /*iniobj dsym_1092__CLASS_KEYWORD*/ /*uniqueobj*/ if (! /*_.VALDATA___V1262*/ meltfptr[1261]) /*_.VALDATA___V1262*/ meltfptr[1261] = (melt_ptr_t) & cdat->dsym_1092__CLASS_KEYWORD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1092__CLASS_KEYWORD", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1092__CLASS_KEYWORD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1092__CLASS_KEYWORD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1092__CLASS_KEYWORD.obj_hash = 14992133; cdat->dsym_1092__CLASS_KEYWORD.obj_len = 3; /*inistring dstr_1093__CLASS_KEYWORD*/ /*_.VALSTR___V1263*/ meltfptr[1262] = (melt_ptr_t) & cdat->dstr_1093__CLASS_KEYWORD; cdat->dstr_1093__CLASS_KEYWORD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1093__CLASS_KEYWORD.val, "CLASS_KEYWORD", sizeof (cdat->dstr_1093__CLASS_KEYWORD.val) - 1); cdat->dstr_1093__CLASS_KEYWORD.val[13] = (char) 0; cdat->dstr_1093__CLASS_KEYWORD.slen = 13; /*iniobj dsym_1094__CLASS_LOCATED*/ /*uniqueobj*/ if (! /*_.VALDATA___V1264*/ meltfptr[1263]) /*_.VALDATA___V1264*/ meltfptr[1263] = (melt_ptr_t) & cdat->dsym_1094__CLASS_LOCATED; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1094__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_1094__CLASS_LOCATED", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1094__CLASS_LOCATED.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1094__CLASS_LOCATED.obj_hash = 979003; cdat->dsym_1094__CLASS_LOCATED.obj_len = 3; /*inistring dstr_1095__CLASS_LOCATED*/ /*_.VALSTR___V1265*/ meltfptr[1264] = (melt_ptr_t) & cdat->dstr_1095__CLASS_LOCATED; cdat->dstr_1095__CLASS_LOCATED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1095__CLASS_LOCATED.val, "CLASS_LOCATED", sizeof (cdat->dstr_1095__CLASS_LOCATED.val) - 1); cdat->dstr_1095__CLASS_LOCATED.val[13] = (char) 0; cdat->dstr_1095__CLASS_LOCATED.slen = 13; /*iniobj dsym_1096__CLASS_MELT_MODE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1266*/ meltfptr[1265]) /*_.VALDATA___V1266*/ meltfptr[1265] = (melt_ptr_t) & cdat->dsym_1096__CLASS_MELT_MODE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1096__CLASS_MELT_MODE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1096__CLASS_MELT_MODE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1096__CLASS_MELT_MODE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1096__CLASS_MELT_MODE.obj_hash = 78749621; cdat->dsym_1096__CLASS_MELT_MODE.obj_len = 3; /*inistring dstr_1097__CLASS_MELT_MODE*/ /*_.VALSTR___V1267*/ meltfptr[1266] = (melt_ptr_t) & cdat->dstr_1097__CLASS_MELT_MODE; cdat->dstr_1097__CLASS_MELT_MODE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1097__CLASS_MELT_MODE.val, "CLASS_MELT_MODE", sizeof (cdat->dstr_1097__CLASS_MELT_MODE. val) - 1); cdat->dstr_1097__CLASS_MELT_MODE.val[15] = (char) 0; cdat->dstr_1097__CLASS_MELT_MODE.slen = 15; /*iniobj dsym_1098__CLASS_NAMED*/ /*uniqueobj*/ if (! /*_.VALDATA___V1268*/ meltfptr[1267]) /*_.VALDATA___V1268*/ meltfptr[1267] = (melt_ptr_t) & cdat->dsym_1098__CLASS_NAMED; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1098__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_1098__CLASS_NAMED", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1098__CLASS_NAMED.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1098__CLASS_NAMED.obj_hash = 60407004; cdat->dsym_1098__CLASS_NAMED.obj_len = 3; /*inistring dstr_1099__CLASS_NAMED*/ /*_.VALSTR___V1269*/ meltfptr[1268] = (melt_ptr_t) & cdat->dstr_1099__CLASS_NAMED; cdat->dstr_1099__CLASS_NAMED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1099__CLASS_NAMED.val, "CLASS_NAMED", sizeof (cdat->dstr_1099__CLASS_NAMED.val) - 1); cdat->dstr_1099__CLASS_NAMED.val[11] = (char) 0; cdat->dstr_1099__CLASS_NAMED.slen = 11; /*iniobj dsym_1100__CLASS_PRIMITIVE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1270*/ meltfptr[1269]) /*_.VALDATA___V1270*/ meltfptr[1269] = (melt_ptr_t) & cdat->dsym_1100__CLASS_PRIMITIVE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1100__CLASS_PRIMITIVE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1100__CLASS_PRIMITIVE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1100__CLASS_PRIMITIVE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1100__CLASS_PRIMITIVE.obj_hash = 102527506; cdat->dsym_1100__CLASS_PRIMITIVE.obj_len = 3; /*inistring dstr_1101__CLASS_PRIMITIVE*/ /*_.VALSTR___V1271*/ meltfptr[1270] = (melt_ptr_t) & cdat->dstr_1101__CLASS_PRIMITIVE; cdat->dstr_1101__CLASS_PRIMITIVE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1101__CLASS_PRIMITIVE.val, "CLASS_PRIMITIVE", sizeof (cdat->dstr_1101__CLASS_PRIMITIVE. val) - 1); cdat->dstr_1101__CLASS_PRIMITIVE.val[15] = (char) 0; cdat->dstr_1101__CLASS_PRIMITIVE.slen = 15; /*iniobj dsym_1102__CLASS_PROPED*/ /*uniqueobj*/ if (! /*_.VALDATA___V1272*/ meltfptr[1271]) /*_.VALDATA___V1272*/ meltfptr[1271] = (melt_ptr_t) & cdat->dsym_1102__CLASS_PROPED; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1102__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_1102__CLASS_PROPED", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1102__CLASS_PROPED.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1102__CLASS_PROPED.obj_hash = 96765023; cdat->dsym_1102__CLASS_PROPED.obj_len = 3; /*inistring dstr_1103__CLASS_PROPED*/ /*_.VALSTR___V1273*/ meltfptr[1272] = (melt_ptr_t) & cdat->dstr_1103__CLASS_PROPED; cdat->dstr_1103__CLASS_PROPED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1103__CLASS_PROPED.val, "CLASS_PROPED", sizeof (cdat->dstr_1103__CLASS_PROPED.val) - 1); cdat->dstr_1103__CLASS_PROPED.val[12] = (char) 0; cdat->dstr_1103__CLASS_PROPED.slen = 12; /*iniobj dsym_1104__CLASS_REFERENCE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1274*/ meltfptr[1273]) /*_.VALDATA___V1274*/ meltfptr[1273] = (melt_ptr_t) & cdat->dsym_1104__CLASS_REFERENCE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1104__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_1104__CLASS_REFERENCE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1104__CLASS_REFERENCE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1104__CLASS_REFERENCE.obj_hash = 896623907; cdat->dsym_1104__CLASS_REFERENCE.obj_len = 3; /*inistring dstr_1105__CLASS_REFERENCE*/ /*_.VALSTR___V1275*/ meltfptr[1274] = (melt_ptr_t) & cdat->dstr_1105__CLASS_REFERENCE; cdat->dstr_1105__CLASS_REFERENCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1105__CLASS_REFERENCE.val, "CLASS_REFERENCE", sizeof (cdat->dstr_1105__CLASS_REFERENCE. val) - 1); cdat->dstr_1105__CLASS_REFERENCE.val[15] = (char) 0; cdat->dstr_1105__CLASS_REFERENCE.slen = 15; /*iniobj dsym_1106__CLASS_SELECTOR*/ /*uniqueobj*/ if (! /*_.VALDATA___V1276*/ meltfptr[1275]) /*_.VALDATA___V1276*/ meltfptr[1275] = (melt_ptr_t) & cdat->dsym_1106__CLASS_SELECTOR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1106__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_1106__CLASS_SELECTOR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1106__CLASS_SELECTOR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1106__CLASS_SELECTOR.obj_hash = 100646971; cdat->dsym_1106__CLASS_SELECTOR.obj_len = 3; /*inistring dstr_1107__CLASS_SELECTOR*/ /*_.VALSTR___V1277*/ meltfptr[1276] = (melt_ptr_t) & cdat->dstr_1107__CLASS_SELECTOR; cdat->dstr_1107__CLASS_SELECTOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1107__CLASS_SELECTOR.val, "CLASS_SELECTOR", sizeof (cdat->dstr_1107__CLASS_SELECTOR.val) - 1); cdat->dstr_1107__CLASS_SELECTOR.val[14] = (char) 0; cdat->dstr_1107__CLASS_SELECTOR.slen = 14; /*iniobj dsym_1108__CLASS_SEXPR*/ /*uniqueobj*/ if (! /*_.VALDATA___V1278*/ meltfptr[1277]) /*_.VALDATA___V1278*/ meltfptr[1277] = (melt_ptr_t) & cdat->dsym_1108__CLASS_SEXPR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1108__CLASS_SEXPR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1108__CLASS_SEXPR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1108__CLASS_SEXPR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1108__CLASS_SEXPR.obj_hash = 53411612; cdat->dsym_1108__CLASS_SEXPR.obj_len = 3; /*inistring dstr_1109__CLASS_SEXPR*/ /*_.VALSTR___V1279*/ meltfptr[1278] = (melt_ptr_t) & cdat->dstr_1109__CLASS_SEXPR; cdat->dstr_1109__CLASS_SEXPR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1109__CLASS_SEXPR.val, "CLASS_SEXPR", sizeof (cdat->dstr_1109__CLASS_SEXPR.val) - 1); cdat->dstr_1109__CLASS_SEXPR.val[11] = (char) 0; cdat->dstr_1109__CLASS_SEXPR.slen = 11; /*iniobj dsym_1110__CLASS_SEXPR_MACROSTRING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1280*/ meltfptr[1279]) /*_.VALDATA___V1280*/ meltfptr[1279] = (melt_ptr_t) & cdat->dsym_1110__CLASS_SEXPR_MACROSTRING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1110__CLASS_SEXPR_MACROSTRING", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1110__CLASS_SEXPR_MACROSTRING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1110__CLASS_SEXPR_MACROSTRING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1110__CLASS_SEXPR_MACROSTRING.obj_hash = 576848661; cdat->dsym_1110__CLASS_SEXPR_MACROSTRING.obj_len = 3; /*inistring dstr_1111__CLASS_SEXPR_MACR*/ /*_.VALSTR___V1281*/ meltfptr[1280] = (melt_ptr_t) & cdat->dstr_1111__CLASS_SEXPR_MACR; cdat->dstr_1111__CLASS_SEXPR_MACR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1111__CLASS_SEXPR_MACR.val, "CLASS_SEXPR_MACROSTRING", sizeof (cdat->dstr_1111__CLASS_SEXPR_MACR. val) - 1); cdat->dstr_1111__CLASS_SEXPR_MACR.val[23] = (char) 0; cdat->dstr_1111__CLASS_SEXPR_MACR.slen = 23; /*iniobj dsym_1112__CLASS_SYMBOL*/ /*uniqueobj*/ if (! /*_.VALDATA___V1282*/ meltfptr[1281]) /*_.VALDATA___V1282*/ meltfptr[1281] = (melt_ptr_t) & cdat->dsym_1112__CLASS_SYMBOL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1112__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_1112__CLASS_SYMBOL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1112__CLASS_SYMBOL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1112__CLASS_SYMBOL.obj_hash = 53524182; cdat->dsym_1112__CLASS_SYMBOL.obj_len = 3; /*inistring dstr_1113__CLASS_SYMBOL*/ /*_.VALSTR___V1283*/ meltfptr[1282] = (melt_ptr_t) & cdat->dstr_1113__CLASS_SYMBOL; cdat->dstr_1113__CLASS_SYMBOL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1113__CLASS_SYMBOL.val, "CLASS_SYMBOL", sizeof (cdat->dstr_1113__CLASS_SYMBOL.val) - 1); cdat->dstr_1113__CLASS_SYMBOL.val[12] = (char) 0; cdat->dstr_1113__CLASS_SYMBOL.slen = 12; /*iniobj dsym_1114__CLASS_SYSTEM_DATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V1284*/ meltfptr[1283]) /*_.VALDATA___V1284*/ meltfptr[1283] = (melt_ptr_t) & cdat->dsym_1114__CLASS_SYSTEM_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1114__CLASS_SYSTEM_DATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1114__CLASS_SYSTEM_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1114__CLASS_SYSTEM_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1114__CLASS_SYSTEM_DATA.obj_hash = 648451867; cdat->dsym_1114__CLASS_SYSTEM_DATA.obj_len = 3; /*inistring dstr_1115__CLASS_SYSTEM_DAT*/ /*_.VALSTR___V1285*/ meltfptr[1284] = (melt_ptr_t) & cdat->dstr_1115__CLASS_SYSTEM_DAT; cdat->dstr_1115__CLASS_SYSTEM_DAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1115__CLASS_SYSTEM_DAT.val, "CLASS_SYSTEM_DATA", sizeof (cdat->dstr_1115__CLASS_SYSTEM_DAT. val) - 1); cdat->dstr_1115__CLASS_SYSTEM_DAT.val[17] = (char) 0; cdat->dstr_1115__CLASS_SYSTEM_DAT.slen = 17; /*iniobj dsym_1116__CTYPE_BASIC_BLOCK*/ /*uniqueobj*/ if (! /*_.VALDATA___V1286*/ meltfptr[1285]) /*_.VALDATA___V1286*/ meltfptr[1285] = (melt_ptr_t) & cdat->dsym_1116__CTYPE_BASIC_BLOCK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1116__CTYPE_BASIC_BLOCK", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1116__CTYPE_BASIC_BLOCK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1116__CTYPE_BASIC_BLOCK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1116__CTYPE_BASIC_BLOCK.obj_hash = 344797451; cdat->dsym_1116__CTYPE_BASIC_BLOCK.obj_len = 3; /*inistring dstr_1117__CTYPE_BASIC_BLOC*/ /*_.VALSTR___V1287*/ meltfptr[1286] = (melt_ptr_t) & cdat->dstr_1117__CTYPE_BASIC_BLOC; cdat->dstr_1117__CTYPE_BASIC_BLOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1117__CTYPE_BASIC_BLOC.val, "CTYPE_BASIC_BLOCK", sizeof (cdat->dstr_1117__CTYPE_BASIC_BLOC. val) - 1); cdat->dstr_1117__CTYPE_BASIC_BLOC.val[17] = (char) 0; cdat->dstr_1117__CTYPE_BASIC_BLOC.slen = 17; /*iniobj dsym_1118__CTYPE_BITMAP*/ /*uniqueobj*/ if (! /*_.VALDATA___V1288*/ meltfptr[1287]) /*_.VALDATA___V1288*/ meltfptr[1287] = (melt_ptr_t) & cdat->dsym_1118__CTYPE_BITMAP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1118__CTYPE_BITMAP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1118__CTYPE_BITMAP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1118__CTYPE_BITMAP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1118__CTYPE_BITMAP.obj_hash = 82445659; cdat->dsym_1118__CTYPE_BITMAP.obj_len = 3; /*inistring dstr_1119__CTYPE_BITMAP*/ /*_.VALSTR___V1289*/ meltfptr[1288] = (melt_ptr_t) & cdat->dstr_1119__CTYPE_BITMAP; cdat->dstr_1119__CTYPE_BITMAP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1119__CTYPE_BITMAP.val, "CTYPE_BITMAP", sizeof (cdat->dstr_1119__CTYPE_BITMAP.val) - 1); cdat->dstr_1119__CTYPE_BITMAP.val[12] = (char) 0; cdat->dstr_1119__CTYPE_BITMAP.slen = 12; /*iniobj dsym_1120__CTYPE_CSTRING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1290*/ meltfptr[1289]) /*_.VALDATA___V1290*/ meltfptr[1289] = (melt_ptr_t) & cdat->dsym_1120__CTYPE_CSTRING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1120__CTYPE_CSTRING", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1120__CTYPE_CSTRING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1120__CTYPE_CSTRING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1120__CTYPE_CSTRING.obj_hash = 90196516; cdat->dsym_1120__CTYPE_CSTRING.obj_len = 3; /*inistring dstr_1121__CTYPE_CSTRING*/ /*_.VALSTR___V1291*/ meltfptr[1290] = (melt_ptr_t) & cdat->dstr_1121__CTYPE_CSTRING; cdat->dstr_1121__CTYPE_CSTRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1121__CTYPE_CSTRING.val, "CTYPE_CSTRING", sizeof (cdat->dstr_1121__CTYPE_CSTRING.val) - 1); cdat->dstr_1121__CTYPE_CSTRING.val[13] = (char) 0; cdat->dstr_1121__CTYPE_CSTRING.slen = 13; /*iniobj dsym_1122__CTYPE_EDGE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1292*/ meltfptr[1291]) /*_.VALDATA___V1292*/ meltfptr[1291] = (melt_ptr_t) & cdat->dsym_1122__CTYPE_EDGE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1122__CTYPE_EDGE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1122__CTYPE_EDGE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1122__CTYPE_EDGE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1122__CTYPE_EDGE.obj_hash = 959535633; cdat->dsym_1122__CTYPE_EDGE.obj_len = 3; /*inistring dstr_1123__CTYPE_EDGE*/ /*_.VALSTR___V1293*/ meltfptr[1292] = (melt_ptr_t) & cdat->dstr_1123__CTYPE_EDGE; cdat->dstr_1123__CTYPE_EDGE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1123__CTYPE_EDGE.val, "CTYPE_EDGE", sizeof (cdat->dstr_1123__CTYPE_EDGE.val) - 1); cdat->dstr_1123__CTYPE_EDGE.val[10] = (char) 0; cdat->dstr_1123__CTYPE_EDGE.slen = 10; /*iniobj dsym_1124__CTYPE_GIMPLE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1294*/ meltfptr[1293]) /*_.VALDATA___V1294*/ meltfptr[1293] = (melt_ptr_t) & cdat->dsym_1124__CTYPE_GIMPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1124__CTYPE_GIMPLE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1124__CTYPE_GIMPLE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1124__CTYPE_GIMPLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1124__CTYPE_GIMPLE.obj_hash = 625493548; cdat->dsym_1124__CTYPE_GIMPLE.obj_len = 3; /*inistring dstr_1125__CTYPE_GIMPLE*/ /*_.VALSTR___V1295*/ meltfptr[1294] = (melt_ptr_t) & cdat->dstr_1125__CTYPE_GIMPLE; cdat->dstr_1125__CTYPE_GIMPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1125__CTYPE_GIMPLE.val, "CTYPE_GIMPLE", sizeof (cdat->dstr_1125__CTYPE_GIMPLE.val) - 1); cdat->dstr_1125__CTYPE_GIMPLE.val[12] = (char) 0; cdat->dstr_1125__CTYPE_GIMPLE.slen = 12; /*iniobj dsym_1126__CTYPE_GIMPLE_SEQ*/ /*uniqueobj*/ if (! /*_.VALDATA___V1296*/ meltfptr[1295]) /*_.VALDATA___V1296*/ meltfptr[1295] = (melt_ptr_t) & cdat->dsym_1126__CTYPE_GIMPLE_SEQ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1126__CTYPE_GIMPLE_SEQ", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1126__CTYPE_GIMPLE_SEQ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1126__CTYPE_GIMPLE_SEQ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1126__CTYPE_GIMPLE_SEQ.obj_hash = 455098616; cdat->dsym_1126__CTYPE_GIMPLE_SEQ.obj_len = 3; /*inistring dstr_1127__CTYPE_GIMPLE_SEQ*/ /*_.VALSTR___V1297*/ meltfptr[1296] = (melt_ptr_t) & cdat->dstr_1127__CTYPE_GIMPLE_SEQ; cdat->dstr_1127__CTYPE_GIMPLE_SEQ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1127__CTYPE_GIMPLE_SEQ.val, "CTYPE_GIMPLE_SEQ", sizeof (cdat->dstr_1127__CTYPE_GIMPLE_SEQ. val) - 1); cdat->dstr_1127__CTYPE_GIMPLE_SEQ.val[16] = (char) 0; cdat->dstr_1127__CTYPE_GIMPLE_SEQ.slen = 16; /*iniobj dsym_1128__CTYPE_LONG*/ /*uniqueobj*/ if (! /*_.VALDATA___V1298*/ meltfptr[1297]) /*_.VALDATA___V1298*/ meltfptr[1297] = (melt_ptr_t) & cdat->dsym_1128__CTYPE_LONG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1128__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_1128__CTYPE_LONG", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1128__CTYPE_LONG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1128__CTYPE_LONG.obj_hash = 64180850; cdat->dsym_1128__CTYPE_LONG.obj_len = 3; /*inistring dstr_1129__CTYPE_LONG*/ /*_.VALSTR___V1299*/ meltfptr[1298] = (melt_ptr_t) & cdat->dstr_1129__CTYPE_LONG; cdat->dstr_1129__CTYPE_LONG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1129__CTYPE_LONG.val, "CTYPE_LONG", sizeof (cdat->dstr_1129__CTYPE_LONG.val) - 1); cdat->dstr_1129__CTYPE_LONG.val[10] = (char) 0; cdat->dstr_1129__CTYPE_LONG.slen = 10; /*iniobj dsym_1130__CTYPE_LOOP*/ /*uniqueobj*/ if (! /*_.VALDATA___V1300*/ meltfptr[1299]) /*_.VALDATA___V1300*/ meltfptr[1299] = (melt_ptr_t) & cdat->dsym_1130__CTYPE_LOOP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1130__CTYPE_LOOP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1130__CTYPE_LOOP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1130__CTYPE_LOOP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1130__CTYPE_LOOP.obj_hash = 151503542; cdat->dsym_1130__CTYPE_LOOP.obj_len = 3; /*inistring dstr_1131__CTYPE_LOOP*/ /*_.VALSTR___V1301*/ meltfptr[1300] = (melt_ptr_t) & cdat->dstr_1131__CTYPE_LOOP; cdat->dstr_1131__CTYPE_LOOP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1131__CTYPE_LOOP.val, "CTYPE_LOOP", sizeof (cdat->dstr_1131__CTYPE_LOOP.val) - 1); cdat->dstr_1131__CTYPE_LOOP.val[10] = (char) 0; cdat->dstr_1131__CTYPE_LOOP.slen = 10; /*iniobj dsym_1132__CTYPE_PPL_COEFFICIENT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1302*/ meltfptr[1301]) /*_.VALDATA___V1302*/ meltfptr[1301] = (melt_ptr_t) & cdat->dsym_1132__CTYPE_PPL_COEFFICIENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1132__CTYPE_PPL_COEFFICIENT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1132__CTYPE_PPL_COEFFICIENT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1132__CTYPE_PPL_COEFFICIENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1132__CTYPE_PPL_COEFFICIENT.obj_hash = 480666121; cdat->dsym_1132__CTYPE_PPL_COEFFICIENT.obj_len = 3; /*inistring dstr_1133__CTYPE_PPL_COEFFI*/ /*_.VALSTR___V1303*/ meltfptr[1302] = (melt_ptr_t) & cdat->dstr_1133__CTYPE_PPL_COEFFI; cdat->dstr_1133__CTYPE_PPL_COEFFI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1133__CTYPE_PPL_COEFFI.val, "CTYPE_PPL_COEFFICIENT", sizeof (cdat->dstr_1133__CTYPE_PPL_COEFFI. val) - 1); cdat->dstr_1133__CTYPE_PPL_COEFFI.val[21] = (char) 0; cdat->dstr_1133__CTYPE_PPL_COEFFI.slen = 21; /*iniobj dsym_1134__CTYPE_PPL_CONSTRAINT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1304*/ meltfptr[1303]) /*_.VALDATA___V1304*/ meltfptr[1303] = (melt_ptr_t) & cdat->dsym_1134__CTYPE_PPL_CONSTRAINT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1134__CTYPE_PPL_CONSTRAINT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1134__CTYPE_PPL_CONSTRAINT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1134__CTYPE_PPL_CONSTRAINT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1134__CTYPE_PPL_CONSTRAINT.obj_hash = 66344219; cdat->dsym_1134__CTYPE_PPL_CONSTRAINT.obj_len = 3; /*inistring dstr_1135__CTYPE_PPL_CONSTR*/ /*_.VALSTR___V1305*/ meltfptr[1304] = (melt_ptr_t) & cdat->dstr_1135__CTYPE_PPL_CONSTR; cdat->dstr_1135__CTYPE_PPL_CONSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1135__CTYPE_PPL_CONSTR.val, "CTYPE_PPL_CONSTRAINT", sizeof (cdat->dstr_1135__CTYPE_PPL_CONSTR. val) - 1); cdat->dstr_1135__CTYPE_PPL_CONSTR.val[20] = (char) 0; cdat->dstr_1135__CTYPE_PPL_CONSTR.slen = 20; /*iniobj dsym_1136__CTYPE_PPL_CONSTRAINT_SYSTEM*/ /*uniqueobj*/ if (! /*_.VALDATA___V1306*/ meltfptr[1305]) /*_.VALDATA___V1306*/ meltfptr[1305] = (melt_ptr_t) & cdat->dsym_1136__CTYPE_PPL_CONSTRAINT_SYSTEM; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1136__CTYPE_PPL_CONSTRAINT_SYSTEM", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1136__CTYPE_PPL_CONSTRAINT_SYSTEM", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1136__CTYPE_PPL_CONSTRAINT_SYSTEM.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1136__CTYPE_PPL_CONSTRAINT_SYSTEM.obj_hash = 450980506; cdat->dsym_1136__CTYPE_PPL_CONSTRAINT_SYSTEM.obj_len = 3; /*inistring dstr_1137__CTYPE_PPL_CONSTR*/ /*_.VALSTR___V1307*/ meltfptr[1306] = (melt_ptr_t) & cdat->dstr_1137__CTYPE_PPL_CONSTR; cdat->dstr_1137__CTYPE_PPL_CONSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1137__CTYPE_PPL_CONSTR.val, "CTYPE_PPL_CONSTRAINT_SYSTEM", sizeof (cdat->dstr_1137__CTYPE_PPL_CONSTR. val) - 1); cdat->dstr_1137__CTYPE_PPL_CONSTR.val[27] = (char) 0; cdat->dstr_1137__CTYPE_PPL_CONSTR.slen = 27; /*iniobj dsym_1138__CTYPE_PPL_GENERATOR*/ /*uniqueobj*/ if (! /*_.VALDATA___V1308*/ meltfptr[1307]) /*_.VALDATA___V1308*/ meltfptr[1307] = (melt_ptr_t) & cdat->dsym_1138__CTYPE_PPL_GENERATOR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1138__CTYPE_PPL_GENERATOR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1138__CTYPE_PPL_GENERATOR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1138__CTYPE_PPL_GENERATOR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1138__CTYPE_PPL_GENERATOR.obj_hash = 440213687; cdat->dsym_1138__CTYPE_PPL_GENERATOR.obj_len = 3; /*inistring dstr_1139__CTYPE_PPL_GENERA*/ /*_.VALSTR___V1309*/ meltfptr[1308] = (melt_ptr_t) & cdat->dstr_1139__CTYPE_PPL_GENERA; cdat->dstr_1139__CTYPE_PPL_GENERA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1139__CTYPE_PPL_GENERA.val, "CTYPE_PPL_GENERATOR", sizeof (cdat->dstr_1139__CTYPE_PPL_GENERA. val) - 1); cdat->dstr_1139__CTYPE_PPL_GENERA.val[19] = (char) 0; cdat->dstr_1139__CTYPE_PPL_GENERA.slen = 19; /*iniobj dsym_1140__CTYPE_PPL_GENERATOR_SYSTEM*/ /*uniqueobj*/ if (! /*_.VALDATA___V1310*/ meltfptr[1309]) /*_.VALDATA___V1310*/ meltfptr[1309] = (melt_ptr_t) & cdat->dsym_1140__CTYPE_PPL_GENERATOR_SYSTEM; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1140__CTYPE_PPL_GENERATOR_SYSTEM", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1140__CTYPE_PPL_GENERATOR_SYSTEM", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1140__CTYPE_PPL_GENERATOR_SYSTEM.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1140__CTYPE_PPL_GENERATOR_SYSTEM.obj_hash = 43488162; cdat->dsym_1140__CTYPE_PPL_GENERATOR_SYSTEM.obj_len = 3; /*inistring dstr_1141__CTYPE_PPL_GENERA*/ /*_.VALSTR___V1311*/ meltfptr[1310] = (melt_ptr_t) & cdat->dstr_1141__CTYPE_PPL_GENERA; cdat->dstr_1141__CTYPE_PPL_GENERA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1141__CTYPE_PPL_GENERA.val, "CTYPE_PPL_GENERATOR_SYSTEM", sizeof (cdat->dstr_1141__CTYPE_PPL_GENERA. val) - 1); cdat->dstr_1141__CTYPE_PPL_GENERA.val[26] = (char) 0; cdat->dstr_1141__CTYPE_PPL_GENERA.slen = 26; /*iniobj dsym_1142__CTYPE_PPL_LINEAR_EXPRESSION*/ /*uniqueobj*/ if (! /*_.VALDATA___V1312*/ meltfptr[1311]) /*_.VALDATA___V1312*/ meltfptr[1311] = (melt_ptr_t) & cdat->dsym_1142__CTYPE_PPL_LINEAR_EXPRESSION; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1142__CTYPE_PPL_LINEAR_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_1142__CTYPE_PPL_LINEAR_EXPRESSION", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1142__CTYPE_PPL_LINEAR_EXPRESSION.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1142__CTYPE_PPL_LINEAR_EXPRESSION.obj_hash = 607500934; cdat->dsym_1142__CTYPE_PPL_LINEAR_EXPRESSION.obj_len = 3; /*inistring dstr_1143__CTYPE_PPL_LINEAR*/ /*_.VALSTR___V1313*/ meltfptr[1312] = (melt_ptr_t) & cdat->dstr_1143__CTYPE_PPL_LINEAR; cdat->dstr_1143__CTYPE_PPL_LINEAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1143__CTYPE_PPL_LINEAR.val, "CTYPE_PPL_LINEAR_EXPRESSION", sizeof (cdat->dstr_1143__CTYPE_PPL_LINEAR. val) - 1); cdat->dstr_1143__CTYPE_PPL_LINEAR.val[27] = (char) 0; cdat->dstr_1143__CTYPE_PPL_LINEAR.slen = 27; /*iniobj dsym_1144__CTYPE_PPL_POLYHEDRON*/ /*uniqueobj*/ if (! /*_.VALDATA___V1314*/ meltfptr[1313]) /*_.VALDATA___V1314*/ meltfptr[1313] = (melt_ptr_t) & cdat->dsym_1144__CTYPE_PPL_POLYHEDRON; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1144__CTYPE_PPL_POLYHEDRON", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1144__CTYPE_PPL_POLYHEDRON", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1144__CTYPE_PPL_POLYHEDRON.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1144__CTYPE_PPL_POLYHEDRON.obj_hash = 849173857; cdat->dsym_1144__CTYPE_PPL_POLYHEDRON.obj_len = 3; /*inistring dstr_1145__CTYPE_PPL_POLYHE*/ /*_.VALSTR___V1315*/ meltfptr[1314] = (melt_ptr_t) & cdat->dstr_1145__CTYPE_PPL_POLYHE; cdat->dstr_1145__CTYPE_PPL_POLYHE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1145__CTYPE_PPL_POLYHE.val, "CTYPE_PPL_POLYHEDRON", sizeof (cdat->dstr_1145__CTYPE_PPL_POLYHE. val) - 1); cdat->dstr_1145__CTYPE_PPL_POLYHE.val[20] = (char) 0; cdat->dstr_1145__CTYPE_PPL_POLYHE.slen = 20; /*iniobj dsym_1146__CTYPE_RTVEC*/ /*uniqueobj*/ if (! /*_.VALDATA___V1316*/ meltfptr[1315]) /*_.VALDATA___V1316*/ meltfptr[1315] = (melt_ptr_t) & cdat->dsym_1146__CTYPE_RTVEC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1146__CTYPE_RTVEC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1146__CTYPE_RTVEC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1146__CTYPE_RTVEC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1146__CTYPE_RTVEC.obj_hash = 1038726812; cdat->dsym_1146__CTYPE_RTVEC.obj_len = 3; /*inistring dstr_1147__CTYPE_RTVEC*/ /*_.VALSTR___V1317*/ meltfptr[1316] = (melt_ptr_t) & cdat->dstr_1147__CTYPE_RTVEC; cdat->dstr_1147__CTYPE_RTVEC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1147__CTYPE_RTVEC.val, "CTYPE_RTVEC", sizeof (cdat->dstr_1147__CTYPE_RTVEC.val) - 1); cdat->dstr_1147__CTYPE_RTVEC.val[11] = (char) 0; cdat->dstr_1147__CTYPE_RTVEC.slen = 11; /*iniobj dsym_1148__CTYPE_RTX*/ /*uniqueobj*/ if (! /*_.VALDATA___V1318*/ meltfptr[1317]) /*_.VALDATA___V1318*/ meltfptr[1317] = (melt_ptr_t) & cdat->dsym_1148__CTYPE_RTX; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1148__CTYPE_RTX", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1148__CTYPE_RTX", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1148__CTYPE_RTX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1148__CTYPE_RTX.obj_hash = 1037835279; cdat->dsym_1148__CTYPE_RTX.obj_len = 3; /*inistring dstr_1149__CTYPE_RTX*/ /*_.VALSTR___V1319*/ meltfptr[1318] = (melt_ptr_t) & cdat->dstr_1149__CTYPE_RTX; cdat->dstr_1149__CTYPE_RTX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1149__CTYPE_RTX.val, "CTYPE_RTX", sizeof (cdat->dstr_1149__CTYPE_RTX.val) - 1); cdat->dstr_1149__CTYPE_RTX.val[9] = (char) 0; cdat->dstr_1149__CTYPE_RTX.slen = 9; /*iniobj dsym_1150__CTYPE_TREE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1320*/ meltfptr[1319]) /*_.VALDATA___V1320*/ meltfptr[1319] = (melt_ptr_t) & cdat->dsym_1150__CTYPE_TREE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1150__CTYPE_TREE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1150__CTYPE_TREE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1150__CTYPE_TREE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1150__CTYPE_TREE.obj_hash = 93576863; cdat->dsym_1150__CTYPE_TREE.obj_len = 3; /*inistring dstr_1151__CTYPE_TREE*/ /*_.VALSTR___V1321*/ meltfptr[1320] = (melt_ptr_t) & cdat->dstr_1151__CTYPE_TREE; cdat->dstr_1151__CTYPE_TREE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1151__CTYPE_TREE.val, "CTYPE_TREE", sizeof (cdat->dstr_1151__CTYPE_TREE.val) - 1); cdat->dstr_1151__CTYPE_TREE.val[10] = (char) 0; cdat->dstr_1151__CTYPE_TREE.slen = 10; /*iniobj dsym_1152__CTYPE_VALUE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1322*/ meltfptr[1321]) /*_.VALDATA___V1322*/ meltfptr[1321] = (melt_ptr_t) & cdat->dsym_1152__CTYPE_VALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1152__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_1152__CTYPE_VALUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1152__CTYPE_VALUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1152__CTYPE_VALUE.obj_hash = 11062864; cdat->dsym_1152__CTYPE_VALUE.obj_len = 3; /*inistring dstr_1153__CTYPE_VALUE*/ /*_.VALSTR___V1323*/ meltfptr[1322] = (melt_ptr_t) & cdat->dstr_1153__CTYPE_VALUE; cdat->dstr_1153__CTYPE_VALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1153__CTYPE_VALUE.val, "CTYPE_VALUE", sizeof (cdat->dstr_1153__CTYPE_VALUE.val) - 1); cdat->dstr_1153__CTYPE_VALUE.val[11] = (char) 0; cdat->dstr_1153__CTYPE_VALUE.slen = 11; /*iniobj dsym_1154__CTYPE_VOID*/ /*uniqueobj*/ if (! /*_.VALDATA___V1324*/ meltfptr[1323]) /*_.VALDATA___V1324*/ meltfptr[1323] = (melt_ptr_t) & cdat->dsym_1154__CTYPE_VOID; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1154__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_1154__CTYPE_VOID", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1154__CTYPE_VOID.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1154__CTYPE_VOID.obj_hash = 94242002; cdat->dsym_1154__CTYPE_VOID.obj_len = 3; /*inistring dstr_1155__CTYPE_VOID*/ /*_.VALSTR___V1325*/ meltfptr[1324] = (melt_ptr_t) & cdat->dstr_1155__CTYPE_VOID; cdat->dstr_1155__CTYPE_VOID.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1155__CTYPE_VOID.val, "CTYPE_VOID", sizeof (cdat->dstr_1155__CTYPE_VOID.val) - 1); cdat->dstr_1155__CTYPE_VOID.val[10] = (char) 0; cdat->dstr_1155__CTYPE_VOID.slen = 10; /*iniobj dsym_1156__DISCR_ANY_RECEIVER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1326*/ meltfptr[1325]) /*_.VALDATA___V1326*/ meltfptr[1325] = (melt_ptr_t) & cdat->dsym_1156__DISCR_ANY_RECEIVER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1156__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_1156__DISCR_ANY_RECEIVER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1156__DISCR_ANY_RECEIVER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1156__DISCR_ANY_RECEIVER.obj_hash = 95947314; cdat->dsym_1156__DISCR_ANY_RECEIVER.obj_len = 3; /*inistring dstr_1157__DISCR_ANY_RECEIV*/ /*_.VALSTR___V1327*/ meltfptr[1326] = (melt_ptr_t) & cdat->dstr_1157__DISCR_ANY_RECEIV; cdat->dstr_1157__DISCR_ANY_RECEIV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1157__DISCR_ANY_RECEIV.val, "DISCR_ANY_RECEIVER", sizeof (cdat->dstr_1157__DISCR_ANY_RECEIV. val) - 1); cdat->dstr_1157__DISCR_ANY_RECEIV.val[18] = (char) 0; cdat->dstr_1157__DISCR_ANY_RECEIV.slen = 18; /*iniobj dsym_1158__DISCR_BASIC_BLOCK*/ /*uniqueobj*/ if (! /*_.VALDATA___V1328*/ meltfptr[1327]) /*_.VALDATA___V1328*/ meltfptr[1327] = (melt_ptr_t) & cdat->dsym_1158__DISCR_BASIC_BLOCK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1158__DISCR_BASIC_BLOCK", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1158__DISCR_BASIC_BLOCK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1158__DISCR_BASIC_BLOCK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1158__DISCR_BASIC_BLOCK.obj_hash = 457105241; cdat->dsym_1158__DISCR_BASIC_BLOCK.obj_len = 3; /*inistring dstr_1159__DISCR_BASIC_BLOC*/ /*_.VALSTR___V1329*/ meltfptr[1328] = (melt_ptr_t) & cdat->dstr_1159__DISCR_BASIC_BLOC; cdat->dstr_1159__DISCR_BASIC_BLOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1159__DISCR_BASIC_BLOC.val, "DISCR_BASIC_BLOCK", sizeof (cdat->dstr_1159__DISCR_BASIC_BLOC. val) - 1); cdat->dstr_1159__DISCR_BASIC_BLOC.val[17] = (char) 0; cdat->dstr_1159__DISCR_BASIC_BLOC.slen = 17; /*iniobj dsym_1160__DISCR_BITMAP*/ /*uniqueobj*/ if (! /*_.VALDATA___V1330*/ meltfptr[1329]) /*_.VALDATA___V1330*/ meltfptr[1329] = (melt_ptr_t) & cdat->dsym_1160__DISCR_BITMAP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1160__DISCR_BITMAP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1160__DISCR_BITMAP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1160__DISCR_BITMAP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1160__DISCR_BITMAP.obj_hash = 689238507; cdat->dsym_1160__DISCR_BITMAP.obj_len = 3; /*inistring dstr_1161__DISCR_BITMAP*/ /*_.VALSTR___V1331*/ meltfptr[1330] = (melt_ptr_t) & cdat->dstr_1161__DISCR_BITMAP; cdat->dstr_1161__DISCR_BITMAP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1161__DISCR_BITMAP.val, "DISCR_BITMAP", sizeof (cdat->dstr_1161__DISCR_BITMAP.val) - 1); cdat->dstr_1161__DISCR_BITMAP.val[12] = (char) 0; cdat->dstr_1161__DISCR_BITMAP.slen = 12; /*iniobj dsym_1162__DISCR_BUCKET_LONGS*/ /*uniqueobj*/ if (! /*_.VALDATA___V1332*/ meltfptr[1331]) /*_.VALDATA___V1332*/ meltfptr[1331] = (melt_ptr_t) & cdat->dsym_1162__DISCR_BUCKET_LONGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1162__DISCR_BUCKET_LONGS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1162__DISCR_BUCKET_LONGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1162__DISCR_BUCKET_LONGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1162__DISCR_BUCKET_LONGS.obj_hash = 603682282; cdat->dsym_1162__DISCR_BUCKET_LONGS.obj_len = 3; /*inistring dstr_1163__DISCR_BUCKET_LON*/ /*_.VALSTR___V1333*/ meltfptr[1332] = (melt_ptr_t) & cdat->dstr_1163__DISCR_BUCKET_LON; cdat->dstr_1163__DISCR_BUCKET_LON.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1163__DISCR_BUCKET_LON.val, "DISCR_BUCKET_LONGS", sizeof (cdat->dstr_1163__DISCR_BUCKET_LON. val) - 1); cdat->dstr_1163__DISCR_BUCKET_LON.val[18] = (char) 0; cdat->dstr_1163__DISCR_BUCKET_LON.slen = 18; /*iniobj dsym_1164__DISCR_CHARACTER_INTEGER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1334*/ meltfptr[1333]) /*_.VALDATA___V1334*/ meltfptr[1333] = (melt_ptr_t) & cdat->dsym_1164__DISCR_CHARACTER_INTEGER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1164__DISCR_CHARACTER_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_1164__DISCR_CHARACTER_INTEGER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1164__DISCR_CHARACTER_INTEGER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1164__DISCR_CHARACTER_INTEGER.obj_hash = 370833943; cdat->dsym_1164__DISCR_CHARACTER_INTEGER.obj_len = 3; /*inistring dstr_1165__DISCR_CHARACTER_*/ /*_.VALSTR___V1335*/ meltfptr[1334] = (melt_ptr_t) & cdat->dstr_1165__DISCR_CHARACTER_; cdat->dstr_1165__DISCR_CHARACTER_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1165__DISCR_CHARACTER_.val, "DISCR_CHARACTER_INTEGER", sizeof (cdat->dstr_1165__DISCR_CHARACTER_. val) - 1); cdat->dstr_1165__DISCR_CHARACTER_.val[23] = (char) 0; cdat->dstr_1165__DISCR_CHARACTER_.slen = 23; /*iniobj dsym_1166__DISCR_CLASS_SEQUENCE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1336*/ meltfptr[1335]) /*_.VALDATA___V1336*/ meltfptr[1335] = (melt_ptr_t) & cdat->dsym_1166__DISCR_CLASS_SEQUENCE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1166__DISCR_CLASS_SEQUENCE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1166__DISCR_CLASS_SEQUENCE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1166__DISCR_CLASS_SEQUENCE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1166__DISCR_CLASS_SEQUENCE.obj_hash = 751197907; cdat->dsym_1166__DISCR_CLASS_SEQUENCE.obj_len = 3; /*inistring dstr_1167__DISCR_CLASS_SEQU*/ /*_.VALSTR___V1337*/ meltfptr[1336] = (melt_ptr_t) & cdat->dstr_1167__DISCR_CLASS_SEQU; cdat->dstr_1167__DISCR_CLASS_SEQU.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1167__DISCR_CLASS_SEQU.val, "DISCR_CLASS_SEQUENCE", sizeof (cdat->dstr_1167__DISCR_CLASS_SEQU. val) - 1); cdat->dstr_1167__DISCR_CLASS_SEQU.val[20] = (char) 0; cdat->dstr_1167__DISCR_CLASS_SEQU.slen = 20; /*iniobj dsym_1168__DISCR_CLOSURE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1338*/ meltfptr[1337]) /*_.VALDATA___V1338*/ meltfptr[1337] = (melt_ptr_t) & cdat->dsym_1168__DISCR_CLOSURE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1168__DISCR_CLOSURE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1168__DISCR_CLOSURE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1168__DISCR_CLOSURE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1168__DISCR_CLOSURE.obj_hash = 99248147; cdat->dsym_1168__DISCR_CLOSURE.obj_len = 3; /*inistring dstr_1169__DISCR_CLOSURE*/ /*_.VALSTR___V1339*/ meltfptr[1338] = (melt_ptr_t) & cdat->dstr_1169__DISCR_CLOSURE; cdat->dstr_1169__DISCR_CLOSURE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1169__DISCR_CLOSURE.val, "DISCR_CLOSURE", sizeof (cdat->dstr_1169__DISCR_CLOSURE.val) - 1); cdat->dstr_1169__DISCR_CLOSURE.val[13] = (char) 0; cdat->dstr_1169__DISCR_CLOSURE.slen = 13; /*iniobj dsym_1170__DISCR_CONSTANT_INTEGER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1340*/ meltfptr[1339]) /*_.VALDATA___V1340*/ meltfptr[1339] = (melt_ptr_t) & cdat->dsym_1170__DISCR_CONSTANT_INTEGER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1170__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_1170__DISCR_CONSTANT_INTEGER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1170__DISCR_CONSTANT_INTEGER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1170__DISCR_CONSTANT_INTEGER.obj_hash = 1007078494; cdat->dsym_1170__DISCR_CONSTANT_INTEGER.obj_len = 3; /*inistring dstr_1171__DISCR_CONSTANT_I*/ /*_.VALSTR___V1341*/ meltfptr[1340] = (melt_ptr_t) & cdat->dstr_1171__DISCR_CONSTANT_I; cdat->dstr_1171__DISCR_CONSTANT_I.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1171__DISCR_CONSTANT_I.val, "DISCR_CONSTANT_INTEGER", sizeof (cdat->dstr_1171__DISCR_CONSTANT_I. val) - 1); cdat->dstr_1171__DISCR_CONSTANT_I.val[22] = (char) 0; cdat->dstr_1171__DISCR_CONSTANT_I.slen = 22; /*iniobj dsym_1172__DISCR_EDGE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1342*/ meltfptr[1341]) /*_.VALDATA___V1342*/ meltfptr[1341] = (melt_ptr_t) & cdat->dsym_1172__DISCR_EDGE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1172__DISCR_EDGE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1172__DISCR_EDGE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1172__DISCR_EDGE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1172__DISCR_EDGE.obj_hash = 91457502; cdat->dsym_1172__DISCR_EDGE.obj_len = 3; /*inistring dstr_1173__DISCR_EDGE*/ /*_.VALSTR___V1343*/ meltfptr[1342] = (melt_ptr_t) & cdat->dstr_1173__DISCR_EDGE; cdat->dstr_1173__DISCR_EDGE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1173__DISCR_EDGE.val, "DISCR_EDGE", sizeof (cdat->dstr_1173__DISCR_EDGE.val) - 1); cdat->dstr_1173__DISCR_EDGE.val[10] = (char) 0; cdat->dstr_1173__DISCR_EDGE.slen = 10; /*iniobj dsym_1174__DISCR_FIELD_SEQUENCE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1344*/ meltfptr[1343]) /*_.VALDATA___V1344*/ meltfptr[1343] = (melt_ptr_t) & cdat->dsym_1174__DISCR_FIELD_SEQUENCE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1174__DISCR_FIELD_SEQUENCE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1174__DISCR_FIELD_SEQUENCE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1174__DISCR_FIELD_SEQUENCE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1174__DISCR_FIELD_SEQUENCE.obj_hash = 95370221; cdat->dsym_1174__DISCR_FIELD_SEQUENCE.obj_len = 3; /*inistring dstr_1175__DISCR_FIELD_SEQU*/ /*_.VALSTR___V1345*/ meltfptr[1344] = (melt_ptr_t) & cdat->dstr_1175__DISCR_FIELD_SEQU; cdat->dstr_1175__DISCR_FIELD_SEQU.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1175__DISCR_FIELD_SEQU.val, "DISCR_FIELD_SEQUENCE", sizeof (cdat->dstr_1175__DISCR_FIELD_SEQU. val) - 1); cdat->dstr_1175__DISCR_FIELD_SEQU.val[20] = (char) 0; cdat->dstr_1175__DISCR_FIELD_SEQU.slen = 20; /*iniobj dsym_1176__DISCR_FILE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1346*/ meltfptr[1345]) /*_.VALDATA___V1346*/ meltfptr[1345] = (melt_ptr_t) & cdat->dsym_1176__DISCR_FILE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1176__DISCR_FILE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1176__DISCR_FILE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1176__DISCR_FILE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1176__DISCR_FILE.obj_hash = 22500478; cdat->dsym_1176__DISCR_FILE.obj_len = 3; /*inistring dstr_1177__DISCR_FILE*/ /*_.VALSTR___V1347*/ meltfptr[1346] = (melt_ptr_t) & cdat->dstr_1177__DISCR_FILE; cdat->dstr_1177__DISCR_FILE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1177__DISCR_FILE.val, "DISCR_FILE", sizeof (cdat->dstr_1177__DISCR_FILE.val) - 1); cdat->dstr_1177__DISCR_FILE.val[10] = (char) 0; cdat->dstr_1177__DISCR_FILE.slen = 10; /*iniobj dsym_1178__DISCR_GIMPLE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1348*/ meltfptr[1347]) /*_.VALDATA___V1348*/ meltfptr[1347] = (melt_ptr_t) & cdat->dsym_1178__DISCR_GIMPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1178__DISCR_GIMPLE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1178__DISCR_GIMPLE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1178__DISCR_GIMPLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1178__DISCR_GIMPLE.obj_hash = 554416154; cdat->dsym_1178__DISCR_GIMPLE.obj_len = 3; /*inistring dstr_1179__DISCR_GIMPLE*/ /*_.VALSTR___V1349*/ meltfptr[1348] = (melt_ptr_t) & cdat->dstr_1179__DISCR_GIMPLE; cdat->dstr_1179__DISCR_GIMPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1179__DISCR_GIMPLE.val, "DISCR_GIMPLE", sizeof (cdat->dstr_1179__DISCR_GIMPLE.val) - 1); cdat->dstr_1179__DISCR_GIMPLE.val[12] = (char) 0; cdat->dstr_1179__DISCR_GIMPLE.slen = 12; /*iniobj dsym_1180__DISCR_GIMPLE_SEQ*/ /*uniqueobj*/ if (! /*_.VALDATA___V1350*/ meltfptr[1349]) /*_.VALDATA___V1350*/ meltfptr[1349] = (melt_ptr_t) & cdat->dsym_1180__DISCR_GIMPLE_SEQ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1180__DISCR_GIMPLE_SEQ", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1180__DISCR_GIMPLE_SEQ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1180__DISCR_GIMPLE_SEQ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1180__DISCR_GIMPLE_SEQ.obj_hash = 369017589; cdat->dsym_1180__DISCR_GIMPLE_SEQ.obj_len = 3; /*inistring dstr_1181__DISCR_GIMPLE_SEQ*/ /*_.VALSTR___V1351*/ meltfptr[1350] = (melt_ptr_t) & cdat->dstr_1181__DISCR_GIMPLE_SEQ; cdat->dstr_1181__DISCR_GIMPLE_SEQ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1181__DISCR_GIMPLE_SEQ.val, "DISCR_GIMPLE_SEQ", sizeof (cdat->dstr_1181__DISCR_GIMPLE_SEQ. val) - 1); cdat->dstr_1181__DISCR_GIMPLE_SEQ.val[16] = (char) 0; cdat->dstr_1181__DISCR_GIMPLE_SEQ.slen = 16; /*iniobj dsym_1182__DISCR_LIST*/ /*uniqueobj*/ if (! /*_.VALDATA___V1352*/ meltfptr[1351]) /*_.VALDATA___V1352*/ meltfptr[1351] = (melt_ptr_t) & cdat->dsym_1182__DISCR_LIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1182__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_1182__DISCR_LIST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1182__DISCR_LIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1182__DISCR_LIST.obj_hash = 98407634; cdat->dsym_1182__DISCR_LIST.obj_len = 3; /*inistring dstr_1183__DISCR_LIST*/ /*_.VALSTR___V1353*/ meltfptr[1352] = (melt_ptr_t) & cdat->dstr_1183__DISCR_LIST; cdat->dstr_1183__DISCR_LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1183__DISCR_LIST.val, "DISCR_LIST", sizeof (cdat->dstr_1183__DISCR_LIST.val) - 1); cdat->dstr_1183__DISCR_LIST.val[10] = (char) 0; cdat->dstr_1183__DISCR_LIST.slen = 10; /*iniobj dsym_1184__DISCR_LOOP*/ /*uniqueobj*/ if (! /*_.VALDATA___V1354*/ meltfptr[1353]) /*_.VALDATA___V1354*/ meltfptr[1353] = (melt_ptr_t) & cdat->dsym_1184__DISCR_LOOP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1184__DISCR_LOOP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1184__DISCR_LOOP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1184__DISCR_LOOP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1184__DISCR_LOOP.obj_hash = 863250153; cdat->dsym_1184__DISCR_LOOP.obj_len = 3; /*inistring dstr_1185__DISCR_LOOP*/ /*_.VALSTR___V1355*/ meltfptr[1354] = (melt_ptr_t) & cdat->dstr_1185__DISCR_LOOP; cdat->dstr_1185__DISCR_LOOP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1185__DISCR_LOOP.val, "DISCR_LOOP", sizeof (cdat->dstr_1185__DISCR_LOOP.val) - 1); cdat->dstr_1185__DISCR_LOOP.val[10] = (char) 0; cdat->dstr_1185__DISCR_LOOP.slen = 10; /*iniobj dsym_1186__DISCR_MAP_BASIC_BLOCKS*/ /*uniqueobj*/ if (! /*_.VALDATA___V1356*/ meltfptr[1355]) /*_.VALDATA___V1356*/ meltfptr[1355] = (melt_ptr_t) & cdat->dsym_1186__DISCR_MAP_BASIC_BLOCKS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1186__DISCR_MAP_BASIC_BLOCKS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1186__DISCR_MAP_BASIC_BLOCKS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1186__DISCR_MAP_BASIC_BLOCKS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1186__DISCR_MAP_BASIC_BLOCKS.obj_hash = 460843809; cdat->dsym_1186__DISCR_MAP_BASIC_BLOCKS.obj_len = 3; /*inistring dstr_1187__DISCR_MAP_BASIC_*/ /*_.VALSTR___V1357*/ meltfptr[1356] = (melt_ptr_t) & cdat->dstr_1187__DISCR_MAP_BASIC_; cdat->dstr_1187__DISCR_MAP_BASIC_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1187__DISCR_MAP_BASIC_.val, "DISCR_MAP_BASIC_BLOCKS", sizeof (cdat->dstr_1187__DISCR_MAP_BASIC_. val) - 1); cdat->dstr_1187__DISCR_MAP_BASIC_.val[22] = (char) 0; cdat->dstr_1187__DISCR_MAP_BASIC_.slen = 22; /*iniobj dsym_1188__DISCR_MAP_BITMAPS*/ /*uniqueobj*/ if (! /*_.VALDATA___V1358*/ meltfptr[1357]) /*_.VALDATA___V1358*/ meltfptr[1357] = (melt_ptr_t) & cdat->dsym_1188__DISCR_MAP_BITMAPS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1188__DISCR_MAP_BITMAPS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1188__DISCR_MAP_BITMAPS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1188__DISCR_MAP_BITMAPS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1188__DISCR_MAP_BITMAPS.obj_hash = 102235576; cdat->dsym_1188__DISCR_MAP_BITMAPS.obj_len = 3; /*inistring dstr_1189__DISCR_MAP_BITMAP*/ /*_.VALSTR___V1359*/ meltfptr[1358] = (melt_ptr_t) & cdat->dstr_1189__DISCR_MAP_BITMAP; cdat->dstr_1189__DISCR_MAP_BITMAP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1189__DISCR_MAP_BITMAP.val, "DISCR_MAP_BITMAPS", sizeof (cdat->dstr_1189__DISCR_MAP_BITMAP. val) - 1); cdat->dstr_1189__DISCR_MAP_BITMAP.val[17] = (char) 0; cdat->dstr_1189__DISCR_MAP_BITMAP.slen = 17; /*iniobj dsym_1190__DISCR_MAP_EDGES*/ /*uniqueobj*/ if (! /*_.VALDATA___V1360*/ meltfptr[1359]) /*_.VALDATA___V1360*/ meltfptr[1359] = (melt_ptr_t) & cdat->dsym_1190__DISCR_MAP_EDGES; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1190__DISCR_MAP_EDGES", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1190__DISCR_MAP_EDGES", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1190__DISCR_MAP_EDGES.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1190__DISCR_MAP_EDGES.obj_hash = 510102591; cdat->dsym_1190__DISCR_MAP_EDGES.obj_len = 3; /*inistring dstr_1191__DISCR_MAP_EDGES*/ /*_.VALSTR___V1361*/ meltfptr[1360] = (melt_ptr_t) & cdat->dstr_1191__DISCR_MAP_EDGES; cdat->dstr_1191__DISCR_MAP_EDGES.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1191__DISCR_MAP_EDGES.val, "DISCR_MAP_EDGES", sizeof (cdat->dstr_1191__DISCR_MAP_EDGES. val) - 1); cdat->dstr_1191__DISCR_MAP_EDGES.val[15] = (char) 0; cdat->dstr_1191__DISCR_MAP_EDGES.slen = 15; /*iniobj dsym_1192__DISCR_MAP_GIMPLES*/ /*uniqueobj*/ if (! /*_.VALDATA___V1362*/ meltfptr[1361]) /*_.VALDATA___V1362*/ meltfptr[1361] = (melt_ptr_t) & cdat->dsym_1192__DISCR_MAP_GIMPLES; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1192__DISCR_MAP_GIMPLES", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1192__DISCR_MAP_GIMPLES", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1192__DISCR_MAP_GIMPLES.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1192__DISCR_MAP_GIMPLES.obj_hash = 581433132; cdat->dsym_1192__DISCR_MAP_GIMPLES.obj_len = 3; /*inistring dstr_1193__DISCR_MAP_GIMPLE*/ /*_.VALSTR___V1363*/ meltfptr[1362] = (melt_ptr_t) & cdat->dstr_1193__DISCR_MAP_GIMPLE; cdat->dstr_1193__DISCR_MAP_GIMPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1193__DISCR_MAP_GIMPLE.val, "DISCR_MAP_GIMPLES", sizeof (cdat->dstr_1193__DISCR_MAP_GIMPLE. val) - 1); cdat->dstr_1193__DISCR_MAP_GIMPLE.val[17] = (char) 0; cdat->dstr_1193__DISCR_MAP_GIMPLE.slen = 17; /*iniobj dsym_1194__DISCR_MAP_GIMPLE_SEQS*/ /*uniqueobj*/ if (! /*_.VALDATA___V1364*/ meltfptr[1363]) /*_.VALDATA___V1364*/ meltfptr[1363] = (melt_ptr_t) & cdat->dsym_1194__DISCR_MAP_GIMPLE_SEQS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1194__DISCR_MAP_GIMPLE_SEQS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1194__DISCR_MAP_GIMPLE_SEQS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1194__DISCR_MAP_GIMPLE_SEQS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1194__DISCR_MAP_GIMPLE_SEQS.obj_hash = 688895982; cdat->dsym_1194__DISCR_MAP_GIMPLE_SEQS.obj_len = 3; /*inistring dstr_1195__DISCR_MAP_GIMPLE*/ /*_.VALSTR___V1365*/ meltfptr[1364] = (melt_ptr_t) & cdat->dstr_1195__DISCR_MAP_GIMPLE; cdat->dstr_1195__DISCR_MAP_GIMPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1195__DISCR_MAP_GIMPLE.val, "DISCR_MAP_GIMPLE_SEQS", sizeof (cdat->dstr_1195__DISCR_MAP_GIMPLE. val) - 1); cdat->dstr_1195__DISCR_MAP_GIMPLE.val[21] = (char) 0; cdat->dstr_1195__DISCR_MAP_GIMPLE.slen = 21; /*iniobj dsym_1196__DISCR_MAP_LOOPS*/ /*uniqueobj*/ if (! /*_.VALDATA___V1366*/ meltfptr[1365]) /*_.VALDATA___V1366*/ meltfptr[1365] = (melt_ptr_t) & cdat->dsym_1196__DISCR_MAP_LOOPS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1196__DISCR_MAP_LOOPS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1196__DISCR_MAP_LOOPS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1196__DISCR_MAP_LOOPS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1196__DISCR_MAP_LOOPS.obj_hash = 560061337; cdat->dsym_1196__DISCR_MAP_LOOPS.obj_len = 3; /*inistring dstr_1197__DISCR_MAP_LOOPS*/ /*_.VALSTR___V1367*/ meltfptr[1366] = (melt_ptr_t) & cdat->dstr_1197__DISCR_MAP_LOOPS; cdat->dstr_1197__DISCR_MAP_LOOPS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1197__DISCR_MAP_LOOPS.val, "DISCR_MAP_LOOPS", sizeof (cdat->dstr_1197__DISCR_MAP_LOOPS. val) - 1); cdat->dstr_1197__DISCR_MAP_LOOPS.val[15] = (char) 0; cdat->dstr_1197__DISCR_MAP_LOOPS.slen = 15; /*iniobj dsym_1198__DISCR_MAP_OBJECTS*/ /*uniqueobj*/ if (! /*_.VALDATA___V1368*/ meltfptr[1367]) /*_.VALDATA___V1368*/ meltfptr[1367] = (melt_ptr_t) & cdat->dsym_1198__DISCR_MAP_OBJECTS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1198__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_1198__DISCR_MAP_OBJECTS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1198__DISCR_MAP_OBJECTS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1198__DISCR_MAP_OBJECTS.obj_hash = 217147088; cdat->dsym_1198__DISCR_MAP_OBJECTS.obj_len = 3; /*inistring dstr_1199__DISCR_MAP_OBJECT*/ /*_.VALSTR___V1369*/ meltfptr[1368] = (melt_ptr_t) & cdat->dstr_1199__DISCR_MAP_OBJECT; cdat->dstr_1199__DISCR_MAP_OBJECT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1199__DISCR_MAP_OBJECT.val, "DISCR_MAP_OBJECTS", sizeof (cdat->dstr_1199__DISCR_MAP_OBJECT. val) - 1); cdat->dstr_1199__DISCR_MAP_OBJECT.val[17] = (char) 0; cdat->dstr_1199__DISCR_MAP_OBJECT.slen = 17; /*iniobj dsym_1200__DISCR_MAP_RTVECS*/ /*uniqueobj*/ if (! /*_.VALDATA___V1370*/ meltfptr[1369]) /*_.VALDATA___V1370*/ meltfptr[1369] = (melt_ptr_t) & cdat->dsym_1200__DISCR_MAP_RTVECS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1200__DISCR_MAP_RTVECS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1200__DISCR_MAP_RTVECS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1200__DISCR_MAP_RTVECS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1200__DISCR_MAP_RTVECS.obj_hash = 988543520; cdat->dsym_1200__DISCR_MAP_RTVECS.obj_len = 3; /*inistring dstr_1201__DISCR_MAP_RTVECS*/ /*_.VALSTR___V1371*/ meltfptr[1370] = (melt_ptr_t) & cdat->dstr_1201__DISCR_MAP_RTVECS; cdat->dstr_1201__DISCR_MAP_RTVECS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1201__DISCR_MAP_RTVECS.val, "DISCR_MAP_RTVECS", sizeof (cdat->dstr_1201__DISCR_MAP_RTVECS. val) - 1); cdat->dstr_1201__DISCR_MAP_RTVECS.val[16] = (char) 0; cdat->dstr_1201__DISCR_MAP_RTVECS.slen = 16; /*iniobj dsym_1202__DISCR_MAP_RTXS*/ /*uniqueobj*/ if (! /*_.VALDATA___V1372*/ meltfptr[1371]) /*_.VALDATA___V1372*/ meltfptr[1371] = (melt_ptr_t) & cdat->dsym_1202__DISCR_MAP_RTXS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1202__DISCR_MAP_RTXS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1202__DISCR_MAP_RTXS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1202__DISCR_MAP_RTXS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1202__DISCR_MAP_RTXS.obj_hash = 771366599; cdat->dsym_1202__DISCR_MAP_RTXS.obj_len = 3; /*inistring dstr_1203__DISCR_MAP_RTXS*/ /*_.VALSTR___V1373*/ meltfptr[1372] = (melt_ptr_t) & cdat->dstr_1203__DISCR_MAP_RTXS; cdat->dstr_1203__DISCR_MAP_RTXS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1203__DISCR_MAP_RTXS.val, "DISCR_MAP_RTXS", sizeof (cdat->dstr_1203__DISCR_MAP_RTXS.val) - 1); cdat->dstr_1203__DISCR_MAP_RTXS.val[14] = (char) 0; cdat->dstr_1203__DISCR_MAP_RTXS.slen = 14; /*iniobj dsym_1204__DISCR_MAP_STRINGS*/ /*uniqueobj*/ if (! /*_.VALDATA___V1374*/ meltfptr[1373]) /*_.VALDATA___V1374*/ meltfptr[1373] = (melt_ptr_t) & cdat->dsym_1204__DISCR_MAP_STRINGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1204__DISCR_MAP_STRINGS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1204__DISCR_MAP_STRINGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1204__DISCR_MAP_STRINGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1204__DISCR_MAP_STRINGS.obj_hash = 344609662; cdat->dsym_1204__DISCR_MAP_STRINGS.obj_len = 3; /*inistring dstr_1205__DISCR_MAP_STRING*/ /*_.VALSTR___V1375*/ meltfptr[1374] = (melt_ptr_t) & cdat->dstr_1205__DISCR_MAP_STRING; cdat->dstr_1205__DISCR_MAP_STRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1205__DISCR_MAP_STRING.val, "DISCR_MAP_STRINGS", sizeof (cdat->dstr_1205__DISCR_MAP_STRING. val) - 1); cdat->dstr_1205__DISCR_MAP_STRING.val[17] = (char) 0; cdat->dstr_1205__DISCR_MAP_STRING.slen = 17; /*iniobj dsym_1206__DISCR_MAP_TREES*/ /*uniqueobj*/ if (! /*_.VALDATA___V1376*/ meltfptr[1375]) /*_.VALDATA___V1376*/ meltfptr[1375] = (melt_ptr_t) & cdat->dsym_1206__DISCR_MAP_TREES; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1206__DISCR_MAP_TREES", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1206__DISCR_MAP_TREES", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1206__DISCR_MAP_TREES.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1206__DISCR_MAP_TREES.obj_hash = 26820857; cdat->dsym_1206__DISCR_MAP_TREES.obj_len = 3; /*inistring dstr_1207__DISCR_MAP_TREES*/ /*_.VALSTR___V1377*/ meltfptr[1376] = (melt_ptr_t) & cdat->dstr_1207__DISCR_MAP_TREES; cdat->dstr_1207__DISCR_MAP_TREES.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1207__DISCR_MAP_TREES.val, "DISCR_MAP_TREES", sizeof (cdat->dstr_1207__DISCR_MAP_TREES. val) - 1); cdat->dstr_1207__DISCR_MAP_TREES.val[15] = (char) 0; cdat->dstr_1207__DISCR_MAP_TREES.slen = 15; /*iniobj dsym_1208__DISCR_METHOD_MAP*/ /*uniqueobj*/ if (! /*_.VALDATA___V1378*/ meltfptr[1377]) /*_.VALDATA___V1378*/ meltfptr[1377] = (melt_ptr_t) & cdat->dsym_1208__DISCR_METHOD_MAP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1208__DISCR_METHOD_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_1208__DISCR_METHOD_MAP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1208__DISCR_METHOD_MAP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1208__DISCR_METHOD_MAP.obj_hash = 132275480; cdat->dsym_1208__DISCR_METHOD_MAP.obj_len = 3; /*inistring dstr_1209__DISCR_METHOD_MAP*/ /*_.VALSTR___V1379*/ meltfptr[1378] = (melt_ptr_t) & cdat->dstr_1209__DISCR_METHOD_MAP; cdat->dstr_1209__DISCR_METHOD_MAP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1209__DISCR_METHOD_MAP.val, "DISCR_METHOD_MAP", sizeof (cdat->dstr_1209__DISCR_METHOD_MAP. val) - 1); cdat->dstr_1209__DISCR_METHOD_MAP.val[16] = (char) 0; cdat->dstr_1209__DISCR_METHOD_MAP.slen = 16; /*iniobj dsym_1210__DISCR_MIXED_BIGINT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1380*/ meltfptr[1379]) /*_.VALDATA___V1380*/ meltfptr[1379] = (melt_ptr_t) & cdat->dsym_1210__DISCR_MIXED_BIGINT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1210__DISCR_MIXED_BIGINT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1210__DISCR_MIXED_BIGINT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1210__DISCR_MIXED_BIGINT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1210__DISCR_MIXED_BIGINT.obj_hash = 484145131; cdat->dsym_1210__DISCR_MIXED_BIGINT.obj_len = 3; /*inistring dstr_1211__DISCR_MIXED_BIGI*/ /*_.VALSTR___V1381*/ meltfptr[1380] = (melt_ptr_t) & cdat->dstr_1211__DISCR_MIXED_BIGI; cdat->dstr_1211__DISCR_MIXED_BIGI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1211__DISCR_MIXED_BIGI.val, "DISCR_MIXED_BIGINT", sizeof (cdat->dstr_1211__DISCR_MIXED_BIGI. val) - 1); cdat->dstr_1211__DISCR_MIXED_BIGI.val[18] = (char) 0; cdat->dstr_1211__DISCR_MIXED_BIGI.slen = 18; /*iniobj dsym_1212__DISCR_MIXED_INTEGER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1382*/ meltfptr[1381]) /*_.VALDATA___V1382*/ meltfptr[1381] = (melt_ptr_t) & cdat->dsym_1212__DISCR_MIXED_INTEGER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1212__DISCR_MIXED_INTEGER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1212__DISCR_MIXED_INTEGER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1212__DISCR_MIXED_INTEGER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1212__DISCR_MIXED_INTEGER.obj_hash = 355248820; cdat->dsym_1212__DISCR_MIXED_INTEGER.obj_len = 3; /*inistring dstr_1213__DISCR_MIXED_INTE*/ /*_.VALSTR___V1383*/ meltfptr[1382] = (melt_ptr_t) & cdat->dstr_1213__DISCR_MIXED_INTE; cdat->dstr_1213__DISCR_MIXED_INTE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1213__DISCR_MIXED_INTE.val, "DISCR_MIXED_INTEGER", sizeof (cdat->dstr_1213__DISCR_MIXED_INTE. val) - 1); cdat->dstr_1213__DISCR_MIXED_INTE.val[19] = (char) 0; cdat->dstr_1213__DISCR_MIXED_INTE.slen = 19; /*iniobj dsym_1214__DISCR_MIXED_LOCATION*/ /*uniqueobj*/ if (! /*_.VALDATA___V1384*/ meltfptr[1383]) /*_.VALDATA___V1384*/ meltfptr[1383] = (melt_ptr_t) & cdat->dsym_1214__DISCR_MIXED_LOCATION; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1214__DISCR_MIXED_LOCATION", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1214__DISCR_MIXED_LOCATION", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1214__DISCR_MIXED_LOCATION.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1214__DISCR_MIXED_LOCATION.obj_hash = 1019373807; cdat->dsym_1214__DISCR_MIXED_LOCATION.obj_len = 3; /*inistring dstr_1215__DISCR_MIXED_LOCA*/ /*_.VALSTR___V1385*/ meltfptr[1384] = (melt_ptr_t) & cdat->dstr_1215__DISCR_MIXED_LOCA; cdat->dstr_1215__DISCR_MIXED_LOCA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1215__DISCR_MIXED_LOCA.val, "DISCR_MIXED_LOCATION", sizeof (cdat->dstr_1215__DISCR_MIXED_LOCA. val) - 1); cdat->dstr_1215__DISCR_MIXED_LOCA.val[20] = (char) 0; cdat->dstr_1215__DISCR_MIXED_LOCA.slen = 20; /*iniobj dsym_1216__DISCR_MULTIPLE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1386*/ meltfptr[1385]) /*_.VALDATA___V1386*/ meltfptr[1385] = (melt_ptr_t) & cdat->dsym_1216__DISCR_MULTIPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1216__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_1216__DISCR_MULTIPLE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1216__DISCR_MULTIPLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1216__DISCR_MULTIPLE.obj_hash = 91864583; cdat->dsym_1216__DISCR_MULTIPLE.obj_len = 3; /*inistring dstr_1217__DISCR_MULTIPLE*/ /*_.VALSTR___V1387*/ meltfptr[1386] = (melt_ptr_t) & cdat->dstr_1217__DISCR_MULTIPLE; cdat->dstr_1217__DISCR_MULTIPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1217__DISCR_MULTIPLE.val, "DISCR_MULTIPLE", sizeof (cdat->dstr_1217__DISCR_MULTIPLE.val) - 1); cdat->dstr_1217__DISCR_MULTIPLE.val[14] = (char) 0; cdat->dstr_1217__DISCR_MULTIPLE.slen = 14; /*iniobj dsym_1218__DISCR_NAME_STRING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1388*/ meltfptr[1387]) /*_.VALDATA___V1388*/ meltfptr[1387] = (melt_ptr_t) & cdat->dsym_1218__DISCR_NAME_STRING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1218__DISCR_NAME_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_1218__DISCR_NAME_STRING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1218__DISCR_NAME_STRING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1218__DISCR_NAME_STRING.obj_hash = 291781472; cdat->dsym_1218__DISCR_NAME_STRING.obj_len = 3; /*inistring dstr_1219__DISCR_NAME_STRIN*/ /*_.VALSTR___V1389*/ meltfptr[1388] = (melt_ptr_t) & cdat->dstr_1219__DISCR_NAME_STRIN; cdat->dstr_1219__DISCR_NAME_STRIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1219__DISCR_NAME_STRIN.val, "DISCR_NAME_STRING", sizeof (cdat->dstr_1219__DISCR_NAME_STRIN. val) - 1); cdat->dstr_1219__DISCR_NAME_STRIN.val[17] = (char) 0; cdat->dstr_1219__DISCR_NAME_STRIN.slen = 17; /*iniobj dsym_1220__DISCR_NULL_RECEIVER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1390*/ meltfptr[1389]) /*_.VALDATA___V1390*/ meltfptr[1389] = (melt_ptr_t) & cdat->dsym_1220__DISCR_NULL_RECEIVER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1220__DISCR_NULL_RECEIVER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1220__DISCR_NULL_RECEIVER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1220__DISCR_NULL_RECEIVER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1220__DISCR_NULL_RECEIVER.obj_hash = 1063609307; cdat->dsym_1220__DISCR_NULL_RECEIVER.obj_len = 3; /*inistring dstr_1221__DISCR_NULL_RECEI*/ /*_.VALSTR___V1391*/ meltfptr[1390] = (melt_ptr_t) & cdat->dstr_1221__DISCR_NULL_RECEI; cdat->dstr_1221__DISCR_NULL_RECEI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1221__DISCR_NULL_RECEI.val, "DISCR_NULL_RECEIVER", sizeof (cdat->dstr_1221__DISCR_NULL_RECEI. val) - 1); cdat->dstr_1221__DISCR_NULL_RECEI.val[19] = (char) 0; cdat->dstr_1221__DISCR_NULL_RECEI.slen = 19; /*iniobj dsym_1222__DISCR_PAIR*/ /*uniqueobj*/ if (! /*_.VALDATA___V1392*/ meltfptr[1391]) /*_.VALDATA___V1392*/ meltfptr[1391] = (melt_ptr_t) & cdat->dsym_1222__DISCR_PAIR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1222__DISCR_PAIR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1222__DISCR_PAIR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1222__DISCR_PAIR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1222__DISCR_PAIR.obj_hash = 69333571; cdat->dsym_1222__DISCR_PAIR.obj_len = 3; /*inistring dstr_1223__DISCR_PAIR*/ /*_.VALSTR___V1393*/ meltfptr[1392] = (melt_ptr_t) & cdat->dstr_1223__DISCR_PAIR; cdat->dstr_1223__DISCR_PAIR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1223__DISCR_PAIR.val, "DISCR_PAIR", sizeof (cdat->dstr_1223__DISCR_PAIR.val) - 1); cdat->dstr_1223__DISCR_PAIR.val[10] = (char) 0; cdat->dstr_1223__DISCR_PAIR.slen = 10; /*iniobj dsym_1224__DISCR_RAWFILE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1394*/ meltfptr[1393]) /*_.VALDATA___V1394*/ meltfptr[1393] = (melt_ptr_t) & cdat->dsym_1224__DISCR_RAWFILE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1224__DISCR_RAWFILE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1224__DISCR_RAWFILE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1224__DISCR_RAWFILE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1224__DISCR_RAWFILE.obj_hash = 482138009; cdat->dsym_1224__DISCR_RAWFILE.obj_len = 3; /*inistring dstr_1225__DISCR_RAWFILE*/ /*_.VALSTR___V1395*/ meltfptr[1394] = (melt_ptr_t) & cdat->dstr_1225__DISCR_RAWFILE; cdat->dstr_1225__DISCR_RAWFILE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1225__DISCR_RAWFILE.val, "DISCR_RAWFILE", sizeof (cdat->dstr_1225__DISCR_RAWFILE.val) - 1); cdat->dstr_1225__DISCR_RAWFILE.val[13] = (char) 0; cdat->dstr_1225__DISCR_RAWFILE.slen = 13; /*iniobj dsym_1226__DISCR_REAL*/ /*uniqueobj*/ if (! /*_.VALDATA___V1396*/ meltfptr[1395]) /*_.VALDATA___V1396*/ meltfptr[1395] = (melt_ptr_t) & cdat->dsym_1226__DISCR_REAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1226__DISCR_REAL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1226__DISCR_REAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1226__DISCR_REAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1226__DISCR_REAL.obj_hash = 774929361; cdat->dsym_1226__DISCR_REAL.obj_len = 3; /*inistring dstr_1227__DISCR_REAL*/ /*_.VALSTR___V1397*/ meltfptr[1396] = (melt_ptr_t) & cdat->dstr_1227__DISCR_REAL; cdat->dstr_1227__DISCR_REAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1227__DISCR_REAL.val, "DISCR_REAL", sizeof (cdat->dstr_1227__DISCR_REAL.val) - 1); cdat->dstr_1227__DISCR_REAL.val[10] = (char) 0; cdat->dstr_1227__DISCR_REAL.slen = 10; /*iniobj dsym_1228__DISCR_ROUTINE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1398*/ meltfptr[1397]) /*_.VALDATA___V1398*/ meltfptr[1397] = (melt_ptr_t) & cdat->dsym_1228__DISCR_ROUTINE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1228__DISCR_ROUTINE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1228__DISCR_ROUTINE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1228__DISCR_ROUTINE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1228__DISCR_ROUTINE.obj_hash = 30464565; cdat->dsym_1228__DISCR_ROUTINE.obj_len = 3; /*inistring dstr_1229__DISCR_ROUTINE*/ /*_.VALSTR___V1399*/ meltfptr[1398] = (melt_ptr_t) & cdat->dstr_1229__DISCR_ROUTINE; cdat->dstr_1229__DISCR_ROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1229__DISCR_ROUTINE.val, "DISCR_ROUTINE", sizeof (cdat->dstr_1229__DISCR_ROUTINE.val) - 1); cdat->dstr_1229__DISCR_ROUTINE.val[13] = (char) 0; cdat->dstr_1229__DISCR_ROUTINE.slen = 13; /*iniobj dsym_1230__DISCR_RTVEC*/ /*uniqueobj*/ if (! /*_.VALDATA___V1400*/ meltfptr[1399]) /*_.VALDATA___V1400*/ meltfptr[1399] = (melt_ptr_t) & cdat->dsym_1230__DISCR_RTVEC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1230__DISCR_RTVEC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1230__DISCR_RTVEC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1230__DISCR_RTVEC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1230__DISCR_RTVEC.obj_hash = 686683257; cdat->dsym_1230__DISCR_RTVEC.obj_len = 3; /*inistring dstr_1231__DISCR_RTVEC*/ /*_.VALSTR___V1401*/ meltfptr[1400] = (melt_ptr_t) & cdat->dstr_1231__DISCR_RTVEC; cdat->dstr_1231__DISCR_RTVEC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1231__DISCR_RTVEC.val, "DISCR_RTVEC", sizeof (cdat->dstr_1231__DISCR_RTVEC.val) - 1); cdat->dstr_1231__DISCR_RTVEC.val[11] = (char) 0; cdat->dstr_1231__DISCR_RTVEC.slen = 11; /*iniobj dsym_1232__DISCR_RTX*/ /*uniqueobj*/ if (! /*_.VALDATA___V1402*/ meltfptr[1401]) /*_.VALDATA___V1402*/ meltfptr[1401] = (melt_ptr_t) & cdat->dsym_1232__DISCR_RTX; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1232__DISCR_RTX", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1232__DISCR_RTX", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1232__DISCR_RTX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1232__DISCR_RTX.obj_hash = 441021671; cdat->dsym_1232__DISCR_RTX.obj_len = 3; /*inistring dstr_1233__DISCR_RTX*/ /*_.VALSTR___V1403*/ meltfptr[1402] = (melt_ptr_t) & cdat->dstr_1233__DISCR_RTX; cdat->dstr_1233__DISCR_RTX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1233__DISCR_RTX.val, "DISCR_RTX", sizeof (cdat->dstr_1233__DISCR_RTX.val) - 1); cdat->dstr_1233__DISCR_RTX.val[9] = (char) 0; cdat->dstr_1233__DISCR_RTX.slen = 9; /*iniobj dsym_1234__DISCR_STRBUF*/ /*uniqueobj*/ if (! /*_.VALDATA___V1404*/ meltfptr[1403]) /*_.VALDATA___V1404*/ meltfptr[1403] = (melt_ptr_t) & cdat->dsym_1234__DISCR_STRBUF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1234__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_1234__DISCR_STRBUF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1234__DISCR_STRBUF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1234__DISCR_STRBUF.obj_hash = 492035674; cdat->dsym_1234__DISCR_STRBUF.obj_len = 3; /*inistring dstr_1235__DISCR_STRBUF*/ /*_.VALSTR___V1405*/ meltfptr[1404] = (melt_ptr_t) & cdat->dstr_1235__DISCR_STRBUF; cdat->dstr_1235__DISCR_STRBUF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1235__DISCR_STRBUF.val, "DISCR_STRBUF", sizeof (cdat->dstr_1235__DISCR_STRBUF.val) - 1); cdat->dstr_1235__DISCR_STRBUF.val[12] = (char) 0; cdat->dstr_1235__DISCR_STRBUF.slen = 12; /*iniobj dsym_1236__DISCR_STRING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1406*/ meltfptr[1405]) /*_.VALDATA___V1406*/ meltfptr[1405] = (melt_ptr_t) & cdat->dsym_1236__DISCR_STRING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1236__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_1236__DISCR_STRING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1236__DISCR_STRING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1236__DISCR_STRING.obj_hash = 100436219; cdat->dsym_1236__DISCR_STRING.obj_len = 3; /*inistring dstr_1237__DISCR_STRING*/ /*_.VALSTR___V1407*/ meltfptr[1406] = (melt_ptr_t) & cdat->dstr_1237__DISCR_STRING; cdat->dstr_1237__DISCR_STRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1237__DISCR_STRING.val, "DISCR_STRING", sizeof (cdat->dstr_1237__DISCR_STRING.val) - 1); cdat->dstr_1237__DISCR_STRING.val[12] = (char) 0; cdat->dstr_1237__DISCR_STRING.slen = 12; /*iniobj dsym_1238__DISCR_TREE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1408*/ meltfptr[1407]) /*_.VALDATA___V1408*/ meltfptr[1407] = (melt_ptr_t) & cdat->dsym_1238__DISCR_TREE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1238__DISCR_TREE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1238__DISCR_TREE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1238__DISCR_TREE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1238__DISCR_TREE.obj_hash = 33934607; cdat->dsym_1238__DISCR_TREE.obj_len = 3; /*inistring dstr_1239__DISCR_TREE*/ /*_.VALSTR___V1409*/ meltfptr[1408] = (melt_ptr_t) & cdat->dstr_1239__DISCR_TREE; cdat->dstr_1239__DISCR_TREE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1239__DISCR_TREE.val, "DISCR_TREE", sizeof (cdat->dstr_1239__DISCR_TREE.val) - 1); cdat->dstr_1239__DISCR_TREE.val[10] = (char) 0; cdat->dstr_1239__DISCR_TREE.slen = 10; /*iniobj dsym_1240__DISCR_VERBATIM_STRING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1410*/ meltfptr[1409]) /*_.VALDATA___V1410*/ meltfptr[1409] = (melt_ptr_t) & cdat->dsym_1240__DISCR_VERBATIM_STRING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1240__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_1240__DISCR_VERBATIM_STRING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1240__DISCR_VERBATIM_STRING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1240__DISCR_VERBATIM_STRING.obj_hash = 258402049; cdat->dsym_1240__DISCR_VERBATIM_STRING.obj_len = 3; /*inistring dstr_1241__DISCR_VERBATIM_S*/ /*_.VALSTR___V1411*/ meltfptr[1410] = (melt_ptr_t) & cdat->dstr_1241__DISCR_VERBATIM_S; cdat->dstr_1241__DISCR_VERBATIM_S.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1241__DISCR_VERBATIM_S.val, "DISCR_VERBATIM_STRING", sizeof (cdat->dstr_1241__DISCR_VERBATIM_S. val) - 1); cdat->dstr_1241__DISCR_VERBATIM_S.val[21] = (char) 0; cdat->dstr_1241__DISCR_VERBATIM_S.slen = 21; /*iniobj dsym_1242__INITIAL_SYSTEM_DATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V1412*/ meltfptr[1411]) /*_.VALDATA___V1412*/ meltfptr[1411] = (melt_ptr_t) & cdat->dsym_1242__INITIAL_SYSTEM_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1242__INITIAL_SYSTEM_DATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1242__INITIAL_SYSTEM_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1242__INITIAL_SYSTEM_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1242__INITIAL_SYSTEM_DATA.obj_hash = 771349808; cdat->dsym_1242__INITIAL_SYSTEM_DATA.obj_len = 3; /*inistring dstr_1243__INITIAL_SYSTEM_D*/ /*_.VALSTR___V1413*/ meltfptr[1412] = (melt_ptr_t) & cdat->dstr_1243__INITIAL_SYSTEM_D; cdat->dstr_1243__INITIAL_SYSTEM_D.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1243__INITIAL_SYSTEM_D.val, "INITIAL_SYSTEM_DATA", sizeof (cdat->dstr_1243__INITIAL_SYSTEM_D. val) - 1); cdat->dstr_1243__INITIAL_SYSTEM_D.val[19] = (char) 0; cdat->dstr_1243__INITIAL_SYSTEM_D.slen = 19; /*iniobj dsym_1244__TRUE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1414*/ meltfptr[1413]) /*_.VALDATA___V1414*/ meltfptr[1413] = (melt_ptr_t) & cdat->dsym_1244__TRUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1244__TRUE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1244__TRUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1244__TRUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1244__TRUE.obj_hash = 366065644; cdat->dsym_1244__TRUE.obj_len = 3; /*inistring dstr_1245__TRUE*/ /*_.VALSTR___V1415*/ meltfptr[1414] = (melt_ptr_t) & cdat->dstr_1245__TRUE; cdat->dstr_1245__TRUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1245__TRUE.val, "TRUE", sizeof (cdat->dstr_1245__TRUE.val) - 1); cdat->dstr_1245__TRUE.val[4] = (char) 0; cdat->dstr_1245__TRUE.slen = 4; /*iniobj dsym_1246__LAST_GLOBPREDEF_INDEX*/ /*uniqueobj*/ if (! /*_.VALDATA___V1417*/ meltfptr[1416]) /*_.VALDATA___V1417*/ meltfptr[1416] = (melt_ptr_t) & cdat->dsym_1246__LAST_GLOBPREDEF_INDEX; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1246__LAST_GLOBPREDEF_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_1246__LAST_GLOBPREDEF_INDEX", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1246__LAST_GLOBPREDEF_INDEX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1246__LAST_GLOBPREDEF_INDEX.obj_hash = 1038762628; cdat->dsym_1246__LAST_GLOBPREDEF_INDEX.obj_len = 3; /*inistring dstr_1247__LAST_GLOBPREDEF_*/ /*_.VALSTR___V1418*/ meltfptr[1417] = (melt_ptr_t) & cdat->dstr_1247__LAST_GLOBPREDEF_; cdat->dstr_1247__LAST_GLOBPREDEF_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1247__LAST_GLOBPREDEF_.val, "LAST_GLOBPREDEF_INDEX", sizeof (cdat->dstr_1247__LAST_GLOBPREDEF_. val) - 1); cdat->dstr_1247__LAST_GLOBPREDEF_.val[21] = (char) 0; cdat->dstr_1247__LAST_GLOBPREDEF_.slen = 21; MELT_LOCATION ("warmelt-normal.melt:852:/ iniobj"); /*iniobj dobj_1248__LAST_GLOBPREDEF_INDEX*/ /*_.VALDATA___V1419*/ meltfptr[1418] = (melt_ptr_t) & cdat->dobj_1248__LAST_GLOBPREDEF_INDEX; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1248__LAST_GLOBPREDEF_INDEX", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1248__LAST_GLOBPREDEF_INDEX", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1248__LAST_GLOBPREDEF_INDEX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); cdat->dobj_1248__LAST_GLOBPREDEF_INDEX.obj_hash = 644128874; cdat->dobj_1248__LAST_GLOBPREDEF_INDEX.obj_len = 5; /*inimult dtup_1249__LAST_GLOBPREDEF_INDEX */ /*_.VALTUP___V1423*/ meltfptr[1422] = (melt_ptr_t) & cdat->dtup_1249__LAST_GLOBPREDEF_INDEX; cdat->dtup_1249__LAST_GLOBPREDEF_INDEX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_MULTIPLE)))); cdat->dtup_1249__LAST_GLOBPREDEF_INDEX.nbval = 1; /*inimult dtup_1250__LAST_GLOBPREDEF_INDEX */ /*_.VALTUP___V1421*/ meltfptr[1420] = (melt_ptr_t) & cdat->dtup_1250__LAST_GLOBPREDEF_INDEX; cdat->dtup_1250__LAST_GLOBPREDEF_INDEX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_MULTIPLE)))); cdat->dtup_1250__LAST_GLOBPREDEF_INDEX.nbval = 0; /*inistring dstr_1251__BGLOB_LASTGLOB*/ /*_.VALSTR___V1422*/ meltfptr[1421] = (melt_ptr_t) & cdat->dstr_1251__BGLOB_LASTGLOB; cdat->dstr_1251__BGLOB_LASTGLOB.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_VERBATIM_STRING)))); /*small inistring */ strncpy (cdat->dstr_1251__BGLOB_LASTGLOB.val, "BGLOB__LASTGLOB", sizeof (cdat->dstr_1251__BGLOB_LASTGLOB.val) - 1); cdat->dstr_1251__BGLOB_LASTGLOB.val[15] = (char) 0; cdat->dstr_1251__BGLOB_LASTGLOB.slen = 15; /*inistring dstr_1252__LAST_GLOBPREDEF_*/ /*_.VALSTR___V1420*/ meltfptr[1419] = (melt_ptr_t) & cdat->dstr_1252__LAST_GLOBPREDEF_; cdat->dstr_1252__LAST_GLOBPREDEF_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1252__LAST_GLOBPREDEF_.val, "LAST_GLOBPREDEF_INDEX", sizeof (cdat->dstr_1252__LAST_GLOBPREDEF_. val) - 1); cdat->dstr_1252__LAST_GLOBPREDEF_.val[21] = (char) 0; cdat->dstr_1252__LAST_GLOBPREDEF_.slen = 21; /*iniobj dsym_1253__CLASS_LITERAL_VALUE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1424*/ meltfptr[1423]) /*_.VALDATA___V1424*/ meltfptr[1423] = (melt_ptr_t) & cdat->dsym_1253__CLASS_LITERAL_VALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1253__CLASS_LITERAL_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_1253__CLASS_LITERAL_VALUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1253__CLASS_LITERAL_VALUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1253__CLASS_LITERAL_VALUE.obj_hash = 801101132; cdat->dsym_1253__CLASS_LITERAL_VALUE.obj_len = 3; /*inistring dstr_1254__CLASS_LITERAL_VA*/ /*_.VALSTR___V1425*/ meltfptr[1424] = (melt_ptr_t) & cdat->dstr_1254__CLASS_LITERAL_VA; cdat->dstr_1254__CLASS_LITERAL_VA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1254__CLASS_LITERAL_VA.val, "CLASS_LITERAL_VALUE", sizeof (cdat->dstr_1254__CLASS_LITERAL_VA. val) - 1); cdat->dstr_1254__CLASS_LITERAL_VA.val[19] = (char) 0; cdat->dstr_1254__CLASS_LITERAL_VA.slen = 19; MELT_LOCATION ("warmelt-normal.melt:858:/ iniobj"); /*iniobj dobj_1255__CLASS_LITERAL_VALUE*/ /*_.VALDATA___V1426*/ meltfptr[1425] = (melt_ptr_t) & cdat->dobj_1255__CLASS_LITERAL_VALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1255__CLASS_LITERAL_VALUE", 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_1255__CLASS_LITERAL_VALUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1255__CLASS_LITERAL_VALUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_1255__CLASS_LITERAL_VALUE.obj_num = MELTOBMAG_OBJECT; cdat->dobj_1255__CLASS_LITERAL_VALUE.obj_hash = 22168752; cdat->dobj_1255__CLASS_LITERAL_VALUE.obj_len = 8; /*inistring dstr_1256__CLASS_LITERAL_VA*/ /*_.VALSTR___V1427*/ meltfptr[1426] = (melt_ptr_t) & cdat->dstr_1256__CLASS_LITERAL_VA; cdat->dstr_1256__CLASS_LITERAL_VA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1256__CLASS_LITERAL_VA.val, "CLASS_LITERAL_VALUE", sizeof (cdat->dstr_1256__CLASS_LITERAL_VA. val) - 1); cdat->dstr_1256__CLASS_LITERAL_VA.val[19] = (char) 0; cdat->dstr_1256__CLASS_LITERAL_VA.slen = 19; /*inimult dtup_1257__CLASS_LITERAL_VALUE */ /*_.VALTUP___V1428*/ meltfptr[1427] = (melt_ptr_t) & cdat->dtup_1257__CLASS_LITERAL_VALUE; cdat->dtup_1257__CLASS_LITERAL_VALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_1257__CLASS_LITERAL_VALUE.nbval = 2; /*inimult dtup_1258__CLASS_LITERAL_VALUE */ /*_.VALTUP___V1435*/ meltfptr[1434] = (melt_ptr_t) & cdat->dtup_1258__CLASS_LITERAL_VALUE; cdat->dtup_1258__CLASS_LITERAL_VALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_1258__CLASS_LITERAL_VALUE.nbval = 4; /*iniobj dsym_1259__LITV_VALUE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1436*/ meltfptr[1435]) /*_.VALDATA___V1436*/ meltfptr[1435] = (melt_ptr_t) & cdat->dsym_1259__LITV_VALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1259__LITV_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_1259__LITV_VALUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1259__LITV_VALUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1259__LITV_VALUE.obj_hash = 434837194; cdat->dsym_1259__LITV_VALUE.obj_len = 3; /*inistring dstr_1260__LITV_VALUE*/ /*_.VALSTR___V1437*/ meltfptr[1436] = (melt_ptr_t) & cdat->dstr_1260__LITV_VALUE; cdat->dstr_1260__LITV_VALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1260__LITV_VALUE.val, "LITV_VALUE", sizeof (cdat->dstr_1260__LITV_VALUE.val) - 1); cdat->dstr_1260__LITV_VALUE.val[10] = (char) 0; cdat->dstr_1260__LITV_VALUE.slen = 10; /*^iniobj */ /*iniobj dobj_1261__LITV_VALUE*/ /*_.VALDATA___V1429*/ meltfptr[1428] = (melt_ptr_t) & cdat->dobj_1261__LITV_VALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1261__LITV_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_1261__LITV_VALUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1261__LITV_VALUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1261__LITV_VALUE.obj_num = 1; cdat->dobj_1261__LITV_VALUE.obj_hash = 715949305; cdat->dobj_1261__LITV_VALUE.obj_len = 4; /*inistring dstr_1262__LITV_VALUE*/ /*_.VALSTR___V1430*/ meltfptr[1429] = (melt_ptr_t) & cdat->dstr_1262__LITV_VALUE; cdat->dstr_1262__LITV_VALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1262__LITV_VALUE.val, "LITV_VALUE", sizeof (cdat->dstr_1262__LITV_VALUE.val) - 1); cdat->dstr_1262__LITV_VALUE.val[10] = (char) 0; cdat->dstr_1262__LITV_VALUE.slen = 10; /*iniobj dsym_1263__LITV_RANK*/ /*uniqueobj*/ if (! /*_.VALDATA___V1438*/ meltfptr[1437]) /*_.VALDATA___V1438*/ meltfptr[1437] = (melt_ptr_t) & cdat->dsym_1263__LITV_RANK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1263__LITV_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_1263__LITV_RANK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1263__LITV_RANK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1263__LITV_RANK.obj_hash = 45836235; cdat->dsym_1263__LITV_RANK.obj_len = 3; /*inistring dstr_1264__LITV_RANK*/ /*_.VALSTR___V1439*/ meltfptr[1438] = (melt_ptr_t) & cdat->dstr_1264__LITV_RANK; cdat->dstr_1264__LITV_RANK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1264__LITV_RANK.val, "LITV_RANK", sizeof (cdat->dstr_1264__LITV_RANK.val) - 1); cdat->dstr_1264__LITV_RANK.val[9] = (char) 0; cdat->dstr_1264__LITV_RANK.slen = 9; /*^iniobj */ /*iniobj dobj_1265__LITV_RANK*/ /*_.VALDATA___V1431*/ meltfptr[1430] = (melt_ptr_t) & cdat->dobj_1265__LITV_RANK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1265__LITV_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_1265__LITV_RANK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1265__LITV_RANK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1265__LITV_RANK.obj_num = 2; cdat->dobj_1265__LITV_RANK.obj_hash = 599706079; cdat->dobj_1265__LITV_RANK.obj_len = 4; /*inistring dstr_1266__LITV_RANK*/ /*_.VALSTR___V1432*/ meltfptr[1431] = (melt_ptr_t) & cdat->dstr_1266__LITV_RANK; cdat->dstr_1266__LITV_RANK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1266__LITV_RANK.val, "LITV_RANK", sizeof (cdat->dstr_1266__LITV_RANK.val) - 1); cdat->dstr_1266__LITV_RANK.val[9] = (char) 0; cdat->dstr_1266__LITV_RANK.slen = 9; /*iniobj dsym_1267__LITV_LOC*/ /*uniqueobj*/ if (! /*_.VALDATA___V1440*/ meltfptr[1439]) /*_.VALDATA___V1440*/ meltfptr[1439] = (melt_ptr_t) & cdat->dsym_1267__LITV_LOC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1267__LITV_LOC", melt_magic_discr ((melt_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__LITV_LOC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1267__LITV_LOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1267__LITV_LOC.obj_hash = 813411437; cdat->dsym_1267__LITV_LOC.obj_len = 3; /*inistring dstr_1268__LITV_LOC*/ /*_.VALSTR___V1441*/ meltfptr[1440] = (melt_ptr_t) & cdat->dstr_1268__LITV_LOC; cdat->dstr_1268__LITV_LOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1268__LITV_LOC.val, "LITV_LOC", sizeof (cdat->dstr_1268__LITV_LOC.val) - 1); cdat->dstr_1268__LITV_LOC.val[8] = (char) 0; cdat->dstr_1268__LITV_LOC.slen = 8; /*^iniobj */ /*iniobj dobj_1269__LITV_LOC*/ /*_.VALDATA___V1433*/ meltfptr[1432] = (melt_ptr_t) & cdat->dobj_1269__LITV_LOC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1269__LITV_LOC", 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_1269__LITV_LOC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1269__LITV_LOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1269__LITV_LOC.obj_num = 3; cdat->dobj_1269__LITV_LOC.obj_hash = 712103215; cdat->dobj_1269__LITV_LOC.obj_len = 4; /*inistring dstr_1270__LITV_LOC*/ /*_.VALSTR___V1434*/ meltfptr[1433] = (melt_ptr_t) & cdat->dstr_1270__LITV_LOC; cdat->dstr_1270__LITV_LOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1270__LITV_LOC.val, "LITV_LOC", sizeof (cdat->dstr_1270__LITV_LOC.val) - 1); cdat->dstr_1270__LITV_LOC.val[8] = (char) 0; cdat->dstr_1270__LITV_LOC.slen = 8; /*inirout drout_1271__REGISTER_LITERAL_VALUE */ /*_.VALROUT___V1442*/ meltfptr[1441] = (melt_ptr_t) & cdat->drout_1271__REGISTER_LITERAL_VALUE; cdat->drout_1271__REGISTER_LITERAL_VALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1271__REGISTER_LITERAL_VALUE.routdescr, "REGISTER_LITERAL_VALUE @warmelt-normal.melt:870", MELT_ROUTDESCR_LEN - 1); cdat->drout_1271__REGISTER_LITERAL_VALUE.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1271__REGISTER_LITERAL_VALUE, meltrout_3_warmelt_normal_REGISTER_LITERAL_VALUE); /*iniclos dclo_1272__REGISTER_LITERAL_VALUE */ /*_.VALCLO___V1443*/ meltfptr[1442] = (melt_ptr_t) & cdat->dclo_1272__REGISTER_LITERAL_VALUE; cdat->dclo_1272__REGISTER_LITERAL_VALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1272__REGISTER_LITERAL_VALUE.nbval = 0; /*iniobj dsym_1273__MELT_DEBUG_FUN*/ /*uniqueobj*/ if (! /*_.VALDATA___V1444*/ meltfptr[1443]) /*_.VALDATA___V1444*/ meltfptr[1443] = (melt_ptr_t) & cdat->dsym_1273__MELT_DEBUG_FUN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1273__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_1273__MELT_DEBUG_FUN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1273__MELT_DEBUG_FUN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1273__MELT_DEBUG_FUN.obj_hash = 972123377; cdat->dsym_1273__MELT_DEBUG_FUN.obj_len = 3; /*inistring dstr_1274__MELT_DEBUG_FUN*/ /*_.VALSTR___V1445*/ meltfptr[1444] = (melt_ptr_t) & cdat->dstr_1274__MELT_DEBUG_FUN; cdat->dstr_1274__MELT_DEBUG_FUN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1274__MELT_DEBUG_FUN.val, "MELT_DEBUG_FUN", sizeof (cdat->dstr_1274__MELT_DEBUG_FUN.val) - 1); cdat->dstr_1274__MELT_DEBUG_FUN.val[14] = (char) 0; cdat->dstr_1274__MELT_DEBUG_FUN.slen = 14; /*iniobj dsym_1275__CLASS_RUNNING_EXTENSION_MODULE_CONTEXT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1446*/ meltfptr[1445]) /*_.VALDATA___V1446*/ meltfptr[1445] = (melt_ptr_t) & cdat->dsym_1275__CLASS_RUNNING_EXTENSION_MODULE_CONTEXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1275__CLASS_RUNNING_EXTENSION_MODULE_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_1275__CLASS_RUNNING_EXTENSION_MODULE_CONTEXT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1275__CLASS_RUNNING_EXTENSION_MODULE_CONTEXT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1275__CLASS_RUNNING_EXTENSION_MODULE_CONTEXT.obj_hash = 618245499; cdat->dsym_1275__CLASS_RUNNING_EXTENSION_MODULE_CONTEXT.obj_len = 3; /*inistring dstr_1276__CLASS_RUNNING_EX*/ /*_.VALSTR___V1447*/ meltfptr[1446] = (melt_ptr_t) & cdat->dstr_1276__CLASS_RUNNING_EX; cdat->dstr_1276__CLASS_RUNNING_EX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1276__CLASS_RUNNING_EX.val, "CLASS_RUNNING_EXTENSION_MODULE_CONTEXT", sizeof (cdat->dstr_1276__CLASS_RUNNING_EX. val) - 1); cdat->dstr_1276__CLASS_RUNNING_EX.val[38] = (char) 0; cdat->dstr_1276__CLASS_RUNNING_EX.slen = 38; /*inirout drout_1277__CREATE_NORMCONTEXT */ /*_.VALROUT___V1448*/ meltfptr[1447] = (melt_ptr_t) & cdat->drout_1277__CREATE_NORMCONTEXT; cdat->drout_1277__CREATE_NORMCONTEXT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1277__CREATE_NORMCONTEXT.routdescr, "CREATE_NORMCONTEXT @warmelt-normal.melt:931", MELT_ROUTDESCR_LEN - 1); cdat->drout_1277__CREATE_NORMCONTEXT.nbval = 11; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1277__CREATE_NORMCONTEXT, meltrout_4_warmelt_normal_CREATE_NORMCONTEXT); /*iniclos dclo_1278__CREATE_NORMCONTEXT */ /*_.VALCLO___V1449*/ meltfptr[1448] = (melt_ptr_t) & cdat->dclo_1278__CREATE_NORMCONTEXT; cdat->dclo_1278__CREATE_NORMCONTEXT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1278__CREATE_NORMCONTEXT.nbval = 0; /*iniobj dsym_1279__CLASS_MODULE_CONTEXT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1450*/ meltfptr[1449]) /*_.VALDATA___V1450*/ meltfptr[1449] = (melt_ptr_t) & cdat->dsym_1279__CLASS_MODULE_CONTEXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1279__CLASS_MODULE_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_1279__CLASS_MODULE_CONTEXT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1279__CLASS_MODULE_CONTEXT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1279__CLASS_MODULE_CONTEXT.obj_hash = 641718839; cdat->dsym_1279__CLASS_MODULE_CONTEXT.obj_len = 3; /*inistring dstr_1280__CLASS_MODULE_CON*/ /*_.VALSTR___V1451*/ meltfptr[1450] = (melt_ptr_t) & cdat->dstr_1280__CLASS_MODULE_CON; cdat->dstr_1280__CLASS_MODULE_CON.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1280__CLASS_MODULE_CON.val, "CLASS_MODULE_CONTEXT", sizeof (cdat->dstr_1280__CLASS_MODULE_CON. val) - 1); cdat->dstr_1280__CLASS_MODULE_CON.val[20] = (char) 0; cdat->dstr_1280__CLASS_MODULE_CON.slen = 20; /*inirout drout_1281__CREATE_NORMAL_EXTENDING_CONTEXT */ /*_.VALROUT___V1452*/ meltfptr[1451] = (melt_ptr_t) & cdat->drout_1281__CREATE_NORMAL_EXTENDING_CONTEXT; cdat->drout_1281__CREATE_NORMAL_EXTENDING_CONTEXT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1281__CREATE_NORMAL_EXTENDING_CONTEXT.routdescr, "CREATE_NORMAL_EXTENDING_CONTEXT @warmelt-normal.melt:980", MELT_ROUTDESCR_LEN - 1); cdat->drout_1281__CREATE_NORMAL_EXTENDING_CONTEXT.nbval = 12; MELT_ROUTINE_SET_ROUTCODE (&cdat-> drout_1281__CREATE_NORMAL_EXTENDING_CONTEXT, meltrout_5_warmelt_normal_CREATE_NORMAL_EXTENDING_CONTEXT); /*iniclos dclo_1282__CREATE_NORMAL_EXTENDING_CONTEXT */ /*_.VALCLO___V1453*/ meltfptr[1452] = (melt_ptr_t) & cdat->dclo_1282__CREATE_NORMAL_EXTENDING_CONTEXT; cdat->dclo_1282__CREATE_NORMAL_EXTENDING_CONTEXT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1282__CREATE_NORMAL_EXTENDING_CONTEXT.nbval = 0; /*iniobj dsym_1283__NORMAL_EXP*/ /*uniqueobj*/ if (! /*_.VALDATA___V1454*/ meltfptr[1453]) /*_.VALDATA___V1454*/ meltfptr[1453] = (melt_ptr_t) & cdat->dsym_1283__NORMAL_EXP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1283__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_1283__NORMAL_EXP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1283__NORMAL_EXP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1283__NORMAL_EXP.obj_hash = 420282450; cdat->dsym_1283__NORMAL_EXP.obj_len = 3; /*inistring dstr_1284__NORMAL_EXP*/ /*_.VALSTR___V1455*/ meltfptr[1454] = (melt_ptr_t) & cdat->dstr_1284__NORMAL_EXP; cdat->dstr_1284__NORMAL_EXP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1284__NORMAL_EXP.val, "NORMAL_EXP", sizeof (cdat->dstr_1284__NORMAL_EXP.val) - 1); cdat->dstr_1284__NORMAL_EXP.val[10] = (char) 0; cdat->dstr_1284__NORMAL_EXP.slen = 10; /*iniobj dsym_1285__RECV*/ /*uniqueobj*/ if (! /*_.VALDATA___V1456*/ meltfptr[1455]) /*_.VALDATA___V1456*/ meltfptr[1455] = (melt_ptr_t) & cdat->dsym_1285__RECV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1285__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_1285__RECV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1285__RECV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1285__RECV.obj_hash = 10842790; cdat->dsym_1285__RECV.obj_len = 3; /*inistring dstr_1286__RECV*/ /*_.VALSTR___V1457*/ meltfptr[1456] = (melt_ptr_t) & cdat->dstr_1286__RECV; cdat->dstr_1286__RECV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1286__RECV.val, "RECV", sizeof (cdat->dstr_1286__RECV.val) - 1); cdat->dstr_1286__RECV.val[4] = (char) 0; cdat->dstr_1286__RECV.slen = 4; MELT_LOCATION ("warmelt-normal.melt:1045:/ iniobj"); /*iniobj dobj_1287*/ /*_.VALDATA___V1458*/ meltfptr[1457] = (melt_ptr_t) & cdat->dobj_1287; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1287", 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_1287", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1287.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1287.obj_num = 0; cdat->dobj_1287.obj_hash = 877266959; cdat->dobj_1287.obj_len = 2; /*iniobj dsym_1288__ENV*/ /*uniqueobj*/ if (! /*_.VALDATA___V1459*/ meltfptr[1458]) /*_.VALDATA___V1459*/ meltfptr[1458] = (melt_ptr_t) & cdat->dsym_1288__ENV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1288__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_1288__ENV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1288__ENV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1288__ENV.obj_hash = 127517568; cdat->dsym_1288__ENV.obj_len = 3; /*inistring dstr_1289__ENV*/ /*_.VALSTR___V1460*/ meltfptr[1459] = (melt_ptr_t) & cdat->dstr_1289__ENV; cdat->dstr_1289__ENV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1289__ENV.val, "ENV", sizeof (cdat->dstr_1289__ENV.val) - 1); cdat->dstr_1289__ENV.val[3] = (char) 0; cdat->dstr_1289__ENV.slen = 3; /*^iniobj */ /*iniobj dobj_1290*/ /*_.VALDATA___V1461*/ meltfptr[1460] = (melt_ptr_t) & cdat->dobj_1290; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1290", 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_1290", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1290.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1290.obj_num = 1; cdat->dobj_1290.obj_hash = 171115828; cdat->dobj_1290.obj_len = 2; /*iniobj dsym_1291__NCX*/ /*uniqueobj*/ if (! /*_.VALDATA___V1462*/ meltfptr[1461]) /*_.VALDATA___V1462*/ meltfptr[1461] = (melt_ptr_t) & cdat->dsym_1291__NCX; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1291__NCX", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1291__NCX", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1291__NCX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1291__NCX.obj_hash = 816121700; cdat->dsym_1291__NCX.obj_len = 3; /*inistring dstr_1292__NCX*/ /*_.VALSTR___V1463*/ meltfptr[1462] = (melt_ptr_t) & cdat->dstr_1292__NCX; cdat->dstr_1292__NCX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1292__NCX.val, "NCX", sizeof (cdat->dstr_1292__NCX.val) - 1); cdat->dstr_1292__NCX.val[3] = (char) 0; cdat->dstr_1292__NCX.slen = 3; /*^iniobj */ /*iniobj dobj_1293*/ /*_.VALDATA___V1464*/ meltfptr[1463] = (melt_ptr_t) & cdat->dobj_1293; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1293", 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_1293", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1293.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1293.obj_num = 2; cdat->dobj_1293.obj_hash = 452371571; cdat->dobj_1293.obj_len = 2; /*iniobj dsym_1294__PSLOC*/ /*uniqueobj*/ if (! /*_.VALDATA___V1465*/ meltfptr[1464]) /*_.VALDATA___V1465*/ meltfptr[1464] = (melt_ptr_t) & cdat->dsym_1294__PSLOC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1294__PSLOC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1294__PSLOC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1294__PSLOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1294__PSLOC.obj_hash = 590373604; cdat->dsym_1294__PSLOC.obj_len = 3; /*inistring dstr_1295__PSLOC*/ /*_.VALSTR___V1466*/ meltfptr[1465] = (melt_ptr_t) & cdat->dstr_1295__PSLOC; cdat->dstr_1295__PSLOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1295__PSLOC.val, "PSLOC", sizeof (cdat->dstr_1295__PSLOC.val) - 1); cdat->dstr_1295__PSLOC.val[5] = (char) 0; cdat->dstr_1295__PSLOC.slen = 5; /*^iniobj */ /*iniobj dobj_1296*/ /*_.VALDATA___V1467*/ meltfptr[1466] = (melt_ptr_t) & cdat->dobj_1296; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1296", 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_1296", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1296.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1296.obj_num = 3; cdat->dobj_1296.obj_hash = 567846669; cdat->dobj_1296.obj_len = 2; /*inimult dtup_1297__NORMAL_EXP */ /*_.VALTUP___V1468*/ meltfptr[1467] = (melt_ptr_t) & cdat->dtup_1297__NORMAL_EXP; cdat->dtup_1297__NORMAL_EXP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_MULTIPLE)))); cdat->dtup_1297__NORMAL_EXP.nbval = 4; /*^iniobj */ /*iniobj dobj_1298__NORMAL_EXP*/ /*_.VALDATA___V1469*/ meltfptr[1468] = (melt_ptr_t) & cdat->dobj_1298__NORMAL_EXP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1298__NORMAL_EXP", melt_magic_discr ((melt_ptr_t) ( /*_.CLASS_SELECTOR__V20*/ meltfptr[19])) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1298__NORMAL_EXP", ((meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V20*/ meltfptr[19]))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1298__NORMAL_EXP.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V20*/ meltfptr[19]); cdat->dobj_1298__NORMAL_EXP.obj_hash = 804996628; cdat->dobj_1298__NORMAL_EXP.obj_len = 4; /*inistring dstr_1299__NORMAL_EXP*/ /*_.VALSTR___V1470*/ meltfptr[1469] = (melt_ptr_t) & cdat->dstr_1299__NORMAL_EXP; cdat->dstr_1299__NORMAL_EXP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1299__NORMAL_EXP.val, "NORMAL_EXP", sizeof (cdat->dstr_1299__NORMAL_EXP.val) - 1); cdat->dstr_1299__NORMAL_EXP.val[10] = (char) 0; cdat->dstr_1299__NORMAL_EXP.slen = 10; /*inirout drout_1300__NORMEXP_IDENTICAL */ /*_.VALROUT___V1471*/ meltfptr[1470] = (melt_ptr_t) & cdat->drout_1300__NORMEXP_IDENTICAL; cdat->drout_1300__NORMEXP_IDENTICAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1300__NORMEXP_IDENTICAL.routdescr, "NORMEXP_IDENTICAL @warmelt-normal.melt:1058", MELT_ROUTDESCR_LEN - 1); cdat->drout_1300__NORMEXP_IDENTICAL.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1300__NORMEXP_IDENTICAL, meltrout_6_warmelt_normal_NORMEXP_IDENTICAL); /*iniclos dclo_1301__NORMEXP_IDENTICAL */ /*_.VALCLO___V1472*/ meltfptr[1471] = (melt_ptr_t) & cdat->dclo_1301__NORMEXP_IDENTICAL; cdat->dclo_1301__NORMEXP_IDENTICAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1301__NORMEXP_IDENTICAL.nbval = 0; /*iniobj dsym_1302__INSTALL_METHOD*/ /*uniqueobj*/ if (! /*_.VALDATA___V1473*/ meltfptr[1472]) /*_.VALDATA___V1473*/ meltfptr[1472] = (melt_ptr_t) & cdat->dsym_1302__INSTALL_METHOD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1302__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_1302__INSTALL_METHOD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1302__INSTALL_METHOD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1302__INSTALL_METHOD.obj_hash = 680699224; cdat->dsym_1302__INSTALL_METHOD.obj_len = 3; /*inistring dstr_1303__INSTALL_METHOD*/ /*_.VALSTR___V1474*/ meltfptr[1473] = (melt_ptr_t) & cdat->dstr_1303__INSTALL_METHOD; cdat->dstr_1303__INSTALL_METHOD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1303__INSTALL_METHOD.val, "INSTALL_METHOD", sizeof (cdat->dstr_1303__INSTALL_METHOD.val) - 1); cdat->dstr_1303__INSTALL_METHOD.val[14] = (char) 0; cdat->dstr_1303__INSTALL_METHOD.slen = 14; /*inirout drout_1304__NORMEXP_NULL */ /*_.VALROUT___V1475*/ meltfptr[1474] = (melt_ptr_t) & cdat->drout_1304__NORMEXP_NULL; cdat->drout_1304__NORMEXP_NULL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1304__NORMEXP_NULL.routdescr, "NORMEXP_NULL @warmelt-normal.melt:1068", MELT_ROUTDESCR_LEN - 1); cdat->drout_1304__NORMEXP_NULL.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1304__NORMEXP_NULL, meltrout_7_warmelt_normal_NORMEXP_NULL); /*iniclos dclo_1305__NORMEXP_NULL */ /*_.VALCLO___V1476*/ meltfptr[1475] = (melt_ptr_t) & cdat->dclo_1305__NORMEXP_NULL; cdat->dclo_1305__NORMEXP_NULL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1305__NORMEXP_NULL.nbval = 0; /*inirout drout_1306__NORMEXP_ANY_OBJECT */ /*_.VALROUT___V1477*/ meltfptr[1476] = (melt_ptr_t) & cdat->drout_1306__NORMEXP_ANY_OBJECT; cdat->drout_1306__NORMEXP_ANY_OBJECT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1306__NORMEXP_ANY_OBJECT.routdescr, "NORMEXP_ANY_OBJECT @warmelt-normal.melt:1083", MELT_ROUTDESCR_LEN - 1); cdat->drout_1306__NORMEXP_ANY_OBJECT.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1306__NORMEXP_ANY_OBJECT, meltrout_8_warmelt_normal_NORMEXP_ANY_OBJECT); /*iniclos dclo_1307__NORMEXP_ANY_OBJECT */ /*_.VALCLO___V1478*/ meltfptr[1477] = (melt_ptr_t) & cdat->dclo_1307__NORMEXP_ANY_OBJECT; cdat->dclo_1307__NORMEXP_ANY_OBJECT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1307__NORMEXP_ANY_OBJECT.nbval = 0; /*inirout drout_1308__NORMEXP_ANY_VALUE */ /*_.VALROUT___V1479*/ meltfptr[1478] = (melt_ptr_t) & cdat->drout_1308__NORMEXP_ANY_VALUE; cdat->drout_1308__NORMEXP_ANY_VALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1308__NORMEXP_ANY_VALUE.routdescr, "NORMEXP_ANY_VALUE @warmelt-normal.melt:1102", MELT_ROUTDESCR_LEN - 1); cdat->drout_1308__NORMEXP_ANY_VALUE.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1308__NORMEXP_ANY_VALUE, meltrout_9_warmelt_normal_NORMEXP_ANY_VALUE); /*iniclos dclo_1309__NORMEXP_ANY_VALUE */ /*_.VALCLO___V1480*/ meltfptr[1479] = (melt_ptr_t) & cdat->dclo_1309__NORMEXP_ANY_VALUE; cdat->dclo_1309__NORMEXP_ANY_VALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1309__NORMEXP_ANY_VALUE.nbval = 0; /*inirout drout_1310__NORMEXP_SRC_CATCHALL */ /*_.VALROUT___V1481*/ meltfptr[1480] = (melt_ptr_t) & cdat->drout_1310__NORMEXP_SRC_CATCHALL; cdat->drout_1310__NORMEXP_SRC_CATCHALL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1310__NORMEXP_SRC_CATCHALL.routdescr, "NORMEXP_SRC_CATCHALL @warmelt-normal.melt:1118", MELT_ROUTDESCR_LEN - 1); cdat->drout_1310__NORMEXP_SRC_CATCHALL.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1310__NORMEXP_SRC_CATCHALL, meltrout_10_warmelt_normal_NORMEXP_SRC_CATCHALL); /*iniclos dclo_1311__NORMEXP_SRC_CATCHALL */ /*_.VALCLO___V1482*/ meltfptr[1481] = (melt_ptr_t) & cdat->dclo_1311__NORMEXP_SRC_CATCHALL; cdat->dclo_1311__NORMEXP_SRC_CATCHALL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1311__NORMEXP_SRC_CATCHALL.nbval = 0; /*iniobj dsym_1312__CLASS_SOURCE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1483*/ meltfptr[1482]) /*_.VALDATA___V1483*/ meltfptr[1482] = (melt_ptr_t) & cdat->dsym_1312__CLASS_SOURCE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1312__CLASS_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_1312__CLASS_SOURCE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1312__CLASS_SOURCE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1312__CLASS_SOURCE.obj_hash = 656628255; cdat->dsym_1312__CLASS_SOURCE.obj_len = 3; /*inistring dstr_1313__CLASS_SOURCE*/ /*_.VALSTR___V1484*/ meltfptr[1483] = (melt_ptr_t) & cdat->dstr_1313__CLASS_SOURCE; cdat->dstr_1313__CLASS_SOURCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1313__CLASS_SOURCE.val, "CLASS_SOURCE", sizeof (cdat->dstr_1313__CLASS_SOURCE.val) - 1); cdat->dstr_1313__CLASS_SOURCE.val[12] = (char) 0; cdat->dstr_1313__CLASS_SOURCE.slen = 12; /*inirout drout_1314__NORMEXP_LAZYMACROEXP */ /*_.VALROUT___V1485*/ meltfptr[1484] = (melt_ptr_t) & cdat->drout_1314__NORMEXP_LAZYMACROEXP; cdat->drout_1314__NORMEXP_LAZYMACROEXP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1314__NORMEXP_LAZYMACROEXP.routdescr, "NORMEXP_LAZYMACROEXP @warmelt-normal.melt:1132", MELT_ROUTDESCR_LEN - 1); cdat->drout_1314__NORMEXP_LAZYMACROEXP.nbval = 8; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1314__NORMEXP_LAZYMACROEXP, meltrout_11_warmelt_normal_NORMEXP_LAZYMACROEXP); /*iniclos dclo_1315__NORMEXP_LAZYMACROEXP */ /*_.VALCLO___V1486*/ meltfptr[1485] = (melt_ptr_t) & cdat->dclo_1315__NORMEXP_LAZYMACROEXP; cdat->dclo_1315__NORMEXP_LAZYMACROEXP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1315__NORMEXP_LAZYMACROEXP.nbval = 0; /*iniobj dsym_1316__CLASS_SOURCE_LAZY_MACRO_EXPANSION*/ /*uniqueobj*/ if (! /*_.VALDATA___V1487*/ meltfptr[1486]) /*_.VALDATA___V1487*/ meltfptr[1486] = (melt_ptr_t) & cdat->dsym_1316__CLASS_SOURCE_LAZY_MACRO_EXPANSION; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1316__CLASS_SOURCE_LAZY_MACRO_EXPANSION", melt_magic_discr ((melt_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__CLASS_SOURCE_LAZY_MACRO_EXPANSION", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1316__CLASS_SOURCE_LAZY_MACRO_EXPANSION.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1316__CLASS_SOURCE_LAZY_MACRO_EXPANSION.obj_hash = 697763169; cdat->dsym_1316__CLASS_SOURCE_LAZY_MACRO_EXPANSION.obj_len = 3; /*inistring dstr_1317__CLASS_SOURCE_LAZ*/ /*_.VALSTR___V1488*/ meltfptr[1487] = (melt_ptr_t) & cdat->dstr_1317__CLASS_SOURCE_LAZ; cdat->dstr_1317__CLASS_SOURCE_LAZ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1317__CLASS_SOURCE_LAZ.val, "CLASS_SOURCE_LAZY_MACRO_EXPANSION", sizeof (cdat->dstr_1317__CLASS_SOURCE_LAZ. val) - 1); cdat->dstr_1317__CLASS_SOURCE_LAZ.val[33] = (char) 0; cdat->dstr_1317__CLASS_SOURCE_LAZ.slen = 33; /*iniobj dsym_1318__GET_CTYPE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1489*/ meltfptr[1488]) /*_.VALDATA___V1489*/ meltfptr[1488] = (melt_ptr_t) & cdat->dsym_1318__GET_CTYPE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1318__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_1318__GET_CTYPE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1318__GET_CTYPE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1318__GET_CTYPE.obj_hash = 747649571; cdat->dsym_1318__GET_CTYPE.obj_len = 3; /*inistring dstr_1319__GET_CTYPE*/ /*_.VALSTR___V1490*/ meltfptr[1489] = (melt_ptr_t) & cdat->dstr_1319__GET_CTYPE; cdat->dstr_1319__GET_CTYPE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1319__GET_CTYPE.val, "GET_CTYPE", sizeof (cdat->dstr_1319__GET_CTYPE.val) - 1); cdat->dstr_1319__GET_CTYPE.val[9] = (char) 0; cdat->dstr_1319__GET_CTYPE.slen = 9; MELT_LOCATION ("warmelt-normal.melt:1171:/ iniobj"); /*iniobj dobj_1320__GET_CTYPE*/ /*_.VALDATA___V1491*/ meltfptr[1490] = (melt_ptr_t) & cdat->dobj_1320__GET_CTYPE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1320__GET_CTYPE", melt_magic_discr ((melt_ptr_t) ( /*_.CLASS_SELECTOR__V20*/ meltfptr[19])) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1320__GET_CTYPE", ((meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V20*/ meltfptr[19]))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1320__GET_CTYPE.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V20*/ meltfptr[19]); cdat->dobj_1320__GET_CTYPE.obj_hash = 754095620; cdat->dobj_1320__GET_CTYPE.obj_len = 4; /*inistring dstr_1321__GET_CTYPE*/ /*_.VALSTR___V1492*/ meltfptr[1491] = (melt_ptr_t) & cdat->dstr_1321__GET_CTYPE; cdat->dstr_1321__GET_CTYPE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1321__GET_CTYPE.val, "GET_CTYPE", sizeof (cdat->dstr_1321__GET_CTYPE.val) - 1); cdat->dstr_1321__GET_CTYPE.val[9] = (char) 0; cdat->dstr_1321__GET_CTYPE.slen = 9; /*iniobj dsym_1322__COMPILE_OBJ*/ /*uniqueobj*/ if (! /*_.VALDATA___V1493*/ meltfptr[1492]) /*_.VALDATA___V1493*/ meltfptr[1492] = (melt_ptr_t) & cdat->dsym_1322__COMPILE_OBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1322__COMPILE_OBJ", melt_magic_discr ((melt_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__COMPILE_OBJ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1322__COMPILE_OBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1322__COMPILE_OBJ.obj_hash = 749017560; cdat->dsym_1322__COMPILE_OBJ.obj_len = 3; /*inistring dstr_1323__COMPILE_OBJ*/ /*_.VALSTR___V1494*/ meltfptr[1493] = (melt_ptr_t) & cdat->dstr_1323__COMPILE_OBJ; cdat->dstr_1323__COMPILE_OBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1323__COMPILE_OBJ.val, "COMPILE_OBJ", sizeof (cdat->dstr_1323__COMPILE_OBJ.val) - 1); cdat->dstr_1323__COMPILE_OBJ.val[11] = (char) 0; cdat->dstr_1323__COMPILE_OBJ.slen = 11; MELT_LOCATION ("warmelt-normal.melt:1180:/ iniobj"); /*iniobj dobj_1324__COMPILE_OBJ*/ /*_.VALDATA___V1495*/ meltfptr[1494] = (melt_ptr_t) & cdat->dobj_1324__COMPILE_OBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1324__COMPILE_OBJ", melt_magic_discr ((melt_ptr_t) ( /*_.CLASS_SELECTOR__V20*/ meltfptr[19])) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1324__COMPILE_OBJ", ((meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V20*/ meltfptr[19]))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1324__COMPILE_OBJ.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V20*/ meltfptr[19]); cdat->dobj_1324__COMPILE_OBJ.obj_hash = 764928770; cdat->dobj_1324__COMPILE_OBJ.obj_len = 4; /*inistring dstr_1325__COMPILE_OBJ*/ /*_.VALSTR___V1496*/ meltfptr[1495] = (melt_ptr_t) & cdat->dstr_1325__COMPILE_OBJ; cdat->dstr_1325__COMPILE_OBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1325__COMPILE_OBJ.val, "COMPILE_OBJ", sizeof (cdat->dstr_1325__COMPILE_OBJ.val) - 1); cdat->dstr_1325__COMPILE_OBJ.val[11] = (char) 0; cdat->dstr_1325__COMPILE_OBJ.slen = 11; /*inirout drout_1326__GECTYP_ANYRECV */ /*_.VALROUT___V1497*/ meltfptr[1496] = (melt_ptr_t) & cdat->drout_1326__GECTYP_ANYRECV; cdat->drout_1326__GECTYP_ANYRECV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1326__GECTYP_ANYRECV.routdescr, "GECTYP_ANYRECV @warmelt-normal.melt:1184", MELT_ROUTDESCR_LEN - 1); cdat->drout_1326__GECTYP_ANYRECV.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1326__GECTYP_ANYRECV, meltrout_12_warmelt_normal_GECTYP_ANYRECV); /*iniclos dclo_1327__GECTYP_ANYRECV */ /*_.VALCLO___V1498*/ meltfptr[1497] = (melt_ptr_t) & cdat->dclo_1327__GECTYP_ANYRECV; cdat->dclo_1327__GECTYP_ANYRECV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1327__GECTYP_ANYRECV.nbval = 0; /*inirout drout_1328__GECTYP_ROOT */ /*_.VALROUT___V1499*/ meltfptr[1498] = (melt_ptr_t) & cdat->drout_1328__GECTYP_ROOT; cdat->drout_1328__GECTYP_ROOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1328__GECTYP_ROOT.routdescr, "GECTYP_ROOT @warmelt-normal.melt:1187", MELT_ROUTDESCR_LEN - 1); cdat->drout_1328__GECTYP_ROOT.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1328__GECTYP_ROOT, meltrout_13_warmelt_normal_GECTYP_ROOT); /*iniclos dclo_1329__GECTYP_ROOT */ /*_.VALCLO___V1500*/ meltfptr[1499] = (melt_ptr_t) & cdat->dclo_1329__GECTYP_ROOT; cdat->dclo_1329__GECTYP_ROOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1329__GECTYP_ROOT.nbval = 0; /*inirout drout_1330__GECTYP_INTEGER */ /*_.VALROUT___V1501*/ meltfptr[1500] = (melt_ptr_t) & cdat->drout_1330__GECTYP_INTEGER; cdat->drout_1330__GECTYP_INTEGER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1330__GECTYP_INTEGER.routdescr, "GECTYP_INTEGER @warmelt-normal.melt:1191", MELT_ROUTDESCR_LEN - 1); cdat->drout_1330__GECTYP_INTEGER.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1330__GECTYP_INTEGER, meltrout_14_warmelt_normal_GECTYP_INTEGER); /*iniclos dclo_1331__GECTYP_INTEGER */ /*_.VALCLO___V1502*/ meltfptr[1501] = (melt_ptr_t) & cdat->dclo_1331__GECTYP_INTEGER; cdat->dclo_1331__GECTYP_INTEGER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1331__GECTYP_INTEGER.nbval = 0; /*inirout drout_1332__GECTYP_STRING */ /*_.VALROUT___V1503*/ meltfptr[1502] = (melt_ptr_t) & cdat->drout_1332__GECTYP_STRING; cdat->drout_1332__GECTYP_STRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1332__GECTYP_STRING.routdescr, "GECTYP_STRING @warmelt-normal.melt:1197", MELT_ROUTDESCR_LEN - 1); cdat->drout_1332__GECTYP_STRING.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1332__GECTYP_STRING, meltrout_15_warmelt_normal_GECTYP_STRING); /*iniclos dclo_1333__GECTYP_STRING */ /*_.VALCLO___V1504*/ meltfptr[1503] = (melt_ptr_t) & cdat->dclo_1333__GECTYP_STRING; cdat->dclo_1333__GECTYP_STRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1333__GECTYP_STRING.nbval = 0; /*inirout drout_1334__NORMALIZE_TUPLE */ /*_.VALROUT___V1505*/ meltfptr[1504] = (melt_ptr_t) & cdat->drout_1334__NORMALIZE_TUPLE; cdat->drout_1334__NORMALIZE_TUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1334__NORMALIZE_TUPLE.routdescr, "NORMALIZE_TUPLE @warmelt-normal.melt:1202", MELT_ROUTDESCR_LEN - 1); cdat->drout_1334__NORMALIZE_TUPLE.nbval = 11; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1334__NORMALIZE_TUPLE, meltrout_16_warmelt_normal_NORMALIZE_TUPLE); /*iniclos dclo_1335__NORMALIZE_TUPLE */ /*_.VALCLO___V1508*/ meltfptr[1507] = (melt_ptr_t) & cdat->dclo_1335__NORMALIZE_TUPLE; cdat->dclo_1335__NORMALIZE_TUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1335__NORMALIZE_TUPLE.nbval = 0; /*iniobj dsym_1336__MULTIPLE_MAP*/ /*uniqueobj*/ if (! /*_.VALDATA___V1509*/ meltfptr[1508]) /*_.VALDATA___V1509*/ meltfptr[1508] = (melt_ptr_t) & cdat->dsym_1336__MULTIPLE_MAP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1336__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_1336__MULTIPLE_MAP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1336__MULTIPLE_MAP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1336__MULTIPLE_MAP.obj_hash = 218301686; cdat->dsym_1336__MULTIPLE_MAP.obj_len = 3; /*inistring dstr_1337__MULTIPLE_MAP*/ /*_.VALSTR___V1510*/ meltfptr[1509] = (melt_ptr_t) & cdat->dstr_1337__MULTIPLE_MAP; cdat->dstr_1337__MULTIPLE_MAP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1337__MULTIPLE_MAP.val, "MULTIPLE_MAP", sizeof (cdat->dstr_1337__MULTIPLE_MAP.val) - 1); cdat->dstr_1337__MULTIPLE_MAP.val[12] = (char) 0; cdat->dstr_1337__MULTIPLE_MAP.slen = 12; /*inirout drout_1338__LAMBDA_ */ /*_.VALROUT___V1506*/ meltfptr[1505] = (melt_ptr_t) & cdat->drout_1338__LAMBDA_; cdat->drout_1338__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1338__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:1212", MELT_ROUTDESCR_LEN - 1); cdat->drout_1338__LAMBDA_.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1338__LAMBDA_, meltrout_17_warmelt_normal_LAMBDA___1__); /*iniobj dsym_1339__LIST_EVERY*/ /*uniqueobj*/ if (! /*_.VALDATA___V1511*/ meltfptr[1510]) /*_.VALDATA___V1511*/ meltfptr[1510] = (melt_ptr_t) & cdat->dsym_1339__LIST_EVERY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1339__LIST_EVERY", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1339__LIST_EVERY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1339__LIST_EVERY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1339__LIST_EVERY.obj_hash = 942863429; cdat->dsym_1339__LIST_EVERY.obj_len = 3; /*inistring dstr_1340__LIST_EVERY*/ /*_.VALSTR___V1512*/ meltfptr[1511] = (melt_ptr_t) & cdat->dstr_1340__LIST_EVERY; cdat->dstr_1340__LIST_EVERY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1340__LIST_EVERY.val, "LIST_EVERY", sizeof (cdat->dstr_1340__LIST_EVERY.val) - 1); cdat->dstr_1340__LIST_EVERY.val[10] = (char) 0; cdat->dstr_1340__LIST_EVERY.slen = 10; /*inirout drout_1341__LAMBDA_ */ /*_.VALROUT___V1507*/ meltfptr[1506] = (melt_ptr_t) & cdat->drout_1341__LAMBDA_; cdat->drout_1341__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1341__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:1223", MELT_ROUTDESCR_LEN - 1); cdat->drout_1341__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1341__LAMBDA_, meltrout_18_warmelt_normal_LAMBDA___2__); /*inirout drout_1342__WRAP_NORMAL_LET1 */ /*_.VALROUT___V1513*/ meltfptr[1512] = (melt_ptr_t) & cdat->drout_1342__WRAP_NORMAL_LET1; cdat->drout_1342__WRAP_NORMAL_LET1.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1342__WRAP_NORMAL_LET1.routdescr, "WRAP_NORMAL_LET1 @warmelt-normal.melt:1240", MELT_ROUTDESCR_LEN - 1); cdat->drout_1342__WRAP_NORMAL_LET1.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1342__WRAP_NORMAL_LET1, meltrout_19_warmelt_normal_WRAP_NORMAL_LET1); /*iniclos dclo_1343__WRAP_NORMAL_LET1 */ /*_.VALCLO___V1515*/ meltfptr[1514] = (melt_ptr_t) & cdat->dclo_1343__WRAP_NORMAL_LET1; cdat->dclo_1343__WRAP_NORMAL_LET1.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1343__WRAP_NORMAL_LET1.nbval = 0; /*inirout drout_1344__LAMBDA_ */ /*_.VALROUT___V1514*/ meltfptr[1513] = (melt_ptr_t) & cdat->drout_1344__LAMBDA_; cdat->drout_1344__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1344__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:1244", MELT_ROUTDESCR_LEN - 1); cdat->drout_1344__LAMBDA_.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1344__LAMBDA_, meltrout_20_warmelt_normal_LAMBDA___3__); /*iniobj dsym_1345__CLASS_NORMAL_LET_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1516*/ meltfptr[1515]) /*_.VALDATA___V1516*/ meltfptr[1515] = (melt_ptr_t) & cdat->dsym_1345__CLASS_NORMAL_LET_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1345__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_1345__CLASS_NORMAL_LET_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1345__CLASS_NORMAL_LET_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1345__CLASS_NORMAL_LET_BINDING.obj_hash = 76320742; cdat->dsym_1345__CLASS_NORMAL_LET_BINDING.obj_len = 3; /*inistring dstr_1346__CLASS_NORMAL_LET*/ /*_.VALSTR___V1517*/ meltfptr[1516] = (melt_ptr_t) & cdat->dstr_1346__CLASS_NORMAL_LET; cdat->dstr_1346__CLASS_NORMAL_LET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1346__CLASS_NORMAL_LET.val, "CLASS_NORMAL_LET_BINDING", sizeof (cdat->dstr_1346__CLASS_NORMAL_LET. val) - 1); cdat->dstr_1346__CLASS_NORMAL_LET.val[24] = (char) 0; cdat->dstr_1346__CLASS_NORMAL_LET.slen = 24; /*iniobj dsym_1347__LIST_TO_MULTIPLE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1518*/ meltfptr[1517]) /*_.VALDATA___V1518*/ meltfptr[1517] = (melt_ptr_t) & cdat->dsym_1347__LIST_TO_MULTIPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1347__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_1347__LIST_TO_MULTIPLE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1347__LIST_TO_MULTIPLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1347__LIST_TO_MULTIPLE.obj_hash = 987171205; cdat->dsym_1347__LIST_TO_MULTIPLE.obj_len = 3; /*inistring dstr_1348__LIST_TO_MULTIPLE*/ /*_.VALSTR___V1519*/ meltfptr[1518] = (melt_ptr_t) & cdat->dstr_1348__LIST_TO_MULTIPLE; cdat->dstr_1348__LIST_TO_MULTIPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1348__LIST_TO_MULTIPLE.val, "LIST_TO_MULTIPLE", sizeof (cdat->dstr_1348__LIST_TO_MULTIPLE. val) - 1); cdat->dstr_1348__LIST_TO_MULTIPLE.val[16] = (char) 0; cdat->dstr_1348__LIST_TO_MULTIPLE.slen = 16; /*inirout drout_1349__WRAP_NORMAL_LETSEQ */ /*_.VALROUT___V1520*/ meltfptr[1519] = (melt_ptr_t) & cdat->drout_1349__WRAP_NORMAL_LETSEQ; cdat->drout_1349__WRAP_NORMAL_LETSEQ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1349__WRAP_NORMAL_LETSEQ.routdescr, "WRAP_NORMAL_LETSEQ @warmelt-normal.melt:1265", MELT_ROUTDESCR_LEN - 1); cdat->drout_1349__WRAP_NORMAL_LETSEQ.nbval = 11; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1349__WRAP_NORMAL_LETSEQ, meltrout_21_warmelt_normal_WRAP_NORMAL_LETSEQ); /*iniclos dclo_1350__WRAP_NORMAL_LETSEQ */ /*_.VALCLO___V1522*/ meltfptr[1521] = (melt_ptr_t) & cdat->dclo_1350__WRAP_NORMAL_LETSEQ; cdat->dclo_1350__WRAP_NORMAL_LETSEQ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1350__WRAP_NORMAL_LETSEQ.nbval = 0; /*inirout drout_1351__LAMBDA_ */ /*_.VALROUT___V1521*/ meltfptr[1520] = (melt_ptr_t) & cdat->drout_1351__LAMBDA_; cdat->drout_1351__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1351__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:1303", MELT_ROUTDESCR_LEN - 1); cdat->drout_1351__LAMBDA_.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1351__LAMBDA_, meltrout_22_warmelt_normal_LAMBDA___4__); /*inirout drout_1352__CHECK_CTYPE_NARGS */ /*_.VALROUT___V1523*/ meltfptr[1522] = (melt_ptr_t) & cdat->drout_1352__CHECK_CTYPE_NARGS; cdat->drout_1352__CHECK_CTYPE_NARGS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1352__CHECK_CTYPE_NARGS.routdescr, "CHECK_CTYPE_NARGS @warmelt-normal.melt:1322", MELT_ROUTDESCR_LEN - 1); cdat->drout_1352__CHECK_CTYPE_NARGS.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1352__CHECK_CTYPE_NARGS, meltrout_23_warmelt_normal_CHECK_CTYPE_NARGS); /*iniclos dclo_1353__CHECK_CTYPE_NARGS */ /*_.VALCLO___V1525*/ meltfptr[1524] = (melt_ptr_t) & cdat->dclo_1353__CHECK_CTYPE_NARGS; cdat->dclo_1353__CHECK_CTYPE_NARGS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1353__CHECK_CTYPE_NARGS.nbval = 0; /*iniobj dsym_1354__MULTIPLE_EVERY*/ /*uniqueobj*/ if (! /*_.VALDATA___V1526*/ meltfptr[1525]) /*_.VALDATA___V1526*/ meltfptr[1525] = (melt_ptr_t) & cdat->dsym_1354__MULTIPLE_EVERY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1354__MULTIPLE_EVERY", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1354__MULTIPLE_EVERY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1354__MULTIPLE_EVERY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1354__MULTIPLE_EVERY.obj_hash = 130098745; cdat->dsym_1354__MULTIPLE_EVERY.obj_len = 3; /*inistring dstr_1355__MULTIPLE_EVERY*/ /*_.VALSTR___V1527*/ meltfptr[1526] = (melt_ptr_t) & cdat->dstr_1355__MULTIPLE_EVERY; cdat->dstr_1355__MULTIPLE_EVERY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1355__MULTIPLE_EVERY.val, "MULTIPLE_EVERY", sizeof (cdat->dstr_1355__MULTIPLE_EVERY.val) - 1); cdat->dstr_1355__MULTIPLE_EVERY.val[14] = (char) 0; cdat->dstr_1355__MULTIPLE_EVERY.slen = 14; /*inirout drout_1356__LAMBDA_ */ /*_.VALROUT___V1524*/ meltfptr[1523] = (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-normal.melt:1325", MELT_ROUTDESCR_LEN - 1); cdat->drout_1356__LAMBDA_.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1356__LAMBDA_, meltrout_24_warmelt_normal_LAMBDA___5__); /*iniobj dsym_1357__NORMALIZE_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1528*/ meltfptr[1527]) /*_.VALDATA___V1528*/ meltfptr[1527] = (melt_ptr_t) & cdat->dsym_1357__NORMALIZE_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1357__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_1357__NORMALIZE_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1357__NORMALIZE_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1357__NORMALIZE_BINDING.obj_hash = 689313377; cdat->dsym_1357__NORMALIZE_BINDING.obj_len = 3; /*inistring dstr_1358__NORMALIZE_BINDIN*/ /*_.VALSTR___V1529*/ meltfptr[1528] = (melt_ptr_t) & cdat->dstr_1358__NORMALIZE_BINDIN; cdat->dstr_1358__NORMALIZE_BINDIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1358__NORMALIZE_BINDIN.val, "NORMALIZE_BINDING", sizeof (cdat->dstr_1358__NORMALIZE_BINDIN. val) - 1); cdat->dstr_1358__NORMALIZE_BINDIN.val[17] = (char) 0; cdat->dstr_1358__NORMALIZE_BINDIN.slen = 17; MELT_LOCATION ("warmelt-normal.melt:1334:/ iniobj"); /*iniobj dobj_1359*/ /*_.VALDATA___V1530*/ meltfptr[1529] = (melt_ptr_t) & cdat->dobj_1359; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1359", 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_1359", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1359.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1359.obj_num = 0; cdat->dobj_1359.obj_hash = 464792158; cdat->dobj_1359.obj_len = 2; /*^iniobj */ /*iniobj dobj_1360*/ /*_.VALDATA___V1531*/ meltfptr[1530] = (melt_ptr_t) & cdat->dobj_1360; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1360", 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_1360", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1360.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1360.obj_num = 1; cdat->dobj_1360.obj_hash = 792547362; cdat->dobj_1360.obj_len = 2; /*^iniobj */ /*iniobj dobj_1361*/ /*_.VALDATA___V1532*/ meltfptr[1531] = (melt_ptr_t) & cdat->dobj_1361; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1361", 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_1361", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1361.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1361.obj_num = 2; cdat->dobj_1361.obj_hash = 280655904; cdat->dobj_1361.obj_len = 2; /*iniobj dsym_1362__PROCS*/ /*uniqueobj*/ if (! /*_.VALDATA___V1533*/ meltfptr[1532]) /*_.VALDATA___V1533*/ meltfptr[1532] = (melt_ptr_t) & cdat->dsym_1362__PROCS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1362__PROCS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1362__PROCS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1362__PROCS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1362__PROCS.obj_hash = 1064926389; cdat->dsym_1362__PROCS.obj_len = 3; /*inistring dstr_1363__PROCS*/ /*_.VALSTR___V1534*/ meltfptr[1533] = (melt_ptr_t) & cdat->dstr_1363__PROCS; cdat->dstr_1363__PROCS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1363__PROCS.val, "PROCS", sizeof (cdat->dstr_1363__PROCS.val) - 1); cdat->dstr_1363__PROCS.val[5] = (char) 0; cdat->dstr_1363__PROCS.slen = 5; /*^iniobj */ /*iniobj dobj_1364*/ /*_.VALDATA___V1535*/ meltfptr[1534] = (melt_ptr_t) & cdat->dobj_1364; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1364", 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_1364", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1364.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1364.obj_num = 3; cdat->dobj_1364.obj_hash = 777882084; cdat->dobj_1364.obj_len = 2; /*^iniobj */ /*iniobj dobj_1365*/ /*_.VALDATA___V1536*/ meltfptr[1535] = (melt_ptr_t) & cdat->dobj_1365; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1365", 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_1365", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1365.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1365.obj_num = 4; cdat->dobj_1365.obj_hash = 355560109; cdat->dobj_1365.obj_len = 2; /*inimult dtup_1366__NORMALIZE_BINDING */ /*_.VALTUP___V1537*/ meltfptr[1536] = (melt_ptr_t) & cdat->dtup_1366__NORMALIZE_BINDING; cdat->dtup_1366__NORMALIZE_BINDING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_MULTIPLE)))); cdat->dtup_1366__NORMALIZE_BINDING.nbval = 5; /*^iniobj */ /*iniobj dobj_1367__NORMALIZE_BINDING*/ /*_.VALDATA___V1538*/ meltfptr[1537] = (melt_ptr_t) & cdat->dobj_1367__NORMALIZE_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1367__NORMALIZE_BINDING", melt_magic_discr ((melt_ptr_t) ( /*_.CLASS_SELECTOR__V20*/ meltfptr[19])) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1367__NORMALIZE_BINDING", ((meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V20*/ meltfptr[19]))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1367__NORMALIZE_BINDING.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V20*/ meltfptr[19]); cdat->dobj_1367__NORMALIZE_BINDING.obj_hash = 293440728; cdat->dobj_1367__NORMALIZE_BINDING.obj_len = 4; /*inistring dstr_1368__NORMALIZE_BINDIN*/ /*_.VALSTR___V1539*/ meltfptr[1538] = (melt_ptr_t) & cdat->dstr_1368__NORMALIZE_BINDIN; cdat->dstr_1368__NORMALIZE_BINDIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1368__NORMALIZE_BINDIN.val, "NORMALIZE_BINDING", sizeof (cdat->dstr_1368__NORMALIZE_BINDIN. val) - 1); cdat->dstr_1368__NORMALIZE_BINDIN.val[17] = (char) 0; cdat->dstr_1368__NORMALIZE_BINDIN.slen = 17; /*inirout drout_1369__NORMBIND_FAILANY */ /*_.VALROUT___V1540*/ meltfptr[1539] = (melt_ptr_t) & cdat->drout_1369__NORMBIND_FAILANY; cdat->drout_1369__NORMBIND_FAILANY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1369__NORMBIND_FAILANY.routdescr, "NORMBIND_FAILANY @warmelt-normal.melt:1340", MELT_ROUTDESCR_LEN - 1); cdat->drout_1369__NORMBIND_FAILANY.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1369__NORMBIND_FAILANY, meltrout_25_warmelt_normal_NORMBIND_FAILANY); /*iniclos dclo_1370__NORMBIND_FAILANY */ /*_.VALCLO___V1541*/ meltfptr[1540] = (melt_ptr_t) & cdat->dclo_1370__NORMBIND_FAILANY; cdat->dclo_1370__NORMBIND_FAILANY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1370__NORMBIND_FAILANY.nbval = 0; /*inirout drout_1371__NORMBIND_ANYBIND */ /*_.VALROUT___V1542*/ meltfptr[1541] = (melt_ptr_t) & cdat->drout_1371__NORMBIND_ANYBIND; cdat->drout_1371__NORMBIND_ANYBIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1371__NORMBIND_ANYBIND.routdescr, "NORMBIND_ANYBIND @warmelt-normal.melt:1350", MELT_ROUTDESCR_LEN - 1); cdat->drout_1371__NORMBIND_ANYBIND.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1371__NORMBIND_ANYBIND, meltrout_26_warmelt_normal_NORMBIND_ANYBIND); /*iniclos dclo_1372__NORMBIND_ANYBIND */ /*_.VALCLO___V1543*/ meltfptr[1542] = (melt_ptr_t) & cdat->dclo_1372__NORMBIND_ANYBIND; cdat->dclo_1372__NORMBIND_ANYBIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1372__NORMBIND_ANYBIND.nbval = 0; /*inirout drout_1373__NORMBIND_FORMALBIND */ /*_.VALROUT___V1544*/ meltfptr[1543] = (melt_ptr_t) & cdat->drout_1373__NORMBIND_FORMALBIND; cdat->drout_1373__NORMBIND_FORMALBIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1373__NORMBIND_FORMALBIND.routdescr, "NORMBIND_FORMALBIND @warmelt-normal.melt:1392", MELT_ROUTDESCR_LEN - 1); cdat->drout_1373__NORMBIND_FORMALBIND.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1373__NORMBIND_FORMALBIND, meltrout_27_warmelt_normal_NORMBIND_FORMALBIND); /*iniclos dclo_1374__NORMBIND_FORMALBIND */ /*_.VALCLO___V1545*/ meltfptr[1544] = (melt_ptr_t) & cdat->dclo_1374__NORMBIND_FORMALBIND; cdat->dclo_1374__NORMBIND_FORMALBIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1374__NORMBIND_FORMALBIND.nbval = 0; /*inirout drout_1375__NORMBIND_LETBIND */ /*_.VALROUT___V1546*/ meltfptr[1545] = (melt_ptr_t) & cdat->drout_1375__NORMBIND_LETBIND; cdat->drout_1375__NORMBIND_LETBIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1375__NORMBIND_LETBIND.routdescr, "NORMBIND_LETBIND @warmelt-normal.melt:1415", MELT_ROUTDESCR_LEN - 1); cdat->drout_1375__NORMBIND_LETBIND.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1375__NORMBIND_LETBIND, meltrout_28_warmelt_normal_NORMBIND_LETBIND); /*iniclos dclo_1376__NORMBIND_LETBIND */ /*_.VALCLO___V1547*/ meltfptr[1546] = (melt_ptr_t) & cdat->dclo_1376__NORMBIND_LETBIND; cdat->dclo_1376__NORMBIND_LETBIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1376__NORMBIND_LETBIND.nbval = 0; /*iniobj dsym_1377__CLASS_LET_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1548*/ meltfptr[1547]) /*_.VALDATA___V1548*/ meltfptr[1547] = (melt_ptr_t) & cdat->dsym_1377__CLASS_LET_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1377__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_1377__CLASS_LET_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1377__CLASS_LET_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1377__CLASS_LET_BINDING.obj_hash = 373730517; cdat->dsym_1377__CLASS_LET_BINDING.obj_len = 3; /*inistring dstr_1378__CLASS_LET_BINDIN*/ /*_.VALSTR___V1549*/ meltfptr[1548] = (melt_ptr_t) & cdat->dstr_1378__CLASS_LET_BINDIN; cdat->dstr_1378__CLASS_LET_BINDIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1378__CLASS_LET_BINDIN.val, "CLASS_LET_BINDING", sizeof (cdat->dstr_1378__CLASS_LET_BINDIN. val) - 1); cdat->dstr_1378__CLASS_LET_BINDIN.val[17] = (char) 0; cdat->dstr_1378__CLASS_LET_BINDIN.slen = 17; /*inirout drout_1379__NORMBIND_FIXBIND */ /*_.VALROUT___V1550*/ meltfptr[1549] = (melt_ptr_t) & cdat->drout_1379__NORMBIND_FIXBIND; cdat->drout_1379__NORMBIND_FIXBIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1379__NORMBIND_FIXBIND.routdescr, "NORMBIND_FIXBIND @warmelt-normal.melt:1437", MELT_ROUTDESCR_LEN - 1); cdat->drout_1379__NORMBIND_FIXBIND.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1379__NORMBIND_FIXBIND, meltrout_29_warmelt_normal_NORMBIND_FIXBIND); /*iniclos dclo_1380__NORMBIND_FIXBIND */ /*_.VALCLO___V1551*/ meltfptr[1550] = (melt_ptr_t) & cdat->dclo_1380__NORMBIND_FIXBIND; cdat->dclo_1380__NORMBIND_FIXBIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1380__NORMBIND_FIXBIND.nbval = 0; /*iniobj dsym_1381__CLASS_FIXED_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1552*/ meltfptr[1551]) /*_.VALDATA___V1552*/ meltfptr[1551] = (melt_ptr_t) & cdat->dsym_1381__CLASS_FIXED_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1381__CLASS_FIXED_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_1381__CLASS_FIXED_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1381__CLASS_FIXED_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1381__CLASS_FIXED_BINDING.obj_hash = 179808938; cdat->dsym_1381__CLASS_FIXED_BINDING.obj_len = 3; /*inistring dstr_1382__CLASS_FIXED_BIND*/ /*_.VALSTR___V1553*/ meltfptr[1552] = (melt_ptr_t) & cdat->dstr_1382__CLASS_FIXED_BIND; cdat->dstr_1382__CLASS_FIXED_BIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1382__CLASS_FIXED_BIND.val, "CLASS_FIXED_BINDING", sizeof (cdat->dstr_1382__CLASS_FIXED_BIND. val) - 1); cdat->dstr_1382__CLASS_FIXED_BIND.val[19] = (char) 0; cdat->dstr_1382__CLASS_FIXED_BIND.slen = 19; /*inirout drout_1383__NORMBIND_DEFINEDVALBIND */ /*_.VALROUT___V1554*/ meltfptr[1553] = (melt_ptr_t) & cdat->drout_1383__NORMBIND_DEFINEDVALBIND; cdat->drout_1383__NORMBIND_DEFINEDVALBIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1383__NORMBIND_DEFINEDVALBIND.routdescr, "NORMBIND_DEFINEDVALBIND @warmelt-normal.melt:1464", MELT_ROUTDESCR_LEN - 1); cdat->drout_1383__NORMBIND_DEFINEDVALBIND.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1383__NORMBIND_DEFINEDVALBIND, meltrout_30_warmelt_normal_NORMBIND_DEFINEDVALBIND); /*iniclos dclo_1384__NORMBIND_DEFINEDVALBIND */ /*_.VALCLO___V1555*/ meltfptr[1554] = (melt_ptr_t) & cdat->dclo_1384__NORMBIND_DEFINEDVALBIND; cdat->dclo_1384__NORMBIND_DEFINEDVALBIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1384__NORMBIND_DEFINEDVALBIND.nbval = 0; /*iniobj dsym_1385__CLASS_DEFINED_VALUE_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1556*/ meltfptr[1555]) /*_.VALDATA___V1556*/ meltfptr[1555] = (melt_ptr_t) & cdat->dsym_1385__CLASS_DEFINED_VALUE_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1385__CLASS_DEFINED_VALUE_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_1385__CLASS_DEFINED_VALUE_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1385__CLASS_DEFINED_VALUE_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1385__CLASS_DEFINED_VALUE_BINDING.obj_hash = 803081436; cdat->dsym_1385__CLASS_DEFINED_VALUE_BINDING.obj_len = 3; /*inistring dstr_1386__CLASS_DEFINED_VA*/ /*_.VALSTR___V1557*/ meltfptr[1556] = (melt_ptr_t) & cdat->dstr_1386__CLASS_DEFINED_VA; cdat->dstr_1386__CLASS_DEFINED_VA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1386__CLASS_DEFINED_VA.val, "CLASS_DEFINED_VALUE_BINDING", sizeof (cdat->dstr_1386__CLASS_DEFINED_VA. val) - 1); cdat->dstr_1386__CLASS_DEFINED_VA.val[27] = (char) 0; cdat->dstr_1386__CLASS_DEFINED_VA.slen = 27; /*inirout drout_1387__NORMBIND_CONSTRUCTBIND */ /*_.VALROUT___V1558*/ meltfptr[1557] = (melt_ptr_t) & cdat->drout_1387__NORMBIND_CONSTRUCTBIND; cdat->drout_1387__NORMBIND_CONSTRUCTBIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1387__NORMBIND_CONSTRUCTBIND.routdescr, "NORMBIND_CONSTRUCTBIND @warmelt-normal.melt:1499", MELT_ROUTDESCR_LEN - 1); cdat->drout_1387__NORMBIND_CONSTRUCTBIND.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1387__NORMBIND_CONSTRUCTBIND, meltrout_31_warmelt_normal_NORMBIND_CONSTRUCTBIND); /*iniclos dclo_1388__NORMBIND_CONSTRUCTBIND */ /*_.VALCLO___V1559*/ meltfptr[1558] = (melt_ptr_t) & cdat->dclo_1388__NORMBIND_CONSTRUCTBIND; cdat->dclo_1388__NORMBIND_CONSTRUCTBIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1388__NORMBIND_CONSTRUCTBIND.nbval = 0; /*inirout drout_1389__NORMEXP_SYMBOL */ /*_.VALROUT___V1560*/ meltfptr[1559] = (melt_ptr_t) & cdat->drout_1389__NORMEXP_SYMBOL; cdat->drout_1389__NORMEXP_SYMBOL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1389__NORMEXP_SYMBOL.routdescr, "NORMEXP_SYMBOL @warmelt-normal.melt:1540", MELT_ROUTDESCR_LEN - 1); cdat->drout_1389__NORMEXP_SYMBOL.nbval = 33; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1389__NORMEXP_SYMBOL, meltrout_32_warmelt_normal_NORMEXP_SYMBOL); /*iniclos dclo_1390__NORMEXP_SYMBOL */ /*_.VALCLO___V1571*/ meltfptr[1570] = (melt_ptr_t) & cdat->dclo_1390__NORMEXP_SYMBOL; cdat->dclo_1390__NORMEXP_SYMBOL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1390__NORMEXP_SYMBOL.nbval = 0; /*iniobj dsym_1391__FIND_ENCLOSING_ENV*/ /*uniqueobj*/ if (! /*_.VALDATA___V1572*/ meltfptr[1571]) /*_.VALDATA___V1572*/ meltfptr[1571] = (melt_ptr_t) & cdat->dsym_1391__FIND_ENCLOSING_ENV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1391__FIND_ENCLOSING_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_1391__FIND_ENCLOSING_ENV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1391__FIND_ENCLOSING_ENV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1391__FIND_ENCLOSING_ENV.obj_hash = 227770701; cdat->dsym_1391__FIND_ENCLOSING_ENV.obj_len = 3; /*inistring dstr_1392__FIND_ENCLOSING_E*/ /*_.VALSTR___V1573*/ meltfptr[1572] = (melt_ptr_t) & cdat->dstr_1392__FIND_ENCLOSING_E; cdat->dstr_1392__FIND_ENCLOSING_E.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1392__FIND_ENCLOSING_E.val, "FIND_ENCLOSING_ENV", sizeof (cdat->dstr_1392__FIND_ENCLOSING_E. val) - 1); cdat->dstr_1392__FIND_ENCLOSING_E.val[18] = (char) 0; cdat->dstr_1392__FIND_ENCLOSING_E.slen = 18; /*iniobj dsym_1393__CLASS_VALUE_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1574*/ meltfptr[1573]) /*_.VALDATA___V1574*/ meltfptr[1573] = (melt_ptr_t) & cdat->dsym_1393__CLASS_VALUE_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1393__CLASS_VALUE_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_1393__CLASS_VALUE_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1393__CLASS_VALUE_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1393__CLASS_VALUE_BINDING.obj_hash = 952021086; cdat->dsym_1393__CLASS_VALUE_BINDING.obj_len = 3; /*inistring dstr_1394__CLASS_VALUE_BIND*/ /*_.VALSTR___V1575*/ meltfptr[1574] = (melt_ptr_t) & cdat->dstr_1394__CLASS_VALUE_BIND; cdat->dstr_1394__CLASS_VALUE_BIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1394__CLASS_VALUE_BIND.val, "CLASS_VALUE_BINDING", sizeof (cdat->dstr_1394__CLASS_VALUE_BIND. val) - 1); cdat->dstr_1394__CLASS_VALUE_BIND.val[19] = (char) 0; cdat->dstr_1394__CLASS_VALUE_BIND.slen = 19; /*inirout drout_1395__LAMBDA_ */ /*_.VALROUT___V1565*/ meltfptr[1564] = (melt_ptr_t) & cdat->drout_1395__LAMBDA_; cdat->drout_1395__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1395__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:1616", MELT_ROUTDESCR_LEN - 1); cdat->drout_1395__LAMBDA_.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1395__LAMBDA_, meltrout_33_warmelt_normal_LAMBDA___6__); /*inirout drout_1396__LAMBDA_ */ /*_.VALROUT___V1566*/ meltfptr[1565] = (melt_ptr_t) & cdat->drout_1396__LAMBDA_; cdat->drout_1396__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1396__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:1623", MELT_ROUTDESCR_LEN - 1); cdat->drout_1396__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1396__LAMBDA_, meltrout_34_warmelt_normal_LAMBDA___7__); /*inirout drout_1397__LAMBDA_ */ /*_.VALROUT___V1567*/ meltfptr[1566] = (melt_ptr_t) & cdat->drout_1397__LAMBDA_; cdat->drout_1397__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1397__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:1672", MELT_ROUTDESCR_LEN - 1); cdat->drout_1397__LAMBDA_.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1397__LAMBDA_, meltrout_35_warmelt_normal_LAMBDA___8__); /*inirout drout_1398__LAMBDA_ */ /*_.VALROUT___V1568*/ meltfptr[1567] = (melt_ptr_t) & cdat->drout_1398__LAMBDA_; cdat->drout_1398__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1398__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:1679", MELT_ROUTDESCR_LEN - 1); cdat->drout_1398__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1398__LAMBDA_, meltrout_36_warmelt_normal_LAMBDA___9__); /*inirout drout_1399__LAMBDA_ */ /*_.VALROUT___V1569*/ meltfptr[1568] = (melt_ptr_t) & cdat->drout_1399__LAMBDA_; cdat->drout_1399__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1399__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:1701", MELT_ROUTDESCR_LEN - 1); cdat->drout_1399__LAMBDA_.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1399__LAMBDA_, meltrout_37_warmelt_normal_LAMBDA___10__); /*inirout drout_1400__LAMBDA_ */ /*_.VALROUT___V1570*/ meltfptr[1569] = (melt_ptr_t) & cdat->drout_1400__LAMBDA_; cdat->drout_1400__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1400__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:1707", MELT_ROUTDESCR_LEN - 1); cdat->drout_1400__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1400__LAMBDA_, meltrout_38_warmelt_normal_LAMBDA___11__); /*inirout drout_1401__GECTYP_SYMOCC */ /*_.VALROUT___V1576*/ meltfptr[1575] = (melt_ptr_t) & cdat->drout_1401__GECTYP_SYMOCC; cdat->drout_1401__GECTYP_SYMOCC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1401__GECTYP_SYMOCC.routdescr, "GECTYP_SYMOCC @warmelt-normal.melt:1730", MELT_ROUTDESCR_LEN - 1); cdat->drout_1401__GECTYP_SYMOCC.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1401__GECTYP_SYMOCC, meltrout_39_warmelt_normal_GECTYP_SYMOCC); /*iniclos dclo_1402__GECTYP_SYMOCC */ /*_.VALCLO___V1577*/ meltfptr[1576] = (melt_ptr_t) & cdat->dclo_1402__GECTYP_SYMOCC; cdat->dclo_1402__GECTYP_SYMOCC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1402__GECTYP_SYMOCC.nbval = 0; /*inirout drout_1403__NORMEXP_CLASS */ /*_.VALROUT___V1578*/ meltfptr[1577] = (melt_ptr_t) & cdat->drout_1403__NORMEXP_CLASS; cdat->drout_1403__NORMEXP_CLASS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1403__NORMEXP_CLASS.routdescr, "NORMEXP_CLASS @warmelt-normal.melt:1740", MELT_ROUTDESCR_LEN - 1); cdat->drout_1403__NORMEXP_CLASS.nbval = 11; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1403__NORMEXP_CLASS, meltrout_40_warmelt_normal_NORMEXP_CLASS); /*iniclos dclo_1404__NORMEXP_CLASS */ /*_.VALCLO___V1579*/ meltfptr[1578] = (melt_ptr_t) & cdat->dclo_1404__NORMEXP_CLASS; cdat->dclo_1404__NORMEXP_CLASS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1404__NORMEXP_CLASS.nbval = 0; /*iniobj dsym_1405__FIND_ENV*/ /*uniqueobj*/ if (! /*_.VALDATA___V1580*/ meltfptr[1579]) /*_.VALDATA___V1580*/ meltfptr[1579] = (melt_ptr_t) & cdat->dsym_1405__FIND_ENV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1405__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_1405__FIND_ENV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1405__FIND_ENV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1405__FIND_ENV.obj_hash = 233459738; cdat->dsym_1405__FIND_ENV.obj_len = 3; /*inistring dstr_1406__FIND_ENV*/ /*_.VALSTR___V1581*/ meltfptr[1580] = (melt_ptr_t) & cdat->dstr_1406__FIND_ENV; cdat->dstr_1406__FIND_ENV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1406__FIND_ENV.val, "FIND_ENV", sizeof (cdat->dstr_1406__FIND_ENV.val) - 1); cdat->dstr_1406__FIND_ENV.val[8] = (char) 0; cdat->dstr_1406__FIND_ENV.slen = 8; /*iniobj dsym_1407__CLASS_CLASS_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1582*/ meltfptr[1581]) /*_.VALDATA___V1582*/ meltfptr[1581] = (melt_ptr_t) & cdat->dsym_1407__CLASS_CLASS_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1407__CLASS_CLASS_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_1407__CLASS_CLASS_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1407__CLASS_CLASS_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1407__CLASS_CLASS_BINDING.obj_hash = 848133131; cdat->dsym_1407__CLASS_CLASS_BINDING.obj_len = 3; /*inistring dstr_1408__CLASS_CLASS_BIND*/ /*_.VALSTR___V1583*/ meltfptr[1582] = (melt_ptr_t) & cdat->dstr_1408__CLASS_CLASS_BIND; cdat->dstr_1408__CLASS_CLASS_BIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1408__CLASS_CLASS_BIND.val, "CLASS_CLASS_BINDING", sizeof (cdat->dstr_1408__CLASS_CLASS_BIND. val) - 1); cdat->dstr_1408__CLASS_CLASS_BIND.val[19] = (char) 0; cdat->dstr_1408__CLASS_CLASS_BIND.slen = 19; /*inirout drout_1409__NORMEXP_PRIMITIVE */ /*_.VALROUT___V1584*/ meltfptr[1583] = (melt_ptr_t) & cdat->drout_1409__NORMEXP_PRIMITIVE; cdat->drout_1409__NORMEXP_PRIMITIVE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1409__NORMEXP_PRIMITIVE.routdescr, "NORMEXP_PRIMITIVE @warmelt-normal.melt:1784", MELT_ROUTDESCR_LEN - 1); cdat->drout_1409__NORMEXP_PRIMITIVE.nbval = 25; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1409__NORMEXP_PRIMITIVE, meltrout_41_warmelt_normal_NORMEXP_PRIMITIVE); /*iniclos dclo_1410__NORMEXP_PRIMITIVE */ /*_.VALCLO___V1587*/ meltfptr[1586] = (melt_ptr_t) & cdat->dclo_1410__NORMEXP_PRIMITIVE; cdat->dclo_1410__NORMEXP_PRIMITIVE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1410__NORMEXP_PRIMITIVE.nbval = 0; /*iniobj dsym_1411__CLASS_SOURCE_PRIMITIVE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1588*/ meltfptr[1587]) /*_.VALDATA___V1588*/ meltfptr[1587] = (melt_ptr_t) & cdat->dsym_1411__CLASS_SOURCE_PRIMITIVE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1411__CLASS_SOURCE_PRIMITIVE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1411__CLASS_SOURCE_PRIMITIVE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1411__CLASS_SOURCE_PRIMITIVE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1411__CLASS_SOURCE_PRIMITIVE.obj_hash = 683295797; cdat->dsym_1411__CLASS_SOURCE_PRIMITIVE.obj_len = 3; /*inistring dstr_1412__CLASS_SOURCE_PRI*/ /*_.VALSTR___V1589*/ meltfptr[1588] = (melt_ptr_t) & cdat->dstr_1412__CLASS_SOURCE_PRI; cdat->dstr_1412__CLASS_SOURCE_PRI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1412__CLASS_SOURCE_PRI.val, "CLASS_SOURCE_PRIMITIVE", sizeof (cdat->dstr_1412__CLASS_SOURCE_PRI. val) - 1); cdat->dstr_1412__CLASS_SOURCE_PRI.val[22] = (char) 0; cdat->dstr_1412__CLASS_SOURCE_PRI.slen = 22; /*inirout drout_1413__LAMBDA_ */ /*_.VALROUT___V1585*/ meltfptr[1584] = (melt_ptr_t) & cdat->drout_1413__LAMBDA_; cdat->drout_1413__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1413__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:1816", MELT_ROUTDESCR_LEN - 1); cdat->drout_1413__LAMBDA_.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1413__LAMBDA_, meltrout_42_warmelt_normal_LAMBDA___12__); /*inirout drout_1414__LAMBDA_ */ /*_.VALROUT___V1586*/ meltfptr[1585] = (melt_ptr_t) & cdat->drout_1414__LAMBDA_; cdat->drout_1414__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1414__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:1843", MELT_ROUTDESCR_LEN - 1); cdat->drout_1414__LAMBDA_.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1414__LAMBDA_, meltrout_43_warmelt_normal_LAMBDA___13__); /*iniobj dsym_1415__CLONE_SYMBOL*/ /*uniqueobj*/ if (! /*_.VALDATA___V1590*/ meltfptr[1589]) /*_.VALDATA___V1590*/ meltfptr[1589] = (melt_ptr_t) & cdat->dsym_1415__CLONE_SYMBOL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1415__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_1415__CLONE_SYMBOL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1415__CLONE_SYMBOL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1415__CLONE_SYMBOL.obj_hash = 213258240; cdat->dsym_1415__CLONE_SYMBOL.obj_len = 3; /*inistring dstr_1416__CLONE_SYMBOL*/ /*_.VALSTR___V1591*/ meltfptr[1590] = (melt_ptr_t) & cdat->dstr_1416__CLONE_SYMBOL; cdat->dstr_1416__CLONE_SYMBOL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1416__CLONE_SYMBOL.val, "CLONE_SYMBOL", sizeof (cdat->dstr_1416__CLONE_SYMBOL.val) - 1); cdat->dstr_1416__CLONE_SYMBOL.val[12] = (char) 0; cdat->dstr_1416__CLONE_SYMBOL.slen = 12; /*inirout drout_1417__NORMEXP_CODE_CHUNK */ /*_.VALROUT___V1592*/ meltfptr[1591] = (melt_ptr_t) & cdat->drout_1417__NORMEXP_CODE_CHUNK; cdat->drout_1417__NORMEXP_CODE_CHUNK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1417__NORMEXP_CODE_CHUNK.routdescr, "NORMEXP_CODE_CHUNK @warmelt-normal.melt:1909", MELT_ROUTDESCR_LEN - 1); cdat->drout_1417__NORMEXP_CODE_CHUNK.nbval = 17; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1417__NORMEXP_CODE_CHUNK, meltrout_44_warmelt_normal_NORMEXP_CODE_CHUNK); /*iniclos dclo_1418__NORMEXP_CODE_CHUNK */ /*_.VALCLO___V1594*/ meltfptr[1593] = (melt_ptr_t) & cdat->dclo_1418__NORMEXP_CODE_CHUNK; cdat->dclo_1418__NORMEXP_CODE_CHUNK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1418__NORMEXP_CODE_CHUNK.nbval = 0; /*iniobj dsym_1419__CLASS_SOURCE_CODECHUNK*/ /*uniqueobj*/ if (! /*_.VALDATA___V1595*/ meltfptr[1594]) /*_.VALDATA___V1595*/ meltfptr[1594] = (melt_ptr_t) & cdat->dsym_1419__CLASS_SOURCE_CODECHUNK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1419__CLASS_SOURCE_CODECHUNK", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1419__CLASS_SOURCE_CODECHUNK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1419__CLASS_SOURCE_CODECHUNK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1419__CLASS_SOURCE_CODECHUNK.obj_hash = 935873793; cdat->dsym_1419__CLASS_SOURCE_CODECHUNK.obj_len = 3; /*inistring dstr_1420__CLASS_SOURCE_COD*/ /*_.VALSTR___V1596*/ meltfptr[1595] = (melt_ptr_t) & cdat->dstr_1420__CLASS_SOURCE_COD; cdat->dstr_1420__CLASS_SOURCE_COD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1420__CLASS_SOURCE_COD.val, "CLASS_SOURCE_CODECHUNK", sizeof (cdat->dstr_1420__CLASS_SOURCE_COD. val) - 1); cdat->dstr_1420__CLASS_SOURCE_COD.val[22] = (char) 0; cdat->dstr_1420__CLASS_SOURCE_COD.slen = 22; /*iniobj dsym_1421__CLASS_CLONED_SYMBOL*/ /*uniqueobj*/ if (! /*_.VALDATA___V1597*/ meltfptr[1596]) /*_.VALDATA___V1597*/ meltfptr[1596] = (melt_ptr_t) & cdat->dsym_1421__CLASS_CLONED_SYMBOL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1421__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_1421__CLASS_CLONED_SYMBOL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1421__CLASS_CLONED_SYMBOL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1421__CLASS_CLONED_SYMBOL.obj_hash = 933549728; cdat->dsym_1421__CLASS_CLONED_SYMBOL.obj_len = 3; /*inistring dstr_1422__CLASS_CLONED_SYM*/ /*_.VALSTR___V1598*/ meltfptr[1597] = (melt_ptr_t) & cdat->dstr_1422__CLASS_CLONED_SYM; cdat->dstr_1422__CLASS_CLONED_SYM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1422__CLASS_CLONED_SYM.val, "CLASS_CLONED_SYMBOL", sizeof (cdat->dstr_1422__CLASS_CLONED_SYM. val) - 1); cdat->dstr_1422__CLASS_CLONED_SYM.val[19] = (char) 0; cdat->dstr_1422__CLASS_CLONED_SYM.slen = 19; /*inirout drout_1423__LAMBDA_ */ /*_.VALROUT___V1593*/ meltfptr[1592] = (melt_ptr_t) & cdat->drout_1423__LAMBDA_; cdat->drout_1423__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1423__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:1926", MELT_ROUTDESCR_LEN - 1); cdat->drout_1423__LAMBDA_.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1423__LAMBDA_, meltrout_45_warmelt_normal_LAMBDA___14__); /*inirout drout_1424__NORMEXP_CMATCHEXPR */ /*_.VALROUT___V1599*/ meltfptr[1598] = (melt_ptr_t) & cdat->drout_1424__NORMEXP_CMATCHEXPR; cdat->drout_1424__NORMEXP_CMATCHEXPR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1424__NORMEXP_CMATCHEXPR.routdescr, "NORMEXP_CMATCHEXPR @warmelt-normal.melt:1960", MELT_ROUTDESCR_LEN - 1); cdat->drout_1424__NORMEXP_CMATCHEXPR.nbval = 25; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1424__NORMEXP_CMATCHEXPR, meltrout_46_warmelt_normal_NORMEXP_CMATCHEXPR); /*iniclos dclo_1425__NORMEXP_CMATCHEXPR */ /*_.VALCLO___V1602*/ meltfptr[1601] = (melt_ptr_t) & cdat->dclo_1425__NORMEXP_CMATCHEXPR; cdat->dclo_1425__NORMEXP_CMATCHEXPR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1425__NORMEXP_CMATCHEXPR.nbval = 0; /*iniobj dsym_1426__CLASS_SOURCE_CMATCHEXPR*/ /*uniqueobj*/ if (! /*_.VALDATA___V1603*/ meltfptr[1602]) /*_.VALDATA___V1603*/ meltfptr[1602] = (melt_ptr_t) & cdat->dsym_1426__CLASS_SOURCE_CMATCHEXPR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1426__CLASS_SOURCE_CMATCHEXPR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1426__CLASS_SOURCE_CMATCHEXPR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1426__CLASS_SOURCE_CMATCHEXPR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1426__CLASS_SOURCE_CMATCHEXPR.obj_hash = 558397590; cdat->dsym_1426__CLASS_SOURCE_CMATCHEXPR.obj_len = 3; /*inistring dstr_1427__CLASS_SOURCE_CMA*/ /*_.VALSTR___V1604*/ meltfptr[1603] = (melt_ptr_t) & cdat->dstr_1427__CLASS_SOURCE_CMA; cdat->dstr_1427__CLASS_SOURCE_CMA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1427__CLASS_SOURCE_CMA.val, "CLASS_SOURCE_CMATCHEXPR", sizeof (cdat->dstr_1427__CLASS_SOURCE_CMA. val) - 1); cdat->dstr_1427__CLASS_SOURCE_CMA.val[23] = (char) 0; cdat->dstr_1427__CLASS_SOURCE_CMA.slen = 23; /*inirout drout_1428__LAMBDA_ */ /*_.VALROUT___V1600*/ meltfptr[1599] = (melt_ptr_t) & cdat->drout_1428__LAMBDA_; cdat->drout_1428__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1428__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:1998", MELT_ROUTDESCR_LEN - 1); cdat->drout_1428__LAMBDA_.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1428__LAMBDA_, meltrout_47_warmelt_normal_LAMBDA___15__); /*inirout drout_1429__LAMBDA_ */ /*_.VALROUT___V1601*/ meltfptr[1600] = (melt_ptr_t) & cdat->drout_1429__LAMBDA_; cdat->drout_1429__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1429__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:2025", MELT_ROUTDESCR_LEN - 1); cdat->drout_1429__LAMBDA_.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1429__LAMBDA_, meltrout_48_warmelt_normal_LAMBDA___16__); /*inirout drout_1430__NORMEXP_FUNMATCHEXPR */ /*_.VALROUT___V1605*/ meltfptr[1604] = (melt_ptr_t) & cdat->drout_1430__NORMEXP_FUNMATCHEXPR; cdat->drout_1430__NORMEXP_FUNMATCHEXPR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1430__NORMEXP_FUNMATCHEXPR.routdescr, "NORMEXP_FUNMATCHEXPR @warmelt-normal.melt:2090", MELT_ROUTDESCR_LEN - 1); cdat->drout_1430__NORMEXP_FUNMATCHEXPR.nbval = 19; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1430__NORMEXP_FUNMATCHEXPR, meltrout_49_warmelt_normal_NORMEXP_FUNMATCHEXPR); /*iniclos dclo_1431__NORMEXP_FUNMATCHEXPR */ /*_.VALCLO___V1606*/ meltfptr[1605] = (melt_ptr_t) & cdat->dclo_1431__NORMEXP_FUNMATCHEXPR; cdat->dclo_1431__NORMEXP_FUNMATCHEXPR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1431__NORMEXP_FUNMATCHEXPR.nbval = 0; /*iniobj dsym_1432__CLASS_SOURCE_FUNMATCHEXPR*/ /*uniqueobj*/ if (! /*_.VALDATA___V1607*/ meltfptr[1606]) /*_.VALDATA___V1607*/ meltfptr[1606] = (melt_ptr_t) & cdat->dsym_1432__CLASS_SOURCE_FUNMATCHEXPR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1432__CLASS_SOURCE_FUNMATCHEXPR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1432__CLASS_SOURCE_FUNMATCHEXPR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1432__CLASS_SOURCE_FUNMATCHEXPR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1432__CLASS_SOURCE_FUNMATCHEXPR.obj_hash = 443076985; cdat->dsym_1432__CLASS_SOURCE_FUNMATCHEXPR.obj_len = 3; /*inistring dstr_1433__CLASS_SOURCE_FUN*/ /*_.VALSTR___V1608*/ meltfptr[1607] = (melt_ptr_t) & cdat->dstr_1433__CLASS_SOURCE_FUN; cdat->dstr_1433__CLASS_SOURCE_FUN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1433__CLASS_SOURCE_FUN.val, "CLASS_SOURCE_FUNMATCHEXPR", sizeof (cdat->dstr_1433__CLASS_SOURCE_FUN. val) - 1); cdat->dstr_1433__CLASS_SOURCE_FUN.val[25] = (char) 0; cdat->dstr_1433__CLASS_SOURCE_FUN.slen = 25; /*iniobj dsym_1434__FMATCH_APPLYF*/ /*uniqueobj*/ if (! /*_.VALDATA___V1609*/ meltfptr[1608]) /*_.VALDATA___V1609*/ meltfptr[1608] = (melt_ptr_t) & cdat->dsym_1434__FMATCH_APPLYF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1434__FMATCH_APPLYF", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1434__FMATCH_APPLYF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1434__FMATCH_APPLYF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1434__FMATCH_APPLYF.obj_hash = 864684349; cdat->dsym_1434__FMATCH_APPLYF.obj_len = 3; /*inistring dstr_1435__FMATCH_APPLYF*/ /*_.VALSTR___V1610*/ meltfptr[1609] = (melt_ptr_t) & cdat->dstr_1435__FMATCH_APPLYF; cdat->dstr_1435__FMATCH_APPLYF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1435__FMATCH_APPLYF.val, "FMATCH_APPLYF", sizeof (cdat->dstr_1435__FMATCH_APPLYF.val) - 1); cdat->dstr_1435__FMATCH_APPLYF.val[13] = (char) 0; cdat->dstr_1435__FMATCH_APPLYF.slen = 13; /*iniobj dsym_1436__LIST_APPEND2LIST*/ /*uniqueobj*/ if (! /*_.VALDATA___V1611*/ meltfptr[1610]) /*_.VALDATA___V1611*/ meltfptr[1610] = (melt_ptr_t) & cdat->dsym_1436__LIST_APPEND2LIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1436__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_1436__LIST_APPEND2LIST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1436__LIST_APPEND2LIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1436__LIST_APPEND2LIST.obj_hash = 744841630; cdat->dsym_1436__LIST_APPEND2LIST.obj_len = 3; /*inistring dstr_1437__LIST_APPEND2LIST*/ /*_.VALSTR___V1612*/ meltfptr[1611] = (melt_ptr_t) & cdat->dstr_1437__LIST_APPEND2LIST; cdat->dstr_1437__LIST_APPEND2LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1437__LIST_APPEND2LIST.val, "LIST_APPEND2LIST", sizeof (cdat->dstr_1437__LIST_APPEND2LIST. val) - 1); cdat->dstr_1437__LIST_APPEND2LIST.val[16] = (char) 0; cdat->dstr_1437__LIST_APPEND2LIST.slen = 16; /*inirout drout_1438__NORMEXP_APPLY */ /*_.VALROUT___V1613*/ meltfptr[1612] = (melt_ptr_t) & cdat->drout_1438__NORMEXP_APPLY; cdat->drout_1438__NORMEXP_APPLY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1438__NORMEXP_APPLY.routdescr, "NORMEXP_APPLY @warmelt-normal.melt:2162", MELT_ROUTDESCR_LEN - 1); cdat->drout_1438__NORMEXP_APPLY.nbval = 20; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1438__NORMEXP_APPLY, meltrout_50_warmelt_normal_NORMEXP_APPLY); /*iniclos dclo_1439__NORMEXP_APPLY */ /*_.VALCLO___V1616*/ meltfptr[1615] = (melt_ptr_t) & cdat->dclo_1439__NORMEXP_APPLY; cdat->dclo_1439__NORMEXP_APPLY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1439__NORMEXP_APPLY.nbval = 0; /*iniobj dsym_1440__CLASS_SOURCE_APPLY*/ /*uniqueobj*/ if (! /*_.VALDATA___V1617*/ meltfptr[1616]) /*_.VALDATA___V1617*/ meltfptr[1616] = (melt_ptr_t) & cdat->dsym_1440__CLASS_SOURCE_APPLY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1440__CLASS_SOURCE_APPLY", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1440__CLASS_SOURCE_APPLY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1440__CLASS_SOURCE_APPLY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1440__CLASS_SOURCE_APPLY.obj_hash = 908584793; cdat->dsym_1440__CLASS_SOURCE_APPLY.obj_len = 3; /*inistring dstr_1441__CLASS_SOURCE_APP*/ /*_.VALSTR___V1618*/ meltfptr[1617] = (melt_ptr_t) & cdat->dstr_1441__CLASS_SOURCE_APP; cdat->dstr_1441__CLASS_SOURCE_APP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1441__CLASS_SOURCE_APP.val, "CLASS_SOURCE_APPLY", sizeof (cdat->dstr_1441__CLASS_SOURCE_APP. val) - 1); cdat->dstr_1441__CLASS_SOURCE_APP.val[18] = (char) 0; cdat->dstr_1441__CLASS_SOURCE_APP.slen = 18; /*iniobj dsym_1442__FUN_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1614*/ meltfptr[1613]) /*_.VALDATA___V1614*/ meltfptr[1613] = (melt_ptr_t) & cdat->dsym_1442__FUN_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1442__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_1442__FUN_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1442__FUN_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1442__FUN_.obj_hash = 12751726; cdat->dsym_1442__FUN_.obj_len = 3; /*inistring dstr_1443__FUN_*/ /*_.VALSTR___V1615*/ meltfptr[1614] = (melt_ptr_t) & cdat->dstr_1443__FUN_; cdat->dstr_1443__FUN_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1443__FUN_.val, "_FUN_", sizeof (cdat->dstr_1443__FUN_.val) - 1); cdat->dstr_1443__FUN_.val[5] = (char) 0; cdat->dstr_1443__FUN_.slen = 5; /*inirout drout_1444__NORMEXP_MSEND */ /*_.VALROUT___V1619*/ meltfptr[1618] = (melt_ptr_t) & cdat->drout_1444__NORMEXP_MSEND; cdat->drout_1444__NORMEXP_MSEND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1444__NORMEXP_MSEND.routdescr, "NORMEXP_MSEND @warmelt-normal.melt:2256", MELT_ROUTDESCR_LEN - 1); cdat->drout_1444__NORMEXP_MSEND.nbval = 27; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1444__NORMEXP_MSEND, meltrout_51_warmelt_normal_NORMEXP_MSEND); /*iniclos dclo_1445__NORMEXP_MSEND */ /*_.VALCLO___V1620*/ meltfptr[1619] = (melt_ptr_t) & cdat->dclo_1445__NORMEXP_MSEND; cdat->dclo_1445__NORMEXP_MSEND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1445__NORMEXP_MSEND.nbval = 0; /*iniobj dsym_1446__CLASS_SOURCE_MSEND*/ /*uniqueobj*/ if (! /*_.VALDATA___V1621*/ meltfptr[1620]) /*_.VALDATA___V1621*/ meltfptr[1620] = (melt_ptr_t) & cdat->dsym_1446__CLASS_SOURCE_MSEND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1446__CLASS_SOURCE_MSEND", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1446__CLASS_SOURCE_MSEND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1446__CLASS_SOURCE_MSEND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1446__CLASS_SOURCE_MSEND.obj_hash = 115197475; cdat->dsym_1446__CLASS_SOURCE_MSEND.obj_len = 3; /*inistring dstr_1447__CLASS_SOURCE_MSE*/ /*_.VALSTR___V1622*/ meltfptr[1621] = (melt_ptr_t) & cdat->dstr_1447__CLASS_SOURCE_MSE; cdat->dstr_1447__CLASS_SOURCE_MSE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1447__CLASS_SOURCE_MSE.val, "CLASS_SOURCE_MSEND", sizeof (cdat->dstr_1447__CLASS_SOURCE_MSE. val) - 1); cdat->dstr_1447__CLASS_SOURCE_MSE.val[18] = (char) 0; cdat->dstr_1447__CLASS_SOURCE_MSE.slen = 18; /*iniobj dsym_1448__CLASS_SELECTOR_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1623*/ meltfptr[1622]) /*_.VALDATA___V1623*/ meltfptr[1622] = (melt_ptr_t) & cdat->dsym_1448__CLASS_SELECTOR_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1448__CLASS_SELECTOR_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_1448__CLASS_SELECTOR_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1448__CLASS_SELECTOR_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1448__CLASS_SELECTOR_BINDING.obj_hash = 80713028; cdat->dsym_1448__CLASS_SELECTOR_BINDING.obj_len = 3; /*inistring dstr_1449__CLASS_SELECTOR_B*/ /*_.VALSTR___V1624*/ meltfptr[1623] = (melt_ptr_t) & cdat->dstr_1449__CLASS_SELECTOR_B; cdat->dstr_1449__CLASS_SELECTOR_B.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1449__CLASS_SELECTOR_B.val, "CLASS_SELECTOR_BINDING", sizeof (cdat->dstr_1449__CLASS_SELECTOR_B. val) - 1); cdat->dstr_1449__CLASS_SELECTOR_B.val[22] = (char) 0; cdat->dstr_1449__CLASS_SELECTOR_B.slen = 22; /*iniobj dsym_1450__CLASS_SOURCE_DEFSELECTOR*/ /*uniqueobj*/ if (! /*_.VALDATA___V1625*/ meltfptr[1624]) /*_.VALDATA___V1625*/ meltfptr[1624] = (melt_ptr_t) & cdat->dsym_1450__CLASS_SOURCE_DEFSELECTOR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1450__CLASS_SOURCE_DEFSELECTOR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1450__CLASS_SOURCE_DEFSELECTOR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1450__CLASS_SOURCE_DEFSELECTOR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1450__CLASS_SOURCE_DEFSELECTOR.obj_hash = 2178050; cdat->dsym_1450__CLASS_SOURCE_DEFSELECTOR.obj_len = 3; /*inistring dstr_1451__CLASS_SOURCE_DEF*/ /*_.VALSTR___V1626*/ meltfptr[1625] = (melt_ptr_t) & cdat->dstr_1451__CLASS_SOURCE_DEF; cdat->dstr_1451__CLASS_SOURCE_DEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1451__CLASS_SOURCE_DEF.val, "CLASS_SOURCE_DEFSELECTOR", sizeof (cdat->dstr_1451__CLASS_SOURCE_DEF. val) - 1); cdat->dstr_1451__CLASS_SOURCE_DEF.val[24] = (char) 0; cdat->dstr_1451__CLASS_SOURCE_DEF.slen = 24; /*inirout drout_1452__NORMEXP_RETURN */ /*_.VALROUT___V1627*/ meltfptr[1626] = (melt_ptr_t) & cdat->drout_1452__NORMEXP_RETURN; cdat->drout_1452__NORMEXP_RETURN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1452__NORMEXP_RETURN.routdescr, "NORMEXP_RETURN @warmelt-normal.melt:2382", MELT_ROUTDESCR_LEN - 1); cdat->drout_1452__NORMEXP_RETURN.nbval = 19; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1452__NORMEXP_RETURN, meltrout_52_warmelt_normal_NORMEXP_RETURN); /*iniclos dclo_1453__NORMEXP_RETURN */ /*_.VALCLO___V1632*/ meltfptr[1631] = (melt_ptr_t) & cdat->dclo_1453__NORMEXP_RETURN; cdat->dclo_1453__NORMEXP_RETURN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1453__NORMEXP_RETURN.nbval = 0; /*iniobj dsym_1454__CLASS_SOURCE_RETURN*/ /*uniqueobj*/ if (! /*_.VALDATA___V1633*/ meltfptr[1632]) /*_.VALDATA___V1633*/ meltfptr[1632] = (melt_ptr_t) & cdat->dsym_1454__CLASS_SOURCE_RETURN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1454__CLASS_SOURCE_RETURN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1454__CLASS_SOURCE_RETURN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1454__CLASS_SOURCE_RETURN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1454__CLASS_SOURCE_RETURN.obj_hash = 288930130; cdat->dsym_1454__CLASS_SOURCE_RETURN.obj_len = 3; /*inistring dstr_1455__CLASS_SOURCE_RET*/ /*_.VALSTR___V1634*/ meltfptr[1633] = (melt_ptr_t) & cdat->dstr_1455__CLASS_SOURCE_RET; cdat->dstr_1455__CLASS_SOURCE_RET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1455__CLASS_SOURCE_RET.val, "CLASS_SOURCE_RETURN", sizeof (cdat->dstr_1455__CLASS_SOURCE_RET. val) - 1); cdat->dstr_1455__CLASS_SOURCE_RET.val[19] = (char) 0; cdat->dstr_1455__CLASS_SOURCE_RET.slen = 19; /*iniobj dsym_1456__RETURN_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1628*/ meltfptr[1627]) /*_.VALDATA___V1628*/ meltfptr[1627] = (melt_ptr_t) & cdat->dsym_1456__RETURN_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1456__RETURN_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1456__RETURN_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1456__RETURN_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1456__RETURN_.obj_hash = 75463444; cdat->dsym_1456__RETURN_.obj_len = 3; /*inistring dstr_1457__RETURN_*/ /*_.VALSTR___V1629*/ meltfptr[1628] = (melt_ptr_t) & cdat->dstr_1457__RETURN_; cdat->dstr_1457__RETURN_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1457__RETURN_.val, "RETURN_", sizeof (cdat->dstr_1457__RETURN_.val) - 1); cdat->dstr_1457__RETURN_.val[7] = (char) 0; cdat->dstr_1457__RETURN_.slen = 7; /*iniobj dsym_1458__RETINT_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1630*/ meltfptr[1629]) /*_.VALDATA___V1630*/ meltfptr[1629] = (melt_ptr_t) & cdat->dsym_1458__RETINT_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1458__RETINT_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1458__RETINT_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1458__RETINT_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1458__RETINT_.obj_hash = 1023710138; cdat->dsym_1458__RETINT_.obj_len = 3; /*inistring dstr_1459__RETINT_*/ /*_.VALSTR___V1631*/ meltfptr[1630] = (melt_ptr_t) & cdat->dstr_1459__RETINT_; cdat->dstr_1459__RETINT_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1459__RETINT_.val, "_RETINT_", sizeof (cdat->dstr_1459__RETINT_.val) - 1); cdat->dstr_1459__RETINT_.val[8] = (char) 0; cdat->dstr_1459__RETINT_.slen = 8; /*inirout drout_1460__NORMEXP_IF */ /*_.VALROUT___V1635*/ meltfptr[1634] = (melt_ptr_t) & cdat->drout_1460__NORMEXP_IF; cdat->drout_1460__NORMEXP_IF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1460__NORMEXP_IF.routdescr, "NORMEXP_IF @warmelt-normal.melt:2470", MELT_ROUTDESCR_LEN - 1); cdat->drout_1460__NORMEXP_IF.nbval = 20; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1460__NORMEXP_IF, meltrout_53_warmelt_normal_NORMEXP_IF); /*iniclos dclo_1461__NORMEXP_IF */ /*_.VALCLO___V1641*/ meltfptr[1640] = (melt_ptr_t) & cdat->dclo_1461__NORMEXP_IF; cdat->dclo_1461__NORMEXP_IF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1461__NORMEXP_IF.nbval = 0; /*iniobj dsym_1462__CLASS_SOURCE_IF*/ /*uniqueobj*/ if (! /*_.VALDATA___V1642*/ meltfptr[1641]) /*_.VALDATA___V1642*/ meltfptr[1641] = (melt_ptr_t) & cdat->dsym_1462__CLASS_SOURCE_IF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1462__CLASS_SOURCE_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_1462__CLASS_SOURCE_IF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1462__CLASS_SOURCE_IF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1462__CLASS_SOURCE_IF.obj_hash = 852156504; cdat->dsym_1462__CLASS_SOURCE_IF.obj_len = 3; /*inistring dstr_1463__CLASS_SOURCE_IF*/ /*_.VALSTR___V1643*/ meltfptr[1642] = (melt_ptr_t) & cdat->dstr_1463__CLASS_SOURCE_IF; cdat->dstr_1463__CLASS_SOURCE_IF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1463__CLASS_SOURCE_IF.val, "CLASS_SOURCE_IF", sizeof (cdat->dstr_1463__CLASS_SOURCE_IF. val) - 1); cdat->dstr_1463__CLASS_SOURCE_IF.val[15] = (char) 0; cdat->dstr_1463__CLASS_SOURCE_IF.slen = 15; /*iniobj dsym_1464__IF_INTER_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1636*/ meltfptr[1635]) /*_.VALDATA___V1636*/ meltfptr[1635] = (melt_ptr_t) & cdat->dsym_1464__IF_INTER_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1464__IF_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_1464__IF_INTER_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1464__IF_INTER_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1464__IF_INTER_.obj_hash = 805875449; cdat->dsym_1464__IF_INTER_.obj_len = 3; /*inistring dstr_1465__IF_INTER_*/ /*_.VALSTR___V1637*/ meltfptr[1636] = (melt_ptr_t) & cdat->dstr_1465__IF_INTER_; cdat->dstr_1465__IF_INTER_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1465__IF_INTER_.val, "_IF_INTER_", sizeof (cdat->dstr_1465__IF_INTER_.val) - 1); cdat->dstr_1465__IF_INTER_.val[10] = (char) 0; cdat->dstr_1465__IF_INTER_.slen = 10; /*iniobj dsym_1466__FRESH_ENV*/ /*uniqueobj*/ if (! /*_.VALDATA___V1644*/ meltfptr[1643]) /*_.VALDATA___V1644*/ meltfptr[1643] = (melt_ptr_t) & cdat->dsym_1466__FRESH_ENV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1466__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_1466__FRESH_ENV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1466__FRESH_ENV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1466__FRESH_ENV.obj_hash = 1002363940; cdat->dsym_1466__FRESH_ENV.obj_len = 3; /*inistring dstr_1467__FRESH_ENV*/ /*_.VALSTR___V1645*/ meltfptr[1644] = (melt_ptr_t) & cdat->dstr_1467__FRESH_ENV; cdat->dstr_1467__FRESH_ENV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1467__FRESH_ENV.val, "FRESH_ENV", sizeof (cdat->dstr_1467__FRESH_ENV.val) - 1); cdat->dstr_1467__FRESH_ENV.val[9] = (char) 0; cdat->dstr_1467__FRESH_ENV.slen = 9; /*inirout drout_1468__LAMBDA_ */ /*_.VALROUT___V1638*/ meltfptr[1637] = (melt_ptr_t) & cdat->drout_1468__LAMBDA_; cdat->drout_1468__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1468__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:2509", MELT_ROUTDESCR_LEN - 1); cdat->drout_1468__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1468__LAMBDA_, meltrout_54_warmelt_normal_LAMBDA___17__); /*iniobj dsym_1469__PUT_ENV*/ /*uniqueobj*/ if (! /*_.VALDATA___V1646*/ meltfptr[1645]) /*_.VALDATA___V1646*/ meltfptr[1645] = (melt_ptr_t) & cdat->dsym_1469__PUT_ENV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1469__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_1469__PUT_ENV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1469__PUT_ENV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1469__PUT_ENV.obj_hash = 440202203; cdat->dsym_1469__PUT_ENV.obj_len = 3; /*inistring dstr_1470__PUT_ENV*/ /*_.VALSTR___V1647*/ meltfptr[1646] = (melt_ptr_t) & cdat->dstr_1470__PUT_ENV; cdat->dstr_1470__PUT_ENV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1470__PUT_ENV.val, "PUT_ENV", sizeof (cdat->dstr_1470__PUT_ENV.val) - 1); cdat->dstr_1470__PUT_ENV.val[7] = (char) 0; cdat->dstr_1470__PUT_ENV.slen = 7; /*iniobj dsym_1471__IF_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1639*/ meltfptr[1638]) /*_.VALDATA___V1639*/ meltfptr[1638] = (melt_ptr_t) & cdat->dsym_1471__IF_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1471__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_1471__IF_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1471__IF_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1471__IF_.obj_hash = 48638398; cdat->dsym_1471__IF_.obj_len = 3; /*inistring dstr_1472__IF_*/ /*_.VALSTR___V1640*/ meltfptr[1639] = (melt_ptr_t) & cdat->dstr_1472__IF_; cdat->dstr_1472__IF_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1472__IF_.val, "_IF_", sizeof (cdat->dstr_1472__IF_.val) - 1); cdat->dstr_1472__IF_.val[4] = (char) 0; cdat->dstr_1472__IF_.slen = 4; /*inirout drout_1473__NORMEXP_IFELSE */ /*_.VALROUT___V1648*/ meltfptr[1647] = (melt_ptr_t) & cdat->drout_1473__NORMEXP_IFELSE; cdat->drout_1473__NORMEXP_IFELSE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1473__NORMEXP_IFELSE.routdescr, "NORMEXP_IFELSE @warmelt-normal.melt:2545", MELT_ROUTDESCR_LEN - 1); cdat->drout_1473__NORMEXP_IFELSE.nbval = 23; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1473__NORMEXP_IFELSE, meltrout_55_warmelt_normal_NORMEXP_IFELSE); /*iniclos dclo_1474__NORMEXP_IFELSE */ /*_.VALCLO___V1655*/ meltfptr[1654] = (melt_ptr_t) & cdat->dclo_1474__NORMEXP_IFELSE; cdat->dclo_1474__NORMEXP_IFELSE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1474__NORMEXP_IFELSE.nbval = 0; /*iniobj dsym_1475__CLASS_SOURCE_IFELSE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1656*/ meltfptr[1655]) /*_.VALDATA___V1656*/ meltfptr[1655] = (melt_ptr_t) & cdat->dsym_1475__CLASS_SOURCE_IFELSE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1475__CLASS_SOURCE_IFELSE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1475__CLASS_SOURCE_IFELSE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1475__CLASS_SOURCE_IFELSE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1475__CLASS_SOURCE_IFELSE.obj_hash = 588500358; cdat->dsym_1475__CLASS_SOURCE_IFELSE.obj_len = 3; /*inistring dstr_1476__CLASS_SOURCE_IFE*/ /*_.VALSTR___V1657*/ meltfptr[1656] = (melt_ptr_t) & cdat->dstr_1476__CLASS_SOURCE_IFE; cdat->dstr_1476__CLASS_SOURCE_IFE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1476__CLASS_SOURCE_IFE.val, "CLASS_SOURCE_IFELSE", sizeof (cdat->dstr_1476__CLASS_SOURCE_IFE. val) - 1); cdat->dstr_1476__CLASS_SOURCE_IFE.val[19] = (char) 0; cdat->dstr_1476__CLASS_SOURCE_IFE.slen = 19; /*iniobj dsym_1477__IFELSE_INTER_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1649*/ meltfptr[1648]) /*_.VALDATA___V1649*/ meltfptr[1648] = (melt_ptr_t) & cdat->dsym_1477__IFELSE_INTER_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1477__IFELSE_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_1477__IFELSE_INTER_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1477__IFELSE_INTER_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1477__IFELSE_INTER_.obj_hash = 360328676; cdat->dsym_1477__IFELSE_INTER_.obj_len = 3; /*inistring dstr_1478__IFELSE_INTER_*/ /*_.VALSTR___V1650*/ meltfptr[1649] = (melt_ptr_t) & cdat->dstr_1478__IFELSE_INTER_; cdat->dstr_1478__IFELSE_INTER_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1478__IFELSE_INTER_.val, "_IFELSE_INTER_", sizeof (cdat->dstr_1478__IFELSE_INTER_.val) - 1); cdat->dstr_1478__IFELSE_INTER_.val[14] = (char) 0; cdat->dstr_1478__IFELSE_INTER_.slen = 14; /*inirout drout_1479__LAMBDA_ */ /*_.VALROUT___V1651*/ meltfptr[1650] = (melt_ptr_t) & cdat->drout_1479__LAMBDA_; cdat->drout_1479__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1479__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:2585", MELT_ROUTDESCR_LEN - 1); cdat->drout_1479__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1479__LAMBDA_, meltrout_56_warmelt_normal_LAMBDA___18__); /*inirout drout_1480__LAMBDA_ */ /*_.VALROUT___V1652*/ meltfptr[1651] = (melt_ptr_t) & cdat->drout_1480__LAMBDA_; cdat->drout_1480__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1480__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:2598", MELT_ROUTDESCR_LEN - 1); cdat->drout_1480__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1480__LAMBDA_, meltrout_57_warmelt_normal_LAMBDA___19__); /*iniobj dsym_1481__IFELSE_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1653*/ meltfptr[1652]) /*_.VALDATA___V1653*/ meltfptr[1652] = (melt_ptr_t) & cdat->dsym_1481__IFELSE_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1481__IFELSE_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1481__IFELSE_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1481__IFELSE_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1481__IFELSE_.obj_hash = 26502628; cdat->dsym_1481__IFELSE_.obj_len = 3; /*inistring dstr_1482__IFELSE_*/ /*_.VALSTR___V1654*/ meltfptr[1653] = (melt_ptr_t) & cdat->dstr_1482__IFELSE_; cdat->dstr_1482__IFELSE_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1482__IFELSE_.val, "_IFELSE_", sizeof (cdat->dstr_1482__IFELSE_.val) - 1); cdat->dstr_1482__IFELSE_.val[8] = (char) 0; cdat->dstr_1482__IFELSE_.slen = 8; /*inirout drout_1483__NORMEXP_CPPIF */ /*_.VALROUT___V1658*/ meltfptr[1657] = (melt_ptr_t) & cdat->drout_1483__NORMEXP_CPPIF; cdat->drout_1483__NORMEXP_CPPIF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1483__NORMEXP_CPPIF.routdescr, "NORMEXP_CPPIF @warmelt-normal.melt:2656", MELT_ROUTDESCR_LEN - 1); cdat->drout_1483__NORMEXP_CPPIF.nbval = 21; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1483__NORMEXP_CPPIF, meltrout_58_warmelt_normal_NORMEXP_CPPIF); /*iniclos dclo_1484__NORMEXP_CPPIF */ /*_.VALCLO___V1663*/ meltfptr[1662] = (melt_ptr_t) & cdat->dclo_1484__NORMEXP_CPPIF; cdat->dclo_1484__NORMEXP_CPPIF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1484__NORMEXP_CPPIF.nbval = 0; /*iniobj dsym_1485__CLASS_SOURCE_CPPIF*/ /*uniqueobj*/ if (! /*_.VALDATA___V1664*/ meltfptr[1663]) /*_.VALDATA___V1664*/ meltfptr[1663] = (melt_ptr_t) & cdat->dsym_1485__CLASS_SOURCE_CPPIF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1485__CLASS_SOURCE_CPPIF", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1485__CLASS_SOURCE_CPPIF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1485__CLASS_SOURCE_CPPIF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1485__CLASS_SOURCE_CPPIF.obj_hash = 179014183; cdat->dsym_1485__CLASS_SOURCE_CPPIF.obj_len = 3; /*inistring dstr_1486__CLASS_SOURCE_CPP*/ /*_.VALSTR___V1665*/ meltfptr[1664] = (melt_ptr_t) & cdat->dstr_1486__CLASS_SOURCE_CPP; cdat->dstr_1486__CLASS_SOURCE_CPP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1486__CLASS_SOURCE_CPP.val, "CLASS_SOURCE_CPPIF", sizeof (cdat->dstr_1486__CLASS_SOURCE_CPP. val) - 1); cdat->dstr_1486__CLASS_SOURCE_CPP.val[18] = (char) 0; cdat->dstr_1486__CLASS_SOURCE_CPP.slen = 18; /*inirout drout_1487__LAMBDA_ */ /*_.VALROUT___V1659*/ meltfptr[1658] = (melt_ptr_t) & cdat->drout_1487__LAMBDA_; cdat->drout_1487__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1487__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:2676", MELT_ROUTDESCR_LEN - 1); cdat->drout_1487__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1487__LAMBDA_, meltrout_59_warmelt_normal_LAMBDA___20__); /*inirout drout_1488__LAMBDA_ */ /*_.VALROUT___V1660*/ meltfptr[1659] = (melt_ptr_t) & cdat->drout_1488__LAMBDA_; cdat->drout_1488__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1488__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:2689", MELT_ROUTDESCR_LEN - 1); cdat->drout_1488__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1488__LAMBDA_, meltrout_60_warmelt_normal_LAMBDA___21__); /*iniobj dsym_1489__IFCPP_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1661*/ meltfptr[1660]) /*_.VALDATA___V1661*/ meltfptr[1660] = (melt_ptr_t) & cdat->dsym_1489__IFCPP_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1489__IFCPP_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1489__IFCPP_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1489__IFCPP_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1489__IFCPP_.obj_hash = 109074880; cdat->dsym_1489__IFCPP_.obj_len = 3; /*inistring dstr_1490__IFCPP_*/ /*_.VALSTR___V1662*/ meltfptr[1661] = (melt_ptr_t) & cdat->dstr_1490__IFCPP_; cdat->dstr_1490__IFCPP_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1490__IFCPP_.val, "IFCPP_", sizeof (cdat->dstr_1490__IFCPP_.val) - 1); cdat->dstr_1490__IFCPP_.val[6] = (char) 0; cdat->dstr_1490__IFCPP_.slen = 6; /*inirout drout_1491__NORMEXP_OR */ /*_.VALROUT___V1666*/ meltfptr[1665] = (melt_ptr_t) & cdat->drout_1491__NORMEXP_OR; cdat->drout_1491__NORMEXP_OR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1491__NORMEXP_OR.routdescr, "NORMEXP_OR @warmelt-normal.melt:2730", MELT_ROUTDESCR_LEN - 1); cdat->drout_1491__NORMEXP_OR.nbval = 25; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1491__NORMEXP_OR, meltrout_61_warmelt_normal_NORMEXP_OR); /*iniclos dclo_1492__NORMEXP_OR */ /*_.VALCLO___V1671*/ meltfptr[1670] = (melt_ptr_t) & cdat->dclo_1492__NORMEXP_OR; cdat->dclo_1492__NORMEXP_OR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1492__NORMEXP_OR.nbval = 0; /*iniobj dsym_1493__CLASS_SOURCE_OR*/ /*uniqueobj*/ if (! /*_.VALDATA___V1672*/ meltfptr[1671]) /*_.VALDATA___V1672*/ meltfptr[1671] = (melt_ptr_t) & cdat->dsym_1493__CLASS_SOURCE_OR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1493__CLASS_SOURCE_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_1493__CLASS_SOURCE_OR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1493__CLASS_SOURCE_OR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1493__CLASS_SOURCE_OR.obj_hash = 738334645; cdat->dsym_1493__CLASS_SOURCE_OR.obj_len = 3; /*inistring dstr_1494__CLASS_SOURCE_OR*/ /*_.VALSTR___V1673*/ meltfptr[1672] = (melt_ptr_t) & cdat->dstr_1494__CLASS_SOURCE_OR; cdat->dstr_1494__CLASS_SOURCE_OR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1494__CLASS_SOURCE_OR.val, "CLASS_SOURCE_OR", sizeof (cdat->dstr_1494__CLASS_SOURCE_OR. val) - 1); cdat->dstr_1494__CLASS_SOURCE_OR.val[15] = (char) 0; cdat->dstr_1494__CLASS_SOURCE_OR.slen = 15; /*iniobj dsym_1495__MULTIPLE_BACKWARD_EVERY*/ /*uniqueobj*/ if (! /*_.VALDATA___V1674*/ meltfptr[1673]) /*_.VALDATA___V1674*/ meltfptr[1673] = (melt_ptr_t) & cdat->dsym_1495__MULTIPLE_BACKWARD_EVERY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1495__MULTIPLE_BACKWARD_EVERY", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1495__MULTIPLE_BACKWARD_EVERY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1495__MULTIPLE_BACKWARD_EVERY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1495__MULTIPLE_BACKWARD_EVERY.obj_hash = 79677830; cdat->dsym_1495__MULTIPLE_BACKWARD_EVERY.obj_len = 3; /*inistring dstr_1496__MULTIPLE_BACKWAR*/ /*_.VALSTR___V1675*/ meltfptr[1674] = (melt_ptr_t) & cdat->dstr_1496__MULTIPLE_BACKWAR; cdat->dstr_1496__MULTIPLE_BACKWAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1496__MULTIPLE_BACKWAR.val, "MULTIPLE_BACKWARD_EVERY", sizeof (cdat->dstr_1496__MULTIPLE_BACKWAR. val) - 1); cdat->dstr_1496__MULTIPLE_BACKWAR.val[23] = (char) 0; cdat->dstr_1496__MULTIPLE_BACKWAR.slen = 23; /*inirout drout_1497__LAMBDA_ */ /*_.VALROUT___V1667*/ meltfptr[1666] = (melt_ptr_t) & cdat->drout_1497__LAMBDA_; cdat->drout_1497__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1497__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:2748", MELT_ROUTDESCR_LEN - 1); cdat->drout_1497__LAMBDA_.nbval = 16; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1497__LAMBDA_, meltrout_62_warmelt_normal_LAMBDA___22__); /*inirout drout_1498__LAMBDA_ */ /*_.VALROUT___V1668*/ meltfptr[1667] = (melt_ptr_t) & cdat->drout_1498__LAMBDA_; cdat->drout_1498__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1498__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:2755", MELT_ROUTDESCR_LEN - 1); cdat->drout_1498__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1498__LAMBDA_, meltrout_63_warmelt_normal_LAMBDA___23__); /*iniobj dsym_1499__OR_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1669*/ meltfptr[1668]) /*_.VALDATA___V1669*/ meltfptr[1668] = (melt_ptr_t) & cdat->dsym_1499__OR_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1499__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_1499__OR_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1499__OR_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1499__OR_.obj_hash = 65214481; cdat->dsym_1499__OR_.obj_len = 3; /*inistring dstr_1500__OR_*/ /*_.VALSTR___V1670*/ meltfptr[1669] = (melt_ptr_t) & cdat->dstr_1500__OR_; cdat->dstr_1500__OR_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1500__OR_.val, "OR_", sizeof (cdat->dstr_1500__OR_.val) - 1); cdat->dstr_1500__OR_.val[3] = (char) 0; cdat->dstr_1500__OR_.slen = 3; /*inirout drout_1501__NORMEXP_PROGN */ /*_.VALROUT___V1676*/ meltfptr[1675] = (melt_ptr_t) & cdat->drout_1501__NORMEXP_PROGN; cdat->drout_1501__NORMEXP_PROGN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1501__NORMEXP_PROGN.routdescr, "NORMEXP_PROGN @warmelt-normal.melt:2813", MELT_ROUTDESCR_LEN - 1); cdat->drout_1501__NORMEXP_PROGN.nbval = 15; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1501__NORMEXP_PROGN, meltrout_64_warmelt_normal_NORMEXP_PROGN); /*iniclos dclo_1502__NORMEXP_PROGN */ /*_.VALCLO___V1679*/ meltfptr[1678] = (melt_ptr_t) & cdat->dclo_1502__NORMEXP_PROGN; cdat->dclo_1502__NORMEXP_PROGN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1502__NORMEXP_PROGN.nbval = 0; /*iniobj dsym_1503__CLASS_SOURCE_PROGN*/ /*uniqueobj*/ if (! /*_.VALDATA___V1680*/ meltfptr[1679]) /*_.VALDATA___V1680*/ meltfptr[1679] = (melt_ptr_t) & cdat->dsym_1503__CLASS_SOURCE_PROGN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1503__CLASS_SOURCE_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_1503__CLASS_SOURCE_PROGN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1503__CLASS_SOURCE_PROGN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1503__CLASS_SOURCE_PROGN.obj_hash = 819854317; cdat->dsym_1503__CLASS_SOURCE_PROGN.obj_len = 3; /*inistring dstr_1504__CLASS_SOURCE_PRO*/ /*_.VALSTR___V1681*/ meltfptr[1680] = (melt_ptr_t) & cdat->dstr_1504__CLASS_SOURCE_PRO; cdat->dstr_1504__CLASS_SOURCE_PRO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1504__CLASS_SOURCE_PRO.val, "CLASS_SOURCE_PROGN", sizeof (cdat->dstr_1504__CLASS_SOURCE_PRO. val) - 1); cdat->dstr_1504__CLASS_SOURCE_PRO.val[18] = (char) 0; cdat->dstr_1504__CLASS_SOURCE_PRO.slen = 18; /*iniobj dsym_1505__PROGN_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1677*/ meltfptr[1676]) /*_.VALDATA___V1677*/ meltfptr[1676] = (melt_ptr_t) & cdat->dsym_1505__PROGN_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1505__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_1505__PROGN_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1505__PROGN_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1505__PROGN_.obj_hash = 108965853; cdat->dsym_1505__PROGN_.obj_len = 3; /*inistring dstr_1506__PROGN_*/ /*_.VALSTR___V1678*/ meltfptr[1677] = (melt_ptr_t) & cdat->dstr_1506__PROGN_; cdat->dstr_1506__PROGN_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1506__PROGN_.val, "PROGN_", sizeof (cdat->dstr_1506__PROGN_.val) - 1); cdat->dstr_1506__PROGN_.val[6] = (char) 0; cdat->dstr_1506__PROGN_.slen = 6; /*inirout drout_1507__LAMBDA_ */ /*_.VALROUT___V1682*/ meltfptr[1681] = (melt_ptr_t) & cdat->drout_1507__LAMBDA_; cdat->drout_1507__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1507__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:2867", MELT_ROUTDESCR_LEN - 1); cdat->drout_1507__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1507__LAMBDA_, meltrout_65_warmelt_normal_LAMBDA___24__); /*inirout drout_1508__NORMEXP_LET */ /*_.VALROUT___V1683*/ meltfptr[1682] = (melt_ptr_t) & cdat->drout_1508__NORMEXP_LET; cdat->drout_1508__NORMEXP_LET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1508__NORMEXP_LET.routdescr, "NORMEXP_LET @warmelt-normal.melt:2872", MELT_ROUTDESCR_LEN - 1); cdat->drout_1508__NORMEXP_LET.nbval = 30; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1508__NORMEXP_LET, meltrout_66_warmelt_normal_NORMEXP_LET); /*iniclos dclo_1509__NORMEXP_LET */ /*_.VALCLO___V1688*/ meltfptr[1687] = (melt_ptr_t) & cdat->dclo_1509__NORMEXP_LET; cdat->dclo_1509__NORMEXP_LET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1509__NORMEXP_LET.nbval = 0; /*iniobj dsym_1510__CLASS_SOURCE_LET*/ /*uniqueobj*/ if (! /*_.VALDATA___V1689*/ meltfptr[1688]) /*_.VALDATA___V1689*/ meltfptr[1688] = (melt_ptr_t) & cdat->dsym_1510__CLASS_SOURCE_LET; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1510__CLASS_SOURCE_LET", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1510__CLASS_SOURCE_LET", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1510__CLASS_SOURCE_LET.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1510__CLASS_SOURCE_LET.obj_hash = 540916563; cdat->dsym_1510__CLASS_SOURCE_LET.obj_len = 3; /*inistring dstr_1511__CLASS_SOURCE_LET*/ /*_.VALSTR___V1690*/ meltfptr[1689] = (melt_ptr_t) & cdat->dstr_1511__CLASS_SOURCE_LET; cdat->dstr_1511__CLASS_SOURCE_LET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1511__CLASS_SOURCE_LET.val, "CLASS_SOURCE_LET", sizeof (cdat->dstr_1511__CLASS_SOURCE_LET. val) - 1); cdat->dstr_1511__CLASS_SOURCE_LET.val[16] = (char) 0; cdat->dstr_1511__CLASS_SOURCE_LET.slen = 16; /*inirout drout_1512__LAMBDA_ */ /*_.VALROUT___V1684*/ meltfptr[1683] = (melt_ptr_t) & cdat->drout_1512__LAMBDA_; cdat->drout_1512__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1512__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:2885", MELT_ROUTDESCR_LEN - 1); cdat->drout_1512__LAMBDA_.nbval = 12; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1512__LAMBDA_, meltrout_67_warmelt_normal_LAMBDA___25__); /*iniobj dsym_1513__CLASS_SOURCE_LET_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1691*/ meltfptr[1690]) /*_.VALDATA___V1691*/ meltfptr[1690] = (melt_ptr_t) & cdat->dsym_1513__CLASS_SOURCE_LET_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1513__CLASS_SOURCE_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_1513__CLASS_SOURCE_LET_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1513__CLASS_SOURCE_LET_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1513__CLASS_SOURCE_LET_BINDING.obj_hash = 379014719; cdat->dsym_1513__CLASS_SOURCE_LET_BINDING.obj_len = 3; /*inistring dstr_1514__CLASS_SOURCE_LET*/ /*_.VALSTR___V1692*/ meltfptr[1691] = (melt_ptr_t) & cdat->dstr_1514__CLASS_SOURCE_LET; cdat->dstr_1514__CLASS_SOURCE_LET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1514__CLASS_SOURCE_LET.val, "CLASS_SOURCE_LET_BINDING", sizeof (cdat->dstr_1514__CLASS_SOURCE_LET. val) - 1); cdat->dstr_1514__CLASS_SOURCE_LET.val[24] = (char) 0; cdat->dstr_1514__CLASS_SOURCE_LET.slen = 24; /*inirout drout_1515__LAMBDA_ */ /*_.VALROUT___V1685*/ meltfptr[1684] = (melt_ptr_t) & cdat->drout_1515__LAMBDA_; cdat->drout_1515__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1515__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:2937", MELT_ROUTDESCR_LEN - 1); cdat->drout_1515__LAMBDA_.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1515__LAMBDA_, meltrout_68_warmelt_normal_LAMBDA___26__); /*iniobj dsym_1516__LET_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1686*/ meltfptr[1685]) /*_.VALDATA___V1686*/ meltfptr[1685] = (melt_ptr_t) & cdat->dsym_1516__LET_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1516__LET_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1516__LET_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1516__LET_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1516__LET_.obj_hash = 60022448; cdat->dsym_1516__LET_.obj_len = 3; /*inistring dstr_1517__LET_*/ /*_.VALSTR___V1687*/ meltfptr[1686] = (melt_ptr_t) & cdat->dstr_1517__LET_; cdat->dstr_1517__LET_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1517__LET_.val, "LET_", sizeof (cdat->dstr_1517__LET_.val) - 1); cdat->dstr_1517__LET_.val[4] = (char) 0; cdat->dstr_1517__LET_.slen = 4; /*inirout drout_1518__LAMBDA_ */ /*_.VALROUT___V1693*/ meltfptr[1692] = (melt_ptr_t) & cdat->drout_1518__LAMBDA_; cdat->drout_1518__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1518__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:3013", MELT_ROUTDESCR_LEN - 1); cdat->drout_1518__LAMBDA_.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1518__LAMBDA_, meltrout_69_warmelt_normal_LAMBDA___27__); /*inirout drout_1519__NORMEXP_UNSAFE_GET_FIELD */ /*_.VALROUT___V1694*/ meltfptr[1693] = (melt_ptr_t) & cdat->drout_1519__NORMEXP_UNSAFE_GET_FIELD; cdat->drout_1519__NORMEXP_UNSAFE_GET_FIELD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1519__NORMEXP_UNSAFE_GET_FIELD.routdescr, "NORMEXP_UNSAFE_GET_FIELD @warmelt-normal.melt:3022", MELT_ROUTDESCR_LEN - 1); cdat->drout_1519__NORMEXP_UNSAFE_GET_FIELD.nbval = 12; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1519__NORMEXP_UNSAFE_GET_FIELD, meltrout_70_warmelt_normal_NORMEXP_UNSAFE_GET_FIELD); /*iniclos dclo_1520__NORMEXP_UNSAFE_GET_FIELD */ /*_.VALCLO___V1695*/ meltfptr[1694] = (melt_ptr_t) & cdat->dclo_1520__NORMEXP_UNSAFE_GET_FIELD; cdat->dclo_1520__NORMEXP_UNSAFE_GET_FIELD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1520__NORMEXP_UNSAFE_GET_FIELD.nbval = 0; /*iniobj dsym_1521__CLASS_SOURCE_UNSAFE_GET_FIELD*/ /*uniqueobj*/ if (! /*_.VALDATA___V1696*/ meltfptr[1695]) /*_.VALDATA___V1696*/ meltfptr[1695] = (melt_ptr_t) & cdat->dsym_1521__CLASS_SOURCE_UNSAFE_GET_FIELD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1521__CLASS_SOURCE_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_1521__CLASS_SOURCE_UNSAFE_GET_FIELD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1521__CLASS_SOURCE_UNSAFE_GET_FIELD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1521__CLASS_SOURCE_UNSAFE_GET_FIELD.obj_hash = 846462223; cdat->dsym_1521__CLASS_SOURCE_UNSAFE_GET_FIELD.obj_len = 3; /*inistring dstr_1522__CLASS_SOURCE_UNS*/ /*_.VALSTR___V1697*/ meltfptr[1696] = (melt_ptr_t) & cdat->dstr_1522__CLASS_SOURCE_UNS; cdat->dstr_1522__CLASS_SOURCE_UNS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1522__CLASS_SOURCE_UNS.val, "CLASS_SOURCE_UNSAFE_GET_FIELD", sizeof (cdat->dstr_1522__CLASS_SOURCE_UNS. val) - 1); cdat->dstr_1522__CLASS_SOURCE_UNS.val[29] = (char) 0; cdat->dstr_1522__CLASS_SOURCE_UNS.slen = 29; /*inirout drout_1523__NORMEXP_GET_FIELD */ /*_.VALROUT___V1698*/ meltfptr[1697] = (melt_ptr_t) & cdat->drout_1523__NORMEXP_GET_FIELD; cdat->drout_1523__NORMEXP_GET_FIELD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1523__NORMEXP_GET_FIELD.routdescr, "NORMEXP_GET_FIELD @warmelt-normal.melt:3059", MELT_ROUTDESCR_LEN - 1); cdat->drout_1523__NORMEXP_GET_FIELD.nbval = 13; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1523__NORMEXP_GET_FIELD, meltrout_71_warmelt_normal_NORMEXP_GET_FIELD); /*iniclos dclo_1524__NORMEXP_GET_FIELD */ /*_.VALCLO___V1699*/ meltfptr[1698] = (melt_ptr_t) & cdat->dclo_1524__NORMEXP_GET_FIELD; cdat->dclo_1524__NORMEXP_GET_FIELD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1524__NORMEXP_GET_FIELD.nbval = 0; /*iniobj dsym_1525__CLASS_SOURCE_GET_FIELD*/ /*uniqueobj*/ if (! /*_.VALDATA___V1700*/ meltfptr[1699]) /*_.VALDATA___V1700*/ meltfptr[1699] = (melt_ptr_t) & cdat->dsym_1525__CLASS_SOURCE_GET_FIELD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1525__CLASS_SOURCE_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_1525__CLASS_SOURCE_GET_FIELD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1525__CLASS_SOURCE_GET_FIELD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1525__CLASS_SOURCE_GET_FIELD.obj_hash = 291216467; cdat->dsym_1525__CLASS_SOURCE_GET_FIELD.obj_len = 3; /*inistring dstr_1526__CLASS_SOURCE_GET*/ /*_.VALSTR___V1701*/ meltfptr[1700] = (melt_ptr_t) & cdat->dstr_1526__CLASS_SOURCE_GET; cdat->dstr_1526__CLASS_SOURCE_GET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1526__CLASS_SOURCE_GET.val, "CLASS_SOURCE_GET_FIELD", sizeof (cdat->dstr_1526__CLASS_SOURCE_GET. val) - 1); cdat->dstr_1526__CLASS_SOURCE_GET.val[22] = (char) 0; cdat->dstr_1526__CLASS_SOURCE_GET.slen = 22; /*inirout drout_1527__NORMEXP_UNSAFE_PUT_FIELDS */ /*_.VALROUT___V1702*/ meltfptr[1701] = (melt_ptr_t) & cdat->drout_1527__NORMEXP_UNSAFE_PUT_FIELDS; cdat->drout_1527__NORMEXP_UNSAFE_PUT_FIELDS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1527__NORMEXP_UNSAFE_PUT_FIELDS.routdescr, "NORMEXP_UNSAFE_PUT_FIELDS @warmelt-normal.melt:3109", MELT_ROUTDESCR_LEN - 1); cdat->drout_1527__NORMEXP_UNSAFE_PUT_FIELDS.nbval = 26; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1527__NORMEXP_UNSAFE_PUT_FIELDS, meltrout_72_warmelt_normal_NORMEXP_UNSAFE_PUT_FIELDS); /*iniclos dclo_1528__NORMEXP_UNSAFE_PUT_FIELDS */ /*_.VALCLO___V1708*/ meltfptr[1707] = (melt_ptr_t) & cdat->dclo_1528__NORMEXP_UNSAFE_PUT_FIELDS; cdat->dclo_1528__NORMEXP_UNSAFE_PUT_FIELDS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1528__NORMEXP_UNSAFE_PUT_FIELDS.nbval = 0; /*iniobj dsym_1529__CLASS_SOURCE_UNSAFE_PUT_FIELDS*/ /*uniqueobj*/ if (! /*_.VALDATA___V1709*/ meltfptr[1708]) /*_.VALDATA___V1709*/ meltfptr[1708] = (melt_ptr_t) & cdat->dsym_1529__CLASS_SOURCE_UNSAFE_PUT_FIELDS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1529__CLASS_SOURCE_UNSAFE_PUT_FIELDS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1529__CLASS_SOURCE_UNSAFE_PUT_FIELDS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1529__CLASS_SOURCE_UNSAFE_PUT_FIELDS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1529__CLASS_SOURCE_UNSAFE_PUT_FIELDS.obj_hash = 24821450; cdat->dsym_1529__CLASS_SOURCE_UNSAFE_PUT_FIELDS.obj_len = 3; /*inistring dstr_1530__CLASS_SOURCE_UNS*/ /*_.VALSTR___V1710*/ meltfptr[1709] = (melt_ptr_t) & cdat->dstr_1530__CLASS_SOURCE_UNS; cdat->dstr_1530__CLASS_SOURCE_UNS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1530__CLASS_SOURCE_UNS.val, "CLASS_SOURCE_UNSAFE_PUT_FIELDS", sizeof (cdat->dstr_1530__CLASS_SOURCE_UNS. val) - 1); cdat->dstr_1530__CLASS_SOURCE_UNS.val[30] = (char) 0; cdat->dstr_1530__CLASS_SOURCE_UNS.slen = 30; /*iniobj dsym_1531__UNSAFPUT_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1703*/ meltfptr[1702]) /*_.VALDATA___V1703*/ meltfptr[1702] = (melt_ptr_t) & cdat->dsym_1531__UNSAFPUT_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1531__UNSAFPUT_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1531__UNSAFPUT_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1531__UNSAFPUT_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1531__UNSAFPUT_.obj_hash = 85909409; cdat->dsym_1531__UNSAFPUT_.obj_len = 3; /*inistring dstr_1532__UNSAFPUT_*/ /*_.VALSTR___V1704*/ meltfptr[1703] = (melt_ptr_t) & cdat->dstr_1532__UNSAFPUT_; cdat->dstr_1532__UNSAFPUT_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1532__UNSAFPUT_.val, "UNSAFPUT_", sizeof (cdat->dstr_1532__UNSAFPUT_.val) - 1); cdat->dstr_1532__UNSAFPUT_.val[9] = (char) 0; cdat->dstr_1532__UNSAFPUT_.slen = 9; /*iniobj dsym_1533__UNSAFPUT_INTER_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1705*/ meltfptr[1704]) /*_.VALDATA___V1705*/ meltfptr[1704] = (melt_ptr_t) & cdat->dsym_1533__UNSAFPUT_INTER_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1533__UNSAFPUT_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_1533__UNSAFPUT_INTER_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1533__UNSAFPUT_INTER_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1533__UNSAFPUT_INTER_.obj_hash = 235031847; cdat->dsym_1533__UNSAFPUT_INTER_.obj_len = 3; /*inistring dstr_1534__UNSAFPUT_INTER_*/ /*_.VALSTR___V1706*/ meltfptr[1705] = (melt_ptr_t) & cdat->dstr_1534__UNSAFPUT_INTER_; cdat->dstr_1534__UNSAFPUT_INTER_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1534__UNSAFPUT_INTER_.val, "UNSAFPUT_INTER_", sizeof (cdat->dstr_1534__UNSAFPUT_INTER_. val) - 1); cdat->dstr_1534__UNSAFPUT_INTER_.val[15] = (char) 0; cdat->dstr_1534__UNSAFPUT_INTER_.slen = 15; /*inirout drout_1535__LAMBDA_ */ /*_.VALROUT___V1707*/ meltfptr[1706] = (melt_ptr_t) & cdat->drout_1535__LAMBDA_; cdat->drout_1535__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1535__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:3146", MELT_ROUTDESCR_LEN - 1); cdat->drout_1535__LAMBDA_.nbval = 9; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1535__LAMBDA_, meltrout_73_warmelt_normal_LAMBDA___28__); /*iniobj dsym_1536__CLASS_SOURCE_FIELDASSIGN*/ /*uniqueobj*/ if (! /*_.VALDATA___V1711*/ meltfptr[1710]) /*_.VALDATA___V1711*/ meltfptr[1710] = (melt_ptr_t) & cdat->dsym_1536__CLASS_SOURCE_FIELDASSIGN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1536__CLASS_SOURCE_FIELDASSIGN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1536__CLASS_SOURCE_FIELDASSIGN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1536__CLASS_SOURCE_FIELDASSIGN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1536__CLASS_SOURCE_FIELDASSIGN.obj_hash = 362514023; cdat->dsym_1536__CLASS_SOURCE_FIELDASSIGN.obj_len = 3; /*inistring dstr_1537__CLASS_SOURCE_FIE*/ /*_.VALSTR___V1712*/ meltfptr[1711] = (melt_ptr_t) & cdat->dstr_1537__CLASS_SOURCE_FIE; cdat->dstr_1537__CLASS_SOURCE_FIE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1537__CLASS_SOURCE_FIE.val, "CLASS_SOURCE_FIELDASSIGN", sizeof (cdat->dstr_1537__CLASS_SOURCE_FIE. val) - 1); cdat->dstr_1537__CLASS_SOURCE_FIE.val[24] = (char) 0; cdat->dstr_1537__CLASS_SOURCE_FIE.slen = 24; /*inirout drout_1538__LAMBDA_ */ /*_.VALROUT___V1713*/ meltfptr[1712] = (melt_ptr_t) & cdat->drout_1538__LAMBDA_; cdat->drout_1538__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1538__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:3181", MELT_ROUTDESCR_LEN - 1); cdat->drout_1538__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1538__LAMBDA_, meltrout_74_warmelt_normal_LAMBDA___29__); /*inirout drout_1539__NORMEXP_PUT_FIELDS */ /*_.VALROUT___V1714*/ meltfptr[1713] = (melt_ptr_t) & cdat->drout_1539__NORMEXP_PUT_FIELDS; cdat->drout_1539__NORMEXP_PUT_FIELDS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1539__NORMEXP_PUT_FIELDS.routdescr, "NORMEXP_PUT_FIELDS @warmelt-normal.melt:3185", MELT_ROUTDESCR_LEN - 1); cdat->drout_1539__NORMEXP_PUT_FIELDS.nbval = 23; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1539__NORMEXP_PUT_FIELDS, meltrout_75_warmelt_normal_NORMEXP_PUT_FIELDS); /*iniclos dclo_1540__NORMEXP_PUT_FIELDS */ /*_.VALCLO___V1719*/ meltfptr[1718] = (melt_ptr_t) & cdat->dclo_1540__NORMEXP_PUT_FIELDS; cdat->dclo_1540__NORMEXP_PUT_FIELDS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1540__NORMEXP_PUT_FIELDS.nbval = 0; /*iniobj dsym_1541__CLASS_SOURCE_PUT_FIELDS*/ /*uniqueobj*/ if (! /*_.VALDATA___V1720*/ meltfptr[1719]) /*_.VALDATA___V1720*/ meltfptr[1719] = (melt_ptr_t) & cdat->dsym_1541__CLASS_SOURCE_PUT_FIELDS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1541__CLASS_SOURCE_PUT_FIELDS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1541__CLASS_SOURCE_PUT_FIELDS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1541__CLASS_SOURCE_PUT_FIELDS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1541__CLASS_SOURCE_PUT_FIELDS.obj_hash = 484783195; cdat->dsym_1541__CLASS_SOURCE_PUT_FIELDS.obj_len = 3; /*inistring dstr_1542__CLASS_SOURCE_PUT*/ /*_.VALSTR___V1721*/ meltfptr[1720] = (melt_ptr_t) & cdat->dstr_1542__CLASS_SOURCE_PUT; cdat->dstr_1542__CLASS_SOURCE_PUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1542__CLASS_SOURCE_PUT.val, "CLASS_SOURCE_PUT_FIELDS", sizeof (cdat->dstr_1542__CLASS_SOURCE_PUT. val) - 1); cdat->dstr_1542__CLASS_SOURCE_PUT.val[23] = (char) 0; cdat->dstr_1542__CLASS_SOURCE_PUT.slen = 23; /*iniobj dsym_1543__PUTFLD_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1715*/ meltfptr[1714]) /*_.VALDATA___V1715*/ meltfptr[1714] = (melt_ptr_t) & cdat->dsym_1543__PUTFLD_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1543__PUTFLD_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1543__PUTFLD_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1543__PUTFLD_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1543__PUTFLD_.obj_hash = 672136193; cdat->dsym_1543__PUTFLD_.obj_len = 3; /*inistring dstr_1544__PUTFLD_*/ /*_.VALSTR___V1716*/ meltfptr[1715] = (melt_ptr_t) & cdat->dstr_1544__PUTFLD_; cdat->dstr_1544__PUTFLD_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1544__PUTFLD_.val, "PUTFLD_", sizeof (cdat->dstr_1544__PUTFLD_.val) - 1); cdat->dstr_1544__PUTFLD_.val[7] = (char) 0; cdat->dstr_1544__PUTFLD_.slen = 7; /*iniobj dsym_1545__PUTFLD_INTER_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1717*/ meltfptr[1716]) /*_.VALDATA___V1717*/ meltfptr[1716] = (melt_ptr_t) & cdat->dsym_1545__PUTFLD_INTER_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1545__PUTFLD_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_1545__PUTFLD_INTER_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1545__PUTFLD_INTER_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1545__PUTFLD_INTER_.obj_hash = 300920737; cdat->dsym_1545__PUTFLD_INTER_.obj_len = 3; /*inistring dstr_1546__PUTFLD_INTER_*/ /*_.VALSTR___V1718*/ meltfptr[1717] = (melt_ptr_t) & cdat->dstr_1546__PUTFLD_INTER_; cdat->dstr_1546__PUTFLD_INTER_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1546__PUTFLD_INTER_.val, "PUTFLD_INTER_", sizeof (cdat->dstr_1546__PUTFLD_INTER_.val) - 1); cdat->dstr_1546__PUTFLD_INTER_.val[13] = (char) 0; cdat->dstr_1546__PUTFLD_INTER_.slen = 13; /*inirout drout_1547__NORMEXP_SETQ */ /*_.VALROUT___V1722*/ meltfptr[1721] = (melt_ptr_t) & cdat->drout_1547__NORMEXP_SETQ; cdat->drout_1547__NORMEXP_SETQ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1547__NORMEXP_SETQ.routdescr, "NORMEXP_SETQ @warmelt-normal.melt:3296", MELT_ROUTDESCR_LEN - 1); cdat->drout_1547__NORMEXP_SETQ.nbval = 15; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1547__NORMEXP_SETQ, meltrout_76_warmelt_normal_NORMEXP_SETQ); /*iniclos dclo_1548__NORMEXP_SETQ */ /*_.VALCLO___V1725*/ meltfptr[1724] = (melt_ptr_t) & cdat->dclo_1548__NORMEXP_SETQ; cdat->dclo_1548__NORMEXP_SETQ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1548__NORMEXP_SETQ.nbval = 0; /*iniobj dsym_1549__CLASS_SOURCE_SETQ*/ /*uniqueobj*/ if (! /*_.VALDATA___V1726*/ meltfptr[1725]) /*_.VALDATA___V1726*/ meltfptr[1725] = (melt_ptr_t) & cdat->dsym_1549__CLASS_SOURCE_SETQ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1549__CLASS_SOURCE_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_1549__CLASS_SOURCE_SETQ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1549__CLASS_SOURCE_SETQ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1549__CLASS_SOURCE_SETQ.obj_hash = 335918923; cdat->dsym_1549__CLASS_SOURCE_SETQ.obj_len = 3; /*inistring dstr_1550__CLASS_SOURCE_SET*/ /*_.VALSTR___V1727*/ meltfptr[1726] = (melt_ptr_t) & cdat->dstr_1550__CLASS_SOURCE_SET; cdat->dstr_1550__CLASS_SOURCE_SET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1550__CLASS_SOURCE_SET.val, "CLASS_SOURCE_SETQ", sizeof (cdat->dstr_1550__CLASS_SOURCE_SET. val) - 1); cdat->dstr_1550__CLASS_SOURCE_SET.val[17] = (char) 0; cdat->dstr_1550__CLASS_SOURCE_SET.slen = 17; /*iniobj dsym_1551__SETQ_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1723*/ meltfptr[1722]) /*_.VALDATA___V1723*/ meltfptr[1722] = (melt_ptr_t) & cdat->dsym_1551__SETQ_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1551__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_1551__SETQ_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1551__SETQ_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1551__SETQ_.obj_hash = 22815629; cdat->dsym_1551__SETQ_.obj_len = 3; /*inistring dstr_1552__SETQ_*/ /*_.VALSTR___V1724*/ meltfptr[1723] = (melt_ptr_t) & cdat->dstr_1552__SETQ_; cdat->dstr_1552__SETQ_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1552__SETQ_.val, "SETQ_", sizeof (cdat->dstr_1552__SETQ_.val) - 1); cdat->dstr_1552__SETQ_.val[5] = (char) 0; cdat->dstr_1552__SETQ_.slen = 5; /*inirout drout_1553__LAMBDA_ */ /*_.VALROUT___V1728*/ meltfptr[1727] = (melt_ptr_t) & cdat->drout_1553__LAMBDA_; cdat->drout_1553__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1553__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:3348", MELT_ROUTDESCR_LEN - 1); cdat->drout_1553__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1553__LAMBDA_, meltrout_77_warmelt_normal_LAMBDA___30__); /*inirout drout_1554__NORMEXP_INSTANCE */ /*_.VALROUT___V1729*/ meltfptr[1728] = (melt_ptr_t) & cdat->drout_1554__NORMEXP_INSTANCE; cdat->drout_1554__NORMEXP_INSTANCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1554__NORMEXP_INSTANCE.routdescr, "NORMEXP_INSTANCE @warmelt-normal.melt:3355", MELT_ROUTDESCR_LEN - 1); cdat->drout_1554__NORMEXP_INSTANCE.nbval = 30; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1554__NORMEXP_INSTANCE, meltrout_78_warmelt_normal_NORMEXP_INSTANCE); /*iniclos dclo_1555__NORMEXP_INSTANCE */ /*_.VALCLO___V1735*/ meltfptr[1734] = (melt_ptr_t) & cdat->dclo_1555__NORMEXP_INSTANCE; cdat->dclo_1555__NORMEXP_INSTANCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1555__NORMEXP_INSTANCE.nbval = 0; /*iniobj dsym_1556__CLASS_SOURCE_INSTANCE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1736*/ meltfptr[1735]) /*_.VALDATA___V1736*/ meltfptr[1735] = (melt_ptr_t) & cdat->dsym_1556__CLASS_SOURCE_INSTANCE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1556__CLASS_SOURCE_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_1556__CLASS_SOURCE_INSTANCE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1556__CLASS_SOURCE_INSTANCE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1556__CLASS_SOURCE_INSTANCE.obj_hash = 185000661; cdat->dsym_1556__CLASS_SOURCE_INSTANCE.obj_len = 3; /*inistring dstr_1557__CLASS_SOURCE_INS*/ /*_.VALSTR___V1737*/ meltfptr[1736] = (melt_ptr_t) & cdat->dstr_1557__CLASS_SOURCE_INS; cdat->dstr_1557__CLASS_SOURCE_INS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1557__CLASS_SOURCE_INS.val, "CLASS_SOURCE_INSTANCE", sizeof (cdat->dstr_1557__CLASS_SOURCE_INS. val) - 1); cdat->dstr_1557__CLASS_SOURCE_INS.val[21] = (char) 0; cdat->dstr_1557__CLASS_SOURCE_INS.slen = 21; /*iniobj dsym_1558__INSTANCE_INTER_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1730*/ meltfptr[1729]) /*_.VALDATA___V1730*/ meltfptr[1729] = (melt_ptr_t) & cdat->dsym_1558__INSTANCE_INTER_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1558__INSTANCE_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_1558__INSTANCE_INTER_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1558__INSTANCE_INTER_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1558__INSTANCE_INTER_.obj_hash = 171229134; cdat->dsym_1558__INSTANCE_INTER_.obj_len = 3; /*inistring dstr_1559__INSTANCE_INTER_*/ /*_.VALSTR___V1731*/ meltfptr[1730] = (melt_ptr_t) & cdat->dstr_1559__INSTANCE_INTER_; cdat->dstr_1559__INSTANCE_INTER_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1559__INSTANCE_INTER_.val, "INSTANCE_INTER_", sizeof (cdat->dstr_1559__INSTANCE_INTER_. val) - 1); cdat->dstr_1559__INSTANCE_INTER_.val[15] = (char) 0; cdat->dstr_1559__INSTANCE_INTER_.slen = 15; /*inirout drout_1560__LAMBDA_ */ /*_.VALROUT___V1732*/ meltfptr[1731] = (melt_ptr_t) & cdat->drout_1560__LAMBDA_; cdat->drout_1560__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1560__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:3393", MELT_ROUTDESCR_LEN - 1); cdat->drout_1560__LAMBDA_.nbval = 9; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1560__LAMBDA_, meltrout_79_warmelt_normal_LAMBDA___31__); /*iniobj dsym_1561__INST_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1733*/ meltfptr[1732]) /*_.VALDATA___V1733*/ meltfptr[1732] = (melt_ptr_t) & cdat->dsym_1561__INST_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1561__INST_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1561__INST_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1561__INST_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1561__INST_.obj_hash = 34561600; cdat->dsym_1561__INST_.obj_len = 3; /*inistring dstr_1562__INST_*/ /*_.VALSTR___V1734*/ meltfptr[1733] = (melt_ptr_t) & cdat->dstr_1562__INST_; cdat->dstr_1562__INST_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1562__INST_.val, "INST_", sizeof (cdat->dstr_1562__INST_.val) - 1); cdat->dstr_1562__INST_.val[5] = (char) 0; cdat->dstr_1562__INST_.slen = 5; /*inirout drout_1563__LAMBDA_ */ /*_.VALROUT___V1738*/ meltfptr[1737] = (melt_ptr_t) & cdat->drout_1563__LAMBDA_; cdat->drout_1563__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1563__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:3467", MELT_ROUTDESCR_LEN - 1); cdat->drout_1563__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1563__LAMBDA_, meltrout_80_warmelt_normal_LAMBDA___32__); /*inirout drout_1564__NORMEXP_FOREVER */ /*_.VALROUT___V1739*/ meltfptr[1738] = (melt_ptr_t) & cdat->drout_1564__NORMEXP_FOREVER; cdat->drout_1564__NORMEXP_FOREVER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1564__NORMEXP_FOREVER.routdescr, "NORMEXP_FOREVER @warmelt-normal.melt:3472", MELT_ROUTDESCR_LEN - 1); cdat->drout_1564__NORMEXP_FOREVER.nbval = 21; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1564__NORMEXP_FOREVER, meltrout_81_warmelt_normal_NORMEXP_FOREVER); /*iniclos dclo_1565__NORMEXP_FOREVER */ /*_.VALCLO___V1744*/ meltfptr[1743] = (melt_ptr_t) & cdat->dclo_1565__NORMEXP_FOREVER; cdat->dclo_1565__NORMEXP_FOREVER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1565__NORMEXP_FOREVER.nbval = 0; /*iniobj dsym_1566__CLASS_SOURCE_FOREVER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1745*/ meltfptr[1744]) /*_.VALDATA___V1745*/ meltfptr[1744] = (melt_ptr_t) & cdat->dsym_1566__CLASS_SOURCE_FOREVER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1566__CLASS_SOURCE_FOREVER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1566__CLASS_SOURCE_FOREVER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1566__CLASS_SOURCE_FOREVER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1566__CLASS_SOURCE_FOREVER.obj_hash = 989441728; cdat->dsym_1566__CLASS_SOURCE_FOREVER.obj_len = 3; /*inistring dstr_1567__CLASS_SOURCE_FOR*/ /*_.VALSTR___V1746*/ meltfptr[1745] = (melt_ptr_t) & cdat->dstr_1567__CLASS_SOURCE_FOR; cdat->dstr_1567__CLASS_SOURCE_FOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1567__CLASS_SOURCE_FOR.val, "CLASS_SOURCE_FOREVER", sizeof (cdat->dstr_1567__CLASS_SOURCE_FOR. val) - 1); cdat->dstr_1567__CLASS_SOURCE_FOR.val[20] = (char) 0; cdat->dstr_1567__CLASS_SOURCE_FOR.slen = 20; /*iniobj dsym_1568__CLASS_LABEL_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1747*/ meltfptr[1746]) /*_.VALDATA___V1747*/ meltfptr[1746] = (melt_ptr_t) & cdat->dsym_1568__CLASS_LABEL_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1568__CLASS_LABEL_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_1568__CLASS_LABEL_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1568__CLASS_LABEL_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1568__CLASS_LABEL_BINDING.obj_hash = 513737494; cdat->dsym_1568__CLASS_LABEL_BINDING.obj_len = 3; /*inistring dstr_1569__CLASS_LABEL_BIND*/ /*_.VALSTR___V1748*/ meltfptr[1747] = (melt_ptr_t) & cdat->dstr_1569__CLASS_LABEL_BIND; cdat->dstr_1569__CLASS_LABEL_BIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1569__CLASS_LABEL_BIND.val, "CLASS_LABEL_BINDING", sizeof (cdat->dstr_1569__CLASS_LABEL_BIND. val) - 1); cdat->dstr_1569__CLASS_LABEL_BIND.val[19] = (char) 0; cdat->dstr_1569__CLASS_LABEL_BIND.slen = 19; /*iniobj dsym_1570__FOREVER_INTER_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1740*/ meltfptr[1739]) /*_.VALDATA___V1740*/ meltfptr[1739] = (melt_ptr_t) & cdat->dsym_1570__FOREVER_INTER_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1570__FOREVER_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_1570__FOREVER_INTER_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1570__FOREVER_INTER_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1570__FOREVER_INTER_.obj_hash = 874788585; cdat->dsym_1570__FOREVER_INTER_.obj_len = 3; /*inistring dstr_1571__FOREVER_INTER_*/ /*_.VALSTR___V1741*/ meltfptr[1740] = (melt_ptr_t) & cdat->dstr_1571__FOREVER_INTER_; cdat->dstr_1571__FOREVER_INTER_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1571__FOREVER_INTER_.val, "FOREVER_INTER_", sizeof (cdat->dstr_1571__FOREVER_INTER_.val) - 1); cdat->dstr_1571__FOREVER_INTER_.val[14] = (char) 0; cdat->dstr_1571__FOREVER_INTER_.slen = 14; /*iniobj dsym_1572__LABIND_CLONSY*/ /*uniqueobj*/ if (! /*_.VALDATA___V1749*/ meltfptr[1748]) /*_.VALDATA___V1749*/ meltfptr[1748] = (melt_ptr_t) & cdat->dsym_1572__LABIND_CLONSY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1572__LABIND_CLONSY", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1572__LABIND_CLONSY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1572__LABIND_CLONSY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1572__LABIND_CLONSY.obj_hash = 540109865; cdat->dsym_1572__LABIND_CLONSY.obj_len = 3; /*inistring dstr_1573__LABIND_CLONSY*/ /*_.VALSTR___V1750*/ meltfptr[1749] = (melt_ptr_t) & cdat->dstr_1573__LABIND_CLONSY; cdat->dstr_1573__LABIND_CLONSY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1573__LABIND_CLONSY.val, "LABIND_CLONSY", sizeof (cdat->dstr_1573__LABIND_CLONSY.val) - 1); cdat->dstr_1573__LABIND_CLONSY.val[13] = (char) 0; cdat->dstr_1573__LABIND_CLONSY.slen = 13; /*iniobj dsym_1574__FOREVER_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1742*/ meltfptr[1741]) /*_.VALDATA___V1742*/ meltfptr[1741] = (melt_ptr_t) & cdat->dsym_1574__FOREVER_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1574__FOREVER_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1574__FOREVER_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1574__FOREVER_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1574__FOREVER_.obj_hash = 115412287; cdat->dsym_1574__FOREVER_.obj_len = 3; /*inistring dstr_1575__FOREVER_*/ /*_.VALSTR___V1743*/ meltfptr[1742] = (melt_ptr_t) & cdat->dstr_1575__FOREVER_; cdat->dstr_1575__FOREVER_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1575__FOREVER_.val, "FOREVER_", sizeof (cdat->dstr_1575__FOREVER_.val) - 1); cdat->dstr_1575__FOREVER_.val[8] = (char) 0; cdat->dstr_1575__FOREVER_.slen = 8; /*inirout drout_1576__NORMEXP_EXIT */ /*_.VALROUT___V1751*/ meltfptr[1750] = (melt_ptr_t) & cdat->drout_1576__NORMEXP_EXIT; cdat->drout_1576__NORMEXP_EXIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1576__NORMEXP_EXIT.routdescr, "NORMEXP_EXIT @warmelt-normal.melt:3546", MELT_ROUTDESCR_LEN - 1); cdat->drout_1576__NORMEXP_EXIT.nbval = 15; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1576__NORMEXP_EXIT, meltrout_82_warmelt_normal_NORMEXP_EXIT); /*iniclos dclo_1577__NORMEXP_EXIT */ /*_.VALCLO___V1754*/ meltfptr[1753] = (melt_ptr_t) & cdat->dclo_1577__NORMEXP_EXIT; cdat->dclo_1577__NORMEXP_EXIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1577__NORMEXP_EXIT.nbval = 0; /*iniobj dsym_1578__CLASS_SOURCE_EXIT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1755*/ meltfptr[1754]) /*_.VALDATA___V1755*/ meltfptr[1754] = (melt_ptr_t) & cdat->dsym_1578__CLASS_SOURCE_EXIT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1578__CLASS_SOURCE_EXIT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1578__CLASS_SOURCE_EXIT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1578__CLASS_SOURCE_EXIT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1578__CLASS_SOURCE_EXIT.obj_hash = 6060516; cdat->dsym_1578__CLASS_SOURCE_EXIT.obj_len = 3; /*inistring dstr_1579__CLASS_SOURCE_EXI*/ /*_.VALSTR___V1756*/ meltfptr[1755] = (melt_ptr_t) & cdat->dstr_1579__CLASS_SOURCE_EXI; cdat->dstr_1579__CLASS_SOURCE_EXI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1579__CLASS_SOURCE_EXI.val, "CLASS_SOURCE_EXIT", sizeof (cdat->dstr_1579__CLASS_SOURCE_EXI. val) - 1); cdat->dstr_1579__CLASS_SOURCE_EXI.val[17] = (char) 0; cdat->dstr_1579__CLASS_SOURCE_EXI.slen = 17; /*iniobj dsym_1580__EXIT_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1752*/ meltfptr[1751]) /*_.VALDATA___V1752*/ meltfptr[1751] = (melt_ptr_t) & cdat->dsym_1580__EXIT_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1580__EXIT_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1580__EXIT_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1580__EXIT_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1580__EXIT_.obj_hash = 45060757; cdat->dsym_1580__EXIT_.obj_len = 3; /*inistring dstr_1581__EXIT_*/ /*_.VALSTR___V1753*/ meltfptr[1752] = (melt_ptr_t) & cdat->dstr_1581__EXIT_; cdat->dstr_1581__EXIT_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1581__EXIT_.val, "EXIT_", sizeof (cdat->dstr_1581__EXIT_.val) - 1); cdat->dstr_1581__EXIT_.val[5] = (char) 0; cdat->dstr_1581__EXIT_.slen = 5; /*inirout drout_1582__NORMEXP_AGAIN */ /*_.VALROUT___V1757*/ meltfptr[1756] = (melt_ptr_t) & cdat->drout_1582__NORMEXP_AGAIN; cdat->drout_1582__NORMEXP_AGAIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1582__NORMEXP_AGAIN.routdescr, "NORMEXP_AGAIN @warmelt-normal.melt:3588", MELT_ROUTDESCR_LEN - 1); cdat->drout_1582__NORMEXP_AGAIN.nbval = 11; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1582__NORMEXP_AGAIN, meltrout_83_warmelt_normal_NORMEXP_AGAIN); /*iniclos dclo_1583__NORMEXP_AGAIN */ /*_.VALCLO___V1760*/ meltfptr[1759] = (melt_ptr_t) & cdat->dclo_1583__NORMEXP_AGAIN; cdat->dclo_1583__NORMEXP_AGAIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1583__NORMEXP_AGAIN.nbval = 0; /*iniobj dsym_1584__CLASS_SOURCE_AGAIN*/ /*uniqueobj*/ if (! /*_.VALDATA___V1761*/ meltfptr[1760]) /*_.VALDATA___V1761*/ meltfptr[1760] = (melt_ptr_t) & cdat->dsym_1584__CLASS_SOURCE_AGAIN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1584__CLASS_SOURCE_AGAIN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1584__CLASS_SOURCE_AGAIN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1584__CLASS_SOURCE_AGAIN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1584__CLASS_SOURCE_AGAIN.obj_hash = 533538030; cdat->dsym_1584__CLASS_SOURCE_AGAIN.obj_len = 3; /*inistring dstr_1585__CLASS_SOURCE_AGA*/ /*_.VALSTR___V1762*/ meltfptr[1761] = (melt_ptr_t) & cdat->dstr_1585__CLASS_SOURCE_AGA; cdat->dstr_1585__CLASS_SOURCE_AGA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1585__CLASS_SOURCE_AGA.val, "CLASS_SOURCE_AGAIN", sizeof (cdat->dstr_1585__CLASS_SOURCE_AGA. val) - 1); cdat->dstr_1585__CLASS_SOURCE_AGA.val[18] = (char) 0; cdat->dstr_1585__CLASS_SOURCE_AGA.slen = 18; /*iniobj dsym_1586__AGAIN_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1758*/ meltfptr[1757]) /*_.VALDATA___V1758*/ meltfptr[1757] = (melt_ptr_t) & cdat->dsym_1586__AGAIN_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1586__AGAIN_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1586__AGAIN_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1586__AGAIN_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1586__AGAIN_.obj_hash = 705613934; cdat->dsym_1586__AGAIN_.obj_len = 3; /*inistring dstr_1587__AGAIN_*/ /*_.VALSTR___V1759*/ meltfptr[1758] = (melt_ptr_t) & cdat->dstr_1587__AGAIN_; cdat->dstr_1587__AGAIN_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1587__AGAIN_.val, "AGAIN_", sizeof (cdat->dstr_1587__AGAIN_.val) - 1); cdat->dstr_1587__AGAIN_.val[6] = (char) 0; cdat->dstr_1587__AGAIN_.slen = 6; /*inirout drout_1588__NORMEXP_IFVARIADIC */ /*_.VALROUT___V1763*/ meltfptr[1762] = (melt_ptr_t) & cdat->drout_1588__NORMEXP_IFVARIADIC; cdat->drout_1588__NORMEXP_IFVARIADIC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1588__NORMEXP_IFVARIADIC.routdescr, "NORMEXP_IFVARIADIC @warmelt-normal.melt:3620", MELT_ROUTDESCR_LEN - 1); cdat->drout_1588__NORMEXP_IFVARIADIC.nbval = 26; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1588__NORMEXP_IFVARIADIC, meltrout_84_warmelt_normal_NORMEXP_IFVARIADIC); /*iniclos dclo_1589__NORMEXP_IFVARIADIC */ /*_.VALCLO___V1768*/ meltfptr[1767] = (melt_ptr_t) & cdat->dclo_1589__NORMEXP_IFVARIADIC; cdat->dclo_1589__NORMEXP_IFVARIADIC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1589__NORMEXP_IFVARIADIC.nbval = 0; /*iniobj dsym_1590__CLASS_SOURCE_IFVARIADIC*/ /*uniqueobj*/ if (! /*_.VALDATA___V1769*/ meltfptr[1768]) /*_.VALDATA___V1769*/ meltfptr[1768] = (melt_ptr_t) & cdat->dsym_1590__CLASS_SOURCE_IFVARIADIC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1590__CLASS_SOURCE_IFVARIADIC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1590__CLASS_SOURCE_IFVARIADIC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1590__CLASS_SOURCE_IFVARIADIC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1590__CLASS_SOURCE_IFVARIADIC.obj_hash = 590232230; cdat->dsym_1590__CLASS_SOURCE_IFVARIADIC.obj_len = 3; /*inistring dstr_1591__CLASS_SOURCE_IFV*/ /*_.VALSTR___V1770*/ meltfptr[1769] = (melt_ptr_t) & cdat->dstr_1591__CLASS_SOURCE_IFV; cdat->dstr_1591__CLASS_SOURCE_IFV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1591__CLASS_SOURCE_IFV.val, "CLASS_SOURCE_IFVARIADIC", sizeof (cdat->dstr_1591__CLASS_SOURCE_IFV. val) - 1); cdat->dstr_1591__CLASS_SOURCE_IFV.val[23] = (char) 0; cdat->dstr_1591__CLASS_SOURCE_IFV.slen = 23; /*iniobj dsym_1592__DISCR_VARIADIC_FORMAL_SEQUENCE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1771*/ meltfptr[1770]) /*_.VALDATA___V1771*/ meltfptr[1770] = (melt_ptr_t) & cdat->dsym_1592__DISCR_VARIADIC_FORMAL_SEQUENCE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1592__DISCR_VARIADIC_FORMAL_SEQUENCE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1592__DISCR_VARIADIC_FORMAL_SEQUENCE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1592__DISCR_VARIADIC_FORMAL_SEQUENCE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1592__DISCR_VARIADIC_FORMAL_SEQUENCE.obj_hash = 554919860; cdat->dsym_1592__DISCR_VARIADIC_FORMAL_SEQUENCE.obj_len = 3; /*inistring dstr_1593__DISCR_VARIADIC_F*/ /*_.VALSTR___V1772*/ meltfptr[1771] = (melt_ptr_t) & cdat->dstr_1593__DISCR_VARIADIC_F; cdat->dstr_1593__DISCR_VARIADIC_F.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1593__DISCR_VARIADIC_F.val, "DISCR_VARIADIC_FORMAL_SEQUENCE", sizeof (cdat->dstr_1593__DISCR_VARIADIC_F. val) - 1); cdat->dstr_1593__DISCR_VARIADIC_F.val[30] = (char) 0; cdat->dstr_1593__DISCR_VARIADIC_F.slen = 30; /*iniobj dsym_1594__CONSUMVARIADIC_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1764*/ meltfptr[1763]) /*_.VALDATA___V1764*/ meltfptr[1763] = (melt_ptr_t) & cdat->dsym_1594__CONSUMVARIADIC_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1594__CONSUMVARIADIC_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1594__CONSUMVARIADIC_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1594__CONSUMVARIADIC_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1594__CONSUMVARIADIC_.obj_hash = 536568603; cdat->dsym_1594__CONSUMVARIADIC_.obj_len = 3; /*inistring dstr_1595__CONSUMVARIADIC_*/ /*_.VALSTR___V1765*/ meltfptr[1764] = (melt_ptr_t) & cdat->dstr_1595__CONSUMVARIADIC_; cdat->dstr_1595__CONSUMVARIADIC_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1595__CONSUMVARIADIC_.val, "CONSUMVARIADIC_", sizeof (cdat->dstr_1595__CONSUMVARIADIC_. val) - 1); cdat->dstr_1595__CONSUMVARIADIC_.val[15] = (char) 0; cdat->dstr_1595__CONSUMVARIADIC_.slen = 15; /*iniobj dsym_1596__IFVARIADIC_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1766*/ meltfptr[1765]) /*_.VALDATA___V1766*/ meltfptr[1765] = (melt_ptr_t) & cdat->dsym_1596__IFVARIADIC_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1596__IFVARIADIC_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1596__IFVARIADIC_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1596__IFVARIADIC_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1596__IFVARIADIC_.obj_hash = 218607229; cdat->dsym_1596__IFVARIADIC_.obj_len = 3; /*inistring dstr_1597__IFVARIADIC_*/ /*_.VALSTR___V1767*/ meltfptr[1766] = (melt_ptr_t) & cdat->dstr_1597__IFVARIADIC_; cdat->dstr_1597__IFVARIADIC_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1597__IFVARIADIC_.val, "IFVARIADIC_", sizeof (cdat->dstr_1597__IFVARIADIC_.val) - 1); cdat->dstr_1597__IFVARIADIC_.val[11] = (char) 0; cdat->dstr_1597__IFVARIADIC_.slen = 11; /*inirout drout_1598__NORMEXP_COMPILEWARNING */ /*_.VALROUT___V1773*/ meltfptr[1772] = (melt_ptr_t) & cdat->drout_1598__NORMEXP_COMPILEWARNING; cdat->drout_1598__NORMEXP_COMPILEWARNING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1598__NORMEXP_COMPILEWARNING.routdescr, "NORMEXP_COMPILEWARNING @warmelt-normal.melt:3758", MELT_ROUTDESCR_LEN - 1); cdat->drout_1598__NORMEXP_COMPILEWARNING.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1598__NORMEXP_COMPILEWARNING, meltrout_85_warmelt_normal_NORMEXP_COMPILEWARNING); /*iniclos dclo_1599__NORMEXP_COMPILEWARNING */ /*_.VALCLO___V1774*/ meltfptr[1773] = (melt_ptr_t) & cdat->dclo_1599__NORMEXP_COMPILEWARNING; cdat->dclo_1599__NORMEXP_COMPILEWARNING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1599__NORMEXP_COMPILEWARNING.nbval = 0; /*iniobj dsym_1600__CLASS_SOURCE_COMPILEWARNING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1775*/ meltfptr[1774]) /*_.VALDATA___V1775*/ meltfptr[1774] = (melt_ptr_t) & cdat->dsym_1600__CLASS_SOURCE_COMPILEWARNING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1600__CLASS_SOURCE_COMPILEWARNING", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1600__CLASS_SOURCE_COMPILEWARNING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1600__CLASS_SOURCE_COMPILEWARNING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1600__CLASS_SOURCE_COMPILEWARNING.obj_hash = 32120446; cdat->dsym_1600__CLASS_SOURCE_COMPILEWARNING.obj_len = 3; /*inistring dstr_1601__CLASS_SOURCE_COM*/ /*_.VALSTR___V1776*/ meltfptr[1775] = (melt_ptr_t) & cdat->dstr_1601__CLASS_SOURCE_COM; cdat->dstr_1601__CLASS_SOURCE_COM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1601__CLASS_SOURCE_COM.val, "CLASS_SOURCE_COMPILEWARNING", sizeof (cdat->dstr_1601__CLASS_SOURCE_COM. val) - 1); cdat->dstr_1601__CLASS_SOURCE_COM.val[27] = (char) 0; cdat->dstr_1601__CLASS_SOURCE_COM.slen = 27; /*inirout drout_1602__LAMBDA_ */ /*_.VALROUT___V1777*/ meltfptr[1776] = (melt_ptr_t) & cdat->drout_1602__LAMBDA_; cdat->drout_1602__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1602__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:3777", MELT_ROUTDESCR_LEN - 1); cdat->drout_1602__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1602__LAMBDA_, meltrout_86_warmelt_normal_LAMBDA___33__); /*inirout drout_1603__REPLACE_LAST_BY_RETURN */ /*_.VALROUT___V1778*/ meltfptr[1777] = (melt_ptr_t) & cdat->drout_1603__REPLACE_LAST_BY_RETURN; cdat->drout_1603__REPLACE_LAST_BY_RETURN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1603__REPLACE_LAST_BY_RETURN.routdescr, "REPLACE_LAST_BY_RETURN @warmelt-normal.melt:3781", MELT_ROUTDESCR_LEN - 1); cdat->drout_1603__REPLACE_LAST_BY_RETURN.nbval = 17; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1603__REPLACE_LAST_BY_RETURN, meltrout_87_warmelt_normal_REPLACE_LAST_BY_RETURN); /*iniclos dclo_1604__REPLACE_LAST_BY_RETURN */ /*_.VALCLO___V1780*/ meltfptr[1779] = (melt_ptr_t) & cdat->dclo_1604__REPLACE_LAST_BY_RETURN; cdat->dclo_1604__REPLACE_LAST_BY_RETURN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1604__REPLACE_LAST_BY_RETURN.nbval = 0; /*inirout drout_1605__LAMBDA_ */ /*_.VALROUT___V1779*/ meltfptr[1778] = (melt_ptr_t) & cdat->drout_1605__LAMBDA_; cdat->drout_1605__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1605__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:3823", MELT_ROUTDESCR_LEN - 1); cdat->drout_1605__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1605__LAMBDA_, meltrout_88_warmelt_normal_LAMBDA___34__); /*iniobj dsym_1606__RETVAL_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1781*/ meltfptr[1780]) /*_.VALDATA___V1781*/ meltfptr[1780] = (melt_ptr_t) & cdat->dsym_1606__RETVAL_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1606__RETVAL_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1606__RETVAL_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1606__RETVAL_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1606__RETVAL_.obj_hash = 101078457; cdat->dsym_1606__RETVAL_.obj_len = 3; /*inistring dstr_1607__RETVAL_*/ /*_.VALSTR___V1782*/ meltfptr[1781] = (melt_ptr_t) & cdat->dstr_1607__RETVAL_; cdat->dstr_1607__RETVAL_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1607__RETVAL_.val, "_RETVAL_", sizeof (cdat->dstr_1607__RETVAL_.val) - 1); cdat->dstr_1607__RETVAL_.val[8] = (char) 0; cdat->dstr_1607__RETVAL_.slen = 8; /*inirout drout_1608__NORMEXP_DEFUN */ /*_.VALROUT___V1783*/ meltfptr[1782] = (melt_ptr_t) & cdat->drout_1608__NORMEXP_DEFUN; cdat->drout_1608__NORMEXP_DEFUN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1608__NORMEXP_DEFUN.routdescr, "NORMEXP_DEFUN @warmelt-normal.melt:3872", MELT_ROUTDESCR_LEN - 1); cdat->drout_1608__NORMEXP_DEFUN.nbval = 33; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1608__NORMEXP_DEFUN, meltrout_89_warmelt_normal_NORMEXP_DEFUN); /*iniclos dclo_1609__NORMEXP_DEFUN */ /*_.VALCLO___V1786*/ meltfptr[1785] = (melt_ptr_t) & cdat->dclo_1609__NORMEXP_DEFUN; cdat->dclo_1609__NORMEXP_DEFUN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1609__NORMEXP_DEFUN.nbval = 0; /*iniobj dsym_1610__CLASS_SOURCE_DEFUN*/ /*uniqueobj*/ if (! /*_.VALDATA___V1787*/ meltfptr[1786]) /*_.VALDATA___V1787*/ meltfptr[1786] = (melt_ptr_t) & cdat->dsym_1610__CLASS_SOURCE_DEFUN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1610__CLASS_SOURCE_DEFUN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1610__CLASS_SOURCE_DEFUN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1610__CLASS_SOURCE_DEFUN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1610__CLASS_SOURCE_DEFUN.obj_hash = 872711296; cdat->dsym_1610__CLASS_SOURCE_DEFUN.obj_len = 3; /*inistring dstr_1611__CLASS_SOURCE_DEF*/ /*_.VALSTR___V1788*/ meltfptr[1787] = (melt_ptr_t) & cdat->dstr_1611__CLASS_SOURCE_DEF; cdat->dstr_1611__CLASS_SOURCE_DEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1611__CLASS_SOURCE_DEF.val, "CLASS_SOURCE_DEFUN", sizeof (cdat->dstr_1611__CLASS_SOURCE_DEF. val) - 1); cdat->dstr_1611__CLASS_SOURCE_DEF.val[18] = (char) 0; cdat->dstr_1611__CLASS_SOURCE_DEF.slen = 18; /*iniobj dsym_1612__CLASS_FUNCTION_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1789*/ meltfptr[1788]) /*_.VALDATA___V1789*/ meltfptr[1788] = (melt_ptr_t) & cdat->dsym_1612__CLASS_FUNCTION_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1612__CLASS_FUNCTION_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_1612__CLASS_FUNCTION_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1612__CLASS_FUNCTION_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1612__CLASS_FUNCTION_BINDING.obj_hash = 942362333; cdat->dsym_1612__CLASS_FUNCTION_BINDING.obj_len = 3; /*inistring dstr_1613__CLASS_FUNCTION_B*/ /*_.VALSTR___V1790*/ meltfptr[1789] = (melt_ptr_t) & cdat->dstr_1613__CLASS_FUNCTION_B; cdat->dstr_1613__CLASS_FUNCTION_B.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1613__CLASS_FUNCTION_B.val, "CLASS_FUNCTION_BINDING", sizeof (cdat->dstr_1613__CLASS_FUNCTION_B. val) - 1); cdat->dstr_1613__CLASS_FUNCTION_B.val[22] = (char) 0; cdat->dstr_1613__CLASS_FUNCTION_B.slen = 22; /*inirout drout_1614__LAMBDA_ */ /*_.VALROUT___V1784*/ meltfptr[1783] = (melt_ptr_t) & cdat->drout_1614__LAMBDA_; cdat->drout_1614__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1614__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:3940", MELT_ROUTDESCR_LEN - 1); cdat->drout_1614__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1614__LAMBDA_, meltrout_90_warmelt_normal_LAMBDA___35__); /*inirout drout_1615__LAMBDA_ */ /*_.VALROUT___V1785*/ meltfptr[1784] = (melt_ptr_t) & cdat->drout_1615__LAMBDA_; cdat->drout_1615__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1615__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:3953", MELT_ROUTDESCR_LEN - 1); cdat->drout_1615__LAMBDA_.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1615__LAMBDA_, meltrout_91_warmelt_normal_LAMBDA___36__); /*inirout drout_1616__NORMALIZE_LAMBDA */ /*_.VALROUT___V1791*/ meltfptr[1790] = (melt_ptr_t) & cdat->drout_1616__NORMALIZE_LAMBDA; cdat->drout_1616__NORMALIZE_LAMBDA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1616__NORMALIZE_LAMBDA.routdescr, "NORMALIZE_LAMBDA @warmelt-normal.melt:3978", MELT_ROUTDESCR_LEN - 1); cdat->drout_1616__NORMALIZE_LAMBDA.nbval = 28; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1616__NORMALIZE_LAMBDA, meltrout_92_warmelt_normal_NORMALIZE_LAMBDA); /*iniclos dclo_1617__NORMALIZE_LAMBDA */ /*_.VALCLO___V1795*/ meltfptr[1794] = (melt_ptr_t) & cdat->dclo_1617__NORMALIZE_LAMBDA; cdat->dclo_1617__NORMALIZE_LAMBDA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1617__NORMALIZE_LAMBDA.nbval = 0; /*iniobj dsym_1618__CLASS_SOURCE_LAMBDA*/ /*uniqueobj*/ if (! /*_.VALDATA___V1796*/ meltfptr[1795]) /*_.VALDATA___V1796*/ meltfptr[1795] = (melt_ptr_t) & cdat->dsym_1618__CLASS_SOURCE_LAMBDA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1618__CLASS_SOURCE_LAMBDA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1618__CLASS_SOURCE_LAMBDA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1618__CLASS_SOURCE_LAMBDA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1618__CLASS_SOURCE_LAMBDA.obj_hash = 825809316; cdat->dsym_1618__CLASS_SOURCE_LAMBDA.obj_len = 3; /*inistring dstr_1619__CLASS_SOURCE_LAM*/ /*_.VALSTR___V1797*/ meltfptr[1796] = (melt_ptr_t) & cdat->dstr_1619__CLASS_SOURCE_LAM; cdat->dstr_1619__CLASS_SOURCE_LAM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1619__CLASS_SOURCE_LAM.val, "CLASS_SOURCE_LAMBDA", sizeof (cdat->dstr_1619__CLASS_SOURCE_LAM. val) - 1); cdat->dstr_1619__CLASS_SOURCE_LAM.val[19] = (char) 0; cdat->dstr_1619__CLASS_SOURCE_LAM.slen = 19; /*iniobj dsym_1620__LAMBDA_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1792*/ meltfptr[1791]) /*_.VALDATA___V1792*/ meltfptr[1791] = (melt_ptr_t) & cdat->dsym_1620__LAMBDA_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1620__LAMBDA_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1620__LAMBDA_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1620__LAMBDA_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1620__LAMBDA_.obj_hash = 19331678; cdat->dsym_1620__LAMBDA_.obj_len = 3; /*inistring dstr_1621__LAMBDA_*/ /*_.VALSTR___V1793*/ meltfptr[1792] = (melt_ptr_t) & cdat->dstr_1621__LAMBDA_; cdat->dstr_1621__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1621__LAMBDA_.val, "LAMBDA_", sizeof (cdat->dstr_1621__LAMBDA_.val) - 1); cdat->dstr_1621__LAMBDA_.val[7] = (char) 0; cdat->dstr_1621__LAMBDA_.slen = 7; /*inirout drout_1622__LAMBDA_ */ /*_.VALROUT___V1794*/ meltfptr[1793] = (melt_ptr_t) & cdat->drout_1622__LAMBDA_; cdat->drout_1622__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1622__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:4059", MELT_ROUTDESCR_LEN - 1); cdat->drout_1622__LAMBDA_.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1622__LAMBDA_, meltrout_93_warmelt_normal_LAMBDA___37__); /*inirout drout_1623__NORMEXP_LAMBDA */ /*_.VALROUT___V1798*/ meltfptr[1797] = (melt_ptr_t) & cdat->drout_1623__NORMEXP_LAMBDA; cdat->drout_1623__NORMEXP_LAMBDA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1623__NORMEXP_LAMBDA.routdescr, "NORMEXP_LAMBDA @warmelt-normal.melt:4073", MELT_ROUTDESCR_LEN - 1); cdat->drout_1623__NORMEXP_LAMBDA.nbval = 10; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1623__NORMEXP_LAMBDA, meltrout_94_warmelt_normal_NORMEXP_LAMBDA); /*iniclos dclo_1624__NORMEXP_LAMBDA */ /*_.VALCLO___V1799*/ meltfptr[1798] = (melt_ptr_t) & cdat->dclo_1624__NORMEXP_LAMBDA; cdat->dclo_1624__NORMEXP_LAMBDA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1624__NORMEXP_LAMBDA.nbval = 0; /*inirout drout_1625__NORMEXP_MULTICALL */ /*_.VALROUT___V1800*/ meltfptr[1799] = (melt_ptr_t) & cdat->drout_1625__NORMEXP_MULTICALL; cdat->drout_1625__NORMEXP_MULTICALL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1625__NORMEXP_MULTICALL.routdescr, "NORMEXP_MULTICALL @warmelt-normal.melt:4109", MELT_ROUTDESCR_LEN - 1); cdat->drout_1625__NORMEXP_MULTICALL.nbval = 30; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1625__NORMEXP_MULTICALL, meltrout_95_warmelt_normal_NORMEXP_MULTICALL); /*iniclos dclo_1626__NORMEXP_MULTICALL */ /*_.VALCLO___V1806*/ meltfptr[1805] = (melt_ptr_t) & cdat->dclo_1626__NORMEXP_MULTICALL; cdat->dclo_1626__NORMEXP_MULTICALL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1626__NORMEXP_MULTICALL.nbval = 0; /*iniobj dsym_1627__CLASS_SOURCE_MULTICALL*/ /*uniqueobj*/ if (! /*_.VALDATA___V1807*/ meltfptr[1806]) /*_.VALDATA___V1807*/ meltfptr[1806] = (melt_ptr_t) & cdat->dsym_1627__CLASS_SOURCE_MULTICALL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1627__CLASS_SOURCE_MULTICALL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1627__CLASS_SOURCE_MULTICALL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1627__CLASS_SOURCE_MULTICALL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1627__CLASS_SOURCE_MULTICALL.obj_hash = 367933626; cdat->dsym_1627__CLASS_SOURCE_MULTICALL.obj_len = 3; /*inistring dstr_1628__CLASS_SOURCE_MUL*/ /*_.VALSTR___V1808*/ meltfptr[1807] = (melt_ptr_t) & cdat->dstr_1628__CLASS_SOURCE_MUL; cdat->dstr_1628__CLASS_SOURCE_MUL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1628__CLASS_SOURCE_MUL.val, "CLASS_SOURCE_MULTICALL", sizeof (cdat->dstr_1628__CLASS_SOURCE_MUL. val) - 1); cdat->dstr_1628__CLASS_SOURCE_MUL.val[22] = (char) 0; cdat->dstr_1628__CLASS_SOURCE_MUL.slen = 22; /*iniobj dsym_1629__LIST_ITERATE_TEST*/ /*uniqueobj*/ if (! /*_.VALDATA___V1809*/ meltfptr[1808]) /*_.VALDATA___V1809*/ meltfptr[1808] = (melt_ptr_t) & cdat->dsym_1629__LIST_ITERATE_TEST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1629__LIST_ITERATE_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_1629__LIST_ITERATE_TEST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1629__LIST_ITERATE_TEST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1629__LIST_ITERATE_TEST.obj_hash = 561820482; cdat->dsym_1629__LIST_ITERATE_TEST.obj_len = 3; /*inistring dstr_1630__LIST_ITERATE_TES*/ /*_.VALSTR___V1810*/ meltfptr[1809] = (melt_ptr_t) & cdat->dstr_1630__LIST_ITERATE_TES; cdat->dstr_1630__LIST_ITERATE_TES.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1630__LIST_ITERATE_TES.val, "LIST_ITERATE_TEST", sizeof (cdat->dstr_1630__LIST_ITERATE_TES. val) - 1); cdat->dstr_1630__LIST_ITERATE_TES.val[17] = (char) 0; cdat->dstr_1630__LIST_ITERATE_TES.slen = 17; /*inirout drout_1631__LAMBDA_ */ /*_.VALROUT___V1801*/ meltfptr[1800] = (melt_ptr_t) & cdat->drout_1631__LAMBDA_; cdat->drout_1631__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1631__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:4136", MELT_ROUTDESCR_LEN - 1); cdat->drout_1631__LAMBDA_.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1631__LAMBDA_, meltrout_96_warmelt_normal_LAMBDA___38__); /*inirout drout_1632__LAMBDA_ */ /*_.VALROUT___V1802*/ meltfptr[1801] = (melt_ptr_t) & cdat->drout_1632__LAMBDA_; cdat->drout_1632__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1632__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:4149", MELT_ROUTDESCR_LEN - 1); cdat->drout_1632__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1632__LAMBDA_, meltrout_97_warmelt_normal_LAMBDA___39__); /*inirout drout_1633__LAMBDA_ */ /*_.VALROUT___V1803*/ meltfptr[1802] = (melt_ptr_t) & cdat->drout_1633__LAMBDA_; cdat->drout_1633__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1633__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:4159", MELT_ROUTDESCR_LEN - 1); cdat->drout_1633__LAMBDA_.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1633__LAMBDA_, meltrout_98_warmelt_normal_LAMBDA___40__); /*iniobj dsym_1634__MULTI_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1804*/ meltfptr[1803]) /*_.VALDATA___V1804*/ meltfptr[1803] = (melt_ptr_t) & cdat->dsym_1634__MULTI_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1634__MULTI_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1634__MULTI_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1634__MULTI_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1634__MULTI_.obj_hash = 39588045; cdat->dsym_1634__MULTI_.obj_len = 3; /*inistring dstr_1635__MULTI_*/ /*_.VALSTR___V1805*/ meltfptr[1804] = (melt_ptr_t) & cdat->dstr_1635__MULTI_; cdat->dstr_1635__MULTI_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1635__MULTI_.val, "MULTI_", sizeof (cdat->dstr_1635__MULTI_.val) - 1); cdat->dstr_1635__MULTI_.val[6] = (char) 0; cdat->dstr_1635__MULTI_.slen = 6; /*inirout drout_1636__NORMEXP_TUPLE */ /*_.VALROUT___V1811*/ meltfptr[1810] = (melt_ptr_t) & cdat->drout_1636__NORMEXP_TUPLE; cdat->drout_1636__NORMEXP_TUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1636__NORMEXP_TUPLE.routdescr, "NORMEXP_TUPLE @warmelt-normal.melt:4230", MELT_ROUTDESCR_LEN - 1); cdat->drout_1636__NORMEXP_TUPLE.nbval = 18; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1636__NORMEXP_TUPLE, meltrout_99_warmelt_normal_NORMEXP_TUPLE); /*iniclos dclo_1637__NORMEXP_TUPLE */ /*_.VALCLO___V1816*/ meltfptr[1815] = (melt_ptr_t) & cdat->dclo_1637__NORMEXP_TUPLE; cdat->dclo_1637__NORMEXP_TUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1637__NORMEXP_TUPLE.nbval = 0; /*iniobj dsym_1638__CLASS_SOURCE_TUPLE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1817*/ meltfptr[1816]) /*_.VALDATA___V1817*/ meltfptr[1816] = (melt_ptr_t) & cdat->dsym_1638__CLASS_SOURCE_TUPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1638__CLASS_SOURCE_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_1638__CLASS_SOURCE_TUPLE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1638__CLASS_SOURCE_TUPLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1638__CLASS_SOURCE_TUPLE.obj_hash = 303778336; cdat->dsym_1638__CLASS_SOURCE_TUPLE.obj_len = 3; /*inistring dstr_1639__CLASS_SOURCE_TUP*/ /*_.VALSTR___V1818*/ meltfptr[1817] = (melt_ptr_t) & cdat->dstr_1639__CLASS_SOURCE_TUP; cdat->dstr_1639__CLASS_SOURCE_TUP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1639__CLASS_SOURCE_TUP.val, "CLASS_SOURCE_TUPLE", sizeof (cdat->dstr_1639__CLASS_SOURCE_TUP. val) - 1); cdat->dstr_1639__CLASS_SOURCE_TUP.val[18] = (char) 0; cdat->dstr_1639__CLASS_SOURCE_TUP.slen = 18; /*iniobj dsym_1640__TUPLREC_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1812*/ meltfptr[1811]) /*_.VALDATA___V1812*/ meltfptr[1811] = (melt_ptr_t) & cdat->dsym_1640__TUPLREC_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1640__TUPLREC_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1640__TUPLREC_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1640__TUPLREC_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1640__TUPLREC_.obj_hash = 624043434; cdat->dsym_1640__TUPLREC_.obj_len = 3; /*inistring dstr_1641__TUPLREC_*/ /*_.VALSTR___V1813*/ meltfptr[1812] = (melt_ptr_t) & cdat->dstr_1641__TUPLREC_; cdat->dstr_1641__TUPLREC_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1641__TUPLREC_.val, "TUPLREC_", sizeof (cdat->dstr_1641__TUPLREC_.val) - 1); cdat->dstr_1641__TUPLREC_.val[8] = (char) 0; cdat->dstr_1641__TUPLREC_.slen = 8; /*iniobj dsym_1642__TUPLE_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1814*/ meltfptr[1813]) /*_.VALDATA___V1814*/ meltfptr[1813] = (melt_ptr_t) & cdat->dsym_1642__TUPLE_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1642__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_1642__TUPLE_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1642__TUPLE_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1642__TUPLE_.obj_hash = 954099050; cdat->dsym_1642__TUPLE_.obj_len = 3; /*inistring dstr_1643__TUPLE_*/ /*_.VALSTR___V1815*/ meltfptr[1814] = (melt_ptr_t) & cdat->dstr_1643__TUPLE_; cdat->dstr_1643__TUPLE_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1643__TUPLE_.val, "TUPLE_", sizeof (cdat->dstr_1643__TUPLE_.val) - 1); cdat->dstr_1643__TUPLE_.val[6] = (char) 0; cdat->dstr_1643__TUPLE_.slen = 6; /*inirout drout_1644__NORMEXP_LIST */ /*_.VALROUT___V1819*/ meltfptr[1818] = (melt_ptr_t) & cdat->drout_1644__NORMEXP_LIST; cdat->drout_1644__NORMEXP_LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1644__NORMEXP_LIST.routdescr, "NORMEXP_LIST @warmelt-normal.melt:4316", MELT_ROUTDESCR_LEN - 1); cdat->drout_1644__NORMEXP_LIST.nbval = 33; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1644__NORMEXP_LIST, meltrout_100_warmelt_normal_NORMEXP_LIST); /*iniclos dclo_1645__NORMEXP_LIST */ /*_.VALCLO___V1829*/ meltfptr[1828] = (melt_ptr_t) & cdat->dclo_1645__NORMEXP_LIST; cdat->dclo_1645__NORMEXP_LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1645__NORMEXP_LIST.nbval = 0; /*iniobj dsym_1646__CLASS_SOURCE_LIST*/ /*uniqueobj*/ if (! /*_.VALDATA___V1830*/ meltfptr[1829]) /*_.VALDATA___V1830*/ meltfptr[1829] = (melt_ptr_t) & cdat->dsym_1646__CLASS_SOURCE_LIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1646__CLASS_SOURCE_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_1646__CLASS_SOURCE_LIST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1646__CLASS_SOURCE_LIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1646__CLASS_SOURCE_LIST.obj_hash = 62834193; cdat->dsym_1646__CLASS_SOURCE_LIST.obj_len = 3; /*inistring dstr_1647__CLASS_SOURCE_LIS*/ /*_.VALSTR___V1831*/ meltfptr[1830] = (melt_ptr_t) & cdat->dstr_1647__CLASS_SOURCE_LIS; cdat->dstr_1647__CLASS_SOURCE_LIS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1647__CLASS_SOURCE_LIS.val, "CLASS_SOURCE_LIST", sizeof (cdat->dstr_1647__CLASS_SOURCE_LIS. val) - 1); cdat->dstr_1647__CLASS_SOURCE_LIS.val[17] = (char) 0; cdat->dstr_1647__CLASS_SOURCE_LIS.slen = 17; /*iniobj dsym_1648__LISTREC_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1820*/ meltfptr[1819]) /*_.VALDATA___V1820*/ meltfptr[1819] = (melt_ptr_t) & cdat->dsym_1648__LISTREC_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1648__LISTREC_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1648__LISTREC_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1648__LISTREC_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1648__LISTREC_.obj_hash = 225014417; cdat->dsym_1648__LISTREC_.obj_len = 3; /*inistring dstr_1649__LISTREC_*/ /*_.VALSTR___V1821*/ meltfptr[1820] = (melt_ptr_t) & cdat->dstr_1649__LISTREC_; cdat->dstr_1649__LISTREC_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1649__LISTREC_.val, "LISTREC_", sizeof (cdat->dstr_1649__LISTREC_.val) - 1); cdat->dstr_1649__LISTREC_.val[8] = (char) 0; cdat->dstr_1649__LISTREC_.slen = 8; /*iniobj dsym_1650__LIST_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1822*/ meltfptr[1821]) /*_.VALDATA___V1822*/ meltfptr[1821] = (melt_ptr_t) & cdat->dsym_1650__LIST_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1650__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_1650__LIST_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1650__LIST_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1650__LIST_.obj_hash = 847365514; cdat->dsym_1650__LIST_.obj_len = 3; /*inistring dstr_1651__LIST_*/ /*_.VALSTR___V1823*/ meltfptr[1822] = (melt_ptr_t) & cdat->dstr_1651__LIST_; cdat->dstr_1651__LIST_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1651__LIST_.val, "LIST_", sizeof (cdat->dstr_1651__LIST_.val) - 1); cdat->dstr_1651__LIST_.val[5] = (char) 0; cdat->dstr_1651__LIST_.slen = 5; /*inirout drout_1652__LAMBDA_ */ /*_.VALROUT___V1826*/ meltfptr[1825] = (melt_ptr_t) & cdat->drout_1652__LAMBDA_; cdat->drout_1652__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1652__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:4334", MELT_ROUTDESCR_LEN - 1); cdat->drout_1652__LAMBDA_.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1652__LAMBDA_, meltrout_101_warmelt_normal_LAMBDA___41__); /*iniobj dsym_1653__PREPARE_CONSTRUCTOR_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1832*/ meltfptr[1831]) /*_.VALDATA___V1832*/ meltfptr[1831] = (melt_ptr_t) & cdat->dsym_1653__PREPARE_CONSTRUCTOR_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1653__PREPARE_CONSTRUCTOR_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_1653__PREPARE_CONSTRUCTOR_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1653__PREPARE_CONSTRUCTOR_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1653__PREPARE_CONSTRUCTOR_BINDING.obj_hash = 361978117; cdat->dsym_1653__PREPARE_CONSTRUCTOR_BINDING.obj_len = 3; /*inistring dstr_1654__PREPARE_CONSTRUC*/ /*_.VALSTR___V1833*/ meltfptr[1832] = (melt_ptr_t) & cdat->dstr_1654__PREPARE_CONSTRUC; cdat->dstr_1654__PREPARE_CONSTRUC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1654__PREPARE_CONSTRUC.val, "PREPARE_CONSTRUCTOR_BINDING", sizeof (cdat->dstr_1654__PREPARE_CONSTRUC. val) - 1); cdat->dstr_1654__PREPARE_CONSTRUC.val[27] = (char) 0; cdat->dstr_1654__PREPARE_CONSTRUC.slen = 27; MELT_LOCATION ("warmelt-normal.melt:4455:/ iniobj"); /*iniobj dobj_1655*/ /*_.VALDATA___V1834*/ meltfptr[1833] = (melt_ptr_t) & cdat->dobj_1655; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1655", 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_1655", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1655.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1655.obj_num = 0; cdat->dobj_1655.obj_hash = 419196294; cdat->dobj_1655.obj_len = 2; /*iniobj dsym_1656__SYMB*/ /*uniqueobj*/ if (! /*_.VALDATA___V1835*/ meltfptr[1834]) /*_.VALDATA___V1835*/ meltfptr[1834] = (melt_ptr_t) & cdat->dsym_1656__SYMB; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1656__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_1656__SYMB", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1656__SYMB.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1656__SYMB.obj_hash = 924605854; cdat->dsym_1656__SYMB.obj_len = 3; /*inistring dstr_1657__SYMB*/ /*_.VALSTR___V1836*/ meltfptr[1835] = (melt_ptr_t) & cdat->dstr_1657__SYMB; cdat->dstr_1657__SYMB.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1657__SYMB.val, "SYMB", sizeof (cdat->dstr_1657__SYMB.val) - 1); cdat->dstr_1657__SYMB.val[4] = (char) 0; cdat->dstr_1657__SYMB.slen = 4; /*^iniobj */ /*iniobj dobj_1658*/ /*_.VALDATA___V1837*/ meltfptr[1836] = (melt_ptr_t) & cdat->dobj_1658; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1658", 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_1658", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1658.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1658.obj_num = 1; cdat->dobj_1658.obj_hash = 1013335678; cdat->dobj_1658.obj_len = 2; /*^iniobj */ /*iniobj dobj_1659*/ /*_.VALDATA___V1838*/ meltfptr[1837] = (melt_ptr_t) & cdat->dobj_1659; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1659", 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_1659", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1659.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1659.obj_num = 2; cdat->dobj_1659.obj_hash = 952394759; cdat->dobj_1659.obj_len = 2; /*iniobj dsym_1660__SLOC*/ /*uniqueobj*/ if (! /*_.VALDATA___V1839*/ meltfptr[1838]) /*_.VALDATA___V1839*/ meltfptr[1838] = (melt_ptr_t) & cdat->dsym_1660__SLOC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1660__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_1660__SLOC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1660__SLOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1660__SLOC.obj_hash = 214022047; cdat->dsym_1660__SLOC.obj_len = 3; /*inistring dstr_1661__SLOC*/ /*_.VALSTR___V1840*/ meltfptr[1839] = (melt_ptr_t) & cdat->dstr_1661__SLOC; cdat->dstr_1661__SLOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1661__SLOC.val, "SLOC", sizeof (cdat->dstr_1661__SLOC.val) - 1); cdat->dstr_1661__SLOC.val[4] = (char) 0; cdat->dstr_1661__SLOC.slen = 4; /*^iniobj */ /*iniobj dobj_1662*/ /*_.VALDATA___V1841*/ meltfptr[1840] = (melt_ptr_t) & cdat->dobj_1662; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1662", 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_1662", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1662.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1662.obj_num = 3; cdat->dobj_1662.obj_hash = 975716102; cdat->dobj_1662.obj_len = 2; /*inimult dtup_1663__PREPARE_CONSTRUCTOR_BINDING */ /*_.VALTUP___V1842*/ meltfptr[1841] = (melt_ptr_t) & cdat->dtup_1663__PREPARE_CONSTRUCTOR_BINDING; cdat->dtup_1663__PREPARE_CONSTRUCTOR_BINDING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_MULTIPLE)))); cdat->dtup_1663__PREPARE_CONSTRUCTOR_BINDING.nbval = 4; /*^iniobj */ /*iniobj dobj_1664__PREPARE_CONSTRUCTOR_BINDING*/ /*_.VALDATA___V1824*/ meltfptr[1823] = (melt_ptr_t) & cdat->dobj_1664__PREPARE_CONSTRUCTOR_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1664__PREPARE_CONSTRUCTOR_BINDING", melt_magic_discr ((melt_ptr_t) ( /*_.CLASS_SELECTOR__V20*/ meltfptr[19])) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1664__PREPARE_CONSTRUCTOR_BINDING", ((meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V20*/ meltfptr[19]))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1664__PREPARE_CONSTRUCTOR_BINDING.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V20*/ meltfptr[19]); cdat->dobj_1664__PREPARE_CONSTRUCTOR_BINDING.obj_hash = 1060204657; cdat->dobj_1664__PREPARE_CONSTRUCTOR_BINDING.obj_len = 4; /*inistring dstr_1665__PREPARE_CONSTRUC*/ /*_.VALSTR___V1825*/ meltfptr[1824] = (melt_ptr_t) & cdat->dstr_1665__PREPARE_CONSTRUC; cdat->dstr_1665__PREPARE_CONSTRUC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1665__PREPARE_CONSTRUC.val, "PREPARE_CONSTRUCTOR_BINDING", sizeof (cdat->dstr_1665__PREPARE_CONSTRUC. val) - 1); cdat->dstr_1665__PREPARE_CONSTRUC.val[27] = (char) 0; cdat->dstr_1665__PREPARE_CONSTRUC.slen = 27; /*inirout drout_1666__BADMETH_PREPARE_CONSTRUCTOR_BINDING */ /*_.VALROUT___V1843*/ meltfptr[1842] = (melt_ptr_t) & cdat->drout_1666__BADMETH_PREPARE_CONSTRUCTOR_BINDING; cdat->drout_1666__BADMETH_PREPARE_CONSTRUCTOR_BINDING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1666__BADMETH_PREPARE_CONSTRUCTOR_BINDING.routdescr, "BADMETH_PREPARE_CONSTRUCTOR_BINDING @warmelt-normal.melt:4463", MELT_ROUTDESCR_LEN - 1); cdat->drout_1666__BADMETH_PREPARE_CONSTRUCTOR_BINDING.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat-> drout_1666__BADMETH_PREPARE_CONSTRUCTOR_BINDING, meltrout_102_warmelt_normal_BADMETH_PREPARE_CONSTRUCTOR_BINDING); /*iniclos dclo_1667__BADMETH_PREPARE_CONSTRUCTOR_BINDING */ /*_.VALCLO___V1844*/ meltfptr[1843] = (melt_ptr_t) & cdat->dclo_1667__BADMETH_PREPARE_CONSTRUCTOR_BINDING; cdat->dclo_1667__BADMETH_PREPARE_CONSTRUCTOR_BINDING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1667__BADMETH_PREPARE_CONSTRUCTOR_BINDING.nbval = 0; /*iniobj dsym_1668__NORMAL_LETREC_CONSTRUCTIVE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1845*/ meltfptr[1844]) /*_.VALDATA___V1845*/ meltfptr[1844] = (melt_ptr_t) & cdat->dsym_1668__NORMAL_LETREC_CONSTRUCTIVE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1668__NORMAL_LETREC_CONSTRUCTIVE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1668__NORMAL_LETREC_CONSTRUCTIVE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1668__NORMAL_LETREC_CONSTRUCTIVE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1668__NORMAL_LETREC_CONSTRUCTIVE.obj_hash = 406025420; cdat->dsym_1668__NORMAL_LETREC_CONSTRUCTIVE.obj_len = 3; /*inistring dstr_1669__NORMAL_LETREC_CO*/ /*_.VALSTR___V1846*/ meltfptr[1845] = (melt_ptr_t) & cdat->dstr_1669__NORMAL_LETREC_CO; cdat->dstr_1669__NORMAL_LETREC_CO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1669__NORMAL_LETREC_CO.val, "NORMAL_LETREC_CONSTRUCTIVE", sizeof (cdat->dstr_1669__NORMAL_LETREC_CO. val) - 1); cdat->dstr_1669__NORMAL_LETREC_CO.val[26] = (char) 0; cdat->dstr_1669__NORMAL_LETREC_CO.slen = 26; /*iniobj dsym_1670__CEXPR*/ /*uniqueobj*/ if (! /*_.VALDATA___V1847*/ meltfptr[1846]) /*_.VALDATA___V1847*/ meltfptr[1846] = (melt_ptr_t) & cdat->dsym_1670__CEXPR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1670__CEXPR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1670__CEXPR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1670__CEXPR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1670__CEXPR.obj_hash = 1016835007; cdat->dsym_1670__CEXPR.obj_len = 3; /*inistring dstr_1671__CEXPR*/ /*_.VALSTR___V1848*/ meltfptr[1847] = (melt_ptr_t) & cdat->dstr_1671__CEXPR; cdat->dstr_1671__CEXPR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1671__CEXPR.val, "CEXPR", sizeof (cdat->dstr_1671__CEXPR.val) - 1); cdat->dstr_1671__CEXPR.val[5] = (char) 0; cdat->dstr_1671__CEXPR.slen = 5; MELT_LOCATION ("warmelt-normal.melt:4474:/ iniobj"); /*iniobj dobj_1672*/ /*_.VALDATA___V1849*/ meltfptr[1848] = (melt_ptr_t) & cdat->dobj_1672; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1672", 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_1672", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1672.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1672.obj_num = 0; cdat->dobj_1672.obj_hash = 514329104; cdat->dobj_1672.obj_len = 2; /*^iniobj */ /*iniobj dobj_1673*/ /*_.VALDATA___V1850*/ meltfptr[1849] = (melt_ptr_t) & cdat->dobj_1673; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1673", 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_1673", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1673.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1673.obj_num = 1; cdat->dobj_1673.obj_hash = 236182387; cdat->dobj_1673.obj_len = 2; /*iniobj dsym_1674__CBIND*/ /*uniqueobj*/ if (! /*_.VALDATA___V1851*/ meltfptr[1850]) /*_.VALDATA___V1851*/ meltfptr[1850] = (melt_ptr_t) & cdat->dsym_1674__CBIND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1674__CBIND", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1674__CBIND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1674__CBIND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1674__CBIND.obj_hash = 836154821; cdat->dsym_1674__CBIND.obj_len = 3; /*inistring dstr_1675__CBIND*/ /*_.VALSTR___V1852*/ meltfptr[1851] = (melt_ptr_t) & cdat->dstr_1675__CBIND; cdat->dstr_1675__CBIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1675__CBIND.val, "CBIND", sizeof (cdat->dstr_1675__CBIND.val) - 1); cdat->dstr_1675__CBIND.val[5] = (char) 0; cdat->dstr_1675__CBIND.slen = 5; /*^iniobj */ /*iniobj dobj_1676*/ /*_.VALDATA___V1853*/ meltfptr[1852] = (melt_ptr_t) & cdat->dobj_1676; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1676", 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_1676", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1676.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1676.obj_num = 2; cdat->dobj_1676.obj_hash = 890744386; cdat->dobj_1676.obj_len = 2; /*^iniobj */ /*iniobj dobj_1677*/ /*_.VALDATA___V1854*/ meltfptr[1853] = (melt_ptr_t) & cdat->dobj_1677; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1677", 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_1677", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1677.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1677.obj_num = 3; cdat->dobj_1677.obj_hash = 959266664; cdat->dobj_1677.obj_len = 2; /*^iniobj */ /*iniobj dobj_1678*/ /*_.VALDATA___V1855*/ meltfptr[1854] = (melt_ptr_t) & cdat->dobj_1678; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1678", 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_1678", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1678.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1678.obj_num = 4; cdat->dobj_1678.obj_hash = 573110090; cdat->dobj_1678.obj_len = 2; /*^iniobj */ /*iniobj dobj_1679*/ /*_.VALDATA___V1856*/ meltfptr[1855] = (melt_ptr_t) & cdat->dobj_1679; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1679", 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_1679", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1679.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1679.obj_num = 5; cdat->dobj_1679.obj_hash = 352873776; cdat->dobj_1679.obj_len = 2; /*inimult dtup_1680__NORMAL_LETREC_CONSTRUCTIVE */ /*_.VALTUP___V1857*/ meltfptr[1856] = (melt_ptr_t) & cdat->dtup_1680__NORMAL_LETREC_CONSTRUCTIVE; cdat->dtup_1680__NORMAL_LETREC_CONSTRUCTIVE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_MULTIPLE)))); cdat->dtup_1680__NORMAL_LETREC_CONSTRUCTIVE.nbval = 6; /*^iniobj */ /*iniobj dobj_1681__NORMAL_LETREC_CONSTRUCTIVE*/ /*_.VALDATA___V1858*/ meltfptr[1857] = (melt_ptr_t) & cdat->dobj_1681__NORMAL_LETREC_CONSTRUCTIVE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1681__NORMAL_LETREC_CONSTRUCTIVE", melt_magic_discr ((melt_ptr_t) ( /*_.CLASS_SELECTOR__V20*/ meltfptr[19])) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1681__NORMAL_LETREC_CONSTRUCTIVE", ((meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V20*/ meltfptr[19]))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1681__NORMAL_LETREC_CONSTRUCTIVE.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V20*/ meltfptr[19]); cdat->dobj_1681__NORMAL_LETREC_CONSTRUCTIVE.obj_hash = 929676970; cdat->dobj_1681__NORMAL_LETREC_CONSTRUCTIVE.obj_len = 4; /*inistring dstr_1682__NORMAL_LETREC_CO*/ /*_.VALSTR___V1859*/ meltfptr[1858] = (melt_ptr_t) & cdat->dstr_1682__NORMAL_LETREC_CO; cdat->dstr_1682__NORMAL_LETREC_CO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1682__NORMAL_LETREC_CO.val, "NORMAL_LETREC_CONSTRUCTIVE", sizeof (cdat->dstr_1682__NORMAL_LETREC_CO. val) - 1); cdat->dstr_1682__NORMAL_LETREC_CO.val[26] = (char) 0; cdat->dstr_1682__NORMAL_LETREC_CO.slen = 26; /*inirout drout_1683__BADMETH_NORMAL_LETREC_CONSTRUCTIVE */ /*_.VALROUT___V1860*/ meltfptr[1859] = (melt_ptr_t) & cdat->drout_1683__BADMETH_NORMAL_LETREC_CONSTRUCTIVE; cdat->drout_1683__BADMETH_NORMAL_LETREC_CONSTRUCTIVE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1683__BADMETH_NORMAL_LETREC_CONSTRUCTIVE.routdescr, "BADMETH_NORMAL_LETREC_CONSTRUCTIVE @warmelt-normal.melt:4481", MELT_ROUTDESCR_LEN - 1); cdat->drout_1683__BADMETH_NORMAL_LETREC_CONSTRUCTIVE.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat-> drout_1683__BADMETH_NORMAL_LETREC_CONSTRUCTIVE, meltrout_103_warmelt_normal_BADMETH_NORMAL_LETREC_CONSTRUCTIVE); /*iniclos dclo_1684__BADMETH_NORMAL_LETREC_CONSTRUCTIVE */ /*_.VALCLO___V1861*/ meltfptr[1860] = (melt_ptr_t) & cdat->dclo_1684__BADMETH_NORMAL_LETREC_CONSTRUCTIVE; cdat->dclo_1684__BADMETH_NORMAL_LETREC_CONSTRUCTIVE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1684__BADMETH_NORMAL_LETREC_CONSTRUCTIVE.nbval = 0; /*inirout drout_1685__PREPCONS_LAMBDA */ /*_.VALROUT___V1862*/ meltfptr[1861] = (melt_ptr_t) & cdat->drout_1685__PREPCONS_LAMBDA; cdat->drout_1685__PREPCONS_LAMBDA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1685__PREPCONS_LAMBDA.routdescr, "PREPCONS_LAMBDA @warmelt-normal.melt:4492", MELT_ROUTDESCR_LEN - 1); cdat->drout_1685__PREPCONS_LAMBDA.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1685__PREPCONS_LAMBDA, meltrout_104_warmelt_normal_PREPCONS_LAMBDA); /*iniclos dclo_1686__PREPCONS_LAMBDA */ /*_.VALCLO___V1863*/ meltfptr[1862] = (melt_ptr_t) & cdat->dclo_1686__PREPCONS_LAMBDA; cdat->dclo_1686__PREPCONS_LAMBDA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1686__PREPCONS_LAMBDA.nbval = 0; /*inirout drout_1687__NORMLETREC_LAMBDA */ /*_.VALROUT___V1864*/ meltfptr[1863] = (melt_ptr_t) & cdat->drout_1687__NORMLETREC_LAMBDA; cdat->drout_1687__NORMLETREC_LAMBDA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1687__NORMLETREC_LAMBDA.routdescr, "NORMLETREC_LAMBDA @warmelt-normal.melt:4509", MELT_ROUTDESCR_LEN - 1); cdat->drout_1687__NORMLETREC_LAMBDA.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1687__NORMLETREC_LAMBDA, meltrout_105_warmelt_normal_NORMLETREC_LAMBDA); /*iniclos dclo_1688__NORMLETREC_LAMBDA */ /*_.VALCLO___V1865*/ meltfptr[1864] = (melt_ptr_t) & cdat->dclo_1688__NORMLETREC_LAMBDA; cdat->dclo_1688__NORMLETREC_LAMBDA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1688__NORMLETREC_LAMBDA.nbval = 0; /*inirout drout_1689__PREPCONS_TUPLE */ /*_.VALROUT___V1866*/ meltfptr[1865] = (melt_ptr_t) & cdat->drout_1689__PREPCONS_TUPLE; cdat->drout_1689__PREPCONS_TUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1689__PREPCONS_TUPLE.routdescr, "PREPCONS_TUPLE @warmelt-normal.melt:4541", MELT_ROUTDESCR_LEN - 1); cdat->drout_1689__PREPCONS_TUPLE.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1689__PREPCONS_TUPLE, meltrout_106_warmelt_normal_PREPCONS_TUPLE); /*iniclos dclo_1690__PREPCONS_TUPLE */ /*_.VALCLO___V1867*/ meltfptr[1866] = (melt_ptr_t) & cdat->dclo_1690__PREPCONS_TUPLE; cdat->dclo_1690__PREPCONS_TUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1690__PREPCONS_TUPLE.nbval = 0; /*iniobj dsym_1691__CLASS_SOURCE_ARGUMENTED_OPERATOR*/ /*uniqueobj*/ if (! /*_.VALDATA___V1868*/ meltfptr[1867]) /*_.VALDATA___V1868*/ meltfptr[1867] = (melt_ptr_t) & cdat->dsym_1691__CLASS_SOURCE_ARGUMENTED_OPERATOR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1691__CLASS_SOURCE_ARGUMENTED_OPERATOR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1691__CLASS_SOURCE_ARGUMENTED_OPERATOR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1691__CLASS_SOURCE_ARGUMENTED_OPERATOR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1691__CLASS_SOURCE_ARGUMENTED_OPERATOR.obj_hash = 872813783; cdat->dsym_1691__CLASS_SOURCE_ARGUMENTED_OPERATOR.obj_len = 3; /*inistring dstr_1692__CLASS_SOURCE_ARG*/ /*_.VALSTR___V1869*/ meltfptr[1868] = (melt_ptr_t) & cdat->dstr_1692__CLASS_SOURCE_ARG; cdat->dstr_1692__CLASS_SOURCE_ARG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1692__CLASS_SOURCE_ARG.val, "CLASS_SOURCE_ARGUMENTED_OPERATOR", sizeof (cdat->dstr_1692__CLASS_SOURCE_ARG. val) - 1); cdat->dstr_1692__CLASS_SOURCE_ARG.val[32] = (char) 0; cdat->dstr_1692__CLASS_SOURCE_ARG.slen = 32; /*inirout drout_1693__NORMLETREC_TUPLE */ /*_.VALROUT___V1870*/ meltfptr[1869] = (melt_ptr_t) & cdat->drout_1693__NORMLETREC_TUPLE; cdat->drout_1693__NORMLETREC_TUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1693__NORMLETREC_TUPLE.routdescr, "NORMLETREC_TUPLE @warmelt-normal.melt:4562", MELT_ROUTDESCR_LEN - 1); cdat->drout_1693__NORMLETREC_TUPLE.nbval = 9; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1693__NORMLETREC_TUPLE, meltrout_107_warmelt_normal_NORMLETREC_TUPLE); /*iniclos dclo_1694__NORMLETREC_TUPLE */ /*_.VALCLO___V1871*/ meltfptr[1870] = (melt_ptr_t) & cdat->dclo_1694__NORMLETREC_TUPLE; cdat->dclo_1694__NORMLETREC_TUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1694__NORMLETREC_TUPLE.nbval = 0; /*inirout drout_1695__PREPCONS_LIST */ /*_.VALROUT___V1872*/ meltfptr[1871] = (melt_ptr_t) & cdat->drout_1695__PREPCONS_LIST; cdat->drout_1695__PREPCONS_LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1695__PREPCONS_LIST.routdescr, "PREPCONS_LIST @warmelt-normal.melt:4597", MELT_ROUTDESCR_LEN - 1); cdat->drout_1695__PREPCONS_LIST.nbval = 13; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1695__PREPCONS_LIST, meltrout_108_warmelt_normal_PREPCONS_LIST); /*iniclos dclo_1696__PREPCONS_LIST */ /*_.VALCLO___V1875*/ meltfptr[1874] = (melt_ptr_t) & cdat->dclo_1696__PREPCONS_LIST; cdat->dclo_1696__PREPCONS_LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1696__PREPCONS_LIST.nbval = 0; /*iniobj dsym_1697__PAIROFLIST*/ /*uniqueobj*/ if (! /*_.VALDATA___V1873*/ meltfptr[1872]) /*_.VALDATA___V1873*/ meltfptr[1872] = (melt_ptr_t) & cdat->dsym_1697__PAIROFLIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1697__PAIROFLIST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1697__PAIROFLIST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1697__PAIROFLIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1697__PAIROFLIST.obj_hash = 339390582; cdat->dsym_1697__PAIROFLIST.obj_len = 3; /*inistring dstr_1698__PAIROFLIST*/ /*_.VALSTR___V1874*/ meltfptr[1873] = (melt_ptr_t) & cdat->dstr_1698__PAIROFLIST; cdat->dstr_1698__PAIROFLIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1698__PAIROFLIST.val, "_PAIROFLIST", sizeof (cdat->dstr_1698__PAIROFLIST.val) - 1); cdat->dstr_1698__PAIROFLIST.val[11] = (char) 0; cdat->dstr_1698__PAIROFLIST.slen = 11; /*inirout drout_1699__NRECLIST_FIND_LOCSYM */ /*_.VALROUT___V1828*/ meltfptr[1827] = (melt_ptr_t) & cdat->drout_1699__NRECLIST_FIND_LOCSYM; cdat->drout_1699__NRECLIST_FIND_LOCSYM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1699__NRECLIST_FIND_LOCSYM.routdescr, "NRECLIST_FIND_LOCSYM @warmelt-normal.melt:4640", MELT_ROUTDESCR_LEN - 1); cdat->drout_1699__NRECLIST_FIND_LOCSYM.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1699__NRECLIST_FIND_LOCSYM, meltrout_109_warmelt_normal_NRECLIST_FIND_LOCSYM); /*iniclos dclo_1700__NRECLIST_FIND_LOCSYM */ /*_.VALCLO___V1827*/ meltfptr[1826] = (melt_ptr_t) & cdat->dclo_1700__NRECLIST_FIND_LOCSYM; cdat->dclo_1700__NRECLIST_FIND_LOCSYM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1700__NRECLIST_FIND_LOCSYM.nbval = 0; /*inirout drout_1701__NORMLETREC_LIST */ /*_.VALROUT___V1876*/ meltfptr[1875] = (melt_ptr_t) & cdat->drout_1701__NORMLETREC_LIST; cdat->drout_1701__NORMLETREC_LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1701__NORMLETREC_LIST.routdescr, "NORMLETREC_LIST @warmelt-normal.melt:4658", MELT_ROUTDESCR_LEN - 1); cdat->drout_1701__NORMLETREC_LIST.nbval = 12; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1701__NORMLETREC_LIST, meltrout_110_warmelt_normal_NORMLETREC_LIST); /*iniclos dclo_1702__NORMLETREC_LIST */ /*_.VALCLO___V1877*/ meltfptr[1876] = (melt_ptr_t) & cdat->dclo_1702__NORMLETREC_LIST; cdat->dclo_1702__NORMLETREC_LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1702__NORMLETREC_LIST.nbval = 0; /*inirout drout_1703__PREPCONS_INSTANCE */ /*_.VALROUT___V1878*/ meltfptr[1877] = (melt_ptr_t) & cdat->drout_1703__PREPCONS_INSTANCE; cdat->drout_1703__PREPCONS_INSTANCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1703__PREPCONS_INSTANCE.routdescr, "PREPCONS_INSTANCE @warmelt-normal.melt:4732", MELT_ROUTDESCR_LEN - 1); cdat->drout_1703__PREPCONS_INSTANCE.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1703__PREPCONS_INSTANCE, meltrout_111_warmelt_normal_PREPCONS_INSTANCE); /*iniclos dclo_1704__PREPCONS_INSTANCE */ /*_.VALCLO___V1879*/ meltfptr[1878] = (melt_ptr_t) & cdat->dclo_1704__PREPCONS_INSTANCE; cdat->dclo_1704__PREPCONS_INSTANCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1704__PREPCONS_INSTANCE.nbval = 0; /*inirout drout_1705__NORMLETREC_INSTANCE */ /*_.VALROUT___V1880*/ meltfptr[1879] = (melt_ptr_t) & cdat->drout_1705__NORMLETREC_INSTANCE; cdat->drout_1705__NORMLETREC_INSTANCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1705__NORMLETREC_INSTANCE.routdescr, "NORMLETREC_INSTANCE @warmelt-normal.melt:4759", MELT_ROUTDESCR_LEN - 1); cdat->drout_1705__NORMLETREC_INSTANCE.nbval = 22; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1705__NORMLETREC_INSTANCE, meltrout_112_warmelt_normal_NORMLETREC_INSTANCE); /*iniclos dclo_1706__NORMLETREC_INSTANCE */ /*_.VALCLO___V1882*/ meltfptr[1881] = (melt_ptr_t) & cdat->dclo_1706__NORMLETREC_INSTANCE; cdat->dclo_1706__NORMLETREC_INSTANCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1706__NORMLETREC_INSTANCE.nbval = 0; /*inirout drout_1707__LAMBDA_ */ /*_.VALROUT___V1881*/ meltfptr[1880] = (melt_ptr_t) & cdat->drout_1707__LAMBDA_; cdat->drout_1707__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1707__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:4781", MELT_ROUTDESCR_LEN - 1); cdat->drout_1707__LAMBDA_.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1707__LAMBDA_, meltrout_113_warmelt_normal_LAMBDA___42__); /*inirout drout_1708__NORMEXP_LETREC */ /*_.VALROUT___V1883*/ meltfptr[1882] = (melt_ptr_t) & cdat->drout_1708__NORMEXP_LETREC; cdat->drout_1708__NORMEXP_LETREC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1708__NORMEXP_LETREC.routdescr, "NORMEXP_LETREC @warmelt-normal.melt:4828", MELT_ROUTDESCR_LEN - 1); cdat->drout_1708__NORMEXP_LETREC.nbval = 29; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1708__NORMEXP_LETREC, meltrout_114_warmelt_normal_NORMEXP_LETREC); /*iniclos dclo_1709__NORMEXP_LETREC */ /*_.VALCLO___V1886*/ meltfptr[1885] = (melt_ptr_t) & cdat->dclo_1709__NORMEXP_LETREC; cdat->dclo_1709__NORMEXP_LETREC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1709__NORMEXP_LETREC.nbval = 0; /*iniobj dsym_1710__CLASS_SOURCE_LETREC*/ /*uniqueobj*/ if (! /*_.VALDATA___V1887*/ meltfptr[1886]) /*_.VALDATA___V1887*/ meltfptr[1886] = (melt_ptr_t) & cdat->dsym_1710__CLASS_SOURCE_LETREC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1710__CLASS_SOURCE_LETREC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1710__CLASS_SOURCE_LETREC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1710__CLASS_SOURCE_LETREC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1710__CLASS_SOURCE_LETREC.obj_hash = 65197950; cdat->dsym_1710__CLASS_SOURCE_LETREC.obj_len = 3; /*inistring dstr_1711__CLASS_SOURCE_LET*/ /*_.VALSTR___V1888*/ meltfptr[1887] = (melt_ptr_t) & cdat->dstr_1711__CLASS_SOURCE_LET; cdat->dstr_1711__CLASS_SOURCE_LET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1711__CLASS_SOURCE_LET.val, "CLASS_SOURCE_LETREC", sizeof (cdat->dstr_1711__CLASS_SOURCE_LET. val) - 1); cdat->dstr_1711__CLASS_SOURCE_LET.val[19] = (char) 0; cdat->dstr_1711__CLASS_SOURCE_LET.slen = 19; /*iniobj dsym_1712__CLASS_SOURCE_LETREC_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1889*/ meltfptr[1888]) /*_.VALDATA___V1889*/ meltfptr[1888] = (melt_ptr_t) & cdat->dsym_1712__CLASS_SOURCE_LETREC_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1712__CLASS_SOURCE_LETREC_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_1712__CLASS_SOURCE_LETREC_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1712__CLASS_SOURCE_LETREC_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1712__CLASS_SOURCE_LETREC_BINDING.obj_hash = 56122288; cdat->dsym_1712__CLASS_SOURCE_LETREC_BINDING.obj_len = 3; /*inistring dstr_1713__CLASS_SOURCE_LET*/ /*_.VALSTR___V1890*/ meltfptr[1889] = (melt_ptr_t) & cdat->dstr_1713__CLASS_SOURCE_LET; cdat->dstr_1713__CLASS_SOURCE_LET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1713__CLASS_SOURCE_LET.val, "CLASS_SOURCE_LETREC_BINDING", sizeof (cdat->dstr_1713__CLASS_SOURCE_LET. val) - 1); cdat->dstr_1713__CLASS_SOURCE_LET.val[27] = (char) 0; cdat->dstr_1713__CLASS_SOURCE_LET.slen = 27; /*iniobj dsym_1714__LETREC_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1884*/ meltfptr[1883]) /*_.VALDATA___V1884*/ meltfptr[1883] = (melt_ptr_t) & cdat->dsym_1714__LETREC_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1714__LETREC_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1714__LETREC_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1714__LETREC_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1714__LETREC_.obj_hash = 883065210; cdat->dsym_1714__LETREC_.obj_len = 3; /*inistring dstr_1715__LETREC_*/ /*_.VALSTR___V1885*/ meltfptr[1884] = (melt_ptr_t) & cdat->dstr_1715__LETREC_; cdat->dstr_1715__LETREC_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1715__LETREC_.val, "LETREC_", sizeof (cdat->dstr_1715__LETREC_.val) - 1); cdat->dstr_1715__LETREC_.val[7] = (char) 0; cdat->dstr_1715__LETREC_.slen = 7; /*inirout drout_1716__NORMAL_PREDEF */ /*_.VALROUT___V1564*/ meltfptr[1563] = (melt_ptr_t) & cdat->drout_1716__NORMAL_PREDEF; cdat->drout_1716__NORMAL_PREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1716__NORMAL_PREDEF.routdescr, "NORMAL_PREDEF @warmelt-normal.melt:5025", MELT_ROUTDESCR_LEN - 1); cdat->drout_1716__NORMAL_PREDEF.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1716__NORMAL_PREDEF, meltrout_115_warmelt_normal_NORMAL_PREDEF); /*iniclos dclo_1717__NORMAL_PREDEF */ /*_.VALCLO___V1563*/ meltfptr[1562] = (melt_ptr_t) & cdat->dclo_1717__NORMAL_PREDEF; cdat->dclo_1717__NORMAL_PREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1717__NORMAL_PREDEF.nbval = 0; /*inirout drout_1718__NORMAL_SYMBOL_DATA */ /*_.VALROUT___V1562*/ meltfptr[1561] = (melt_ptr_t) & cdat->drout_1718__NORMAL_SYMBOL_DATA; cdat->drout_1718__NORMAL_SYMBOL_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1718__NORMAL_SYMBOL_DATA.routdescr, "NORMAL_SYMBOL_DATA @warmelt-normal.melt:5043", MELT_ROUTDESCR_LEN - 1); cdat->drout_1718__NORMAL_SYMBOL_DATA.nbval = 11; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1718__NORMAL_SYMBOL_DATA, meltrout_116_warmelt_normal_NORMAL_SYMBOL_DATA); /*iniclos dclo_1719__NORMAL_SYMBOL_DATA */ /*_.VALCLO___V1561*/ meltfptr[1560] = (melt_ptr_t) & cdat->dclo_1719__NORMAL_SYMBOL_DATA; cdat->dclo_1719__NORMAL_SYMBOL_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1719__NORMAL_SYMBOL_DATA.nbval = 0; /*iniobj dsym_1720__NAMED_NAME*/ /*uniqueobj*/ if (! /*_.VALDATA___V1891*/ meltfptr[1890]) /*_.VALDATA___V1891*/ meltfptr[1890] = (melt_ptr_t) & cdat->dsym_1720__NAMED_NAME; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1720__NAMED_NAME", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1720__NAMED_NAME", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1720__NAMED_NAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1720__NAMED_NAME.obj_hash = 1004123395; cdat->dsym_1720__NAMED_NAME.obj_len = 3; /*inistring dstr_1721__NAMED_NAME*/ /*_.VALSTR___V1892*/ meltfptr[1891] = (melt_ptr_t) & cdat->dstr_1721__NAMED_NAME; cdat->dstr_1721__NAMED_NAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1721__NAMED_NAME.val, "NAMED_NAME", sizeof (cdat->dstr_1721__NAMED_NAME.val) - 1); cdat->dstr_1721__NAMED_NAME.val[10] = (char) 0; cdat->dstr_1721__NAMED_NAME.slen = 10; /*inirout drout_1722__NORMAL_KEYWORD_DATA */ /*_.VALROUT___V1893*/ meltfptr[1892] = (melt_ptr_t) & cdat->drout_1722__NORMAL_KEYWORD_DATA; cdat->drout_1722__NORMAL_KEYWORD_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1722__NORMAL_KEYWORD_DATA.routdescr, "NORMAL_KEYWORD_DATA @warmelt-normal.melt:5083", MELT_ROUTDESCR_LEN - 1); cdat->drout_1722__NORMAL_KEYWORD_DATA.nbval = 10; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1722__NORMAL_KEYWORD_DATA, meltrout_117_warmelt_normal_NORMAL_KEYWORD_DATA); /*iniclos dclo_1723__NORMAL_KEYWORD_DATA */ /*_.VALCLO___V1894*/ meltfptr[1893] = (melt_ptr_t) & cdat->dclo_1723__NORMAL_KEYWORD_DATA; cdat->dclo_1723__NORMAL_KEYWORD_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1723__NORMAL_KEYWORD_DATA.nbval = 0; /*inirout drout_1724__CREATE_DATA_SLOTS */ /*_.VALROUT___V1895*/ meltfptr[1894] = (melt_ptr_t) & cdat->drout_1724__CREATE_DATA_SLOTS; cdat->drout_1724__CREATE_DATA_SLOTS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1724__CREATE_DATA_SLOTS.routdescr, "CREATE_DATA_SLOTS @warmelt-normal.melt:5117", MELT_ROUTDESCR_LEN - 1); cdat->drout_1724__CREATE_DATA_SLOTS.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1724__CREATE_DATA_SLOTS, meltrout_118_warmelt_normal_CREATE_DATA_SLOTS); /*iniclos dclo_1725__CREATE_DATA_SLOTS */ /*_.VALCLO___V1896*/ meltfptr[1895] = (melt_ptr_t) & cdat->dclo_1725__CREATE_DATA_SLOTS; cdat->dclo_1725__CREATE_DATA_SLOTS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1725__CREATE_DATA_SLOTS.nbval = 0; /*inirout drout_1726__FILL_DATA_SLOT */ /*_.VALROUT___V1897*/ meltfptr[1896] = (melt_ptr_t) & cdat->drout_1726__FILL_DATA_SLOT; cdat->drout_1726__FILL_DATA_SLOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1726__FILL_DATA_SLOT.routdescr, "FILL_DATA_SLOT @warmelt-normal.melt:5128", MELT_ROUTDESCR_LEN - 1); cdat->drout_1726__FILL_DATA_SLOT.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1726__FILL_DATA_SLOT, meltrout_119_warmelt_normal_FILL_DATA_SLOT); /*iniclos dclo_1727__FILL_DATA_SLOT */ /*_.VALCLO___V1898*/ meltfptr[1897] = (melt_ptr_t) & cdat->dclo_1727__FILL_DATA_SLOT; cdat->dclo_1727__FILL_DATA_SLOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1727__FILL_DATA_SLOT.nbval = 0; /*inirout drout_1728__NORMEXP_QUOTE */ /*_.VALROUT___V1899*/ meltfptr[1898] = (melt_ptr_t) & cdat->drout_1728__NORMEXP_QUOTE; cdat->drout_1728__NORMEXP_QUOTE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1728__NORMEXP_QUOTE.routdescr, "NORMEXP_QUOTE @warmelt-normal.melt:5139", MELT_ROUTDESCR_LEN - 1); cdat->drout_1728__NORMEXP_QUOTE.nbval = 14; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1728__NORMEXP_QUOTE, meltrout_120_warmelt_normal_NORMEXP_QUOTE); /*iniclos dclo_1729__NORMEXP_QUOTE */ /*_.VALCLO___V1900*/ meltfptr[1899] = (melt_ptr_t) & cdat->dclo_1729__NORMEXP_QUOTE; cdat->dclo_1729__NORMEXP_QUOTE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1729__NORMEXP_QUOTE.nbval = 0; /*iniobj dsym_1730__CLASS_SOURCE_QUOTE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1901*/ meltfptr[1900]) /*_.VALDATA___V1901*/ meltfptr[1900] = (melt_ptr_t) & cdat->dsym_1730__CLASS_SOURCE_QUOTE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1730__CLASS_SOURCE_QUOTE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1730__CLASS_SOURCE_QUOTE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1730__CLASS_SOURCE_QUOTE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1730__CLASS_SOURCE_QUOTE.obj_hash = 488554331; cdat->dsym_1730__CLASS_SOURCE_QUOTE.obj_len = 3; /*inistring dstr_1731__CLASS_SOURCE_QUO*/ /*_.VALSTR___V1902*/ meltfptr[1901] = (melt_ptr_t) & cdat->dstr_1731__CLASS_SOURCE_QUO; cdat->dstr_1731__CLASS_SOURCE_QUO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1731__CLASS_SOURCE_QUO.val, "CLASS_SOURCE_QUOTE", sizeof (cdat->dstr_1731__CLASS_SOURCE_QUO. val) - 1); cdat->dstr_1731__CLASS_SOURCE_QUO.val[18] = (char) 0; cdat->dstr_1731__CLASS_SOURCE_QUO.slen = 18; /*inirout drout_1732__NORMEXP_COMMENT */ /*_.VALROUT___V1903*/ meltfptr[1902] = (melt_ptr_t) & cdat->drout_1732__NORMEXP_COMMENT; cdat->drout_1732__NORMEXP_COMMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1732__NORMEXP_COMMENT.routdescr, "NORMEXP_COMMENT @warmelt-normal.melt:5195", MELT_ROUTDESCR_LEN - 1); cdat->drout_1732__NORMEXP_COMMENT.nbval = 11; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1732__NORMEXP_COMMENT, meltrout_121_warmelt_normal_NORMEXP_COMMENT); /*iniclos dclo_1733__NORMEXP_COMMENT */ /*_.VALCLO___V1906*/ meltfptr[1905] = (melt_ptr_t) & cdat->dclo_1733__NORMEXP_COMMENT; cdat->dclo_1733__NORMEXP_COMMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1733__NORMEXP_COMMENT.nbval = 0; /*iniobj dsym_1734__CLASS_SOURCE_COMMENT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1907*/ meltfptr[1906]) /*_.VALDATA___V1907*/ meltfptr[1906] = (melt_ptr_t) & cdat->dsym_1734__CLASS_SOURCE_COMMENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1734__CLASS_SOURCE_COMMENT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1734__CLASS_SOURCE_COMMENT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1734__CLASS_SOURCE_COMMENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1734__CLASS_SOURCE_COMMENT.obj_hash = 156677751; cdat->dsym_1734__CLASS_SOURCE_COMMENT.obj_len = 3; /*inistring dstr_1735__CLASS_SOURCE_COM*/ /*_.VALSTR___V1908*/ meltfptr[1907] = (melt_ptr_t) & cdat->dstr_1735__CLASS_SOURCE_COM; cdat->dstr_1735__CLASS_SOURCE_COM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1735__CLASS_SOURCE_COM.val, "CLASS_SOURCE_COMMENT", sizeof (cdat->dstr_1735__CLASS_SOURCE_COM. val) - 1); cdat->dstr_1735__CLASS_SOURCE_COM.val[20] = (char) 0; cdat->dstr_1735__CLASS_SOURCE_COM.slen = 20; /*iniobj dsym_1736__COMMENT_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1904*/ meltfptr[1903]) /*_.VALDATA___V1904*/ meltfptr[1903] = (melt_ptr_t) & cdat->dsym_1736__COMMENT_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1736__COMMENT_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1736__COMMENT_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1736__COMMENT_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1736__COMMENT_.obj_hash = 832657562; cdat->dsym_1736__COMMENT_.obj_len = 3; /*inistring dstr_1737__COMMENT_*/ /*_.VALSTR___V1905*/ meltfptr[1904] = (melt_ptr_t) & cdat->dstr_1737__COMMENT_; cdat->dstr_1737__COMMENT_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1737__COMMENT_.val, "COMMENT_", sizeof (cdat->dstr_1737__COMMENT_.val) - 1); cdat->dstr_1737__COMMENT_.val[8] = (char) 0; cdat->dstr_1737__COMMENT_.slen = 8; /*inirout drout_1738__NORMEXP_KEYWORD */ /*_.VALROUT___V1909*/ meltfptr[1908] = (melt_ptr_t) & cdat->drout_1738__NORMEXP_KEYWORD; cdat->drout_1738__NORMEXP_KEYWORD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1738__NORMEXP_KEYWORD.routdescr, "NORMEXP_KEYWORD @warmelt-normal.melt:5229", MELT_ROUTDESCR_LEN - 1); cdat->drout_1738__NORMEXP_KEYWORD.nbval = 8; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1738__NORMEXP_KEYWORD, meltrout_122_warmelt_normal_NORMEXP_KEYWORD); /*iniclos dclo_1739__NORMEXP_KEYWORD */ /*_.VALCLO___V1910*/ meltfptr[1909] = (melt_ptr_t) & cdat->dclo_1739__NORMEXP_KEYWORD; cdat->dclo_1739__NORMEXP_KEYWORD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1739__NORMEXP_KEYWORD.nbval = 0; /*inirout drout_1740__FILL_NORMAL_FORMALBIND */ /*_.VALROUT___V1911*/ meltfptr[1910] = (melt_ptr_t) & cdat->drout_1740__FILL_NORMAL_FORMALBIND; cdat->drout_1740__FILL_NORMAL_FORMALBIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1740__FILL_NORMAL_FORMALBIND.routdescr, "FILL_NORMAL_FORMALBIND @warmelt-normal.melt:5261", MELT_ROUTDESCR_LEN - 1); cdat->drout_1740__FILL_NORMAL_FORMALBIND.nbval = 11; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1740__FILL_NORMAL_FORMALBIND, meltrout_123_warmelt_normal_FILL_NORMAL_FORMALBIND); /*iniclos dclo_1741__FILL_NORMAL_FORMALBIND */ /*_.VALCLO___V1912*/ meltfptr[1911] = (melt_ptr_t) & cdat->dclo_1741__FILL_NORMAL_FORMALBIND; cdat->dclo_1741__FILL_NORMAL_FORMALBIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1741__FILL_NORMAL_FORMALBIND.nbval = 0; /*iniobj dsym_1742__BINDER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1913*/ meltfptr[1912]) /*_.VALDATA___V1913*/ meltfptr[1912] = (melt_ptr_t) & cdat->dsym_1742__BINDER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1742__BINDER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1742__BINDER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1742__BINDER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1742__BINDER.obj_hash = 117501202; cdat->dsym_1742__BINDER.obj_len = 3; /*inistring dstr_1743__BINDER*/ /*_.VALSTR___V1914*/ meltfptr[1913] = (melt_ptr_t) & cdat->dstr_1743__BINDER; cdat->dstr_1743__BINDER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1743__BINDER.val, "BINDER", sizeof (cdat->dstr_1743__BINDER.val) - 1); cdat->dstr_1743__BINDER.val[6] = (char) 0; cdat->dstr_1743__BINDER.slen = 6; /*iniobj dsym_1744__FBIND_TYPE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1915*/ meltfptr[1914]) /*_.VALDATA___V1915*/ meltfptr[1914] = (melt_ptr_t) & cdat->dsym_1744__FBIND_TYPE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1744__FBIND_TYPE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1744__FBIND_TYPE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1744__FBIND_TYPE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1744__FBIND_TYPE.obj_hash = 607755508; cdat->dsym_1744__FBIND_TYPE.obj_len = 3; /*inistring dstr_1745__FBIND_TYPE*/ /*_.VALSTR___V1916*/ meltfptr[1915] = (melt_ptr_t) & cdat->dstr_1745__FBIND_TYPE; cdat->dstr_1745__FBIND_TYPE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1745__FBIND_TYPE.val, "FBIND_TYPE", sizeof (cdat->dstr_1745__FBIND_TYPE.val) - 1); cdat->dstr_1745__FBIND_TYPE.val[10] = (char) 0; cdat->dstr_1745__FBIND_TYPE.slen = 10; /*inirout drout_1746__FILL_NORMAL_FORMALS */ /*_.VALROUT___V1917*/ meltfptr[1916] = (melt_ptr_t) & cdat->drout_1746__FILL_NORMAL_FORMALS; cdat->drout_1746__FILL_NORMAL_FORMALS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1746__FILL_NORMAL_FORMALS.routdescr, "FILL_NORMAL_FORMALS @warmelt-normal.melt:5286", MELT_ROUTDESCR_LEN - 1); cdat->drout_1746__FILL_NORMAL_FORMALS.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1746__FILL_NORMAL_FORMALS, meltrout_124_warmelt_normal_FILL_NORMAL_FORMALS); /*iniclos dclo_1747__FILL_NORMAL_FORMALS */ /*_.VALCLO___V1918*/ meltfptr[1917] = (melt_ptr_t) & cdat->dclo_1747__FILL_NORMAL_FORMALS; cdat->dclo_1747__FILL_NORMAL_FORMALS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1747__FILL_NORMAL_FORMALS.nbval = 0; /*inirout drout_1748__FILL_NORMAL_EXPANSION */ /*_.VALROUT___V1919*/ meltfptr[1918] = (melt_ptr_t) & cdat->drout_1748__FILL_NORMAL_EXPANSION; cdat->drout_1748__FILL_NORMAL_EXPANSION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1748__FILL_NORMAL_EXPANSION.routdescr, "FILL_NORMAL_EXPANSION @warmelt-normal.melt:5299", MELT_ROUTDESCR_LEN - 1); cdat->drout_1748__FILL_NORMAL_EXPANSION.nbval = 9; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1748__FILL_NORMAL_EXPANSION, meltrout_125_warmelt_normal_FILL_NORMAL_EXPANSION); /*iniclos dclo_1749__FILL_NORMAL_EXPANSION */ /*_.VALCLO___V1921*/ meltfptr[1920] = (melt_ptr_t) & cdat->dclo_1749__FILL_NORMAL_EXPANSION; cdat->dclo_1749__FILL_NORMAL_EXPANSION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1749__FILL_NORMAL_EXPANSION.nbval = 0; /*inirout drout_1750__LAMBDA_ */ /*_.VALROUT___V1920*/ meltfptr[1919] = (melt_ptr_t) & cdat->drout_1750__LAMBDA_; cdat->drout_1750__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1750__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:5302", MELT_ROUTDESCR_LEN - 1); cdat->drout_1750__LAMBDA_.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1750__LAMBDA_, meltrout_126_warmelt_normal_LAMBDA___43__); /*inirout drout_1751__NORMEXP_DEFPRIMITIVE */ /*_.VALROUT___V1922*/ meltfptr[1921] = (melt_ptr_t) & cdat->drout_1751__NORMEXP_DEFPRIMITIVE; cdat->drout_1751__NORMEXP_DEFPRIMITIVE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1751__NORMEXP_DEFPRIMITIVE.routdescr, "NORMEXP_DEFPRIMITIVE @warmelt-normal.melt:5324", MELT_ROUTDESCR_LEN - 1); cdat->drout_1751__NORMEXP_DEFPRIMITIVE.nbval = 25; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1751__NORMEXP_DEFPRIMITIVE, meltrout_127_warmelt_normal_NORMEXP_DEFPRIMITIVE); /*iniclos dclo_1752__NORMEXP_DEFPRIMITIVE */ /*_.VALCLO___V1923*/ meltfptr[1922] = (melt_ptr_t) & cdat->dclo_1752__NORMEXP_DEFPRIMITIVE; cdat->dclo_1752__NORMEXP_DEFPRIMITIVE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1752__NORMEXP_DEFPRIMITIVE.nbval = 0; /*iniobj dsym_1753__CLASS_SOURCE_DEFPRIMITIVE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1924*/ meltfptr[1923]) /*_.VALDATA___V1924*/ meltfptr[1923] = (melt_ptr_t) & cdat->dsym_1753__CLASS_SOURCE_DEFPRIMITIVE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1753__CLASS_SOURCE_DEFPRIMITIVE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1753__CLASS_SOURCE_DEFPRIMITIVE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1753__CLASS_SOURCE_DEFPRIMITIVE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1753__CLASS_SOURCE_DEFPRIMITIVE.obj_hash = 89550180; cdat->dsym_1753__CLASS_SOURCE_DEFPRIMITIVE.obj_len = 3; /*inistring dstr_1754__CLASS_SOURCE_DEF*/ /*_.VALSTR___V1925*/ meltfptr[1924] = (melt_ptr_t) & cdat->dstr_1754__CLASS_SOURCE_DEF; cdat->dstr_1754__CLASS_SOURCE_DEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1754__CLASS_SOURCE_DEF.val, "CLASS_SOURCE_DEFPRIMITIVE", sizeof (cdat->dstr_1754__CLASS_SOURCE_DEF. val) - 1); cdat->dstr_1754__CLASS_SOURCE_DEF.val[25] = (char) 0; cdat->dstr_1754__CLASS_SOURCE_DEF.slen = 25; /*iniobj dsym_1755__PRIM_FORMALS*/ /*uniqueobj*/ if (! /*_.VALDATA___V1926*/ meltfptr[1925]) /*_.VALDATA___V1926*/ meltfptr[1925] = (melt_ptr_t) & cdat->dsym_1755__PRIM_FORMALS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1755__PRIM_FORMALS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1755__PRIM_FORMALS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1755__PRIM_FORMALS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1755__PRIM_FORMALS.obj_hash = 983248080; cdat->dsym_1755__PRIM_FORMALS.obj_len = 3; /*inistring dstr_1756__PRIM_FORMALS*/ /*_.VALSTR___V1927*/ meltfptr[1926] = (melt_ptr_t) & cdat->dstr_1756__PRIM_FORMALS; cdat->dstr_1756__PRIM_FORMALS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1756__PRIM_FORMALS.val, "PRIM_FORMALS", sizeof (cdat->dstr_1756__PRIM_FORMALS.val) - 1); cdat->dstr_1756__PRIM_FORMALS.val[12] = (char) 0; cdat->dstr_1756__PRIM_FORMALS.slen = 12; /*iniobj dsym_1757__PRIM_EXPANSION*/ /*uniqueobj*/ if (! /*_.VALDATA___V1928*/ meltfptr[1927]) /*_.VALDATA___V1928*/ meltfptr[1927] = (melt_ptr_t) & cdat->dsym_1757__PRIM_EXPANSION; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1757__PRIM_EXPANSION", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1757__PRIM_EXPANSION", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1757__PRIM_EXPANSION.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1757__PRIM_EXPANSION.obj_hash = 25348021; cdat->dsym_1757__PRIM_EXPANSION.obj_len = 3; /*inistring dstr_1758__PRIM_EXPANSION*/ /*_.VALSTR___V1929*/ meltfptr[1928] = (melt_ptr_t) & cdat->dstr_1758__PRIM_EXPANSION; cdat->dstr_1758__PRIM_EXPANSION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1758__PRIM_EXPANSION.val, "PRIM_EXPANSION", sizeof (cdat->dstr_1758__PRIM_EXPANSION.val) - 1); cdat->dstr_1758__PRIM_EXPANSION.val[14] = (char) 0; cdat->dstr_1758__PRIM_EXPANSION.slen = 14; /*iniobj dsym_1759__PRIM_TYPE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1930*/ meltfptr[1929]) /*_.VALDATA___V1930*/ meltfptr[1929] = (melt_ptr_t) & cdat->dsym_1759__PRIM_TYPE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1759__PRIM_TYPE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1759__PRIM_TYPE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1759__PRIM_TYPE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1759__PRIM_TYPE.obj_hash = 837770946; cdat->dsym_1759__PRIM_TYPE.obj_len = 3; /*inistring dstr_1760__PRIM_TYPE*/ /*_.VALSTR___V1931*/ meltfptr[1930] = (melt_ptr_t) & cdat->dstr_1760__PRIM_TYPE; cdat->dstr_1760__PRIM_TYPE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1760__PRIM_TYPE.val, "PRIM_TYPE", sizeof (cdat->dstr_1760__PRIM_TYPE.val) - 1); cdat->dstr_1760__PRIM_TYPE.val[9] = (char) 0; cdat->dstr_1760__PRIM_TYPE.slen = 9; /*iniobj dsym_1761__CLASS_PRIMITIVE_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1932*/ meltfptr[1931]) /*_.VALDATA___V1932*/ meltfptr[1931] = (melt_ptr_t) & cdat->dsym_1761__CLASS_PRIMITIVE_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1761__CLASS_PRIMITIVE_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_1761__CLASS_PRIMITIVE_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1761__CLASS_PRIMITIVE_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1761__CLASS_PRIMITIVE_BINDING.obj_hash = 648418829; cdat->dsym_1761__CLASS_PRIMITIVE_BINDING.obj_len = 3; /*inistring dstr_1762__CLASS_PRIMITIVE_*/ /*_.VALSTR___V1933*/ meltfptr[1932] = (melt_ptr_t) & cdat->dstr_1762__CLASS_PRIMITIVE_; cdat->dstr_1762__CLASS_PRIMITIVE_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1762__CLASS_PRIMITIVE_.val, "CLASS_PRIMITIVE_BINDING", sizeof (cdat->dstr_1762__CLASS_PRIMITIVE_. val) - 1); cdat->dstr_1762__CLASS_PRIMITIVE_.val[23] = (char) 0; cdat->dstr_1762__CLASS_PRIMITIVE_.slen = 23; /*inirout drout_1763__NORMEXP_DEFCITERATOR */ /*_.VALROUT___V1934*/ meltfptr[1933] = (melt_ptr_t) & cdat->drout_1763__NORMEXP_DEFCITERATOR; cdat->drout_1763__NORMEXP_DEFCITERATOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1763__NORMEXP_DEFCITERATOR.routdescr, "NORMEXP_DEFCITERATOR @warmelt-normal.melt:5390", MELT_ROUTDESCR_LEN - 1); cdat->drout_1763__NORMEXP_DEFCITERATOR.nbval = 27; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1763__NORMEXP_DEFCITERATOR, meltrout_128_warmelt_normal_NORMEXP_DEFCITERATOR); /*iniclos dclo_1764__NORMEXP_DEFCITERATOR */ /*_.VALCLO___V1935*/ meltfptr[1934] = (melt_ptr_t) & cdat->dclo_1764__NORMEXP_DEFCITERATOR; cdat->dclo_1764__NORMEXP_DEFCITERATOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1764__NORMEXP_DEFCITERATOR.nbval = 0; /*iniobj dsym_1765__CLASS_SOURCE_DEFCITERATOR*/ /*uniqueobj*/ if (! /*_.VALDATA___V1936*/ meltfptr[1935]) /*_.VALDATA___V1936*/ meltfptr[1935] = (melt_ptr_t) & cdat->dsym_1765__CLASS_SOURCE_DEFCITERATOR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1765__CLASS_SOURCE_DEFCITERATOR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1765__CLASS_SOURCE_DEFCITERATOR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1765__CLASS_SOURCE_DEFCITERATOR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1765__CLASS_SOURCE_DEFCITERATOR.obj_hash = 908057495; cdat->dsym_1765__CLASS_SOURCE_DEFCITERATOR.obj_len = 3; /*inistring dstr_1766__CLASS_SOURCE_DEF*/ /*_.VALSTR___V1937*/ meltfptr[1936] = (melt_ptr_t) & cdat->dstr_1766__CLASS_SOURCE_DEF; cdat->dstr_1766__CLASS_SOURCE_DEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1766__CLASS_SOURCE_DEF.val, "CLASS_SOURCE_DEFCITERATOR", sizeof (cdat->dstr_1766__CLASS_SOURCE_DEF. val) - 1); cdat->dstr_1766__CLASS_SOURCE_DEF.val[25] = (char) 0; cdat->dstr_1766__CLASS_SOURCE_DEF.slen = 25; /*iniobj dsym_1767__CITER_START_FORMALS*/ /*uniqueobj*/ if (! /*_.VALDATA___V1938*/ meltfptr[1937]) /*_.VALDATA___V1938*/ meltfptr[1937] = (melt_ptr_t) & cdat->dsym_1767__CITER_START_FORMALS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1767__CITER_START_FORMALS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1767__CITER_START_FORMALS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1767__CITER_START_FORMALS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1767__CITER_START_FORMALS.obj_hash = 286590765; cdat->dsym_1767__CITER_START_FORMALS.obj_len = 3; /*inistring dstr_1768__CITER_START_FORM*/ /*_.VALSTR___V1939*/ meltfptr[1938] = (melt_ptr_t) & cdat->dstr_1768__CITER_START_FORM; cdat->dstr_1768__CITER_START_FORM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1768__CITER_START_FORM.val, "CITER_START_FORMALS", sizeof (cdat->dstr_1768__CITER_START_FORM. val) - 1); cdat->dstr_1768__CITER_START_FORM.val[19] = (char) 0; cdat->dstr_1768__CITER_START_FORM.slen = 19; /*iniobj dsym_1769__CITER_STATE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1940*/ meltfptr[1939]) /*_.VALDATA___V1940*/ meltfptr[1939] = (melt_ptr_t) & cdat->dsym_1769__CITER_STATE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1769__CITER_STATE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1769__CITER_STATE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1769__CITER_STATE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1769__CITER_STATE.obj_hash = 23281975; cdat->dsym_1769__CITER_STATE.obj_len = 3; /*inistring dstr_1770__CITER_STATE*/ /*_.VALSTR___V1941*/ meltfptr[1940] = (melt_ptr_t) & cdat->dstr_1770__CITER_STATE; cdat->dstr_1770__CITER_STATE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1770__CITER_STATE.val, "CITER_STATE", sizeof (cdat->dstr_1770__CITER_STATE.val) - 1); cdat->dstr_1770__CITER_STATE.val[11] = (char) 0; cdat->dstr_1770__CITER_STATE.slen = 11; /*iniobj dsym_1771__CITER_BODY_FORMALS*/ /*uniqueobj*/ if (! /*_.VALDATA___V1942*/ meltfptr[1941]) /*_.VALDATA___V1942*/ meltfptr[1941] = (melt_ptr_t) & cdat->dsym_1771__CITER_BODY_FORMALS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1771__CITER_BODY_FORMALS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1771__CITER_BODY_FORMALS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1771__CITER_BODY_FORMALS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1771__CITER_BODY_FORMALS.obj_hash = 1002998706; cdat->dsym_1771__CITER_BODY_FORMALS.obj_len = 3; /*inistring dstr_1772__CITER_BODY_FORMA*/ /*_.VALSTR___V1943*/ meltfptr[1942] = (melt_ptr_t) & cdat->dstr_1772__CITER_BODY_FORMA; cdat->dstr_1772__CITER_BODY_FORMA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1772__CITER_BODY_FORMA.val, "CITER_BODY_FORMALS", sizeof (cdat->dstr_1772__CITER_BODY_FORMA. val) - 1); cdat->dstr_1772__CITER_BODY_FORMA.val[18] = (char) 0; cdat->dstr_1772__CITER_BODY_FORMA.slen = 18; /*iniobj dsym_1773__CITER_EXPBEFORE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1944*/ meltfptr[1943]) /*_.VALDATA___V1944*/ meltfptr[1943] = (melt_ptr_t) & cdat->dsym_1773__CITER_EXPBEFORE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1773__CITER_EXPBEFORE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1773__CITER_EXPBEFORE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1773__CITER_EXPBEFORE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1773__CITER_EXPBEFORE.obj_hash = 411562487; cdat->dsym_1773__CITER_EXPBEFORE.obj_len = 3; /*inistring dstr_1774__CITER_EXPBEFORE*/ /*_.VALSTR___V1945*/ meltfptr[1944] = (melt_ptr_t) & cdat->dstr_1774__CITER_EXPBEFORE; cdat->dstr_1774__CITER_EXPBEFORE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1774__CITER_EXPBEFORE.val, "CITER_EXPBEFORE", sizeof (cdat->dstr_1774__CITER_EXPBEFORE. val) - 1); cdat->dstr_1774__CITER_EXPBEFORE.val[15] = (char) 0; cdat->dstr_1774__CITER_EXPBEFORE.slen = 15; /*iniobj dsym_1775__CITER_EXPAFTER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1946*/ meltfptr[1945]) /*_.VALDATA___V1946*/ meltfptr[1945] = (melt_ptr_t) & cdat->dsym_1775__CITER_EXPAFTER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1775__CITER_EXPAFTER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1775__CITER_EXPAFTER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1775__CITER_EXPAFTER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1775__CITER_EXPAFTER.obj_hash = 576729961; cdat->dsym_1775__CITER_EXPAFTER.obj_len = 3; /*inistring dstr_1776__CITER_EXPAFTER*/ /*_.VALSTR___V1947*/ meltfptr[1946] = (melt_ptr_t) & cdat->dstr_1776__CITER_EXPAFTER; cdat->dstr_1776__CITER_EXPAFTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1776__CITER_EXPAFTER.val, "CITER_EXPAFTER", sizeof (cdat->dstr_1776__CITER_EXPAFTER.val) - 1); cdat->dstr_1776__CITER_EXPAFTER.val[14] = (char) 0; cdat->dstr_1776__CITER_EXPAFTER.slen = 14; /*iniobj dsym_1777__CLASS_CITERATOR_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1948*/ meltfptr[1947]) /*_.VALDATA___V1948*/ meltfptr[1947] = (melt_ptr_t) & cdat->dsym_1777__CLASS_CITERATOR_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1777__CLASS_CITERATOR_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_1777__CLASS_CITERATOR_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1777__CLASS_CITERATOR_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1777__CLASS_CITERATOR_BINDING.obj_hash = 241925087; cdat->dsym_1777__CLASS_CITERATOR_BINDING.obj_len = 3; /*inistring dstr_1778__CLASS_CITERATOR_*/ /*_.VALSTR___V1949*/ meltfptr[1948] = (melt_ptr_t) & cdat->dstr_1778__CLASS_CITERATOR_; cdat->dstr_1778__CLASS_CITERATOR_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1778__CLASS_CITERATOR_.val, "CLASS_CITERATOR_BINDING", sizeof (cdat->dstr_1778__CLASS_CITERATOR_. val) - 1); cdat->dstr_1778__CLASS_CITERATOR_.val[23] = (char) 0; cdat->dstr_1778__CLASS_CITERATOR_.slen = 23; /*inirout drout_1779__NORMEXP_CITERATION */ /*_.VALROUT___V1950*/ meltfptr[1949] = (melt_ptr_t) & cdat->drout_1779__NORMEXP_CITERATION; cdat->drout_1779__NORMEXP_CITERATION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1779__NORMEXP_CITERATION.routdescr, "NORMEXP_CITERATION @warmelt-normal.melt:5497", MELT_ROUTDESCR_LEN - 1); cdat->drout_1779__NORMEXP_CITERATION.nbval = 40; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1779__NORMEXP_CITERATION, meltrout_129_warmelt_normal_NORMEXP_CITERATION); /*iniclos dclo_1780__NORMEXP_CITERATION */ /*_.VALCLO___V1958*/ meltfptr[1957] = (melt_ptr_t) & cdat->dclo_1780__NORMEXP_CITERATION; cdat->dclo_1780__NORMEXP_CITERATION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1780__NORMEXP_CITERATION.nbval = 0; /*iniobj dsym_1781__CLASS_SOURCE_CITERATION*/ /*uniqueobj*/ if (! /*_.VALDATA___V1959*/ meltfptr[1958]) /*_.VALDATA___V1959*/ meltfptr[1958] = (melt_ptr_t) & cdat->dsym_1781__CLASS_SOURCE_CITERATION; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1781__CLASS_SOURCE_CITERATION", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1781__CLASS_SOURCE_CITERATION", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1781__CLASS_SOURCE_CITERATION.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1781__CLASS_SOURCE_CITERATION.obj_hash = 723843174; cdat->dsym_1781__CLASS_SOURCE_CITERATION.obj_len = 3; /*inistring dstr_1782__CLASS_SOURCE_CIT*/ /*_.VALSTR___V1960*/ meltfptr[1959] = (melt_ptr_t) & cdat->dstr_1782__CLASS_SOURCE_CIT; cdat->dstr_1782__CLASS_SOURCE_CIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1782__CLASS_SOURCE_CIT.val, "CLASS_SOURCE_CITERATION", sizeof (cdat->dstr_1782__CLASS_SOURCE_CIT. val) - 1); cdat->dstr_1782__CLASS_SOURCE_CIT.val[23] = (char) 0; cdat->dstr_1782__CLASS_SOURCE_CIT.slen = 23; /*iniobj dsym_1783__MULTIPLE_EVERY_BOTH*/ /*uniqueobj*/ if (! /*_.VALDATA___V1961*/ meltfptr[1960]) /*_.VALDATA___V1961*/ meltfptr[1960] = (melt_ptr_t) & cdat->dsym_1783__MULTIPLE_EVERY_BOTH; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1783__MULTIPLE_EVERY_BOTH", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1783__MULTIPLE_EVERY_BOTH", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1783__MULTIPLE_EVERY_BOTH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1783__MULTIPLE_EVERY_BOTH.obj_hash = 528900272; cdat->dsym_1783__MULTIPLE_EVERY_BOTH.obj_len = 3; /*inistring dstr_1784__MULTIPLE_EVERY_B*/ /*_.VALSTR___V1962*/ meltfptr[1961] = (melt_ptr_t) & cdat->dstr_1784__MULTIPLE_EVERY_B; cdat->dstr_1784__MULTIPLE_EVERY_B.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1784__MULTIPLE_EVERY_B.val, "MULTIPLE_EVERY_BOTH", sizeof (cdat->dstr_1784__MULTIPLE_EVERY_B. val) - 1); cdat->dstr_1784__MULTIPLE_EVERY_B.val[19] = (char) 0; cdat->dstr_1784__MULTIPLE_EVERY_B.slen = 19; /*inirout drout_1785__LAMBDA_ */ /*_.VALROUT___V1951*/ meltfptr[1950] = (melt_ptr_t) & cdat->drout_1785__LAMBDA_; cdat->drout_1785__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1785__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:5529", MELT_ROUTDESCR_LEN - 1); cdat->drout_1785__LAMBDA_.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1785__LAMBDA_, meltrout_130_warmelt_normal_LAMBDA___44__); /*inirout drout_1786__LAMBDA_ */ /*_.VALROUT___V1952*/ meltfptr[1951] = (melt_ptr_t) & cdat->drout_1786__LAMBDA_; cdat->drout_1786__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1786__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:5565", MELT_ROUTDESCR_LEN - 1); cdat->drout_1786__LAMBDA_.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1786__LAMBDA_, meltrout_131_warmelt_normal_LAMBDA___45__); /*inirout drout_1787__LAMBDA_ */ /*_.VALROUT___V1953*/ meltfptr[1952] = (melt_ptr_t) & cdat->drout_1787__LAMBDA_; cdat->drout_1787__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1787__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:5630", MELT_ROUTDESCR_LEN - 1); cdat->drout_1787__LAMBDA_.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1787__LAMBDA_, meltrout_132_warmelt_normal_LAMBDA___46__); /*inirout drout_1788__LAMBDA_ */ /*_.VALROUT___V1954*/ meltfptr[1953] = (melt_ptr_t) & cdat->drout_1788__LAMBDA_; cdat->drout_1788__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1788__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:5634", MELT_ROUTDESCR_LEN - 1); cdat->drout_1788__LAMBDA_.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1788__LAMBDA_, meltrout_133_warmelt_normal_LAMBDA___47__); /*inirout drout_1789__LAMBDA_ */ /*_.VALROUT___V1955*/ meltfptr[1954] = (melt_ptr_t) & cdat->drout_1789__LAMBDA_; cdat->drout_1789__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1789__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:5650", MELT_ROUTDESCR_LEN - 1); cdat->drout_1789__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1789__LAMBDA_, meltrout_134_warmelt_normal_LAMBDA___48__); /*inirout drout_1790__LAMBDA_ */ /*_.VALROUT___V1956*/ meltfptr[1955] = (melt_ptr_t) & cdat->drout_1790__LAMBDA_; cdat->drout_1790__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1790__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:5658", MELT_ROUTDESCR_LEN - 1); cdat->drout_1790__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1790__LAMBDA_, meltrout_135_warmelt_normal_LAMBDA___49__); /*inirout drout_1791__LAMBDA_ */ /*_.VALROUT___V1957*/ meltfptr[1956] = (melt_ptr_t) & cdat->drout_1791__LAMBDA_; cdat->drout_1791__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1791__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:5698", MELT_ROUTDESCR_LEN - 1); cdat->drout_1791__LAMBDA_.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1791__LAMBDA_, meltrout_136_warmelt_normal_LAMBDA___50__); /*inirout drout_1792__NORMEXP_DEFCMATCHER */ /*_.VALROUT___V1963*/ meltfptr[1962] = (melt_ptr_t) & cdat->drout_1792__NORMEXP_DEFCMATCHER; cdat->drout_1792__NORMEXP_DEFCMATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1792__NORMEXP_DEFCMATCHER.routdescr, "NORMEXP_DEFCMATCHER @warmelt-normal.melt:5714", MELT_ROUTDESCR_LEN - 1); cdat->drout_1792__NORMEXP_DEFCMATCHER.nbval = 30; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1792__NORMEXP_DEFCMATCHER, meltrout_137_warmelt_normal_NORMEXP_DEFCMATCHER); /*iniclos dclo_1793__NORMEXP_DEFCMATCHER */ /*_.VALCLO___V1964*/ meltfptr[1963] = (melt_ptr_t) & cdat->dclo_1793__NORMEXP_DEFCMATCHER; cdat->dclo_1793__NORMEXP_DEFCMATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1793__NORMEXP_DEFCMATCHER.nbval = 0; /*iniobj dsym_1794__CLASS_SOURCE_DEFCMATCHER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1965*/ meltfptr[1964]) /*_.VALDATA___V1965*/ meltfptr[1964] = (melt_ptr_t) & cdat->dsym_1794__CLASS_SOURCE_DEFCMATCHER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1794__CLASS_SOURCE_DEFCMATCHER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1794__CLASS_SOURCE_DEFCMATCHER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1794__CLASS_SOURCE_DEFCMATCHER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1794__CLASS_SOURCE_DEFCMATCHER.obj_hash = 177651266; cdat->dsym_1794__CLASS_SOURCE_DEFCMATCHER.obj_len = 3; /*inistring dstr_1795__CLASS_SOURCE_DEF*/ /*_.VALSTR___V1966*/ meltfptr[1965] = (melt_ptr_t) & cdat->dstr_1795__CLASS_SOURCE_DEF; cdat->dstr_1795__CLASS_SOURCE_DEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1795__CLASS_SOURCE_DEF.val, "CLASS_SOURCE_DEFCMATCHER", sizeof (cdat->dstr_1795__CLASS_SOURCE_DEF. val) - 1); cdat->dstr_1795__CLASS_SOURCE_DEF.val[24] = (char) 0; cdat->dstr_1795__CLASS_SOURCE_DEF.slen = 24; /*iniobj dsym_1796__CLASS_CMATCHER_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1967*/ meltfptr[1966]) /*_.VALDATA___V1967*/ meltfptr[1966] = (melt_ptr_t) & cdat->dsym_1796__CLASS_CMATCHER_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1796__CLASS_CMATCHER_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_1796__CLASS_CMATCHER_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1796__CLASS_CMATCHER_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1796__CLASS_CMATCHER_BINDING.obj_hash = 386982082; cdat->dsym_1796__CLASS_CMATCHER_BINDING.obj_len = 3; /*inistring dstr_1797__CLASS_CMATCHER_B*/ /*_.VALSTR___V1968*/ meltfptr[1967] = (melt_ptr_t) & cdat->dstr_1797__CLASS_CMATCHER_B; cdat->dstr_1797__CLASS_CMATCHER_B.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1797__CLASS_CMATCHER_B.val, "CLASS_CMATCHER_BINDING", sizeof (cdat->dstr_1797__CLASS_CMATCHER_B. val) - 1); cdat->dstr_1797__CLASS_CMATCHER_B.val[22] = (char) 0; cdat->dstr_1797__CLASS_CMATCHER_B.slen = 22; /*iniobj dsym_1798__AMATCH_IN*/ /*uniqueobj*/ if (! /*_.VALDATA___V1969*/ meltfptr[1968]) /*_.VALDATA___V1969*/ meltfptr[1968] = (melt_ptr_t) & cdat->dsym_1798__AMATCH_IN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1798__AMATCH_IN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1798__AMATCH_IN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1798__AMATCH_IN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1798__AMATCH_IN.obj_hash = 934274869; cdat->dsym_1798__AMATCH_IN.obj_len = 3; /*inistring dstr_1799__AMATCH_IN*/ /*_.VALSTR___V1970*/ meltfptr[1969] = (melt_ptr_t) & cdat->dstr_1799__AMATCH_IN; cdat->dstr_1799__AMATCH_IN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1799__AMATCH_IN.val, "AMATCH_IN", sizeof (cdat->dstr_1799__AMATCH_IN.val) - 1); cdat->dstr_1799__AMATCH_IN.val[9] = (char) 0; cdat->dstr_1799__AMATCH_IN.slen = 9; /*iniobj dsym_1800__AMATCH_MATCHBIND*/ /*uniqueobj*/ if (! /*_.VALDATA___V1971*/ meltfptr[1970]) /*_.VALDATA___V1971*/ meltfptr[1970] = (melt_ptr_t) & cdat->dsym_1800__AMATCH_MATCHBIND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1800__AMATCH_MATCHBIND", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1800__AMATCH_MATCHBIND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1800__AMATCH_MATCHBIND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1800__AMATCH_MATCHBIND.obj_hash = 38962960; cdat->dsym_1800__AMATCH_MATCHBIND.obj_len = 3; /*inistring dstr_1801__AMATCH_MATCHBIND*/ /*_.VALSTR___V1972*/ meltfptr[1971] = (melt_ptr_t) & cdat->dstr_1801__AMATCH_MATCHBIND; cdat->dstr_1801__AMATCH_MATCHBIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1801__AMATCH_MATCHBIND.val, "AMATCH_MATCHBIND", sizeof (cdat->dstr_1801__AMATCH_MATCHBIND. val) - 1); cdat->dstr_1801__AMATCH_MATCHBIND.val[16] = (char) 0; cdat->dstr_1801__AMATCH_MATCHBIND.slen = 16; /*iniobj dsym_1802__AMATCH_OUT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1973*/ meltfptr[1972]) /*_.VALDATA___V1973*/ meltfptr[1972] = (melt_ptr_t) & cdat->dsym_1802__AMATCH_OUT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1802__AMATCH_OUT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1802__AMATCH_OUT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1802__AMATCH_OUT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1802__AMATCH_OUT.obj_hash = 244872757; cdat->dsym_1802__AMATCH_OUT.obj_len = 3; /*inistring dstr_1803__AMATCH_OUT*/ /*_.VALSTR___V1974*/ meltfptr[1973] = (melt_ptr_t) & cdat->dstr_1803__AMATCH_OUT; cdat->dstr_1803__AMATCH_OUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1803__AMATCH_OUT.val, "AMATCH_OUT", sizeof (cdat->dstr_1803__AMATCH_OUT.val) - 1); cdat->dstr_1803__AMATCH_OUT.val[10] = (char) 0; cdat->dstr_1803__AMATCH_OUT.slen = 10; /*iniobj dsym_1804__CMATCH_STATE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1975*/ meltfptr[1974]) /*_.VALDATA___V1975*/ meltfptr[1974] = (melt_ptr_t) & cdat->dsym_1804__CMATCH_STATE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1804__CMATCH_STATE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1804__CMATCH_STATE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1804__CMATCH_STATE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1804__CMATCH_STATE.obj_hash = 510092845; cdat->dsym_1804__CMATCH_STATE.obj_len = 3; /*inistring dstr_1805__CMATCH_STATE*/ /*_.VALSTR___V1976*/ meltfptr[1975] = (melt_ptr_t) & cdat->dstr_1805__CMATCH_STATE; cdat->dstr_1805__CMATCH_STATE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1805__CMATCH_STATE.val, "CMATCH_STATE", sizeof (cdat->dstr_1805__CMATCH_STATE.val) - 1); cdat->dstr_1805__CMATCH_STATE.val[12] = (char) 0; cdat->dstr_1805__CMATCH_STATE.slen = 12; /*iniobj dsym_1806__CMATCH_EXPTEST*/ /*uniqueobj*/ if (! /*_.VALDATA___V1977*/ meltfptr[1976]) /*_.VALDATA___V1977*/ meltfptr[1976] = (melt_ptr_t) & cdat->dsym_1806__CMATCH_EXPTEST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1806__CMATCH_EXPTEST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1806__CMATCH_EXPTEST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1806__CMATCH_EXPTEST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1806__CMATCH_EXPTEST.obj_hash = 387538218; cdat->dsym_1806__CMATCH_EXPTEST.obj_len = 3; /*inistring dstr_1807__CMATCH_EXPTEST*/ /*_.VALSTR___V1978*/ meltfptr[1977] = (melt_ptr_t) & cdat->dstr_1807__CMATCH_EXPTEST; cdat->dstr_1807__CMATCH_EXPTEST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1807__CMATCH_EXPTEST.val, "CMATCH_EXPTEST", sizeof (cdat->dstr_1807__CMATCH_EXPTEST.val) - 1); cdat->dstr_1807__CMATCH_EXPTEST.val[14] = (char) 0; cdat->dstr_1807__CMATCH_EXPTEST.slen = 14; /*iniobj dsym_1808__CMATCH_EXPFILL*/ /*uniqueobj*/ if (! /*_.VALDATA___V1979*/ meltfptr[1978]) /*_.VALDATA___V1979*/ meltfptr[1978] = (melt_ptr_t) & cdat->dsym_1808__CMATCH_EXPFILL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1808__CMATCH_EXPFILL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1808__CMATCH_EXPFILL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1808__CMATCH_EXPFILL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1808__CMATCH_EXPFILL.obj_hash = 677468398; cdat->dsym_1808__CMATCH_EXPFILL.obj_len = 3; /*inistring dstr_1809__CMATCH_EXPFILL*/ /*_.VALSTR___V1980*/ meltfptr[1979] = (melt_ptr_t) & cdat->dstr_1809__CMATCH_EXPFILL; cdat->dstr_1809__CMATCH_EXPFILL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1809__CMATCH_EXPFILL.val, "CMATCH_EXPFILL", sizeof (cdat->dstr_1809__CMATCH_EXPFILL.val) - 1); cdat->dstr_1809__CMATCH_EXPFILL.val[14] = (char) 0; cdat->dstr_1809__CMATCH_EXPFILL.slen = 14; /*iniobj dsym_1810__CMATCH_EXPOPER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1981*/ meltfptr[1980]) /*_.VALDATA___V1981*/ meltfptr[1980] = (melt_ptr_t) & cdat->dsym_1810__CMATCH_EXPOPER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1810__CMATCH_EXPOPER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1810__CMATCH_EXPOPER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1810__CMATCH_EXPOPER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1810__CMATCH_EXPOPER.obj_hash = 249848867; cdat->dsym_1810__CMATCH_EXPOPER.obj_len = 3; /*inistring dstr_1811__CMATCH_EXPOPER*/ /*_.VALSTR___V1982*/ meltfptr[1981] = (melt_ptr_t) & cdat->dstr_1811__CMATCH_EXPOPER; cdat->dstr_1811__CMATCH_EXPOPER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1811__CMATCH_EXPOPER.val, "CMATCH_EXPOPER", sizeof (cdat->dstr_1811__CMATCH_EXPOPER.val) - 1); cdat->dstr_1811__CMATCH_EXPOPER.val[14] = (char) 0; cdat->dstr_1811__CMATCH_EXPOPER.slen = 14; /*inirout drout_1812__NORMEXP_DEFUNMATCHER */ /*_.VALROUT___V1983*/ meltfptr[1982] = (melt_ptr_t) & cdat->drout_1812__NORMEXP_DEFUNMATCHER; cdat->drout_1812__NORMEXP_DEFUNMATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1812__NORMEXP_DEFUNMATCHER.routdescr, "NORMEXP_DEFUNMATCHER @warmelt-normal.melt:5852", MELT_ROUTDESCR_LEN - 1); cdat->drout_1812__NORMEXP_DEFUNMATCHER.nbval = 31; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1812__NORMEXP_DEFUNMATCHER, meltrout_138_warmelt_normal_NORMEXP_DEFUNMATCHER); /*iniclos dclo_1813__NORMEXP_DEFUNMATCHER */ /*_.VALCLO___V1984*/ meltfptr[1983] = (melt_ptr_t) & cdat->dclo_1813__NORMEXP_DEFUNMATCHER; cdat->dclo_1813__NORMEXP_DEFUNMATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1813__NORMEXP_DEFUNMATCHER.nbval = 0; /*iniobj dsym_1814__CLASS_SOURCE_DEFUNMATCHER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1985*/ meltfptr[1984]) /*_.VALDATA___V1985*/ meltfptr[1984] = (melt_ptr_t) & cdat->dsym_1814__CLASS_SOURCE_DEFUNMATCHER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1814__CLASS_SOURCE_DEFUNMATCHER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1814__CLASS_SOURCE_DEFUNMATCHER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1814__CLASS_SOURCE_DEFUNMATCHER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1814__CLASS_SOURCE_DEFUNMATCHER.obj_hash = 952645922; cdat->dsym_1814__CLASS_SOURCE_DEFUNMATCHER.obj_len = 3; /*inistring dstr_1815__CLASS_SOURCE_DEF*/ /*_.VALSTR___V1986*/ meltfptr[1985] = (melt_ptr_t) & cdat->dstr_1815__CLASS_SOURCE_DEF; cdat->dstr_1815__CLASS_SOURCE_DEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1815__CLASS_SOURCE_DEF.val, "CLASS_SOURCE_DEFUNMATCHER", sizeof (cdat->dstr_1815__CLASS_SOURCE_DEF. val) - 1); cdat->dstr_1815__CLASS_SOURCE_DEF.val[25] = (char) 0; cdat->dstr_1815__CLASS_SOURCE_DEF.slen = 25; /*iniobj dsym_1816__CLASS_SOURCE_DEFINITION_FORMAL*/ /*uniqueobj*/ if (! /*_.VALDATA___V1987*/ meltfptr[1986]) /*_.VALDATA___V1987*/ meltfptr[1986] = (melt_ptr_t) & cdat->dsym_1816__CLASS_SOURCE_DEFINITION_FORMAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1816__CLASS_SOURCE_DEFINITION_FORMAL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1816__CLASS_SOURCE_DEFINITION_FORMAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1816__CLASS_SOURCE_DEFINITION_FORMAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1816__CLASS_SOURCE_DEFINITION_FORMAL.obj_hash = 444695028; cdat->dsym_1816__CLASS_SOURCE_DEFINITION_FORMAL.obj_len = 3; /*inistring dstr_1817__CLASS_SOURCE_DEF*/ /*_.VALSTR___V1988*/ meltfptr[1987] = (melt_ptr_t) & cdat->dstr_1817__CLASS_SOURCE_DEF; cdat->dstr_1817__CLASS_SOURCE_DEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1817__CLASS_SOURCE_DEF.val, "CLASS_SOURCE_DEFINITION_FORMAL", sizeof (cdat->dstr_1817__CLASS_SOURCE_DEF. val) - 1); cdat->dstr_1817__CLASS_SOURCE_DEF.val[30] = (char) 0; cdat->dstr_1817__CLASS_SOURCE_DEF.slen = 30; /*iniobj dsym_1818__CLASS_FUNMATCHER_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1989*/ meltfptr[1988]) /*_.VALDATA___V1989*/ meltfptr[1988] = (melt_ptr_t) & cdat->dsym_1818__CLASS_FUNMATCHER_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1818__CLASS_FUNMATCHER_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_1818__CLASS_FUNMATCHER_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1818__CLASS_FUNMATCHER_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1818__CLASS_FUNMATCHER_BINDING.obj_hash = 81554237; cdat->dsym_1818__CLASS_FUNMATCHER_BINDING.obj_len = 3; /*inistring dstr_1819__CLASS_FUNMATCHER*/ /*_.VALSTR___V1990*/ meltfptr[1989] = (melt_ptr_t) & cdat->dstr_1819__CLASS_FUNMATCHER; cdat->dstr_1819__CLASS_FUNMATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1819__CLASS_FUNMATCHER.val, "CLASS_FUNMATCHER_BINDING", sizeof (cdat->dstr_1819__CLASS_FUNMATCHER. val) - 1); cdat->dstr_1819__CLASS_FUNMATCHER.val[24] = (char) 0; cdat->dstr_1819__CLASS_FUNMATCHER.slen = 24; /*iniobj dsym_1820__FMATCH_MATCHF*/ /*uniqueobj*/ if (! /*_.VALDATA___V1991*/ meltfptr[1990]) /*_.VALDATA___V1991*/ meltfptr[1990] = (melt_ptr_t) & cdat->dsym_1820__FMATCH_MATCHF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1820__FMATCH_MATCHF", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1820__FMATCH_MATCHF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1820__FMATCH_MATCHF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1820__FMATCH_MATCHF.obj_hash = 945393090; cdat->dsym_1820__FMATCH_MATCHF.obj_len = 3; /*inistring dstr_1821__FMATCH_MATCHF*/ /*_.VALSTR___V1992*/ meltfptr[1991] = (melt_ptr_t) & cdat->dstr_1821__FMATCH_MATCHF; cdat->dstr_1821__FMATCH_MATCHF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1821__FMATCH_MATCHF.val, "FMATCH_MATCHF", sizeof (cdat->dstr_1821__FMATCH_MATCHF.val) - 1); cdat->dstr_1821__FMATCH_MATCHF.val[13] = (char) 0; cdat->dstr_1821__FMATCH_MATCHF.slen = 13; /*iniobj dsym_1822__FMATCH_DATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V1993*/ meltfptr[1992]) /*_.VALDATA___V1993*/ meltfptr[1992] = (melt_ptr_t) & cdat->dsym_1822__FMATCH_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1822__FMATCH_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_1822__FMATCH_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1822__FMATCH_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1822__FMATCH_DATA.obj_hash = 299630655; cdat->dsym_1822__FMATCH_DATA.obj_len = 3; /*inistring dstr_1823__FMATCH_DATA*/ /*_.VALSTR___V1994*/ meltfptr[1993] = (melt_ptr_t) & cdat->dstr_1823__FMATCH_DATA; cdat->dstr_1823__FMATCH_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1823__FMATCH_DATA.val, "FMATCH_DATA", sizeof (cdat->dstr_1823__FMATCH_DATA.val) - 1); cdat->dstr_1823__FMATCH_DATA.val[11] = (char) 0; cdat->dstr_1823__FMATCH_DATA.slen = 11; /*inirout drout_1824__NORMEXP_DEFCLASS */ /*_.VALROUT___V1995*/ meltfptr[1994] = (melt_ptr_t) & cdat->drout_1824__NORMEXP_DEFCLASS; cdat->drout_1824__NORMEXP_DEFCLASS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1824__NORMEXP_DEFCLASS.routdescr, "NORMEXP_DEFCLASS @warmelt-normal.melt:5974", MELT_ROUTDESCR_LEN - 1); cdat->drout_1824__NORMEXP_DEFCLASS.nbval = 31; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1824__NORMEXP_DEFCLASS, meltrout_139_warmelt_normal_NORMEXP_DEFCLASS); /*iniclos dclo_1825__NORMEXP_DEFCLASS */ /*_.VALCLO___V1998*/ meltfptr[1997] = (melt_ptr_t) & cdat->dclo_1825__NORMEXP_DEFCLASS; cdat->dclo_1825__NORMEXP_DEFCLASS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1825__NORMEXP_DEFCLASS.nbval = 0; /*iniobj dsym_1826__CLASS_SOURCE_DEFCLASS*/ /*uniqueobj*/ if (! /*_.VALDATA___V1999*/ meltfptr[1998]) /*_.VALDATA___V1999*/ meltfptr[1998] = (melt_ptr_t) & cdat->dsym_1826__CLASS_SOURCE_DEFCLASS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1826__CLASS_SOURCE_DEFCLASS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1826__CLASS_SOURCE_DEFCLASS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1826__CLASS_SOURCE_DEFCLASS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1826__CLASS_SOURCE_DEFCLASS.obj_hash = 964015067; cdat->dsym_1826__CLASS_SOURCE_DEFCLASS.obj_len = 3; /*inistring dstr_1827__CLASS_SOURCE_DEF*/ /*_.VALSTR___V2000*/ meltfptr[1999] = (melt_ptr_t) & cdat->dstr_1827__CLASS_SOURCE_DEF; cdat->dstr_1827__CLASS_SOURCE_DEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1827__CLASS_SOURCE_DEF.val, "CLASS_SOURCE_DEFCLASS", sizeof (cdat->dstr_1827__CLASS_SOURCE_DEF. val) - 1); cdat->dstr_1827__CLASS_SOURCE_DEF.val[21] = (char) 0; cdat->dstr_1827__CLASS_SOURCE_DEF.slen = 21; /*iniobj dsym_1828__MELTOBMAG_OBJECT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1996*/ meltfptr[1995]) /*_.VALDATA___V1996*/ meltfptr[1995] = (melt_ptr_t) & cdat->dsym_1828__MELTOBMAG_OBJECT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1828__MELTOBMAG_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_1828__MELTOBMAG_OBJECT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1828__MELTOBMAG_OBJECT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1828__MELTOBMAG_OBJECT.obj_hash = 562339981; cdat->dsym_1828__MELTOBMAG_OBJECT.obj_len = 3; /*inistring dstr_1829__MELTOBMAG_OBJECT*/ /*_.VALSTR___V1997*/ meltfptr[1996] = (melt_ptr_t) & cdat->dstr_1829__MELTOBMAG_OBJECT; cdat->dstr_1829__MELTOBMAG_OBJECT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1829__MELTOBMAG_OBJECT.val, "MELTOBMAG_OBJECT", sizeof (cdat->dstr_1829__MELTOBMAG_OBJECT. val) - 1); cdat->dstr_1829__MELTOBMAG_OBJECT.val[16] = (char) 0; cdat->dstr_1829__MELTOBMAG_OBJECT.slen = 16; /*iniobj dsym_1830__CLASS_ANCESTORS*/ /*uniqueobj*/ if (! /*_.VALDATA___V2001*/ meltfptr[2000]) /*_.VALDATA___V2001*/ meltfptr[2000] = (melt_ptr_t) & cdat->dsym_1830__CLASS_ANCESTORS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1830__CLASS_ANCESTORS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1830__CLASS_ANCESTORS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1830__CLASS_ANCESTORS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1830__CLASS_ANCESTORS.obj_hash = 586101398; cdat->dsym_1830__CLASS_ANCESTORS.obj_len = 3; /*inistring dstr_1831__CLASS_ANCESTORS*/ /*_.VALSTR___V2002*/ meltfptr[2001] = (melt_ptr_t) & cdat->dstr_1831__CLASS_ANCESTORS; cdat->dstr_1831__CLASS_ANCESTORS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1831__CLASS_ANCESTORS.val, "CLASS_ANCESTORS", sizeof (cdat->dstr_1831__CLASS_ANCESTORS. val) - 1); cdat->dstr_1831__CLASS_ANCESTORS.val[15] = (char) 0; cdat->dstr_1831__CLASS_ANCESTORS.slen = 15; /*iniobj dsym_1832__CLASS_FIELDS*/ /*uniqueobj*/ if (! /*_.VALDATA___V2003*/ meltfptr[2002]) /*_.VALDATA___V2003*/ meltfptr[2002] = (melt_ptr_t) & cdat->dsym_1832__CLASS_FIELDS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1832__CLASS_FIELDS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1832__CLASS_FIELDS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1832__CLASS_FIELDS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1832__CLASS_FIELDS.obj_hash = 405169432; cdat->dsym_1832__CLASS_FIELDS.obj_len = 3; /*inistring dstr_1833__CLASS_FIELDS*/ /*_.VALSTR___V2004*/ meltfptr[2003] = (melt_ptr_t) & cdat->dstr_1833__CLASS_FIELDS; cdat->dstr_1833__CLASS_FIELDS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1833__CLASS_FIELDS.val, "CLASS_FIELDS", sizeof (cdat->dstr_1833__CLASS_FIELDS.val) - 1); cdat->dstr_1833__CLASS_FIELDS.val[12] = (char) 0; cdat->dstr_1833__CLASS_FIELDS.slen = 12; /*iniobj dsym_1834__CLASS_FIELD_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V2005*/ meltfptr[2004]) /*_.VALDATA___V2005*/ meltfptr[2004] = (melt_ptr_t) & cdat->dsym_1834__CLASS_FIELD_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1834__CLASS_FIELD_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_1834__CLASS_FIELD_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1834__CLASS_FIELD_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1834__CLASS_FIELD_BINDING.obj_hash = 412002748; cdat->dsym_1834__CLASS_FIELD_BINDING.obj_len = 3; /*inistring dstr_1835__CLASS_FIELD_BIND*/ /*_.VALSTR___V2006*/ meltfptr[2005] = (melt_ptr_t) & cdat->dstr_1835__CLASS_FIELD_BIND; cdat->dstr_1835__CLASS_FIELD_BIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1835__CLASS_FIELD_BIND.val, "CLASS_FIELD_BINDING", sizeof (cdat->dstr_1835__CLASS_FIELD_BIND. val) - 1); cdat->dstr_1835__CLASS_FIELD_BIND.val[19] = (char) 0; cdat->dstr_1835__CLASS_FIELD_BIND.slen = 19; /*iniobj dsym_1836__FLD_OWNCLASS*/ /*uniqueobj*/ if (! /*_.VALDATA___V2007*/ meltfptr[2006]) /*_.VALDATA___V2007*/ meltfptr[2006] = (melt_ptr_t) & cdat->dsym_1836__FLD_OWNCLASS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1836__FLD_OWNCLASS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1836__FLD_OWNCLASS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1836__FLD_OWNCLASS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1836__FLD_OWNCLASS.obj_hash = 376525087; cdat->dsym_1836__FLD_OWNCLASS.obj_len = 3; /*inistring dstr_1837__FLD_OWNCLASS*/ /*_.VALSTR___V2008*/ meltfptr[2007] = (melt_ptr_t) & cdat->dstr_1837__FLD_OWNCLASS; cdat->dstr_1837__FLD_OWNCLASS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1837__FLD_OWNCLASS.val, "FLD_OWNCLASS", sizeof (cdat->dstr_1837__FLD_OWNCLASS.val) - 1); cdat->dstr_1837__FLD_OWNCLASS.val[12] = (char) 0; cdat->dstr_1837__FLD_OWNCLASS.slen = 12; /*iniobj dsym_1838__DISC_SUPER*/ /*uniqueobj*/ if (! /*_.VALDATA___V2009*/ meltfptr[2008]) /*_.VALDATA___V2009*/ meltfptr[2008] = (melt_ptr_t) & cdat->dsym_1838__DISC_SUPER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1838__DISC_SUPER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1838__DISC_SUPER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1838__DISC_SUPER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1838__DISC_SUPER.obj_hash = 410007578; cdat->dsym_1838__DISC_SUPER.obj_len = 3; /*inistring dstr_1839__DISC_SUPER*/ /*_.VALSTR___V2010*/ meltfptr[2009] = (melt_ptr_t) & cdat->dstr_1839__DISC_SUPER; cdat->dstr_1839__DISC_SUPER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1839__DISC_SUPER.val, "DISC_SUPER", sizeof (cdat->dstr_1839__DISC_SUPER.val) - 1); cdat->dstr_1839__DISC_SUPER.val[10] = (char) 0; cdat->dstr_1839__DISC_SUPER.slen = 10; /*inirout drout_1840__NORMEXP_DEFINSTANCE */ /*_.VALROUT___V2011*/ meltfptr[2010] = (melt_ptr_t) & cdat->drout_1840__NORMEXP_DEFINSTANCE; cdat->drout_1840__NORMEXP_DEFINSTANCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1840__NORMEXP_DEFINSTANCE.routdescr, "NORMEXP_DEFINSTANCE @warmelt-normal.melt:6151", MELT_ROUTDESCR_LEN - 1); cdat->drout_1840__NORMEXP_DEFINSTANCE.nbval = 32; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1840__NORMEXP_DEFINSTANCE, meltrout_140_warmelt_normal_NORMEXP_DEFINSTANCE); /*iniclos dclo_1841__NORMEXP_DEFINSTANCE */ /*_.VALCLO___V2013*/ meltfptr[2012] = (melt_ptr_t) & cdat->dclo_1841__NORMEXP_DEFINSTANCE; cdat->dclo_1841__NORMEXP_DEFINSTANCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1841__NORMEXP_DEFINSTANCE.nbval = 0; /*iniobj dsym_1842__CLASS_SOURCE_DEFINSTANCE*/ /*uniqueobj*/ if (! /*_.VALDATA___V2014*/ meltfptr[2013]) /*_.VALDATA___V2014*/ meltfptr[2013] = (melt_ptr_t) & cdat->dsym_1842__CLASS_SOURCE_DEFINSTANCE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1842__CLASS_SOURCE_DEFINSTANCE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1842__CLASS_SOURCE_DEFINSTANCE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1842__CLASS_SOURCE_DEFINSTANCE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1842__CLASS_SOURCE_DEFINSTANCE.obj_hash = 1015265906; cdat->dsym_1842__CLASS_SOURCE_DEFINSTANCE.obj_len = 3; /*inistring dstr_1843__CLASS_SOURCE_DEF*/ /*_.VALSTR___V2015*/ meltfptr[2014] = (melt_ptr_t) & cdat->dstr_1843__CLASS_SOURCE_DEF; cdat->dstr_1843__CLASS_SOURCE_DEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1843__CLASS_SOURCE_DEF.val, "CLASS_SOURCE_DEFINSTANCE", sizeof (cdat->dstr_1843__CLASS_SOURCE_DEF. val) - 1); cdat->dstr_1843__CLASS_SOURCE_DEF.val[24] = (char) 0; cdat->dstr_1843__CLASS_SOURCE_DEF.slen = 24; /*iniobj dsym_1844__CLASS_INSTANCE_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V2016*/ meltfptr[2015]) /*_.VALDATA___V2016*/ meltfptr[2015] = (melt_ptr_t) & cdat->dsym_1844__CLASS_INSTANCE_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1844__CLASS_INSTANCE_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_1844__CLASS_INSTANCE_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1844__CLASS_INSTANCE_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1844__CLASS_INSTANCE_BINDING.obj_hash = 401143458; cdat->dsym_1844__CLASS_INSTANCE_BINDING.obj_len = 3; /*inistring dstr_1845__CLASS_INSTANCE_B*/ /*_.VALSTR___V2017*/ meltfptr[2016] = (melt_ptr_t) & cdat->dstr_1845__CLASS_INSTANCE_B; cdat->dstr_1845__CLASS_INSTANCE_B.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1845__CLASS_INSTANCE_B.val, "CLASS_INSTANCE_BINDING", sizeof (cdat->dstr_1845__CLASS_INSTANCE_B. val) - 1); cdat->dstr_1845__CLASS_INSTANCE_B.val[22] = (char) 0; cdat->dstr_1845__CLASS_INSTANCE_B.slen = 22; /*inirout drout_1846__LAMBDA_ */ /*_.VALROUT___V2012*/ meltfptr[2011] = (melt_ptr_t) & cdat->drout_1846__LAMBDA_; cdat->drout_1846__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1846__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:6207", MELT_ROUTDESCR_LEN - 1); cdat->drout_1846__LAMBDA_.nbval = 9; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1846__LAMBDA_, meltrout_141_warmelt_normal_LAMBDA___51__); /*inirout drout_1847__NORMEXP_DEFINE */ /*_.VALROUT___V2018*/ meltfptr[2017] = (melt_ptr_t) & cdat->drout_1847__NORMEXP_DEFINE; cdat->drout_1847__NORMEXP_DEFINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1847__NORMEXP_DEFINE.routdescr, "NORMEXP_DEFINE @warmelt-normal.melt:6252", MELT_ROUTDESCR_LEN - 1); cdat->drout_1847__NORMEXP_DEFINE.nbval = 24; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1847__NORMEXP_DEFINE, meltrout_142_warmelt_normal_NORMEXP_DEFINE); /*iniclos dclo_1848__NORMEXP_DEFINE */ /*_.VALCLO___V2020*/ meltfptr[2019] = (melt_ptr_t) & cdat->dclo_1848__NORMEXP_DEFINE; cdat->dclo_1848__NORMEXP_DEFINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1848__NORMEXP_DEFINE.nbval = 0; /*iniobj dsym_1849__CLASS_SOURCE_DEFINE*/ /*uniqueobj*/ if (! /*_.VALDATA___V2021*/ meltfptr[2020]) /*_.VALDATA___V2021*/ meltfptr[2020] = (melt_ptr_t) & cdat->dsym_1849__CLASS_SOURCE_DEFINE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1849__CLASS_SOURCE_DEFINE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1849__CLASS_SOURCE_DEFINE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1849__CLASS_SOURCE_DEFINE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1849__CLASS_SOURCE_DEFINE.obj_hash = 111330536; cdat->dsym_1849__CLASS_SOURCE_DEFINE.obj_len = 3; /*inistring dstr_1850__CLASS_SOURCE_DEF*/ /*_.VALSTR___V2022*/ meltfptr[2021] = (melt_ptr_t) & cdat->dstr_1850__CLASS_SOURCE_DEF; cdat->dstr_1850__CLASS_SOURCE_DEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1850__CLASS_SOURCE_DEF.val, "CLASS_SOURCE_DEFINE", sizeof (cdat->dstr_1850__CLASS_SOURCE_DEF. val) - 1); cdat->dstr_1850__CLASS_SOURCE_DEF.val[19] = (char) 0; cdat->dstr_1850__CLASS_SOURCE_DEF.slen = 19; /*inirout drout_1851__LAMBDA_ */ /*_.VALROUT___V2019*/ meltfptr[2018] = (melt_ptr_t) & cdat->drout_1851__LAMBDA_; cdat->drout_1851__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1851__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:6309", MELT_ROUTDESCR_LEN - 1); cdat->drout_1851__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1851__LAMBDA_, meltrout_143_warmelt_normal_LAMBDA___52__); /*inirout drout_1852__NORMEXP_DEFSELECTOR */ /*_.VALROUT___V2023*/ meltfptr[2022] = (melt_ptr_t) & cdat->drout_1852__NORMEXP_DEFSELECTOR; cdat->drout_1852__NORMEXP_DEFSELECTOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1852__NORMEXP_DEFSELECTOR.routdescr, "NORMEXP_DEFSELECTOR @warmelt-normal.melt:6342", MELT_ROUTDESCR_LEN - 1); cdat->drout_1852__NORMEXP_DEFSELECTOR.nbval = 36; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1852__NORMEXP_DEFSELECTOR, meltrout_144_warmelt_normal_NORMEXP_DEFSELECTOR); /*iniclos dclo_1853__NORMEXP_DEFSELECTOR */ /*_.VALCLO___V2025*/ meltfptr[2024] = (melt_ptr_t) & cdat->dclo_1853__NORMEXP_DEFSELECTOR; cdat->dclo_1853__NORMEXP_DEFSELECTOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1853__NORMEXP_DEFSELECTOR.nbval = 0; /*iniobj dsym_1854__SDEFSEL_FORMALS*/ /*uniqueobj*/ if (! /*_.VALDATA___V2026*/ meltfptr[2025]) /*_.VALDATA___V2026*/ meltfptr[2025] = (melt_ptr_t) & cdat->dsym_1854__SDEFSEL_FORMALS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1854__SDEFSEL_FORMALS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1854__SDEFSEL_FORMALS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1854__SDEFSEL_FORMALS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1854__SDEFSEL_FORMALS.obj_hash = 800815677; cdat->dsym_1854__SDEFSEL_FORMALS.obj_len = 3; /*inistring dstr_1855__SDEFSEL_FORMALS*/ /*_.VALSTR___V2027*/ meltfptr[2026] = (melt_ptr_t) & cdat->dstr_1855__SDEFSEL_FORMALS; cdat->dstr_1855__SDEFSEL_FORMALS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1855__SDEFSEL_FORMALS.val, "SDEFSEL_FORMALS", sizeof (cdat->dstr_1855__SDEFSEL_FORMALS. val) - 1); cdat->dstr_1855__SDEFSEL_FORMALS.val[15] = (char) 0; cdat->dstr_1855__SDEFSEL_FORMALS.slen = 15; /*inirout drout_1856__LAMBDA_ */ /*_.VALROUT___V2024*/ meltfptr[2023] = (melt_ptr_t) & cdat->drout_1856__LAMBDA_; cdat->drout_1856__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1856__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:6417", MELT_ROUTDESCR_LEN - 1); cdat->drout_1856__LAMBDA_.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1856__LAMBDA_, meltrout_145_warmelt_normal_LAMBDA___53__); /*inirout drout_1857__NORMAL_VALUE_EXPORTER */ /*_.VALROUT___V2028*/ meltfptr[2027] = (melt_ptr_t) & cdat->drout_1857__NORMAL_VALUE_EXPORTER; cdat->drout_1857__NORMAL_VALUE_EXPORTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1857__NORMAL_VALUE_EXPORTER.routdescr, "NORMAL_VALUE_EXPORTER @warmelt-normal.melt:6465", MELT_ROUTDESCR_LEN - 1); cdat->drout_1857__NORMAL_VALUE_EXPORTER.nbval = 11; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1857__NORMAL_VALUE_EXPORTER, meltrout_146_warmelt_normal_NORMAL_VALUE_EXPORTER); /*iniclos dclo_1858__NORMAL_VALUE_EXPORTER */ /*_.VALCLO___V2031*/ meltfptr[2030] = (melt_ptr_t) & cdat->dclo_1858__NORMAL_VALUE_EXPORTER; cdat->dclo_1858__NORMAL_VALUE_EXPORTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1858__NORMAL_VALUE_EXPORTER.nbval = 0; /*iniobj dsym_1859__VALUEXPORTER_*/ /*uniqueobj*/ if (! /*_.VALDATA___V2029*/ meltfptr[2028]) /*_.VALDATA___V2029*/ meltfptr[2028] = (melt_ptr_t) & cdat->dsym_1859__VALUEXPORTER_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1859__VALUEXPORTER_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1859__VALUEXPORTER_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1859__VALUEXPORTER_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1859__VALUEXPORTER_.obj_hash = 257091205; cdat->dsym_1859__VALUEXPORTER_.obj_len = 3; /*inistring dstr_1860__VALUEXPORTER_*/ /*_.VALSTR___V2030*/ meltfptr[2029] = (melt_ptr_t) & cdat->dstr_1860__VALUEXPORTER_; cdat->dstr_1860__VALUEXPORTER_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1860__VALUEXPORTER_.val, "_VALUEXPORTER_", sizeof (cdat->dstr_1860__VALUEXPORTER_.val) - 1); cdat->dstr_1860__VALUEXPORTER_.val[14] = (char) 0; cdat->dstr_1860__VALUEXPORTER_.slen = 14; /*iniobj dsym_1861__SYSDATA_VALUE_EXPORTER*/ /*uniqueobj*/ if (! /*_.VALDATA___V2032*/ meltfptr[2031]) /*_.VALDATA___V2032*/ meltfptr[2031] = (melt_ptr_t) & cdat->dsym_1861__SYSDATA_VALUE_EXPORTER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1861__SYSDATA_VALUE_EXPORTER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1861__SYSDATA_VALUE_EXPORTER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1861__SYSDATA_VALUE_EXPORTER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1861__SYSDATA_VALUE_EXPORTER.obj_hash = 648451867; cdat->dsym_1861__SYSDATA_VALUE_EXPORTER.obj_len = 3; /*inistring dstr_1862__SYSDATA_VALUE_EX*/ /*_.VALSTR___V2033*/ meltfptr[2032] = (melt_ptr_t) & cdat->dstr_1862__SYSDATA_VALUE_EX; cdat->dstr_1862__SYSDATA_VALUE_EX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1862__SYSDATA_VALUE_EX.val, "SYSDATA_VALUE_EXPORTER", sizeof (cdat->dstr_1862__SYSDATA_VALUE_EX. val) - 1); cdat->dstr_1862__SYSDATA_VALUE_EX.val[22] = (char) 0; cdat->dstr_1862__SYSDATA_VALUE_EX.slen = 22; /*inirout drout_1863__NORMAL_EXPORTED_VALUE */ /*_.VALROUT___V2034*/ meltfptr[2033] = (melt_ptr_t) & cdat->drout_1863__NORMAL_EXPORTED_VALUE; cdat->drout_1863__NORMAL_EXPORTED_VALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1863__NORMAL_EXPORTED_VALUE.routdescr, "NORMAL_EXPORTED_VALUE @warmelt-normal.melt:6500", MELT_ROUTDESCR_LEN - 1); cdat->drout_1863__NORMAL_EXPORTED_VALUE.nbval = 18; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1863__NORMAL_EXPORTED_VALUE, meltrout_147_warmelt_normal_NORMAL_EXPORTED_VALUE); /*iniclos dclo_1864__NORMAL_EXPORTED_VALUE */ /*_.VALCLO___V2037*/ meltfptr[2036] = (melt_ptr_t) & cdat->dclo_1864__NORMAL_EXPORTED_VALUE; cdat->dclo_1864__NORMAL_EXPORTED_VALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1864__NORMAL_EXPORTED_VALUE.nbval = 0; /*iniobj dsym_1865__EXPORTED_*/ /*uniqueobj*/ if (! /*_.VALDATA___V2035*/ meltfptr[2034]) /*_.VALDATA___V2035*/ meltfptr[2034] = (melt_ptr_t) & cdat->dsym_1865__EXPORTED_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1865__EXPORTED_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1865__EXPORTED_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1865__EXPORTED_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1865__EXPORTED_.obj_hash = 659074871; cdat->dsym_1865__EXPORTED_.obj_len = 3; /*inistring dstr_1866__EXPORTED_*/ /*_.VALSTR___V2036*/ meltfptr[2035] = (melt_ptr_t) & cdat->dstr_1866__EXPORTED_; cdat->dstr_1866__EXPORTED_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1866__EXPORTED_.val, "_EXPORTED_", sizeof (cdat->dstr_1866__EXPORTED_.val) - 1); cdat->dstr_1866__EXPORTED_.val[10] = (char) 0; cdat->dstr_1866__EXPORTED_.slen = 10; /*iniobj dsym_1867__CLASS_SOURCE_CURRENT_MODULE_ENVIRONMENT_CONTAINER*/ /*uniqueobj*/ if (! /*_.VALDATA___V2038*/ meltfptr[2037]) /*_.VALDATA___V2038*/ meltfptr[2037] = (melt_ptr_t) & cdat-> dsym_1867__CLASS_SOURCE_CURRENT_MODULE_ENVIRONMENT_CONTAINER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1867__CLASS_SOURCE_CURRENT_MODULE_ENVIRONMENT_CONTAINER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1867__CLASS_SOURCE_CURRENT_MODULE_ENVIRONMENT_CONTAINER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1867__CLASS_SOURCE_CURRENT_MODULE_ENVIRONMENT_CONTAINER. meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1867__CLASS_SOURCE_CURRENT_MODULE_ENVIRONMENT_CONTAINER. obj_hash = 483365704; cdat->dsym_1867__CLASS_SOURCE_CURRENT_MODULE_ENVIRONMENT_CONTAINER.obj_len = 3; /*inistring dstr_1868__CLASS_SOURCE_CUR*/ /*_.VALSTR___V2039*/ meltfptr[2038] = (melt_ptr_t) & cdat->dstr_1868__CLASS_SOURCE_CUR; cdat->dstr_1868__CLASS_SOURCE_CUR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1868__CLASS_SOURCE_CUR.val, "CLASS_SOURCE_CURRENT_MODULE_ENVIRONMENT_CONTAINER", sizeof (cdat->dstr_1868__CLASS_SOURCE_CUR. val) - 1); cdat->dstr_1868__CLASS_SOURCE_CUR.val[49] = (char) 0; cdat->dstr_1868__CLASS_SOURCE_CUR.slen = 49; /*inirout drout_1869__NORMEXP_EXPORT_VALUES */ /*_.VALROUT___V2040*/ meltfptr[2039] = (melt_ptr_t) & cdat->drout_1869__NORMEXP_EXPORT_VALUES; cdat->drout_1869__NORMEXP_EXPORT_VALUES.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1869__NORMEXP_EXPORT_VALUES.routdescr, "NORMEXP_EXPORT_VALUES @warmelt-normal.melt:6554", MELT_ROUTDESCR_LEN - 1); cdat->drout_1869__NORMEXP_EXPORT_VALUES.nbval = 11; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1869__NORMEXP_EXPORT_VALUES, meltrout_148_warmelt_normal_NORMEXP_EXPORT_VALUES); /*iniclos dclo_1870__NORMEXP_EXPORT_VALUES */ /*_.VALCLO___V2041*/ meltfptr[2040] = (melt_ptr_t) & cdat->dclo_1870__NORMEXP_EXPORT_VALUES; cdat->dclo_1870__NORMEXP_EXPORT_VALUES.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1870__NORMEXP_EXPORT_VALUES.nbval = 0; /*iniobj dsym_1871__CLASS_SOURCE_EXPORT_VALUES*/ /*uniqueobj*/ if (! /*_.VALDATA___V2042*/ meltfptr[2041]) /*_.VALDATA___V2042*/ meltfptr[2041] = (melt_ptr_t) & cdat->dsym_1871__CLASS_SOURCE_EXPORT_VALUES; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1871__CLASS_SOURCE_EXPORT_VALUES", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1871__CLASS_SOURCE_EXPORT_VALUES", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1871__CLASS_SOURCE_EXPORT_VALUES.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1871__CLASS_SOURCE_EXPORT_VALUES.obj_hash = 1002145334; cdat->dsym_1871__CLASS_SOURCE_EXPORT_VALUES.obj_len = 3; /*inistring dstr_1872__CLASS_SOURCE_EXP*/ /*_.VALSTR___V2043*/ meltfptr[2042] = (melt_ptr_t) & cdat->dstr_1872__CLASS_SOURCE_EXP; cdat->dstr_1872__CLASS_SOURCE_EXP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1872__CLASS_SOURCE_EXP.val, "CLASS_SOURCE_EXPORT_VALUES", sizeof (cdat->dstr_1872__CLASS_SOURCE_EXP. val) - 1); cdat->dstr_1872__CLASS_SOURCE_EXP.val[26] = (char) 0; cdat->dstr_1872__CLASS_SOURCE_EXP.slen = 26; /*inirout drout_1873__NORMEXP_EXPORT_SYNONYM */ /*_.VALROUT___V2044*/ meltfptr[2043] = (melt_ptr_t) & cdat->drout_1873__NORMEXP_EXPORT_SYNONYM; cdat->drout_1873__NORMEXP_EXPORT_SYNONYM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1873__NORMEXP_EXPORT_SYNONYM.routdescr, "NORMEXP_EXPORT_SYNONYM @warmelt-normal.melt:6597", MELT_ROUTDESCR_LEN - 1); cdat->drout_1873__NORMEXP_EXPORT_SYNONYM.nbval = 11; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1873__NORMEXP_EXPORT_SYNONYM, meltrout_149_warmelt_normal_NORMEXP_EXPORT_SYNONYM); /*iniclos dclo_1874__NORMEXP_EXPORT_SYNONYM */ /*_.VALCLO___V2045*/ meltfptr[2044] = (melt_ptr_t) & cdat->dclo_1874__NORMEXP_EXPORT_SYNONYM; cdat->dclo_1874__NORMEXP_EXPORT_SYNONYM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1874__NORMEXP_EXPORT_SYNONYM.nbval = 0; /*iniobj dsym_1875__CLASS_SOURCE_EXPORT_SYNONYM*/ /*uniqueobj*/ if (! /*_.VALDATA___V2046*/ meltfptr[2045]) /*_.VALDATA___V2046*/ meltfptr[2045] = (melt_ptr_t) & cdat->dsym_1875__CLASS_SOURCE_EXPORT_SYNONYM; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1875__CLASS_SOURCE_EXPORT_SYNONYM", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1875__CLASS_SOURCE_EXPORT_SYNONYM", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1875__CLASS_SOURCE_EXPORT_SYNONYM.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1875__CLASS_SOURCE_EXPORT_SYNONYM.obj_hash = 648101459; cdat->dsym_1875__CLASS_SOURCE_EXPORT_SYNONYM.obj_len = 3; /*inistring dstr_1876__CLASS_SOURCE_EXP*/ /*_.VALSTR___V2047*/ meltfptr[2046] = (melt_ptr_t) & cdat->dstr_1876__CLASS_SOURCE_EXP; cdat->dstr_1876__CLASS_SOURCE_EXP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1876__CLASS_SOURCE_EXP.val, "CLASS_SOURCE_EXPORT_SYNONYM", sizeof (cdat->dstr_1876__CLASS_SOURCE_EXP. val) - 1); cdat->dstr_1876__CLASS_SOURCE_EXP.val[27] = (char) 0; cdat->dstr_1876__CLASS_SOURCE_EXP.slen = 27; /*inirout drout_1877__NORMEXP_EXPORT_CLASS */ /*_.VALROUT___V2048*/ meltfptr[2047] = (melt_ptr_t) & cdat->drout_1877__NORMEXP_EXPORT_CLASS; cdat->drout_1877__NORMEXP_EXPORT_CLASS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1877__NORMEXP_EXPORT_CLASS.routdescr, "NORMEXP_EXPORT_CLASS @warmelt-normal.melt:6638", MELT_ROUTDESCR_LEN - 1); cdat->drout_1877__NORMEXP_EXPORT_CLASS.nbval = 26; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1877__NORMEXP_EXPORT_CLASS, meltrout_150_warmelt_normal_NORMEXP_EXPORT_CLASS); /*iniclos dclo_1878__NORMEXP_EXPORT_CLASS */ /*_.VALCLO___V2051*/ meltfptr[2050] = (melt_ptr_t) & cdat->dclo_1878__NORMEXP_EXPORT_CLASS; cdat->dclo_1878__NORMEXP_EXPORT_CLASS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1878__NORMEXP_EXPORT_CLASS.nbval = 0; /*iniobj dsym_1879__CLASS_SOURCE_EXPORT_CLASS*/ /*uniqueobj*/ if (! /*_.VALDATA___V2052*/ meltfptr[2051]) /*_.VALDATA___V2052*/ meltfptr[2051] = (melt_ptr_t) & cdat->dsym_1879__CLASS_SOURCE_EXPORT_CLASS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1879__CLASS_SOURCE_EXPORT_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_1879__CLASS_SOURCE_EXPORT_CLASS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1879__CLASS_SOURCE_EXPORT_CLASS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1879__CLASS_SOURCE_EXPORT_CLASS.obj_hash = 460824012; cdat->dsym_1879__CLASS_SOURCE_EXPORT_CLASS.obj_len = 3; /*inistring dstr_1880__CLASS_SOURCE_EXP*/ /*_.VALSTR___V2053*/ meltfptr[2052] = (melt_ptr_t) & cdat->dstr_1880__CLASS_SOURCE_EXP; cdat->dstr_1880__CLASS_SOURCE_EXP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1880__CLASS_SOURCE_EXP.val, "CLASS_SOURCE_EXPORT_CLASS", sizeof (cdat->dstr_1880__CLASS_SOURCE_EXP. val) - 1); cdat->dstr_1880__CLASS_SOURCE_EXP.val[25] = (char) 0; cdat->dstr_1880__CLASS_SOURCE_EXP.slen = 25; /*inirout drout_1881__LAMBDA_ */ /*_.VALROUT___V2049*/ meltfptr[2048] = (melt_ptr_t) & cdat->drout_1881__LAMBDA_; cdat->drout_1881__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1881__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:6655", MELT_ROUTDESCR_LEN - 1); cdat->drout_1881__LAMBDA_.nbval = 17; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1881__LAMBDA_, meltrout_151_warmelt_normal_LAMBDA___54__); /*inirout drout_1882__LAMBDA_ */ /*_.VALROUT___V2050*/ meltfptr[2049] = (melt_ptr_t) & cdat->drout_1882__LAMBDA_; cdat->drout_1882__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1882__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:6688", MELT_ROUTDESCR_LEN - 1); cdat->drout_1882__LAMBDA_.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1882__LAMBDA_, meltrout_152_warmelt_normal_LAMBDA___55__); /*inirout drout_1883__NORMAL_MACRO_EXPORTER */ /*_.VALROUT___V2054*/ meltfptr[2053] = (melt_ptr_t) & cdat->drout_1883__NORMAL_MACRO_EXPORTER; cdat->drout_1883__NORMAL_MACRO_EXPORTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1883__NORMAL_MACRO_EXPORTER.routdescr, "NORMAL_MACRO_EXPORTER @warmelt-normal.melt:6716", MELT_ROUTDESCR_LEN - 1); cdat->drout_1883__NORMAL_MACRO_EXPORTER.nbval = 12; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1883__NORMAL_MACRO_EXPORTER, meltrout_153_warmelt_normal_NORMAL_MACRO_EXPORTER); /*iniclos dclo_1884__NORMAL_MACRO_EXPORTER */ /*_.VALCLO___V2057*/ meltfptr[2056] = (melt_ptr_t) & cdat->dclo_1884__NORMAL_MACRO_EXPORTER; cdat->dclo_1884__NORMAL_MACRO_EXPORTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1884__NORMAL_MACRO_EXPORTER.nbval = 0; /*iniobj dsym_1885__MACROXPORTER_*/ /*uniqueobj*/ if (! /*_.VALDATA___V2055*/ meltfptr[2054]) /*_.VALDATA___V2055*/ meltfptr[2054] = (melt_ptr_t) & cdat->dsym_1885__MACROXPORTER_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1885__MACROXPORTER_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1885__MACROXPORTER_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1885__MACROXPORTER_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1885__MACROXPORTER_.obj_hash = 665420847; cdat->dsym_1885__MACROXPORTER_.obj_len = 3; /*inistring dstr_1886__MACROXPORTER_*/ /*_.VALSTR___V2056*/ meltfptr[2055] = (melt_ptr_t) & cdat->dstr_1886__MACROXPORTER_; cdat->dstr_1886__MACROXPORTER_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1886__MACROXPORTER_.val, "_MACROXPORTER_", sizeof (cdat->dstr_1886__MACROXPORTER_.val) - 1); cdat->dstr_1886__MACROXPORTER_.val[14] = (char) 0; cdat->dstr_1886__MACROXPORTER_.slen = 14; /*iniobj dsym_1887__SYSDATA_MACRO_EXPORTER*/ /*uniqueobj*/ if (! /*_.VALDATA___V2058*/ meltfptr[2057]) /*_.VALDATA___V2058*/ meltfptr[2057] = (melt_ptr_t) & cdat->dsym_1887__SYSDATA_MACRO_EXPORTER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1887__SYSDATA_MACRO_EXPORTER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1887__SYSDATA_MACRO_EXPORTER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1887__SYSDATA_MACRO_EXPORTER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1887__SYSDATA_MACRO_EXPORTER.obj_hash = 1031773185; cdat->dsym_1887__SYSDATA_MACRO_EXPORTER.obj_len = 3; /*inistring dstr_1888__SYSDATA_MACRO_EX*/ /*_.VALSTR___V2059*/ meltfptr[2058] = (melt_ptr_t) & cdat->dstr_1888__SYSDATA_MACRO_EX; cdat->dstr_1888__SYSDATA_MACRO_EX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1888__SYSDATA_MACRO_EX.val, "SYSDATA_MACRO_EXPORTER", sizeof (cdat->dstr_1888__SYSDATA_MACRO_EX. val) - 1); cdat->dstr_1888__SYSDATA_MACRO_EX.val[22] = (char) 0; cdat->dstr_1888__SYSDATA_MACRO_EX.slen = 22; /*inirout drout_1889__NORMAL_PATMACRO_EXPORTER */ /*_.VALROUT___V2060*/ meltfptr[2059] = (melt_ptr_t) & cdat->drout_1889__NORMAL_PATMACRO_EXPORTER; cdat->drout_1889__NORMAL_PATMACRO_EXPORTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1889__NORMAL_PATMACRO_EXPORTER.routdescr, "NORMAL_PATMACRO_EXPORTER @warmelt-normal.melt:6746", MELT_ROUTDESCR_LEN - 1); cdat->drout_1889__NORMAL_PATMACRO_EXPORTER.nbval = 12; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1889__NORMAL_PATMACRO_EXPORTER, meltrout_154_warmelt_normal_NORMAL_PATMACRO_EXPORTER); /*iniclos dclo_1890__NORMAL_PATMACRO_EXPORTER */ /*_.VALCLO___V2063*/ meltfptr[2062] = (melt_ptr_t) & cdat->dclo_1890__NORMAL_PATMACRO_EXPORTER; cdat->dclo_1890__NORMAL_PATMACRO_EXPORTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1890__NORMAL_PATMACRO_EXPORTER.nbval = 0; /*iniobj dsym_1891__PATMACROXPORTER_*/ /*uniqueobj*/ if (! /*_.VALDATA___V2061*/ meltfptr[2060]) /*_.VALDATA___V2061*/ meltfptr[2060] = (melt_ptr_t) & cdat->dsym_1891__PATMACROXPORTER_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1891__PATMACROXPORTER_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1891__PATMACROXPORTER_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1891__PATMACROXPORTER_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1891__PATMACROXPORTER_.obj_hash = 986465973; cdat->dsym_1891__PATMACROXPORTER_.obj_len = 3; /*inistring dstr_1892__PATMACROXPORTER*/ /*_.VALSTR___V2062*/ meltfptr[2061] = (melt_ptr_t) & cdat->dstr_1892__PATMACROXPORTER; cdat->dstr_1892__PATMACROXPORTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1892__PATMACROXPORTER.val, "_PATMACROXPORTER_", sizeof (cdat->dstr_1892__PATMACROXPORTER. val) - 1); cdat->dstr_1892__PATMACROXPORTER.val[17] = (char) 0; cdat->dstr_1892__PATMACROXPORTER.slen = 17; /*iniobj dsym_1893__SYSDATA_PATMACRO_EXPORTER*/ /*uniqueobj*/ if (! /*_.VALDATA___V2064*/ meltfptr[2063]) /*_.VALDATA___V2064*/ meltfptr[2063] = (melt_ptr_t) & cdat->dsym_1893__SYSDATA_PATMACRO_EXPORTER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1893__SYSDATA_PATMACRO_EXPORTER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1893__SYSDATA_PATMACRO_EXPORTER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1893__SYSDATA_PATMACRO_EXPORTER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1893__SYSDATA_PATMACRO_EXPORTER.obj_hash = 1041663923; cdat->dsym_1893__SYSDATA_PATMACRO_EXPORTER.obj_len = 3; /*inistring dstr_1894__SYSDATA_PATMACRO*/ /*_.VALSTR___V2065*/ meltfptr[2064] = (melt_ptr_t) & cdat->dstr_1894__SYSDATA_PATMACRO; cdat->dstr_1894__SYSDATA_PATMACRO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1894__SYSDATA_PATMACRO.val, "SYSDATA_PATMACRO_EXPORTER", sizeof (cdat->dstr_1894__SYSDATA_PATMACRO. val) - 1); cdat->dstr_1894__SYSDATA_PATMACRO.val[25] = (char) 0; cdat->dstr_1894__SYSDATA_PATMACRO.slen = 25; /*inirout drout_1895__NORMAL_EXPORTED_MACRO */ /*_.VALROUT___V2066*/ meltfptr[2065] = (melt_ptr_t) & cdat->drout_1895__NORMAL_EXPORTED_MACRO; cdat->drout_1895__NORMAL_EXPORTED_MACRO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1895__NORMAL_EXPORTED_MACRO.routdescr, "NORMAL_EXPORTED_MACRO @warmelt-normal.melt:6778", MELT_ROUTDESCR_LEN - 1); cdat->drout_1895__NORMAL_EXPORTED_MACRO.nbval = 17; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1895__NORMAL_EXPORTED_MACRO, meltrout_155_warmelt_normal_NORMAL_EXPORTED_MACRO); /*iniclos dclo_1896__NORMAL_EXPORTED_MACRO */ /*_.VALCLO___V2069*/ meltfptr[2068] = (melt_ptr_t) & cdat->dclo_1896__NORMAL_EXPORTED_MACRO; cdat->dclo_1896__NORMAL_EXPORTED_MACRO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1896__NORMAL_EXPORTED_MACRO.nbval = 0; /*iniobj dsym_1897__EXPORTEDM_*/ /*uniqueobj*/ if (! /*_.VALDATA___V2067*/ meltfptr[2066]) /*_.VALDATA___V2067*/ meltfptr[2066] = (melt_ptr_t) & cdat->dsym_1897__EXPORTEDM_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1897__EXPORTEDM_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1897__EXPORTEDM_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1897__EXPORTEDM_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1897__EXPORTEDM_.obj_hash = 749180905; cdat->dsym_1897__EXPORTEDM_.obj_len = 3; /*inistring dstr_1898__EXPORTEDM_*/ /*_.VALSTR___V2068*/ meltfptr[2067] = (melt_ptr_t) & cdat->dstr_1898__EXPORTEDM_; cdat->dstr_1898__EXPORTEDM_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1898__EXPORTEDM_.val, "_EXPORTEDM_", sizeof (cdat->dstr_1898__EXPORTEDM_.val) - 1); cdat->dstr_1898__EXPORTEDM_.val[11] = (char) 0; cdat->dstr_1898__EXPORTEDM_.slen = 11; /*inirout drout_1899__NORMEXP_EXPORT_MACRO */ /*_.VALROUT___V2070*/ meltfptr[2069] = (melt_ptr_t) & cdat->drout_1899__NORMEXP_EXPORT_MACRO; cdat->drout_1899__NORMEXP_EXPORT_MACRO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1899__NORMEXP_EXPORT_MACRO.routdescr, "NORMEXP_EXPORT_MACRO @warmelt-normal.melt:6828", MELT_ROUTDESCR_LEN - 1); cdat->drout_1899__NORMEXP_EXPORT_MACRO.nbval = 11; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1899__NORMEXP_EXPORT_MACRO, meltrout_156_warmelt_normal_NORMEXP_EXPORT_MACRO); /*iniclos dclo_1900__NORMEXP_EXPORT_MACRO */ /*_.VALCLO___V2071*/ meltfptr[2070] = (melt_ptr_t) & cdat->dclo_1900__NORMEXP_EXPORT_MACRO; cdat->dclo_1900__NORMEXP_EXPORT_MACRO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1900__NORMEXP_EXPORT_MACRO.nbval = 0; /*iniobj dsym_1901__CLASS_SOURCE_EXPORT_MACRO*/ /*uniqueobj*/ if (! /*_.VALDATA___V2072*/ meltfptr[2071]) /*_.VALDATA___V2072*/ meltfptr[2071] = (melt_ptr_t) & cdat->dsym_1901__CLASS_SOURCE_EXPORT_MACRO; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1901__CLASS_SOURCE_EXPORT_MACRO", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1901__CLASS_SOURCE_EXPORT_MACRO", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1901__CLASS_SOURCE_EXPORT_MACRO.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1901__CLASS_SOURCE_EXPORT_MACRO.obj_hash = 228690420; cdat->dsym_1901__CLASS_SOURCE_EXPORT_MACRO.obj_len = 3; /*inistring dstr_1902__CLASS_SOURCE_EXP*/ /*_.VALSTR___V2073*/ meltfptr[2072] = (melt_ptr_t) & cdat->dstr_1902__CLASS_SOURCE_EXP; cdat->dstr_1902__CLASS_SOURCE_EXP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1902__CLASS_SOURCE_EXP.val, "CLASS_SOURCE_EXPORT_MACRO", sizeof (cdat->dstr_1902__CLASS_SOURCE_EXP. val) - 1); cdat->dstr_1902__CLASS_SOURCE_EXP.val[25] = (char) 0; cdat->dstr_1902__CLASS_SOURCE_EXP.slen = 25; /*inirout drout_1903__NORMAL_EXPORTED_PATMACRO */ /*_.VALROUT___V2074*/ meltfptr[2073] = (melt_ptr_t) & cdat->drout_1903__NORMAL_EXPORTED_PATMACRO; cdat->drout_1903__NORMAL_EXPORTED_PATMACRO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1903__NORMAL_EXPORTED_PATMACRO.routdescr, "NORMAL_EXPORTED_PATMACRO @warmelt-normal.melt:6865", MELT_ROUTDESCR_LEN - 1); cdat->drout_1903__NORMAL_EXPORTED_PATMACRO.nbval = 17; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1903__NORMAL_EXPORTED_PATMACRO, meltrout_157_warmelt_normal_NORMAL_EXPORTED_PATMACRO); /*iniclos dclo_1904__NORMAL_EXPORTED_PATMACRO */ /*_.VALCLO___V2077*/ meltfptr[2076] = (melt_ptr_t) & cdat->dclo_1904__NORMAL_EXPORTED_PATMACRO; cdat->dclo_1904__NORMAL_EXPORTED_PATMACRO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1904__NORMAL_EXPORTED_PATMACRO.nbval = 0; /*iniobj dsym_1905__EXPORTEDPAT_*/ /*uniqueobj*/ if (! /*_.VALDATA___V2075*/ meltfptr[2074]) /*_.VALDATA___V2075*/ meltfptr[2074] = (melt_ptr_t) & cdat->dsym_1905__EXPORTEDPAT_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1905__EXPORTEDPAT_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1905__EXPORTEDPAT_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1905__EXPORTEDPAT_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1905__EXPORTEDPAT_.obj_hash = 68216250; cdat->dsym_1905__EXPORTEDPAT_.obj_len = 3; /*inistring dstr_1906__EXPORTEDPAT_*/ /*_.VALSTR___V2076*/ meltfptr[2075] = (melt_ptr_t) & cdat->dstr_1906__EXPORTEDPAT_; cdat->dstr_1906__EXPORTEDPAT_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1906__EXPORTEDPAT_.val, "_EXPORTEDPAT_", sizeof (cdat->dstr_1906__EXPORTEDPAT_.val) - 1); cdat->dstr_1906__EXPORTEDPAT_.val[13] = (char) 0; cdat->dstr_1906__EXPORTEDPAT_.slen = 13; /*inirout drout_1907__NORMEXP_EXPORT_PATMACRO */ /*_.VALROUT___V2078*/ meltfptr[2077] = (melt_ptr_t) & cdat->drout_1907__NORMEXP_EXPORT_PATMACRO; cdat->drout_1907__NORMEXP_EXPORT_PATMACRO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1907__NORMEXP_EXPORT_PATMACRO.routdescr, "NORMEXP_EXPORT_PATMACRO @warmelt-normal.melt:6916", MELT_ROUTDESCR_LEN - 1); cdat->drout_1907__NORMEXP_EXPORT_PATMACRO.nbval = 11; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1907__NORMEXP_EXPORT_PATMACRO, meltrout_158_warmelt_normal_NORMEXP_EXPORT_PATMACRO); /*iniclos dclo_1908__NORMEXP_EXPORT_PATMACRO */ /*_.VALCLO___V2079*/ meltfptr[2078] = (melt_ptr_t) & cdat->dclo_1908__NORMEXP_EXPORT_PATMACRO; cdat->dclo_1908__NORMEXP_EXPORT_PATMACRO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1908__NORMEXP_EXPORT_PATMACRO.nbval = 0; /*iniobj dsym_1909__CLASS_SOURCE_EXPORT_PATMACRO*/ /*uniqueobj*/ if (! /*_.VALDATA___V2080*/ meltfptr[2079]) /*_.VALDATA___V2080*/ meltfptr[2079] = (melt_ptr_t) & cdat->dsym_1909__CLASS_SOURCE_EXPORT_PATMACRO; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1909__CLASS_SOURCE_EXPORT_PATMACRO", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1909__CLASS_SOURCE_EXPORT_PATMACRO", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1909__CLASS_SOURCE_EXPORT_PATMACRO.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1909__CLASS_SOURCE_EXPORT_PATMACRO.obj_hash = 991451453; cdat->dsym_1909__CLASS_SOURCE_EXPORT_PATMACRO.obj_len = 3; /*inistring dstr_1910__CLASS_SOURCE_EXP*/ /*_.VALSTR___V2081*/ meltfptr[2080] = (melt_ptr_t) & cdat->dstr_1910__CLASS_SOURCE_EXP; cdat->dstr_1910__CLASS_SOURCE_EXP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1910__CLASS_SOURCE_EXP.val, "CLASS_SOURCE_EXPORT_PATMACRO", sizeof (cdat->dstr_1910__CLASS_SOURCE_EXP. val) - 1); cdat->dstr_1910__CLASS_SOURCE_EXP.val[28] = (char) 0; cdat->dstr_1910__CLASS_SOURCE_EXP.slen = 28; /*inirout drout_1911__NORMEXP_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ /*_.VALROUT___V2082*/ meltfptr[2081] = (melt_ptr_t) & cdat-> drout_1911__NORMEXP_CURRENT_MODULE_ENVIRONMENT_CONTAINER; cdat->drout_1911__NORMEXP_CURRENT_MODULE_ENVIRONMENT_CONTAINER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1911__NORMEXP_CURRENT_MODULE_ENVIRONMENT_CONTAINER. routdescr, "NORMEXP_CURRENT_MODULE_ENVIRONMENT_CONTAINER @warmelt-normal.melt:6953", MELT_ROUTDESCR_LEN - 1); cdat->drout_1911__NORMEXP_CURRENT_MODULE_ENVIRONMENT_CONTAINER.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&cdat-> drout_1911__NORMEXP_CURRENT_MODULE_ENVIRONMENT_CONTAINER, meltrout_159_warmelt_normal_NORMEXP_CURRENT_MODULE_ENVIRONMENT_CONTAINER); /*iniclos dclo_1912__NORMEXP_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ /*_.VALCLO___V2083*/ meltfptr[2082] = (melt_ptr_t) & cdat-> dclo_1912__NORMEXP_CURRENT_MODULE_ENVIRONMENT_CONTAINER; cdat->dclo_1912__NORMEXP_CURRENT_MODULE_ENVIRONMENT_CONTAINER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1912__NORMEXP_CURRENT_MODULE_ENVIRONMENT_CONTAINER.nbval = 0; /*inirout drout_1913__NORMEXP_PARENT_MODULE_ENVIRONMENT */ /*_.VALROUT___V2084*/ meltfptr[2083] = (melt_ptr_t) & cdat->drout_1913__NORMEXP_PARENT_MODULE_ENVIRONMENT; cdat->drout_1913__NORMEXP_PARENT_MODULE_ENVIRONMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1913__NORMEXP_PARENT_MODULE_ENVIRONMENT.routdescr, "NORMEXP_PARENT_MODULE_ENVIRONMENT @warmelt-normal.melt:6985", MELT_ROUTDESCR_LEN - 1); cdat->drout_1913__NORMEXP_PARENT_MODULE_ENVIRONMENT.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&cdat-> drout_1913__NORMEXP_PARENT_MODULE_ENVIRONMENT, meltrout_160_warmelt_normal_NORMEXP_PARENT_MODULE_ENVIRONMENT); /*iniclos dclo_1914__NORMEXP_PARENT_MODULE_ENVIRONMENT */ /*_.VALCLO___V2085*/ meltfptr[2084] = (melt_ptr_t) & cdat->dclo_1914__NORMEXP_PARENT_MODULE_ENVIRONMENT; cdat->dclo_1914__NORMEXP_PARENT_MODULE_ENVIRONMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1914__NORMEXP_PARENT_MODULE_ENVIRONMENT.nbval = 0; /*iniobj dsym_1915__CLASS_SOURCE_PARENT_MODULE_ENVIRONMENT*/ /*uniqueobj*/ if (! /*_.VALDATA___V2086*/ meltfptr[2085]) /*_.VALDATA___V2086*/ meltfptr[2085] = (melt_ptr_t) & cdat->dsym_1915__CLASS_SOURCE_PARENT_MODULE_ENVIRONMENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1915__CLASS_SOURCE_PARENT_MODULE_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_1915__CLASS_SOURCE_PARENT_MODULE_ENVIRONMENT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1915__CLASS_SOURCE_PARENT_MODULE_ENVIRONMENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1915__CLASS_SOURCE_PARENT_MODULE_ENVIRONMENT.obj_hash = 201468317; cdat->dsym_1915__CLASS_SOURCE_PARENT_MODULE_ENVIRONMENT.obj_len = 3; /*inistring dstr_1916__CLASS_SOURCE_PAR*/ /*_.VALSTR___V2087*/ meltfptr[2086] = (melt_ptr_t) & cdat->dstr_1916__CLASS_SOURCE_PAR; cdat->dstr_1916__CLASS_SOURCE_PAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1916__CLASS_SOURCE_PAR.val, "CLASS_SOURCE_PARENT_MODULE_ENVIRONMENT", sizeof (cdat->dstr_1916__CLASS_SOURCE_PAR. val) - 1); cdat->dstr_1916__CLASS_SOURCE_PAR.val[38] = (char) 0; cdat->dstr_1916__CLASS_SOURCE_PAR.slen = 38; /*inirout drout_1917__NORMEXP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ /*_.VALROUT___V2088*/ meltfptr[2087] = (melt_ptr_t) & cdat-> drout_1917__NORMEXP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER; cdat->drout_1917__NORMEXP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER. discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat-> drout_1917__NORMEXP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER. routdescr, "NORMEXP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER @warmelt-normal.melt:7011", MELT_ROUTDESCR_LEN - 1); cdat->drout_1917__NORMEXP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER. nbval = 25; MELT_ROUTINE_SET_ROUTCODE (&cdat-> drout_1917__NORMEXP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER, meltrout_161_warmelt_normal_NORMEXP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER); /*iniclos dclo_1918__NORMEXP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ /*_.VALCLO___V2093*/ meltfptr[2092] = (melt_ptr_t) & cdat-> dclo_1918__NORMEXP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER; cdat->dclo_1918__NORMEXP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1918__NORMEXP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER.nbval = 0; /*iniobj dsym_1919__CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER*/ /*uniqueobj*/ if (! /*_.VALDATA___V2094*/ meltfptr[2093]) /*_.VALDATA___V2094*/ meltfptr[2093] = (melt_ptr_t) & cdat-> dsym_1919__CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1919__CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1919__CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1919__CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER. meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1919__CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER. obj_hash = 670629834; cdat->dsym_1919__CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER. obj_len = 3; /*inistring dstr_1920__CLASS_SOURCE_UPD*/ /*_.VALSTR___V2095*/ meltfptr[2094] = (melt_ptr_t) & cdat->dstr_1920__CLASS_SOURCE_UPD; cdat->dstr_1920__CLASS_SOURCE_UPD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1920__CLASS_SOURCE_UPD.val, "CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER", sizeof (cdat->dstr_1920__CLASS_SOURCE_UPD. val) - 1); cdat->dstr_1920__CLASS_SOURCE_UPD.val[56] = (char) 0; cdat->dstr_1920__CLASS_SOURCE_UPD.slen = 56; /*iniobj dsym_1921__CHECKRUNMODENVBOX_*/ /*uniqueobj*/ if (! /*_.VALDATA___V2089*/ meltfptr[2088]) /*_.VALDATA___V2089*/ meltfptr[2088] = (melt_ptr_t) & cdat->dsym_1921__CHECKRUNMODENVBOX_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1921__CHECKRUNMODENVBOX_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1921__CHECKRUNMODENVBOX_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1921__CHECKRUNMODENVBOX_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1921__CHECKRUNMODENVBOX_.obj_hash = 606299702; cdat->dsym_1921__CHECKRUNMODENVBOX_.obj_len = 3; /*inistring dstr_1922__CHECKRUNMODENVBO*/ /*_.VALSTR___V2090*/ meltfptr[2089] = (melt_ptr_t) & cdat->dstr_1922__CHECKRUNMODENVBO; cdat->dstr_1922__CHECKRUNMODENVBO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1922__CHECKRUNMODENVBO.val, "CHECKRUNMODENVBOX_", sizeof (cdat->dstr_1922__CHECKRUNMODENVBO. val) - 1); cdat->dstr_1922__CHECKRUNMODENVBO.val[18] = (char) 0; cdat->dstr_1922__CHECKRUNMODENVBO.slen = 18; /*iniobj dsym_1923__UPDATCURMODENVBOX_*/ /*uniqueobj*/ if (! /*_.VALDATA___V2091*/ meltfptr[2090]) /*_.VALDATA___V2091*/ meltfptr[2090] = (melt_ptr_t) & cdat->dsym_1923__UPDATCURMODENVBOX_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1923__UPDATCURMODENVBOX_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1923__UPDATCURMODENVBOX_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1923__UPDATCURMODENVBOX_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1923__UPDATCURMODENVBOX_.obj_hash = 884318142; cdat->dsym_1923__UPDATCURMODENVBOX_.obj_len = 3; /*inistring dstr_1924__UPDATCURMODENVBO*/ /*_.VALSTR___V2092*/ meltfptr[2091] = (melt_ptr_t) & cdat->dstr_1924__UPDATCURMODENVBO; cdat->dstr_1924__UPDATCURMODENVBO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1924__UPDATCURMODENVBO.val, "UPDATCURMODENVBOX_", sizeof (cdat->dstr_1924__UPDATCURMODENVBO. val) - 1); cdat->dstr_1924__UPDATCURMODENVBO.val[18] = (char) 0; cdat->dstr_1924__UPDATCURMODENVBO.slen = 18; /*iniobj dsym_1925__CLASS_SOURCE_FETCH_PREDEFINED*/ /*uniqueobj*/ if (! /*_.VALDATA___V2096*/ meltfptr[2095]) /*_.VALDATA___V2096*/ meltfptr[2095] = (melt_ptr_t) & cdat->dsym_1925__CLASS_SOURCE_FETCH_PREDEFINED; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1925__CLASS_SOURCE_FETCH_PREDEFINED", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1925__CLASS_SOURCE_FETCH_PREDEFINED", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1925__CLASS_SOURCE_FETCH_PREDEFINED.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1925__CLASS_SOURCE_FETCH_PREDEFINED.obj_hash = 327938903; cdat->dsym_1925__CLASS_SOURCE_FETCH_PREDEFINED.obj_len = 3; /*inistring dstr_1926__CLASS_SOURCE_FET*/ /*_.VALSTR___V2097*/ meltfptr[2096] = (melt_ptr_t) & cdat->dstr_1926__CLASS_SOURCE_FET; cdat->dstr_1926__CLASS_SOURCE_FET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1926__CLASS_SOURCE_FET.val, "CLASS_SOURCE_FETCH_PREDEFINED", sizeof (cdat->dstr_1926__CLASS_SOURCE_FET. val) - 1); cdat->dstr_1926__CLASS_SOURCE_FET.val[29] = (char) 0; cdat->dstr_1926__CLASS_SOURCE_FET.slen = 29; /*iniobj dsym_1927__SYSDATA_CONT_FRESH_ENV*/ /*uniqueobj*/ if (! /*_.VALDATA___V2098*/ meltfptr[2097]) /*_.VALDATA___V2098*/ meltfptr[2097] = (melt_ptr_t) & cdat->dsym_1927__SYSDATA_CONT_FRESH_ENV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1927__SYSDATA_CONT_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_1927__SYSDATA_CONT_FRESH_ENV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1927__SYSDATA_CONT_FRESH_ENV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1927__SYSDATA_CONT_FRESH_ENV.obj_hash = 628092944; cdat->dsym_1927__SYSDATA_CONT_FRESH_ENV.obj_len = 3; /*inistring dstr_1928__SYSDATA_CONT_FRE*/ /*_.VALSTR___V2099*/ meltfptr[2098] = (melt_ptr_t) & cdat->dstr_1928__SYSDATA_CONT_FRE; cdat->dstr_1928__SYSDATA_CONT_FRE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1928__SYSDATA_CONT_FRE.val, "SYSDATA_CONT_FRESH_ENV", sizeof (cdat->dstr_1928__SYSDATA_CONT_FRE. val) - 1); cdat->dstr_1928__SYSDATA_CONT_FRE.val[22] = (char) 0; cdat->dstr_1928__SYSDATA_CONT_FRE.slen = 22; /*inirout drout_1929__NORMEXP_FETCH_PREDEFINED */ /*_.VALROUT___V2100*/ meltfptr[2099] = (melt_ptr_t) & cdat->drout_1929__NORMEXP_FETCH_PREDEFINED; cdat->drout_1929__NORMEXP_FETCH_PREDEFINED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1929__NORMEXP_FETCH_PREDEFINED.routdescr, "NORMEXP_FETCH_PREDEFINED @warmelt-normal.melt:7128", MELT_ROUTDESCR_LEN - 1); cdat->drout_1929__NORMEXP_FETCH_PREDEFINED.nbval = 10; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1929__NORMEXP_FETCH_PREDEFINED, meltrout_162_warmelt_normal_NORMEXP_FETCH_PREDEFINED); /*iniclos dclo_1930__NORMEXP_FETCH_PREDEFINED */ /*_.VALCLO___V2102*/ meltfptr[2101] = (melt_ptr_t) & cdat->dclo_1930__NORMEXP_FETCH_PREDEFINED; cdat->dclo_1930__NORMEXP_FETCH_PREDEFINED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1930__NORMEXP_FETCH_PREDEFINED.nbval = 0; /*iniobj dsym_1931__MAPOBJECT_EVERY*/ /*uniqueobj*/ if (! /*_.VALDATA___V2103*/ meltfptr[2102]) /*_.VALDATA___V2103*/ meltfptr[2102] = (melt_ptr_t) & cdat->dsym_1931__MAPOBJECT_EVERY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1931__MAPOBJECT_EVERY", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1931__MAPOBJECT_EVERY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1931__MAPOBJECT_EVERY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1931__MAPOBJECT_EVERY.obj_hash = 726732435; cdat->dsym_1931__MAPOBJECT_EVERY.obj_len = 3; /*inistring dstr_1932__MAPOBJECT_EVERY*/ /*_.VALSTR___V2104*/ meltfptr[2103] = (melt_ptr_t) & cdat->dstr_1932__MAPOBJECT_EVERY; cdat->dstr_1932__MAPOBJECT_EVERY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1932__MAPOBJECT_EVERY.val, "MAPOBJECT_EVERY", sizeof (cdat->dstr_1932__MAPOBJECT_EVERY. val) - 1); cdat->dstr_1932__MAPOBJECT_EVERY.val[15] = (char) 0; cdat->dstr_1932__MAPOBJECT_EVERY.slen = 15; /*inirout drout_1933__LAMBDA_ */ /*_.VALROUT___V2101*/ meltfptr[2100] = (melt_ptr_t) & cdat->drout_1933__LAMBDA_; cdat->drout_1933__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1933__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:7143", MELT_ROUTDESCR_LEN - 1); cdat->drout_1933__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1933__LAMBDA_, meltrout_163_warmelt_normal_LAMBDA___56__); /*inirout drout_1934__NORMEXP_STORE_PREDEFINED */ /*_.VALROUT___V2105*/ meltfptr[2104] = (melt_ptr_t) & cdat->drout_1934__NORMEXP_STORE_PREDEFINED; cdat->drout_1934__NORMEXP_STORE_PREDEFINED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1934__NORMEXP_STORE_PREDEFINED.routdescr, "NORMEXP_STORE_PREDEFINED @warmelt-normal.melt:7174", MELT_ROUTDESCR_LEN - 1); cdat->drout_1934__NORMEXP_STORE_PREDEFINED.nbval = 17; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1934__NORMEXP_STORE_PREDEFINED, meltrout_164_warmelt_normal_NORMEXP_STORE_PREDEFINED); /*iniclos dclo_1935__NORMEXP_STORE_PREDEFINED */ /*_.VALCLO___V2109*/ meltfptr[2108] = (melt_ptr_t) & cdat->dclo_1935__NORMEXP_STORE_PREDEFINED; cdat->dclo_1935__NORMEXP_STORE_PREDEFINED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1935__NORMEXP_STORE_PREDEFINED.nbval = 0; /*iniobj dsym_1936__CLASS_SOURCE_STORE_PREDEFINED*/ /*uniqueobj*/ if (! /*_.VALDATA___V2110*/ meltfptr[2109]) /*_.VALDATA___V2110*/ meltfptr[2109] = (melt_ptr_t) & cdat->dsym_1936__CLASS_SOURCE_STORE_PREDEFINED; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1936__CLASS_SOURCE_STORE_PREDEFINED", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1936__CLASS_SOURCE_STORE_PREDEFINED", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1936__CLASS_SOURCE_STORE_PREDEFINED.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1936__CLASS_SOURCE_STORE_PREDEFINED.obj_hash = 756622417; cdat->dsym_1936__CLASS_SOURCE_STORE_PREDEFINED.obj_len = 3; /*inistring dstr_1937__CLASS_SOURCE_STO*/ /*_.VALSTR___V2111*/ meltfptr[2110] = (melt_ptr_t) & cdat->dstr_1937__CLASS_SOURCE_STO; cdat->dstr_1937__CLASS_SOURCE_STO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1937__CLASS_SOURCE_STO.val, "CLASS_SOURCE_STORE_PREDEFINED", sizeof (cdat->dstr_1937__CLASS_SOURCE_STO. val) - 1); cdat->dstr_1937__CLASS_SOURCE_STO.val[29] = (char) 0; cdat->dstr_1937__CLASS_SOURCE_STO.slen = 29; /*inirout drout_1938__LAMBDA_ */ /*_.VALROUT___V2106*/ meltfptr[2105] = (melt_ptr_t) & cdat->drout_1938__LAMBDA_; cdat->drout_1938__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1938__LAMBDA_.routdescr, "LAMBDA_ @warmelt-normal.melt:7190", MELT_ROUTDESCR_LEN - 1); cdat->drout_1938__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1938__LAMBDA_, meltrout_165_warmelt_normal_LAMBDA___57__); /*iniobj dsym_1939__STOREPREDEF_*/ /*uniqueobj*/ if (! /*_.VALDATA___V2107*/ meltfptr[2106]) /*_.VALDATA___V2107*/ meltfptr[2106] = (melt_ptr_t) & cdat->dsym_1939__STOREPREDEF_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1939__STOREPREDEF_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1939__STOREPREDEF_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1939__STOREPREDEF_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1939__STOREPREDEF_.obj_hash = 697353008; cdat->dsym_1939__STOREPREDEF_.obj_len = 3; /*inistring dstr_1940__STOREPREDEF_*/ /*_.VALSTR___V2108*/ meltfptr[2107] = (melt_ptr_t) & cdat->dstr_1940__STOREPREDEF_; cdat->dstr_1940__STOREPREDEF_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1940__STOREPREDEF_.val, "_STOREPREDEF_", sizeof (cdat->dstr_1940__STOREPREDEF_.val) - 1); cdat->dstr_1940__STOREPREDEF_.val[13] = (char) 0; cdat->dstr_1940__STOREPREDEF_.slen = 13; /*inirout drout_1941__NORMEXP_CHEADER */ /*_.VALROUT___V2112*/ meltfptr[2111] = (melt_ptr_t) & cdat->drout_1941__NORMEXP_CHEADER; cdat->drout_1941__NORMEXP_CHEADER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1941__NORMEXP_CHEADER.routdescr, "NORMEXP_CHEADER @warmelt-normal.melt:7236", MELT_ROUTDESCR_LEN - 1); cdat->drout_1941__NORMEXP_CHEADER.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1941__NORMEXP_CHEADER, meltrout_166_warmelt_normal_NORMEXP_CHEADER); /*iniclos dclo_1942__NORMEXP_CHEADER */ /*_.VALCLO___V2113*/ meltfptr[2112] = (melt_ptr_t) & cdat->dclo_1942__NORMEXP_CHEADER; cdat->dclo_1942__NORMEXP_CHEADER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1942__NORMEXP_CHEADER.nbval = 0; /*iniobj dsym_1943__CLASS_SOURCE_CHEADER*/ /*uniqueobj*/ if (! /*_.VALDATA___V2114*/ meltfptr[2113]) /*_.VALDATA___V2114*/ meltfptr[2113] = (melt_ptr_t) & cdat->dsym_1943__CLASS_SOURCE_CHEADER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1943__CLASS_SOURCE_CHEADER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1943__CLASS_SOURCE_CHEADER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1943__CLASS_SOURCE_CHEADER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1943__CLASS_SOURCE_CHEADER.obj_hash = 496789791; cdat->dsym_1943__CLASS_SOURCE_CHEADER.obj_len = 3; /*inistring dstr_1944__CLASS_SOURCE_CHE*/ /*_.VALSTR___V2115*/ meltfptr[2114] = (melt_ptr_t) & cdat->dstr_1944__CLASS_SOURCE_CHE; cdat->dstr_1944__CLASS_SOURCE_CHE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1944__CLASS_SOURCE_CHE.val, "CLASS_SOURCE_CHEADER", sizeof (cdat->dstr_1944__CLASS_SOURCE_CHE. val) - 1); cdat->dstr_1944__CLASS_SOURCE_CHE.val[20] = (char) 0; cdat->dstr_1944__CLASS_SOURCE_CHE.slen = 20; /*inirout drout_1945__NORMEXP_USE_PACKAGE_FROM_PKG_CONFIG */ /*_.VALROUT___V2116*/ meltfptr[2115] = (melt_ptr_t) & cdat->drout_1945__NORMEXP_USE_PACKAGE_FROM_PKG_CONFIG; cdat->drout_1945__NORMEXP_USE_PACKAGE_FROM_PKG_CONFIG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1945__NORMEXP_USE_PACKAGE_FROM_PKG_CONFIG.routdescr, "NORMEXP_USE_PACKAGE_FROM_PKG_CONFIG @warmelt-normal.melt:7259", MELT_ROUTDESCR_LEN - 1); cdat->drout_1945__NORMEXP_USE_PACKAGE_FROM_PKG_CONFIG.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat-> drout_1945__NORMEXP_USE_PACKAGE_FROM_PKG_CONFIG, meltrout_167_warmelt_normal_NORMEXP_USE_PACKAGE_FROM_PKG_CONFIG); /*iniclos dclo_1946__NORMEXP_USE_PACKAGE_FROM_PKG_CONFIG */ /*_.VALCLO___V2117*/ meltfptr[2116] = (melt_ptr_t) & cdat->dclo_1946__NORMEXP_USE_PACKAGE_FROM_PKG_CONFIG; cdat->dclo_1946__NORMEXP_USE_PACKAGE_FROM_PKG_CONFIG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1946__NORMEXP_USE_PACKAGE_FROM_PKG_CONFIG.nbval = 0; /*iniobj dsym_1947__CLASS_SOURCE_USE_PACKAGE_FROM_PKG_CONFIG*/ /*uniqueobj*/ if (! /*_.VALDATA___V2118*/ meltfptr[2117]) /*_.VALDATA___V2118*/ meltfptr[2117] = (melt_ptr_t) & cdat-> dsym_1947__CLASS_SOURCE_USE_PACKAGE_FROM_PKG_CONFIG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1947__CLASS_SOURCE_USE_PACKAGE_FROM_PKG_CONFIG", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1947__CLASS_SOURCE_USE_PACKAGE_FROM_PKG_CONFIG", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1947__CLASS_SOURCE_USE_PACKAGE_FROM_PKG_CONFIG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1947__CLASS_SOURCE_USE_PACKAGE_FROM_PKG_CONFIG.obj_hash = 958702304; cdat->dsym_1947__CLASS_SOURCE_USE_PACKAGE_FROM_PKG_CONFIG.obj_len = 3; /*inistring dstr_1948__CLASS_SOURCE_USE*/ /*_.VALSTR___V2119*/ meltfptr[2118] = (melt_ptr_t) & cdat->dstr_1948__CLASS_SOURCE_USE; cdat->dstr_1948__CLASS_SOURCE_USE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1948__CLASS_SOURCE_USE.val, "CLASS_SOURCE_USE_PACKAGE_FROM_PKG_CONFIG", sizeof (cdat->dstr_1948__CLASS_SOURCE_USE. val) - 1); cdat->dstr_1948__CLASS_SOURCE_USE.val[40] = (char) 0; cdat->dstr_1948__CLASS_SOURCE_USE.slen = 40; /*iniobj dsym_1949__CHECK_CTYPE_NARGS*/ /*uniqueobj*/ if (! /*_.VALDATA___V2120*/ meltfptr[2119]) /*_.VALDATA___V2120*/ meltfptr[2119] = (melt_ptr_t) & cdat->dsym_1949__CHECK_CTYPE_NARGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1949__CHECK_CTYPE_NARGS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1949__CHECK_CTYPE_NARGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1949__CHECK_CTYPE_NARGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1949__CHECK_CTYPE_NARGS.obj_hash = 167792738; cdat->dsym_1949__CHECK_CTYPE_NARGS.obj_len = 3; /*inistring dstr_1950__CHECK_CTYPE_NARG*/ /*_.VALSTR___V2121*/ meltfptr[2120] = (melt_ptr_t) & cdat->dstr_1950__CHECK_CTYPE_NARG; cdat->dstr_1950__CHECK_CTYPE_NARG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1950__CHECK_CTYPE_NARG.val, "CHECK_CTYPE_NARGS", sizeof (cdat->dstr_1950__CHECK_CTYPE_NARG. val) - 1); cdat->dstr_1950__CHECK_CTYPE_NARG.val[17] = (char) 0; cdat->dstr_1950__CHECK_CTYPE_NARG.slen = 17; /*iniobj dsym_1951__CREATE_NORMCONTEXT*/ /*uniqueobj*/ if (! /*_.VALDATA___V2122*/ meltfptr[2121]) /*_.VALDATA___V2122*/ meltfptr[2121] = (melt_ptr_t) & cdat->dsym_1951__CREATE_NORMCONTEXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1951__CREATE_NORMCONTEXT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1951__CREATE_NORMCONTEXT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1951__CREATE_NORMCONTEXT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1951__CREATE_NORMCONTEXT.obj_hash = 127778273; cdat->dsym_1951__CREATE_NORMCONTEXT.obj_len = 3; /*inistring dstr_1952__CREATE_NORMCONTE*/ /*_.VALSTR___V2123*/ meltfptr[2122] = (melt_ptr_t) & cdat->dstr_1952__CREATE_NORMCONTE; cdat->dstr_1952__CREATE_NORMCONTE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1952__CREATE_NORMCONTE.val, "CREATE_NORMCONTEXT", sizeof (cdat->dstr_1952__CREATE_NORMCONTE. val) - 1); cdat->dstr_1952__CREATE_NORMCONTE.val[18] = (char) 0; cdat->dstr_1952__CREATE_NORMCONTE.slen = 18; /*iniobj dsym_1953__CREATE_NORMAL_EXTENDING_CONTEXT*/ /*uniqueobj*/ if (! /*_.VALDATA___V2124*/ meltfptr[2123]) /*_.VALDATA___V2124*/ meltfptr[2123] = (melt_ptr_t) & cdat->dsym_1953__CREATE_NORMAL_EXTENDING_CONTEXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1953__CREATE_NORMAL_EXTENDING_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_1953__CREATE_NORMAL_EXTENDING_CONTEXT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1953__CREATE_NORMAL_EXTENDING_CONTEXT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1953__CREATE_NORMAL_EXTENDING_CONTEXT.obj_hash = 134982425; cdat->dsym_1953__CREATE_NORMAL_EXTENDING_CONTEXT.obj_len = 3; /*inistring dstr_1954__CREATE_NORMAL_EX*/ /*_.VALSTR___V2125*/ meltfptr[2124] = (melt_ptr_t) & cdat->dstr_1954__CREATE_NORMAL_EX; cdat->dstr_1954__CREATE_NORMAL_EX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1954__CREATE_NORMAL_EX.val, "CREATE_NORMAL_EXTENDING_CONTEXT", sizeof (cdat->dstr_1954__CREATE_NORMAL_EX. val) - 1); cdat->dstr_1954__CREATE_NORMAL_EX.val[31] = (char) 0; cdat->dstr_1954__CREATE_NORMAL_EX.slen = 31; /*iniobj dsym_1955__NORMAL_PREDEF*/ /*uniqueobj*/ if (! /*_.VALDATA___V2126*/ meltfptr[2125]) /*_.VALDATA___V2126*/ meltfptr[2125] = (melt_ptr_t) & cdat->dsym_1955__NORMAL_PREDEF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1955__NORMAL_PREDEF", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1955__NORMAL_PREDEF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1955__NORMAL_PREDEF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1955__NORMAL_PREDEF.obj_hash = 20706407; cdat->dsym_1955__NORMAL_PREDEF.obj_len = 3; /*inistring dstr_1956__NORMAL_PREDEF*/ /*_.VALSTR___V2127*/ meltfptr[2126] = (melt_ptr_t) & cdat->dstr_1956__NORMAL_PREDEF; cdat->dstr_1956__NORMAL_PREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1956__NORMAL_PREDEF.val, "NORMAL_PREDEF", sizeof (cdat->dstr_1956__NORMAL_PREDEF.val) - 1); cdat->dstr_1956__NORMAL_PREDEF.val[13] = (char) 0; cdat->dstr_1956__NORMAL_PREDEF.slen = 13; /*iniobj dsym_1957__NORMALIZE_TUPLE*/ /*uniqueobj*/ if (! /*_.VALDATA___V2128*/ meltfptr[2127]) /*_.VALDATA___V2128*/ meltfptr[2127] = (melt_ptr_t) & cdat->dsym_1957__NORMALIZE_TUPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1957__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_1957__NORMALIZE_TUPLE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1957__NORMALIZE_TUPLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1957__NORMALIZE_TUPLE.obj_hash = 805824045; cdat->dsym_1957__NORMALIZE_TUPLE.obj_len = 3; /*inistring dstr_1958__NORMALIZE_TUPLE*/ /*_.VALSTR___V2129*/ meltfptr[2128] = (melt_ptr_t) & cdat->dstr_1958__NORMALIZE_TUPLE; cdat->dstr_1958__NORMALIZE_TUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1958__NORMALIZE_TUPLE.val, "NORMALIZE_TUPLE", sizeof (cdat->dstr_1958__NORMALIZE_TUPLE. val) - 1); cdat->dstr_1958__NORMALIZE_TUPLE.val[15] = (char) 0; cdat->dstr_1958__NORMALIZE_TUPLE.slen = 15; /*iniobj dsym_1959__REGISTER_LITERAL_VALUE*/ /*uniqueobj*/ if (! /*_.VALDATA___V2130*/ meltfptr[2129]) /*_.VALDATA___V2130*/ meltfptr[2129] = (melt_ptr_t) & cdat->dsym_1959__REGISTER_LITERAL_VALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1959__REGISTER_LITERAL_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_1959__REGISTER_LITERAL_VALUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1959__REGISTER_LITERAL_VALUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1959__REGISTER_LITERAL_VALUE.obj_hash = 823489460; cdat->dsym_1959__REGISTER_LITERAL_VALUE.obj_len = 3; /*inistring dstr_1960__REGISTER_LITERAL*/ /*_.VALSTR___V2131*/ meltfptr[2130] = (melt_ptr_t) & cdat->dstr_1960__REGISTER_LITERAL; cdat->dstr_1960__REGISTER_LITERAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1960__REGISTER_LITERAL.val, "REGISTER_LITERAL_VALUE", sizeof (cdat->dstr_1960__REGISTER_LITERAL. val) - 1); cdat->dstr_1960__REGISTER_LITERAL.val[22] = (char) 0; cdat->dstr_1960__REGISTER_LITERAL.slen = 22; /*iniobj dsym_1961__WRAP_NORMAL_LET1*/ /*uniqueobj*/ if (! /*_.VALDATA___V2132*/ meltfptr[2131]) /*_.VALDATA___V2132*/ meltfptr[2131] = (melt_ptr_t) & cdat->dsym_1961__WRAP_NORMAL_LET1; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1961__WRAP_NORMAL_LET1", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1961__WRAP_NORMAL_LET1", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1961__WRAP_NORMAL_LET1.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1961__WRAP_NORMAL_LET1.obj_hash = 891908866; cdat->dsym_1961__WRAP_NORMAL_LET1.obj_len = 3; /*inistring dstr_1962__WRAP_NORMAL_LET1*/ /*_.VALSTR___V2133*/ meltfptr[2132] = (melt_ptr_t) & cdat->dstr_1962__WRAP_NORMAL_LET1; cdat->dstr_1962__WRAP_NORMAL_LET1.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1962__WRAP_NORMAL_LET1.val, "WRAP_NORMAL_LET1", sizeof (cdat->dstr_1962__WRAP_NORMAL_LET1. val) - 1); cdat->dstr_1962__WRAP_NORMAL_LET1.val[16] = (char) 0; cdat->dstr_1962__WRAP_NORMAL_LET1.slen = 16; /*iniobj dsym_1963__WRAP_NORMAL_LETSEQ*/ /*uniqueobj*/ if (! /*_.VALDATA___V2134*/ meltfptr[2133]) /*_.VALDATA___V2134*/ meltfptr[2133] = (melt_ptr_t) & cdat->dsym_1963__WRAP_NORMAL_LETSEQ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1963__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_1963__WRAP_NORMAL_LETSEQ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1963__WRAP_NORMAL_LETSEQ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1963__WRAP_NORMAL_LETSEQ.obj_hash = 638564573; cdat->dsym_1963__WRAP_NORMAL_LETSEQ.obj_len = 3; /*inistring dstr_1964__WRAP_NORMAL_LETS*/ /*_.VALSTR___V2135*/ meltfptr[2134] = (melt_ptr_t) & cdat->dstr_1964__WRAP_NORMAL_LETS; cdat->dstr_1964__WRAP_NORMAL_LETS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1964__WRAP_NORMAL_LETS.val, "WRAP_NORMAL_LETSEQ", sizeof (cdat->dstr_1964__WRAP_NORMAL_LETS. val) - 1); cdat->dstr_1964__WRAP_NORMAL_LETS.val[18] = (char) 0; cdat->dstr_1964__WRAP_NORMAL_LETS.slen = 18; /*iniobj dsym_1965__CLASS_NREP_DATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V2136*/ meltfptr[2135]) /*_.VALDATA___V2136*/ meltfptr[2135] = (melt_ptr_t) & cdat->dsym_1965__CLASS_NREP_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1965__CLASS_NREP_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_1965__CLASS_NREP_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1965__CLASS_NREP_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1965__CLASS_NREP_DATA.obj_hash = 746568035; cdat->dsym_1965__CLASS_NREP_DATA.obj_len = 3; /*inistring dstr_1966__CLASS_NREP_DATA*/ /*_.VALSTR___V2137*/ meltfptr[2136] = (melt_ptr_t) & cdat->dstr_1966__CLASS_NREP_DATA; cdat->dstr_1966__CLASS_NREP_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1966__CLASS_NREP_DATA.val, "CLASS_NREP_DATA", sizeof (cdat->dstr_1966__CLASS_NREP_DATA. val) - 1); cdat->dstr_1966__CLASS_NREP_DATA.val[15] = (char) 0; cdat->dstr_1966__CLASS_NREP_DATA.slen = 15; /*iniobj dsym_1967__CLASS_NREP_CHECKINTERRUPT*/ /*uniqueobj*/ if (! /*_.VALDATA___V2138*/ meltfptr[2137]) /*_.VALDATA___V2138*/ meltfptr[2137] = (melt_ptr_t) & cdat->dsym_1967__CLASS_NREP_CHECKINTERRUPT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1967__CLASS_NREP_CHECKINTERRUPT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1967__CLASS_NREP_CHECKINTERRUPT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1967__CLASS_NREP_CHECKINTERRUPT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1967__CLASS_NREP_CHECKINTERRUPT.obj_hash = 29630088; cdat->dsym_1967__CLASS_NREP_CHECKINTERRUPT.obj_len = 3; /*inistring dstr_1968__CLASS_NREP_CHECK*/ /*_.VALSTR___V2139*/ meltfptr[2138] = (melt_ptr_t) & cdat->dstr_1968__CLASS_NREP_CHECK; cdat->dstr_1968__CLASS_NREP_CHECK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1968__CLASS_NREP_CHECK.val, "CLASS_NREP_CHECKINTERRUPT", sizeof (cdat->dstr_1968__CLASS_NREP_CHECK. val) - 1); cdat->dstr_1968__CLASS_NREP_CHECK.val[25] = (char) 0; cdat->dstr_1968__CLASS_NREP_CHECK.slen = 25; cdat = NULL; melt_prohibit_garbcoll = FALSE; #undef meltfram__ } /*end initialize_module_meltdata_warmelt_normal */ #if MELT_HAVE_DEBUG const char meltmodule_warmelt_normal__melt_have_debug_enabled[] = "MELT module warmelt-normal have debug enabled"; #else /*!MELT_HAVE_DEBUG */ const char meltmodule_warmelt_normal__melt_have_debug_disabled[] = "MELT module warmelt-normal 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 1730*/ meltfram__.mcfr_nbvar = -1730 /*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 */ -1730; ((struct melt_callframe_st *) &meltfram__)->mcfr_forwmarkrout = meltmod__warmelt_normal__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_NREP */ { melt_ptr_t sy_CLASS_NREP = meltgc_named_symbol ("CLASS_NREP", MELT_GET); if (sy_CLASS_NREP && NULL == /*_.VALDATA___V172*/ meltfptr[171]) /*_.VALDATA___V172*/ meltfptr[171] = (melt_ptr_t) sy_CLASS_NREP; } /*^getnamedsymbol */ /*getnamedsym:CLASS_ROOT */ { melt_ptr_t sy_CLASS_ROOT = meltgc_named_symbol ("CLASS_ROOT", MELT_GET); if (sy_CLASS_ROOT && NULL == /*_.VALDATA___V174*/ meltfptr[173]) /*_.VALDATA___V174*/ meltfptr[173] = (melt_ptr_t) sy_CLASS_ROOT; } /*^getnamedsymbol */ /*getnamedsym:NREP_LOC */ { melt_ptr_t sy_NREP_LOC = meltgc_named_symbol ("NREP_LOC", MELT_GET); if (sy_NREP_LOC && NULL == /*_.VALDATA___V182*/ meltfptr[181]) /*_.VALDATA___V182*/ meltfptr[181] = (melt_ptr_t) sy_NREP_LOC; } /*^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___V184*/ meltfptr[183]) /*_.VALDATA___V184*/ meltfptr[183] = (melt_ptr_t) sy_CLASS_NREP_SIMPLE; } /*^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___V190*/ meltfptr[189]) /*_.VALDATA___V190*/ meltfptr[189] = (melt_ptr_t) sy_CLASS_NREP_EXPRESSION; } /*^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___V196*/ meltfptr[195]) /*_.VALDATA___V196*/ meltfptr[195] = (melt_ptr_t) sy_CLASS_NREP_TYPED_EXPRESSION; } /*^getnamedsymbol */ /*getnamedsym:NEXPR_CTYP */ { melt_ptr_t sy_NEXPR_CTYP = meltgc_named_symbol ("NEXPR_CTYP", MELT_GET); if (sy_NEXPR_CTYP && NULL == /*_.VALDATA___V204*/ meltfptr[203]) /*_.VALDATA___V204*/ meltfptr[203] = (melt_ptr_t) sy_NEXPR_CTYP; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS */ { melt_ptr_t sy_CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS = meltgc_named_symbol ("CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS", MELT_GET); if (sy_CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS && NULL == /*_.VALDATA___V206*/ meltfptr[205]) /*_.VALDATA___V206*/ meltfptr[205] = (melt_ptr_t) sy_CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS; } /*^getnamedsymbol */ /*getnamedsym:NEXPR_ARGS */ { melt_ptr_t sy_NEXPR_ARGS = meltgc_named_symbol ("NEXPR_ARGS", MELT_GET); if (sy_NEXPR_ARGS && NULL == /*_.VALDATA___V214*/ meltfptr[213]) /*_.VALDATA___V214*/ meltfptr[213] = (melt_ptr_t) sy_NEXPR_ARGS; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_APPLY */ { melt_ptr_t sy_CLASS_NREP_APPLY = meltgc_named_symbol ("CLASS_NREP_APPLY", MELT_GET); if (sy_CLASS_NREP_APPLY && NULL == /*_.VALDATA___V216*/ meltfptr[215]) /*_.VALDATA___V216*/ meltfptr[215] = (melt_ptr_t) sy_CLASS_NREP_APPLY; } /*^getnamedsymbol */ /*getnamedsym:NAPP_FUN */ { melt_ptr_t sy_NAPP_FUN = meltgc_named_symbol ("NAPP_FUN", MELT_GET); if (sy_NAPP_FUN && NULL == /*_.VALDATA___V224*/ meltfptr[223]) /*_.VALDATA___V224*/ meltfptr[223] = (melt_ptr_t) sy_NAPP_FUN; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_MULTIAPPLY */ { melt_ptr_t sy_CLASS_NREP_MULTIAPPLY = meltgc_named_symbol ("CLASS_NREP_MULTIAPPLY", MELT_GET); if (sy_CLASS_NREP_MULTIAPPLY && NULL == /*_.VALDATA___V226*/ meltfptr[225]) /*_.VALDATA___V226*/ meltfptr[225] = (melt_ptr_t) sy_CLASS_NREP_MULTIAPPLY; } /*^getnamedsymbol */ /*getnamedsym:NMULAPP_BINDINGS */ { melt_ptr_t sy_NMULAPP_BINDINGS = meltgc_named_symbol ("NMULAPP_BINDINGS", MELT_GET); if (sy_NMULAPP_BINDINGS && NULL == /*_.VALDATA___V236*/ meltfptr[235]) /*_.VALDATA___V236*/ meltfptr[235] = (melt_ptr_t) sy_NMULAPP_BINDINGS; } /*^getnamedsymbol */ /*getnamedsym:NMULAPP_BODY */ { melt_ptr_t sy_NMULAPP_BODY = meltgc_named_symbol ("NMULAPP_BODY", MELT_GET); if (sy_NMULAPP_BODY && NULL == /*_.VALDATA___V238*/ meltfptr[237]) /*_.VALDATA___V238*/ meltfptr[237] = (melt_ptr_t) sy_NMULAPP_BODY; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_MSEND */ { melt_ptr_t sy_CLASS_NREP_MSEND = meltgc_named_symbol ("CLASS_NREP_MSEND", MELT_GET); if (sy_CLASS_NREP_MSEND && NULL == /*_.VALDATA___V240*/ meltfptr[239]) /*_.VALDATA___V240*/ meltfptr[239] = (melt_ptr_t) sy_CLASS_NREP_MSEND; } /*^getnamedsymbol */ /*getnamedsym:NSEND_SEL */ { melt_ptr_t sy_NSEND_SEL = meltgc_named_symbol ("NSEND_SEL", MELT_GET); if (sy_NSEND_SEL && NULL == /*_.VALDATA___V250*/ meltfptr[249]) /*_.VALDATA___V250*/ meltfptr[249] = (melt_ptr_t) sy_NSEND_SEL; } /*^getnamedsymbol */ /*getnamedsym:NSEND_RECV */ { melt_ptr_t sy_NSEND_RECV = meltgc_named_symbol ("NSEND_RECV", MELT_GET); if (sy_NSEND_RECV && NULL == /*_.VALDATA___V252*/ meltfptr[251]) /*_.VALDATA___V252*/ meltfptr[251] = (melt_ptr_t) sy_NSEND_RECV; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_MULTIMSEND */ { melt_ptr_t sy_CLASS_NREP_MULTIMSEND = meltgc_named_symbol ("CLASS_NREP_MULTIMSEND", MELT_GET); if (sy_CLASS_NREP_MULTIMSEND && NULL == /*_.VALDATA___V254*/ meltfptr[253]) /*_.VALDATA___V254*/ meltfptr[253] = (melt_ptr_t) sy_CLASS_NREP_MULTIMSEND; } /*^getnamedsymbol */ /*getnamedsym:NMULSEND_BINDINGS */ { melt_ptr_t sy_NMULSEND_BINDINGS = meltgc_named_symbol ("NMULSEND_BINDINGS", MELT_GET); if (sy_NMULSEND_BINDINGS && NULL == /*_.VALDATA___V264*/ meltfptr[263]) /*_.VALDATA___V264*/ meltfptr[263] = (melt_ptr_t) sy_NMULSEND_BINDINGS; } /*^getnamedsymbol */ /*getnamedsym:NMULSEND_BODY */ { melt_ptr_t sy_NMULSEND_BODY = meltgc_named_symbol ("NMULSEND_BODY", MELT_GET); if (sy_NMULSEND_BODY && NULL == /*_.VALDATA___V266*/ meltfptr[265]) /*_.VALDATA___V266*/ meltfptr[265] = (melt_ptr_t) sy_NMULSEND_BODY; } /*^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___V268*/ meltfptr[267]) /*_.VALDATA___V268*/ meltfptr[267] = (melt_ptr_t) sy_CLASS_NREP_CHUNK; } /*^getnamedsymbol */ /*getnamedsym:NCHUNK_EXPANSION */ { melt_ptr_t sy_NCHUNK_EXPANSION = meltgc_named_symbol ("NCHUNK_EXPANSION", MELT_GET); if (sy_NCHUNK_EXPANSION && NULL == /*_.VALDATA___V278*/ meltfptr[277]) /*_.VALDATA___V278*/ meltfptr[277] = (melt_ptr_t) sy_NCHUNK_EXPANSION; } /*^getnamedsymbol */ /*getnamedsym:NCHUNK_OPER */ { melt_ptr_t sy_NCHUNK_OPER = meltgc_named_symbol ("NCHUNK_OPER", MELT_GET); if (sy_NCHUNK_OPER && NULL == /*_.VALDATA___V280*/ meltfptr[279]) /*_.VALDATA___V280*/ meltfptr[279] = (melt_ptr_t) sy_NCHUNK_OPER; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_COMMENT */ { melt_ptr_t sy_CLASS_NREP_COMMENT = meltgc_named_symbol ("CLASS_NREP_COMMENT", MELT_GET); if (sy_CLASS_NREP_COMMENT && NULL == /*_.VALDATA___V282*/ meltfptr[281]) /*_.VALDATA___V282*/ meltfptr[281] = (melt_ptr_t) sy_CLASS_NREP_COMMENT; } /*^getnamedsymbol */ /*getnamedsym:NCOMM_STRING */ { melt_ptr_t sy_NCOMM_STRING = meltgc_named_symbol ("NCOMM_STRING", MELT_GET); if (sy_NCOMM_STRING && NULL == /*_.VALDATA___V290*/ meltfptr[289]) /*_.VALDATA___V290*/ meltfptr[289] = (melt_ptr_t) sy_NCOMM_STRING; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_LET */ { melt_ptr_t sy_CLASS_NREP_LET = meltgc_named_symbol ("CLASS_NREP_LET", MELT_GET); if (sy_CLASS_NREP_LET && NULL == /*_.VALDATA___V292*/ meltfptr[291]) /*_.VALDATA___V292*/ meltfptr[291] = (melt_ptr_t) sy_CLASS_NREP_LET; } /*^getnamedsymbol */ /*getnamedsym:NLET_BINDINGS */ { melt_ptr_t sy_NLET_BINDINGS = meltgc_named_symbol ("NLET_BINDINGS", MELT_GET); if (sy_NLET_BINDINGS && NULL == /*_.VALDATA___V302*/ meltfptr[301]) /*_.VALDATA___V302*/ meltfptr[301] = (melt_ptr_t) sy_NLET_BINDINGS; } /*^getnamedsymbol */ /*getnamedsym:NLET_BODY */ { melt_ptr_t sy_NLET_BODY = meltgc_named_symbol ("NLET_BODY", MELT_GET); if (sy_NLET_BODY && NULL == /*_.VALDATA___V304*/ meltfptr[303]) /*_.VALDATA___V304*/ meltfptr[303] = (melt_ptr_t) sy_NLET_BODY; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_LETREC */ { melt_ptr_t sy_CLASS_NREP_LETREC = meltgc_named_symbol ("CLASS_NREP_LETREC", MELT_GET); if (sy_CLASS_NREP_LETREC && NULL == /*_.VALDATA___V306*/ meltfptr[305]) /*_.VALDATA___V306*/ meltfptr[305] = (melt_ptr_t) sy_CLASS_NREP_LETREC; } /*^getnamedsymbol */ /*getnamedsym:NLETREC_FILL_BINDINGS */ { melt_ptr_t sy_NLETREC_FILL_BINDINGS = meltgc_named_symbol ("NLETREC_FILL_BINDINGS", MELT_GET); if (sy_NLETREC_FILL_BINDINGS && NULL == /*_.VALDATA___V318*/ meltfptr[317]) /*_.VALDATA___V318*/ meltfptr[317] = (melt_ptr_t) sy_NLETREC_FILL_BINDINGS; } /*^getnamedsymbol */ /*getnamedsym:NLETREC_BODY_BINDINGS */ { melt_ptr_t sy_NLETREC_BODY_BINDINGS = meltgc_named_symbol ("NLETREC_BODY_BINDINGS", MELT_GET); if (sy_NLETREC_BODY_BINDINGS && NULL == /*_.VALDATA___V320*/ meltfptr[319]) /*_.VALDATA___V320*/ meltfptr[319] = (melt_ptr_t) sy_NLETREC_BODY_BINDINGS; } /*^getnamedsymbol */ /*getnamedsym:NLETREC_LOCSYMS */ { melt_ptr_t sy_NLETREC_LOCSYMS = meltgc_named_symbol ("NLETREC_LOCSYMS", MELT_GET); if (sy_NLETREC_LOCSYMS && NULL == /*_.VALDATA___V322*/ meltfptr[321]) /*_.VALDATA___V322*/ meltfptr[321] = (melt_ptr_t) sy_NLETREC_LOCSYMS; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_RETURN */ { melt_ptr_t sy_CLASS_NREP_RETURN = meltgc_named_symbol ("CLASS_NREP_RETURN", MELT_GET); if (sy_CLASS_NREP_RETURN && NULL == /*_.VALDATA___V324*/ meltfptr[323]) /*_.VALDATA___V324*/ meltfptr[323] = (melt_ptr_t) sy_CLASS_NREP_RETURN; } /*^getnamedsymbol */ /*getnamedsym:NRET_MAIN */ { melt_ptr_t sy_NRET_MAIN = meltgc_named_symbol ("NRET_MAIN", MELT_GET); if (sy_NRET_MAIN && NULL == /*_.VALDATA___V334*/ meltfptr[333]) /*_.VALDATA___V334*/ meltfptr[333] = (melt_ptr_t) sy_NRET_MAIN; } /*^getnamedsymbol */ /*getnamedsym:NRET_REST */ { melt_ptr_t sy_NRET_REST = meltgc_named_symbol ("NRET_REST", MELT_GET); if (sy_NRET_REST && NULL == /*_.VALDATA___V336*/ meltfptr[335]) /*_.VALDATA___V336*/ meltfptr[335] = (melt_ptr_t) sy_NRET_REST; } /*^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___V338*/ meltfptr[337]) /*_.VALDATA___V338*/ meltfptr[337] = (melt_ptr_t) sy_CLASS_NREP_IFCOMMON; } /*^getnamedsymbol */ /*getnamedsym:NIF_THEN */ { melt_ptr_t sy_NIF_THEN = meltgc_named_symbol ("NIF_THEN", MELT_GET); if (sy_NIF_THEN && NULL == /*_.VALDATA___V348*/ meltfptr[347]) /*_.VALDATA___V348*/ meltfptr[347] = (melt_ptr_t) sy_NIF_THEN; } /*^getnamedsymbol */ /*getnamedsym:NIF_ELSE */ { melt_ptr_t sy_NIF_ELSE = meltgc_named_symbol ("NIF_ELSE", MELT_GET); if (sy_NIF_ELSE && NULL == /*_.VALDATA___V350*/ meltfptr[349]) /*_.VALDATA___V350*/ meltfptr[349] = (melt_ptr_t) sy_NIF_ELSE; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_IFTESTVALUE */ { melt_ptr_t sy_CLASS_NREP_IFTESTVALUE = meltgc_named_symbol ("CLASS_NREP_IFTESTVALUE", MELT_GET); if (sy_CLASS_NREP_IFTESTVALUE && NULL == /*_.VALDATA___V352*/ meltfptr[351]) /*_.VALDATA___V352*/ meltfptr[351] = (melt_ptr_t) sy_CLASS_NREP_IFTESTVALUE; } /*^getnamedsymbol */ /*getnamedsym:NIF_TESTVAL */ { melt_ptr_t sy_NIF_TESTVAL = meltgc_named_symbol ("NIF_TESTVAL", MELT_GET); if (sy_NIF_TESTVAL && NULL == /*_.VALDATA___V360*/ meltfptr[359]) /*_.VALDATA___V360*/ meltfptr[359] = (melt_ptr_t) sy_NIF_TESTVAL; } /*^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___V362*/ meltfptr[361]) /*_.VALDATA___V362*/ meltfptr[361] = (melt_ptr_t) sy_CLASS_NREP_IFISA; } /*^getnamedsymbol */ /*getnamedsym:NIFA_CLASS */ { melt_ptr_t sy_NIFA_CLASS = meltgc_named_symbol ("NIFA_CLASS", MELT_GET); if (sy_NIFA_CLASS && NULL == /*_.VALDATA___V370*/ meltfptr[369]) /*_.VALDATA___V370*/ meltfptr[369] = (melt_ptr_t) sy_NIFA_CLASS; } /*^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___V372*/ meltfptr[371]) /*_.VALDATA___V372*/ meltfptr[371] = (melt_ptr_t) sy_CLASS_NREP_IFTUPLESIZED; } /*^getnamedsymbol */ /*getnamedsym:NIF_TUPSIZ */ { melt_ptr_t sy_NIF_TUPSIZ = meltgc_named_symbol ("NIF_TUPSIZ", MELT_GET); if (sy_NIF_TUPSIZ && NULL == /*_.VALDATA___V380*/ meltfptr[379]) /*_.VALDATA___V380*/ meltfptr[379] = (melt_ptr_t) sy_NIF_TUPSIZ; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_IFVARIADIC */ { melt_ptr_t sy_CLASS_NREP_IFVARIADIC = meltgc_named_symbol ("CLASS_NREP_IFVARIADIC", MELT_GET); if (sy_CLASS_NREP_IFVARIADIC && NULL == /*_.VALDATA___V382*/ meltfptr[381]) /*_.VALDATA___V382*/ meltfptr[381] = (melt_ptr_t) sy_CLASS_NREP_IFVARIADIC; } /*^getnamedsymbol */ /*getnamedsym:NIFV_VARIADIC */ { melt_ptr_t sy_NIFV_VARIADIC = meltgc_named_symbol ("NIFV_VARIADIC", MELT_GET); if (sy_NIFV_VARIADIC && NULL == /*_.VALDATA___V392*/ meltfptr[391]) /*_.VALDATA___V392*/ meltfptr[391] = (melt_ptr_t) sy_NIFV_VARIADIC; } /*^getnamedsymbol */ /*getnamedsym:NIFV_CTYPES */ { melt_ptr_t sy_NIFV_CTYPES = meltgc_named_symbol ("NIFV_CTYPES", MELT_GET); if (sy_NIFV_CTYPES && NULL == /*_.VALDATA___V394*/ meltfptr[393]) /*_.VALDATA___V394*/ meltfptr[393] = (melt_ptr_t) sy_NIFV_CTYPES; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_CONSUME_VARIADIC */ { melt_ptr_t sy_CLASS_NREP_CONSUME_VARIADIC = meltgc_named_symbol ("CLASS_NREP_CONSUME_VARIADIC", MELT_GET); if (sy_CLASS_NREP_CONSUME_VARIADIC && NULL == /*_.VALDATA___V396*/ meltfptr[395]) /*_.VALDATA___V396*/ meltfptr[395] = (melt_ptr_t) sy_CLASS_NREP_CONSUME_VARIADIC; } /*^getnamedsymbol */ /*getnamedsym:NCONSVA_VARIADIC */ { melt_ptr_t sy_NCONSVA_VARIADIC = meltgc_named_symbol ("NCONSVA_VARIADIC", MELT_GET); if (sy_NCONSVA_VARIADIC && NULL == /*_.VALDATA___V406*/ meltfptr[405]) /*_.VALDATA___V406*/ meltfptr[405] = (melt_ptr_t) sy_NCONSVA_VARIADIC; } /*^getnamedsymbol */ /*getnamedsym:NCONSVA_CTYPES */ { melt_ptr_t sy_NCONSVA_CTYPES = meltgc_named_symbol ("NCONSVA_CTYPES", MELT_GET); if (sy_NCONSVA_CTYPES && NULL == /*_.VALDATA___V408*/ meltfptr[407]) /*_.VALDATA___V408*/ meltfptr[407] = (melt_ptr_t) sy_NCONSVA_CTYPES; } /*^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___V410*/ meltfptr[409]) /*_.VALDATA___V410*/ meltfptr[409] = (melt_ptr_t) sy_CLASS_NREP_IFSAME; } /*^getnamedsymbol */ /*getnamedsym:NIFS_LEFT */ { melt_ptr_t sy_NIFS_LEFT = meltgc_named_symbol ("NIFS_LEFT", MELT_GET); if (sy_NIFS_LEFT && NULL == /*_.VALDATA___V420*/ meltfptr[419]) /*_.VALDATA___V420*/ meltfptr[419] = (melt_ptr_t) sy_NIFS_LEFT; } /*^getnamedsymbol */ /*getnamedsym:NIFS_RIGHT */ { melt_ptr_t sy_NIFS_RIGHT = meltgc_named_symbol ("NIFS_RIGHT", MELT_GET); if (sy_NIFS_RIGHT && NULL == /*_.VALDATA___V422*/ meltfptr[421]) /*_.VALDATA___V422*/ meltfptr[421] = (melt_ptr_t) sy_NIFS_RIGHT; } /*^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___V424*/ meltfptr[423]) /*_.VALDATA___V424*/ meltfptr[423] = (melt_ptr_t) sy_CLASS_NREP_IF; } /*^getnamedsymbol */ /*getnamedsym:NIF_TEST */ { melt_ptr_t sy_NIF_TEST = meltgc_named_symbol ("NIF_TEST", MELT_GET); if (sy_NIF_TEST && NULL == /*_.VALDATA___V432*/ meltfptr[431]) /*_.VALDATA___V432*/ meltfptr[431] = (melt_ptr_t) sy_NIF_TEST; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_CPPIF */ { melt_ptr_t sy_CLASS_NREP_CPPIF = meltgc_named_symbol ("CLASS_NREP_CPPIF", MELT_GET); if (sy_CLASS_NREP_CPPIF && NULL == /*_.VALDATA___V434*/ meltfptr[433]) /*_.VALDATA___V434*/ meltfptr[433] = (melt_ptr_t) sy_CLASS_NREP_CPPIF; } /*^getnamedsymbol */ /*getnamedsym:NIFP_COND */ { melt_ptr_t sy_NIFP_COND = meltgc_named_symbol ("NIFP_COND", MELT_GET); if (sy_NIFP_COND && NULL == /*_.VALDATA___V448*/ meltfptr[447]) /*_.VALDATA___V448*/ meltfptr[447] = (melt_ptr_t) sy_NIFP_COND; } /*^getnamedsymbol */ /*getnamedsym:NIFP_THEN */ { melt_ptr_t sy_NIFP_THEN = meltgc_named_symbol ("NIFP_THEN", MELT_GET); if (sy_NIFP_THEN && NULL == /*_.VALDATA___V450*/ meltfptr[449]) /*_.VALDATA___V450*/ meltfptr[449] = (melt_ptr_t) sy_NIFP_THEN; } /*^getnamedsymbol */ /*getnamedsym:NIFP_ELSE */ { melt_ptr_t sy_NIFP_ELSE = meltgc_named_symbol ("NIFP_ELSE", MELT_GET); if (sy_NIFP_ELSE && NULL == /*_.VALDATA___V452*/ meltfptr[451]) /*_.VALDATA___V452*/ meltfptr[451] = (melt_ptr_t) sy_NIFP_ELSE; } /*^getnamedsymbol */ /*getnamedsym:NIFP_CTYP */ { melt_ptr_t sy_NIFP_CTYP = meltgc_named_symbol ("NIFP_CTYP", MELT_GET); if (sy_NIFP_CTYP && NULL == /*_.VALDATA___V454*/ meltfptr[453]) /*_.VALDATA___V454*/ meltfptr[453] = (melt_ptr_t) sy_NIFP_CTYP; } /*^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___V456*/ meltfptr[455]) /*_.VALDATA___V456*/ meltfptr[455] = (melt_ptr_t) sy_CLASS_NREP_PROGN; } /*^getnamedsymbol */ /*getnamedsym:NPROGN_SEQ */ { melt_ptr_t sy_NPROGN_SEQ = meltgc_named_symbol ("NPROGN_SEQ", MELT_GET); if (sy_NPROGN_SEQ && NULL == /*_.VALDATA___V466*/ meltfptr[465]) /*_.VALDATA___V466*/ meltfptr[465] = (melt_ptr_t) sy_NPROGN_SEQ; } /*^getnamedsymbol */ /*getnamedsym:NPROGN_LAST */ { melt_ptr_t sy_NPROGN_LAST = meltgc_named_symbol ("NPROGN_LAST", MELT_GET); if (sy_NPROGN_LAST && NULL == /*_.VALDATA___V468*/ meltfptr[467]) /*_.VALDATA___V468*/ meltfptr[467] = (melt_ptr_t) sy_NPROGN_LAST; } /*^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___V470*/ meltfptr[469]) /*_.VALDATA___V470*/ meltfptr[469] = (melt_ptr_t) sy_CLASS_NREP_CHECKSIGNAL; } /*^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___V476*/ meltfptr[475]) /*_.VALDATA___V476*/ meltfptr[475] = (melt_ptr_t) sy_CLASS_NREP_UNSAFE_GET_FIELD; } /*^getnamedsymbol */ /*getnamedsym:NUGET_OBJ */ { melt_ptr_t sy_NUGET_OBJ = meltgc_named_symbol ("NUGET_OBJ", MELT_GET); if (sy_NUGET_OBJ && NULL == /*_.VALDATA___V486*/ meltfptr[485]) /*_.VALDATA___V486*/ meltfptr[485] = (melt_ptr_t) sy_NUGET_OBJ; } /*^getnamedsymbol */ /*getnamedsym:NUGET_FIELD */ { melt_ptr_t sy_NUGET_FIELD = meltgc_named_symbol ("NUGET_FIELD", MELT_GET); if (sy_NUGET_FIELD && NULL == /*_.VALDATA___V488*/ meltfptr[487]) /*_.VALDATA___V488*/ meltfptr[487] = (melt_ptr_t) sy_NUGET_FIELD; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_UNSAFE_PUT_FIELDS */ { melt_ptr_t sy_CLASS_NREP_UNSAFE_PUT_FIELDS = meltgc_named_symbol ("CLASS_NREP_UNSAFE_PUT_FIELDS", MELT_GET); if (sy_CLASS_NREP_UNSAFE_PUT_FIELDS && NULL == /*_.VALDATA___V490*/ meltfptr[489]) /*_.VALDATA___V490*/ meltfptr[489] = (melt_ptr_t) sy_CLASS_NREP_UNSAFE_PUT_FIELDS; } /*^getnamedsymbol */ /*getnamedsym:NUPUT_OBJ */ { melt_ptr_t sy_NUPUT_OBJ = meltgc_named_symbol ("NUPUT_OBJ", MELT_GET); if (sy_NUPUT_OBJ && NULL == /*_.VALDATA___V500*/ meltfptr[499]) /*_.VALDATA___V500*/ meltfptr[499] = (melt_ptr_t) sy_NUPUT_OBJ; } /*^getnamedsymbol */ /*getnamedsym:NUPUT_FIELDS */ { melt_ptr_t sy_NUPUT_FIELDS = meltgc_named_symbol ("NUPUT_FIELDS", MELT_GET); if (sy_NUPUT_FIELDS && NULL == /*_.VALDATA___V502*/ meltfptr[501]) /*_.VALDATA___V502*/ meltfptr[501] = (melt_ptr_t) sy_NUPUT_FIELDS; } /*^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___V504*/ meltfptr[503]) /*_.VALDATA___V504*/ meltfptr[503] = (melt_ptr_t) sy_CLASS_NREP_UNSAFE_NTH_COMPONENT; } /*^getnamedsymbol */ /*getnamedsym:NUNTH_TUPLE */ { melt_ptr_t sy_NUNTH_TUPLE = meltgc_named_symbol ("NUNTH_TUPLE", MELT_GET); if (sy_NUNTH_TUPLE && NULL == /*_.VALDATA___V514*/ meltfptr[513]) /*_.VALDATA___V514*/ meltfptr[513] = (melt_ptr_t) sy_NUNTH_TUPLE; } /*^getnamedsymbol */ /*getnamedsym:NUNTH_INDEX */ { melt_ptr_t sy_NUNTH_INDEX = meltgc_named_symbol ("NUNTH_INDEX", MELT_GET); if (sy_NUNTH_INDEX && NULL == /*_.VALDATA___V516*/ meltfptr[515]) /*_.VALDATA___V516*/ meltfptr[515] = (melt_ptr_t) sy_NUNTH_INDEX; } /*^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___V518*/ meltfptr[517]) /*_.VALDATA___V518*/ meltfptr[517] = (melt_ptr_t) sy_CLASS_NREP_SETQ; } /*^getnamedsymbol */ /*getnamedsym:NSTQ_VAR */ { melt_ptr_t sy_NSTQ_VAR = meltgc_named_symbol ("NSTQ_VAR", MELT_GET); if (sy_NSTQ_VAR && NULL == /*_.VALDATA___V528*/ meltfptr[527]) /*_.VALDATA___V528*/ meltfptr[527] = (melt_ptr_t) sy_NSTQ_VAR; } /*^getnamedsymbol */ /*getnamedsym:NSTQ_EXP */ { melt_ptr_t sy_NSTQ_EXP = meltgc_named_symbol ("NSTQ_EXP", MELT_GET); if (sy_NSTQ_EXP && NULL == /*_.VALDATA___V530*/ meltfptr[529]) /*_.VALDATA___V530*/ meltfptr[529] = (melt_ptr_t) sy_NSTQ_EXP; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_FOREVER */ { melt_ptr_t sy_CLASS_NREP_FOREVER = meltgc_named_symbol ("CLASS_NREP_FOREVER", MELT_GET); if (sy_CLASS_NREP_FOREVER && NULL == /*_.VALDATA___V532*/ meltfptr[531]) /*_.VALDATA___V532*/ meltfptr[531] = (melt_ptr_t) sy_CLASS_NREP_FOREVER; } /*^getnamedsymbol */ /*getnamedsym:NFOREVER_BIND */ { melt_ptr_t sy_NFOREVER_BIND = meltgc_named_symbol ("NFOREVER_BIND", MELT_GET); if (sy_NFOREVER_BIND && NULL == /*_.VALDATA___V544*/ meltfptr[543]) /*_.VALDATA___V544*/ meltfptr[543] = (melt_ptr_t) sy_NFOREVER_BIND; } /*^getnamedsymbol */ /*getnamedsym:NFOREVER_BODY */ { melt_ptr_t sy_NFOREVER_BODY = meltgc_named_symbol ("NFOREVER_BODY", MELT_GET); if (sy_NFOREVER_BODY && NULL == /*_.VALDATA___V546*/ meltfptr[545]) /*_.VALDATA___V546*/ meltfptr[545] = (melt_ptr_t) sy_NFOREVER_BODY; } /*^getnamedsymbol */ /*getnamedsym:NFOREVER_RESULT */ { melt_ptr_t sy_NFOREVER_RESULT = meltgc_named_symbol ("NFOREVER_RESULT", MELT_GET); if (sy_NFOREVER_RESULT && NULL == /*_.VALDATA___V548*/ meltfptr[547]) /*_.VALDATA___V548*/ meltfptr[547] = (melt_ptr_t) sy_NFOREVER_RESULT; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_EXIT */ { melt_ptr_t sy_CLASS_NREP_EXIT = meltgc_named_symbol ("CLASS_NREP_EXIT", MELT_GET); if (sy_CLASS_NREP_EXIT && NULL == /*_.VALDATA___V550*/ meltfptr[549]) /*_.VALDATA___V550*/ meltfptr[549] = (melt_ptr_t) sy_CLASS_NREP_EXIT; } /*^getnamedsymbol */ /*getnamedsym:NEXIT_BIND */ { melt_ptr_t sy_NEXIT_BIND = meltgc_named_symbol ("NEXIT_BIND", MELT_GET); if (sy_NEXIT_BIND && NULL == /*_.VALDATA___V560*/ meltfptr[559]) /*_.VALDATA___V560*/ meltfptr[559] = (melt_ptr_t) sy_NEXIT_BIND; } /*^getnamedsymbol */ /*getnamedsym:NEXIT_VAL */ { melt_ptr_t sy_NEXIT_VAL = meltgc_named_symbol ("NEXIT_VAL", MELT_GET); if (sy_NEXIT_VAL && NULL == /*_.VALDATA___V562*/ meltfptr[561]) /*_.VALDATA___V562*/ meltfptr[561] = (melt_ptr_t) sy_NEXIT_VAL; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_AGAIN */ { melt_ptr_t sy_CLASS_NREP_AGAIN = meltgc_named_symbol ("CLASS_NREP_AGAIN", MELT_GET); if (sy_CLASS_NREP_AGAIN && NULL == /*_.VALDATA___V564*/ meltfptr[563]) /*_.VALDATA___V564*/ meltfptr[563] = (melt_ptr_t) sy_CLASS_NREP_AGAIN; } /*^getnamedsymbol */ /*getnamedsym:NAGAIN_BIND */ { melt_ptr_t sy_NAGAIN_BIND = meltgc_named_symbol ("NAGAIN_BIND", MELT_GET); if (sy_NAGAIN_BIND && NULL == /*_.VALDATA___V572*/ meltfptr[571]) /*_.VALDATA___V572*/ meltfptr[571] = (melt_ptr_t) sy_NAGAIN_BIND; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_FIELDASSIGN */ { melt_ptr_t sy_CLASS_NREP_FIELDASSIGN = meltgc_named_symbol ("CLASS_NREP_FIELDASSIGN", MELT_GET); if (sy_CLASS_NREP_FIELDASSIGN && NULL == /*_.VALDATA___V574*/ meltfptr[573]) /*_.VALDATA___V574*/ meltfptr[573] = (melt_ptr_t) sy_CLASS_NREP_FIELDASSIGN; } /*^getnamedsymbol */ /*getnamedsym:NFLA_FIELD */ { melt_ptr_t sy_NFLA_FIELD = meltgc_named_symbol ("NFLA_FIELD", MELT_GET); if (sy_NFLA_FIELD && NULL == /*_.VALDATA___V584*/ meltfptr[583]) /*_.VALDATA___V584*/ meltfptr[583] = (melt_ptr_t) sy_NFLA_FIELD; } /*^getnamedsymbol */ /*getnamedsym:NFLA_VAL */ { melt_ptr_t sy_NFLA_VAL = meltgc_named_symbol ("NFLA_VAL", MELT_GET); if (sy_NFLA_VAL && NULL == /*_.VALDATA___V586*/ meltfptr[585]) /*_.VALDATA___V586*/ meltfptr[585] = (melt_ptr_t) sy_NFLA_VAL; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_INSTANCE */ { melt_ptr_t sy_CLASS_NREP_INSTANCE = meltgc_named_symbol ("CLASS_NREP_INSTANCE", MELT_GET); if (sy_CLASS_NREP_INSTANCE && NULL == /*_.VALDATA___V588*/ meltfptr[587]) /*_.VALDATA___V588*/ meltfptr[587] = (melt_ptr_t) sy_CLASS_NREP_INSTANCE; } /*^getnamedsymbol */ /*getnamedsym:NMINS_CLASS */ { melt_ptr_t sy_NMINS_CLASS = meltgc_named_symbol ("NMINS_CLASS", MELT_GET); if (sy_NMINS_CLASS && NULL == /*_.VALDATA___V600*/ meltfptr[599]) /*_.VALDATA___V600*/ meltfptr[599] = (melt_ptr_t) sy_NMINS_CLASS; } /*^getnamedsymbol */ /*getnamedsym:NMINS_CLADATA */ { melt_ptr_t sy_NMINS_CLADATA = meltgc_named_symbol ("NMINS_CLADATA", MELT_GET); if (sy_NMINS_CLADATA && NULL == /*_.VALDATA___V602*/ meltfptr[601]) /*_.VALDATA___V602*/ meltfptr[601] = (melt_ptr_t) sy_NMINS_CLADATA; } /*^getnamedsymbol */ /*getnamedsym:NMINS_FIELDS */ { melt_ptr_t sy_NMINS_FIELDS = meltgc_named_symbol ("NMINS_FIELDS", MELT_GET); if (sy_NMINS_FIELDS && NULL == /*_.VALDATA___V604*/ meltfptr[603]) /*_.VALDATA___V604*/ meltfptr[603] = (melt_ptr_t) sy_NMINS_FIELDS; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_VARIADIC_ARGUMENT */ { melt_ptr_t sy_CLASS_NREP_VARIADIC_ARGUMENT = meltgc_named_symbol ("CLASS_NREP_VARIADIC_ARGUMENT", MELT_GET); if (sy_CLASS_NREP_VARIADIC_ARGUMENT && NULL == /*_.VALDATA___V606*/ meltfptr[605]) /*_.VALDATA___V606*/ meltfptr[605] = (melt_ptr_t) sy_CLASS_NREP_VARIADIC_ARGUMENT; } /*^getnamedsymbol */ /*getnamedsym:NVARG_VARIADIC */ { melt_ptr_t sy_NVARG_VARIADIC = meltgc_named_symbol ("NVARG_VARIADIC", MELT_GET); if (sy_NVARG_VARIADIC && NULL == /*_.VALDATA___V618*/ meltfptr[617]) /*_.VALDATA___V618*/ meltfptr[617] = (melt_ptr_t) sy_NVARG_VARIADIC; } /*^getnamedsymbol */ /*getnamedsym:NVARG_CTYP */ { melt_ptr_t sy_NVARG_CTYP = meltgc_named_symbol ("NVARG_CTYP", MELT_GET); if (sy_NVARG_CTYP && NULL == /*_.VALDATA___V620*/ meltfptr[619]) /*_.VALDATA___V620*/ meltfptr[619] = (melt_ptr_t) sy_NVARG_CTYP; } /*^getnamedsymbol */ /*getnamedsym:NVARG_OFFSET */ { melt_ptr_t sy_NVARG_OFFSET = meltgc_named_symbol ("NVARG_OFFSET", MELT_GET); if (sy_NVARG_OFFSET && NULL == /*_.VALDATA___V622*/ meltfptr[621]) /*_.VALDATA___V622*/ meltfptr[621] = (melt_ptr_t) sy_NVARG_OFFSET; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_LAMBDA */ { melt_ptr_t sy_CLASS_NREP_LAMBDA = meltgc_named_symbol ("CLASS_NREP_LAMBDA", MELT_GET); if (sy_CLASS_NREP_LAMBDA && NULL == /*_.VALDATA___V624*/ meltfptr[623]) /*_.VALDATA___V624*/ meltfptr[623] = (melt_ptr_t) sy_CLASS_NREP_LAMBDA; } /*^getnamedsymbol */ /*getnamedsym:NLAMBDA_PROC */ { melt_ptr_t sy_NLAMBDA_PROC = meltgc_named_symbol ("NLAMBDA_PROC", MELT_GET); if (sy_NLAMBDA_PROC && NULL == /*_.VALDATA___V636*/ meltfptr[635]) /*_.VALDATA___V636*/ meltfptr[635] = (melt_ptr_t) sy_NLAMBDA_PROC; } /*^getnamedsymbol */ /*getnamedsym:NLAMBDA_CONSTROUT */ { melt_ptr_t sy_NLAMBDA_CONSTROUT = meltgc_named_symbol ("NLAMBDA_CONSTROUT", MELT_GET); if (sy_NLAMBDA_CONSTROUT && NULL == /*_.VALDATA___V638*/ meltfptr[637]) /*_.VALDATA___V638*/ meltfptr[637] = (melt_ptr_t) sy_NLAMBDA_CONSTROUT; } /*^getnamedsymbol */ /*getnamedsym:NLAMBDA_CLOSEDV */ { melt_ptr_t sy_NLAMBDA_CLOSEDV = meltgc_named_symbol ("NLAMBDA_CLOSEDV", MELT_GET); if (sy_NLAMBDA_CLOSEDV && NULL == /*_.VALDATA___V640*/ meltfptr[639]) /*_.VALDATA___V640*/ meltfptr[639] = (melt_ptr_t) sy_NLAMBDA_CLOSEDV; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_CITERATION */ { melt_ptr_t sy_CLASS_NREP_CITERATION = meltgc_named_symbol ("CLASS_NREP_CITERATION", MELT_GET); if (sy_CLASS_NREP_CITERATION && NULL == /*_.VALDATA___V642*/ meltfptr[641]) /*_.VALDATA___V642*/ meltfptr[641] = (melt_ptr_t) sy_CLASS_NREP_CITERATION; } /*^getnamedsymbol */ /*getnamedsym:NCITER_CITERATOR */ { melt_ptr_t sy_NCITER_CITERATOR = meltgc_named_symbol ("NCITER_CITERATOR", MELT_GET); if (sy_NCITER_CITERATOR && NULL == /*_.VALDATA___V662*/ meltfptr[661]) /*_.VALDATA___V662*/ meltfptr[661] = (melt_ptr_t) sy_NCITER_CITERATOR; } /*^getnamedsymbol */ /*getnamedsym:NCITER_CHUNKBEFORE */ { melt_ptr_t sy_NCITER_CHUNKBEFORE = meltgc_named_symbol ("NCITER_CHUNKBEFORE", MELT_GET); if (sy_NCITER_CHUNKBEFORE && NULL == /*_.VALDATA___V664*/ meltfptr[663]) /*_.VALDATA___V664*/ meltfptr[663] = (melt_ptr_t) sy_NCITER_CHUNKBEFORE; } /*^getnamedsymbol */ /*getnamedsym:NCITER_CHUNKAFTER */ { melt_ptr_t sy_NCITER_CHUNKAFTER = meltgc_named_symbol ("NCITER_CHUNKAFTER", MELT_GET); if (sy_NCITER_CHUNKAFTER && NULL == /*_.VALDATA___V666*/ meltfptr[665]) /*_.VALDATA___V666*/ meltfptr[665] = (melt_ptr_t) sy_NCITER_CHUNKAFTER; } /*^getnamedsymbol */ /*getnamedsym:NCITER_BODY */ { melt_ptr_t sy_NCITER_BODY = meltgc_named_symbol ("NCITER_BODY", MELT_GET); if (sy_NCITER_BODY && NULL == /*_.VALDATA___V668*/ meltfptr[667]) /*_.VALDATA___V668*/ meltfptr[667] = (melt_ptr_t) sy_NCITER_BODY; } /*^getnamedsymbol */ /*getnamedsym:NCITER_STATOCC */ { melt_ptr_t sy_NCITER_STATOCC = meltgc_named_symbol ("NCITER_STATOCC", MELT_GET); if (sy_NCITER_STATOCC && NULL == /*_.VALDATA___V670*/ meltfptr[669]) /*_.VALDATA___V670*/ meltfptr[669] = (melt_ptr_t) sy_NCITER_STATOCC; } /*^getnamedsymbol */ /*getnamedsym:NCITER_LOCBINDINGS */ { melt_ptr_t sy_NCITER_LOCBINDINGS = meltgc_named_symbol ("NCITER_LOCBINDINGS", MELT_GET); if (sy_NCITER_LOCBINDINGS && NULL == /*_.VALDATA___V672*/ meltfptr[671]) /*_.VALDATA___V672*/ meltfptr[671] = (melt_ptr_t) sy_NCITER_LOCBINDINGS; } /*^getnamedsymbol */ /*getnamedsym:NCITER_BODBINDINGS */ { melt_ptr_t sy_NCITER_BODBINDINGS = meltgc_named_symbol ("NCITER_BODBINDINGS", MELT_GET); if (sy_NCITER_BODBINDINGS && NULL == /*_.VALDATA___V674*/ meltfptr[673]) /*_.VALDATA___V674*/ meltfptr[673] = (melt_ptr_t) sy_NCITER_BODBINDINGS; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_TESTS */ { melt_ptr_t sy_CLASS_NREP_TESTS = meltgc_named_symbol ("CLASS_NREP_TESTS", MELT_GET); if (sy_CLASS_NREP_TESTS && NULL == /*_.VALDATA___V676*/ meltfptr[675]) /*_.VALDATA___V676*/ meltfptr[675] = (melt_ptr_t) sy_CLASS_NREP_TESTS; } /*^getnamedsymbol */ /*getnamedsym:NTESTS_TESTSEQ */ { melt_ptr_t sy_NTESTS_TESTSEQ = meltgc_named_symbol ("NTESTS_TESTSEQ", MELT_GET); if (sy_NTESTS_TESTSEQ && NULL == /*_.VALDATA___V684*/ meltfptr[683]) /*_.VALDATA___V684*/ meltfptr[683] = (melt_ptr_t) sy_NTESTS_TESTSEQ; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NORMAL_CONSTRUCTOR_BINDING */ { melt_ptr_t sy_CLASS_NORMAL_CONSTRUCTOR_BINDING = meltgc_named_symbol ("CLASS_NORMAL_CONSTRUCTOR_BINDING", MELT_GET); if (sy_CLASS_NORMAL_CONSTRUCTOR_BINDING && NULL == /*_.VALDATA___V686*/ meltfptr[685]) /*_.VALDATA___V686*/ meltfptr[685] = (melt_ptr_t) sy_CLASS_NORMAL_CONSTRUCTOR_BINDING; } /*^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___V688*/ meltfptr[687]) /*_.VALDATA___V688*/ meltfptr[687] = (melt_ptr_t) sy_CLASS_ANY_BINDING; } /*^getnamedsymbol */ /*getnamedsym:NCONSB_LOC */ { melt_ptr_t sy_NCONSB_LOC = meltgc_named_symbol ("NCONSB_LOC", MELT_GET); if (sy_NCONSB_LOC && NULL == /*_.VALDATA___V700*/ meltfptr[699]) /*_.VALDATA___V700*/ meltfptr[699] = (melt_ptr_t) sy_NCONSB_LOC; } /*^getnamedsymbol */ /*getnamedsym:NCONSB_DISCR */ { melt_ptr_t sy_NCONSB_DISCR = meltgc_named_symbol ("NCONSB_DISCR", MELT_GET); if (sy_NCONSB_DISCR && NULL == /*_.VALDATA___V702*/ meltfptr[701]) /*_.VALDATA___V702*/ meltfptr[701] = (melt_ptr_t) sy_NCONSB_DISCR; } /*^getnamedsymbol */ /*getnamedsym:NCONSB_NLETREC */ { melt_ptr_t sy_NCONSB_NLETREC = meltgc_named_symbol ("NCONSB_NLETREC", MELT_GET); if (sy_NCONSB_NLETREC && NULL == /*_.VALDATA___V704*/ meltfptr[703]) /*_.VALDATA___V704*/ meltfptr[703] = (melt_ptr_t) sy_NCONSB_NLETREC; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING */ { melt_ptr_t sy_CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING = meltgc_named_symbol ("CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING", MELT_GET); if (sy_CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING && NULL == /*_.VALDATA___V706*/ meltfptr[705]) /*_.VALDATA___V706*/ meltfptr[705] = (melt_ptr_t) sy_CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING; } /*^getnamedsymbol */ /*getnamedsym:NTUPB_COMP */ { melt_ptr_t sy_NTUPB_COMP = meltgc_named_symbol ("NTUPB_COMP", MELT_GET); if (sy_NTUPB_COMP && NULL == /*_.VALDATA___V714*/ meltfptr[713]) /*_.VALDATA___V714*/ meltfptr[713] = (melt_ptr_t) sy_NTUPB_COMP; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING */ { melt_ptr_t sy_CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING = meltgc_named_symbol ("CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING", MELT_GET); if (sy_CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING && NULL == /*_.VALDATA___V716*/ meltfptr[715]) /*_.VALDATA___V716*/ meltfptr[715] = (melt_ptr_t) sy_CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING; } /*^getnamedsymbol */ /*getnamedsym:NPAIRB_HEAD */ { melt_ptr_t sy_NPAIRB_HEAD = meltgc_named_symbol ("NPAIRB_HEAD", MELT_GET); if (sy_NPAIRB_HEAD && NULL == /*_.VALDATA___V726*/ meltfptr[725]) /*_.VALDATA___V726*/ meltfptr[725] = (melt_ptr_t) sy_NPAIRB_HEAD; } /*^getnamedsymbol */ /*getnamedsym:NPAIRB_TAIL */ { melt_ptr_t sy_NPAIRB_TAIL = meltgc_named_symbol ("NPAIRB_TAIL", MELT_GET); if (sy_NPAIRB_TAIL && NULL == /*_.VALDATA___V728*/ meltfptr[727]) /*_.VALDATA___V728*/ meltfptr[727] = (melt_ptr_t) sy_NPAIRB_TAIL; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NORMAL_CONSTRUCTED_LIST_BINDING */ { melt_ptr_t sy_CLASS_NORMAL_CONSTRUCTED_LIST_BINDING = meltgc_named_symbol ("CLASS_NORMAL_CONSTRUCTED_LIST_BINDING", MELT_GET); if (sy_CLASS_NORMAL_CONSTRUCTED_LIST_BINDING && NULL == /*_.VALDATA___V730*/ meltfptr[729]) /*_.VALDATA___V730*/ meltfptr[729] = (melt_ptr_t) sy_CLASS_NORMAL_CONSTRUCTED_LIST_BINDING; } /*^getnamedsymbol */ /*getnamedsym:NLISTB_FIRST */ { melt_ptr_t sy_NLISTB_FIRST = meltgc_named_symbol ("NLISTB_FIRST", MELT_GET); if (sy_NLISTB_FIRST && NULL == /*_.VALDATA___V742*/ meltfptr[741]) /*_.VALDATA___V742*/ meltfptr[741] = (melt_ptr_t) sy_NLISTB_FIRST; } /*^getnamedsymbol */ /*getnamedsym:NLISTB_LAST */ { melt_ptr_t sy_NLISTB_LAST = meltgc_named_symbol ("NLISTB_LAST", MELT_GET); if (sy_NLISTB_LAST && NULL == /*_.VALDATA___V744*/ meltfptr[743]) /*_.VALDATA___V744*/ meltfptr[743] = (melt_ptr_t) sy_NLISTB_LAST; } /*^getnamedsymbol */ /*getnamedsym:NLISTB_PAIRSB */ { melt_ptr_t sy_NLISTB_PAIRSB = meltgc_named_symbol ("NLISTB_PAIRSB", MELT_GET); if (sy_NLISTB_PAIRSB && NULL == /*_.VALDATA___V746*/ meltfptr[745]) /*_.VALDATA___V746*/ meltfptr[745] = (melt_ptr_t) sy_NLISTB_PAIRSB; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING */ { melt_ptr_t sy_CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING = meltgc_named_symbol ("CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING", MELT_GET); if (sy_CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING && NULL == /*_.VALDATA___V748*/ meltfptr[747]) /*_.VALDATA___V748*/ meltfptr[747] = (melt_ptr_t) sy_CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING; } /*^getnamedsymbol */ /*getnamedsym:NLAMBDAB_NCLOSED */ { melt_ptr_t sy_NLAMBDAB_NCLOSED = meltgc_named_symbol ("NLAMBDAB_NCLOSED", MELT_GET); if (sy_NLAMBDAB_NCLOSED && NULL == /*_.VALDATA___V760*/ meltfptr[759]) /*_.VALDATA___V760*/ meltfptr[759] = (melt_ptr_t) sy_NLAMBDAB_NCLOSED; } /*^getnamedsymbol */ /*getnamedsym:NLAMBDAB_CONSTROUT */ { melt_ptr_t sy_NLAMBDAB_CONSTROUT = meltgc_named_symbol ("NLAMBDAB_CONSTROUT", MELT_GET); if (sy_NLAMBDAB_CONSTROUT && NULL == /*_.VALDATA___V762*/ meltfptr[761]) /*_.VALDATA___V762*/ meltfptr[761] = (melt_ptr_t) sy_NLAMBDAB_CONSTROUT; } /*^getnamedsymbol */ /*getnamedsym:NLAMBDAB_DATAROUT */ { melt_ptr_t sy_NLAMBDAB_DATAROUT = meltgc_named_symbol ("NLAMBDAB_DATAROUT", MELT_GET); if (sy_NLAMBDAB_DATAROUT && NULL == /*_.VALDATA___V764*/ meltfptr[763]) /*_.VALDATA___V764*/ meltfptr[763] = (melt_ptr_t) sy_NLAMBDAB_DATAROUT; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING */ { melt_ptr_t sy_CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING = meltgc_named_symbol ("CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING", MELT_GET); if (sy_CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING && NULL == /*_.VALDATA___V766*/ meltfptr[765]) /*_.VALDATA___V766*/ meltfptr[765] = (melt_ptr_t) sy_CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING; } /*^getnamedsymbol */ /*getnamedsym:NINSTB_SLOTS */ { melt_ptr_t sy_NINSTB_SLOTS = meltgc_named_symbol ("NINSTB_SLOTS", MELT_GET); if (sy_NINSTB_SLOTS && NULL == /*_.VALDATA___V776*/ meltfptr[775]) /*_.VALDATA___V776*/ meltfptr[775] = (melt_ptr_t) sy_NINSTB_SLOTS; } /*^getnamedsymbol */ /*getnamedsym:NINSTB_CLABIND */ { melt_ptr_t sy_NINSTB_CLABIND = meltgc_named_symbol ("NINSTB_CLABIND", MELT_GET); if (sy_NINSTB_CLABIND && NULL == /*_.VALDATA___V778*/ meltfptr[777]) /*_.VALDATA___V778*/ meltfptr[777] = (melt_ptr_t) sy_NINSTB_CLABIND; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_ANYPROC */ { melt_ptr_t sy_CLASS_NREP_ANYPROC = meltgc_named_symbol ("CLASS_NREP_ANYPROC", MELT_GET); if (sy_CLASS_NREP_ANYPROC && NULL == /*_.VALDATA___V780*/ meltfptr[779]) /*_.VALDATA___V780*/ meltfptr[779] = (melt_ptr_t) sy_CLASS_NREP_ANYPROC; } /*^getnamedsymbol */ /*getnamedsym:NPROC_BODY */ { melt_ptr_t sy_NPROC_BODY = meltgc_named_symbol ("NPROC_BODY", MELT_GET); if (sy_NPROC_BODY && NULL == /*_.VALDATA___V788*/ meltfptr[787]) /*_.VALDATA___V788*/ meltfptr[787] = (melt_ptr_t) sy_NPROC_BODY; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_INITPROC */ { melt_ptr_t sy_CLASS_NREP_INITPROC = meltgc_named_symbol ("CLASS_NREP_INITPROC", MELT_GET); if (sy_CLASS_NREP_INITPROC && NULL == /*_.VALDATA___V790*/ meltfptr[789]) /*_.VALDATA___V790*/ meltfptr[789] = (melt_ptr_t) sy_CLASS_NREP_INITPROC; } /*^getnamedsymbol */ /*getnamedsym:NINIT_TOPL */ { melt_ptr_t sy_NINIT_TOPL = meltgc_named_symbol ("NINIT_TOPL", MELT_GET); if (sy_NINIT_TOPL && NULL == /*_.VALDATA___V800*/ meltfptr[799]) /*_.VALDATA___V800*/ meltfptr[799] = (melt_ptr_t) sy_NINIT_TOPL; } /*^getnamedsymbol */ /*getnamedsym:NINIT_DEFBINDS */ { melt_ptr_t sy_NINIT_DEFBINDS = meltgc_named_symbol ("NINIT_DEFBINDS", MELT_GET); if (sy_NINIT_DEFBINDS && NULL == /*_.VALDATA___V802*/ meltfptr[801]) /*_.VALDATA___V802*/ meltfptr[801] = (melt_ptr_t) sy_NINIT_DEFBINDS; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_INITEXTENDPROC */ { melt_ptr_t sy_CLASS_NREP_INITEXTENDPROC = meltgc_named_symbol ("CLASS_NREP_INITEXTENDPROC", MELT_GET); if (sy_CLASS_NREP_INITEXTENDPROC && NULL == /*_.VALDATA___V804*/ meltfptr[803]) /*_.VALDATA___V804*/ meltfptr[803] = (melt_ptr_t) sy_CLASS_NREP_INITEXTENDPROC; } /*^getnamedsymbol */ /*getnamedsym:NINITEXTEND_MODENV */ { melt_ptr_t sy_NINITEXTEND_MODENV = meltgc_named_symbol ("NINITEXTEND_MODENV", MELT_GET); if (sy_NINITEXTEND_MODENV && NULL == /*_.VALDATA___V812*/ meltfptr[811]) /*_.VALDATA___V812*/ meltfptr[811] = (melt_ptr_t) sy_NINITEXTEND_MODENV; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_ROUTPROC */ { melt_ptr_t sy_CLASS_NREP_ROUTPROC = meltgc_named_symbol ("CLASS_NREP_ROUTPROC", MELT_GET); if (sy_CLASS_NREP_ROUTPROC && NULL == /*_.VALDATA___V814*/ meltfptr[813]) /*_.VALDATA___V814*/ meltfptr[813] = (melt_ptr_t) sy_CLASS_NREP_ROUTPROC; } /*^getnamedsymbol */ /*getnamedsym:NRPRO_NAME */ { melt_ptr_t sy_NRPRO_NAME = meltgc_named_symbol ("NRPRO_NAME", MELT_GET); if (sy_NRPRO_NAME && NULL == /*_.VALDATA___V836*/ meltfptr[835]) /*_.VALDATA___V836*/ meltfptr[835] = (melt_ptr_t) sy_NRPRO_NAME; } /*^getnamedsymbol */ /*getnamedsym:NRPRO_ARGB */ { melt_ptr_t sy_NRPRO_ARGB = meltgc_named_symbol ("NRPRO_ARGB", MELT_GET); if (sy_NRPRO_ARGB && NULL == /*_.VALDATA___V838*/ meltfptr[837]) /*_.VALDATA___V838*/ meltfptr[837] = (melt_ptr_t) sy_NRPRO_ARGB; } /*^getnamedsymbol */ /*getnamedsym:NRPRO_CLOSEDB */ { melt_ptr_t sy_NRPRO_CLOSEDB = meltgc_named_symbol ("NRPRO_CLOSEDB", MELT_GET); if (sy_NRPRO_CLOSEDB && NULL == /*_.VALDATA___V840*/ meltfptr[839]) /*_.VALDATA___V840*/ meltfptr[839] = (melt_ptr_t) sy_NRPRO_CLOSEDB; } /*^getnamedsymbol */ /*getnamedsym:NRPRO_CONST */ { melt_ptr_t sy_NRPRO_CONST = meltgc_named_symbol ("NRPRO_CONST", MELT_GET); if (sy_NRPRO_CONST && NULL == /*_.VALDATA___V842*/ meltfptr[841]) /*_.VALDATA___V842*/ meltfptr[841] = (melt_ptr_t) sy_NRPRO_CONST; } /*^getnamedsymbol */ /*getnamedsym:NRPRO_DATAROUT */ { melt_ptr_t sy_NRPRO_DATAROUT = meltgc_named_symbol ("NRPRO_DATAROUT", MELT_GET); if (sy_NRPRO_DATAROUT && NULL == /*_.VALDATA___V844*/ meltfptr[843]) /*_.VALDATA___V844*/ meltfptr[843] = (melt_ptr_t) sy_NRPRO_DATAROUT; } /*^getnamedsymbol */ /*getnamedsym:NRPRO_DATACLOS */ { melt_ptr_t sy_NRPRO_DATACLOS = meltgc_named_symbol ("NRPRO_DATACLOS", MELT_GET); if (sy_NRPRO_DATACLOS && NULL == /*_.VALDATA___V846*/ meltfptr[845]) /*_.VALDATA___V846*/ meltfptr[845] = (melt_ptr_t) sy_NRPRO_DATACLOS; } /*^getnamedsymbol */ /*getnamedsym:NRPRO_THUNKLIST */ { melt_ptr_t sy_NRPRO_THUNKLIST = meltgc_named_symbol ("NRPRO_THUNKLIST", MELT_GET); if (sy_NRPRO_THUNKLIST && NULL == /*_.VALDATA___V848*/ meltfptr[847]) /*_.VALDATA___V848*/ meltfptr[847] = (melt_ptr_t) sy_NRPRO_THUNKLIST; } /*^getnamedsymbol */ /*getnamedsym:NRPRO_VARIADIC */ { melt_ptr_t sy_NRPRO_VARIADIC = meltgc_named_symbol ("NRPRO_VARIADIC", MELT_GET); if (sy_NRPRO_VARIADIC && NULL == /*_.VALDATA___V850*/ meltfptr[849]) /*_.VALDATA___V850*/ meltfptr[849] = (melt_ptr_t) sy_NRPRO_VARIADIC; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_LAMBDAROUTPROC */ { melt_ptr_t sy_CLASS_NREP_LAMBDAROUTPROC = meltgc_named_symbol ("CLASS_NREP_LAMBDAROUTPROC", MELT_GET); if (sy_CLASS_NREP_LAMBDAROUTPROC && NULL == /*_.VALDATA___V852*/ meltfptr[851]) /*_.VALDATA___V852*/ meltfptr[851] = (melt_ptr_t) sy_CLASS_NREP_LAMBDAROUTPROC; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_DEFUNROUTPROC */ { melt_ptr_t sy_CLASS_NREP_DEFUNROUTPROC = meltgc_named_symbol ("CLASS_NREP_DEFUNROUTPROC", MELT_GET); if (sy_CLASS_NREP_DEFUNROUTPROC && NULL == /*_.VALDATA___V858*/ meltfptr[857]) /*_.VALDATA___V858*/ meltfptr[857] = (melt_ptr_t) sy_CLASS_NREP_DEFUNROUTPROC; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_PREDEF */ { melt_ptr_t sy_CLASS_NREP_PREDEF = meltgc_named_symbol ("CLASS_NREP_PREDEF", MELT_GET); if (sy_CLASS_NREP_PREDEF && NULL == /*_.VALDATA___V864*/ meltfptr[863]) /*_.VALDATA___V864*/ meltfptr[863] = (melt_ptr_t) sy_CLASS_NREP_PREDEF; } /*^getnamedsymbol */ /*getnamedsym:NRPREDEF */ { melt_ptr_t sy_NRPREDEF = meltgc_named_symbol ("NRPREDEF", MELT_GET); if (sy_NRPREDEF && NULL == /*_.VALDATA___V872*/ meltfptr[871]) /*_.VALDATA___V872*/ meltfptr[871] = (melt_ptr_t) sy_NRPREDEF; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_NIL */ { melt_ptr_t sy_CLASS_NREP_NIL = meltgc_named_symbol ("CLASS_NREP_NIL", MELT_GET); if (sy_CLASS_NREP_NIL && NULL == /*_.VALDATA___V874*/ meltfptr[873]) /*_.VALDATA___V874*/ meltfptr[873] = (melt_ptr_t) sy_CLASS_NREP_NIL; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_QUASIDATA */ { melt_ptr_t sy_CLASS_NREP_QUASIDATA = meltgc_named_symbol ("CLASS_NREP_QUASIDATA", MELT_GET); if (sy_CLASS_NREP_QUASIDATA && NULL == /*_.VALDATA___V880*/ meltfptr[879]) /*_.VALDATA___V880*/ meltfptr[879] = (melt_ptr_t) sy_CLASS_NREP_QUASIDATA; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_BOUND_DATA */ { melt_ptr_t sy_CLASS_NREP_BOUND_DATA = meltgc_named_symbol ("CLASS_NREP_BOUND_DATA", MELT_GET); if (sy_CLASS_NREP_BOUND_DATA && NULL == /*_.VALDATA___V886*/ meltfptr[885]) /*_.VALDATA___V886*/ meltfptr[885] = (melt_ptr_t) sy_CLASS_NREP_BOUND_DATA; } /*^getnamedsymbol */ /*getnamedsym:NDATA_NAME */ { melt_ptr_t sy_NDATA_NAME = meltgc_named_symbol ("NDATA_NAME", MELT_GET); if (sy_NDATA_NAME && NULL == /*_.VALDATA___V898*/ meltfptr[897]) /*_.VALDATA___V898*/ meltfptr[897] = (melt_ptr_t) sy_NDATA_NAME; } /*^getnamedsymbol */ /*getnamedsym:NDATA_RANK */ { melt_ptr_t sy_NDATA_RANK = meltgc_named_symbol ("NDATA_RANK", MELT_GET); if (sy_NDATA_RANK && NULL == /*_.VALDATA___V900*/ meltfptr[899]) /*_.VALDATA___V900*/ meltfptr[899] = (melt_ptr_t) sy_NDATA_RANK; } /*^getnamedsymbol */ /*getnamedsym:NDATA_LOCBIND */ { melt_ptr_t sy_NDATA_LOCBIND = meltgc_named_symbol ("NDATA_LOCBIND", MELT_GET); if (sy_NDATA_LOCBIND && NULL == /*_.VALDATA___V902*/ meltfptr[901]) /*_.VALDATA___V902*/ meltfptr[901] = (melt_ptr_t) sy_NDATA_LOCBIND; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_DISCRIMINATED_DATA */ { melt_ptr_t sy_CLASS_NREP_DISCRIMINATED_DATA = meltgc_named_symbol ("CLASS_NREP_DISCRIMINATED_DATA", MELT_GET); if (sy_CLASS_NREP_DISCRIMINATED_DATA && NULL == /*_.VALDATA___V904*/ meltfptr[903]) /*_.VALDATA___V904*/ meltfptr[903] = (melt_ptr_t) sy_CLASS_NREP_DISCRIMINATED_DATA; } /*^getnamedsymbol */ /*getnamedsym:NDATA_DISCRX */ { melt_ptr_t sy_NDATA_DISCRX = meltgc_named_symbol ("NDATA_DISCRX", MELT_GET); if (sy_NDATA_DISCRX && NULL == /*_.VALDATA___V912*/ meltfptr[911]) /*_.VALDATA___V912*/ meltfptr[911] = (melt_ptr_t) sy_NDATA_DISCRX; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_DATAINSTANCE */ { melt_ptr_t sy_CLASS_NREP_DATAINSTANCE = meltgc_named_symbol ("CLASS_NREP_DATAINSTANCE", MELT_GET); if (sy_CLASS_NREP_DATAINSTANCE && NULL == /*_.VALDATA___V914*/ meltfptr[913]) /*_.VALDATA___V914*/ meltfptr[913] = (melt_ptr_t) sy_CLASS_NREP_DATAINSTANCE; } /*^getnamedsymbol */ /*getnamedsym:NINST_OBJNUM */ { melt_ptr_t sy_NINST_OBJNUM = meltgc_named_symbol ("NINST_OBJNUM", MELT_GET); if (sy_NINST_OBJNUM && NULL == /*_.VALDATA___V928*/ meltfptr[927]) /*_.VALDATA___V928*/ meltfptr[927] = (melt_ptr_t) sy_NINST_OBJNUM; } /*^getnamedsymbol */ /*getnamedsym:NINST_PREDEF */ { melt_ptr_t sy_NINST_PREDEF = meltgc_named_symbol ("NINST_PREDEF", MELT_GET); if (sy_NINST_PREDEF && NULL == /*_.VALDATA___V930*/ meltfptr[929]) /*_.VALDATA___V930*/ meltfptr[929] = (melt_ptr_t) sy_NINST_PREDEF; } /*^getnamedsymbol */ /*getnamedsym:NINST_HASH */ { melt_ptr_t sy_NINST_HASH = meltgc_named_symbol ("NINST_HASH", MELT_GET); if (sy_NINST_HASH && NULL == /*_.VALDATA___V932*/ meltfptr[931]) /*_.VALDATA___V932*/ meltfptr[931] = (melt_ptr_t) sy_NINST_HASH; } /*^getnamedsymbol */ /*getnamedsym:NINST_SLOTS */ { melt_ptr_t sy_NINST_SLOTS = meltgc_named_symbol ("NINST_SLOTS", MELT_GET); if (sy_NINST_SLOTS && NULL == /*_.VALDATA___V934*/ meltfptr[933]) /*_.VALDATA___V934*/ meltfptr[933] = (melt_ptr_t) sy_NINST_SLOTS; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_DATASTRING */ { melt_ptr_t sy_CLASS_NREP_DATASTRING = meltgc_named_symbol ("CLASS_NREP_DATASTRING", MELT_GET); if (sy_CLASS_NREP_DATASTRING && NULL == /*_.VALDATA___V936*/ meltfptr[935]) /*_.VALDATA___V936*/ meltfptr[935] = (melt_ptr_t) sy_CLASS_NREP_DATASTRING; } /*^getnamedsymbol */ /*getnamedsym:NSTR_STRING */ { melt_ptr_t sy_NSTR_STRING = meltgc_named_symbol ("NSTR_STRING", MELT_GET); if (sy_NSTR_STRING && NULL == /*_.VALDATA___V944*/ meltfptr[943]) /*_.VALDATA___V944*/ meltfptr[943] = (melt_ptr_t) sy_NSTR_STRING; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_DATABOXEDINTEGER */ { melt_ptr_t sy_CLASS_NREP_DATABOXEDINTEGER = meltgc_named_symbol ("CLASS_NREP_DATABOXEDINTEGER", MELT_GET); if (sy_CLASS_NREP_DATABOXEDINTEGER && NULL == /*_.VALDATA___V946*/ meltfptr[945]) /*_.VALDATA___V946*/ meltfptr[945] = (melt_ptr_t) sy_CLASS_NREP_DATABOXEDINTEGER; } /*^getnamedsymbol */ /*getnamedsym:NBOXINT_NUM */ { melt_ptr_t sy_NBOXINT_NUM = meltgc_named_symbol ("NBOXINT_NUM", MELT_GET); if (sy_NBOXINT_NUM && NULL == /*_.VALDATA___V954*/ meltfptr[953]) /*_.VALDATA___V954*/ meltfptr[953] = (melt_ptr_t) sy_NBOXINT_NUM; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_DATATUPLE */ { melt_ptr_t sy_CLASS_NREP_DATATUPLE = meltgc_named_symbol ("CLASS_NREP_DATATUPLE", MELT_GET); if (sy_CLASS_NREP_DATATUPLE && NULL == /*_.VALDATA___V956*/ meltfptr[955]) /*_.VALDATA___V956*/ meltfptr[955] = (melt_ptr_t) sy_CLASS_NREP_DATATUPLE; } /*^getnamedsymbol */ /*getnamedsym:NTUP_COMP */ { melt_ptr_t sy_NTUP_COMP = meltgc_named_symbol ("NTUP_COMP", MELT_GET); if (sy_NTUP_COMP && NULL == /*_.VALDATA___V964*/ meltfptr[963]) /*_.VALDATA___V964*/ meltfptr[963] = (melt_ptr_t) sy_NTUP_COMP; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_DATASYMBOL */ { melt_ptr_t sy_CLASS_NREP_DATASYMBOL = meltgc_named_symbol ("CLASS_NREP_DATASYMBOL", MELT_GET); if (sy_CLASS_NREP_DATASYMBOL && NULL == /*_.VALDATA___V966*/ meltfptr[965]) /*_.VALDATA___V966*/ meltfptr[965] = (melt_ptr_t) sy_CLASS_NREP_DATASYMBOL; } /*^getnamedsymbol */ /*getnamedsym:NDSY_NAMESTR */ { melt_ptr_t sy_NDSY_NAMESTR = meltgc_named_symbol ("NDSY_NAMESTR", MELT_GET); if (sy_NDSY_NAMESTR && NULL == /*_.VALDATA___V974*/ meltfptr[973]) /*_.VALDATA___V974*/ meltfptr[973] = (melt_ptr_t) sy_NDSY_NAMESTR; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_DATAKEYWORD */ { melt_ptr_t sy_CLASS_NREP_DATAKEYWORD = meltgc_named_symbol ("CLASS_NREP_DATAKEYWORD", MELT_GET); if (sy_CLASS_NREP_DATAKEYWORD && NULL == /*_.VALDATA___V976*/ meltfptr[975]) /*_.VALDATA___V976*/ meltfptr[975] = (melt_ptr_t) sy_CLASS_NREP_DATAKEYWORD; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_DATAROUTINE */ { melt_ptr_t sy_CLASS_NREP_DATAROUTINE = meltgc_named_symbol ("CLASS_NREP_DATAROUTINE", MELT_GET); if (sy_CLASS_NREP_DATAROUTINE && NULL == /*_.VALDATA___V982*/ meltfptr[981]) /*_.VALDATA___V982*/ meltfptr[981] = (melt_ptr_t) sy_CLASS_NREP_DATAROUTINE; } /*^getnamedsymbol */ /*getnamedsym:NDROU_PROC */ { melt_ptr_t sy_NDROU_PROC = meltgc_named_symbol ("NDROU_PROC", MELT_GET); if (sy_NDROU_PROC && NULL == /*_.VALDATA___V990*/ meltfptr[989]) /*_.VALDATA___V990*/ meltfptr[989] = (melt_ptr_t) sy_NDROU_PROC; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_DATACLOSURE */ { melt_ptr_t sy_CLASS_NREP_DATACLOSURE = meltgc_named_symbol ("CLASS_NREP_DATACLOSURE", MELT_GET); if (sy_CLASS_NREP_DATACLOSURE && NULL == /*_.VALDATA___V992*/ meltfptr[991]) /*_.VALDATA___V992*/ meltfptr[991] = (melt_ptr_t) sy_CLASS_NREP_DATACLOSURE; } /*^getnamedsymbol */ /*getnamedsym:NDCLO_PROC */ { melt_ptr_t sy_NDCLO_PROC = meltgc_named_symbol ("NDCLO_PROC", MELT_GET); if (sy_NDCLO_PROC && NULL == /*_.VALDATA___V1002*/ meltfptr[1001]) /*_.VALDATA___V1002*/ meltfptr[1001] = (melt_ptr_t) sy_NDCLO_PROC; } /*^getnamedsymbol */ /*getnamedsym:NDCLO_CLOSV */ { melt_ptr_t sy_NDCLO_CLOSV = meltgc_named_symbol ("NDCLO_CLOSV", MELT_GET); if (sy_NDCLO_CLOSV && NULL == /*_.VALDATA___V1004*/ meltfptr[1003]) /*_.VALDATA___V1004*/ meltfptr[1003] = (melt_ptr_t) sy_NDCLO_CLOSV; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_IMPORTEDVAL */ { melt_ptr_t sy_CLASS_NREP_IMPORTEDVAL = meltgc_named_symbol ("CLASS_NREP_IMPORTEDVAL", MELT_GET); if (sy_CLASS_NREP_IMPORTEDVAL && NULL == /*_.VALDATA___V1006*/ meltfptr[1005]) /*_.VALDATA___V1006*/ meltfptr[1005] = (melt_ptr_t) sy_CLASS_NREP_IMPORTEDVAL; } /*^getnamedsymbol */ /*getnamedsym:NIMPORT_SYMB */ { melt_ptr_t sy_NIMPORT_SYMB = meltgc_named_symbol ("NIMPORT_SYMB", MELT_GET); if (sy_NIMPORT_SYMB && NULL == /*_.VALDATA___V1016*/ meltfptr[1015]) /*_.VALDATA___V1016*/ meltfptr[1015] = (melt_ptr_t) sy_NIMPORT_SYMB; } /*^getnamedsymbol */ /*getnamedsym:NIMPORT_SYDATA */ { melt_ptr_t sy_NIMPORT_SYDATA = meltgc_named_symbol ("NIMPORT_SYDATA", MELT_GET); if (sy_NIMPORT_SYDATA && NULL == /*_.VALDATA___V1018*/ meltfptr[1017]) /*_.VALDATA___V1018*/ meltfptr[1017] = (melt_ptr_t) sy_NIMPORT_SYDATA; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_LITERALVALUE */ { melt_ptr_t sy_CLASS_NREP_LITERALVALUE = meltgc_named_symbol ("CLASS_NREP_LITERALVALUE", MELT_GET); if (sy_CLASS_NREP_LITERALVALUE && NULL == /*_.VALDATA___V1020*/ meltfptr[1019]) /*_.VALDATA___V1020*/ meltfptr[1019] = (melt_ptr_t) sy_CLASS_NREP_LITERALVALUE; } /*^getnamedsymbol */ /*getnamedsym:NLITVAL_REGVAL */ { melt_ptr_t sy_NLITVAL_REGVAL = meltgc_named_symbol ("NLITVAL_REGVAL", MELT_GET); if (sy_NLITVAL_REGVAL && NULL == /*_.VALDATA___V1028*/ meltfptr[1027]) /*_.VALDATA___V1028*/ meltfptr[1027] = (melt_ptr_t) sy_NLITVAL_REGVAL; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_LITERALNAMEDVALUE */ { melt_ptr_t sy_CLASS_NREP_LITERALNAMEDVALUE = meltgc_named_symbol ("CLASS_NREP_LITERALNAMEDVALUE", MELT_GET); if (sy_CLASS_NREP_LITERALNAMEDVALUE && NULL == /*_.VALDATA___V1030*/ meltfptr[1029]) /*_.VALDATA___V1030*/ meltfptr[1029] = (melt_ptr_t) sy_CLASS_NREP_LITERALNAMEDVALUE; } /*^getnamedsymbol */ /*getnamedsym:NLITVAL_SYMBOL */ { melt_ptr_t sy_NLITVAL_SYMBOL = meltgc_named_symbol ("NLITVAL_SYMBOL", MELT_GET); if (sy_NLITVAL_SYMBOL && NULL == /*_.VALDATA___V1038*/ meltfptr[1037]) /*_.VALDATA___V1038*/ meltfptr[1037] = (melt_ptr_t) sy_NLITVAL_SYMBOL; } /*^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___V1040*/ meltfptr[1039]) /*_.VALDATA___V1040*/ meltfptr[1039] = (melt_ptr_t) sy_CLASS_NREP_SYMOCC; } /*^getnamedsymbol */ /*getnamedsym:NOCC_SYMB */ { melt_ptr_t sy_NOCC_SYMB = meltgc_named_symbol ("NOCC_SYMB", MELT_GET); if (sy_NOCC_SYMB && NULL == /*_.VALDATA___V1052*/ meltfptr[1051]) /*_.VALDATA___V1052*/ meltfptr[1051] = (melt_ptr_t) sy_NOCC_SYMB; } /*^getnamedsymbol */ /*getnamedsym:NOCC_CTYP */ { melt_ptr_t sy_NOCC_CTYP = meltgc_named_symbol ("NOCC_CTYP", MELT_GET); if (sy_NOCC_CTYP && NULL == /*_.VALDATA___V1054*/ meltfptr[1053]) /*_.VALDATA___V1054*/ meltfptr[1053] = (melt_ptr_t) sy_NOCC_CTYP; } /*^getnamedsymbol */ /*getnamedsym:NOCC_BIND */ { melt_ptr_t sy_NOCC_BIND = meltgc_named_symbol ("NOCC_BIND", MELT_GET); if (sy_NOCC_BIND && NULL == /*_.VALDATA___V1056*/ meltfptr[1055]) /*_.VALDATA___V1056*/ meltfptr[1055] = (melt_ptr_t) sy_NOCC_BIND; } /*^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___V1058*/ meltfptr[1057]) /*_.VALDATA___V1058*/ meltfptr[1057] = (melt_ptr_t) sy_CLASS_NREP_LOCSYMOCC; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_CLOSEDOCC */ { melt_ptr_t sy_CLASS_NREP_CLOSEDOCC = meltgc_named_symbol ("CLASS_NREP_CLOSEDOCC", MELT_GET); if (sy_CLASS_NREP_CLOSEDOCC && NULL == /*_.VALDATA___V1064*/ meltfptr[1063]) /*_.VALDATA___V1064*/ meltfptr[1063] = (melt_ptr_t) sy_CLASS_NREP_CLOSEDOCC; } /*^getnamedsymbol */ /*getnamedsym:NCLOC_PROCS */ { melt_ptr_t sy_NCLOC_PROCS = meltgc_named_symbol ("NCLOC_PROCS", MELT_GET); if (sy_NCLOC_PROCS && NULL == /*_.VALDATA___V1072*/ meltfptr[1071]) /*_.VALDATA___V1072*/ meltfptr[1071] = (melt_ptr_t) sy_NCLOC_PROCS; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_CONSTOCC */ { melt_ptr_t sy_CLASS_NREP_CONSTOCC = meltgc_named_symbol ("CLASS_NREP_CONSTOCC", MELT_GET); if (sy_CLASS_NREP_CONSTOCC && NULL == /*_.VALDATA___V1074*/ meltfptr[1073]) /*_.VALDATA___V1074*/ meltfptr[1073] = (melt_ptr_t) sy_CLASS_NREP_CONSTOCC; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_QUASICONSTANT */ { melt_ptr_t sy_CLASS_NREP_QUASICONSTANT = meltgc_named_symbol ("CLASS_NREP_QUASICONSTANT", MELT_GET); if (sy_CLASS_NREP_QUASICONSTANT && NULL == /*_.VALDATA___V1080*/ meltfptr[1079]) /*_.VALDATA___V1080*/ meltfptr[1079] = (melt_ptr_t) sy_CLASS_NREP_QUASICONSTANT; } /*^getnamedsymbol */ /*getnamedsym:NCONST_SVAL */ { melt_ptr_t sy_NCONST_SVAL = meltgc_named_symbol ("NCONST_SVAL", MELT_GET); if (sy_NCONST_SVAL && NULL == /*_.VALDATA___V1092*/ meltfptr[1091]) /*_.VALDATA___V1092*/ meltfptr[1091] = (melt_ptr_t) sy_NCONST_SVAL; } /*^getnamedsymbol */ /*getnamedsym:NCONST_PROC */ { melt_ptr_t sy_NCONST_PROC = meltgc_named_symbol ("NCONST_PROC", MELT_GET); if (sy_NCONST_PROC && NULL == /*_.VALDATA___V1094*/ meltfptr[1093]) /*_.VALDATA___V1094*/ meltfptr[1093] = (melt_ptr_t) sy_NCONST_PROC; } /*^getnamedsymbol */ /*getnamedsym:NCONST_DATA */ { melt_ptr_t sy_NCONST_DATA = meltgc_named_symbol ("NCONST_DATA", MELT_GET); if (sy_NCONST_DATA && NULL == /*_.VALDATA___V1096*/ meltfptr[1095]) /*_.VALDATA___V1096*/ meltfptr[1095] = (melt_ptr_t) sy_NCONST_DATA; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_CONSTANT */ { melt_ptr_t sy_CLASS_NREP_CONSTANT = meltgc_named_symbol ("CLASS_NREP_CONSTANT", MELT_GET); if (sy_CLASS_NREP_CONSTANT && NULL == /*_.VALDATA___V1098*/ meltfptr[1097]) /*_.VALDATA___V1098*/ meltfptr[1097] = (melt_ptr_t) sy_CLASS_NREP_CONSTANT; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_DEFINED_CONSTANT */ { melt_ptr_t sy_CLASS_NREP_DEFINED_CONSTANT = meltgc_named_symbol ("CLASS_NREP_DEFINED_CONSTANT", MELT_GET); if (sy_CLASS_NREP_DEFINED_CONSTANT && NULL == /*_.VALDATA___V1104*/ meltfptr[1103]) /*_.VALDATA___V1104*/ meltfptr[1103] = (melt_ptr_t) sy_CLASS_NREP_DEFINED_CONSTANT; } /*^getnamedsymbol */ /*getnamedsym:NCONST_DEFBIND */ { melt_ptr_t sy_NCONST_DEFBIND = meltgc_named_symbol ("NCONST_DEFBIND", MELT_GET); if (sy_NCONST_DEFBIND && NULL == /*_.VALDATA___V1112*/ meltfptr[1111]) /*_.VALDATA___V1112*/ meltfptr[1111] = (melt_ptr_t) sy_NCONST_DEFBIND; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ { melt_ptr_t sy_CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER = meltgc_named_symbol ("CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER", MELT_GET); if (sy_CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER && NULL == /*_.VALDATA___V1114*/ meltfptr[1113]) /*_.VALDATA___V1114*/ meltfptr[1113] = (melt_ptr_t) sy_CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER; } /*^getnamedsymbol */ /*getnamedsym:NQCMEC_COMMENT */ { melt_ptr_t sy_NQCMEC_COMMENT = meltgc_named_symbol ("NQCMEC_COMMENT", MELT_GET); if (sy_NQCMEC_COMMENT && NULL == /*_.VALDATA___V1122*/ meltfptr[1121]) /*_.VALDATA___V1122*/ meltfptr[1121] = (melt_ptr_t) sy_NQCMEC_COMMENT; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ { melt_ptr_t sy_CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER = meltgc_named_symbol ("CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER", MELT_GET); if (sy_CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER && NULL == /*_.VALDATA___V1124*/ meltfptr[1123]) /*_.VALDATA___V1124*/ meltfptr[1123] = (melt_ptr_t) sy_CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT */ { melt_ptr_t sy_CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT = meltgc_named_symbol ("CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT", MELT_GET); if (sy_CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT && NULL == /*_.VALDATA___V1130*/ meltfptr[1129]) /*_.VALDATA___V1130*/ meltfptr[1129] = (melt_ptr_t) sy_CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT */ { melt_ptr_t sy_CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT = meltgc_named_symbol ("CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT", MELT_GET); if (sy_CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT && NULL == /*_.VALDATA___V1136*/ meltfptr[1135]) /*_.VALDATA___V1136*/ meltfptr[1135] = (melt_ptr_t) sy_CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_FIELDACC */ { melt_ptr_t sy_CLASS_NREP_FIELDACC = meltgc_named_symbol ("CLASS_NREP_FIELDACC", MELT_GET); if (sy_CLASS_NREP_FIELDACC && NULL == /*_.VALDATA___V1142*/ meltfptr[1141]) /*_.VALDATA___V1142*/ meltfptr[1141] = (melt_ptr_t) sy_CLASS_NREP_FIELDACC; } /*^getnamedsymbol */ /*getnamedsym:NACCF_OBJ */ { melt_ptr_t sy_NACCF_OBJ = meltgc_named_symbol ("NACCF_OBJ", MELT_GET); if (sy_NACCF_OBJ && NULL == /*_.VALDATA___V1152*/ meltfptr[1151]) /*_.VALDATA___V1152*/ meltfptr[1151] = (melt_ptr_t) sy_NACCF_OBJ; } /*^getnamedsymbol */ /*getnamedsym:NACCF_FLD */ { melt_ptr_t sy_NACCF_FLD = meltgc_named_symbol ("NACCF_FLD", MELT_GET); if (sy_NACCF_FLD && NULL == /*_.VALDATA___V1154*/ meltfptr[1153]) /*_.VALDATA___V1154*/ meltfptr[1153] = (melt_ptr_t) sy_NACCF_FLD; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_MULTACC */ { melt_ptr_t sy_CLASS_NREP_MULTACC = meltgc_named_symbol ("CLASS_NREP_MULTACC", MELT_GET); if (sy_CLASS_NREP_MULTACC && NULL == /*_.VALDATA___V1156*/ meltfptr[1155]) /*_.VALDATA___V1156*/ meltfptr[1155] = (melt_ptr_t) sy_CLASS_NREP_MULTACC; } /*^getnamedsymbol */ /*getnamedsym:NACCM_MUL */ { melt_ptr_t sy_NACCM_MUL = meltgc_named_symbol ("NACCM_MUL", MELT_GET); if (sy_NACCM_MUL && NULL == /*_.VALDATA___V1166*/ meltfptr[1165]) /*_.VALDATA___V1166*/ meltfptr[1165] = (melt_ptr_t) sy_NACCM_MUL; } /*^getnamedsymbol */ /*getnamedsym:NACCM_IX */ { melt_ptr_t sy_NACCM_IX = meltgc_named_symbol ("NACCM_IX", MELT_GET); if (sy_NACCM_IX && NULL == /*_.VALDATA___V1168*/ meltfptr[1167]) /*_.VALDATA___V1168*/ meltfptr[1167] = (melt_ptr_t) sy_NACCM_IX; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_STORE_PREDEFINED */ { melt_ptr_t sy_CLASS_NREP_STORE_PREDEFINED = meltgc_named_symbol ("CLASS_NREP_STORE_PREDEFINED", MELT_GET); if (sy_CLASS_NREP_STORE_PREDEFINED && NULL == /*_.VALDATA___V1170*/ meltfptr[1169]) /*_.VALDATA___V1170*/ meltfptr[1169] = (melt_ptr_t) sy_CLASS_NREP_STORE_PREDEFINED; } /*^getnamedsymbol */ /*getnamedsym:NSTPD_PREDEF */ { melt_ptr_t sy_NSTPD_PREDEF = meltgc_named_symbol ("NSTPD_PREDEF", MELT_GET); if (sy_NSTPD_PREDEF && NULL == /*_.VALDATA___V1180*/ meltfptr[1179]) /*_.VALDATA___V1180*/ meltfptr[1179] = (melt_ptr_t) sy_NSTPD_PREDEF; } /*^getnamedsymbol */ /*getnamedsym:NSTPD_VALUE */ { melt_ptr_t sy_NSTPD_VALUE = meltgc_named_symbol ("NSTPD_VALUE", MELT_GET); if (sy_NSTPD_VALUE && NULL == /*_.VALDATA___V1182*/ meltfptr[1181]) /*_.VALDATA___V1182*/ meltfptr[1181] = (melt_ptr_t) sy_NSTPD_VALUE; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ { melt_ptr_t sy_CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER = meltgc_named_symbol ("CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER", MELT_GET); if (sy_CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER && NULL == /*_.VALDATA___V1184*/ meltfptr[1183]) /*_.VALDATA___V1184*/ meltfptr[1183] = (melt_ptr_t) sy_CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER; } /*^getnamedsymbol */ /*getnamedsym:NUCMEB_EXPR */ { melt_ptr_t sy_NUCMEB_EXPR = meltgc_named_symbol ("NUCMEB_EXPR", MELT_GET); if (sy_NUCMEB_EXPR && NULL == /*_.VALDATA___V1194*/ meltfptr[1193]) /*_.VALDATA___V1194*/ meltfptr[1193] = (melt_ptr_t) sy_NUCMEB_EXPR; } /*^getnamedsymbol */ /*getnamedsym:NCUMEB_COMMENT */ { melt_ptr_t sy_NCUMEB_COMMENT = meltgc_named_symbol ("NCUMEB_COMMENT", MELT_GET); if (sy_NCUMEB_COMMENT && NULL == /*_.VALDATA___V1196*/ meltfptr[1195]) /*_.VALDATA___V1196*/ meltfptr[1195] = (melt_ptr_t) sy_NCUMEB_COMMENT; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER */ { melt_ptr_t sy_CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER = meltgc_named_symbol ("CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER", MELT_GET); if (sy_CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER && NULL == /*_.VALDATA___V1198*/ meltfptr[1197]) /*_.VALDATA___V1198*/ meltfptr[1197] = (melt_ptr_t) sy_CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER; } /*^getnamedsymbol */ /*getnamedsym:NCHRUMOD_COMMENT */ { melt_ptr_t sy_NCHRUMOD_COMMENT = meltgc_named_symbol ("NCHRUMOD_COMMENT", MELT_GET); if (sy_NCHRUMOD_COMMENT && NULL == /*_.VALDATA___V1206*/ meltfptr[1205]) /*_.VALDATA___V1206*/ meltfptr[1205] = (melt_ptr_t) sy_NCHRUMOD_COMMENT; } /*^getnamedsymbol */ /*getnamedsym:HAS_EXTRA_WARNINGS */ { melt_ptr_t sy_HAS_EXTRA_WARNINGS = meltgc_named_symbol ("HAS_EXTRA_WARNINGS", MELT_GET); if (sy_HAS_EXTRA_WARNINGS && NULL == /*_.VALDATA___V1208*/ meltfptr[1207]) /*_.VALDATA___V1208*/ meltfptr[1207] = (melt_ptr_t) sy_HAS_EXTRA_WARNINGS; } /*^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___V1217*/ meltfptr[1216]) /*_.VALDATA___V1217*/ meltfptr[1216] = (melt_ptr_t) sy_CLASS_NORMALIZATION_CONTEXT; } /*^getnamedsymbol */ /*getnamedsym:DISCR_INTEGER */ { melt_ptr_t sy_DISCR_INTEGER = meltgc_named_symbol ("DISCR_INTEGER", MELT_GET); if (sy_DISCR_INTEGER && NULL == /*_.VALDATA___V1219*/ meltfptr[1218]) /*_.VALDATA___V1219*/ meltfptr[1218] = (melt_ptr_t) sy_DISCR_INTEGER; } /*^getnamedsymbol */ /*getnamedsym:CLASS_ALARM_HANDLER */ { melt_ptr_t sy_CLASS_ALARM_HANDLER = meltgc_named_symbol ("CLASS_ALARM_HANDLER", MELT_GET); if (sy_CLASS_ALARM_HANDLER && NULL == /*_.VALDATA___V1222*/ meltfptr[1221]) /*_.VALDATA___V1222*/ meltfptr[1221] = (melt_ptr_t) sy_CLASS_ALARM_HANDLER; } /*^getnamedsymbol */ /*getnamedsym:CLASS_CHILD_PROCESS_HANDLER */ { melt_ptr_t sy_CLASS_CHILD_PROCESS_HANDLER = meltgc_named_symbol ("CLASS_CHILD_PROCESS_HANDLER", MELT_GET); if (sy_CLASS_CHILD_PROCESS_HANDLER && NULL == /*_.VALDATA___V1224*/ meltfptr[1223]) /*_.VALDATA___V1224*/ meltfptr[1223] = (melt_ptr_t) sy_CLASS_CHILD_PROCESS_HANDLER; } /*^getnamedsymbol */ /*getnamedsym:CLASS_CITERATOR */ { melt_ptr_t sy_CLASS_CITERATOR = meltgc_named_symbol ("CLASS_CITERATOR", MELT_GET); if (sy_CLASS_CITERATOR && NULL == /*_.VALDATA___V1226*/ meltfptr[1225]) /*_.VALDATA___V1226*/ meltfptr[1225] = (melt_ptr_t) sy_CLASS_CITERATOR; } /*^getnamedsymbol */ /*getnamedsym:CLASS_CLASS */ { melt_ptr_t sy_CLASS_CLASS = meltgc_named_symbol ("CLASS_CLASS", MELT_GET); if (sy_CLASS_CLASS && NULL == /*_.VALDATA___V1228*/ meltfptr[1227]) /*_.VALDATA___V1228*/ meltfptr[1227] = (melt_ptr_t) sy_CLASS_CLASS; } /*^getnamedsymbol */ /*getnamedsym:CLASS_CMATCHER */ { melt_ptr_t sy_CLASS_CMATCHER = meltgc_named_symbol ("CLASS_CMATCHER", MELT_GET); if (sy_CLASS_CMATCHER && NULL == /*_.VALDATA___V1230*/ meltfptr[1229]) /*_.VALDATA___V1230*/ meltfptr[1229] = (melt_ptr_t) sy_CLASS_CMATCHER; } /*^getnamedsymbol */ /*getnamedsym:CLASS_CTYPE */ { melt_ptr_t sy_CLASS_CTYPE = meltgc_named_symbol ("CLASS_CTYPE", MELT_GET); if (sy_CLASS_CTYPE && NULL == /*_.VALDATA___V1232*/ meltfptr[1231]) /*_.VALDATA___V1232*/ meltfptr[1231] = (melt_ptr_t) sy_CLASS_CTYPE; } /*^getnamedsymbol */ /*getnamedsym:CLASS_CTYPE_GTY */ { melt_ptr_t sy_CLASS_CTYPE_GTY = meltgc_named_symbol ("CLASS_CTYPE_GTY", MELT_GET); if (sy_CLASS_CTYPE_GTY && NULL == /*_.VALDATA___V1234*/ meltfptr[1233]) /*_.VALDATA___V1234*/ meltfptr[1233] = (melt_ptr_t) sy_CLASS_CTYPE_GTY; } /*^getnamedsymbol */ /*getnamedsym:CLASS_CTYPE_PLAIN */ { melt_ptr_t sy_CLASS_CTYPE_PLAIN = meltgc_named_symbol ("CLASS_CTYPE_PLAIN", MELT_GET); if (sy_CLASS_CTYPE_PLAIN && NULL == /*_.VALDATA___V1236*/ meltfptr[1235]) /*_.VALDATA___V1236*/ meltfptr[1235] = (melt_ptr_t) sy_CLASS_CTYPE_PLAIN; } /*^getnamedsymbol */ /*getnamedsym:CLASS_DISCRIMINANT */ { melt_ptr_t sy_CLASS_DISCRIMINANT = meltgc_named_symbol ("CLASS_DISCRIMINANT", MELT_GET); if (sy_CLASS_DISCRIMINANT && NULL == /*_.VALDATA___V1238*/ meltfptr[1237]) /*_.VALDATA___V1238*/ meltfptr[1237] = (melt_ptr_t) sy_CLASS_DISCRIMINANT; } /*^getnamedsymbol */ /*getnamedsym:CLASS_ENVIRONMENT */ { melt_ptr_t sy_CLASS_ENVIRONMENT = meltgc_named_symbol ("CLASS_ENVIRONMENT", MELT_GET); if (sy_CLASS_ENVIRONMENT && NULL == /*_.VALDATA___V1240*/ meltfptr[1239]) /*_.VALDATA___V1240*/ meltfptr[1239] = (melt_ptr_t) sy_CLASS_ENVIRONMENT; } /*^getnamedsymbol */ /*getnamedsym:CLASS_FIELD */ { melt_ptr_t sy_CLASS_FIELD = meltgc_named_symbol ("CLASS_FIELD", MELT_GET); if (sy_CLASS_FIELD && NULL == /*_.VALDATA___V1242*/ meltfptr[1241]) /*_.VALDATA___V1242*/ meltfptr[1241] = (melt_ptr_t) sy_CLASS_FIELD; } /*^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___V1244*/ meltfptr[1243]) /*_.VALDATA___V1244*/ meltfptr[1243] = (melt_ptr_t) sy_CLASS_FORMAL_BINDING; } /*^getnamedsymbol */ /*getnamedsym:CLASS_FUNMATCHER */ { melt_ptr_t sy_CLASS_FUNMATCHER = meltgc_named_symbol ("CLASS_FUNMATCHER", MELT_GET); if (sy_CLASS_FUNMATCHER && NULL == /*_.VALDATA___V1246*/ meltfptr[1245]) /*_.VALDATA___V1246*/ meltfptr[1245] = (melt_ptr_t) sy_CLASS_FUNMATCHER; } /*^getnamedsymbol */ /*getnamedsym:CLASS_GCC_GIMPLE_PASS */ { melt_ptr_t sy_CLASS_GCC_GIMPLE_PASS = meltgc_named_symbol ("CLASS_GCC_GIMPLE_PASS", MELT_GET); if (sy_CLASS_GCC_GIMPLE_PASS && NULL == /*_.VALDATA___V1248*/ meltfptr[1247]) /*_.VALDATA___V1248*/ meltfptr[1247] = (melt_ptr_t) sy_CLASS_GCC_GIMPLE_PASS; } /*^getnamedsymbol */ /*getnamedsym:CLASS_GCC_PASS */ { melt_ptr_t sy_CLASS_GCC_PASS = meltgc_named_symbol ("CLASS_GCC_PASS", MELT_GET); if (sy_CLASS_GCC_PASS && NULL == /*_.VALDATA___V1250*/ meltfptr[1249]) /*_.VALDATA___V1250*/ meltfptr[1249] = (melt_ptr_t) sy_CLASS_GCC_PASS; } /*^getnamedsymbol */ /*getnamedsym:CLASS_GCC_PRAGMA */ { melt_ptr_t sy_CLASS_GCC_PRAGMA = meltgc_named_symbol ("CLASS_GCC_PRAGMA", MELT_GET); if (sy_CLASS_GCC_PRAGMA && NULL == /*_.VALDATA___V1252*/ meltfptr[1251]) /*_.VALDATA___V1252*/ meltfptr[1251] = (melt_ptr_t) sy_CLASS_GCC_PRAGMA; } /*^getnamedsymbol */ /*getnamedsym:CLASS_GCC_RTL_PASS */ { melt_ptr_t sy_CLASS_GCC_RTL_PASS = meltgc_named_symbol ("CLASS_GCC_RTL_PASS", MELT_GET); if (sy_CLASS_GCC_RTL_PASS && NULL == /*_.VALDATA___V1254*/ meltfptr[1253]) /*_.VALDATA___V1254*/ meltfptr[1253] = (melt_ptr_t) sy_CLASS_GCC_RTL_PASS; } /*^getnamedsymbol */ /*getnamedsym:CLASS_GCC_SIMPLE_IPA_PASS */ { melt_ptr_t sy_CLASS_GCC_SIMPLE_IPA_PASS = meltgc_named_symbol ("CLASS_GCC_SIMPLE_IPA_PASS", MELT_GET); if (sy_CLASS_GCC_SIMPLE_IPA_PASS && NULL == /*_.VALDATA___V1256*/ meltfptr[1255]) /*_.VALDATA___V1256*/ meltfptr[1255] = (melt_ptr_t) sy_CLASS_GCC_SIMPLE_IPA_PASS; } /*^getnamedsymbol */ /*getnamedsym:CLASS_GCC_TRANSFORM_IPA_PASS */ { melt_ptr_t sy_CLASS_GCC_TRANSFORM_IPA_PASS = meltgc_named_symbol ("CLASS_GCC_TRANSFORM_IPA_PASS", MELT_GET); if (sy_CLASS_GCC_TRANSFORM_IPA_PASS && NULL == /*_.VALDATA___V1258*/ meltfptr[1257]) /*_.VALDATA___V1258*/ meltfptr[1257] = (melt_ptr_t) sy_CLASS_GCC_TRANSFORM_IPA_PASS; } /*^getnamedsymbol */ /*getnamedsym:CLASS_INPUT_CHANNEL_HANDLER */ { melt_ptr_t sy_CLASS_INPUT_CHANNEL_HANDLER = meltgc_named_symbol ("CLASS_INPUT_CHANNEL_HANDLER", MELT_GET); if (sy_CLASS_INPUT_CHANNEL_HANDLER && NULL == /*_.VALDATA___V1260*/ meltfptr[1259]) /*_.VALDATA___V1260*/ meltfptr[1259] = (melt_ptr_t) sy_CLASS_INPUT_CHANNEL_HANDLER; } /*^getnamedsymbol */ /*getnamedsym:CLASS_KEYWORD */ { melt_ptr_t sy_CLASS_KEYWORD = meltgc_named_symbol ("CLASS_KEYWORD", MELT_GET); if (sy_CLASS_KEYWORD && NULL == /*_.VALDATA___V1262*/ meltfptr[1261]) /*_.VALDATA___V1262*/ meltfptr[1261] = (melt_ptr_t) sy_CLASS_KEYWORD; } /*^getnamedsymbol */ /*getnamedsym:CLASS_LOCATED */ { melt_ptr_t sy_CLASS_LOCATED = meltgc_named_symbol ("CLASS_LOCATED", MELT_GET); if (sy_CLASS_LOCATED && NULL == /*_.VALDATA___V1264*/ meltfptr[1263]) /*_.VALDATA___V1264*/ meltfptr[1263] = (melt_ptr_t) sy_CLASS_LOCATED; } /*^getnamedsymbol */ /*getnamedsym:CLASS_MELT_MODE */ { melt_ptr_t sy_CLASS_MELT_MODE = meltgc_named_symbol ("CLASS_MELT_MODE", MELT_GET); if (sy_CLASS_MELT_MODE && NULL == /*_.VALDATA___V1266*/ meltfptr[1265]) /*_.VALDATA___V1266*/ meltfptr[1265] = (melt_ptr_t) sy_CLASS_MELT_MODE; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NAMED */ { melt_ptr_t sy_CLASS_NAMED = meltgc_named_symbol ("CLASS_NAMED", MELT_GET); if (sy_CLASS_NAMED && NULL == /*_.VALDATA___V1268*/ meltfptr[1267]) /*_.VALDATA___V1268*/ meltfptr[1267] = (melt_ptr_t) sy_CLASS_NAMED; } /*^getnamedsymbol */ /*getnamedsym:CLASS_PRIMITIVE */ { melt_ptr_t sy_CLASS_PRIMITIVE = meltgc_named_symbol ("CLASS_PRIMITIVE", MELT_GET); if (sy_CLASS_PRIMITIVE && NULL == /*_.VALDATA___V1270*/ meltfptr[1269]) /*_.VALDATA___V1270*/ meltfptr[1269] = (melt_ptr_t) sy_CLASS_PRIMITIVE; } /*^getnamedsymbol */ /*getnamedsym:CLASS_PROPED */ { melt_ptr_t sy_CLASS_PROPED = meltgc_named_symbol ("CLASS_PROPED", MELT_GET); if (sy_CLASS_PROPED && NULL == /*_.VALDATA___V1272*/ meltfptr[1271]) /*_.VALDATA___V1272*/ meltfptr[1271] = (melt_ptr_t) sy_CLASS_PROPED; } /*^getnamedsymbol */ /*getnamedsym:CLASS_REFERENCE */ { melt_ptr_t sy_CLASS_REFERENCE = meltgc_named_symbol ("CLASS_REFERENCE", MELT_GET); if (sy_CLASS_REFERENCE && NULL == /*_.VALDATA___V1274*/ meltfptr[1273]) /*_.VALDATA___V1274*/ meltfptr[1273] = (melt_ptr_t) sy_CLASS_REFERENCE; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SELECTOR */ { melt_ptr_t sy_CLASS_SELECTOR = meltgc_named_symbol ("CLASS_SELECTOR", MELT_GET); if (sy_CLASS_SELECTOR && NULL == /*_.VALDATA___V1276*/ meltfptr[1275]) /*_.VALDATA___V1276*/ meltfptr[1275] = (melt_ptr_t) sy_CLASS_SELECTOR; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SEXPR */ { melt_ptr_t sy_CLASS_SEXPR = meltgc_named_symbol ("CLASS_SEXPR", MELT_GET); if (sy_CLASS_SEXPR && NULL == /*_.VALDATA___V1278*/ meltfptr[1277]) /*_.VALDATA___V1278*/ meltfptr[1277] = (melt_ptr_t) sy_CLASS_SEXPR; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SEXPR_MACROSTRING */ { melt_ptr_t sy_CLASS_SEXPR_MACROSTRING = meltgc_named_symbol ("CLASS_SEXPR_MACROSTRING", MELT_GET); if (sy_CLASS_SEXPR_MACROSTRING && NULL == /*_.VALDATA___V1280*/ meltfptr[1279]) /*_.VALDATA___V1280*/ meltfptr[1279] = (melt_ptr_t) sy_CLASS_SEXPR_MACROSTRING; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SYMBOL */ { melt_ptr_t sy_CLASS_SYMBOL = meltgc_named_symbol ("CLASS_SYMBOL", MELT_GET); if (sy_CLASS_SYMBOL && NULL == /*_.VALDATA___V1282*/ meltfptr[1281]) /*_.VALDATA___V1282*/ meltfptr[1281] = (melt_ptr_t) sy_CLASS_SYMBOL; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SYSTEM_DATA */ { melt_ptr_t sy_CLASS_SYSTEM_DATA = meltgc_named_symbol ("CLASS_SYSTEM_DATA", MELT_GET); if (sy_CLASS_SYSTEM_DATA && NULL == /*_.VALDATA___V1284*/ meltfptr[1283]) /*_.VALDATA___V1284*/ meltfptr[1283] = (melt_ptr_t) sy_CLASS_SYSTEM_DATA; } /*^getnamedsymbol */ /*getnamedsym:CTYPE_BASIC_BLOCK */ { melt_ptr_t sy_CTYPE_BASIC_BLOCK = meltgc_named_symbol ("CTYPE_BASIC_BLOCK", MELT_GET); if (sy_CTYPE_BASIC_BLOCK && NULL == /*_.VALDATA___V1286*/ meltfptr[1285]) /*_.VALDATA___V1286*/ meltfptr[1285] = (melt_ptr_t) sy_CTYPE_BASIC_BLOCK; } /*^getnamedsymbol */ /*getnamedsym:CTYPE_BITMAP */ { melt_ptr_t sy_CTYPE_BITMAP = meltgc_named_symbol ("CTYPE_BITMAP", MELT_GET); if (sy_CTYPE_BITMAP && NULL == /*_.VALDATA___V1288*/ meltfptr[1287]) /*_.VALDATA___V1288*/ meltfptr[1287] = (melt_ptr_t) sy_CTYPE_BITMAP; } /*^getnamedsymbol */ /*getnamedsym:CTYPE_CSTRING */ { melt_ptr_t sy_CTYPE_CSTRING = meltgc_named_symbol ("CTYPE_CSTRING", MELT_GET); if (sy_CTYPE_CSTRING && NULL == /*_.VALDATA___V1290*/ meltfptr[1289]) /*_.VALDATA___V1290*/ meltfptr[1289] = (melt_ptr_t) sy_CTYPE_CSTRING; } /*^getnamedsymbol */ /*getnamedsym:CTYPE_EDGE */ { melt_ptr_t sy_CTYPE_EDGE = meltgc_named_symbol ("CTYPE_EDGE", MELT_GET); if (sy_CTYPE_EDGE && NULL == /*_.VALDATA___V1292*/ meltfptr[1291]) /*_.VALDATA___V1292*/ meltfptr[1291] = (melt_ptr_t) sy_CTYPE_EDGE; } /*^getnamedsymbol */ /*getnamedsym:CTYPE_GIMPLE */ { melt_ptr_t sy_CTYPE_GIMPLE = meltgc_named_symbol ("CTYPE_GIMPLE", MELT_GET); if (sy_CTYPE_GIMPLE && NULL == /*_.VALDATA___V1294*/ meltfptr[1293]) /*_.VALDATA___V1294*/ meltfptr[1293] = (melt_ptr_t) sy_CTYPE_GIMPLE; } /*^getnamedsymbol */ /*getnamedsym:CTYPE_GIMPLE_SEQ */ { melt_ptr_t sy_CTYPE_GIMPLE_SEQ = meltgc_named_symbol ("CTYPE_GIMPLE_SEQ", MELT_GET); if (sy_CTYPE_GIMPLE_SEQ && NULL == /*_.VALDATA___V1296*/ meltfptr[1295]) /*_.VALDATA___V1296*/ meltfptr[1295] = (melt_ptr_t) sy_CTYPE_GIMPLE_SEQ; } /*^getnamedsymbol */ /*getnamedsym:CTYPE_LONG */ { melt_ptr_t sy_CTYPE_LONG = meltgc_named_symbol ("CTYPE_LONG", MELT_GET); if (sy_CTYPE_LONG && NULL == /*_.VALDATA___V1298*/ meltfptr[1297]) /*_.VALDATA___V1298*/ meltfptr[1297] = (melt_ptr_t) sy_CTYPE_LONG; } /*^getnamedsymbol */ /*getnamedsym:CTYPE_LOOP */ { melt_ptr_t sy_CTYPE_LOOP = meltgc_named_symbol ("CTYPE_LOOP", MELT_GET); if (sy_CTYPE_LOOP && NULL == /*_.VALDATA___V1300*/ meltfptr[1299]) /*_.VALDATA___V1300*/ meltfptr[1299] = (melt_ptr_t) sy_CTYPE_LOOP; } /*^getnamedsymbol */ /*getnamedsym:CTYPE_PPL_COEFFICIENT */ { melt_ptr_t sy_CTYPE_PPL_COEFFICIENT = meltgc_named_symbol ("CTYPE_PPL_COEFFICIENT", MELT_GET); if (sy_CTYPE_PPL_COEFFICIENT && NULL == /*_.VALDATA___V1302*/ meltfptr[1301]) /*_.VALDATA___V1302*/ meltfptr[1301] = (melt_ptr_t) sy_CTYPE_PPL_COEFFICIENT; } /*^getnamedsymbol */ /*getnamedsym:CTYPE_PPL_CONSTRAINT */ { melt_ptr_t sy_CTYPE_PPL_CONSTRAINT = meltgc_named_symbol ("CTYPE_PPL_CONSTRAINT", MELT_GET); if (sy_CTYPE_PPL_CONSTRAINT && NULL == /*_.VALDATA___V1304*/ meltfptr[1303]) /*_.VALDATA___V1304*/ meltfptr[1303] = (melt_ptr_t) sy_CTYPE_PPL_CONSTRAINT; } /*^getnamedsymbol */ /*getnamedsym:CTYPE_PPL_CONSTRAINT_SYSTEM */ { melt_ptr_t sy_CTYPE_PPL_CONSTRAINT_SYSTEM = meltgc_named_symbol ("CTYPE_PPL_CONSTRAINT_SYSTEM", MELT_GET); if (sy_CTYPE_PPL_CONSTRAINT_SYSTEM && NULL == /*_.VALDATA___V1306*/ meltfptr[1305]) /*_.VALDATA___V1306*/ meltfptr[1305] = (melt_ptr_t) sy_CTYPE_PPL_CONSTRAINT_SYSTEM; } /*^getnamedsymbol */ /*getnamedsym:CTYPE_PPL_GENERATOR */ { melt_ptr_t sy_CTYPE_PPL_GENERATOR = meltgc_named_symbol ("CTYPE_PPL_GENERATOR", MELT_GET); if (sy_CTYPE_PPL_GENERATOR && NULL == /*_.VALDATA___V1308*/ meltfptr[1307]) /*_.VALDATA___V1308*/ meltfptr[1307] = (melt_ptr_t) sy_CTYPE_PPL_GENERATOR; } /*^getnamedsymbol */ /*getnamedsym:CTYPE_PPL_GENERATOR_SYSTEM */ { melt_ptr_t sy_CTYPE_PPL_GENERATOR_SYSTEM = meltgc_named_symbol ("CTYPE_PPL_GENERATOR_SYSTEM", MELT_GET); if (sy_CTYPE_PPL_GENERATOR_SYSTEM && NULL == /*_.VALDATA___V1310*/ meltfptr[1309]) /*_.VALDATA___V1310*/ meltfptr[1309] = (melt_ptr_t) sy_CTYPE_PPL_GENERATOR_SYSTEM; } /*^getnamedsymbol */ /*getnamedsym:CTYPE_PPL_LINEAR_EXPRESSION */ { melt_ptr_t sy_CTYPE_PPL_LINEAR_EXPRESSION = meltgc_named_symbol ("CTYPE_PPL_LINEAR_EXPRESSION", MELT_GET); if (sy_CTYPE_PPL_LINEAR_EXPRESSION && NULL == /*_.VALDATA___V1312*/ meltfptr[1311]) /*_.VALDATA___V1312*/ meltfptr[1311] = (melt_ptr_t) sy_CTYPE_PPL_LINEAR_EXPRESSION; } /*^getnamedsymbol */ /*getnamedsym:CTYPE_PPL_POLYHEDRON */ { melt_ptr_t sy_CTYPE_PPL_POLYHEDRON = meltgc_named_symbol ("CTYPE_PPL_POLYHEDRON", MELT_GET); if (sy_CTYPE_PPL_POLYHEDRON && NULL == /*_.VALDATA___V1314*/ meltfptr[1313]) /*_.VALDATA___V1314*/ meltfptr[1313] = (melt_ptr_t) sy_CTYPE_PPL_POLYHEDRON; } /*^getnamedsymbol */ /*getnamedsym:CTYPE_RTVEC */ { melt_ptr_t sy_CTYPE_RTVEC = meltgc_named_symbol ("CTYPE_RTVEC", MELT_GET); if (sy_CTYPE_RTVEC && NULL == /*_.VALDATA___V1316*/ meltfptr[1315]) /*_.VALDATA___V1316*/ meltfptr[1315] = (melt_ptr_t) sy_CTYPE_RTVEC; } /*^getnamedsymbol */ /*getnamedsym:CTYPE_RTX */ { melt_ptr_t sy_CTYPE_RTX = meltgc_named_symbol ("CTYPE_RTX", MELT_GET); if (sy_CTYPE_RTX && NULL == /*_.VALDATA___V1318*/ meltfptr[1317]) /*_.VALDATA___V1318*/ meltfptr[1317] = (melt_ptr_t) sy_CTYPE_RTX; } /*^getnamedsymbol */ /*getnamedsym:CTYPE_TREE */ { melt_ptr_t sy_CTYPE_TREE = meltgc_named_symbol ("CTYPE_TREE", MELT_GET); if (sy_CTYPE_TREE && NULL == /*_.VALDATA___V1320*/ meltfptr[1319]) /*_.VALDATA___V1320*/ meltfptr[1319] = (melt_ptr_t) sy_CTYPE_TREE; } /*^getnamedsymbol */ /*getnamedsym:CTYPE_VALUE */ { melt_ptr_t sy_CTYPE_VALUE = meltgc_named_symbol ("CTYPE_VALUE", MELT_GET); if (sy_CTYPE_VALUE && NULL == /*_.VALDATA___V1322*/ meltfptr[1321]) /*_.VALDATA___V1322*/ meltfptr[1321] = (melt_ptr_t) sy_CTYPE_VALUE; } /*^getnamedsymbol */ /*getnamedsym:CTYPE_VOID */ { melt_ptr_t sy_CTYPE_VOID = meltgc_named_symbol ("CTYPE_VOID", MELT_GET); if (sy_CTYPE_VOID && NULL == /*_.VALDATA___V1324*/ meltfptr[1323]) /*_.VALDATA___V1324*/ meltfptr[1323] = (melt_ptr_t) sy_CTYPE_VOID; } /*^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___V1326*/ meltfptr[1325]) /*_.VALDATA___V1326*/ meltfptr[1325] = (melt_ptr_t) sy_DISCR_ANY_RECEIVER; } /*^getnamedsymbol */ /*getnamedsym:DISCR_BASIC_BLOCK */ { melt_ptr_t sy_DISCR_BASIC_BLOCK = meltgc_named_symbol ("DISCR_BASIC_BLOCK", MELT_GET); if (sy_DISCR_BASIC_BLOCK && NULL == /*_.VALDATA___V1328*/ meltfptr[1327]) /*_.VALDATA___V1328*/ meltfptr[1327] = (melt_ptr_t) sy_DISCR_BASIC_BLOCK; } /*^getnamedsymbol */ /*getnamedsym:DISCR_BITMAP */ { melt_ptr_t sy_DISCR_BITMAP = meltgc_named_symbol ("DISCR_BITMAP", MELT_GET); if (sy_DISCR_BITMAP && NULL == /*_.VALDATA___V1330*/ meltfptr[1329]) /*_.VALDATA___V1330*/ meltfptr[1329] = (melt_ptr_t) sy_DISCR_BITMAP; } /*^getnamedsymbol */ /*getnamedsym:DISCR_BUCKET_LONGS */ { melt_ptr_t sy_DISCR_BUCKET_LONGS = meltgc_named_symbol ("DISCR_BUCKET_LONGS", MELT_GET); if (sy_DISCR_BUCKET_LONGS && NULL == /*_.VALDATA___V1332*/ meltfptr[1331]) /*_.VALDATA___V1332*/ meltfptr[1331] = (melt_ptr_t) sy_DISCR_BUCKET_LONGS; } /*^getnamedsymbol */ /*getnamedsym:DISCR_CHARACTER_INTEGER */ { melt_ptr_t sy_DISCR_CHARACTER_INTEGER = meltgc_named_symbol ("DISCR_CHARACTER_INTEGER", MELT_GET); if (sy_DISCR_CHARACTER_INTEGER && NULL == /*_.VALDATA___V1334*/ meltfptr[1333]) /*_.VALDATA___V1334*/ meltfptr[1333] = (melt_ptr_t) sy_DISCR_CHARACTER_INTEGER; } /*^getnamedsymbol */ /*getnamedsym:DISCR_CLASS_SEQUENCE */ { melt_ptr_t sy_DISCR_CLASS_SEQUENCE = meltgc_named_symbol ("DISCR_CLASS_SEQUENCE", MELT_GET); if (sy_DISCR_CLASS_SEQUENCE && NULL == /*_.VALDATA___V1336*/ meltfptr[1335]) /*_.VALDATA___V1336*/ meltfptr[1335] = (melt_ptr_t) sy_DISCR_CLASS_SEQUENCE; } /*^getnamedsymbol */ /*getnamedsym:DISCR_CLOSURE */ { melt_ptr_t sy_DISCR_CLOSURE = meltgc_named_symbol ("DISCR_CLOSURE", MELT_GET); if (sy_DISCR_CLOSURE && NULL == /*_.VALDATA___V1338*/ meltfptr[1337]) /*_.VALDATA___V1338*/ meltfptr[1337] = (melt_ptr_t) sy_DISCR_CLOSURE; } /*^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___V1340*/ meltfptr[1339]) /*_.VALDATA___V1340*/ meltfptr[1339] = (melt_ptr_t) sy_DISCR_CONSTANT_INTEGER; } /*^getnamedsymbol */ /*getnamedsym:DISCR_EDGE */ { melt_ptr_t sy_DISCR_EDGE = meltgc_named_symbol ("DISCR_EDGE", MELT_GET); if (sy_DISCR_EDGE && NULL == /*_.VALDATA___V1342*/ meltfptr[1341]) /*_.VALDATA___V1342*/ meltfptr[1341] = (melt_ptr_t) sy_DISCR_EDGE; } /*^getnamedsymbol */ /*getnamedsym:DISCR_FIELD_SEQUENCE */ { melt_ptr_t sy_DISCR_FIELD_SEQUENCE = meltgc_named_symbol ("DISCR_FIELD_SEQUENCE", MELT_GET); if (sy_DISCR_FIELD_SEQUENCE && NULL == /*_.VALDATA___V1344*/ meltfptr[1343]) /*_.VALDATA___V1344*/ meltfptr[1343] = (melt_ptr_t) sy_DISCR_FIELD_SEQUENCE; } /*^getnamedsymbol */ /*getnamedsym:DISCR_FILE */ { melt_ptr_t sy_DISCR_FILE = meltgc_named_symbol ("DISCR_FILE", MELT_GET); if (sy_DISCR_FILE && NULL == /*_.VALDATA___V1346*/ meltfptr[1345]) /*_.VALDATA___V1346*/ meltfptr[1345] = (melt_ptr_t) sy_DISCR_FILE; } /*^getnamedsymbol */ /*getnamedsym:DISCR_GIMPLE */ { melt_ptr_t sy_DISCR_GIMPLE = meltgc_named_symbol ("DISCR_GIMPLE", MELT_GET); if (sy_DISCR_GIMPLE && NULL == /*_.VALDATA___V1348*/ meltfptr[1347]) /*_.VALDATA___V1348*/ meltfptr[1347] = (melt_ptr_t) sy_DISCR_GIMPLE; } /*^getnamedsymbol */ /*getnamedsym:DISCR_GIMPLE_SEQ */ { melt_ptr_t sy_DISCR_GIMPLE_SEQ = meltgc_named_symbol ("DISCR_GIMPLE_SEQ", MELT_GET); if (sy_DISCR_GIMPLE_SEQ && NULL == /*_.VALDATA___V1350*/ meltfptr[1349]) /*_.VALDATA___V1350*/ meltfptr[1349] = (melt_ptr_t) sy_DISCR_GIMPLE_SEQ; } /*^getnamedsymbol */ /*getnamedsym:DISCR_LIST */ { melt_ptr_t sy_DISCR_LIST = meltgc_named_symbol ("DISCR_LIST", MELT_GET); if (sy_DISCR_LIST && NULL == /*_.VALDATA___V1352*/ meltfptr[1351]) /*_.VALDATA___V1352*/ meltfptr[1351] = (melt_ptr_t) sy_DISCR_LIST; } /*^getnamedsymbol */ /*getnamedsym:DISCR_LOOP */ { melt_ptr_t sy_DISCR_LOOP = meltgc_named_symbol ("DISCR_LOOP", MELT_GET); if (sy_DISCR_LOOP && NULL == /*_.VALDATA___V1354*/ meltfptr[1353]) /*_.VALDATA___V1354*/ meltfptr[1353] = (melt_ptr_t) sy_DISCR_LOOP; } /*^getnamedsymbol */ /*getnamedsym:DISCR_MAP_BASIC_BLOCKS */ { melt_ptr_t sy_DISCR_MAP_BASIC_BLOCKS = meltgc_named_symbol ("DISCR_MAP_BASIC_BLOCKS", MELT_GET); if (sy_DISCR_MAP_BASIC_BLOCKS && NULL == /*_.VALDATA___V1356*/ meltfptr[1355]) /*_.VALDATA___V1356*/ meltfptr[1355] = (melt_ptr_t) sy_DISCR_MAP_BASIC_BLOCKS; } /*^getnamedsymbol */ /*getnamedsym:DISCR_MAP_BITMAPS */ { melt_ptr_t sy_DISCR_MAP_BITMAPS = meltgc_named_symbol ("DISCR_MAP_BITMAPS", MELT_GET); if (sy_DISCR_MAP_BITMAPS && NULL == /*_.VALDATA___V1358*/ meltfptr[1357]) /*_.VALDATA___V1358*/ meltfptr[1357] = (melt_ptr_t) sy_DISCR_MAP_BITMAPS; } /*^getnamedsymbol */ /*getnamedsym:DISCR_MAP_EDGES */ { melt_ptr_t sy_DISCR_MAP_EDGES = meltgc_named_symbol ("DISCR_MAP_EDGES", MELT_GET); if (sy_DISCR_MAP_EDGES && NULL == /*_.VALDATA___V1360*/ meltfptr[1359]) /*_.VALDATA___V1360*/ meltfptr[1359] = (melt_ptr_t) sy_DISCR_MAP_EDGES; } /*^getnamedsymbol */ /*getnamedsym:DISCR_MAP_GIMPLES */ { melt_ptr_t sy_DISCR_MAP_GIMPLES = meltgc_named_symbol ("DISCR_MAP_GIMPLES", MELT_GET); if (sy_DISCR_MAP_GIMPLES && NULL == /*_.VALDATA___V1362*/ meltfptr[1361]) /*_.VALDATA___V1362*/ meltfptr[1361] = (melt_ptr_t) sy_DISCR_MAP_GIMPLES; } /*^getnamedsymbol */ /*getnamedsym:DISCR_MAP_GIMPLE_SEQS */ { melt_ptr_t sy_DISCR_MAP_GIMPLE_SEQS = meltgc_named_symbol ("DISCR_MAP_GIMPLE_SEQS", MELT_GET); if (sy_DISCR_MAP_GIMPLE_SEQS && NULL == /*_.VALDATA___V1364*/ meltfptr[1363]) /*_.VALDATA___V1364*/ meltfptr[1363] = (melt_ptr_t) sy_DISCR_MAP_GIMPLE_SEQS; } /*^getnamedsymbol */ /*getnamedsym:DISCR_MAP_LOOPS */ { melt_ptr_t sy_DISCR_MAP_LOOPS = meltgc_named_symbol ("DISCR_MAP_LOOPS", MELT_GET); if (sy_DISCR_MAP_LOOPS && NULL == /*_.VALDATA___V1366*/ meltfptr[1365]) /*_.VALDATA___V1366*/ meltfptr[1365] = (melt_ptr_t) sy_DISCR_MAP_LOOPS; } /*^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___V1368*/ meltfptr[1367]) /*_.VALDATA___V1368*/ meltfptr[1367] = (melt_ptr_t) sy_DISCR_MAP_OBJECTS; } /*^getnamedsymbol */ /*getnamedsym:DISCR_MAP_RTVECS */ { melt_ptr_t sy_DISCR_MAP_RTVECS = meltgc_named_symbol ("DISCR_MAP_RTVECS", MELT_GET); if (sy_DISCR_MAP_RTVECS && NULL == /*_.VALDATA___V1370*/ meltfptr[1369]) /*_.VALDATA___V1370*/ meltfptr[1369] = (melt_ptr_t) sy_DISCR_MAP_RTVECS; } /*^getnamedsymbol */ /*getnamedsym:DISCR_MAP_RTXS */ { melt_ptr_t sy_DISCR_MAP_RTXS = meltgc_named_symbol ("DISCR_MAP_RTXS", MELT_GET); if (sy_DISCR_MAP_RTXS && NULL == /*_.VALDATA___V1372*/ meltfptr[1371]) /*_.VALDATA___V1372*/ meltfptr[1371] = (melt_ptr_t) sy_DISCR_MAP_RTXS; } /*^getnamedsymbol */ /*getnamedsym:DISCR_MAP_STRINGS */ { melt_ptr_t sy_DISCR_MAP_STRINGS = meltgc_named_symbol ("DISCR_MAP_STRINGS", MELT_GET); if (sy_DISCR_MAP_STRINGS && NULL == /*_.VALDATA___V1374*/ meltfptr[1373]) /*_.VALDATA___V1374*/ meltfptr[1373] = (melt_ptr_t) sy_DISCR_MAP_STRINGS; } /*^getnamedsymbol */ /*getnamedsym:DISCR_MAP_TREES */ { melt_ptr_t sy_DISCR_MAP_TREES = meltgc_named_symbol ("DISCR_MAP_TREES", MELT_GET); if (sy_DISCR_MAP_TREES && NULL == /*_.VALDATA___V1376*/ meltfptr[1375]) /*_.VALDATA___V1376*/ meltfptr[1375] = (melt_ptr_t) sy_DISCR_MAP_TREES; } /*^getnamedsymbol */ /*getnamedsym:DISCR_METHOD_MAP */ { melt_ptr_t sy_DISCR_METHOD_MAP = meltgc_named_symbol ("DISCR_METHOD_MAP", MELT_GET); if (sy_DISCR_METHOD_MAP && NULL == /*_.VALDATA___V1378*/ meltfptr[1377]) /*_.VALDATA___V1378*/ meltfptr[1377] = (melt_ptr_t) sy_DISCR_METHOD_MAP; } /*^getnamedsymbol */ /*getnamedsym:DISCR_MIXED_BIGINT */ { melt_ptr_t sy_DISCR_MIXED_BIGINT = meltgc_named_symbol ("DISCR_MIXED_BIGINT", MELT_GET); if (sy_DISCR_MIXED_BIGINT && NULL == /*_.VALDATA___V1380*/ meltfptr[1379]) /*_.VALDATA___V1380*/ meltfptr[1379] = (melt_ptr_t) sy_DISCR_MIXED_BIGINT; } /*^getnamedsymbol */ /*getnamedsym:DISCR_MIXED_INTEGER */ { melt_ptr_t sy_DISCR_MIXED_INTEGER = meltgc_named_symbol ("DISCR_MIXED_INTEGER", MELT_GET); if (sy_DISCR_MIXED_INTEGER && NULL == /*_.VALDATA___V1382*/ meltfptr[1381]) /*_.VALDATA___V1382*/ meltfptr[1381] = (melt_ptr_t) sy_DISCR_MIXED_INTEGER; } /*^getnamedsymbol */ /*getnamedsym:DISCR_MIXED_LOCATION */ { melt_ptr_t sy_DISCR_MIXED_LOCATION = meltgc_named_symbol ("DISCR_MIXED_LOCATION", MELT_GET); if (sy_DISCR_MIXED_LOCATION && NULL == /*_.VALDATA___V1384*/ meltfptr[1383]) /*_.VALDATA___V1384*/ meltfptr[1383] = (melt_ptr_t) sy_DISCR_MIXED_LOCATION; } /*^getnamedsymbol */ /*getnamedsym:DISCR_MULTIPLE */ { melt_ptr_t sy_DISCR_MULTIPLE = meltgc_named_symbol ("DISCR_MULTIPLE", MELT_GET); if (sy_DISCR_MULTIPLE && NULL == /*_.VALDATA___V1386*/ meltfptr[1385]) /*_.VALDATA___V1386*/ meltfptr[1385] = (melt_ptr_t) sy_DISCR_MULTIPLE; } /*^getnamedsymbol */ /*getnamedsym:DISCR_NAME_STRING */ { melt_ptr_t sy_DISCR_NAME_STRING = meltgc_named_symbol ("DISCR_NAME_STRING", MELT_GET); if (sy_DISCR_NAME_STRING && NULL == /*_.VALDATA___V1388*/ meltfptr[1387]) /*_.VALDATA___V1388*/ meltfptr[1387] = (melt_ptr_t) sy_DISCR_NAME_STRING; } /*^getnamedsymbol */ /*getnamedsym:DISCR_NULL_RECEIVER */ { melt_ptr_t sy_DISCR_NULL_RECEIVER = meltgc_named_symbol ("DISCR_NULL_RECEIVER", MELT_GET); if (sy_DISCR_NULL_RECEIVER && NULL == /*_.VALDATA___V1390*/ meltfptr[1389]) /*_.VALDATA___V1390*/ meltfptr[1389] = (melt_ptr_t) sy_DISCR_NULL_RECEIVER; } /*^getnamedsymbol */ /*getnamedsym:DISCR_PAIR */ { melt_ptr_t sy_DISCR_PAIR = meltgc_named_symbol ("DISCR_PAIR", MELT_GET); if (sy_DISCR_PAIR && NULL == /*_.VALDATA___V1392*/ meltfptr[1391]) /*_.VALDATA___V1392*/ meltfptr[1391] = (melt_ptr_t) sy_DISCR_PAIR; } /*^getnamedsymbol */ /*getnamedsym:DISCR_RAWFILE */ { melt_ptr_t sy_DISCR_RAWFILE = meltgc_named_symbol ("DISCR_RAWFILE", MELT_GET); if (sy_DISCR_RAWFILE && NULL == /*_.VALDATA___V1394*/ meltfptr[1393]) /*_.VALDATA___V1394*/ meltfptr[1393] = (melt_ptr_t) sy_DISCR_RAWFILE; } /*^getnamedsymbol */ /*getnamedsym:DISCR_REAL */ { melt_ptr_t sy_DISCR_REAL = meltgc_named_symbol ("DISCR_REAL", MELT_GET); if (sy_DISCR_REAL && NULL == /*_.VALDATA___V1396*/ meltfptr[1395]) /*_.VALDATA___V1396*/ meltfptr[1395] = (melt_ptr_t) sy_DISCR_REAL; } /*^getnamedsymbol */ /*getnamedsym:DISCR_ROUTINE */ { melt_ptr_t sy_DISCR_ROUTINE = meltgc_named_symbol ("DISCR_ROUTINE", MELT_GET); if (sy_DISCR_ROUTINE && NULL == /*_.VALDATA___V1398*/ meltfptr[1397]) /*_.VALDATA___V1398*/ meltfptr[1397] = (melt_ptr_t) sy_DISCR_ROUTINE; } /*^getnamedsymbol */ /*getnamedsym:DISCR_RTVEC */ { melt_ptr_t sy_DISCR_RTVEC = meltgc_named_symbol ("DISCR_RTVEC", MELT_GET); if (sy_DISCR_RTVEC && NULL == /*_.VALDATA___V1400*/ meltfptr[1399]) /*_.VALDATA___V1400*/ meltfptr[1399] = (melt_ptr_t) sy_DISCR_RTVEC; } /*^getnamedsymbol */ /*getnamedsym:DISCR_RTX */ { melt_ptr_t sy_DISCR_RTX = meltgc_named_symbol ("DISCR_RTX", MELT_GET); if (sy_DISCR_RTX && NULL == /*_.VALDATA___V1402*/ meltfptr[1401]) /*_.VALDATA___V1402*/ meltfptr[1401] = (melt_ptr_t) sy_DISCR_RTX; } /*^getnamedsymbol */ /*getnamedsym:DISCR_STRBUF */ { melt_ptr_t sy_DISCR_STRBUF = meltgc_named_symbol ("DISCR_STRBUF", MELT_GET); if (sy_DISCR_STRBUF && NULL == /*_.VALDATA___V1404*/ meltfptr[1403]) /*_.VALDATA___V1404*/ meltfptr[1403] = (melt_ptr_t) sy_DISCR_STRBUF; } /*^getnamedsymbol */ /*getnamedsym:DISCR_STRING */ { melt_ptr_t sy_DISCR_STRING = meltgc_named_symbol ("DISCR_STRING", MELT_GET); if (sy_DISCR_STRING && NULL == /*_.VALDATA___V1406*/ meltfptr[1405]) /*_.VALDATA___V1406*/ meltfptr[1405] = (melt_ptr_t) sy_DISCR_STRING; } /*^getnamedsymbol */ /*getnamedsym:DISCR_TREE */ { melt_ptr_t sy_DISCR_TREE = meltgc_named_symbol ("DISCR_TREE", MELT_GET); if (sy_DISCR_TREE && NULL == /*_.VALDATA___V1408*/ meltfptr[1407]) /*_.VALDATA___V1408*/ meltfptr[1407] = (melt_ptr_t) sy_DISCR_TREE; } /*^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___V1410*/ meltfptr[1409]) /*_.VALDATA___V1410*/ meltfptr[1409] = (melt_ptr_t) sy_DISCR_VERBATIM_STRING; } /*^getnamedsymbol */ /*getnamedsym:INITIAL_SYSTEM_DATA */ { melt_ptr_t sy_INITIAL_SYSTEM_DATA = meltgc_named_symbol ("INITIAL_SYSTEM_DATA", MELT_GET); if (sy_INITIAL_SYSTEM_DATA && NULL == /*_.VALDATA___V1412*/ meltfptr[1411]) /*_.VALDATA___V1412*/ meltfptr[1411] = (melt_ptr_t) sy_INITIAL_SYSTEM_DATA; } /*^getnamedsymbol */ /*getnamedsym:TRUE */ { melt_ptr_t sy_TRUE = meltgc_named_symbol ("TRUE", MELT_GET); if (sy_TRUE && NULL == /*_.VALDATA___V1414*/ meltfptr[1413]) /*_.VALDATA___V1414*/ meltfptr[1413] = (melt_ptr_t) sy_TRUE; } /*^getnamedsymbol */ /*getnamedsym:LAST_GLOBPREDEF_INDEX */ { melt_ptr_t sy_LAST_GLOBPREDEF_INDEX = meltgc_named_symbol ("LAST_GLOBPREDEF_INDEX", MELT_GET); if (sy_LAST_GLOBPREDEF_INDEX && NULL == /*_.VALDATA___V1417*/ meltfptr[1416]) /*_.VALDATA___V1417*/ meltfptr[1416] = (melt_ptr_t) sy_LAST_GLOBPREDEF_INDEX; } /*^getnamedsymbol */ /*getnamedsym:CLASS_LITERAL_VALUE */ { melt_ptr_t sy_CLASS_LITERAL_VALUE = meltgc_named_symbol ("CLASS_LITERAL_VALUE", MELT_GET); if (sy_CLASS_LITERAL_VALUE && NULL == /*_.VALDATA___V1424*/ meltfptr[1423]) /*_.VALDATA___V1424*/ meltfptr[1423] = (melt_ptr_t) sy_CLASS_LITERAL_VALUE; } /*^getnamedsymbol */ /*getnamedsym:LITV_VALUE */ { melt_ptr_t sy_LITV_VALUE = meltgc_named_symbol ("LITV_VALUE", MELT_GET); if (sy_LITV_VALUE && NULL == /*_.VALDATA___V1436*/ meltfptr[1435]) /*_.VALDATA___V1436*/ meltfptr[1435] = (melt_ptr_t) sy_LITV_VALUE; } /*^getnamedsymbol */ /*getnamedsym:LITV_RANK */ { melt_ptr_t sy_LITV_RANK = meltgc_named_symbol ("LITV_RANK", MELT_GET); if (sy_LITV_RANK && NULL == /*_.VALDATA___V1438*/ meltfptr[1437]) /*_.VALDATA___V1438*/ meltfptr[1437] = (melt_ptr_t) sy_LITV_RANK; } /*^getnamedsymbol */ /*getnamedsym:LITV_LOC */ { melt_ptr_t sy_LITV_LOC = meltgc_named_symbol ("LITV_LOC", MELT_GET); if (sy_LITV_LOC && NULL == /*_.VALDATA___V1440*/ meltfptr[1439]) /*_.VALDATA___V1440*/ meltfptr[1439] = (melt_ptr_t) sy_LITV_LOC; } /*^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___V1444*/ meltfptr[1443]) /*_.VALDATA___V1444*/ meltfptr[1443] = (melt_ptr_t) sy_MELT_DEBUG_FUN; } /*^getnamedsymbol */ /*getnamedsym:CLASS_RUNNING_EXTENSION_MODULE_CONTEXT */ { melt_ptr_t sy_CLASS_RUNNING_EXTENSION_MODULE_CONTEXT = meltgc_named_symbol ("CLASS_RUNNING_EXTENSION_MODULE_CONTEXT", MELT_GET); if (sy_CLASS_RUNNING_EXTENSION_MODULE_CONTEXT && NULL == /*_.VALDATA___V1446*/ meltfptr[1445]) /*_.VALDATA___V1446*/ meltfptr[1445] = (melt_ptr_t) sy_CLASS_RUNNING_EXTENSION_MODULE_CONTEXT; } /*^getnamedsymbol */ /*getnamedsym:CLASS_MODULE_CONTEXT */ { melt_ptr_t sy_CLASS_MODULE_CONTEXT = meltgc_named_symbol ("CLASS_MODULE_CONTEXT", MELT_GET); if (sy_CLASS_MODULE_CONTEXT && NULL == /*_.VALDATA___V1450*/ meltfptr[1449]) /*_.VALDATA___V1450*/ meltfptr[1449] = (melt_ptr_t) sy_CLASS_MODULE_CONTEXT; } /*^getnamedsymbol */ /*getnamedsym:NORMAL_EXP */ { melt_ptr_t sy_NORMAL_EXP = meltgc_named_symbol ("NORMAL_EXP", MELT_GET); if (sy_NORMAL_EXP && NULL == /*_.VALDATA___V1454*/ meltfptr[1453]) /*_.VALDATA___V1454*/ meltfptr[1453] = (melt_ptr_t) sy_NORMAL_EXP; } /*^getnamedsymbol */ /*getnamedsym:RECV */ { melt_ptr_t sy_RECV = meltgc_named_symbol ("RECV", MELT_GET); if (sy_RECV && NULL == /*_.VALDATA___V1456*/ meltfptr[1455]) /*_.VALDATA___V1456*/ meltfptr[1455] = (melt_ptr_t) sy_RECV; } /*^getnamedsymbol */ /*getnamedsym:ENV */ { melt_ptr_t sy_ENV = meltgc_named_symbol ("ENV", MELT_GET); if (sy_ENV && NULL == /*_.VALDATA___V1459*/ meltfptr[1458]) /*_.VALDATA___V1459*/ meltfptr[1458] = (melt_ptr_t) sy_ENV; } /*^getnamedsymbol */ /*getnamedsym:NCX */ { melt_ptr_t sy_NCX = meltgc_named_symbol ("NCX", MELT_GET); if (sy_NCX && NULL == /*_.VALDATA___V1462*/ meltfptr[1461]) /*_.VALDATA___V1462*/ meltfptr[1461] = (melt_ptr_t) sy_NCX; } /*^getnamedsymbol */ /*getnamedsym:PSLOC */ { melt_ptr_t sy_PSLOC = meltgc_named_symbol ("PSLOC", MELT_GET); if (sy_PSLOC && NULL == /*_.VALDATA___V1465*/ meltfptr[1464]) /*_.VALDATA___V1465*/ meltfptr[1464] = (melt_ptr_t) sy_PSLOC; } /*^getnamedsymbol */ /*getnamedsym:INSTALL_METHOD */ { melt_ptr_t sy_INSTALL_METHOD = meltgc_named_symbol ("INSTALL_METHOD", MELT_GET); if (sy_INSTALL_METHOD && NULL == /*_.VALDATA___V1473*/ meltfptr[1472]) /*_.VALDATA___V1473*/ meltfptr[1472] = (melt_ptr_t) sy_INSTALL_METHOD; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE */ { melt_ptr_t sy_CLASS_SOURCE = meltgc_named_symbol ("CLASS_SOURCE", MELT_GET); if (sy_CLASS_SOURCE && NULL == /*_.VALDATA___V1483*/ meltfptr[1482]) /*_.VALDATA___V1483*/ meltfptr[1482] = (melt_ptr_t) sy_CLASS_SOURCE; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_LAZY_MACRO_EXPANSION */ { melt_ptr_t sy_CLASS_SOURCE_LAZY_MACRO_EXPANSION = meltgc_named_symbol ("CLASS_SOURCE_LAZY_MACRO_EXPANSION", MELT_GET); if (sy_CLASS_SOURCE_LAZY_MACRO_EXPANSION && NULL == /*_.VALDATA___V1487*/ meltfptr[1486]) /*_.VALDATA___V1487*/ meltfptr[1486] = (melt_ptr_t) sy_CLASS_SOURCE_LAZY_MACRO_EXPANSION; } /*^getnamedsymbol */ /*getnamedsym:GET_CTYPE */ { melt_ptr_t sy_GET_CTYPE = meltgc_named_symbol ("GET_CTYPE", MELT_GET); if (sy_GET_CTYPE && NULL == /*_.VALDATA___V1489*/ meltfptr[1488]) /*_.VALDATA___V1489*/ meltfptr[1488] = (melt_ptr_t) sy_GET_CTYPE; } /*^getnamedsymbol */ /*getnamedsym:COMPILE_OBJ */ { melt_ptr_t sy_COMPILE_OBJ = meltgc_named_symbol ("COMPILE_OBJ", MELT_GET); if (sy_COMPILE_OBJ && NULL == /*_.VALDATA___V1493*/ meltfptr[1492]) /*_.VALDATA___V1493*/ meltfptr[1492] = (melt_ptr_t) sy_COMPILE_OBJ; } /*^getnamedsymbol */ /*getnamedsym:MULTIPLE_MAP */ { melt_ptr_t sy_MULTIPLE_MAP = meltgc_named_symbol ("MULTIPLE_MAP", MELT_GET); if (sy_MULTIPLE_MAP && NULL == /*_.VALDATA___V1509*/ meltfptr[1508]) /*_.VALDATA___V1509*/ meltfptr[1508] = (melt_ptr_t) sy_MULTIPLE_MAP; } /*^getnamedsymbol */ /*getnamedsym:LIST_EVERY */ { melt_ptr_t sy_LIST_EVERY = meltgc_named_symbol ("LIST_EVERY", MELT_GET); if (sy_LIST_EVERY && NULL == /*_.VALDATA___V1511*/ meltfptr[1510]) /*_.VALDATA___V1511*/ meltfptr[1510] = (melt_ptr_t) sy_LIST_EVERY; } /*^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___V1516*/ meltfptr[1515]) /*_.VALDATA___V1516*/ meltfptr[1515] = (melt_ptr_t) sy_CLASS_NORMAL_LET_BINDING; } /*^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___V1518*/ meltfptr[1517]) /*_.VALDATA___V1518*/ meltfptr[1517] = (melt_ptr_t) sy_LIST_TO_MULTIPLE; } /*^getnamedsymbol */ /*getnamedsym:MULTIPLE_EVERY */ { melt_ptr_t sy_MULTIPLE_EVERY = meltgc_named_symbol ("MULTIPLE_EVERY", MELT_GET); if (sy_MULTIPLE_EVERY && NULL == /*_.VALDATA___V1526*/ meltfptr[1525]) /*_.VALDATA___V1526*/ meltfptr[1525] = (melt_ptr_t) sy_MULTIPLE_EVERY; } /*^getnamedsymbol */ /*getnamedsym:NORMALIZE_BINDING */ { melt_ptr_t sy_NORMALIZE_BINDING = meltgc_named_symbol ("NORMALIZE_BINDING", MELT_GET); if (sy_NORMALIZE_BINDING && NULL == /*_.VALDATA___V1528*/ meltfptr[1527]) /*_.VALDATA___V1528*/ meltfptr[1527] = (melt_ptr_t) sy_NORMALIZE_BINDING; } /*^getnamedsymbol */ /*getnamedsym:PROCS */ { melt_ptr_t sy_PROCS = meltgc_named_symbol ("PROCS", MELT_GET); if (sy_PROCS && NULL == /*_.VALDATA___V1533*/ meltfptr[1532]) /*_.VALDATA___V1533*/ meltfptr[1532] = (melt_ptr_t) sy_PROCS; } /*^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___V1548*/ meltfptr[1547]) /*_.VALDATA___V1548*/ meltfptr[1547] = (melt_ptr_t) sy_CLASS_LET_BINDING; } /*^getnamedsymbol */ /*getnamedsym:CLASS_FIXED_BINDING */ { melt_ptr_t sy_CLASS_FIXED_BINDING = meltgc_named_symbol ("CLASS_FIXED_BINDING", MELT_GET); if (sy_CLASS_FIXED_BINDING && NULL == /*_.VALDATA___V1552*/ meltfptr[1551]) /*_.VALDATA___V1552*/ meltfptr[1551] = (melt_ptr_t) sy_CLASS_FIXED_BINDING; } /*^getnamedsymbol */ /*getnamedsym:CLASS_DEFINED_VALUE_BINDING */ { melt_ptr_t sy_CLASS_DEFINED_VALUE_BINDING = meltgc_named_symbol ("CLASS_DEFINED_VALUE_BINDING", MELT_GET); if (sy_CLASS_DEFINED_VALUE_BINDING && NULL == /*_.VALDATA___V1556*/ meltfptr[1555]) /*_.VALDATA___V1556*/ meltfptr[1555] = (melt_ptr_t) sy_CLASS_DEFINED_VALUE_BINDING; } /*^getnamedsymbol */ /*getnamedsym:FIND_ENCLOSING_ENV */ { melt_ptr_t sy_FIND_ENCLOSING_ENV = meltgc_named_symbol ("FIND_ENCLOSING_ENV", MELT_GET); if (sy_FIND_ENCLOSING_ENV && NULL == /*_.VALDATA___V1572*/ meltfptr[1571]) /*_.VALDATA___V1572*/ meltfptr[1571] = (melt_ptr_t) sy_FIND_ENCLOSING_ENV; } /*^getnamedsymbol */ /*getnamedsym:CLASS_VALUE_BINDING */ { melt_ptr_t sy_CLASS_VALUE_BINDING = meltgc_named_symbol ("CLASS_VALUE_BINDING", MELT_GET); if (sy_CLASS_VALUE_BINDING && NULL == /*_.VALDATA___V1574*/ meltfptr[1573]) /*_.VALDATA___V1574*/ meltfptr[1573] = (melt_ptr_t) sy_CLASS_VALUE_BINDING; } /*^getnamedsymbol */ /*getnamedsym:FIND_ENV */ { melt_ptr_t sy_FIND_ENV = meltgc_named_symbol ("FIND_ENV", MELT_GET); if (sy_FIND_ENV && NULL == /*_.VALDATA___V1580*/ meltfptr[1579]) /*_.VALDATA___V1580*/ meltfptr[1579] = (melt_ptr_t) sy_FIND_ENV; } /*^getnamedsymbol */ /*getnamedsym:CLASS_CLASS_BINDING */ { melt_ptr_t sy_CLASS_CLASS_BINDING = meltgc_named_symbol ("CLASS_CLASS_BINDING", MELT_GET); if (sy_CLASS_CLASS_BINDING && NULL == /*_.VALDATA___V1582*/ meltfptr[1581]) /*_.VALDATA___V1582*/ meltfptr[1581] = (melt_ptr_t) sy_CLASS_CLASS_BINDING; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_PRIMITIVE */ { melt_ptr_t sy_CLASS_SOURCE_PRIMITIVE = meltgc_named_symbol ("CLASS_SOURCE_PRIMITIVE", MELT_GET); if (sy_CLASS_SOURCE_PRIMITIVE && NULL == /*_.VALDATA___V1588*/ meltfptr[1587]) /*_.VALDATA___V1588*/ meltfptr[1587] = (melt_ptr_t) sy_CLASS_SOURCE_PRIMITIVE; } /*^getnamedsymbol */ /*getnamedsym:CLONE_SYMBOL */ { melt_ptr_t sy_CLONE_SYMBOL = meltgc_named_symbol ("CLONE_SYMBOL", MELT_GET); if (sy_CLONE_SYMBOL && NULL == /*_.VALDATA___V1590*/ meltfptr[1589]) /*_.VALDATA___V1590*/ meltfptr[1589] = (melt_ptr_t) sy_CLONE_SYMBOL; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_CODECHUNK */ { melt_ptr_t sy_CLASS_SOURCE_CODECHUNK = meltgc_named_symbol ("CLASS_SOURCE_CODECHUNK", MELT_GET); if (sy_CLASS_SOURCE_CODECHUNK && NULL == /*_.VALDATA___V1595*/ meltfptr[1594]) /*_.VALDATA___V1595*/ meltfptr[1594] = (melt_ptr_t) sy_CLASS_SOURCE_CODECHUNK; } /*^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___V1597*/ meltfptr[1596]) /*_.VALDATA___V1597*/ meltfptr[1596] = (melt_ptr_t) sy_CLASS_CLONED_SYMBOL; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_CMATCHEXPR */ { melt_ptr_t sy_CLASS_SOURCE_CMATCHEXPR = meltgc_named_symbol ("CLASS_SOURCE_CMATCHEXPR", MELT_GET); if (sy_CLASS_SOURCE_CMATCHEXPR && NULL == /*_.VALDATA___V1603*/ meltfptr[1602]) /*_.VALDATA___V1603*/ meltfptr[1602] = (melt_ptr_t) sy_CLASS_SOURCE_CMATCHEXPR; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_FUNMATCHEXPR */ { melt_ptr_t sy_CLASS_SOURCE_FUNMATCHEXPR = meltgc_named_symbol ("CLASS_SOURCE_FUNMATCHEXPR", MELT_GET); if (sy_CLASS_SOURCE_FUNMATCHEXPR && NULL == /*_.VALDATA___V1607*/ meltfptr[1606]) /*_.VALDATA___V1607*/ meltfptr[1606] = (melt_ptr_t) sy_CLASS_SOURCE_FUNMATCHEXPR; } /*^getnamedsymbol */ /*getnamedsym:FMATCH_APPLYF */ { melt_ptr_t sy_FMATCH_APPLYF = meltgc_named_symbol ("FMATCH_APPLYF", MELT_GET); if (sy_FMATCH_APPLYF && NULL == /*_.VALDATA___V1609*/ meltfptr[1608]) /*_.VALDATA___V1609*/ meltfptr[1608] = (melt_ptr_t) sy_FMATCH_APPLYF; } /*^getnamedsymbol */ /*getnamedsym:LIST_APPEND2LIST */ { melt_ptr_t sy_LIST_APPEND2LIST = meltgc_named_symbol ("LIST_APPEND2LIST", MELT_GET); if (sy_LIST_APPEND2LIST && NULL == /*_.VALDATA___V1611*/ meltfptr[1610]) /*_.VALDATA___V1611*/ meltfptr[1610] = (melt_ptr_t) sy_LIST_APPEND2LIST; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_APPLY */ { melt_ptr_t sy_CLASS_SOURCE_APPLY = meltgc_named_symbol ("CLASS_SOURCE_APPLY", MELT_GET); if (sy_CLASS_SOURCE_APPLY && NULL == /*_.VALDATA___V1617*/ meltfptr[1616]) /*_.VALDATA___V1617*/ meltfptr[1616] = (melt_ptr_t) sy_CLASS_SOURCE_APPLY; } /*^getnamedsymbol */ /*getnamedsym:_FUN_ */ { melt_ptr_t sy_FUN_ = meltgc_named_symbol ("_FUN_", MELT_GET); if (sy_FUN_ && NULL == /*_.VALDATA___V1614*/ meltfptr[1613]) /*_.VALDATA___V1614*/ meltfptr[1613] = (melt_ptr_t) sy_FUN_; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_MSEND */ { melt_ptr_t sy_CLASS_SOURCE_MSEND = meltgc_named_symbol ("CLASS_SOURCE_MSEND", MELT_GET); if (sy_CLASS_SOURCE_MSEND && NULL == /*_.VALDATA___V1621*/ meltfptr[1620]) /*_.VALDATA___V1621*/ meltfptr[1620] = (melt_ptr_t) sy_CLASS_SOURCE_MSEND; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SELECTOR_BINDING */ { melt_ptr_t sy_CLASS_SELECTOR_BINDING = meltgc_named_symbol ("CLASS_SELECTOR_BINDING", MELT_GET); if (sy_CLASS_SELECTOR_BINDING && NULL == /*_.VALDATA___V1623*/ meltfptr[1622]) /*_.VALDATA___V1623*/ meltfptr[1622] = (melt_ptr_t) sy_CLASS_SELECTOR_BINDING; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_DEFSELECTOR */ { melt_ptr_t sy_CLASS_SOURCE_DEFSELECTOR = meltgc_named_symbol ("CLASS_SOURCE_DEFSELECTOR", MELT_GET); if (sy_CLASS_SOURCE_DEFSELECTOR && NULL == /*_.VALDATA___V1625*/ meltfptr[1624]) /*_.VALDATA___V1625*/ meltfptr[1624] = (melt_ptr_t) sy_CLASS_SOURCE_DEFSELECTOR; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_RETURN */ { melt_ptr_t sy_CLASS_SOURCE_RETURN = meltgc_named_symbol ("CLASS_SOURCE_RETURN", MELT_GET); if (sy_CLASS_SOURCE_RETURN && NULL == /*_.VALDATA___V1633*/ meltfptr[1632]) /*_.VALDATA___V1633*/ meltfptr[1632] = (melt_ptr_t) sy_CLASS_SOURCE_RETURN; } /*^getnamedsymbol */ /*getnamedsym:RETURN_ */ { melt_ptr_t sy_RETURN_ = meltgc_named_symbol ("RETURN_", MELT_GET); if (sy_RETURN_ && NULL == /*_.VALDATA___V1628*/ meltfptr[1627]) /*_.VALDATA___V1628*/ meltfptr[1627] = (melt_ptr_t) sy_RETURN_; } /*^getnamedsymbol */ /*getnamedsym:_RETINT_ */ { melt_ptr_t sy_RETINT_ = meltgc_named_symbol ("_RETINT_", MELT_GET); if (sy_RETINT_ && NULL == /*_.VALDATA___V1630*/ meltfptr[1629]) /*_.VALDATA___V1630*/ meltfptr[1629] = (melt_ptr_t) sy_RETINT_; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_IF */ { melt_ptr_t sy_CLASS_SOURCE_IF = meltgc_named_symbol ("CLASS_SOURCE_IF", MELT_GET); if (sy_CLASS_SOURCE_IF && NULL == /*_.VALDATA___V1642*/ meltfptr[1641]) /*_.VALDATA___V1642*/ meltfptr[1641] = (melt_ptr_t) sy_CLASS_SOURCE_IF; } /*^getnamedsymbol */ /*getnamedsym:_IF_INTER_ */ { melt_ptr_t sy_IF_INTER_ = meltgc_named_symbol ("_IF_INTER_", MELT_GET); if (sy_IF_INTER_ && NULL == /*_.VALDATA___V1636*/ meltfptr[1635]) /*_.VALDATA___V1636*/ meltfptr[1635] = (melt_ptr_t) sy_IF_INTER_; } /*^getnamedsymbol */ /*getnamedsym:FRESH_ENV */ { melt_ptr_t sy_FRESH_ENV = meltgc_named_symbol ("FRESH_ENV", MELT_GET); if (sy_FRESH_ENV && NULL == /*_.VALDATA___V1644*/ meltfptr[1643]) /*_.VALDATA___V1644*/ meltfptr[1643] = (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___V1646*/ meltfptr[1645]) /*_.VALDATA___V1646*/ meltfptr[1645] = (melt_ptr_t) sy_PUT_ENV; } /*^getnamedsymbol */ /*getnamedsym:_IF_ */ { melt_ptr_t sy_IF_ = meltgc_named_symbol ("_IF_", MELT_GET); if (sy_IF_ && NULL == /*_.VALDATA___V1639*/ meltfptr[1638]) /*_.VALDATA___V1639*/ meltfptr[1638] = (melt_ptr_t) sy_IF_; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_IFELSE */ { melt_ptr_t sy_CLASS_SOURCE_IFELSE = meltgc_named_symbol ("CLASS_SOURCE_IFELSE", MELT_GET); if (sy_CLASS_SOURCE_IFELSE && NULL == /*_.VALDATA___V1656*/ meltfptr[1655]) /*_.VALDATA___V1656*/ meltfptr[1655] = (melt_ptr_t) sy_CLASS_SOURCE_IFELSE; } /*^getnamedsymbol */ /*getnamedsym:_IFELSE_INTER_ */ { melt_ptr_t sy_IFELSE_INTER_ = meltgc_named_symbol ("_IFELSE_INTER_", MELT_GET); if (sy_IFELSE_INTER_ && NULL == /*_.VALDATA___V1649*/ meltfptr[1648]) /*_.VALDATA___V1649*/ meltfptr[1648] = (melt_ptr_t) sy_IFELSE_INTER_; } /*^getnamedsymbol */ /*getnamedsym:_IFELSE_ */ { melt_ptr_t sy_IFELSE_ = meltgc_named_symbol ("_IFELSE_", MELT_GET); if (sy_IFELSE_ && NULL == /*_.VALDATA___V1653*/ meltfptr[1652]) /*_.VALDATA___V1653*/ meltfptr[1652] = (melt_ptr_t) sy_IFELSE_; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_CPPIF */ { melt_ptr_t sy_CLASS_SOURCE_CPPIF = meltgc_named_symbol ("CLASS_SOURCE_CPPIF", MELT_GET); if (sy_CLASS_SOURCE_CPPIF && NULL == /*_.VALDATA___V1664*/ meltfptr[1663]) /*_.VALDATA___V1664*/ meltfptr[1663] = (melt_ptr_t) sy_CLASS_SOURCE_CPPIF; } /*^getnamedsymbol */ /*getnamedsym:IFCPP_ */ { melt_ptr_t sy_IFCPP_ = meltgc_named_symbol ("IFCPP_", MELT_GET); if (sy_IFCPP_ && NULL == /*_.VALDATA___V1661*/ meltfptr[1660]) /*_.VALDATA___V1661*/ meltfptr[1660] = (melt_ptr_t) sy_IFCPP_; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_OR */ { melt_ptr_t sy_CLASS_SOURCE_OR = meltgc_named_symbol ("CLASS_SOURCE_OR", MELT_GET); if (sy_CLASS_SOURCE_OR && NULL == /*_.VALDATA___V1672*/ meltfptr[1671]) /*_.VALDATA___V1672*/ meltfptr[1671] = (melt_ptr_t) sy_CLASS_SOURCE_OR; } /*^getnamedsymbol */ /*getnamedsym:MULTIPLE_BACKWARD_EVERY */ { melt_ptr_t sy_MULTIPLE_BACKWARD_EVERY = meltgc_named_symbol ("MULTIPLE_BACKWARD_EVERY", MELT_GET); if (sy_MULTIPLE_BACKWARD_EVERY && NULL == /*_.VALDATA___V1674*/ meltfptr[1673]) /*_.VALDATA___V1674*/ meltfptr[1673] = (melt_ptr_t) sy_MULTIPLE_BACKWARD_EVERY; } /*^getnamedsymbol */ /*getnamedsym:OR_ */ { melt_ptr_t sy_OR_ = meltgc_named_symbol ("OR_", MELT_GET); if (sy_OR_ && NULL == /*_.VALDATA___V1669*/ meltfptr[1668]) /*_.VALDATA___V1669*/ meltfptr[1668] = (melt_ptr_t) sy_OR_; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_PROGN */ { melt_ptr_t sy_CLASS_SOURCE_PROGN = meltgc_named_symbol ("CLASS_SOURCE_PROGN", MELT_GET); if (sy_CLASS_SOURCE_PROGN && NULL == /*_.VALDATA___V1680*/ meltfptr[1679]) /*_.VALDATA___V1680*/ meltfptr[1679] = (melt_ptr_t) sy_CLASS_SOURCE_PROGN; } /*^getnamedsymbol */ /*getnamedsym:PROGN_ */ { melt_ptr_t sy_PROGN_ = meltgc_named_symbol ("PROGN_", MELT_GET); if (sy_PROGN_ && NULL == /*_.VALDATA___V1677*/ meltfptr[1676]) /*_.VALDATA___V1677*/ meltfptr[1676] = (melt_ptr_t) sy_PROGN_; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_LET */ { melt_ptr_t sy_CLASS_SOURCE_LET = meltgc_named_symbol ("CLASS_SOURCE_LET", MELT_GET); if (sy_CLASS_SOURCE_LET && NULL == /*_.VALDATA___V1689*/ meltfptr[1688]) /*_.VALDATA___V1689*/ meltfptr[1688] = (melt_ptr_t) sy_CLASS_SOURCE_LET; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_LET_BINDING */ { melt_ptr_t sy_CLASS_SOURCE_LET_BINDING = meltgc_named_symbol ("CLASS_SOURCE_LET_BINDING", MELT_GET); if (sy_CLASS_SOURCE_LET_BINDING && NULL == /*_.VALDATA___V1691*/ meltfptr[1690]) /*_.VALDATA___V1691*/ meltfptr[1690] = (melt_ptr_t) sy_CLASS_SOURCE_LET_BINDING; } /*^getnamedsymbol */ /*getnamedsym:LET_ */ { melt_ptr_t sy_LET_ = meltgc_named_symbol ("LET_", MELT_GET); if (sy_LET_ && NULL == /*_.VALDATA___V1686*/ meltfptr[1685]) /*_.VALDATA___V1686*/ meltfptr[1685] = (melt_ptr_t) sy_LET_; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_UNSAFE_GET_FIELD */ { melt_ptr_t sy_CLASS_SOURCE_UNSAFE_GET_FIELD = meltgc_named_symbol ("CLASS_SOURCE_UNSAFE_GET_FIELD", MELT_GET); if (sy_CLASS_SOURCE_UNSAFE_GET_FIELD && NULL == /*_.VALDATA___V1696*/ meltfptr[1695]) /*_.VALDATA___V1696*/ meltfptr[1695] = (melt_ptr_t) sy_CLASS_SOURCE_UNSAFE_GET_FIELD; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_GET_FIELD */ { melt_ptr_t sy_CLASS_SOURCE_GET_FIELD = meltgc_named_symbol ("CLASS_SOURCE_GET_FIELD", MELT_GET); if (sy_CLASS_SOURCE_GET_FIELD && NULL == /*_.VALDATA___V1700*/ meltfptr[1699]) /*_.VALDATA___V1700*/ meltfptr[1699] = (melt_ptr_t) sy_CLASS_SOURCE_GET_FIELD; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_UNSAFE_PUT_FIELDS */ { melt_ptr_t sy_CLASS_SOURCE_UNSAFE_PUT_FIELDS = meltgc_named_symbol ("CLASS_SOURCE_UNSAFE_PUT_FIELDS", MELT_GET); if (sy_CLASS_SOURCE_UNSAFE_PUT_FIELDS && NULL == /*_.VALDATA___V1709*/ meltfptr[1708]) /*_.VALDATA___V1709*/ meltfptr[1708] = (melt_ptr_t) sy_CLASS_SOURCE_UNSAFE_PUT_FIELDS; } /*^getnamedsymbol */ /*getnamedsym:UNSAFPUT_ */ { melt_ptr_t sy_UNSAFPUT_ = meltgc_named_symbol ("UNSAFPUT_", MELT_GET); if (sy_UNSAFPUT_ && NULL == /*_.VALDATA___V1703*/ meltfptr[1702]) /*_.VALDATA___V1703*/ meltfptr[1702] = (melt_ptr_t) sy_UNSAFPUT_; } /*^getnamedsymbol */ /*getnamedsym:UNSAFPUT_INTER_ */ { melt_ptr_t sy_UNSAFPUT_INTER_ = meltgc_named_symbol ("UNSAFPUT_INTER_", MELT_GET); if (sy_UNSAFPUT_INTER_ && NULL == /*_.VALDATA___V1705*/ meltfptr[1704]) /*_.VALDATA___V1705*/ meltfptr[1704] = (melt_ptr_t) sy_UNSAFPUT_INTER_; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_FIELDASSIGN */ { melt_ptr_t sy_CLASS_SOURCE_FIELDASSIGN = meltgc_named_symbol ("CLASS_SOURCE_FIELDASSIGN", MELT_GET); if (sy_CLASS_SOURCE_FIELDASSIGN && NULL == /*_.VALDATA___V1711*/ meltfptr[1710]) /*_.VALDATA___V1711*/ meltfptr[1710] = (melt_ptr_t) sy_CLASS_SOURCE_FIELDASSIGN; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_PUT_FIELDS */ { melt_ptr_t sy_CLASS_SOURCE_PUT_FIELDS = meltgc_named_symbol ("CLASS_SOURCE_PUT_FIELDS", MELT_GET); if (sy_CLASS_SOURCE_PUT_FIELDS && NULL == /*_.VALDATA___V1720*/ meltfptr[1719]) /*_.VALDATA___V1720*/ meltfptr[1719] = (melt_ptr_t) sy_CLASS_SOURCE_PUT_FIELDS; } /*^getnamedsymbol */ /*getnamedsym:PUTFLD_ */ { melt_ptr_t sy_PUTFLD_ = meltgc_named_symbol ("PUTFLD_", MELT_GET); if (sy_PUTFLD_ && NULL == /*_.VALDATA___V1715*/ meltfptr[1714]) /*_.VALDATA___V1715*/ meltfptr[1714] = (melt_ptr_t) sy_PUTFLD_; } /*^getnamedsymbol */ /*getnamedsym:PUTFLD_INTER_ */ { melt_ptr_t sy_PUTFLD_INTER_ = meltgc_named_symbol ("PUTFLD_INTER_", MELT_GET); if (sy_PUTFLD_INTER_ && NULL == /*_.VALDATA___V1717*/ meltfptr[1716]) /*_.VALDATA___V1717*/ meltfptr[1716] = (melt_ptr_t) sy_PUTFLD_INTER_; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_SETQ */ { melt_ptr_t sy_CLASS_SOURCE_SETQ = meltgc_named_symbol ("CLASS_SOURCE_SETQ", MELT_GET); if (sy_CLASS_SOURCE_SETQ && NULL == /*_.VALDATA___V1726*/ meltfptr[1725]) /*_.VALDATA___V1726*/ meltfptr[1725] = (melt_ptr_t) sy_CLASS_SOURCE_SETQ; } /*^getnamedsymbol */ /*getnamedsym:SETQ_ */ { melt_ptr_t sy_SETQ_ = meltgc_named_symbol ("SETQ_", MELT_GET); if (sy_SETQ_ && NULL == /*_.VALDATA___V1723*/ meltfptr[1722]) /*_.VALDATA___V1723*/ meltfptr[1722] = (melt_ptr_t) sy_SETQ_; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_INSTANCE */ { melt_ptr_t sy_CLASS_SOURCE_INSTANCE = meltgc_named_symbol ("CLASS_SOURCE_INSTANCE", MELT_GET); if (sy_CLASS_SOURCE_INSTANCE && NULL == /*_.VALDATA___V1736*/ meltfptr[1735]) /*_.VALDATA___V1736*/ meltfptr[1735] = (melt_ptr_t) sy_CLASS_SOURCE_INSTANCE; } /*^getnamedsymbol */ /*getnamedsym:INSTANCE_INTER_ */ { melt_ptr_t sy_INSTANCE_INTER_ = meltgc_named_symbol ("INSTANCE_INTER_", MELT_GET); if (sy_INSTANCE_INTER_ && NULL == /*_.VALDATA___V1730*/ meltfptr[1729]) /*_.VALDATA___V1730*/ meltfptr[1729] = (melt_ptr_t) sy_INSTANCE_INTER_; } /*^getnamedsymbol */ /*getnamedsym:INST_ */ { melt_ptr_t sy_INST_ = meltgc_named_symbol ("INST_", MELT_GET); if (sy_INST_ && NULL == /*_.VALDATA___V1733*/ meltfptr[1732]) /*_.VALDATA___V1733*/ meltfptr[1732] = (melt_ptr_t) sy_INST_; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_FOREVER */ { melt_ptr_t sy_CLASS_SOURCE_FOREVER = meltgc_named_symbol ("CLASS_SOURCE_FOREVER", MELT_GET); if (sy_CLASS_SOURCE_FOREVER && NULL == /*_.VALDATA___V1745*/ meltfptr[1744]) /*_.VALDATA___V1745*/ meltfptr[1744] = (melt_ptr_t) sy_CLASS_SOURCE_FOREVER; } /*^getnamedsymbol */ /*getnamedsym:CLASS_LABEL_BINDING */ { melt_ptr_t sy_CLASS_LABEL_BINDING = meltgc_named_symbol ("CLASS_LABEL_BINDING", MELT_GET); if (sy_CLASS_LABEL_BINDING && NULL == /*_.VALDATA___V1747*/ meltfptr[1746]) /*_.VALDATA___V1747*/ meltfptr[1746] = (melt_ptr_t) sy_CLASS_LABEL_BINDING; } /*^getnamedsymbol */ /*getnamedsym:FOREVER_INTER_ */ { melt_ptr_t sy_FOREVER_INTER_ = meltgc_named_symbol ("FOREVER_INTER_", MELT_GET); if (sy_FOREVER_INTER_ && NULL == /*_.VALDATA___V1740*/ meltfptr[1739]) /*_.VALDATA___V1740*/ meltfptr[1739] = (melt_ptr_t) sy_FOREVER_INTER_; } /*^getnamedsymbol */ /*getnamedsym:LABIND_CLONSY */ { melt_ptr_t sy_LABIND_CLONSY = meltgc_named_symbol ("LABIND_CLONSY", MELT_GET); if (sy_LABIND_CLONSY && NULL == /*_.VALDATA___V1749*/ meltfptr[1748]) /*_.VALDATA___V1749*/ meltfptr[1748] = (melt_ptr_t) sy_LABIND_CLONSY; } /*^getnamedsymbol */ /*getnamedsym:FOREVER_ */ { melt_ptr_t sy_FOREVER_ = meltgc_named_symbol ("FOREVER_", MELT_GET); if (sy_FOREVER_ && NULL == /*_.VALDATA___V1742*/ meltfptr[1741]) /*_.VALDATA___V1742*/ meltfptr[1741] = (melt_ptr_t) sy_FOREVER_; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_EXIT */ { melt_ptr_t sy_CLASS_SOURCE_EXIT = meltgc_named_symbol ("CLASS_SOURCE_EXIT", MELT_GET); if (sy_CLASS_SOURCE_EXIT && NULL == /*_.VALDATA___V1755*/ meltfptr[1754]) /*_.VALDATA___V1755*/ meltfptr[1754] = (melt_ptr_t) sy_CLASS_SOURCE_EXIT; } /*^getnamedsymbol */ /*getnamedsym:EXIT_ */ { melt_ptr_t sy_EXIT_ = meltgc_named_symbol ("EXIT_", MELT_GET); if (sy_EXIT_ && NULL == /*_.VALDATA___V1752*/ meltfptr[1751]) /*_.VALDATA___V1752*/ meltfptr[1751] = (melt_ptr_t) sy_EXIT_; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_AGAIN */ { melt_ptr_t sy_CLASS_SOURCE_AGAIN = meltgc_named_symbol ("CLASS_SOURCE_AGAIN", MELT_GET); if (sy_CLASS_SOURCE_AGAIN && NULL == /*_.VALDATA___V1761*/ meltfptr[1760]) /*_.VALDATA___V1761*/ meltfptr[1760] = (melt_ptr_t) sy_CLASS_SOURCE_AGAIN; } /*^getnamedsymbol */ /*getnamedsym:AGAIN_ */ { melt_ptr_t sy_AGAIN_ = meltgc_named_symbol ("AGAIN_", MELT_GET); if (sy_AGAIN_ && NULL == /*_.VALDATA___V1758*/ meltfptr[1757]) /*_.VALDATA___V1758*/ meltfptr[1757] = (melt_ptr_t) sy_AGAIN_; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_IFVARIADIC */ { melt_ptr_t sy_CLASS_SOURCE_IFVARIADIC = meltgc_named_symbol ("CLASS_SOURCE_IFVARIADIC", MELT_GET); if (sy_CLASS_SOURCE_IFVARIADIC && NULL == /*_.VALDATA___V1769*/ meltfptr[1768]) /*_.VALDATA___V1769*/ meltfptr[1768] = (melt_ptr_t) sy_CLASS_SOURCE_IFVARIADIC; } /*^getnamedsymbol */ /*getnamedsym:DISCR_VARIADIC_FORMAL_SEQUENCE */ { melt_ptr_t sy_DISCR_VARIADIC_FORMAL_SEQUENCE = meltgc_named_symbol ("DISCR_VARIADIC_FORMAL_SEQUENCE", MELT_GET); if (sy_DISCR_VARIADIC_FORMAL_SEQUENCE && NULL == /*_.VALDATA___V1771*/ meltfptr[1770]) /*_.VALDATA___V1771*/ meltfptr[1770] = (melt_ptr_t) sy_DISCR_VARIADIC_FORMAL_SEQUENCE; } /*^getnamedsymbol */ /*getnamedsym:CONSUMVARIADIC_ */ { melt_ptr_t sy_CONSUMVARIADIC_ = meltgc_named_symbol ("CONSUMVARIADIC_", MELT_GET); if (sy_CONSUMVARIADIC_ && NULL == /*_.VALDATA___V1764*/ meltfptr[1763]) /*_.VALDATA___V1764*/ meltfptr[1763] = (melt_ptr_t) sy_CONSUMVARIADIC_; } /*^getnamedsymbol */ /*getnamedsym:IFVARIADIC_ */ { melt_ptr_t sy_IFVARIADIC_ = meltgc_named_symbol ("IFVARIADIC_", MELT_GET); if (sy_IFVARIADIC_ && NULL == /*_.VALDATA___V1766*/ meltfptr[1765]) /*_.VALDATA___V1766*/ meltfptr[1765] = (melt_ptr_t) sy_IFVARIADIC_; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_COMPILEWARNING */ { melt_ptr_t sy_CLASS_SOURCE_COMPILEWARNING = meltgc_named_symbol ("CLASS_SOURCE_COMPILEWARNING", MELT_GET); if (sy_CLASS_SOURCE_COMPILEWARNING && NULL == /*_.VALDATA___V1775*/ meltfptr[1774]) /*_.VALDATA___V1775*/ meltfptr[1774] = (melt_ptr_t) sy_CLASS_SOURCE_COMPILEWARNING; } /*^getnamedsymbol */ /*getnamedsym:_RETVAL_ */ { melt_ptr_t sy_RETVAL_ = meltgc_named_symbol ("_RETVAL_", MELT_GET); if (sy_RETVAL_ && NULL == /*_.VALDATA___V1781*/ meltfptr[1780]) /*_.VALDATA___V1781*/ meltfptr[1780] = (melt_ptr_t) sy_RETVAL_; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_DEFUN */ { melt_ptr_t sy_CLASS_SOURCE_DEFUN = meltgc_named_symbol ("CLASS_SOURCE_DEFUN", MELT_GET); if (sy_CLASS_SOURCE_DEFUN && NULL == /*_.VALDATA___V1787*/ meltfptr[1786]) /*_.VALDATA___V1787*/ meltfptr[1786] = (melt_ptr_t) sy_CLASS_SOURCE_DEFUN; } /*^getnamedsymbol */ /*getnamedsym:CLASS_FUNCTION_BINDING */ { melt_ptr_t sy_CLASS_FUNCTION_BINDING = meltgc_named_symbol ("CLASS_FUNCTION_BINDING", MELT_GET); if (sy_CLASS_FUNCTION_BINDING && NULL == /*_.VALDATA___V1789*/ meltfptr[1788]) /*_.VALDATA___V1789*/ meltfptr[1788] = (melt_ptr_t) sy_CLASS_FUNCTION_BINDING; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_LAMBDA */ { melt_ptr_t sy_CLASS_SOURCE_LAMBDA = meltgc_named_symbol ("CLASS_SOURCE_LAMBDA", MELT_GET); if (sy_CLASS_SOURCE_LAMBDA && NULL == /*_.VALDATA___V1796*/ meltfptr[1795]) /*_.VALDATA___V1796*/ meltfptr[1795] = (melt_ptr_t) sy_CLASS_SOURCE_LAMBDA; } /*^getnamedsymbol */ /*getnamedsym:LAMBDA_ */ { melt_ptr_t sy_LAMBDA_ = meltgc_named_symbol ("LAMBDA_", MELT_GET); if (sy_LAMBDA_ && NULL == /*_.VALDATA___V1792*/ meltfptr[1791]) /*_.VALDATA___V1792*/ meltfptr[1791] = (melt_ptr_t) sy_LAMBDA_; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_MULTICALL */ { melt_ptr_t sy_CLASS_SOURCE_MULTICALL = meltgc_named_symbol ("CLASS_SOURCE_MULTICALL", MELT_GET); if (sy_CLASS_SOURCE_MULTICALL && NULL == /*_.VALDATA___V1807*/ meltfptr[1806]) /*_.VALDATA___V1807*/ meltfptr[1806] = (melt_ptr_t) sy_CLASS_SOURCE_MULTICALL; } /*^getnamedsymbol */ /*getnamedsym:LIST_ITERATE_TEST */ { melt_ptr_t sy_LIST_ITERATE_TEST = meltgc_named_symbol ("LIST_ITERATE_TEST", MELT_GET); if (sy_LIST_ITERATE_TEST && NULL == /*_.VALDATA___V1809*/ meltfptr[1808]) /*_.VALDATA___V1809*/ meltfptr[1808] = (melt_ptr_t) sy_LIST_ITERATE_TEST; } /*^getnamedsymbol */ /*getnamedsym:MULTI_ */ { melt_ptr_t sy_MULTI_ = meltgc_named_symbol ("MULTI_", MELT_GET); if (sy_MULTI_ && NULL == /*_.VALDATA___V1804*/ meltfptr[1803]) /*_.VALDATA___V1804*/ meltfptr[1803] = (melt_ptr_t) sy_MULTI_; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_TUPLE */ { melt_ptr_t sy_CLASS_SOURCE_TUPLE = meltgc_named_symbol ("CLASS_SOURCE_TUPLE", MELT_GET); if (sy_CLASS_SOURCE_TUPLE && NULL == /*_.VALDATA___V1817*/ meltfptr[1816]) /*_.VALDATA___V1817*/ meltfptr[1816] = (melt_ptr_t) sy_CLASS_SOURCE_TUPLE; } /*^getnamedsymbol */ /*getnamedsym:TUPLREC_ */ { melt_ptr_t sy_TUPLREC_ = meltgc_named_symbol ("TUPLREC_", MELT_GET); if (sy_TUPLREC_ && NULL == /*_.VALDATA___V1812*/ meltfptr[1811]) /*_.VALDATA___V1812*/ meltfptr[1811] = (melt_ptr_t) sy_TUPLREC_; } /*^getnamedsymbol */ /*getnamedsym:TUPLE_ */ { melt_ptr_t sy_TUPLE_ = meltgc_named_symbol ("TUPLE_", MELT_GET); if (sy_TUPLE_ && NULL == /*_.VALDATA___V1814*/ meltfptr[1813]) /*_.VALDATA___V1814*/ meltfptr[1813] = (melt_ptr_t) sy_TUPLE_; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_LIST */ { melt_ptr_t sy_CLASS_SOURCE_LIST = meltgc_named_symbol ("CLASS_SOURCE_LIST", MELT_GET); if (sy_CLASS_SOURCE_LIST && NULL == /*_.VALDATA___V1830*/ meltfptr[1829]) /*_.VALDATA___V1830*/ meltfptr[1829] = (melt_ptr_t) sy_CLASS_SOURCE_LIST; } /*^getnamedsymbol */ /*getnamedsym:LISTREC_ */ { melt_ptr_t sy_LISTREC_ = meltgc_named_symbol ("LISTREC_", MELT_GET); if (sy_LISTREC_ && NULL == /*_.VALDATA___V1820*/ meltfptr[1819]) /*_.VALDATA___V1820*/ meltfptr[1819] = (melt_ptr_t) sy_LISTREC_; } /*^getnamedsymbol */ /*getnamedsym:LIST_ */ { melt_ptr_t sy_LIST_ = meltgc_named_symbol ("LIST_", MELT_GET); if (sy_LIST_ && NULL == /*_.VALDATA___V1822*/ meltfptr[1821]) /*_.VALDATA___V1822*/ meltfptr[1821] = (melt_ptr_t) sy_LIST_; } /*^getnamedsymbol */ /*getnamedsym:PREPARE_CONSTRUCTOR_BINDING */ { melt_ptr_t sy_PREPARE_CONSTRUCTOR_BINDING = meltgc_named_symbol ("PREPARE_CONSTRUCTOR_BINDING", MELT_GET); if (sy_PREPARE_CONSTRUCTOR_BINDING && NULL == /*_.VALDATA___V1832*/ meltfptr[1831]) /*_.VALDATA___V1832*/ meltfptr[1831] = (melt_ptr_t) sy_PREPARE_CONSTRUCTOR_BINDING; } /*^getnamedsymbol */ /*getnamedsym:SYMB */ { melt_ptr_t sy_SYMB = meltgc_named_symbol ("SYMB", MELT_GET); if (sy_SYMB && NULL == /*_.VALDATA___V1835*/ meltfptr[1834]) /*_.VALDATA___V1835*/ meltfptr[1834] = (melt_ptr_t) sy_SYMB; } /*^getnamedsymbol */ /*getnamedsym:SLOC */ { melt_ptr_t sy_SLOC = meltgc_named_symbol ("SLOC", MELT_GET); if (sy_SLOC && NULL == /*_.VALDATA___V1839*/ meltfptr[1838]) /*_.VALDATA___V1839*/ meltfptr[1838] = (melt_ptr_t) sy_SLOC; } /*^getnamedsymbol */ /*getnamedsym:NORMAL_LETREC_CONSTRUCTIVE */ { melt_ptr_t sy_NORMAL_LETREC_CONSTRUCTIVE = meltgc_named_symbol ("NORMAL_LETREC_CONSTRUCTIVE", MELT_GET); if (sy_NORMAL_LETREC_CONSTRUCTIVE && NULL == /*_.VALDATA___V1845*/ meltfptr[1844]) /*_.VALDATA___V1845*/ meltfptr[1844] = (melt_ptr_t) sy_NORMAL_LETREC_CONSTRUCTIVE; } /*^getnamedsymbol */ /*getnamedsym:CEXPR */ { melt_ptr_t sy_CEXPR = meltgc_named_symbol ("CEXPR", MELT_GET); if (sy_CEXPR && NULL == /*_.VALDATA___V1847*/ meltfptr[1846]) /*_.VALDATA___V1847*/ meltfptr[1846] = (melt_ptr_t) sy_CEXPR; } /*^getnamedsymbol */ /*getnamedsym:CBIND */ { melt_ptr_t sy_CBIND = meltgc_named_symbol ("CBIND", MELT_GET); if (sy_CBIND && NULL == /*_.VALDATA___V1851*/ meltfptr[1850]) /*_.VALDATA___V1851*/ meltfptr[1850] = (melt_ptr_t) sy_CBIND; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_ARGUMENTED_OPERATOR */ { melt_ptr_t sy_CLASS_SOURCE_ARGUMENTED_OPERATOR = meltgc_named_symbol ("CLASS_SOURCE_ARGUMENTED_OPERATOR", MELT_GET); if (sy_CLASS_SOURCE_ARGUMENTED_OPERATOR && NULL == /*_.VALDATA___V1868*/ meltfptr[1867]) /*_.VALDATA___V1868*/ meltfptr[1867] = (melt_ptr_t) sy_CLASS_SOURCE_ARGUMENTED_OPERATOR; } /*^getnamedsymbol */ /*getnamedsym:_PAIROFLIST */ { melt_ptr_t sy_PAIROFLIST = meltgc_named_symbol ("_PAIROFLIST", MELT_GET); if (sy_PAIROFLIST && NULL == /*_.VALDATA___V1873*/ meltfptr[1872]) /*_.VALDATA___V1873*/ meltfptr[1872] = (melt_ptr_t) sy_PAIROFLIST; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_LETREC */ { melt_ptr_t sy_CLASS_SOURCE_LETREC = meltgc_named_symbol ("CLASS_SOURCE_LETREC", MELT_GET); if (sy_CLASS_SOURCE_LETREC && NULL == /*_.VALDATA___V1887*/ meltfptr[1886]) /*_.VALDATA___V1887*/ meltfptr[1886] = (melt_ptr_t) sy_CLASS_SOURCE_LETREC; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_LETREC_BINDING */ { melt_ptr_t sy_CLASS_SOURCE_LETREC_BINDING = meltgc_named_symbol ("CLASS_SOURCE_LETREC_BINDING", MELT_GET); if (sy_CLASS_SOURCE_LETREC_BINDING && NULL == /*_.VALDATA___V1889*/ meltfptr[1888]) /*_.VALDATA___V1889*/ meltfptr[1888] = (melt_ptr_t) sy_CLASS_SOURCE_LETREC_BINDING; } /*^getnamedsymbol */ /*getnamedsym:LETREC_ */ { melt_ptr_t sy_LETREC_ = meltgc_named_symbol ("LETREC_", MELT_GET); if (sy_LETREC_ && NULL == /*_.VALDATA___V1884*/ meltfptr[1883]) /*_.VALDATA___V1884*/ meltfptr[1883] = (melt_ptr_t) sy_LETREC_; } /*^getnamedsymbol */ /*getnamedsym:NAMED_NAME */ { melt_ptr_t sy_NAMED_NAME = meltgc_named_symbol ("NAMED_NAME", MELT_GET); if (sy_NAMED_NAME && NULL == /*_.VALDATA___V1891*/ meltfptr[1890]) /*_.VALDATA___V1891*/ meltfptr[1890] = (melt_ptr_t) sy_NAMED_NAME; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_QUOTE */ { melt_ptr_t sy_CLASS_SOURCE_QUOTE = meltgc_named_symbol ("CLASS_SOURCE_QUOTE", MELT_GET); if (sy_CLASS_SOURCE_QUOTE && NULL == /*_.VALDATA___V1901*/ meltfptr[1900]) /*_.VALDATA___V1901*/ meltfptr[1900] = (melt_ptr_t) sy_CLASS_SOURCE_QUOTE; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_COMMENT */ { melt_ptr_t sy_CLASS_SOURCE_COMMENT = meltgc_named_symbol ("CLASS_SOURCE_COMMENT", MELT_GET); if (sy_CLASS_SOURCE_COMMENT && NULL == /*_.VALDATA___V1907*/ meltfptr[1906]) /*_.VALDATA___V1907*/ meltfptr[1906] = (melt_ptr_t) sy_CLASS_SOURCE_COMMENT; } /*^getnamedsymbol */ /*getnamedsym:COMMENT_ */ { melt_ptr_t sy_COMMENT_ = meltgc_named_symbol ("COMMENT_", MELT_GET); if (sy_COMMENT_ && NULL == /*_.VALDATA___V1904*/ meltfptr[1903]) /*_.VALDATA___V1904*/ meltfptr[1903] = (melt_ptr_t) sy_COMMENT_; } /*^getnamedsymbol */ /*getnamedsym:BINDER */ { melt_ptr_t sy_BINDER = meltgc_named_symbol ("BINDER", MELT_GET); if (sy_BINDER && NULL == /*_.VALDATA___V1913*/ meltfptr[1912]) /*_.VALDATA___V1913*/ meltfptr[1912] = (melt_ptr_t) sy_BINDER; } /*^getnamedsymbol */ /*getnamedsym:FBIND_TYPE */ { melt_ptr_t sy_FBIND_TYPE = meltgc_named_symbol ("FBIND_TYPE", MELT_GET); if (sy_FBIND_TYPE && NULL == /*_.VALDATA___V1915*/ meltfptr[1914]) /*_.VALDATA___V1915*/ meltfptr[1914] = (melt_ptr_t) sy_FBIND_TYPE; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_DEFPRIMITIVE */ { melt_ptr_t sy_CLASS_SOURCE_DEFPRIMITIVE = meltgc_named_symbol ("CLASS_SOURCE_DEFPRIMITIVE", MELT_GET); if (sy_CLASS_SOURCE_DEFPRIMITIVE && NULL == /*_.VALDATA___V1924*/ meltfptr[1923]) /*_.VALDATA___V1924*/ meltfptr[1923] = (melt_ptr_t) sy_CLASS_SOURCE_DEFPRIMITIVE; } /*^getnamedsymbol */ /*getnamedsym:PRIM_FORMALS */ { melt_ptr_t sy_PRIM_FORMALS = meltgc_named_symbol ("PRIM_FORMALS", MELT_GET); if (sy_PRIM_FORMALS && NULL == /*_.VALDATA___V1926*/ meltfptr[1925]) /*_.VALDATA___V1926*/ meltfptr[1925] = (melt_ptr_t) sy_PRIM_FORMALS; } /*^getnamedsymbol */ /*getnamedsym:PRIM_EXPANSION */ { melt_ptr_t sy_PRIM_EXPANSION = meltgc_named_symbol ("PRIM_EXPANSION", MELT_GET); if (sy_PRIM_EXPANSION && NULL == /*_.VALDATA___V1928*/ meltfptr[1927]) /*_.VALDATA___V1928*/ meltfptr[1927] = (melt_ptr_t) sy_PRIM_EXPANSION; } /*^getnamedsymbol */ /*getnamedsym:PRIM_TYPE */ { melt_ptr_t sy_PRIM_TYPE = meltgc_named_symbol ("PRIM_TYPE", MELT_GET); if (sy_PRIM_TYPE && NULL == /*_.VALDATA___V1930*/ meltfptr[1929]) /*_.VALDATA___V1930*/ meltfptr[1929] = (melt_ptr_t) sy_PRIM_TYPE; } /*^getnamedsymbol */ /*getnamedsym:CLASS_PRIMITIVE_BINDING */ { melt_ptr_t sy_CLASS_PRIMITIVE_BINDING = meltgc_named_symbol ("CLASS_PRIMITIVE_BINDING", MELT_GET); if (sy_CLASS_PRIMITIVE_BINDING && NULL == /*_.VALDATA___V1932*/ meltfptr[1931]) /*_.VALDATA___V1932*/ meltfptr[1931] = (melt_ptr_t) sy_CLASS_PRIMITIVE_BINDING; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_DEFCITERATOR */ { melt_ptr_t sy_CLASS_SOURCE_DEFCITERATOR = meltgc_named_symbol ("CLASS_SOURCE_DEFCITERATOR", MELT_GET); if (sy_CLASS_SOURCE_DEFCITERATOR && NULL == /*_.VALDATA___V1936*/ meltfptr[1935]) /*_.VALDATA___V1936*/ meltfptr[1935] = (melt_ptr_t) sy_CLASS_SOURCE_DEFCITERATOR; } /*^getnamedsymbol */ /*getnamedsym:CITER_START_FORMALS */ { melt_ptr_t sy_CITER_START_FORMALS = meltgc_named_symbol ("CITER_START_FORMALS", MELT_GET); if (sy_CITER_START_FORMALS && NULL == /*_.VALDATA___V1938*/ meltfptr[1937]) /*_.VALDATA___V1938*/ meltfptr[1937] = (melt_ptr_t) sy_CITER_START_FORMALS; } /*^getnamedsymbol */ /*getnamedsym:CITER_STATE */ { melt_ptr_t sy_CITER_STATE = meltgc_named_symbol ("CITER_STATE", MELT_GET); if (sy_CITER_STATE && NULL == /*_.VALDATA___V1940*/ meltfptr[1939]) /*_.VALDATA___V1940*/ meltfptr[1939] = (melt_ptr_t) sy_CITER_STATE; } /*^getnamedsymbol */ /*getnamedsym:CITER_BODY_FORMALS */ { melt_ptr_t sy_CITER_BODY_FORMALS = meltgc_named_symbol ("CITER_BODY_FORMALS", MELT_GET); if (sy_CITER_BODY_FORMALS && NULL == /*_.VALDATA___V1942*/ meltfptr[1941]) /*_.VALDATA___V1942*/ meltfptr[1941] = (melt_ptr_t) sy_CITER_BODY_FORMALS; } /*^getnamedsymbol */ /*getnamedsym:CITER_EXPBEFORE */ { melt_ptr_t sy_CITER_EXPBEFORE = meltgc_named_symbol ("CITER_EXPBEFORE", MELT_GET); if (sy_CITER_EXPBEFORE && NULL == /*_.VALDATA___V1944*/ meltfptr[1943]) /*_.VALDATA___V1944*/ meltfptr[1943] = (melt_ptr_t) sy_CITER_EXPBEFORE; } /*^getnamedsymbol */ /*getnamedsym:CITER_EXPAFTER */ { melt_ptr_t sy_CITER_EXPAFTER = meltgc_named_symbol ("CITER_EXPAFTER", MELT_GET); if (sy_CITER_EXPAFTER && NULL == /*_.VALDATA___V1946*/ meltfptr[1945]) /*_.VALDATA___V1946*/ meltfptr[1945] = (melt_ptr_t) sy_CITER_EXPAFTER; } /*^getnamedsymbol */ /*getnamedsym:CLASS_CITERATOR_BINDING */ { melt_ptr_t sy_CLASS_CITERATOR_BINDING = meltgc_named_symbol ("CLASS_CITERATOR_BINDING", MELT_GET); if (sy_CLASS_CITERATOR_BINDING && NULL == /*_.VALDATA___V1948*/ meltfptr[1947]) /*_.VALDATA___V1948*/ meltfptr[1947] = (melt_ptr_t) sy_CLASS_CITERATOR_BINDING; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_CITERATION */ { melt_ptr_t sy_CLASS_SOURCE_CITERATION = meltgc_named_symbol ("CLASS_SOURCE_CITERATION", MELT_GET); if (sy_CLASS_SOURCE_CITERATION && NULL == /*_.VALDATA___V1959*/ meltfptr[1958]) /*_.VALDATA___V1959*/ meltfptr[1958] = (melt_ptr_t) sy_CLASS_SOURCE_CITERATION; } /*^getnamedsymbol */ /*getnamedsym:MULTIPLE_EVERY_BOTH */ { melt_ptr_t sy_MULTIPLE_EVERY_BOTH = meltgc_named_symbol ("MULTIPLE_EVERY_BOTH", MELT_GET); if (sy_MULTIPLE_EVERY_BOTH && NULL == /*_.VALDATA___V1961*/ meltfptr[1960]) /*_.VALDATA___V1961*/ meltfptr[1960] = (melt_ptr_t) sy_MULTIPLE_EVERY_BOTH; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_DEFCMATCHER */ { melt_ptr_t sy_CLASS_SOURCE_DEFCMATCHER = meltgc_named_symbol ("CLASS_SOURCE_DEFCMATCHER", MELT_GET); if (sy_CLASS_SOURCE_DEFCMATCHER && NULL == /*_.VALDATA___V1965*/ meltfptr[1964]) /*_.VALDATA___V1965*/ meltfptr[1964] = (melt_ptr_t) sy_CLASS_SOURCE_DEFCMATCHER; } /*^getnamedsymbol */ /*getnamedsym:CLASS_CMATCHER_BINDING */ { melt_ptr_t sy_CLASS_CMATCHER_BINDING = meltgc_named_symbol ("CLASS_CMATCHER_BINDING", MELT_GET); if (sy_CLASS_CMATCHER_BINDING && NULL == /*_.VALDATA___V1967*/ meltfptr[1966]) /*_.VALDATA___V1967*/ meltfptr[1966] = (melt_ptr_t) sy_CLASS_CMATCHER_BINDING; } /*^getnamedsymbol */ /*getnamedsym:AMATCH_IN */ { melt_ptr_t sy_AMATCH_IN = meltgc_named_symbol ("AMATCH_IN", MELT_GET); if (sy_AMATCH_IN && NULL == /*_.VALDATA___V1969*/ meltfptr[1968]) /*_.VALDATA___V1969*/ meltfptr[1968] = (melt_ptr_t) sy_AMATCH_IN; } /*^getnamedsymbol */ /*getnamedsym:AMATCH_MATCHBIND */ { melt_ptr_t sy_AMATCH_MATCHBIND = meltgc_named_symbol ("AMATCH_MATCHBIND", MELT_GET); if (sy_AMATCH_MATCHBIND && NULL == /*_.VALDATA___V1971*/ meltfptr[1970]) /*_.VALDATA___V1971*/ meltfptr[1970] = (melt_ptr_t) sy_AMATCH_MATCHBIND; } /*^getnamedsymbol */ /*getnamedsym:AMATCH_OUT */ { melt_ptr_t sy_AMATCH_OUT = meltgc_named_symbol ("AMATCH_OUT", MELT_GET); if (sy_AMATCH_OUT && NULL == /*_.VALDATA___V1973*/ meltfptr[1972]) /*_.VALDATA___V1973*/ meltfptr[1972] = (melt_ptr_t) sy_AMATCH_OUT; } /*^getnamedsymbol */ /*getnamedsym:CMATCH_STATE */ { melt_ptr_t sy_CMATCH_STATE = meltgc_named_symbol ("CMATCH_STATE", MELT_GET); if (sy_CMATCH_STATE && NULL == /*_.VALDATA___V1975*/ meltfptr[1974]) /*_.VALDATA___V1975*/ meltfptr[1974] = (melt_ptr_t) sy_CMATCH_STATE; } /*^getnamedsymbol */ /*getnamedsym:CMATCH_EXPTEST */ { melt_ptr_t sy_CMATCH_EXPTEST = meltgc_named_symbol ("CMATCH_EXPTEST", MELT_GET); if (sy_CMATCH_EXPTEST && NULL == /*_.VALDATA___V1977*/ meltfptr[1976]) /*_.VALDATA___V1977*/ meltfptr[1976] = (melt_ptr_t) sy_CMATCH_EXPTEST; } /*^getnamedsymbol */ /*getnamedsym:CMATCH_EXPFILL */ { melt_ptr_t sy_CMATCH_EXPFILL = meltgc_named_symbol ("CMATCH_EXPFILL", MELT_GET); if (sy_CMATCH_EXPFILL && NULL == /*_.VALDATA___V1979*/ meltfptr[1978]) /*_.VALDATA___V1979*/ meltfptr[1978] = (melt_ptr_t) sy_CMATCH_EXPFILL; } /*^getnamedsymbol */ /*getnamedsym:CMATCH_EXPOPER */ { melt_ptr_t sy_CMATCH_EXPOPER = meltgc_named_symbol ("CMATCH_EXPOPER", MELT_GET); if (sy_CMATCH_EXPOPER && NULL == /*_.VALDATA___V1981*/ meltfptr[1980]) /*_.VALDATA___V1981*/ meltfptr[1980] = (melt_ptr_t) sy_CMATCH_EXPOPER; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_DEFUNMATCHER */ { melt_ptr_t sy_CLASS_SOURCE_DEFUNMATCHER = meltgc_named_symbol ("CLASS_SOURCE_DEFUNMATCHER", MELT_GET); if (sy_CLASS_SOURCE_DEFUNMATCHER && NULL == /*_.VALDATA___V1985*/ meltfptr[1984]) /*_.VALDATA___V1985*/ meltfptr[1984] = (melt_ptr_t) sy_CLASS_SOURCE_DEFUNMATCHER; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_DEFINITION_FORMAL */ { melt_ptr_t sy_CLASS_SOURCE_DEFINITION_FORMAL = meltgc_named_symbol ("CLASS_SOURCE_DEFINITION_FORMAL", MELT_GET); if (sy_CLASS_SOURCE_DEFINITION_FORMAL && NULL == /*_.VALDATA___V1987*/ meltfptr[1986]) /*_.VALDATA___V1987*/ meltfptr[1986] = (melt_ptr_t) sy_CLASS_SOURCE_DEFINITION_FORMAL; } /*^getnamedsymbol */ /*getnamedsym:CLASS_FUNMATCHER_BINDING */ { melt_ptr_t sy_CLASS_FUNMATCHER_BINDING = meltgc_named_symbol ("CLASS_FUNMATCHER_BINDING", MELT_GET); if (sy_CLASS_FUNMATCHER_BINDING && NULL == /*_.VALDATA___V1989*/ meltfptr[1988]) /*_.VALDATA___V1989*/ meltfptr[1988] = (melt_ptr_t) sy_CLASS_FUNMATCHER_BINDING; } /*^getnamedsymbol */ /*getnamedsym:FMATCH_MATCHF */ { melt_ptr_t sy_FMATCH_MATCHF = meltgc_named_symbol ("FMATCH_MATCHF", MELT_GET); if (sy_FMATCH_MATCHF && NULL == /*_.VALDATA___V1991*/ meltfptr[1990]) /*_.VALDATA___V1991*/ meltfptr[1990] = (melt_ptr_t) sy_FMATCH_MATCHF; } /*^getnamedsymbol */ /*getnamedsym:FMATCH_DATA */ { melt_ptr_t sy_FMATCH_DATA = meltgc_named_symbol ("FMATCH_DATA", MELT_GET); if (sy_FMATCH_DATA && NULL == /*_.VALDATA___V1993*/ meltfptr[1992]) /*_.VALDATA___V1993*/ meltfptr[1992] = (melt_ptr_t) sy_FMATCH_DATA; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_DEFCLASS */ { melt_ptr_t sy_CLASS_SOURCE_DEFCLASS = meltgc_named_symbol ("CLASS_SOURCE_DEFCLASS", MELT_GET); if (sy_CLASS_SOURCE_DEFCLASS && NULL == /*_.VALDATA___V1999*/ meltfptr[1998]) /*_.VALDATA___V1999*/ meltfptr[1998] = (melt_ptr_t) sy_CLASS_SOURCE_DEFCLASS; } /*^getnamedsymbol */ /*getnamedsym:MELTOBMAG_OBJECT */ { melt_ptr_t sy_MELTOBMAG_OBJECT = meltgc_named_symbol ("MELTOBMAG_OBJECT", MELT_GET); if (sy_MELTOBMAG_OBJECT && NULL == /*_.VALDATA___V1996*/ meltfptr[1995]) /*_.VALDATA___V1996*/ meltfptr[1995] = (melt_ptr_t) sy_MELTOBMAG_OBJECT; } /*^getnamedsymbol */ /*getnamedsym:CLASS_ANCESTORS */ { melt_ptr_t sy_CLASS_ANCESTORS = meltgc_named_symbol ("CLASS_ANCESTORS", MELT_GET); if (sy_CLASS_ANCESTORS && NULL == /*_.VALDATA___V2001*/ meltfptr[2000]) /*_.VALDATA___V2001*/ meltfptr[2000] = (melt_ptr_t) sy_CLASS_ANCESTORS; } /*^getnamedsymbol */ /*getnamedsym:CLASS_FIELDS */ { melt_ptr_t sy_CLASS_FIELDS = meltgc_named_symbol ("CLASS_FIELDS", MELT_GET); if (sy_CLASS_FIELDS && NULL == /*_.VALDATA___V2003*/ meltfptr[2002]) /*_.VALDATA___V2003*/ meltfptr[2002] = (melt_ptr_t) sy_CLASS_FIELDS; } /*^getnamedsymbol */ /*getnamedsym:CLASS_FIELD_BINDING */ { melt_ptr_t sy_CLASS_FIELD_BINDING = meltgc_named_symbol ("CLASS_FIELD_BINDING", MELT_GET); if (sy_CLASS_FIELD_BINDING && NULL == /*_.VALDATA___V2005*/ meltfptr[2004]) /*_.VALDATA___V2005*/ meltfptr[2004] = (melt_ptr_t) sy_CLASS_FIELD_BINDING; } /*^getnamedsymbol */ /*getnamedsym:FLD_OWNCLASS */ { melt_ptr_t sy_FLD_OWNCLASS = meltgc_named_symbol ("FLD_OWNCLASS", MELT_GET); if (sy_FLD_OWNCLASS && NULL == /*_.VALDATA___V2007*/ meltfptr[2006]) /*_.VALDATA___V2007*/ meltfptr[2006] = (melt_ptr_t) sy_FLD_OWNCLASS; } /*^getnamedsymbol */ /*getnamedsym:DISC_SUPER */ { melt_ptr_t sy_DISC_SUPER = meltgc_named_symbol ("DISC_SUPER", MELT_GET); if (sy_DISC_SUPER && NULL == /*_.VALDATA___V2009*/ meltfptr[2008]) /*_.VALDATA___V2009*/ meltfptr[2008] = (melt_ptr_t) sy_DISC_SUPER; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_DEFINSTANCE */ { melt_ptr_t sy_CLASS_SOURCE_DEFINSTANCE = meltgc_named_symbol ("CLASS_SOURCE_DEFINSTANCE", MELT_GET); if (sy_CLASS_SOURCE_DEFINSTANCE && NULL == /*_.VALDATA___V2014*/ meltfptr[2013]) /*_.VALDATA___V2014*/ meltfptr[2013] = (melt_ptr_t) sy_CLASS_SOURCE_DEFINSTANCE; } /*^getnamedsymbol */ /*getnamedsym:CLASS_INSTANCE_BINDING */ { melt_ptr_t sy_CLASS_INSTANCE_BINDING = meltgc_named_symbol ("CLASS_INSTANCE_BINDING", MELT_GET); if (sy_CLASS_INSTANCE_BINDING && NULL == /*_.VALDATA___V2016*/ meltfptr[2015]) /*_.VALDATA___V2016*/ meltfptr[2015] = (melt_ptr_t) sy_CLASS_INSTANCE_BINDING; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_DEFINE */ { melt_ptr_t sy_CLASS_SOURCE_DEFINE = meltgc_named_symbol ("CLASS_SOURCE_DEFINE", MELT_GET); if (sy_CLASS_SOURCE_DEFINE && NULL == /*_.VALDATA___V2021*/ meltfptr[2020]) /*_.VALDATA___V2021*/ meltfptr[2020] = (melt_ptr_t) sy_CLASS_SOURCE_DEFINE; } /*^getnamedsymbol */ /*getnamedsym:SDEFSEL_FORMALS */ { melt_ptr_t sy_SDEFSEL_FORMALS = meltgc_named_symbol ("SDEFSEL_FORMALS", MELT_GET); if (sy_SDEFSEL_FORMALS && NULL == /*_.VALDATA___V2026*/ meltfptr[2025]) /*_.VALDATA___V2026*/ meltfptr[2025] = (melt_ptr_t) sy_SDEFSEL_FORMALS; } /*^getnamedsymbol */ /*getnamedsym:_VALUEXPORTER_ */ { melt_ptr_t sy_VALUEXPORTER_ = meltgc_named_symbol ("_VALUEXPORTER_", MELT_GET); if (sy_VALUEXPORTER_ && NULL == /*_.VALDATA___V2029*/ meltfptr[2028]) /*_.VALDATA___V2029*/ meltfptr[2028] = (melt_ptr_t) sy_VALUEXPORTER_; } /*^getnamedsymbol */ /*getnamedsym:SYSDATA_VALUE_EXPORTER */ { melt_ptr_t sy_SYSDATA_VALUE_EXPORTER = meltgc_named_symbol ("SYSDATA_VALUE_EXPORTER", MELT_GET); if (sy_SYSDATA_VALUE_EXPORTER && NULL == /*_.VALDATA___V2032*/ meltfptr[2031]) /*_.VALDATA___V2032*/ meltfptr[2031] = (melt_ptr_t) sy_SYSDATA_VALUE_EXPORTER; } /*^getnamedsymbol */ /*getnamedsym:_EXPORTED_ */ { melt_ptr_t sy_EXPORTED_ = meltgc_named_symbol ("_EXPORTED_", MELT_GET); if (sy_EXPORTED_ && NULL == /*_.VALDATA___V2035*/ meltfptr[2034]) /*_.VALDATA___V2035*/ meltfptr[2034] = (melt_ptr_t) sy_EXPORTED_; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ { melt_ptr_t sy_CLASS_SOURCE_CURRENT_MODULE_ENVIRONMENT_CONTAINER = meltgc_named_symbol ("CLASS_SOURCE_CURRENT_MODULE_ENVIRONMENT_CONTAINER", MELT_GET); if (sy_CLASS_SOURCE_CURRENT_MODULE_ENVIRONMENT_CONTAINER && NULL == /*_.VALDATA___V2038*/ meltfptr[2037]) /*_.VALDATA___V2038*/ meltfptr[2037] = (melt_ptr_t) sy_CLASS_SOURCE_CURRENT_MODULE_ENVIRONMENT_CONTAINER; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_EXPORT_VALUES */ { melt_ptr_t sy_CLASS_SOURCE_EXPORT_VALUES = meltgc_named_symbol ("CLASS_SOURCE_EXPORT_VALUES", MELT_GET); if (sy_CLASS_SOURCE_EXPORT_VALUES && NULL == /*_.VALDATA___V2042*/ meltfptr[2041]) /*_.VALDATA___V2042*/ meltfptr[2041] = (melt_ptr_t) sy_CLASS_SOURCE_EXPORT_VALUES; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_EXPORT_SYNONYM */ { melt_ptr_t sy_CLASS_SOURCE_EXPORT_SYNONYM = meltgc_named_symbol ("CLASS_SOURCE_EXPORT_SYNONYM", MELT_GET); if (sy_CLASS_SOURCE_EXPORT_SYNONYM && NULL == /*_.VALDATA___V2046*/ meltfptr[2045]) /*_.VALDATA___V2046*/ meltfptr[2045] = (melt_ptr_t) sy_CLASS_SOURCE_EXPORT_SYNONYM; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_EXPORT_CLASS */ { melt_ptr_t sy_CLASS_SOURCE_EXPORT_CLASS = meltgc_named_symbol ("CLASS_SOURCE_EXPORT_CLASS", MELT_GET); if (sy_CLASS_SOURCE_EXPORT_CLASS && NULL == /*_.VALDATA___V2052*/ meltfptr[2051]) /*_.VALDATA___V2052*/ meltfptr[2051] = (melt_ptr_t) sy_CLASS_SOURCE_EXPORT_CLASS; } /*^getnamedsymbol */ /*getnamedsym:_MACROXPORTER_ */ { melt_ptr_t sy_MACROXPORTER_ = meltgc_named_symbol ("_MACROXPORTER_", MELT_GET); if (sy_MACROXPORTER_ && NULL == /*_.VALDATA___V2055*/ meltfptr[2054]) /*_.VALDATA___V2055*/ meltfptr[2054] = (melt_ptr_t) sy_MACROXPORTER_; } /*^getnamedsymbol */ /*getnamedsym:SYSDATA_MACRO_EXPORTER */ { melt_ptr_t sy_SYSDATA_MACRO_EXPORTER = meltgc_named_symbol ("SYSDATA_MACRO_EXPORTER", MELT_GET); if (sy_SYSDATA_MACRO_EXPORTER && NULL == /*_.VALDATA___V2058*/ meltfptr[2057]) /*_.VALDATA___V2058*/ meltfptr[2057] = (melt_ptr_t) sy_SYSDATA_MACRO_EXPORTER; } /*^getnamedsymbol */ /*getnamedsym:_PATMACROXPORTER_ */ { melt_ptr_t sy_PATMACROXPORTER_ = meltgc_named_symbol ("_PATMACROXPORTER_", MELT_GET); if (sy_PATMACROXPORTER_ && NULL == /*_.VALDATA___V2061*/ meltfptr[2060]) /*_.VALDATA___V2061*/ meltfptr[2060] = (melt_ptr_t) sy_PATMACROXPORTER_; } /*^getnamedsymbol */ /*getnamedsym:SYSDATA_PATMACRO_EXPORTER */ { melt_ptr_t sy_SYSDATA_PATMACRO_EXPORTER = meltgc_named_symbol ("SYSDATA_PATMACRO_EXPORTER", MELT_GET); if (sy_SYSDATA_PATMACRO_EXPORTER && NULL == /*_.VALDATA___V2064*/ meltfptr[2063]) /*_.VALDATA___V2064*/ meltfptr[2063] = (melt_ptr_t) sy_SYSDATA_PATMACRO_EXPORTER; } /*^getnamedsymbol */ /*getnamedsym:_EXPORTEDM_ */ { melt_ptr_t sy_EXPORTEDM_ = meltgc_named_symbol ("_EXPORTEDM_", MELT_GET); if (sy_EXPORTEDM_ && NULL == /*_.VALDATA___V2067*/ meltfptr[2066]) /*_.VALDATA___V2067*/ meltfptr[2066] = (melt_ptr_t) sy_EXPORTEDM_; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_EXPORT_MACRO */ { melt_ptr_t sy_CLASS_SOURCE_EXPORT_MACRO = meltgc_named_symbol ("CLASS_SOURCE_EXPORT_MACRO", MELT_GET); if (sy_CLASS_SOURCE_EXPORT_MACRO && NULL == /*_.VALDATA___V2072*/ meltfptr[2071]) /*_.VALDATA___V2072*/ meltfptr[2071] = (melt_ptr_t) sy_CLASS_SOURCE_EXPORT_MACRO; } /*^getnamedsymbol */ /*getnamedsym:_EXPORTEDPAT_ */ { melt_ptr_t sy_EXPORTEDPAT_ = meltgc_named_symbol ("_EXPORTEDPAT_", MELT_GET); if (sy_EXPORTEDPAT_ && NULL == /*_.VALDATA___V2075*/ meltfptr[2074]) /*_.VALDATA___V2075*/ meltfptr[2074] = (melt_ptr_t) sy_EXPORTEDPAT_; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_EXPORT_PATMACRO */ { melt_ptr_t sy_CLASS_SOURCE_EXPORT_PATMACRO = meltgc_named_symbol ("CLASS_SOURCE_EXPORT_PATMACRO", MELT_GET); if (sy_CLASS_SOURCE_EXPORT_PATMACRO && NULL == /*_.VALDATA___V2080*/ meltfptr[2079]) /*_.VALDATA___V2080*/ meltfptr[2079] = (melt_ptr_t) sy_CLASS_SOURCE_EXPORT_PATMACRO; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_PARENT_MODULE_ENVIRONMENT */ { melt_ptr_t sy_CLASS_SOURCE_PARENT_MODULE_ENVIRONMENT = meltgc_named_symbol ("CLASS_SOURCE_PARENT_MODULE_ENVIRONMENT", MELT_GET); if (sy_CLASS_SOURCE_PARENT_MODULE_ENVIRONMENT && NULL == /*_.VALDATA___V2086*/ meltfptr[2085]) /*_.VALDATA___V2086*/ meltfptr[2085] = (melt_ptr_t) sy_CLASS_SOURCE_PARENT_MODULE_ENVIRONMENT; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ { melt_ptr_t sy_CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER = meltgc_named_symbol ("CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER", MELT_GET); if (sy_CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER && NULL == /*_.VALDATA___V2094*/ meltfptr[2093]) /*_.VALDATA___V2094*/ meltfptr[2093] = (melt_ptr_t) sy_CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER; } /*^getnamedsymbol */ /*getnamedsym:CHECKRUNMODENVBOX_ */ { melt_ptr_t sy_CHECKRUNMODENVBOX_ = meltgc_named_symbol ("CHECKRUNMODENVBOX_", MELT_GET); if (sy_CHECKRUNMODENVBOX_ && NULL == /*_.VALDATA___V2089*/ meltfptr[2088]) /*_.VALDATA___V2089*/ meltfptr[2088] = (melt_ptr_t) sy_CHECKRUNMODENVBOX_; } /*^getnamedsymbol */ /*getnamedsym:UPDATCURMODENVBOX_ */ { melt_ptr_t sy_UPDATCURMODENVBOX_ = meltgc_named_symbol ("UPDATCURMODENVBOX_", MELT_GET); if (sy_UPDATCURMODENVBOX_ && NULL == /*_.VALDATA___V2091*/ meltfptr[2090]) /*_.VALDATA___V2091*/ meltfptr[2090] = (melt_ptr_t) sy_UPDATCURMODENVBOX_; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_FETCH_PREDEFINED */ { melt_ptr_t sy_CLASS_SOURCE_FETCH_PREDEFINED = meltgc_named_symbol ("CLASS_SOURCE_FETCH_PREDEFINED", MELT_GET); if (sy_CLASS_SOURCE_FETCH_PREDEFINED && NULL == /*_.VALDATA___V2096*/ meltfptr[2095]) /*_.VALDATA___V2096*/ meltfptr[2095] = (melt_ptr_t) sy_CLASS_SOURCE_FETCH_PREDEFINED; } /*^getnamedsymbol */ /*getnamedsym:SYSDATA_CONT_FRESH_ENV */ { melt_ptr_t sy_SYSDATA_CONT_FRESH_ENV = meltgc_named_symbol ("SYSDATA_CONT_FRESH_ENV", MELT_GET); if (sy_SYSDATA_CONT_FRESH_ENV && NULL == /*_.VALDATA___V2098*/ meltfptr[2097]) /*_.VALDATA___V2098*/ meltfptr[2097] = (melt_ptr_t) sy_SYSDATA_CONT_FRESH_ENV; } /*^getnamedsymbol */ /*getnamedsym:MAPOBJECT_EVERY */ { melt_ptr_t sy_MAPOBJECT_EVERY = meltgc_named_symbol ("MAPOBJECT_EVERY", MELT_GET); if (sy_MAPOBJECT_EVERY && NULL == /*_.VALDATA___V2103*/ meltfptr[2102]) /*_.VALDATA___V2103*/ meltfptr[2102] = (melt_ptr_t) sy_MAPOBJECT_EVERY; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_STORE_PREDEFINED */ { melt_ptr_t sy_CLASS_SOURCE_STORE_PREDEFINED = meltgc_named_symbol ("CLASS_SOURCE_STORE_PREDEFINED", MELT_GET); if (sy_CLASS_SOURCE_STORE_PREDEFINED && NULL == /*_.VALDATA___V2110*/ meltfptr[2109]) /*_.VALDATA___V2110*/ meltfptr[2109] = (melt_ptr_t) sy_CLASS_SOURCE_STORE_PREDEFINED; } /*^getnamedsymbol */ /*getnamedsym:_STOREPREDEF_ */ { melt_ptr_t sy_STOREPREDEF_ = meltgc_named_symbol ("_STOREPREDEF_", MELT_GET); if (sy_STOREPREDEF_ && NULL == /*_.VALDATA___V2107*/ meltfptr[2106]) /*_.VALDATA___V2107*/ meltfptr[2106] = (melt_ptr_t) sy_STOREPREDEF_; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_CHEADER */ { melt_ptr_t sy_CLASS_SOURCE_CHEADER = meltgc_named_symbol ("CLASS_SOURCE_CHEADER", MELT_GET); if (sy_CLASS_SOURCE_CHEADER && NULL == /*_.VALDATA___V2114*/ meltfptr[2113]) /*_.VALDATA___V2114*/ meltfptr[2113] = (melt_ptr_t) sy_CLASS_SOURCE_CHEADER; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_USE_PACKAGE_FROM_PKG_CONFIG */ { melt_ptr_t sy_CLASS_SOURCE_USE_PACKAGE_FROM_PKG_CONFIG = meltgc_named_symbol ("CLASS_SOURCE_USE_PACKAGE_FROM_PKG_CONFIG", MELT_GET); if (sy_CLASS_SOURCE_USE_PACKAGE_FROM_PKG_CONFIG && NULL == /*_.VALDATA___V2118*/ meltfptr[2117]) /*_.VALDATA___V2118*/ meltfptr[2117] = (melt_ptr_t) sy_CLASS_SOURCE_USE_PACKAGE_FROM_PKG_CONFIG; } /*^getnamedsymbol */ /*getnamedsym:CHECK_CTYPE_NARGS */ { melt_ptr_t sy_CHECK_CTYPE_NARGS = meltgc_named_symbol ("CHECK_CTYPE_NARGS", MELT_GET); if (sy_CHECK_CTYPE_NARGS && NULL == /*_.VALDATA___V2120*/ meltfptr[2119]) /*_.VALDATA___V2120*/ meltfptr[2119] = (melt_ptr_t) sy_CHECK_CTYPE_NARGS; } /*^getnamedsymbol */ /*getnamedsym:CREATE_NORMCONTEXT */ { melt_ptr_t sy_CREATE_NORMCONTEXT = meltgc_named_symbol ("CREATE_NORMCONTEXT", MELT_GET); if (sy_CREATE_NORMCONTEXT && NULL == /*_.VALDATA___V2122*/ meltfptr[2121]) /*_.VALDATA___V2122*/ meltfptr[2121] = (melt_ptr_t) sy_CREATE_NORMCONTEXT; } /*^getnamedsymbol */ /*getnamedsym:CREATE_NORMAL_EXTENDING_CONTEXT */ { melt_ptr_t sy_CREATE_NORMAL_EXTENDING_CONTEXT = meltgc_named_symbol ("CREATE_NORMAL_EXTENDING_CONTEXT", MELT_GET); if (sy_CREATE_NORMAL_EXTENDING_CONTEXT && NULL == /*_.VALDATA___V2124*/ meltfptr[2123]) /*_.VALDATA___V2124*/ meltfptr[2123] = (melt_ptr_t) sy_CREATE_NORMAL_EXTENDING_CONTEXT; } /*^getnamedsymbol */ /*getnamedsym:NORMAL_PREDEF */ { melt_ptr_t sy_NORMAL_PREDEF = meltgc_named_symbol ("NORMAL_PREDEF", MELT_GET); if (sy_NORMAL_PREDEF && NULL == /*_.VALDATA___V2126*/ meltfptr[2125]) /*_.VALDATA___V2126*/ meltfptr[2125] = (melt_ptr_t) sy_NORMAL_PREDEF; } /*^getnamedsymbol */ /*getnamedsym:NORMALIZE_TUPLE */ { melt_ptr_t sy_NORMALIZE_TUPLE = meltgc_named_symbol ("NORMALIZE_TUPLE", MELT_GET); if (sy_NORMALIZE_TUPLE && NULL == /*_.VALDATA___V2128*/ meltfptr[2127]) /*_.VALDATA___V2128*/ meltfptr[2127] = (melt_ptr_t) sy_NORMALIZE_TUPLE; } /*^getnamedsymbol */ /*getnamedsym:REGISTER_LITERAL_VALUE */ { melt_ptr_t sy_REGISTER_LITERAL_VALUE = meltgc_named_symbol ("REGISTER_LITERAL_VALUE", MELT_GET); if (sy_REGISTER_LITERAL_VALUE && NULL == /*_.VALDATA___V2130*/ meltfptr[2129]) /*_.VALDATA___V2130*/ meltfptr[2129] = (melt_ptr_t) sy_REGISTER_LITERAL_VALUE; } /*^getnamedsymbol */ /*getnamedsym:WRAP_NORMAL_LET1 */ { melt_ptr_t sy_WRAP_NORMAL_LET1 = meltgc_named_symbol ("WRAP_NORMAL_LET1", MELT_GET); if (sy_WRAP_NORMAL_LET1 && NULL == /*_.VALDATA___V2132*/ meltfptr[2131]) /*_.VALDATA___V2132*/ meltfptr[2131] = (melt_ptr_t) sy_WRAP_NORMAL_LET1; } /*^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___V2134*/ meltfptr[2133]) /*_.VALDATA___V2134*/ meltfptr[2133] = (melt_ptr_t) sy_WRAP_NORMAL_LETSEQ; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_DATA */ { melt_ptr_t sy_CLASS_NREP_DATA = meltgc_named_symbol ("CLASS_NREP_DATA", MELT_GET); if (sy_CLASS_NREP_DATA && NULL == /*_.VALDATA___V2136*/ meltfptr[2135]) /*_.VALDATA___V2136*/ meltfptr[2135] = (melt_ptr_t) sy_CLASS_NREP_DATA; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_CHECKINTERRUPT */ { melt_ptr_t sy_CLASS_NREP_CHECKINTERRUPT = meltgc_named_symbol ("CLASS_NREP_CHECKINTERRUPT", MELT_GET); if (sy_CLASS_NREP_CHECKINTERRUPT && NULL == /*_.VALDATA___V2138*/ meltfptr[2137]) /*_.VALDATA___V2138*/ meltfptr[2137] = (melt_ptr_t) sy_CLASS_NREP_CHECKINTERRUPT; } /*^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-normal"; /*_.CLASS_ROOT__V7*/ meltfptr[6] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173]), (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-normal"; /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V688*/ meltfptr[687]), (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-normal"; /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1217*/ meltfptr[1216]), (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-normal"; /*_.DISCR_INTEGER__V10*/ meltfptr[9] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1219*/ meltfptr[1218]), (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-normal"; /*_.CLASS_PROPED__V11*/ meltfptr[10] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1272*/ meltfptr[1271]), (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-normal"; /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1444*/ meltfptr[1443]), (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_RUNNING_EXTENSION_MODULE_CONTEXT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_RUNNING_EXTENSION_MODULE_CONTEXT__V13*/ meltfptr[12] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1446*/ meltfptr[1445]), (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-normal"; /*_.DISCR_CONSTANT_INTEGER__V14*/ meltfptr[13] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1340*/ meltfptr[1339]), (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-normal"; /*_.DISCR_MAP_OBJECTS__V15*/ meltfptr[14] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1368*/ meltfptr[1367]), (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_MODULE_CONTEXT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_MODULE_CONTEXT__V16*/ meltfptr[15] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1450*/ meltfptr[1449]), (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-normal"; /*_.DISCR_LIST__V17*/ meltfptr[16] = 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 = "DISCR_MAP_STRINGS"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.DISCR_MAP_STRINGS__V18*/ meltfptr[17] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1374*/ meltfptr[1373]), (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-normal"; /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1240*/ meltfptr[1239]), (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-normal"; /*_.CLASS_SELECTOR__V20*/ meltfptr[19] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1276*/ meltfptr[1275]), (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-normal"; /*_.INSTALL_METHOD__V21*/ meltfptr[20] = 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); } /*^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-normal"; /*_.DISCR_STRING__V22*/ meltfptr[21] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1406*/ meltfptr[1405]), (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_NULL_RECEIVER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.DISCR_NULL_RECEIVER__V23*/ meltfptr[22] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1390*/ meltfptr[1389]), (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-normal"; /*_.CLASS_NAMED__V24*/ meltfptr[23] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1268*/ meltfptr[1267]), (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-normal"; /*_.DISCR_ANY_RECEIVER__V25*/ meltfptr[24] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1326*/ meltfptr[1325]), (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"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE__V26*/ meltfptr[25] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1483*/ meltfptr[1482]), (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-normal"; /*_.CLASS_LOCATED__V27*/ meltfptr[26] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1264*/ meltfptr[1263]), (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_LAZY_MACRO_EXPANSION"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_LAZY_MACRO_EXPANSION__V28*/ meltfptr[27] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1487*/ meltfptr[1486]), (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-normal"; /*_.CLASS_SYMBOL__V29*/ meltfptr[28] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1282*/ meltfptr[1281]), (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-normal"; /*_.CTYPE_VALUE__V30*/ meltfptr[29] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1322*/ meltfptr[1321]), (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-normal"; /*_.CTYPE_LONG__V31*/ meltfptr[30] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1298*/ meltfptr[1297]), (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_CSTRING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CTYPE_CSTRING__V32*/ meltfptr[31] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1290*/ meltfptr[1289]), (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-normal"; /*_.MULTIPLE_MAP__V33*/ meltfptr[32] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1509*/ meltfptr[1508]), (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_EVERY"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.LIST_EVERY__V34*/ meltfptr[33] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1511*/ meltfptr[1510]), (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-normal"; /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1516*/ meltfptr[1515]), (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-normal"; /*_.LIST_TO_MULTIPLE__V36*/ meltfptr[35] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1518*/ meltfptr[1517]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^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-normal"; /*_.DISCR_MULTIPLE__V37*/ meltfptr[36] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1386*/ meltfptr[1385]), (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_EVERY"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.MULTIPLE_EVERY__V38*/ meltfptr[37] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1526*/ meltfptr[1525]), (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-normal"; /*_.CLASS_CTYPE__V39*/ meltfptr[38] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1232*/ meltfptr[1231]), (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-normal"; /*_.CLASS_REFERENCE__V40*/ meltfptr[39] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1274*/ meltfptr[1273]), (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-normal"; /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1244*/ meltfptr[1243]), (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-normal"; /*_.CLASS_LET_BINDING__V42*/ meltfptr[41] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1548*/ meltfptr[1547]), (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_FIXED_BINDING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_FIXED_BINDING__V43*/ meltfptr[42] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1552*/ meltfptr[1551]), (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_DEFINED_VALUE_BINDING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_DEFINED_VALUE_BINDING__V44*/ meltfptr[43] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1556*/ meltfptr[1555]), (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_ENCLOSING_ENV"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.FIND_ENCLOSING_ENV__V45*/ meltfptr[44] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1572*/ meltfptr[1571]), (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_VALUE_BINDING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_VALUE_BINDING__V46*/ meltfptr[45] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1574*/ meltfptr[1573]), (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-normal"; /*_.CLASS_CLASS__V47*/ meltfptr[46] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1228*/ meltfptr[1227]), (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-normal"; /*_.FIND_ENV__V48*/ meltfptr[47] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1580*/ meltfptr[1579]), (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_BINDING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_CLASS_BINDING__V49*/ meltfptr[48] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1582*/ meltfptr[1581]), (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_PRIMITIVE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_PRIMITIVE__V50*/ meltfptr[49] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1588*/ meltfptr[1587]), (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_PRIMITIVE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_PRIMITIVE__V51*/ meltfptr[50] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1270*/ meltfptr[1269]), (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-normal"; /*_.CLONE_SYMBOL__V52*/ meltfptr[51] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1590*/ meltfptr[1589]), (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_CODECHUNK"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_CODECHUNK__V53*/ meltfptr[52] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1595*/ meltfptr[1594]), (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-normal"; /*_.DISCR_STRBUF__V54*/ meltfptr[53] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1404*/ meltfptr[1403]), (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-normal"; /*_.CLASS_CLONED_SYMBOL__V55*/ meltfptr[54] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1597*/ meltfptr[1596]), (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-normal"; /*_.DISCR_VERBATIM_STRING__V56*/ meltfptr[55] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1410*/ meltfptr[1409]), (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-normal"; /*_.CTYPE_VOID__V57*/ meltfptr[56] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1324*/ meltfptr[1323]), (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_CMATCHEXPR"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_CMATCHEXPR__V58*/ meltfptr[57] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1603*/ meltfptr[1602]), (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-normal"; /*_.CLASS_CMATCHER__V59*/ meltfptr[58] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1230*/ meltfptr[1229]), (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_FUNMATCHEXPR"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_FUNMATCHEXPR__V60*/ meltfptr[59] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1607*/ meltfptr[1606]), (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_FUNMATCHER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_FUNMATCHER__V61*/ meltfptr[60] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1246*/ meltfptr[1245]), (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 = "FMATCH_APPLYF"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.FMATCH_APPLYF__V62*/ meltfptr[61] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1609*/ meltfptr[1608]), (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-normal"; /*_.LIST_APPEND2LIST__V63*/ meltfptr[62] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1611*/ meltfptr[1610]), (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_APPLY"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_APPLY__V64*/ meltfptr[63] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1617*/ meltfptr[1616]), (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_MSEND"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_MSEND__V65*/ meltfptr[64] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1621*/ meltfptr[1620]), (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_BINDING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SELECTOR_BINDING__V66*/ meltfptr[65] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1623*/ meltfptr[1622]), (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_DEFSELECTOR"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_DEFSELECTOR__V67*/ meltfptr[66] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1625*/ meltfptr[1624]), (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_RETURN"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_RETURN__V68*/ meltfptr[67] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1633*/ meltfptr[1632]), (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_IF"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_IF__V69*/ meltfptr[68] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1642*/ meltfptr[1641]), (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-normal"; /*_.FRESH_ENV__V70*/ meltfptr[69] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1644*/ meltfptr[1643]), (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-normal"; /*_.PUT_ENV__V71*/ meltfptr[70] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1646*/ meltfptr[1645]), (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_IFELSE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_IFELSE__V72*/ meltfptr[71] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1656*/ meltfptr[1655]), (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_CPPIF"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_CPPIF__V73*/ meltfptr[72] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1664*/ meltfptr[1663]), (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_OR"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_OR__V74*/ meltfptr[73] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1672*/ meltfptr[1671]), (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_BACKWARD_EVERY"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.MULTIPLE_BACKWARD_EVERY__V75*/ meltfptr[74] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1674*/ meltfptr[1673]), (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_PROGN"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_PROGN__V76*/ meltfptr[75] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1680*/ meltfptr[1679]), (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_LET"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_LET__V77*/ meltfptr[76] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1689*/ meltfptr[1688]), (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_LET_BINDING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_LET_BINDING__V78*/ meltfptr[77] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1691*/ meltfptr[1690]), (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_UNSAFE_GET_FIELD"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_UNSAFE_GET_FIELD__V79*/ meltfptr[78] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1696*/ meltfptr[1695]), (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-normal"; /*_.CLASS_FIELD__V80*/ meltfptr[79] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1242*/ meltfptr[1241]), (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_GET_FIELD"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_GET_FIELD__V81*/ meltfptr[80] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1700*/ meltfptr[1699]), (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_UNSAFE_PUT_FIELDS"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_UNSAFE_PUT_FIELDS__V82*/ meltfptr[81] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1709*/ meltfptr[1708]), (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_FIELDASSIGN"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_FIELDASSIGN__V83*/ meltfptr[82] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1711*/ meltfptr[1710]), (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_PUT_FIELDS"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_PUT_FIELDS__V84*/ meltfptr[83] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1720*/ meltfptr[1719]), (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_SETQ"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_SETQ__V85*/ meltfptr[84] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1726*/ meltfptr[1725]), (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_INSTANCE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_INSTANCE__V86*/ meltfptr[85] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1736*/ meltfptr[1735]), (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_FOREVER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_FOREVER__V87*/ meltfptr[86] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1745*/ meltfptr[1744]), (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_LABEL_BINDING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_LABEL_BINDING__V88*/ meltfptr[87] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1747*/ meltfptr[1746]), (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 = "LABIND_CLONSY"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.LABIND_CLONSY__V89*/ meltfptr[88] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1749*/ meltfptr[1748]), (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_EXIT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_EXIT__V90*/ meltfptr[89] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1755*/ meltfptr[1754]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_SOURCE_AGAIN"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_AGAIN__V91*/ meltfptr[90] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1761*/ meltfptr[1760]), (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_IFVARIADIC"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_IFVARIADIC__V92*/ meltfptr[91] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1769*/ meltfptr[1768]), (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_VARIADIC_FORMAL_SEQUENCE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.DISCR_VARIADIC_FORMAL_SEQUENCE__V93*/ meltfptr[92] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1771*/ meltfptr[1770]), (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_COMPILEWARNING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_COMPILEWARNING__V94*/ meltfptr[93] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1775*/ meltfptr[1774]), (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_DEFUN"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_DEFUN__V95*/ meltfptr[94] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1787*/ meltfptr[1786]), (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_ROUTINE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.DISCR_ROUTINE__V96*/ meltfptr[95] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1398*/ meltfptr[1397]), (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_CLOSURE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.DISCR_CLOSURE__V97*/ meltfptr[96] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1338*/ meltfptr[1337]), (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_FUNCTION_BINDING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_FUNCTION_BINDING__V98*/ meltfptr[97] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1789*/ meltfptr[1788]), (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_LAMBDA"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_LAMBDA__V99*/ meltfptr[98] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1796*/ meltfptr[1795]), (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_MULTICALL"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_MULTICALL__V100*/ meltfptr[99] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1807*/ meltfptr[1806]), (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_ITERATE_TEST"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.LIST_ITERATE_TEST__V101*/ meltfptr[100] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1809*/ meltfptr[1808]), (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_TUPLE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_TUPLE__V102*/ meltfptr[101] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1817*/ meltfptr[1816]), (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_LIST"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_LIST__V103*/ meltfptr[102] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1830*/ meltfptr[1829]), (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_PAIR"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.DISCR_PAIR__V104*/ meltfptr[103] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1392*/ meltfptr[1391]), (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_ARGUMENTED_OPERATOR"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_ARGUMENTED_OPERATOR__V105*/ meltfptr[104] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1868*/ meltfptr[1867]), (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_LETREC"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_LETREC__V106*/ meltfptr[105] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1887*/ meltfptr[1886]), (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_LETREC_BINDING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_LETREC_BINDING__V107*/ meltfptr[106] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1889*/ meltfptr[1888]), (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 = "NAMED_NAME"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.NAMED_NAME__V108*/ meltfptr[107] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1891*/ meltfptr[1890]), (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_KEYWORD"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_KEYWORD__V109*/ meltfptr[108] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1262*/ meltfptr[1261]), (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_QUOTE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_QUOTE__V110*/ meltfptr[109] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1901*/ meltfptr[1900]), (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_COMMENT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_COMMENT__V111*/ meltfptr[110] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1907*/ meltfptr[1906]), (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 = "BINDER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.BINDER__V112*/ meltfptr[111] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1913*/ meltfptr[1912]), (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 = "FBIND_TYPE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.FBIND_TYPE__V113*/ meltfptr[112] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1915*/ meltfptr[1914]), (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_DEFPRIMITIVE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_DEFPRIMITIVE__V114*/ meltfptr[113] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1924*/ meltfptr[1923]), (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 = "PRIM_FORMALS"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.PRIM_FORMALS__V115*/ meltfptr[114] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1926*/ meltfptr[1925]), (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 = "PRIM_EXPANSION"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.PRIM_EXPANSION__V116*/ meltfptr[115] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1928*/ meltfptr[1927]), (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 = "PRIM_TYPE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.PRIM_TYPE__V117*/ meltfptr[116] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1930*/ meltfptr[1929]), (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_PRIMITIVE_BINDING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_PRIMITIVE_BINDING__V118*/ meltfptr[117] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1932*/ meltfptr[1931]), (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_DEFCITERATOR"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_DEFCITERATOR__V119*/ meltfptr[118] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1936*/ meltfptr[1935]), (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_CITERATOR"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_CITERATOR__V120*/ meltfptr[119] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1226*/ meltfptr[1225]), (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 = "CITER_START_FORMALS"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CITER_START_FORMALS__V121*/ meltfptr[120] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1938*/ meltfptr[1937]), (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 = "CITER_STATE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CITER_STATE__V122*/ meltfptr[121] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1940*/ meltfptr[1939]), (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 = "CITER_BODY_FORMALS"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CITER_BODY_FORMALS__V123*/ meltfptr[122] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1942*/ meltfptr[1941]), (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 = "CITER_EXPBEFORE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CITER_EXPBEFORE__V124*/ meltfptr[123] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1944*/ meltfptr[1943]), (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 = "CITER_EXPAFTER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CITER_EXPAFTER__V125*/ meltfptr[124] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1946*/ meltfptr[1945]), (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_CITERATOR_BINDING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_CITERATOR_BINDING__V126*/ meltfptr[125] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1948*/ meltfptr[1947]), (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_CITERATION"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_CITERATION__V127*/ meltfptr[126] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1959*/ meltfptr[1958]), (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_EVERY_BOTH"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.MULTIPLE_EVERY_BOTH__V128*/ meltfptr[127] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1961*/ meltfptr[1960]), (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_DEFCMATCHER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_DEFCMATCHER__V129*/ meltfptr[128] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1965*/ meltfptr[1964]), (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_BINDING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_CMATCHER_BINDING__V130*/ meltfptr[129] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1967*/ meltfptr[1966]), (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 = "AMATCH_IN"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.AMATCH_IN__V131*/ meltfptr[130] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1969*/ meltfptr[1968]), (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 = "AMATCH_MATCHBIND"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.AMATCH_MATCHBIND__V132*/ meltfptr[131] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1971*/ meltfptr[1970]), (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 = "AMATCH_OUT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.AMATCH_OUT__V133*/ meltfptr[132] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1973*/ meltfptr[1972]), (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 = "CMATCH_STATE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CMATCH_STATE__V134*/ meltfptr[133] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1975*/ meltfptr[1974]), (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 = "CMATCH_EXPTEST"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CMATCH_EXPTEST__V135*/ meltfptr[134] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1977*/ meltfptr[1976]), (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 = "CMATCH_EXPFILL"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CMATCH_EXPFILL__V136*/ meltfptr[135] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1979*/ meltfptr[1978]), (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 = "CMATCH_EXPOPER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CMATCH_EXPOPER__V137*/ meltfptr[136] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1981*/ meltfptr[1980]), (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_DEFUNMATCHER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_DEFUNMATCHER__V138*/ meltfptr[137] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1985*/ meltfptr[1984]), (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_DEFINITION_FORMAL"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_DEFINITION_FORMAL__V139*/ meltfptr[138] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1987*/ meltfptr[1986]), (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_FUNMATCHER_BINDING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_FUNMATCHER_BINDING__V140*/ meltfptr[139] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1989*/ meltfptr[1988]), (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 = "FMATCH_MATCHF"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.FMATCH_MATCHF__V141*/ meltfptr[140] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1991*/ meltfptr[1990]), (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 = "FMATCH_DATA"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.FMATCH_DATA__V142*/ meltfptr[141] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1993*/ meltfptr[1992]), (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_DEFCLASS"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_DEFCLASS__V143*/ meltfptr[142] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1999*/ meltfptr[1998]), (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_CLASS_SEQUENCE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.DISCR_CLASS_SEQUENCE__V144*/ meltfptr[143] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1336*/ meltfptr[1335]), (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_FIELD_SEQUENCE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.DISCR_FIELD_SEQUENCE__V145*/ meltfptr[144] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1344*/ meltfptr[1343]), (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_ANCESTORS"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_ANCESTORS__V146*/ meltfptr[145] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V2001*/ meltfptr[2000]), (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_FIELDS"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_FIELDS__V147*/ meltfptr[146] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V2003*/ meltfptr[2002]), (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_BINDING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_FIELD_BINDING__V148*/ meltfptr[147] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V2005*/ meltfptr[2004]), (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 = "FLD_OWNCLASS"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.FLD_OWNCLASS__V149*/ meltfptr[148] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V2007*/ meltfptr[2006]), (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 = "DISC_SUPER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.DISC_SUPER__V150*/ meltfptr[149] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V2009*/ meltfptr[2008]), (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_DEFINSTANCE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_DEFINSTANCE__V151*/ meltfptr[150] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V2014*/ meltfptr[2013]), (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_INSTANCE_BINDING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_INSTANCE_BINDING__V152*/ meltfptr[151] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V2016*/ meltfptr[2015]), (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_DEFINE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_DEFINE__V153*/ meltfptr[152] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V2021*/ meltfptr[2020]), (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 = "SDEFSEL_FORMALS"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.SDEFSEL_FORMALS__V154*/ meltfptr[153] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V2026*/ meltfptr[2025]), (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 = "SYSDATA_VALUE_EXPORTER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.SYSDATA_VALUE_EXPORTER__V155*/ meltfptr[154] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V2032*/ meltfptr[2031]), (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_CURRENT_MODULE_ENVIRONMENT_CONTAINER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V156*/ meltfptr[155] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V2038*/ meltfptr[2037]), (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_EXPORT_VALUES"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_EXPORT_VALUES__V157*/ meltfptr[156] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V2042*/ meltfptr[2041]), (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_EXPORT_SYNONYM"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_EXPORT_SYNONYM__V158*/ meltfptr[157] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V2046*/ meltfptr[2045]), (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_EXPORT_CLASS"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_EXPORT_CLASS__V159*/ meltfptr[158] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V2052*/ meltfptr[2051]), (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 = "SYSDATA_MACRO_EXPORTER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.SYSDATA_MACRO_EXPORTER__V160*/ meltfptr[159] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V2058*/ meltfptr[2057]), (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 = "SYSDATA_PATMACRO_EXPORTER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.SYSDATA_PATMACRO_EXPORTER__V161*/ meltfptr[160] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V2064*/ meltfptr[2063]), (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_EXPORT_MACRO"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_EXPORT_MACRO__V162*/ meltfptr[161] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V2072*/ meltfptr[2071]), (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_EXPORT_PATMACRO"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_EXPORT_PATMACRO__V163*/ meltfptr[162] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V2080*/ meltfptr[2079]), (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_PARENT_MODULE_ENVIRONMENT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_PARENT_MODULE_ENVIRONMENT__V164*/ meltfptr[163] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V2086*/ meltfptr[2085]), (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_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V165*/ meltfptr[164] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V2094*/ meltfptr[2093]), (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_FETCH_PREDEFINED"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_FETCH_PREDEFINED__V166*/ meltfptr[165] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V2096*/ meltfptr[2095]), (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 = "SYSDATA_CONT_FRESH_ENV"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.SYSDATA_CONT_FRESH_ENV__V167*/ meltfptr[166] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V2098*/ meltfptr[2097]), (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_EVERY"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.MAPOBJECT_EVERY__V168*/ meltfptr[167] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V2103*/ meltfptr[2102]), (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_STORE_PREDEFINED"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_STORE_PREDEFINED__V169*/ meltfptr[168] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V2110*/ meltfptr[2109]), (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_CHEADER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_CHEADER__V170*/ meltfptr[169] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V2114*/ meltfptr[2113]), (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_USE_PACKAGE_FROM_PKG_CONFIG"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-normal"; /*_.CLASS_SOURCE_USE_PACKAGE_FROM_PKG_CONFIG__V171*/ meltfptr[170] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V2118*/ meltfptr[2117]), (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_normal (&meltfram__, meltpredefinited); /**initial routine body**/ meltmod__warmelt_normal__initialmeltchunk_0 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_1 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_2 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_3 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_4 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_5 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_6 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_7 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_8 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_9 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_10 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_11 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_12 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_13 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_14 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_15 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_16 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_17 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_18 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_19 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_20 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_21 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_22 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_23 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_24 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_25 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_26 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_27 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_28 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_29 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_30 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_31 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_32 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_33 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_34 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_35 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_36 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_37 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_38 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_39 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_40 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_41 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_42 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_43 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_44 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_45 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_46 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_47 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_48 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_49 (&meltfram__, meltpredefinited); meltmod__warmelt_normal__initialmeltchunk_50 (&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_normal__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___V172*/ meltfptr[171])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V172*/ meltfptr[171])))); ((meltobject_ptr_t) ( /*_.VALDATA___V172*/ meltfptr[171]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V173*/ meltfptr[172]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V172*/ meltfptr[171]); melt_dbgtrace_written_object ( /*_.VALDATA___V172*/ meltfptr[171], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173])))); ((meltobject_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V175*/ meltfptr[174]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V174*/ meltfptr[173]); melt_dbgtrace_written_object ( /*_.VALDATA___V174*/ meltfptr[173], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:42:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175])))); ((meltobject_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V177*/ meltfptr[176]); MELT_LOCATION ("warmelt-normal.melt:42:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175])))); ((meltobject_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]))->obj_vartab[4] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#23 */ melt_assertmsg ("putupl #23 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V178*/ meltfptr[177])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #23 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V178*/ meltfptr[177])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V178*/ meltfptr[177]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V178*/ meltfptr[177]); MELT_LOCATION ("warmelt-normal.melt:42:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175])))); ((meltobject_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V178*/ meltfptr[177]); MELT_LOCATION ("warmelt-normal.melt:42:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:42:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178])))); ((meltobject_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); MELT_LOCATION ("warmelt-normal.melt:42:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V179*/ meltfptr[178]); MELT_LOCATION ("warmelt-normal.melt:42:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V179*/ meltfptr[178], "new static instance"); /*putupl#24 */ melt_assertmsg ("putupl #24 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V181*/ meltfptr[180])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #24 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V181*/ meltfptr[180])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V181*/ meltfptr[180]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V181*/ meltfptr[180]); MELT_LOCATION ("warmelt-normal.melt:42:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175])))); ((meltobject_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V181*/ meltfptr[180]); MELT_LOCATION ("warmelt-normal.melt:42:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V176*/ meltfptr[175]); MELT_LOCATION ("warmelt-normal.melt:42:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V176*/ meltfptr[175], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V182*/ meltfptr[181])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V182*/ meltfptr[181])))); ((meltobject_ptr_t) ( /*_.VALDATA___V182*/ meltfptr[181]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V183*/ meltfptr[182]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V182*/ meltfptr[181]); melt_dbgtrace_written_object ( /*_.VALDATA___V182*/ meltfptr[181], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183])))); ((meltobject_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V185*/ meltfptr[184]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V184*/ meltfptr[183]); melt_dbgtrace_written_object ( /*_.VALDATA___V184*/ meltfptr[183], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:52:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V186*/ meltfptr[185])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V186*/ meltfptr[185])))); ((meltobject_ptr_t) ( /*_.VALDATA___V186*/ meltfptr[185]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V187*/ meltfptr[186]); MELT_LOCATION ("warmelt-normal.melt:52:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V186*/ meltfptr[185])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V186*/ meltfptr[185])))); ((meltobject_ptr_t) ( /*_.VALDATA___V186*/ meltfptr[185]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#25 */ melt_assertmsg ("putupl #25 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V188*/ meltfptr[187])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #25 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V188*/ meltfptr[187])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V188*/ meltfptr[187]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#26 */ melt_assertmsg ("putupl #26 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V188*/ meltfptr[187])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #26 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V188*/ meltfptr[187])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V188*/ meltfptr[187]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V188*/ meltfptr[187]); MELT_LOCATION ("warmelt-normal.melt:52:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V186*/ meltfptr[185])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V186*/ meltfptr[185])))); ((meltobject_ptr_t) ( /*_.VALDATA___V186*/ meltfptr[185]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V188*/ meltfptr[187]); /*putupl#27 */ melt_assertmsg ("putupl #27 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V189*/ meltfptr[188])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #27 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V189*/ meltfptr[188])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V189*/ meltfptr[188]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V189*/ meltfptr[188]); MELT_LOCATION ("warmelt-normal.melt:52:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V186*/ meltfptr[185])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V186*/ meltfptr[185])))); ((meltobject_ptr_t) ( /*_.VALDATA___V186*/ meltfptr[185]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V189*/ meltfptr[188]); MELT_LOCATION ("warmelt-normal.melt:52:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V186*/ meltfptr[185]); MELT_LOCATION ("warmelt-normal.melt:52:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V186*/ meltfptr[185], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189])))); ((meltobject_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V191*/ meltfptr[190]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V190*/ meltfptr[189]); melt_dbgtrace_written_object ( /*_.VALDATA___V190*/ meltfptr[189], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:60:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191])))); ((meltobject_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V193*/ meltfptr[192]); MELT_LOCATION ("warmelt-normal.melt:60:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191])))); ((meltobject_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#28 */ melt_assertmsg ("putupl #28 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V194*/ meltfptr[193])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #28 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V194*/ meltfptr[193])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V194*/ meltfptr[193]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#29 */ melt_assertmsg ("putupl #29 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V194*/ meltfptr[193])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #29 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V194*/ meltfptr[193])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V194*/ meltfptr[193]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V194*/ meltfptr[193]); MELT_LOCATION ("warmelt-normal.melt:60:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191])))); ((meltobject_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V194*/ meltfptr[193]); /*putupl#30 */ melt_assertmsg ("putupl #30 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V195*/ meltfptr[194])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #30 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V195*/ meltfptr[194])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V195*/ meltfptr[194]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V195*/ meltfptr[194]); MELT_LOCATION ("warmelt-normal.melt:60:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191])))); ((meltobject_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V195*/ meltfptr[194]); MELT_LOCATION ("warmelt-normal.melt:60:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-normal.melt:60:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V192*/ meltfptr[191], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V196*/ meltfptr[195])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V196*/ meltfptr[195])))); ((meltobject_ptr_t) ( /*_.VALDATA___V196*/ meltfptr[195]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V197*/ meltfptr[196]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V196*/ meltfptr[195]); melt_dbgtrace_written_object ( /*_.VALDATA___V196*/ meltfptr[195], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:67:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197])))); ((meltobject_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V199*/ meltfptr[198]); MELT_LOCATION ("warmelt-normal.melt:67:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197])))); ((meltobject_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*putupl#31 */ melt_assertmsg ("putupl #31 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V200*/ meltfptr[199])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #31 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V200*/ meltfptr[199])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V200*/ meltfptr[199]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#32 */ melt_assertmsg ("putupl #32 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V200*/ meltfptr[199])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #32 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V200*/ meltfptr[199])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V200*/ meltfptr[199]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#33 */ melt_assertmsg ("putupl #33 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V200*/ meltfptr[199])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #33 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V200*/ meltfptr[199])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V200*/ meltfptr[199]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V200*/ meltfptr[199]); MELT_LOCATION ("warmelt-normal.melt:67:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197])))); ((meltobject_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V200*/ meltfptr[199]); MELT_LOCATION ("warmelt-normal.melt:67:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:67:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V201*/ meltfptr[200])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V201*/ meltfptr[200])))); ((meltobject_ptr_t) ( /*_.VALDATA___V201*/ meltfptr[200]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-normal.melt:67:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V201*/ meltfptr[200]); MELT_LOCATION ("warmelt-normal.melt:67:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V201*/ meltfptr[200], "new static instance"); /*putupl#34 */ melt_assertmsg ("putupl #34 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V203*/ meltfptr[202])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #34 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V203*/ meltfptr[202])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V203*/ meltfptr[202]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#35 */ melt_assertmsg ("putupl #35 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V203*/ meltfptr[202])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #35 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V203*/ meltfptr[202])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V203*/ meltfptr[202]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V201*/ meltfptr[200]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V203*/ meltfptr[202]); MELT_LOCATION ("warmelt-normal.melt:67:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197])))); ((meltobject_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V203*/ meltfptr[202]); MELT_LOCATION ("warmelt-normal.melt:67:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-normal.melt:67:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V198*/ meltfptr[197], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V204*/ meltfptr[203])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V204*/ meltfptr[203])))); ((meltobject_ptr_t) ( /*_.VALDATA___V204*/ meltfptr[203]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V205*/ meltfptr[204]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V204*/ meltfptr[203]); melt_dbgtrace_written_object ( /*_.VALDATA___V204*/ meltfptr[203], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V206*/ meltfptr[205])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V206*/ meltfptr[205])))); ((meltobject_ptr_t) ( /*_.VALDATA___V206*/ meltfptr[205]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V207*/ meltfptr[206]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V206*/ meltfptr[205]); melt_dbgtrace_written_object ( /*_.VALDATA___V206*/ meltfptr[205], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:75:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V208*/ meltfptr[207])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V208*/ meltfptr[207])))); ((meltobject_ptr_t) ( /*_.VALDATA___V208*/ meltfptr[207]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V209*/ meltfptr[208]); MELT_LOCATION ("warmelt-normal.melt:75:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V208*/ meltfptr[207])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V208*/ meltfptr[207])))); ((meltobject_ptr_t) ( /*_.VALDATA___V208*/ meltfptr[207]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197]); /*putupl#36 */ melt_assertmsg ("putupl #36 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V210*/ meltfptr[209])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #36 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V210*/ meltfptr[209])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V210*/ meltfptr[209]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#37 */ melt_assertmsg ("putupl #37 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V210*/ meltfptr[209])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #37 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V210*/ meltfptr[209])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V210*/ meltfptr[209]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#38 */ melt_assertmsg ("putupl #38 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V210*/ meltfptr[209])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #38 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V210*/ meltfptr[209])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V210*/ meltfptr[209]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*putupl#39 */ melt_assertmsg ("putupl #39 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V210*/ meltfptr[209])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #39 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V210*/ meltfptr[209])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V210*/ meltfptr[209]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V210*/ meltfptr[209]); MELT_LOCATION ("warmelt-normal.melt:75:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V208*/ meltfptr[207])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V208*/ meltfptr[207])))); ((meltobject_ptr_t) ( /*_.VALDATA___V208*/ meltfptr[207]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V210*/ meltfptr[209]); MELT_LOCATION ("warmelt-normal.melt:75:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:75:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V211*/ meltfptr[210])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V211*/ meltfptr[210])))); ((meltobject_ptr_t) ( /*_.VALDATA___V211*/ meltfptr[210]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V208*/ meltfptr[207]); MELT_LOCATION ("warmelt-normal.melt:75:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V211*/ meltfptr[210]); MELT_LOCATION ("warmelt-normal.melt:75:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V211*/ meltfptr[210], "new static instance"); /*putupl#40 */ melt_assertmsg ("putupl #40 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V213*/ meltfptr[212])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #40 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V213*/ meltfptr[212])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V213*/ meltfptr[212]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#41 */ melt_assertmsg ("putupl #41 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V213*/ meltfptr[212])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #41 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V213*/ meltfptr[212])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V213*/ meltfptr[212]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V201*/ meltfptr[200]); /*putupl#42 */ melt_assertmsg ("putupl #42 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V213*/ meltfptr[212])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #42 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V213*/ meltfptr[212])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V213*/ meltfptr[212]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V211*/ meltfptr[210]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V213*/ meltfptr[212]); MELT_LOCATION ("warmelt-normal.melt:75:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V208*/ meltfptr[207])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V208*/ meltfptr[207])))); ((meltobject_ptr_t) ( /*_.VALDATA___V208*/ meltfptr[207]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V213*/ meltfptr[212]); MELT_LOCATION ("warmelt-normal.melt:75:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V208*/ meltfptr[207]); MELT_LOCATION ("warmelt-normal.melt:75:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V208*/ meltfptr[207], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V214*/ meltfptr[213])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V214*/ meltfptr[213])))); ((meltobject_ptr_t) ( /*_.VALDATA___V214*/ meltfptr[213]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V215*/ meltfptr[214]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V214*/ meltfptr[213]); melt_dbgtrace_written_object ( /*_.VALDATA___V214*/ meltfptr[213], "new static instance"); /*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"); MELT_LOCATION ("warmelt-normal.melt:84:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:84:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V218*/ meltfptr[217])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V218*/ meltfptr[217])))); ((meltobject_ptr_t) ( /*_.VALDATA___V218*/ meltfptr[217]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V208*/ meltfptr[207]); /*putupl#43 */ melt_assertmsg ("putupl #43 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V220*/ meltfptr[219])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #43 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V220*/ meltfptr[219])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V220*/ meltfptr[219]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#44 */ melt_assertmsg ("putupl #44 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V220*/ meltfptr[219])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #44 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V220*/ meltfptr[219])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V220*/ meltfptr[219]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#45 */ melt_assertmsg ("putupl #45 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V220*/ meltfptr[219])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #45 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V220*/ meltfptr[219])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V220*/ meltfptr[219]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*putupl#46 */ melt_assertmsg ("putupl #46 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V220*/ meltfptr[219])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #46 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V220*/ meltfptr[219])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V220*/ meltfptr[219]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197]); /*putupl#47 */ melt_assertmsg ("putupl #47 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V220*/ meltfptr[219])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #47 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V220*/ meltfptr[219])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V220*/ meltfptr[219]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V208*/ meltfptr[207]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V220*/ meltfptr[219]); MELT_LOCATION ("warmelt-normal.melt:84:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V218*/ meltfptr[217])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V218*/ meltfptr[217])))); ((meltobject_ptr_t) ( /*_.VALDATA___V218*/ meltfptr[217]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V220*/ meltfptr[219]); MELT_LOCATION ("warmelt-normal.melt:84:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V221*/ meltfptr[220])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V221*/ meltfptr[220])))); ((meltobject_ptr_t) ( /*_.VALDATA___V221*/ meltfptr[220]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V222*/ meltfptr[221]); MELT_LOCATION ("warmelt-normal.melt:84:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V221*/ meltfptr[220])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V221*/ meltfptr[220])))); ((meltobject_ptr_t) ( /*_.VALDATA___V221*/ meltfptr[220]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V218*/ meltfptr[217]); MELT_LOCATION ("warmelt-normal.melt:84:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V221*/ meltfptr[220]); MELT_LOCATION ("warmelt-normal.melt:84:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V221*/ meltfptr[220], "new static instance"); /*putupl#48 */ melt_assertmsg ("putupl #48 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V223*/ meltfptr[222])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #48 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V223*/ meltfptr[222])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V223*/ meltfptr[222]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#49 */ melt_assertmsg ("putupl #49 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V223*/ meltfptr[222])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #49 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V223*/ meltfptr[222])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V223*/ meltfptr[222]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V201*/ meltfptr[200]); /*putupl#50 */ melt_assertmsg ("putupl #50 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V223*/ meltfptr[222])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #50 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V223*/ meltfptr[222])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V223*/ meltfptr[222]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V211*/ meltfptr[210]); /*putupl#51 */ melt_assertmsg ("putupl #51 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V223*/ meltfptr[222])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #51 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V223*/ meltfptr[222])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V223*/ meltfptr[222]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V221*/ meltfptr[220]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V223*/ meltfptr[222]); MELT_LOCATION ("warmelt-normal.melt:84:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V218*/ meltfptr[217])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V218*/ meltfptr[217])))); ((meltobject_ptr_t) ( /*_.VALDATA___V218*/ meltfptr[217]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V223*/ meltfptr[222]); MELT_LOCATION ("warmelt-normal.melt:84:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V218*/ meltfptr[217]); MELT_LOCATION ("warmelt-normal.melt:84:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V218*/ meltfptr[217], "new static instance"); /*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]); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_0 */ void meltmod__warmelt_normal__initialmeltchunk_1 (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___V226*/ meltfptr[225]); melt_dbgtrace_written_object ( /*_.VALDATA___V226*/ meltfptr[225], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:93:/ 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-normal.melt:93:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V228*/ meltfptr[227])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V228*/ meltfptr[227])))); ((meltobject_ptr_t) ( /*_.VALDATA___V228*/ meltfptr[227]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V218*/ meltfptr[217]); /*putupl#52 */ melt_assertmsg ("putupl #52 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V230*/ meltfptr[229])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #52 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V230*/ meltfptr[229])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V230*/ meltfptr[229]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#53 */ melt_assertmsg ("putupl #53 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V230*/ meltfptr[229])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #53 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V230*/ meltfptr[229])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V230*/ meltfptr[229]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#54 */ melt_assertmsg ("putupl #54 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V230*/ meltfptr[229])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #54 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V230*/ meltfptr[229])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V230*/ meltfptr[229]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*putupl#55 */ melt_assertmsg ("putupl #55 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V230*/ meltfptr[229])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #55 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V230*/ meltfptr[229])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V230*/ meltfptr[229]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197]); /*putupl#56 */ melt_assertmsg ("putupl #56 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V230*/ meltfptr[229])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #56 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V230*/ meltfptr[229])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V230*/ meltfptr[229]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V208*/ meltfptr[207]); /*putupl#57 */ melt_assertmsg ("putupl #57 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V230*/ meltfptr[229])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #57 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V230*/ meltfptr[229])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V230*/ meltfptr[229]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V218*/ meltfptr[217]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V230*/ meltfptr[229]); MELT_LOCATION ("warmelt-normal.melt:93:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V228*/ meltfptr[227])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V228*/ meltfptr[227])))); ((meltobject_ptr_t) ( /*_.VALDATA___V228*/ meltfptr[227]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V230*/ meltfptr[229]); MELT_LOCATION ("warmelt-normal.melt:93:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V231*/ meltfptr[230])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V231*/ meltfptr[230])))); ((meltobject_ptr_t) ( /*_.VALDATA___V231*/ meltfptr[230]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V232*/ meltfptr[231]); MELT_LOCATION ("warmelt-normal.melt:93:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V231*/ meltfptr[230])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V231*/ meltfptr[230])))); ((meltobject_ptr_t) ( /*_.VALDATA___V231*/ meltfptr[230]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V228*/ meltfptr[227]); MELT_LOCATION ("warmelt-normal.melt:93:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V231*/ meltfptr[230]); MELT_LOCATION ("warmelt-normal.melt:93:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V231*/ meltfptr[230], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:93:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V233*/ meltfptr[232])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V233*/ meltfptr[232])))); ((meltobject_ptr_t) ( /*_.VALDATA___V233*/ meltfptr[232]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V234*/ meltfptr[233]); MELT_LOCATION ("warmelt-normal.melt:93:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V233*/ meltfptr[232])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V233*/ meltfptr[232])))); ((meltobject_ptr_t) ( /*_.VALDATA___V233*/ meltfptr[232]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V228*/ meltfptr[227]); MELT_LOCATION ("warmelt-normal.melt:93:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V233*/ meltfptr[232]); MELT_LOCATION ("warmelt-normal.melt:93:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V233*/ meltfptr[232], "new static instance"); /*putupl#58 */ melt_assertmsg ("putupl #58 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V235*/ meltfptr[234])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #58 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V235*/ meltfptr[234])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V235*/ meltfptr[234]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#59 */ melt_assertmsg ("putupl #59 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V235*/ meltfptr[234])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #59 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V235*/ meltfptr[234])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V235*/ meltfptr[234]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V201*/ meltfptr[200]); /*putupl#60 */ melt_assertmsg ("putupl #60 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V235*/ meltfptr[234])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #60 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V235*/ meltfptr[234])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V235*/ meltfptr[234]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V211*/ meltfptr[210]); /*putupl#61 */ melt_assertmsg ("putupl #61 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V235*/ meltfptr[234])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #61 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V235*/ meltfptr[234])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V235*/ meltfptr[234]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V221*/ meltfptr[220]); /*putupl#62 */ melt_assertmsg ("putupl #62 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V235*/ meltfptr[234])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #62 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V235*/ meltfptr[234])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V235*/ meltfptr[234]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V231*/ meltfptr[230]); /*putupl#63 */ melt_assertmsg ("putupl #63 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V235*/ meltfptr[234])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #63 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V235*/ meltfptr[234])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V235*/ meltfptr[234]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V233*/ meltfptr[232]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V235*/ meltfptr[234]); MELT_LOCATION ("warmelt-normal.melt:93:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V228*/ meltfptr[227])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V228*/ meltfptr[227])))); ((meltobject_ptr_t) ( /*_.VALDATA___V228*/ meltfptr[227]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V235*/ meltfptr[234]); MELT_LOCATION ("warmelt-normal.melt:93:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V228*/ meltfptr[227]); MELT_LOCATION ("warmelt-normal.melt:93:/ 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___V236*/ meltfptr[235])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V236*/ meltfptr[235])))); ((meltobject_ptr_t) ( /*_.VALDATA___V236*/ meltfptr[235]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V237*/ meltfptr[236]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V236*/ meltfptr[235]); melt_dbgtrace_written_object ( /*_.VALDATA___V236*/ meltfptr[235], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V238*/ meltfptr[237])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V238*/ meltfptr[237])))); ((meltobject_ptr_t) ( /*_.VALDATA___V238*/ meltfptr[237]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V239*/ meltfptr[238]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V238*/ meltfptr[237]); melt_dbgtrace_written_object ( /*_.VALDATA___V238*/ meltfptr[237], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V240*/ meltfptr[239])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V240*/ meltfptr[239])))); ((meltobject_ptr_t) ( /*_.VALDATA___V240*/ meltfptr[239]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V241*/ meltfptr[240]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V240*/ meltfptr[239]); melt_dbgtrace_written_object ( /*_.VALDATA___V240*/ meltfptr[239], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:104:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V242*/ meltfptr[241])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V242*/ meltfptr[241])))); ((meltobject_ptr_t) ( /*_.VALDATA___V242*/ meltfptr[241]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V243*/ meltfptr[242]); MELT_LOCATION ("warmelt-normal.melt:104:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V242*/ meltfptr[241])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V242*/ meltfptr[241])))); ((meltobject_ptr_t) ( /*_.VALDATA___V242*/ meltfptr[241]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V208*/ meltfptr[207]); /*putupl#64 */ melt_assertmsg ("putupl #64 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V244*/ meltfptr[243])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #64 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V244*/ meltfptr[243])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V244*/ meltfptr[243]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#65 */ melt_assertmsg ("putupl #65 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V244*/ meltfptr[243])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #65 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V244*/ meltfptr[243])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V244*/ meltfptr[243]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#66 */ melt_assertmsg ("putupl #66 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V244*/ meltfptr[243])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #66 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V244*/ meltfptr[243])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V244*/ meltfptr[243]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*putupl#67 */ melt_assertmsg ("putupl #67 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V244*/ meltfptr[243])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #67 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V244*/ meltfptr[243])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V244*/ meltfptr[243]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197]); /*putupl#68 */ melt_assertmsg ("putupl #68 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V244*/ meltfptr[243])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #68 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V244*/ meltfptr[243])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V244*/ meltfptr[243]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V208*/ meltfptr[207]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V244*/ meltfptr[243]); MELT_LOCATION ("warmelt-normal.melt:104:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V242*/ meltfptr[241])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V242*/ meltfptr[241])))); ((meltobject_ptr_t) ( /*_.VALDATA___V242*/ meltfptr[241]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V244*/ meltfptr[243]); MELT_LOCATION ("warmelt-normal.melt:104:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V245*/ meltfptr[244])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V245*/ meltfptr[244])))); ((meltobject_ptr_t) ( /*_.VALDATA___V245*/ meltfptr[244]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V246*/ meltfptr[245]); MELT_LOCATION ("warmelt-normal.melt:104:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V245*/ meltfptr[244])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V245*/ meltfptr[244])))); ((meltobject_ptr_t) ( /*_.VALDATA___V245*/ meltfptr[244]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V242*/ meltfptr[241]); MELT_LOCATION ("warmelt-normal.melt:104:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V245*/ meltfptr[244]); MELT_LOCATION ("warmelt-normal.melt:104:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V245*/ meltfptr[244], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:104:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V247*/ meltfptr[246])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V247*/ meltfptr[246])))); ((meltobject_ptr_t) ( /*_.VALDATA___V247*/ meltfptr[246]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V248*/ meltfptr[247]); MELT_LOCATION ("warmelt-normal.melt:104:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V247*/ meltfptr[246])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V247*/ meltfptr[246])))); ((meltobject_ptr_t) ( /*_.VALDATA___V247*/ meltfptr[246]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V242*/ meltfptr[241]); MELT_LOCATION ("warmelt-normal.melt:104:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V247*/ meltfptr[246]); MELT_LOCATION ("warmelt-normal.melt:104:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V247*/ meltfptr[246], "new static instance"); /*putupl#69 */ melt_assertmsg ("putupl #69 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V249*/ meltfptr[248])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #69 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V249*/ meltfptr[248])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V249*/ meltfptr[248]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#70 */ melt_assertmsg ("putupl #70 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V249*/ meltfptr[248])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #70 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V249*/ meltfptr[248])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V249*/ meltfptr[248]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V201*/ meltfptr[200]); /*putupl#71 */ melt_assertmsg ("putupl #71 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V249*/ meltfptr[248])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #71 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V249*/ meltfptr[248])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V249*/ meltfptr[248]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V211*/ meltfptr[210]); /*putupl#72 */ melt_assertmsg ("putupl #72 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V249*/ meltfptr[248])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #72 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V249*/ meltfptr[248])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V249*/ meltfptr[248]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V245*/ meltfptr[244]); /*putupl#73 */ melt_assertmsg ("putupl #73 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V249*/ meltfptr[248])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #73 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V249*/ meltfptr[248])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V249*/ meltfptr[248]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V247*/ meltfptr[246]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V249*/ meltfptr[248]); MELT_LOCATION ("warmelt-normal.melt:104:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V242*/ meltfptr[241])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V242*/ meltfptr[241])))); ((meltobject_ptr_t) ( /*_.VALDATA___V242*/ meltfptr[241]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V249*/ meltfptr[248]); MELT_LOCATION ("warmelt-normal.melt:104:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V242*/ meltfptr[241]); MELT_LOCATION ("warmelt-normal.melt:104:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V242*/ meltfptr[241], "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-normal.melt:117:/ 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-normal.melt:117:/ 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) ( /*_.VALDATA___V242*/ meltfptr[241]); /*putupl#74 */ melt_assertmsg ("putupl #74 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V258*/ meltfptr[257])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #74 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) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#75 */ melt_assertmsg ("putupl #75 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V258*/ meltfptr[257])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #75 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) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#76 */ melt_assertmsg ("putupl #76 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V258*/ meltfptr[257])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #76 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) ( /*_.VALDATA___V192*/ meltfptr[191]); /*putupl#77 */ melt_assertmsg ("putupl #77 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V258*/ meltfptr[257])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #77 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V258*/ meltfptr[257])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V258*/ meltfptr[257]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197]); /*putupl#78 */ melt_assertmsg ("putupl #78 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V258*/ meltfptr[257])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #78 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V258*/ meltfptr[257])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V258*/ meltfptr[257]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V208*/ meltfptr[207]); /*putupl#79 */ melt_assertmsg ("putupl #79 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V258*/ meltfptr[257])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #79 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V258*/ meltfptr[257])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V258*/ meltfptr[257]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V242*/ meltfptr[241]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V258*/ meltfptr[257]); MELT_LOCATION ("warmelt-normal.melt:117:/ 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-normal.melt:117:/ 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-normal.melt:117:/ 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-normal.melt:117:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-normal.melt:117:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V259*/ meltfptr[258], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:117:/ 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-normal.melt:117:/ 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-normal.melt:117:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V261*/ meltfptr[260]); MELT_LOCATION ("warmelt-normal.melt:117:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V261*/ meltfptr[260], "new static instance"); /*putupl#80 */ melt_assertmsg ("putupl #80 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V263*/ meltfptr[262])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #80 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V263*/ meltfptr[262])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V263*/ meltfptr[262]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#81 */ melt_assertmsg ("putupl #81 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V263*/ meltfptr[262])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #81 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V263*/ meltfptr[262])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V263*/ meltfptr[262]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V201*/ meltfptr[200]); /*putupl#82 */ melt_assertmsg ("putupl #82 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V263*/ meltfptr[262])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #82 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V263*/ meltfptr[262])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V263*/ meltfptr[262]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V211*/ meltfptr[210]); /*putupl#83 */ melt_assertmsg ("putupl #83 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V263*/ meltfptr[262])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #83 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V263*/ meltfptr[262])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V263*/ meltfptr[262]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V245*/ meltfptr[244]); /*putupl#84 */ melt_assertmsg ("putupl #84 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V263*/ meltfptr[262])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #84 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V263*/ meltfptr[262])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V263*/ meltfptr[262]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V247*/ meltfptr[246]); /*putupl#85 */ melt_assertmsg ("putupl #85 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V263*/ meltfptr[262])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #85 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V263*/ meltfptr[262])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V263*/ meltfptr[262]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V259*/ meltfptr[258]); /*putupl#86 */ melt_assertmsg ("putupl #86 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V263*/ meltfptr[262])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #86 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V263*/ meltfptr[262])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V263*/ meltfptr[262]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V261*/ meltfptr[260]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V263*/ meltfptr[262]); MELT_LOCATION ("warmelt-normal.melt:117:/ 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___V263*/ meltfptr[262]); MELT_LOCATION ("warmelt-normal.melt:117:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V256*/ meltfptr[255]); MELT_LOCATION ("warmelt-normal.melt:117:/ 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___V264*/ meltfptr[263])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V264*/ meltfptr[263])))); ((meltobject_ptr_t) ( /*_.VALDATA___V264*/ meltfptr[263]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V265*/ meltfptr[264]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V264*/ meltfptr[263]); melt_dbgtrace_written_object ( /*_.VALDATA___V264*/ meltfptr[263], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265])))); ((meltobject_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V267*/ meltfptr[266]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V266*/ meltfptr[265]); melt_dbgtrace_written_object ( /*_.VALDATA___V266*/ meltfptr[265], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V268*/ meltfptr[267])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V268*/ meltfptr[267])))); ((meltobject_ptr_t) ( /*_.VALDATA___V268*/ meltfptr[267]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V269*/ meltfptr[268]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V268*/ meltfptr[267]); melt_dbgtrace_written_object ( /*_.VALDATA___V268*/ meltfptr[267], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:127:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V270*/ meltfptr[269])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V270*/ meltfptr[269])))); ((meltobject_ptr_t) ( /*_.VALDATA___V270*/ meltfptr[269]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V271*/ meltfptr[270]); MELT_LOCATION ("warmelt-normal.melt:127:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V270*/ meltfptr[269])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V270*/ meltfptr[269])))); ((meltobject_ptr_t) ( /*_.VALDATA___V270*/ meltfptr[269]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197]); /*putupl#87 */ melt_assertmsg ("putupl #87 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V272*/ meltfptr[271])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #87 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V272*/ meltfptr[271])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V272*/ meltfptr[271]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#88 */ melt_assertmsg ("putupl #88 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V272*/ meltfptr[271])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #88 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V272*/ meltfptr[271])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V272*/ meltfptr[271]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#89 */ melt_assertmsg ("putupl #89 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V272*/ meltfptr[271])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #89 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V272*/ meltfptr[271])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V272*/ meltfptr[271]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*putupl#90 */ melt_assertmsg ("putupl #90 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V272*/ meltfptr[271])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #90 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V272*/ meltfptr[271])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V272*/ meltfptr[271]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V272*/ meltfptr[271]); MELT_LOCATION ("warmelt-normal.melt:127:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V270*/ meltfptr[269])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V270*/ meltfptr[269])))); ((meltobject_ptr_t) ( /*_.VALDATA___V270*/ meltfptr[269]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V272*/ meltfptr[271]); MELT_LOCATION ("warmelt-normal.melt:127:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V273*/ meltfptr[272])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V273*/ meltfptr[272])))); ((meltobject_ptr_t) ( /*_.VALDATA___V273*/ meltfptr[272]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V274*/ meltfptr[273]); MELT_LOCATION ("warmelt-normal.melt:127:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V273*/ meltfptr[272])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V273*/ meltfptr[272])))); ((meltobject_ptr_t) ( /*_.VALDATA___V273*/ meltfptr[272]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V270*/ meltfptr[269]); MELT_LOCATION ("warmelt-normal.melt:127:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V273*/ meltfptr[272]); MELT_LOCATION ("warmelt-normal.melt:127:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V273*/ meltfptr[272], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:127:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V275*/ meltfptr[274])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V275*/ meltfptr[274])))); ((meltobject_ptr_t) ( /*_.VALDATA___V275*/ meltfptr[274]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V276*/ meltfptr[275]); MELT_LOCATION ("warmelt-normal.melt:127:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V275*/ meltfptr[274])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V275*/ meltfptr[274])))); ((meltobject_ptr_t) ( /*_.VALDATA___V275*/ meltfptr[274]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V270*/ meltfptr[269]); MELT_LOCATION ("warmelt-normal.melt:127:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V275*/ meltfptr[274]); MELT_LOCATION ("warmelt-normal.melt:127:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V275*/ meltfptr[274], "new static instance"); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_1 */ void meltmod__warmelt_normal__initialmeltchunk_2 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*putupl#91*/ melt_assertmsg ("putupl #91 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V277*/ meltfptr[276])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #91 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V277*/ meltfptr[276])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V277*/ meltfptr[276]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#92 */ melt_assertmsg ("putupl #92 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V277*/ meltfptr[276])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #92 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V277*/ meltfptr[276])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V277*/ meltfptr[276]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V201*/ meltfptr[200]); /*putupl#93 */ melt_assertmsg ("putupl #93 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V277*/ meltfptr[276])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #93 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V277*/ meltfptr[276])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V277*/ meltfptr[276]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V273*/ meltfptr[272]); /*putupl#94 */ melt_assertmsg ("putupl #94 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V277*/ meltfptr[276])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #94 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V277*/ meltfptr[276])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V277*/ meltfptr[276]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V275*/ meltfptr[274]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V277*/ meltfptr[276]); MELT_LOCATION ("warmelt-normal.melt:127:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V270*/ meltfptr[269])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V270*/ meltfptr[269])))); ((meltobject_ptr_t) ( /*_.VALDATA___V270*/ meltfptr[269]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V277*/ meltfptr[276]); MELT_LOCATION ("warmelt-normal.melt:127:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V270*/ meltfptr[269]); MELT_LOCATION ("warmelt-normal.melt:127:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V270*/ meltfptr[269], "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"); MELT_LOCATION ("warmelt-normal.melt:138:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:138:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V284*/ meltfptr[283])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V284*/ meltfptr[283])))); ((meltobject_ptr_t) ( /*_.VALDATA___V284*/ meltfptr[283]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*putupl#95 */ melt_assertmsg ("putupl #95 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V286*/ meltfptr[285])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #95 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V286*/ meltfptr[285])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V286*/ meltfptr[285]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#96 */ melt_assertmsg ("putupl #96 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V286*/ meltfptr[285])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #96 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V286*/ meltfptr[285])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V286*/ meltfptr[285]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#97 */ melt_assertmsg ("putupl #97 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V286*/ meltfptr[285])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #97 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V286*/ meltfptr[285])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V286*/ meltfptr[285]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V286*/ meltfptr[285]); MELT_LOCATION ("warmelt-normal.melt:138:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V284*/ meltfptr[283])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V284*/ meltfptr[283])))); ((meltobject_ptr_t) ( /*_.VALDATA___V284*/ meltfptr[283]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V286*/ meltfptr[285]); MELT_LOCATION ("warmelt-normal.melt:138:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V287*/ meltfptr[286])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V287*/ meltfptr[286])))); ((meltobject_ptr_t) ( /*_.VALDATA___V287*/ meltfptr[286]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V288*/ meltfptr[287]); MELT_LOCATION ("warmelt-normal.melt:138:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V287*/ meltfptr[286])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V287*/ meltfptr[286])))); ((meltobject_ptr_t) ( /*_.VALDATA___V287*/ meltfptr[286]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V284*/ meltfptr[283]); MELT_LOCATION ("warmelt-normal.melt:138:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V287*/ meltfptr[286]); MELT_LOCATION ("warmelt-normal.melt:138:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V287*/ meltfptr[286], "new static instance"); /*putupl#98 */ melt_assertmsg ("putupl #98 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V289*/ meltfptr[288])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #98 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V289*/ meltfptr[288])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V289*/ meltfptr[288]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#99 */ melt_assertmsg ("putupl #99 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V289*/ meltfptr[288])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #99 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V289*/ meltfptr[288])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V289*/ meltfptr[288]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V287*/ meltfptr[286]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V289*/ meltfptr[288]); MELT_LOCATION ("warmelt-normal.melt:138:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V284*/ meltfptr[283])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V284*/ meltfptr[283])))); ((meltobject_ptr_t) ( /*_.VALDATA___V284*/ meltfptr[283]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V289*/ meltfptr[288]); MELT_LOCATION ("warmelt-normal.melt:138:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V284*/ meltfptr[283]); MELT_LOCATION ("warmelt-normal.melt:138:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V284*/ meltfptr[283], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V290*/ meltfptr[289])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V290*/ meltfptr[289])))); ((meltobject_ptr_t) ( /*_.VALDATA___V290*/ meltfptr[289]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V291*/ meltfptr[290]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V290*/ meltfptr[289]); melt_dbgtrace_written_object ( /*_.VALDATA___V290*/ meltfptr[289], "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"); MELT_LOCATION ("warmelt-normal.melt:146:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:146:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V294*/ meltfptr[293])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V294*/ meltfptr[293])))); ((meltobject_ptr_t) ( /*_.VALDATA___V294*/ meltfptr[293]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*putupl#100 */ melt_assertmsg ("putupl #100 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V296*/ meltfptr[295])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #100 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V296*/ meltfptr[295])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V296*/ meltfptr[295]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#101 */ melt_assertmsg ("putupl #101 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V296*/ meltfptr[295])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #101 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V296*/ meltfptr[295])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V296*/ meltfptr[295]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#102 */ melt_assertmsg ("putupl #102 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V296*/ meltfptr[295])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #102 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V296*/ meltfptr[295])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V296*/ meltfptr[295]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V296*/ meltfptr[295]); MELT_LOCATION ("warmelt-normal.melt:146:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V294*/ meltfptr[293])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V294*/ meltfptr[293])))); ((meltobject_ptr_t) ( /*_.VALDATA___V294*/ meltfptr[293]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V296*/ meltfptr[295]); MELT_LOCATION ("warmelt-normal.melt:146:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V297*/ meltfptr[296])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V297*/ meltfptr[296])))); ((meltobject_ptr_t) ( /*_.VALDATA___V297*/ meltfptr[296]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V298*/ meltfptr[297]); MELT_LOCATION ("warmelt-normal.melt:146:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V297*/ meltfptr[296])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V297*/ meltfptr[296])))); ((meltobject_ptr_t) ( /*_.VALDATA___V297*/ meltfptr[296]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V294*/ meltfptr[293]); MELT_LOCATION ("warmelt-normal.melt:146:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V297*/ meltfptr[296]); MELT_LOCATION ("warmelt-normal.melt:146:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V297*/ meltfptr[296], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:146:/ 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-normal.melt:146:/ 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___V294*/ meltfptr[293]); MELT_LOCATION ("warmelt-normal.melt:146:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V299*/ meltfptr[298]); MELT_LOCATION ("warmelt-normal.melt:146:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V299*/ meltfptr[298], "new static instance"); /*putupl#103 */ melt_assertmsg ("putupl #103 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V301*/ meltfptr[300])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #103 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) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#104 */ melt_assertmsg ("putupl #104 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V301*/ meltfptr[300])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #104 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___V297*/ meltfptr[296]); /*putupl#105 */ melt_assertmsg ("putupl #105 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V301*/ meltfptr[300])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #105 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___V299*/ meltfptr[298]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V301*/ meltfptr[300]); MELT_LOCATION ("warmelt-normal.melt:146:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V294*/ meltfptr[293])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V294*/ meltfptr[293])))); ((meltobject_ptr_t) ( /*_.VALDATA___V294*/ meltfptr[293]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V301*/ meltfptr[300]); MELT_LOCATION ("warmelt-normal.melt:146:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V294*/ meltfptr[293]); MELT_LOCATION ("warmelt-normal.melt:146:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V294*/ meltfptr[293], "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"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V306*/ meltfptr[305]); melt_dbgtrace_written_object ( /*_.VALDATA___V306*/ meltfptr[305], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:157:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V308*/ meltfptr[307])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V308*/ meltfptr[307])))); ((meltobject_ptr_t) ( /*_.VALDATA___V308*/ meltfptr[307]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V309*/ meltfptr[308]); MELT_LOCATION ("warmelt-normal.melt:157:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V308*/ meltfptr[307])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V308*/ meltfptr[307])))); ((meltobject_ptr_t) ( /*_.VALDATA___V308*/ meltfptr[307]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V294*/ meltfptr[293]); /*putupl#106 */ melt_assertmsg ("putupl #106 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V310*/ meltfptr[309])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #106 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V310*/ meltfptr[309])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V310*/ meltfptr[309]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#107 */ melt_assertmsg ("putupl #107 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V310*/ meltfptr[309])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #107 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V310*/ meltfptr[309])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V310*/ meltfptr[309]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#108 */ melt_assertmsg ("putupl #108 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V310*/ meltfptr[309])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #108 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V310*/ meltfptr[309])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V310*/ meltfptr[309]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*putupl#109 */ melt_assertmsg ("putupl #109 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V310*/ meltfptr[309])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #109 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V310*/ meltfptr[309])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V310*/ meltfptr[309]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V294*/ meltfptr[293]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V310*/ meltfptr[309]); MELT_LOCATION ("warmelt-normal.melt:157:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V308*/ meltfptr[307])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V308*/ meltfptr[307])))); ((meltobject_ptr_t) ( /*_.VALDATA___V308*/ meltfptr[307]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V310*/ meltfptr[309]); MELT_LOCATION ("warmelt-normal.melt:157:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V311*/ meltfptr[310])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V311*/ meltfptr[310])))); ((meltobject_ptr_t) ( /*_.VALDATA___V311*/ meltfptr[310]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V312*/ meltfptr[311]); MELT_LOCATION ("warmelt-normal.melt:157:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V311*/ meltfptr[310])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V311*/ meltfptr[310])))); ((meltobject_ptr_t) ( /*_.VALDATA___V311*/ meltfptr[310]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V308*/ meltfptr[307]); MELT_LOCATION ("warmelt-normal.melt:157:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V311*/ meltfptr[310]); MELT_LOCATION ("warmelt-normal.melt:157:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V311*/ meltfptr[310], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:157:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V313*/ meltfptr[312])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V313*/ meltfptr[312])))); ((meltobject_ptr_t) ( /*_.VALDATA___V313*/ meltfptr[312]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V314*/ meltfptr[313]); MELT_LOCATION ("warmelt-normal.melt:157:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V313*/ meltfptr[312])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V313*/ meltfptr[312])))); ((meltobject_ptr_t) ( /*_.VALDATA___V313*/ meltfptr[312]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V308*/ meltfptr[307]); MELT_LOCATION ("warmelt-normal.melt:157:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V313*/ meltfptr[312]); MELT_LOCATION ("warmelt-normal.melt:157:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V313*/ meltfptr[312], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:157:/ 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-normal.melt:157:/ 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___V308*/ meltfptr[307]); MELT_LOCATION ("warmelt-normal.melt:157:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V315*/ meltfptr[314]); MELT_LOCATION ("warmelt-normal.melt:157:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V315*/ meltfptr[314], "new static instance"); /*putupl#110 */ melt_assertmsg ("putupl #110 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V317*/ meltfptr[316])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #110 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V317*/ meltfptr[316])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V317*/ meltfptr[316]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#111 */ melt_assertmsg ("putupl #111 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V317*/ meltfptr[316])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #111 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V317*/ meltfptr[316])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V317*/ meltfptr[316]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V297*/ meltfptr[296]); /*putupl#112 */ melt_assertmsg ("putupl #112 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V317*/ meltfptr[316])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #112 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V317*/ meltfptr[316])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V317*/ meltfptr[316]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V299*/ meltfptr[298]); /*putupl#113 */ melt_assertmsg ("putupl #113 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V317*/ meltfptr[316])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #113 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V317*/ meltfptr[316])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V317*/ meltfptr[316]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V311*/ meltfptr[310]); /*putupl#114 */ melt_assertmsg ("putupl #114 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V317*/ meltfptr[316])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #114 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V317*/ meltfptr[316])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V317*/ meltfptr[316]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V313*/ meltfptr[312]); /*putupl#115 */ melt_assertmsg ("putupl #115 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V317*/ meltfptr[316])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #115 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V317*/ meltfptr[316])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V317*/ meltfptr[316]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V315*/ meltfptr[314]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V317*/ meltfptr[316]); MELT_LOCATION ("warmelt-normal.melt:157:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V308*/ meltfptr[307])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V308*/ meltfptr[307])))); ((meltobject_ptr_t) ( /*_.VALDATA___V308*/ meltfptr[307]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V317*/ meltfptr[316]); MELT_LOCATION ("warmelt-normal.melt:157:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V308*/ meltfptr[307]); MELT_LOCATION ("warmelt-normal.melt:157:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V308*/ meltfptr[307], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V318*/ meltfptr[317])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V318*/ meltfptr[317])))); ((meltobject_ptr_t) ( /*_.VALDATA___V318*/ meltfptr[317]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V319*/ meltfptr[318]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V318*/ meltfptr[317]); melt_dbgtrace_written_object ( /*_.VALDATA___V318*/ meltfptr[317], "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-normal.melt:172:/ 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-normal.melt:172:/ 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___V192*/ meltfptr[191]); /*putupl#116 */ melt_assertmsg ("putupl #116 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V328*/ meltfptr[327])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #116 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) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#117 */ melt_assertmsg ("putupl #117 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V328*/ meltfptr[327])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #117 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) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#118 */ melt_assertmsg ("putupl #118 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V328*/ meltfptr[327])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #118 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) ( /*_.VALDATA___V192*/ meltfptr[191]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V328*/ meltfptr[327]); MELT_LOCATION ("warmelt-normal.melt:172:/ 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]); MELT_LOCATION ("warmelt-normal.melt:172:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V329*/ meltfptr[328])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V329*/ meltfptr[328])))); ((meltobject_ptr_t) ( /*_.VALDATA___V329*/ meltfptr[328]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V330*/ meltfptr[329]); MELT_LOCATION ("warmelt-normal.melt:172:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V329*/ meltfptr[328])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V329*/ meltfptr[328])))); ((meltobject_ptr_t) ( /*_.VALDATA___V329*/ meltfptr[328]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V326*/ meltfptr[325]); MELT_LOCATION ("warmelt-normal.melt:172:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V329*/ meltfptr[328]); MELT_LOCATION ("warmelt-normal.melt:172:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V329*/ meltfptr[328], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:172:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V331*/ meltfptr[330])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V331*/ meltfptr[330])))); ((meltobject_ptr_t) ( /*_.VALDATA___V331*/ meltfptr[330]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V332*/ meltfptr[331]); MELT_LOCATION ("warmelt-normal.melt:172:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V331*/ meltfptr[330])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V331*/ meltfptr[330])))); ((meltobject_ptr_t) ( /*_.VALDATA___V331*/ meltfptr[330]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V326*/ meltfptr[325]); MELT_LOCATION ("warmelt-normal.melt:172:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V331*/ meltfptr[330]); MELT_LOCATION ("warmelt-normal.melt:172:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V331*/ meltfptr[330], "new static instance"); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_2 */ void meltmod__warmelt_normal__initialmeltchunk_3 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*putupl#119*/ melt_assertmsg ("putupl #119 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V333*/ meltfptr[332])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #119 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V333*/ meltfptr[332])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V333*/ meltfptr[332]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#120 */ melt_assertmsg ("putupl #120 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V333*/ meltfptr[332])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #120 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V333*/ meltfptr[332])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V333*/ meltfptr[332]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V329*/ meltfptr[328]); /*putupl#121 */ melt_assertmsg ("putupl #121 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V333*/ meltfptr[332])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #121 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V333*/ meltfptr[332])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V333*/ meltfptr[332]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V331*/ meltfptr[330]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V333*/ meltfptr[332]); MELT_LOCATION ("warmelt-normal.melt:172:/ 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___V333*/ meltfptr[332]); MELT_LOCATION ("warmelt-normal.melt:172:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V326*/ meltfptr[325]); MELT_LOCATION ("warmelt-normal.melt:172:/ 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___V334*/ meltfptr[333])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V334*/ meltfptr[333])))); ((meltobject_ptr_t) ( /*_.VALDATA___V334*/ meltfptr[333]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V335*/ meltfptr[334]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V334*/ meltfptr[333]); melt_dbgtrace_written_object ( /*_.VALDATA___V334*/ meltfptr[333], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V336*/ meltfptr[335])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V336*/ meltfptr[335])))); ((meltobject_ptr_t) ( /*_.VALDATA___V336*/ meltfptr[335]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V337*/ meltfptr[336]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V336*/ meltfptr[335]); melt_dbgtrace_written_object ( /*_.VALDATA___V336*/ meltfptr[335], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V338*/ meltfptr[337])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V338*/ meltfptr[337])))); ((meltobject_ptr_t) ( /*_.VALDATA___V338*/ meltfptr[337]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V339*/ meltfptr[338]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V338*/ meltfptr[337]); melt_dbgtrace_written_object ( /*_.VALDATA___V338*/ meltfptr[337], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:182:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V340*/ meltfptr[339])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V340*/ meltfptr[339])))); ((meltobject_ptr_t) ( /*_.VALDATA___V340*/ meltfptr[339]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V341*/ meltfptr[340]); MELT_LOCATION ("warmelt-normal.melt:182:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V340*/ meltfptr[339])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V340*/ meltfptr[339])))); ((meltobject_ptr_t) ( /*_.VALDATA___V340*/ meltfptr[339]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197]); /*putupl#122 */ melt_assertmsg ("putupl #122 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V342*/ meltfptr[341])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #122 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V342*/ meltfptr[341])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V342*/ meltfptr[341]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#123 */ melt_assertmsg ("putupl #123 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V342*/ meltfptr[341])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #123 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V342*/ meltfptr[341])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V342*/ meltfptr[341]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#124 */ melt_assertmsg ("putupl #124 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V342*/ meltfptr[341])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #124 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V342*/ meltfptr[341])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V342*/ meltfptr[341]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*putupl#125 */ melt_assertmsg ("putupl #125 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V342*/ meltfptr[341])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #125 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V342*/ meltfptr[341])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V342*/ meltfptr[341]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V342*/ meltfptr[341]); MELT_LOCATION ("warmelt-normal.melt:182:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V340*/ meltfptr[339])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V340*/ meltfptr[339])))); ((meltobject_ptr_t) ( /*_.VALDATA___V340*/ meltfptr[339]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V342*/ meltfptr[341]); MELT_LOCATION ("warmelt-normal.melt:182:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V343*/ meltfptr[342])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V343*/ meltfptr[342])))); ((meltobject_ptr_t) ( /*_.VALDATA___V343*/ meltfptr[342]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V344*/ meltfptr[343]); MELT_LOCATION ("warmelt-normal.melt:182:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V343*/ meltfptr[342])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V343*/ meltfptr[342])))); ((meltobject_ptr_t) ( /*_.VALDATA___V343*/ meltfptr[342]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V340*/ meltfptr[339]); MELT_LOCATION ("warmelt-normal.melt:182:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V343*/ meltfptr[342]); MELT_LOCATION ("warmelt-normal.melt:182:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V343*/ meltfptr[342], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:182:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V345*/ meltfptr[344])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V345*/ meltfptr[344])))); ((meltobject_ptr_t) ( /*_.VALDATA___V345*/ meltfptr[344]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V346*/ meltfptr[345]); MELT_LOCATION ("warmelt-normal.melt:182:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V345*/ meltfptr[344])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V345*/ meltfptr[344])))); ((meltobject_ptr_t) ( /*_.VALDATA___V345*/ meltfptr[344]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V340*/ meltfptr[339]); MELT_LOCATION ("warmelt-normal.melt:182:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V345*/ meltfptr[344]); MELT_LOCATION ("warmelt-normal.melt:182:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V345*/ meltfptr[344], "new static instance"); /*putupl#126 */ melt_assertmsg ("putupl #126 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V347*/ meltfptr[346])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #126 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V347*/ meltfptr[346])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V347*/ meltfptr[346]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#127 */ melt_assertmsg ("putupl #127 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V347*/ meltfptr[346])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #127 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V347*/ meltfptr[346])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V347*/ meltfptr[346]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V201*/ meltfptr[200]); /*putupl#128 */ melt_assertmsg ("putupl #128 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V347*/ meltfptr[346])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #128 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V347*/ meltfptr[346])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V347*/ meltfptr[346]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V343*/ meltfptr[342]); /*putupl#129 */ melt_assertmsg ("putupl #129 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V347*/ meltfptr[346])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #129 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V347*/ meltfptr[346])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V347*/ meltfptr[346]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V345*/ meltfptr[344]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V347*/ meltfptr[346]); MELT_LOCATION ("warmelt-normal.melt:182:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V340*/ meltfptr[339])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V340*/ meltfptr[339])))); ((meltobject_ptr_t) ( /*_.VALDATA___V340*/ meltfptr[339]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V347*/ meltfptr[346]); MELT_LOCATION ("warmelt-normal.melt:182:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V340*/ meltfptr[339]); MELT_LOCATION ("warmelt-normal.melt:182:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V340*/ meltfptr[339], "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"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V350*/ meltfptr[349]); melt_dbgtrace_written_object ( /*_.VALDATA___V350*/ meltfptr[349], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V352*/ meltfptr[351])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V352*/ meltfptr[351])))); ((meltobject_ptr_t) ( /*_.VALDATA___V352*/ meltfptr[351]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V353*/ meltfptr[352]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V352*/ meltfptr[351]); melt_dbgtrace_written_object ( /*_.VALDATA___V352*/ meltfptr[351], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:192:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V354*/ meltfptr[353])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V354*/ meltfptr[353])))); ((meltobject_ptr_t) ( /*_.VALDATA___V354*/ meltfptr[353]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V355*/ meltfptr[354]); MELT_LOCATION ("warmelt-normal.melt:192:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V354*/ meltfptr[353])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V354*/ meltfptr[353])))); ((meltobject_ptr_t) ( /*_.VALDATA___V354*/ meltfptr[353]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V340*/ meltfptr[339]); /*putupl#130 */ melt_assertmsg ("putupl #130 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V356*/ meltfptr[355])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #130 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V356*/ meltfptr[355])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V356*/ meltfptr[355]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#131 */ melt_assertmsg ("putupl #131 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V356*/ meltfptr[355])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #131 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V356*/ meltfptr[355])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V356*/ meltfptr[355]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#132 */ melt_assertmsg ("putupl #132 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V356*/ meltfptr[355])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #132 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V356*/ meltfptr[355])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V356*/ meltfptr[355]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*putupl#133 */ melt_assertmsg ("putupl #133 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V356*/ meltfptr[355])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #133 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V356*/ meltfptr[355])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V356*/ meltfptr[355]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197]); /*putupl#134 */ melt_assertmsg ("putupl #134 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V356*/ meltfptr[355])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #134 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V356*/ meltfptr[355])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V356*/ meltfptr[355]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V340*/ meltfptr[339]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V356*/ meltfptr[355]); MELT_LOCATION ("warmelt-normal.melt:192:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V354*/ meltfptr[353])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V354*/ meltfptr[353])))); ((meltobject_ptr_t) ( /*_.VALDATA___V354*/ meltfptr[353]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V356*/ meltfptr[355]); MELT_LOCATION ("warmelt-normal.melt:192:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V357*/ meltfptr[356])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V357*/ meltfptr[356])))); ((meltobject_ptr_t) ( /*_.VALDATA___V357*/ meltfptr[356]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V358*/ meltfptr[357]); MELT_LOCATION ("warmelt-normal.melt:192:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V357*/ meltfptr[356])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V357*/ meltfptr[356])))); ((meltobject_ptr_t) ( /*_.VALDATA___V357*/ meltfptr[356]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V354*/ meltfptr[353]); MELT_LOCATION ("warmelt-normal.melt:192:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V357*/ meltfptr[356]); MELT_LOCATION ("warmelt-normal.melt:192:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V357*/ meltfptr[356], "new static instance"); /*putupl#135 */ melt_assertmsg ("putupl #135 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V359*/ meltfptr[358])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #135 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V359*/ meltfptr[358])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V359*/ meltfptr[358]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#136 */ melt_assertmsg ("putupl #136 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V359*/ meltfptr[358])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #136 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V359*/ meltfptr[358])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V359*/ meltfptr[358]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V201*/ meltfptr[200]); /*putupl#137 */ melt_assertmsg ("putupl #137 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V359*/ meltfptr[358])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #137 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V359*/ meltfptr[358])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V359*/ meltfptr[358]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V343*/ meltfptr[342]); /*putupl#138 */ melt_assertmsg ("putupl #138 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V359*/ meltfptr[358])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #138 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V359*/ meltfptr[358])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V359*/ meltfptr[358]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V345*/ meltfptr[344]); /*putupl#139 */ melt_assertmsg ("putupl #139 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V359*/ meltfptr[358])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #139 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V359*/ meltfptr[358])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V359*/ meltfptr[358]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V357*/ meltfptr[356]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V359*/ meltfptr[358]); MELT_LOCATION ("warmelt-normal.melt:192:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V354*/ meltfptr[353])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V354*/ meltfptr[353])))); ((meltobject_ptr_t) ( /*_.VALDATA___V354*/ meltfptr[353]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V359*/ meltfptr[358]); MELT_LOCATION ("warmelt-normal.melt:192:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V354*/ meltfptr[353]); MELT_LOCATION ("warmelt-normal.melt:192:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V354*/ meltfptr[353], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V360*/ meltfptr[359]); melt_dbgtrace_written_object ( /*_.VALDATA___V360*/ meltfptr[359], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V362*/ meltfptr[361])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V362*/ meltfptr[361])))); ((meltobject_ptr_t) ( /*_.VALDATA___V362*/ meltfptr[361]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V363*/ meltfptr[362]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V362*/ meltfptr[361]); melt_dbgtrace_written_object ( /*_.VALDATA___V362*/ meltfptr[361], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:200:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V364*/ meltfptr[363])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V364*/ meltfptr[363])))); ((meltobject_ptr_t) ( /*_.VALDATA___V364*/ meltfptr[363]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V365*/ meltfptr[364]); MELT_LOCATION ("warmelt-normal.melt:200:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V364*/ meltfptr[363])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V364*/ meltfptr[363])))); ((meltobject_ptr_t) ( /*_.VALDATA___V364*/ meltfptr[363]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V354*/ meltfptr[353]); /*putupl#140 */ melt_assertmsg ("putupl #140 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V366*/ meltfptr[365])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #140 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V366*/ meltfptr[365])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V366*/ meltfptr[365]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#141 */ melt_assertmsg ("putupl #141 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V366*/ meltfptr[365])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #141 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V366*/ meltfptr[365])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V366*/ meltfptr[365]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#142 */ melt_assertmsg ("putupl #142 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V366*/ meltfptr[365])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #142 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V366*/ meltfptr[365])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V366*/ meltfptr[365]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*putupl#143 */ melt_assertmsg ("putupl #143 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V366*/ meltfptr[365])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #143 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V366*/ meltfptr[365])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V366*/ meltfptr[365]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197]); /*putupl#144 */ melt_assertmsg ("putupl #144 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V366*/ meltfptr[365])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #144 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V366*/ meltfptr[365])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V366*/ meltfptr[365]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V340*/ meltfptr[339]); /*putupl#145 */ melt_assertmsg ("putupl #145 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V366*/ meltfptr[365])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #145 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V366*/ meltfptr[365])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V366*/ meltfptr[365]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V354*/ meltfptr[353]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V366*/ meltfptr[365]); MELT_LOCATION ("warmelt-normal.melt:200:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V364*/ meltfptr[363])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V364*/ meltfptr[363])))); ((meltobject_ptr_t) ( /*_.VALDATA___V364*/ meltfptr[363]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V366*/ meltfptr[365]); MELT_LOCATION ("warmelt-normal.melt:200:/ 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-normal.melt:200:/ 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___V364*/ meltfptr[363]); MELT_LOCATION ("warmelt-normal.melt:200:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V367*/ meltfptr[366]); MELT_LOCATION ("warmelt-normal.melt:200:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V367*/ meltfptr[366], "new static instance"); /*putupl#146 */ melt_assertmsg ("putupl #146 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V369*/ meltfptr[368])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #146 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V369*/ meltfptr[368])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V369*/ meltfptr[368]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#147 */ melt_assertmsg ("putupl #147 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V369*/ meltfptr[368])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #147 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V369*/ meltfptr[368])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V369*/ meltfptr[368]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V201*/ meltfptr[200]); /*putupl#148 */ melt_assertmsg ("putupl #148 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V369*/ meltfptr[368])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #148 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V369*/ meltfptr[368])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V369*/ meltfptr[368]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V343*/ meltfptr[342]); /*putupl#149 */ melt_assertmsg ("putupl #149 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V369*/ meltfptr[368])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #149 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V369*/ meltfptr[368])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V369*/ meltfptr[368]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V345*/ meltfptr[344]); /*putupl#150 */ melt_assertmsg ("putupl #150 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V369*/ meltfptr[368])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #150 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V369*/ meltfptr[368])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V369*/ meltfptr[368]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V357*/ meltfptr[356]); /*putupl#151 */ melt_assertmsg ("putupl #151 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V369*/ meltfptr[368])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #151 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V369*/ meltfptr[368])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V369*/ meltfptr[368]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V367*/ meltfptr[366]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V369*/ meltfptr[368]); MELT_LOCATION ("warmelt-normal.melt:200:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V364*/ meltfptr[363])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V364*/ meltfptr[363])))); ((meltobject_ptr_t) ( /*_.VALDATA___V364*/ meltfptr[363]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V369*/ meltfptr[368]); MELT_LOCATION ("warmelt-normal.melt:200:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V364*/ meltfptr[363]); MELT_LOCATION ("warmelt-normal.melt:200:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V364*/ meltfptr[363], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V370*/ meltfptr[369])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V370*/ meltfptr[369])))); ((meltobject_ptr_t) ( /*_.VALDATA___V370*/ meltfptr[369]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V371*/ meltfptr[370]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V370*/ meltfptr[369]); melt_dbgtrace_written_object ( /*_.VALDATA___V370*/ meltfptr[369], "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"); MELT_LOCATION ("warmelt-normal.melt:209:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:209:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V374*/ meltfptr[373])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V374*/ meltfptr[373])))); ((meltobject_ptr_t) ( /*_.VALDATA___V374*/ meltfptr[373]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V354*/ meltfptr[353]); /*putupl#152 */ melt_assertmsg ("putupl #152 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V376*/ meltfptr[375])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #152 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V376*/ meltfptr[375])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V376*/ meltfptr[375]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#153 */ melt_assertmsg ("putupl #153 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V376*/ meltfptr[375])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #153 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V376*/ meltfptr[375])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V376*/ meltfptr[375]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#154 */ melt_assertmsg ("putupl #154 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V376*/ meltfptr[375])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #154 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V376*/ meltfptr[375])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V376*/ meltfptr[375]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*putupl#155 */ melt_assertmsg ("putupl #155 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V376*/ meltfptr[375])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #155 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V376*/ meltfptr[375])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V376*/ meltfptr[375]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197]); /*putupl#156 */ melt_assertmsg ("putupl #156 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V376*/ meltfptr[375])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #156 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V376*/ meltfptr[375])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V376*/ meltfptr[375]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V340*/ meltfptr[339]); /*putupl#157 */ melt_assertmsg ("putupl #157 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V376*/ meltfptr[375])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #157 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V376*/ meltfptr[375])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V376*/ meltfptr[375]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V354*/ meltfptr[353]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V376*/ meltfptr[375]); MELT_LOCATION ("warmelt-normal.melt:209:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V374*/ meltfptr[373])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V374*/ meltfptr[373])))); ((meltobject_ptr_t) ( /*_.VALDATA___V374*/ meltfptr[373]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V376*/ meltfptr[375]); MELT_LOCATION ("warmelt-normal.melt:209:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V377*/ meltfptr[376])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V377*/ meltfptr[376])))); ((meltobject_ptr_t) ( /*_.VALDATA___V377*/ meltfptr[376]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V378*/ meltfptr[377]); MELT_LOCATION ("warmelt-normal.melt:209:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V377*/ meltfptr[376])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V377*/ meltfptr[376])))); ((meltobject_ptr_t) ( /*_.VALDATA___V377*/ meltfptr[376]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V374*/ meltfptr[373]); MELT_LOCATION ("warmelt-normal.melt:209:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V377*/ meltfptr[376]); MELT_LOCATION ("warmelt-normal.melt:209:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V377*/ meltfptr[376], "new static instance"); /*putupl#158 */ melt_assertmsg ("putupl #158 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V379*/ meltfptr[378])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #158 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V379*/ meltfptr[378])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V379*/ meltfptr[378]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#159 */ melt_assertmsg ("putupl #159 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V379*/ meltfptr[378])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #159 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V379*/ meltfptr[378])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V379*/ meltfptr[378]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V201*/ meltfptr[200]); /*putupl#160 */ melt_assertmsg ("putupl #160 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V379*/ meltfptr[378])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #160 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V379*/ meltfptr[378])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V379*/ meltfptr[378]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V343*/ meltfptr[342]); /*putupl#161 */ melt_assertmsg ("putupl #161 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V379*/ meltfptr[378])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #161 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V379*/ meltfptr[378])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V379*/ meltfptr[378]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V345*/ meltfptr[344]); /*putupl#162 */ melt_assertmsg ("putupl #162 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V379*/ meltfptr[378])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #162 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V379*/ meltfptr[378])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V379*/ meltfptr[378]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V357*/ meltfptr[356]); /*putupl#163 */ melt_assertmsg ("putupl #163 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V379*/ meltfptr[378])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #163 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V379*/ meltfptr[378])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V379*/ meltfptr[378]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V377*/ meltfptr[376]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V379*/ meltfptr[378]); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_3 */ void meltmod__warmelt_normal__initialmeltchunk_4 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-normal.melt:209:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V374*/ meltfptr[373])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V374*/ meltfptr[373])))); ((meltobject_ptr_t) ( /*_.VALDATA___V374*/ meltfptr[373]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V379*/ meltfptr[378]); MELT_LOCATION ("warmelt-normal.melt:209:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V374*/ meltfptr[373]); MELT_LOCATION ("warmelt-normal.melt:209:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V374*/ meltfptr[373], "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"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V382*/ meltfptr[381]); melt_dbgtrace_written_object ( /*_.VALDATA___V382*/ meltfptr[381], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:218:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V384*/ meltfptr[383])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V384*/ meltfptr[383])))); ((meltobject_ptr_t) ( /*_.VALDATA___V384*/ meltfptr[383]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V385*/ meltfptr[384]); MELT_LOCATION ("warmelt-normal.melt:218:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V384*/ meltfptr[383])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V384*/ meltfptr[383])))); ((meltobject_ptr_t) ( /*_.VALDATA___V384*/ meltfptr[383]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V340*/ meltfptr[339]); /*putupl#164 */ melt_assertmsg ("putupl #164 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V386*/ meltfptr[385])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #164 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V386*/ meltfptr[385])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V386*/ meltfptr[385]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#165 */ melt_assertmsg ("putupl #165 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V386*/ meltfptr[385])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #165 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V386*/ meltfptr[385])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V386*/ meltfptr[385]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#166 */ melt_assertmsg ("putupl #166 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V386*/ meltfptr[385])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #166 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V386*/ meltfptr[385])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V386*/ meltfptr[385]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*putupl#167 */ melt_assertmsg ("putupl #167 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V386*/ meltfptr[385])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #167 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V386*/ meltfptr[385])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V386*/ meltfptr[385]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197]); /*putupl#168 */ melt_assertmsg ("putupl #168 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V386*/ meltfptr[385])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #168 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V386*/ meltfptr[385])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V386*/ meltfptr[385]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V340*/ meltfptr[339]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V386*/ meltfptr[385]); MELT_LOCATION ("warmelt-normal.melt:218:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V384*/ meltfptr[383])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V384*/ meltfptr[383])))); ((meltobject_ptr_t) ( /*_.VALDATA___V384*/ meltfptr[383]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V386*/ meltfptr[385]); MELT_LOCATION ("warmelt-normal.melt:218:/ 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-normal.melt:218:/ 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___V384*/ meltfptr[383]); MELT_LOCATION ("warmelt-normal.melt:218:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V387*/ meltfptr[386]); MELT_LOCATION ("warmelt-normal.melt:218:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V387*/ meltfptr[386], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:218:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V389*/ meltfptr[388])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V389*/ meltfptr[388])))); ((meltobject_ptr_t) ( /*_.VALDATA___V389*/ meltfptr[388]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V390*/ meltfptr[389]); MELT_LOCATION ("warmelt-normal.melt:218:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V389*/ meltfptr[388])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V389*/ meltfptr[388])))); ((meltobject_ptr_t) ( /*_.VALDATA___V389*/ meltfptr[388]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V384*/ meltfptr[383]); MELT_LOCATION ("warmelt-normal.melt:218:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V389*/ meltfptr[388]); MELT_LOCATION ("warmelt-normal.melt:218:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V389*/ meltfptr[388], "new static instance"); /*putupl#169 */ melt_assertmsg ("putupl #169 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V391*/ meltfptr[390])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #169 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V391*/ meltfptr[390])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V391*/ meltfptr[390]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#170 */ melt_assertmsg ("putupl #170 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V391*/ meltfptr[390])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #170 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V391*/ meltfptr[390])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V391*/ meltfptr[390]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V201*/ meltfptr[200]); /*putupl#171 */ melt_assertmsg ("putupl #171 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V391*/ meltfptr[390])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #171 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V391*/ meltfptr[390])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V391*/ meltfptr[390]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V343*/ meltfptr[342]); /*putupl#172 */ melt_assertmsg ("putupl #172 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V391*/ meltfptr[390])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #172 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V391*/ meltfptr[390])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V391*/ meltfptr[390]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V345*/ meltfptr[344]); /*putupl#173 */ melt_assertmsg ("putupl #173 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V391*/ meltfptr[390])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #173 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V391*/ meltfptr[390])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V391*/ meltfptr[390]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V387*/ meltfptr[386]); /*putupl#174 */ melt_assertmsg ("putupl #174 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V391*/ meltfptr[390])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #174 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V391*/ meltfptr[390])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V391*/ meltfptr[390]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V389*/ meltfptr[388]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V391*/ meltfptr[390]); MELT_LOCATION ("warmelt-normal.melt:218:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V384*/ meltfptr[383])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V384*/ meltfptr[383])))); ((meltobject_ptr_t) ( /*_.VALDATA___V384*/ meltfptr[383]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V391*/ meltfptr[390]); MELT_LOCATION ("warmelt-normal.melt:218:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V384*/ meltfptr[383]); MELT_LOCATION ("warmelt-normal.melt:218:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V384*/ meltfptr[383], "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"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V396*/ meltfptr[395]); melt_dbgtrace_written_object ( /*_.VALDATA___V396*/ meltfptr[395], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:227:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V398*/ meltfptr[397])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V398*/ meltfptr[397])))); ((meltobject_ptr_t) ( /*_.VALDATA___V398*/ meltfptr[397]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V399*/ meltfptr[398]); MELT_LOCATION ("warmelt-normal.melt:227:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V398*/ meltfptr[397])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V398*/ meltfptr[397])))); ((meltobject_ptr_t) ( /*_.VALDATA___V398*/ meltfptr[397]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*putupl#175 */ melt_assertmsg ("putupl #175 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V400*/ meltfptr[399])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #175 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V400*/ meltfptr[399])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V400*/ meltfptr[399]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#176 */ melt_assertmsg ("putupl #176 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V400*/ meltfptr[399])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #176 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V400*/ meltfptr[399])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V400*/ meltfptr[399]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#177 */ melt_assertmsg ("putupl #177 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V400*/ meltfptr[399])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #177 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V400*/ meltfptr[399])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V400*/ meltfptr[399]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V400*/ meltfptr[399]); MELT_LOCATION ("warmelt-normal.melt:227:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V398*/ meltfptr[397])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V398*/ meltfptr[397])))); ((meltobject_ptr_t) ( /*_.VALDATA___V398*/ meltfptr[397]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V400*/ meltfptr[399]); MELT_LOCATION ("warmelt-normal.melt:227:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V401*/ meltfptr[400])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V401*/ meltfptr[400])))); ((meltobject_ptr_t) ( /*_.VALDATA___V401*/ meltfptr[400]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V402*/ meltfptr[401]); MELT_LOCATION ("warmelt-normal.melt:227:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V401*/ meltfptr[400])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V401*/ meltfptr[400])))); ((meltobject_ptr_t) ( /*_.VALDATA___V401*/ meltfptr[400]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V398*/ meltfptr[397]); MELT_LOCATION ("warmelt-normal.melt:227:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V401*/ meltfptr[400]); MELT_LOCATION ("warmelt-normal.melt:227:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V401*/ meltfptr[400], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:227:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402])))); ((meltobject_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V404*/ meltfptr[403]); MELT_LOCATION ("warmelt-normal.melt:227:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402])))); ((meltobject_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V398*/ meltfptr[397]); MELT_LOCATION ("warmelt-normal.melt:227:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V403*/ meltfptr[402]); MELT_LOCATION ("warmelt-normal.melt:227:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V403*/ meltfptr[402], "new static instance"); /*putupl#178 */ melt_assertmsg ("putupl #178 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V405*/ meltfptr[404])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #178 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V405*/ meltfptr[404])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V405*/ meltfptr[404]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#179 */ melt_assertmsg ("putupl #179 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V405*/ meltfptr[404])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #179 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V405*/ meltfptr[404])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V405*/ meltfptr[404]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V401*/ meltfptr[400]); /*putupl#180 */ melt_assertmsg ("putupl #180 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V405*/ meltfptr[404])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #180 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V405*/ meltfptr[404])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V405*/ meltfptr[404]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V405*/ meltfptr[404]); MELT_LOCATION ("warmelt-normal.melt:227:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V398*/ meltfptr[397])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V398*/ meltfptr[397])))); ((meltobject_ptr_t) ( /*_.VALDATA___V398*/ meltfptr[397]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V405*/ meltfptr[404]); MELT_LOCATION ("warmelt-normal.melt:227:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V398*/ meltfptr[397]); MELT_LOCATION ("warmelt-normal.melt:227:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V398*/ meltfptr[397], "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"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V408*/ meltfptr[407]); melt_dbgtrace_written_object ( /*_.VALDATA___V408*/ meltfptr[407], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V410*/ meltfptr[409])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V410*/ meltfptr[409])))); ((meltobject_ptr_t) ( /*_.VALDATA___V410*/ meltfptr[409]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V411*/ meltfptr[410]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V410*/ meltfptr[409]); melt_dbgtrace_written_object ( /*_.VALDATA___V410*/ meltfptr[409], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:238:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V412*/ meltfptr[411])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V412*/ meltfptr[411])))); ((meltobject_ptr_t) ( /*_.VALDATA___V412*/ meltfptr[411]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V413*/ meltfptr[412]); MELT_LOCATION ("warmelt-normal.melt:238:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V412*/ meltfptr[411])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V412*/ meltfptr[411])))); ((meltobject_ptr_t) ( /*_.VALDATA___V412*/ meltfptr[411]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V340*/ meltfptr[339]); /*putupl#181 */ melt_assertmsg ("putupl #181 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V414*/ meltfptr[413])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #181 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V414*/ meltfptr[413])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V414*/ meltfptr[413]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#182 */ melt_assertmsg ("putupl #182 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V414*/ meltfptr[413])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #182 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V414*/ meltfptr[413])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V414*/ meltfptr[413]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#183 */ melt_assertmsg ("putupl #183 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V414*/ meltfptr[413])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #183 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V414*/ meltfptr[413])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V414*/ meltfptr[413]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*putupl#184 */ melt_assertmsg ("putupl #184 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V414*/ meltfptr[413])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #184 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V414*/ meltfptr[413])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V414*/ meltfptr[413]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197]); /*putupl#185 */ melt_assertmsg ("putupl #185 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V414*/ meltfptr[413])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #185 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V414*/ meltfptr[413])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V414*/ meltfptr[413]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V340*/ meltfptr[339]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V414*/ meltfptr[413]); MELT_LOCATION ("warmelt-normal.melt:238:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V412*/ meltfptr[411])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V412*/ meltfptr[411])))); ((meltobject_ptr_t) ( /*_.VALDATA___V412*/ meltfptr[411]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V414*/ meltfptr[413]); MELT_LOCATION ("warmelt-normal.melt:238:/ 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-normal.melt:238:/ 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___V412*/ meltfptr[411]); MELT_LOCATION ("warmelt-normal.melt:238:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V415*/ meltfptr[414]); MELT_LOCATION ("warmelt-normal.melt:238:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V415*/ meltfptr[414], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:238:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V417*/ meltfptr[416])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V417*/ meltfptr[416])))); ((meltobject_ptr_t) ( /*_.VALDATA___V417*/ meltfptr[416]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V418*/ meltfptr[417]); MELT_LOCATION ("warmelt-normal.melt:238:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V417*/ meltfptr[416])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V417*/ meltfptr[416])))); ((meltobject_ptr_t) ( /*_.VALDATA___V417*/ meltfptr[416]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V412*/ meltfptr[411]); MELT_LOCATION ("warmelt-normal.melt:238:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V417*/ meltfptr[416]); MELT_LOCATION ("warmelt-normal.melt:238:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V417*/ meltfptr[416], "new static instance"); /*putupl#186 */ melt_assertmsg ("putupl #186 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V419*/ meltfptr[418])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #186 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V419*/ meltfptr[418])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V419*/ meltfptr[418]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#187 */ melt_assertmsg ("putupl #187 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V419*/ meltfptr[418])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #187 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V419*/ meltfptr[418])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V419*/ meltfptr[418]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V201*/ meltfptr[200]); /*putupl#188 */ melt_assertmsg ("putupl #188 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V419*/ meltfptr[418])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #188 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V419*/ meltfptr[418])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V419*/ meltfptr[418]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V343*/ meltfptr[342]); /*putupl#189 */ melt_assertmsg ("putupl #189 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V419*/ meltfptr[418])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #189 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V419*/ meltfptr[418])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V419*/ meltfptr[418]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V345*/ meltfptr[344]); /*putupl#190 */ melt_assertmsg ("putupl #190 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V419*/ meltfptr[418])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #190 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V419*/ meltfptr[418])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V419*/ meltfptr[418]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V415*/ meltfptr[414]); /*putupl#191 */ melt_assertmsg ("putupl #191 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V419*/ meltfptr[418])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #191 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V419*/ meltfptr[418])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V419*/ meltfptr[418]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V417*/ meltfptr[416]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V419*/ meltfptr[418]); MELT_LOCATION ("warmelt-normal.melt:238:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V412*/ meltfptr[411])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V412*/ meltfptr[411])))); ((meltobject_ptr_t) ( /*_.VALDATA___V412*/ meltfptr[411]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V419*/ meltfptr[418]); MELT_LOCATION ("warmelt-normal.melt:238:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V412*/ meltfptr[411]); MELT_LOCATION ("warmelt-normal.melt:238:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V412*/ meltfptr[411], "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"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V424*/ meltfptr[423])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V424*/ meltfptr[423])))); ((meltobject_ptr_t) ( /*_.VALDATA___V424*/ meltfptr[423]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V425*/ meltfptr[424]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V424*/ meltfptr[423]); melt_dbgtrace_written_object ( /*_.VALDATA___V424*/ meltfptr[423], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:245:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:245:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V426*/ meltfptr[425])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V426*/ meltfptr[425])))); ((meltobject_ptr_t) ( /*_.VALDATA___V426*/ meltfptr[425]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V340*/ meltfptr[339]); /*putupl#192 */ melt_assertmsg ("putupl #192 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V428*/ meltfptr[427])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #192 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V428*/ meltfptr[427])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V428*/ meltfptr[427]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#193 */ melt_assertmsg ("putupl #193 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V428*/ meltfptr[427])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #193 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V428*/ meltfptr[427])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V428*/ meltfptr[427]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#194 */ melt_assertmsg ("putupl #194 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V428*/ meltfptr[427])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #194 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V428*/ meltfptr[427])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V428*/ meltfptr[427]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*putupl#195 */ melt_assertmsg ("putupl #195 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V428*/ meltfptr[427])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #195 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V428*/ meltfptr[427])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V428*/ meltfptr[427]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197]); /*putupl#196 */ melt_assertmsg ("putupl #196 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V428*/ meltfptr[427])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #196 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V428*/ meltfptr[427])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V428*/ meltfptr[427]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V340*/ meltfptr[339]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V428*/ meltfptr[427]); MELT_LOCATION ("warmelt-normal.melt:245:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V426*/ meltfptr[425])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V426*/ meltfptr[425])))); ((meltobject_ptr_t) ( /*_.VALDATA___V426*/ meltfptr[425]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V428*/ meltfptr[427]); MELT_LOCATION ("warmelt-normal.melt:245:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V429*/ meltfptr[428])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V429*/ meltfptr[428])))); ((meltobject_ptr_t) ( /*_.VALDATA___V429*/ meltfptr[428]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V430*/ meltfptr[429]); MELT_LOCATION ("warmelt-normal.melt:245:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V429*/ meltfptr[428])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V429*/ meltfptr[428])))); ((meltobject_ptr_t) ( /*_.VALDATA___V429*/ meltfptr[428]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V426*/ meltfptr[425]); MELT_LOCATION ("warmelt-normal.melt:245:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V429*/ meltfptr[428]); MELT_LOCATION ("warmelt-normal.melt:245:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V429*/ meltfptr[428], "new static instance"); /*putupl#197 */ melt_assertmsg ("putupl #197 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V431*/ meltfptr[430])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #197 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V431*/ meltfptr[430])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V431*/ meltfptr[430]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#198 */ melt_assertmsg ("putupl #198 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V431*/ meltfptr[430])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #198 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V431*/ meltfptr[430])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V431*/ meltfptr[430]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V201*/ meltfptr[200]); /*putupl#199 */ melt_assertmsg ("putupl #199 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V431*/ meltfptr[430])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #199 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V431*/ meltfptr[430])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V431*/ meltfptr[430]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V343*/ meltfptr[342]); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_4 */ void meltmod__warmelt_normal__initialmeltchunk_5 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*putupl#200*/ melt_assertmsg ("putupl #200 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V431*/ meltfptr[430])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #200 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V431*/ meltfptr[430])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V431*/ meltfptr[430]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V345*/ meltfptr[344]); /*putupl#201 */ melt_assertmsg ("putupl #201 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V431*/ meltfptr[430])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #201 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V431*/ meltfptr[430])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V431*/ meltfptr[430]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V429*/ meltfptr[428]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V431*/ meltfptr[430]); MELT_LOCATION ("warmelt-normal.melt:245:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V426*/ meltfptr[425])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V426*/ meltfptr[425])))); ((meltobject_ptr_t) ( /*_.VALDATA___V426*/ meltfptr[425]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V431*/ meltfptr[430]); MELT_LOCATION ("warmelt-normal.melt:245:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V426*/ meltfptr[425]); MELT_LOCATION ("warmelt-normal.melt:245:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V426*/ meltfptr[425], "new static instance"); /*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"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V434*/ meltfptr[433])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V434*/ meltfptr[433])))); ((meltobject_ptr_t) ( /*_.VALDATA___V434*/ meltfptr[433]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V435*/ meltfptr[434]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V434*/ meltfptr[433]); melt_dbgtrace_written_object ( /*_.VALDATA___V434*/ meltfptr[433], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:254:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V436*/ meltfptr[435])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V436*/ meltfptr[435])))); ((meltobject_ptr_t) ( /*_.VALDATA___V436*/ meltfptr[435]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V437*/ meltfptr[436]); MELT_LOCATION ("warmelt-normal.melt:254:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V436*/ meltfptr[435])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V436*/ meltfptr[435])))); ((meltobject_ptr_t) ( /*_.VALDATA___V436*/ meltfptr[435]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*putupl#202 */ melt_assertmsg ("putupl #202 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V438*/ meltfptr[437])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #202 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V438*/ meltfptr[437])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V438*/ meltfptr[437]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#203 */ melt_assertmsg ("putupl #203 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V438*/ meltfptr[437])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #203 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V438*/ meltfptr[437])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V438*/ meltfptr[437]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#204 */ melt_assertmsg ("putupl #204 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V438*/ meltfptr[437])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #204 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V438*/ meltfptr[437])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V438*/ meltfptr[437]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V438*/ meltfptr[437]); MELT_LOCATION ("warmelt-normal.melt:254:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V436*/ meltfptr[435])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V436*/ meltfptr[435])))); ((meltobject_ptr_t) ( /*_.VALDATA___V436*/ meltfptr[435]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V438*/ meltfptr[437]); MELT_LOCATION ("warmelt-normal.melt:254:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V439*/ meltfptr[438])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V439*/ meltfptr[438])))); ((meltobject_ptr_t) ( /*_.VALDATA___V439*/ meltfptr[438]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V440*/ meltfptr[439]); MELT_LOCATION ("warmelt-normal.melt:254:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V439*/ meltfptr[438])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V439*/ meltfptr[438])))); ((meltobject_ptr_t) ( /*_.VALDATA___V439*/ meltfptr[438]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V436*/ meltfptr[435]); MELT_LOCATION ("warmelt-normal.melt:254:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V439*/ meltfptr[438]); MELT_LOCATION ("warmelt-normal.melt:254:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V439*/ meltfptr[438], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:254:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V441*/ meltfptr[440])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V441*/ meltfptr[440])))); ((meltobject_ptr_t) ( /*_.VALDATA___V441*/ meltfptr[440]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V442*/ meltfptr[441]); MELT_LOCATION ("warmelt-normal.melt:254:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V441*/ meltfptr[440])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V441*/ meltfptr[440])))); ((meltobject_ptr_t) ( /*_.VALDATA___V441*/ meltfptr[440]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V436*/ meltfptr[435]); MELT_LOCATION ("warmelt-normal.melt:254:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V441*/ meltfptr[440]); MELT_LOCATION ("warmelt-normal.melt:254:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V441*/ meltfptr[440], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:254:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:254:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V443*/ meltfptr[442])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V443*/ meltfptr[442])))); ((meltobject_ptr_t) ( /*_.VALDATA___V443*/ meltfptr[442]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V436*/ meltfptr[435]); MELT_LOCATION ("warmelt-normal.melt:254:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V443*/ meltfptr[442]); MELT_LOCATION ("warmelt-normal.melt:254:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V443*/ meltfptr[442], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:254:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V445*/ meltfptr[444])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V445*/ meltfptr[444])))); ((meltobject_ptr_t) ( /*_.VALDATA___V445*/ meltfptr[444]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V446*/ meltfptr[445]); MELT_LOCATION ("warmelt-normal.melt:254:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V445*/ meltfptr[444])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V445*/ meltfptr[444])))); ((meltobject_ptr_t) ( /*_.VALDATA___V445*/ meltfptr[444]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V436*/ meltfptr[435]); MELT_LOCATION ("warmelt-normal.melt:254:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V445*/ meltfptr[444]); MELT_LOCATION ("warmelt-normal.melt:254:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V445*/ meltfptr[444], "new static instance"); /*putupl#205 */ melt_assertmsg ("putupl #205 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V447*/ meltfptr[446])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #205 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V447*/ meltfptr[446])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V447*/ meltfptr[446]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#206 */ melt_assertmsg ("putupl #206 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V447*/ meltfptr[446])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #206 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V447*/ meltfptr[446])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V447*/ meltfptr[446]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V439*/ meltfptr[438]); /*putupl#207 */ melt_assertmsg ("putupl #207 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V447*/ meltfptr[446])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #207 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V447*/ meltfptr[446])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V447*/ meltfptr[446]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V441*/ meltfptr[440]); /*putupl#208 */ melt_assertmsg ("putupl #208 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V447*/ meltfptr[446])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #208 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V447*/ meltfptr[446])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V447*/ meltfptr[446]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V443*/ meltfptr[442]); /*putupl#209 */ melt_assertmsg ("putupl #209 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V447*/ meltfptr[446])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #209 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V447*/ meltfptr[446])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V447*/ meltfptr[446]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V445*/ meltfptr[444]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V447*/ meltfptr[446]); MELT_LOCATION ("warmelt-normal.melt:254:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V436*/ meltfptr[435])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V436*/ meltfptr[435])))); ((meltobject_ptr_t) ( /*_.VALDATA___V436*/ meltfptr[435]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V447*/ meltfptr[446]); MELT_LOCATION ("warmelt-normal.melt:254:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V436*/ meltfptr[435]); MELT_LOCATION ("warmelt-normal.melt:254:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V436*/ meltfptr[435], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V448*/ meltfptr[447])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V448*/ meltfptr[447])))); ((meltobject_ptr_t) ( /*_.VALDATA___V448*/ meltfptr[447]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V449*/ meltfptr[448]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V448*/ meltfptr[447]); melt_dbgtrace_written_object ( /*_.VALDATA___V448*/ meltfptr[447], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V450*/ meltfptr[449])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V450*/ meltfptr[449])))); ((meltobject_ptr_t) ( /*_.VALDATA___V450*/ meltfptr[449]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V451*/ meltfptr[450]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V450*/ meltfptr[449]); melt_dbgtrace_written_object ( /*_.VALDATA___V450*/ meltfptr[449], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V452*/ meltfptr[451])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V452*/ meltfptr[451])))); ((meltobject_ptr_t) ( /*_.VALDATA___V452*/ meltfptr[451]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V453*/ meltfptr[452]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V452*/ meltfptr[451]); melt_dbgtrace_written_object ( /*_.VALDATA___V452*/ meltfptr[451], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V454*/ meltfptr[453])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V454*/ meltfptr[453])))); ((meltobject_ptr_t) ( /*_.VALDATA___V454*/ meltfptr[453]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V455*/ meltfptr[454]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V454*/ meltfptr[453]); melt_dbgtrace_written_object ( /*_.VALDATA___V454*/ meltfptr[453], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V456*/ meltfptr[455])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V456*/ meltfptr[455])))); ((meltobject_ptr_t) ( /*_.VALDATA___V456*/ meltfptr[455]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V457*/ meltfptr[456]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V456*/ meltfptr[455]); melt_dbgtrace_written_object ( /*_.VALDATA___V456*/ meltfptr[455], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:266:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V458*/ meltfptr[457])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V458*/ meltfptr[457])))); ((meltobject_ptr_t) ( /*_.VALDATA___V458*/ meltfptr[457]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V459*/ meltfptr[458]); MELT_LOCATION ("warmelt-normal.melt:266:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V458*/ meltfptr[457])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V458*/ meltfptr[457])))); ((meltobject_ptr_t) ( /*_.VALDATA___V458*/ meltfptr[457]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*putupl#210 */ melt_assertmsg ("putupl #210 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V460*/ meltfptr[459])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #210 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V460*/ meltfptr[459])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V460*/ meltfptr[459]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#211 */ melt_assertmsg ("putupl #211 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V460*/ meltfptr[459])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #211 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V460*/ meltfptr[459])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V460*/ meltfptr[459]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#212 */ melt_assertmsg ("putupl #212 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V460*/ meltfptr[459])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #212 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V460*/ meltfptr[459])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V460*/ meltfptr[459]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V460*/ meltfptr[459]); MELT_LOCATION ("warmelt-normal.melt:266:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V458*/ meltfptr[457])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V458*/ meltfptr[457])))); ((meltobject_ptr_t) ( /*_.VALDATA___V458*/ meltfptr[457]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V460*/ meltfptr[459]); MELT_LOCATION ("warmelt-normal.melt:266:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V461*/ meltfptr[460])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V461*/ meltfptr[460])))); ((meltobject_ptr_t) ( /*_.VALDATA___V461*/ meltfptr[460]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V462*/ meltfptr[461]); MELT_LOCATION ("warmelt-normal.melt:266:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V461*/ meltfptr[460])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V461*/ meltfptr[460])))); ((meltobject_ptr_t) ( /*_.VALDATA___V461*/ meltfptr[460]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V458*/ meltfptr[457]); MELT_LOCATION ("warmelt-normal.melt:266:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V461*/ meltfptr[460]); MELT_LOCATION ("warmelt-normal.melt:266:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V461*/ meltfptr[460], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:266:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:266:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V463*/ meltfptr[462])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V463*/ meltfptr[462])))); ((meltobject_ptr_t) ( /*_.VALDATA___V463*/ meltfptr[462]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V458*/ meltfptr[457]); MELT_LOCATION ("warmelt-normal.melt:266:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V463*/ meltfptr[462]); MELT_LOCATION ("warmelt-normal.melt:266:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V463*/ meltfptr[462], "new static instance"); /*putupl#213 */ melt_assertmsg ("putupl #213 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V465*/ meltfptr[464])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #213 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V465*/ meltfptr[464])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V465*/ meltfptr[464]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#214 */ melt_assertmsg ("putupl #214 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V465*/ meltfptr[464])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #214 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V465*/ meltfptr[464])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V465*/ meltfptr[464]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V461*/ meltfptr[460]); /*putupl#215 */ melt_assertmsg ("putupl #215 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V465*/ meltfptr[464])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #215 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V465*/ meltfptr[464])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V465*/ meltfptr[464]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V463*/ meltfptr[462]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V465*/ meltfptr[464]); MELT_LOCATION ("warmelt-normal.melt:266:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V458*/ meltfptr[457])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V458*/ meltfptr[457])))); ((meltobject_ptr_t) ( /*_.VALDATA___V458*/ meltfptr[457]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V465*/ meltfptr[464]); MELT_LOCATION ("warmelt-normal.melt:266:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V458*/ meltfptr[457]); MELT_LOCATION ("warmelt-normal.melt:266:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V458*/ meltfptr[457], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V466*/ meltfptr[465])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V466*/ meltfptr[465])))); ((meltobject_ptr_t) ( /*_.VALDATA___V466*/ meltfptr[465]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V467*/ meltfptr[466]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V466*/ meltfptr[465]); melt_dbgtrace_written_object ( /*_.VALDATA___V466*/ meltfptr[465], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V468*/ meltfptr[467])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V468*/ meltfptr[467])))); ((meltobject_ptr_t) ( /*_.VALDATA___V468*/ meltfptr[467]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V469*/ meltfptr[468]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V468*/ meltfptr[467]); melt_dbgtrace_written_object ( /*_.VALDATA___V468*/ meltfptr[467], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V470*/ meltfptr[469])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V470*/ meltfptr[469])))); ((meltobject_ptr_t) ( /*_.VALDATA___V470*/ meltfptr[469]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V471*/ meltfptr[470]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V470*/ meltfptr[469]); melt_dbgtrace_written_object ( /*_.VALDATA___V470*/ meltfptr[469], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:275:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471])))); ((meltobject_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V473*/ meltfptr[472]); MELT_LOCATION ("warmelt-normal.melt:275:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471])))); ((meltobject_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*putupl#216 */ melt_assertmsg ("putupl #216 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V474*/ meltfptr[473])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #216 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V474*/ meltfptr[473])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V474*/ meltfptr[473]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#217 */ melt_assertmsg ("putupl #217 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V474*/ meltfptr[473])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #217 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V474*/ meltfptr[473])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V474*/ meltfptr[473]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#218 */ melt_assertmsg ("putupl #218 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V474*/ meltfptr[473])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #218 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V474*/ meltfptr[473])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V474*/ meltfptr[473]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V474*/ meltfptr[473]); MELT_LOCATION ("warmelt-normal.melt:275:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471])))); ((meltobject_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V474*/ meltfptr[473]); /*putupl#219 */ melt_assertmsg ("putupl #219 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V475*/ meltfptr[474])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #219 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V475*/ meltfptr[474])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V475*/ meltfptr[474]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V475*/ meltfptr[474]); MELT_LOCATION ("warmelt-normal.melt:275:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471])))); ((meltobject_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V475*/ meltfptr[474]); MELT_LOCATION ("warmelt-normal.melt:275:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V472*/ meltfptr[471]); MELT_LOCATION ("warmelt-normal.melt:275:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V472*/ meltfptr[471], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V476*/ meltfptr[475])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V476*/ meltfptr[475])))); ((meltobject_ptr_t) ( /*_.VALDATA___V476*/ meltfptr[475]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V477*/ meltfptr[476]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V476*/ meltfptr[475]); melt_dbgtrace_written_object ( /*_.VALDATA___V476*/ meltfptr[475], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:286:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V478*/ meltfptr[477])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V478*/ meltfptr[477])))); ((meltobject_ptr_t) ( /*_.VALDATA___V478*/ meltfptr[477]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V479*/ meltfptr[478]); MELT_LOCATION ("warmelt-normal.melt:286:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V478*/ meltfptr[477])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V478*/ meltfptr[477])))); ((meltobject_ptr_t) ( /*_.VALDATA___V478*/ meltfptr[477]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*putupl#220 */ melt_assertmsg ("putupl #220 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V480*/ meltfptr[479])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #220 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V480*/ meltfptr[479])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V480*/ meltfptr[479]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#221 */ melt_assertmsg ("putupl #221 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V480*/ meltfptr[479])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #221 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V480*/ meltfptr[479])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V480*/ meltfptr[479]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#222 */ melt_assertmsg ("putupl #222 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V480*/ meltfptr[479])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #222 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V480*/ meltfptr[479])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V480*/ meltfptr[479]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V480*/ meltfptr[479]); MELT_LOCATION ("warmelt-normal.melt:286:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V478*/ meltfptr[477])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V478*/ meltfptr[477])))); ((meltobject_ptr_t) ( /*_.VALDATA___V478*/ meltfptr[477]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V480*/ meltfptr[479]); MELT_LOCATION ("warmelt-normal.melt:286:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V481*/ meltfptr[480])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V481*/ meltfptr[480])))); ((meltobject_ptr_t) ( /*_.VALDATA___V481*/ meltfptr[480]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V482*/ meltfptr[481]); MELT_LOCATION ("warmelt-normal.melt:286:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V481*/ meltfptr[480])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V481*/ meltfptr[480])))); ((meltobject_ptr_t) ( /*_.VALDATA___V481*/ meltfptr[480]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V478*/ meltfptr[477]); MELT_LOCATION ("warmelt-normal.melt:286:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V481*/ meltfptr[480]); MELT_LOCATION ("warmelt-normal.melt:286:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V481*/ meltfptr[480], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:286:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V483*/ meltfptr[482])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V483*/ meltfptr[482])))); ((meltobject_ptr_t) ( /*_.VALDATA___V483*/ meltfptr[482]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V484*/ meltfptr[483]); MELT_LOCATION ("warmelt-normal.melt:286:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V483*/ meltfptr[482])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V483*/ meltfptr[482])))); ((meltobject_ptr_t) ( /*_.VALDATA___V483*/ meltfptr[482]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V478*/ meltfptr[477]); MELT_LOCATION ("warmelt-normal.melt:286:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V483*/ meltfptr[482]); MELT_LOCATION ("warmelt-normal.melt:286:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V483*/ meltfptr[482], "new static instance"); /*putupl#223 */ melt_assertmsg ("putupl #223 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V485*/ meltfptr[484])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #223 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V485*/ meltfptr[484])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V485*/ meltfptr[484]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#224 */ melt_assertmsg ("putupl #224 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V485*/ meltfptr[484])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #224 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V485*/ meltfptr[484])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V485*/ meltfptr[484]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V481*/ meltfptr[480]); /*putupl#225 */ melt_assertmsg ("putupl #225 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V485*/ meltfptr[484])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #225 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V485*/ meltfptr[484])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V485*/ meltfptr[484]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V483*/ meltfptr[482]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V485*/ meltfptr[484]); MELT_LOCATION ("warmelt-normal.melt:286:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V478*/ meltfptr[477])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V478*/ meltfptr[477])))); ((meltobject_ptr_t) ( /*_.VALDATA___V478*/ meltfptr[477]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V485*/ meltfptr[484]); MELT_LOCATION ("warmelt-normal.melt:286:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V478*/ meltfptr[477]); MELT_LOCATION ("warmelt-normal.melt:286:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V478*/ meltfptr[477], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V486*/ meltfptr[485])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V486*/ meltfptr[485])))); ((meltobject_ptr_t) ( /*_.VALDATA___V486*/ meltfptr[485]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V487*/ meltfptr[486]); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_5 */ void meltmod__warmelt_normal__initialmeltchunk_6 (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___V486*/ meltfptr[485]); melt_dbgtrace_written_object ( /*_.VALDATA___V486*/ meltfptr[485], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V488*/ meltfptr[487])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V488*/ meltfptr[487])))); ((meltobject_ptr_t) ( /*_.VALDATA___V488*/ meltfptr[487]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V489*/ meltfptr[488]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V488*/ meltfptr[487]); melt_dbgtrace_written_object ( /*_.VALDATA___V488*/ meltfptr[487], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V490*/ meltfptr[489])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V490*/ meltfptr[489])))); ((meltobject_ptr_t) ( /*_.VALDATA___V490*/ meltfptr[489]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V491*/ meltfptr[490]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V490*/ meltfptr[489]); melt_dbgtrace_written_object ( /*_.VALDATA___V490*/ meltfptr[489], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:295:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V492*/ meltfptr[491])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V492*/ meltfptr[491])))); ((meltobject_ptr_t) ( /*_.VALDATA___V492*/ meltfptr[491]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V493*/ meltfptr[492]); MELT_LOCATION ("warmelt-normal.melt:295:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V492*/ meltfptr[491])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V492*/ meltfptr[491])))); ((meltobject_ptr_t) ( /*_.VALDATA___V492*/ meltfptr[491]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*putupl#226 */ melt_assertmsg ("putupl #226 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V494*/ meltfptr[493])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #226 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V494*/ meltfptr[493])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V494*/ meltfptr[493]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#227 */ melt_assertmsg ("putupl #227 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V494*/ meltfptr[493])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #227 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V494*/ meltfptr[493])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V494*/ meltfptr[493]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#228 */ melt_assertmsg ("putupl #228 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V494*/ meltfptr[493])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #228 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V494*/ meltfptr[493])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V494*/ meltfptr[493]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V494*/ meltfptr[493]); MELT_LOCATION ("warmelt-normal.melt:295:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V492*/ meltfptr[491])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V492*/ meltfptr[491])))); ((meltobject_ptr_t) ( /*_.VALDATA___V492*/ meltfptr[491]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V494*/ meltfptr[493]); MELT_LOCATION ("warmelt-normal.melt:295:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V495*/ meltfptr[494])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V495*/ meltfptr[494])))); ((meltobject_ptr_t) ( /*_.VALDATA___V495*/ meltfptr[494]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V496*/ meltfptr[495]); MELT_LOCATION ("warmelt-normal.melt:295:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V495*/ meltfptr[494])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V495*/ meltfptr[494])))); ((meltobject_ptr_t) ( /*_.VALDATA___V495*/ meltfptr[494]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V492*/ meltfptr[491]); MELT_LOCATION ("warmelt-normal.melt:295:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V495*/ meltfptr[494]); MELT_LOCATION ("warmelt-normal.melt:295:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V495*/ meltfptr[494], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:295:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V497*/ meltfptr[496])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V497*/ meltfptr[496])))); ((meltobject_ptr_t) ( /*_.VALDATA___V497*/ meltfptr[496]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V498*/ meltfptr[497]); MELT_LOCATION ("warmelt-normal.melt:295:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V497*/ meltfptr[496])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V497*/ meltfptr[496])))); ((meltobject_ptr_t) ( /*_.VALDATA___V497*/ meltfptr[496]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V492*/ meltfptr[491]); MELT_LOCATION ("warmelt-normal.melt:295:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V497*/ meltfptr[496]); MELT_LOCATION ("warmelt-normal.melt:295:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V497*/ meltfptr[496], "new static instance"); /*putupl#229 */ melt_assertmsg ("putupl #229 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V499*/ meltfptr[498])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #229 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V499*/ meltfptr[498])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V499*/ meltfptr[498]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#230 */ melt_assertmsg ("putupl #230 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V499*/ meltfptr[498])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #230 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V499*/ meltfptr[498])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V499*/ meltfptr[498]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V495*/ meltfptr[494]); /*putupl#231 */ melt_assertmsg ("putupl #231 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V499*/ meltfptr[498])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #231 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V499*/ meltfptr[498])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V499*/ meltfptr[498]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V497*/ meltfptr[496]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V499*/ meltfptr[498]); MELT_LOCATION ("warmelt-normal.melt:295:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V492*/ meltfptr[491])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V492*/ meltfptr[491])))); ((meltobject_ptr_t) ( /*_.VALDATA___V492*/ meltfptr[491]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V499*/ meltfptr[498]); MELT_LOCATION ("warmelt-normal.melt:295:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V492*/ meltfptr[491]); MELT_LOCATION ("warmelt-normal.melt:295:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V492*/ meltfptr[491], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V500*/ meltfptr[499])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V500*/ meltfptr[499])))); ((meltobject_ptr_t) ( /*_.VALDATA___V500*/ meltfptr[499]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V501*/ meltfptr[500]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V500*/ meltfptr[499]); melt_dbgtrace_written_object ( /*_.VALDATA___V500*/ meltfptr[499], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V502*/ meltfptr[501])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V502*/ meltfptr[501])))); ((meltobject_ptr_t) ( /*_.VALDATA___V502*/ meltfptr[501]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V503*/ meltfptr[502]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V502*/ meltfptr[501]); melt_dbgtrace_written_object ( /*_.VALDATA___V502*/ meltfptr[501], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V504*/ meltfptr[503])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V504*/ meltfptr[503])))); ((meltobject_ptr_t) ( /*_.VALDATA___V504*/ meltfptr[503]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V505*/ meltfptr[504]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V504*/ meltfptr[503]); melt_dbgtrace_written_object ( /*_.VALDATA___V504*/ meltfptr[503], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:301:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V506*/ meltfptr[505])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V506*/ meltfptr[505])))); ((meltobject_ptr_t) ( /*_.VALDATA___V506*/ meltfptr[505]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V507*/ meltfptr[506]); MELT_LOCATION ("warmelt-normal.melt:301:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V506*/ meltfptr[505])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V506*/ meltfptr[505])))); ((meltobject_ptr_t) ( /*_.VALDATA___V506*/ meltfptr[505]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*putupl#232 */ melt_assertmsg ("putupl #232 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V508*/ meltfptr[507])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #232 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V508*/ meltfptr[507])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V508*/ meltfptr[507]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#233 */ melt_assertmsg ("putupl #233 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V508*/ meltfptr[507])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #233 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V508*/ meltfptr[507])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V508*/ meltfptr[507]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#234 */ melt_assertmsg ("putupl #234 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V508*/ meltfptr[507])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #234 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V508*/ meltfptr[507])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V508*/ meltfptr[507]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V508*/ meltfptr[507]); MELT_LOCATION ("warmelt-normal.melt:301:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V506*/ meltfptr[505])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V506*/ meltfptr[505])))); ((meltobject_ptr_t) ( /*_.VALDATA___V506*/ meltfptr[505]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V508*/ meltfptr[507]); MELT_LOCATION ("warmelt-normal.melt:301:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V509*/ meltfptr[508])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V509*/ meltfptr[508])))); ((meltobject_ptr_t) ( /*_.VALDATA___V509*/ meltfptr[508]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V510*/ meltfptr[509]); MELT_LOCATION ("warmelt-normal.melt:301:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V509*/ meltfptr[508])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V509*/ meltfptr[508])))); ((meltobject_ptr_t) ( /*_.VALDATA___V509*/ meltfptr[508]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V506*/ meltfptr[505]); MELT_LOCATION ("warmelt-normal.melt:301:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V509*/ meltfptr[508]); MELT_LOCATION ("warmelt-normal.melt:301:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V509*/ meltfptr[508], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:301:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V511*/ meltfptr[510])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V511*/ meltfptr[510])))); ((meltobject_ptr_t) ( /*_.VALDATA___V511*/ meltfptr[510]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V512*/ meltfptr[511]); MELT_LOCATION ("warmelt-normal.melt:301:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V511*/ meltfptr[510])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V511*/ meltfptr[510])))); ((meltobject_ptr_t) ( /*_.VALDATA___V511*/ meltfptr[510]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V506*/ meltfptr[505]); MELT_LOCATION ("warmelt-normal.melt:301:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V511*/ meltfptr[510]); MELT_LOCATION ("warmelt-normal.melt:301:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V511*/ meltfptr[510], "new static instance"); /*putupl#235 */ melt_assertmsg ("putupl #235 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V513*/ meltfptr[512])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #235 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V513*/ meltfptr[512])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V513*/ meltfptr[512]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#236 */ melt_assertmsg ("putupl #236 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V513*/ meltfptr[512])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #236 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V513*/ meltfptr[512])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V513*/ meltfptr[512]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V509*/ meltfptr[508]); /*putupl#237 */ melt_assertmsg ("putupl #237 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V513*/ meltfptr[512])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #237 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V513*/ meltfptr[512])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V513*/ meltfptr[512]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V511*/ meltfptr[510]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V513*/ meltfptr[512]); MELT_LOCATION ("warmelt-normal.melt:301:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V506*/ meltfptr[505])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V506*/ meltfptr[505])))); ((meltobject_ptr_t) ( /*_.VALDATA___V506*/ meltfptr[505]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V513*/ meltfptr[512]); MELT_LOCATION ("warmelt-normal.melt:301:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V506*/ meltfptr[505]); MELT_LOCATION ("warmelt-normal.melt:301:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V506*/ meltfptr[505], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V514*/ meltfptr[513])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V514*/ meltfptr[513])))); ((meltobject_ptr_t) ( /*_.VALDATA___V514*/ meltfptr[513]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V515*/ meltfptr[514]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V514*/ meltfptr[513]); melt_dbgtrace_written_object ( /*_.VALDATA___V514*/ meltfptr[513], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V516*/ meltfptr[515])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V516*/ meltfptr[515])))); ((meltobject_ptr_t) ( /*_.VALDATA___V516*/ meltfptr[515]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V517*/ meltfptr[516]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V516*/ meltfptr[515]); melt_dbgtrace_written_object ( /*_.VALDATA___V516*/ meltfptr[515], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V518*/ meltfptr[517])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V518*/ meltfptr[517])))); ((meltobject_ptr_t) ( /*_.VALDATA___V518*/ meltfptr[517]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V519*/ meltfptr[518]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V518*/ meltfptr[517]); melt_dbgtrace_written_object ( /*_.VALDATA___V518*/ meltfptr[517], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:307:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V520*/ meltfptr[519])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V520*/ meltfptr[519])))); ((meltobject_ptr_t) ( /*_.VALDATA___V520*/ meltfptr[519]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V521*/ meltfptr[520]); MELT_LOCATION ("warmelt-normal.melt:307:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V520*/ meltfptr[519])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V520*/ meltfptr[519])))); ((meltobject_ptr_t) ( /*_.VALDATA___V520*/ meltfptr[519]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*putupl#238 */ melt_assertmsg ("putupl #238 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V522*/ meltfptr[521])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #238 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V522*/ meltfptr[521])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V522*/ meltfptr[521]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#239 */ melt_assertmsg ("putupl #239 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V522*/ meltfptr[521])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #239 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V522*/ meltfptr[521])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V522*/ meltfptr[521]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#240 */ melt_assertmsg ("putupl #240 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V522*/ meltfptr[521])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #240 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V522*/ meltfptr[521])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V522*/ meltfptr[521]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V522*/ meltfptr[521]); MELT_LOCATION ("warmelt-normal.melt:307:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V520*/ meltfptr[519])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V520*/ meltfptr[519])))); ((meltobject_ptr_t) ( /*_.VALDATA___V520*/ meltfptr[519]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V522*/ meltfptr[521]); MELT_LOCATION ("warmelt-normal.melt:307:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V523*/ meltfptr[522])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V523*/ meltfptr[522])))); ((meltobject_ptr_t) ( /*_.VALDATA___V523*/ meltfptr[522]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V524*/ meltfptr[523]); MELT_LOCATION ("warmelt-normal.melt:307:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V523*/ meltfptr[522])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V523*/ meltfptr[522])))); ((meltobject_ptr_t) ( /*_.VALDATA___V523*/ meltfptr[522]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V520*/ meltfptr[519]); MELT_LOCATION ("warmelt-normal.melt:307:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V523*/ meltfptr[522]); MELT_LOCATION ("warmelt-normal.melt:307:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V523*/ meltfptr[522], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:307:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V525*/ meltfptr[524])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V525*/ meltfptr[524])))); ((meltobject_ptr_t) ( /*_.VALDATA___V525*/ meltfptr[524]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V526*/ meltfptr[525]); MELT_LOCATION ("warmelt-normal.melt:307:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V525*/ meltfptr[524])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V525*/ meltfptr[524])))); ((meltobject_ptr_t) ( /*_.VALDATA___V525*/ meltfptr[524]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V520*/ meltfptr[519]); MELT_LOCATION ("warmelt-normal.melt:307:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V525*/ meltfptr[524]); MELT_LOCATION ("warmelt-normal.melt:307:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V525*/ meltfptr[524], "new static instance"); /*putupl#241 */ melt_assertmsg ("putupl #241 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V527*/ meltfptr[526])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #241 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V527*/ meltfptr[526])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V527*/ meltfptr[526]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#242 */ melt_assertmsg ("putupl #242 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V527*/ meltfptr[526])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #242 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V527*/ meltfptr[526])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V527*/ meltfptr[526]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V523*/ meltfptr[522]); /*putupl#243 */ melt_assertmsg ("putupl #243 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V527*/ meltfptr[526])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #243 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V527*/ meltfptr[526])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V527*/ meltfptr[526]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V525*/ meltfptr[524]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V527*/ meltfptr[526]); MELT_LOCATION ("warmelt-normal.melt:307:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V520*/ meltfptr[519])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V520*/ meltfptr[519])))); ((meltobject_ptr_t) ( /*_.VALDATA___V520*/ meltfptr[519]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V527*/ meltfptr[526]); MELT_LOCATION ("warmelt-normal.melt:307:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V520*/ meltfptr[519]); MELT_LOCATION ("warmelt-normal.melt:307:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V520*/ meltfptr[519], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V528*/ meltfptr[527])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V528*/ meltfptr[527])))); ((meltobject_ptr_t) ( /*_.VALDATA___V528*/ meltfptr[527]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V529*/ meltfptr[528]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V528*/ meltfptr[527]); melt_dbgtrace_written_object ( /*_.VALDATA___V528*/ meltfptr[527], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V530*/ meltfptr[529])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V530*/ meltfptr[529])))); ((meltobject_ptr_t) ( /*_.VALDATA___V530*/ meltfptr[529]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V531*/ meltfptr[530]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V530*/ meltfptr[529]); melt_dbgtrace_written_object ( /*_.VALDATA___V530*/ meltfptr[529], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V532*/ meltfptr[531])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V532*/ meltfptr[531])))); ((meltobject_ptr_t) ( /*_.VALDATA___V532*/ meltfptr[531]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V533*/ meltfptr[532]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V532*/ meltfptr[531]); melt_dbgtrace_written_object ( /*_.VALDATA___V532*/ meltfptr[531], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:314:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V534*/ meltfptr[533])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V534*/ meltfptr[533])))); ((meltobject_ptr_t) ( /*_.VALDATA___V534*/ meltfptr[533]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V535*/ meltfptr[534]); MELT_LOCATION ("warmelt-normal.melt:314:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V534*/ meltfptr[533])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V534*/ meltfptr[533])))); ((meltobject_ptr_t) ( /*_.VALDATA___V534*/ meltfptr[533]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*putupl#244 */ melt_assertmsg ("putupl #244 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V536*/ meltfptr[535])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #244 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V536*/ meltfptr[535])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V536*/ meltfptr[535]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#245 */ melt_assertmsg ("putupl #245 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V536*/ meltfptr[535])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #245 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V536*/ meltfptr[535])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V536*/ meltfptr[535]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#246 */ melt_assertmsg ("putupl #246 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V536*/ meltfptr[535])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #246 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V536*/ meltfptr[535])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V536*/ meltfptr[535]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V536*/ meltfptr[535]); MELT_LOCATION ("warmelt-normal.melt:314:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V534*/ meltfptr[533])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V534*/ meltfptr[533])))); ((meltobject_ptr_t) ( /*_.VALDATA___V534*/ meltfptr[533]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V536*/ meltfptr[535]); MELT_LOCATION ("warmelt-normal.melt:314:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:314:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V537*/ meltfptr[536])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V537*/ meltfptr[536])))); ((meltobject_ptr_t) ( /*_.VALDATA___V537*/ meltfptr[536]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V534*/ meltfptr[533]); MELT_LOCATION ("warmelt-normal.melt:314:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V537*/ meltfptr[536]); MELT_LOCATION ("warmelt-normal.melt:314:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V537*/ meltfptr[536], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:314:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V539*/ meltfptr[538])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V539*/ meltfptr[538])))); ((meltobject_ptr_t) ( /*_.VALDATA___V539*/ meltfptr[538]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V540*/ meltfptr[539]); MELT_LOCATION ("warmelt-normal.melt:314:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V539*/ meltfptr[538])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V539*/ meltfptr[538])))); ((meltobject_ptr_t) ( /*_.VALDATA___V539*/ meltfptr[538]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V534*/ meltfptr[533]); MELT_LOCATION ("warmelt-normal.melt:314:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V539*/ meltfptr[538]); MELT_LOCATION ("warmelt-normal.melt:314:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V539*/ meltfptr[538], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:314:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V541*/ meltfptr[540])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V541*/ meltfptr[540])))); ((meltobject_ptr_t) ( /*_.VALDATA___V541*/ meltfptr[540]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V542*/ meltfptr[541]); MELT_LOCATION ("warmelt-normal.melt:314:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V541*/ meltfptr[540])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V541*/ meltfptr[540])))); ((meltobject_ptr_t) ( /*_.VALDATA___V541*/ meltfptr[540]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V534*/ meltfptr[533]); MELT_LOCATION ("warmelt-normal.melt:314:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V541*/ meltfptr[540]); MELT_LOCATION ("warmelt-normal.melt:314:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V541*/ meltfptr[540], "new static instance"); /*putupl#247 */ melt_assertmsg ("putupl #247 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V543*/ meltfptr[542])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #247 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V543*/ meltfptr[542])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V543*/ meltfptr[542]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#248 */ melt_assertmsg ("putupl #248 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V543*/ meltfptr[542])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #248 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V543*/ meltfptr[542])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V543*/ meltfptr[542]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V537*/ meltfptr[536]); /*putupl#249 */ melt_assertmsg ("putupl #249 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V543*/ meltfptr[542])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #249 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V543*/ meltfptr[542])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V543*/ meltfptr[542]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V539*/ meltfptr[538]); /*putupl#250 */ melt_assertmsg ("putupl #250 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V543*/ meltfptr[542])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #250 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V543*/ meltfptr[542])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V543*/ meltfptr[542]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V541*/ meltfptr[540]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V543*/ meltfptr[542]); MELT_LOCATION ("warmelt-normal.melt:314:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V534*/ meltfptr[533])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V534*/ meltfptr[533])))); ((meltobject_ptr_t) ( /*_.VALDATA___V534*/ meltfptr[533]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V543*/ meltfptr[542]); MELT_LOCATION ("warmelt-normal.melt:314:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V534*/ meltfptr[533]); MELT_LOCATION ("warmelt-normal.melt:314:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V534*/ meltfptr[533], "new static instance"); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_6 */ void meltmod__warmelt_normal__initialmeltchunk_7 (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___V544*/ meltfptr[543])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V544*/ meltfptr[543])))); ((meltobject_ptr_t) ( /*_.VALDATA___V544*/ meltfptr[543]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V545*/ meltfptr[544]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V544*/ meltfptr[543]); melt_dbgtrace_written_object ( /*_.VALDATA___V544*/ meltfptr[543], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V546*/ meltfptr[545])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V546*/ meltfptr[545])))); ((meltobject_ptr_t) ( /*_.VALDATA___V546*/ meltfptr[545]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V547*/ meltfptr[546]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V546*/ meltfptr[545]); melt_dbgtrace_written_object ( /*_.VALDATA___V546*/ meltfptr[545], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V548*/ meltfptr[547])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V548*/ meltfptr[547])))); ((meltobject_ptr_t) ( /*_.VALDATA___V548*/ meltfptr[547]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V549*/ meltfptr[548]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V548*/ meltfptr[547]); melt_dbgtrace_written_object ( /*_.VALDATA___V548*/ meltfptr[547], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V550*/ meltfptr[549])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V550*/ meltfptr[549])))); ((meltobject_ptr_t) ( /*_.VALDATA___V550*/ meltfptr[549]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V551*/ meltfptr[550]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V550*/ meltfptr[549]); melt_dbgtrace_written_object ( /*_.VALDATA___V550*/ meltfptr[549], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:322:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V552*/ meltfptr[551])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V552*/ meltfptr[551])))); ((meltobject_ptr_t) ( /*_.VALDATA___V552*/ meltfptr[551]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V553*/ meltfptr[552]); MELT_LOCATION ("warmelt-normal.melt:322:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V552*/ meltfptr[551])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V552*/ meltfptr[551])))); ((meltobject_ptr_t) ( /*_.VALDATA___V552*/ meltfptr[551]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*putupl#251 */ melt_assertmsg ("putupl #251 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V554*/ meltfptr[553])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #251 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V554*/ meltfptr[553])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V554*/ meltfptr[553]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#252 */ melt_assertmsg ("putupl #252 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V554*/ meltfptr[553])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #252 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V554*/ meltfptr[553])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V554*/ meltfptr[553]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#253 */ melt_assertmsg ("putupl #253 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V554*/ meltfptr[553])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #253 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V554*/ meltfptr[553])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V554*/ meltfptr[553]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V554*/ meltfptr[553]); MELT_LOCATION ("warmelt-normal.melt:322:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V552*/ meltfptr[551])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V552*/ meltfptr[551])))); ((meltobject_ptr_t) ( /*_.VALDATA___V552*/ meltfptr[551]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V554*/ meltfptr[553]); MELT_LOCATION ("warmelt-normal.melt:322:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V555*/ meltfptr[554])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V555*/ meltfptr[554])))); ((meltobject_ptr_t) ( /*_.VALDATA___V555*/ meltfptr[554]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V556*/ meltfptr[555]); MELT_LOCATION ("warmelt-normal.melt:322:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V555*/ meltfptr[554])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V555*/ meltfptr[554])))); ((meltobject_ptr_t) ( /*_.VALDATA___V555*/ meltfptr[554]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V552*/ meltfptr[551]); MELT_LOCATION ("warmelt-normal.melt:322:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V555*/ meltfptr[554]); MELT_LOCATION ("warmelt-normal.melt:322:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V555*/ meltfptr[554], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:322:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V557*/ meltfptr[556])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V557*/ meltfptr[556])))); ((meltobject_ptr_t) ( /*_.VALDATA___V557*/ meltfptr[556]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V558*/ meltfptr[557]); MELT_LOCATION ("warmelt-normal.melt:322:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V557*/ meltfptr[556])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V557*/ meltfptr[556])))); ((meltobject_ptr_t) ( /*_.VALDATA___V557*/ meltfptr[556]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V552*/ meltfptr[551]); MELT_LOCATION ("warmelt-normal.melt:322:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V557*/ meltfptr[556]); MELT_LOCATION ("warmelt-normal.melt:322:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V557*/ meltfptr[556], "new static instance"); /*putupl#254 */ melt_assertmsg ("putupl #254 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V559*/ meltfptr[558])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #254 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V559*/ meltfptr[558])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V559*/ meltfptr[558]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#255 */ melt_assertmsg ("putupl #255 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V559*/ meltfptr[558])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #255 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V559*/ meltfptr[558])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V559*/ meltfptr[558]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V555*/ meltfptr[554]); /*putupl#256 */ melt_assertmsg ("putupl #256 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V559*/ meltfptr[558])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #256 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V559*/ meltfptr[558])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V559*/ meltfptr[558]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V557*/ meltfptr[556]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V559*/ meltfptr[558]); MELT_LOCATION ("warmelt-normal.melt:322:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V552*/ meltfptr[551])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V552*/ meltfptr[551])))); ((meltobject_ptr_t) ( /*_.VALDATA___V552*/ meltfptr[551]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V559*/ meltfptr[558]); MELT_LOCATION ("warmelt-normal.melt:322:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V552*/ meltfptr[551]); MELT_LOCATION ("warmelt-normal.melt:322:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V552*/ meltfptr[551], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V560*/ meltfptr[559])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V560*/ meltfptr[559])))); ((meltobject_ptr_t) ( /*_.VALDATA___V560*/ meltfptr[559]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V561*/ meltfptr[560]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V560*/ meltfptr[559]); melt_dbgtrace_written_object ( /*_.VALDATA___V560*/ meltfptr[559], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V562*/ meltfptr[561])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V562*/ meltfptr[561])))); ((meltobject_ptr_t) ( /*_.VALDATA___V562*/ meltfptr[561]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V563*/ meltfptr[562]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V562*/ meltfptr[561]); melt_dbgtrace_written_object ( /*_.VALDATA___V562*/ meltfptr[561], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V564*/ meltfptr[563])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V564*/ meltfptr[563])))); ((meltobject_ptr_t) ( /*_.VALDATA___V564*/ meltfptr[563]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V565*/ meltfptr[564]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V564*/ meltfptr[563]); melt_dbgtrace_written_object ( /*_.VALDATA___V564*/ meltfptr[563], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:329:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V566*/ meltfptr[565])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V566*/ meltfptr[565])))); ((meltobject_ptr_t) ( /*_.VALDATA___V566*/ meltfptr[565]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V567*/ meltfptr[566]); MELT_LOCATION ("warmelt-normal.melt:329:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V566*/ meltfptr[565])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V566*/ meltfptr[565])))); ((meltobject_ptr_t) ( /*_.VALDATA___V566*/ meltfptr[565]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*putupl#257 */ melt_assertmsg ("putupl #257 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V568*/ meltfptr[567])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #257 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V568*/ meltfptr[567])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V568*/ meltfptr[567]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#258 */ melt_assertmsg ("putupl #258 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V568*/ meltfptr[567])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #258 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V568*/ meltfptr[567])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V568*/ meltfptr[567]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#259 */ melt_assertmsg ("putupl #259 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V568*/ meltfptr[567])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #259 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V568*/ meltfptr[567])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V568*/ meltfptr[567]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V568*/ meltfptr[567]); MELT_LOCATION ("warmelt-normal.melt:329:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V566*/ meltfptr[565])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V566*/ meltfptr[565])))); ((meltobject_ptr_t) ( /*_.VALDATA___V566*/ meltfptr[565]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V568*/ meltfptr[567]); MELT_LOCATION ("warmelt-normal.melt:329:/ 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-normal.melt:329:/ 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___V566*/ meltfptr[565]); MELT_LOCATION ("warmelt-normal.melt:329:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V569*/ meltfptr[568]); MELT_LOCATION ("warmelt-normal.melt:329:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V569*/ meltfptr[568], "new static instance"); /*putupl#260 */ melt_assertmsg ("putupl #260 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V571*/ meltfptr[570])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #260 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) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#261 */ melt_assertmsg ("putupl #261 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V571*/ meltfptr[570])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #261 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___V569*/ meltfptr[568]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V571*/ meltfptr[570]); MELT_LOCATION ("warmelt-normal.melt:329:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V566*/ meltfptr[565])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V566*/ meltfptr[565])))); ((meltobject_ptr_t) ( /*_.VALDATA___V566*/ meltfptr[565]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V571*/ meltfptr[570]); MELT_LOCATION ("warmelt-normal.melt:329:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V566*/ meltfptr[565]); MELT_LOCATION ("warmelt-normal.melt:329:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V566*/ meltfptr[565], "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"); MELT_LOCATION ("warmelt-normal.melt:335:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:335:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V576*/ meltfptr[575])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V576*/ meltfptr[575])))); ((meltobject_ptr_t) ( /*_.VALDATA___V576*/ meltfptr[575]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#262 */ melt_assertmsg ("putupl #262 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V578*/ meltfptr[577])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #262 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V578*/ meltfptr[577])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V578*/ meltfptr[577]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#263 */ melt_assertmsg ("putupl #263 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V578*/ meltfptr[577])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #263 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V578*/ meltfptr[577])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V578*/ meltfptr[577]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V578*/ meltfptr[577]); MELT_LOCATION ("warmelt-normal.melt:335:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V576*/ meltfptr[575])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V576*/ meltfptr[575])))); ((meltobject_ptr_t) ( /*_.VALDATA___V576*/ meltfptr[575]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V578*/ meltfptr[577]); MELT_LOCATION ("warmelt-normal.melt:335:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V579*/ meltfptr[578])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V579*/ meltfptr[578])))); ((meltobject_ptr_t) ( /*_.VALDATA___V579*/ meltfptr[578]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V580*/ meltfptr[579]); MELT_LOCATION ("warmelt-normal.melt:335:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V579*/ meltfptr[578])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V579*/ meltfptr[578])))); ((meltobject_ptr_t) ( /*_.VALDATA___V579*/ meltfptr[578]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V576*/ meltfptr[575]); MELT_LOCATION ("warmelt-normal.melt:335:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V579*/ meltfptr[578]); MELT_LOCATION ("warmelt-normal.melt:335:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V579*/ meltfptr[578], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:335:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V581*/ meltfptr[580])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V581*/ meltfptr[580])))); ((meltobject_ptr_t) ( /*_.VALDATA___V581*/ meltfptr[580]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V582*/ meltfptr[581]); MELT_LOCATION ("warmelt-normal.melt:335:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V581*/ meltfptr[580])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V581*/ meltfptr[580])))); ((meltobject_ptr_t) ( /*_.VALDATA___V581*/ meltfptr[580]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V576*/ meltfptr[575]); MELT_LOCATION ("warmelt-normal.melt:335:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V581*/ meltfptr[580]); MELT_LOCATION ("warmelt-normal.melt:335:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V581*/ meltfptr[580], "new static instance"); /*putupl#264 */ melt_assertmsg ("putupl #264 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V583*/ meltfptr[582])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #264 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V583*/ meltfptr[582])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V583*/ meltfptr[582]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#265 */ melt_assertmsg ("putupl #265 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V583*/ meltfptr[582])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #265 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V583*/ meltfptr[582])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V583*/ meltfptr[582]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V579*/ meltfptr[578]); /*putupl#266 */ melt_assertmsg ("putupl #266 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V583*/ meltfptr[582])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #266 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V583*/ meltfptr[582])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V583*/ meltfptr[582]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V581*/ meltfptr[580]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V583*/ meltfptr[582]); MELT_LOCATION ("warmelt-normal.melt:335:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V576*/ meltfptr[575])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V576*/ meltfptr[575])))); ((meltobject_ptr_t) ( /*_.VALDATA___V576*/ meltfptr[575]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V583*/ meltfptr[582]); MELT_LOCATION ("warmelt-normal.melt:335:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V576*/ meltfptr[575]); MELT_LOCATION ("warmelt-normal.melt:335:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V576*/ meltfptr[575], "new static instance"); /*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"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V586*/ meltfptr[585]); melt_dbgtrace_written_object ( /*_.VALDATA___V586*/ meltfptr[585], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V588*/ meltfptr[587])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V588*/ meltfptr[587])))); ((meltobject_ptr_t) ( /*_.VALDATA___V588*/ meltfptr[587]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V589*/ meltfptr[588]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V588*/ meltfptr[587]); melt_dbgtrace_written_object ( /*_.VALDATA___V588*/ meltfptr[587], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:342:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V590*/ meltfptr[589])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V590*/ meltfptr[589])))); ((meltobject_ptr_t) ( /*_.VALDATA___V590*/ meltfptr[589]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V591*/ meltfptr[590]); MELT_LOCATION ("warmelt-normal.melt:342:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V590*/ meltfptr[589])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V590*/ meltfptr[589])))); ((meltobject_ptr_t) ( /*_.VALDATA___V590*/ meltfptr[589]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*putupl#267 */ melt_assertmsg ("putupl #267 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V592*/ meltfptr[591])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #267 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V592*/ meltfptr[591])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V592*/ meltfptr[591]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#268 */ melt_assertmsg ("putupl #268 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V592*/ meltfptr[591])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #268 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V592*/ meltfptr[591])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V592*/ meltfptr[591]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#269 */ melt_assertmsg ("putupl #269 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V592*/ meltfptr[591])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #269 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V592*/ meltfptr[591])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V592*/ meltfptr[591]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V592*/ meltfptr[591]); MELT_LOCATION ("warmelt-normal.melt:342:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V590*/ meltfptr[589])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V590*/ meltfptr[589])))); ((meltobject_ptr_t) ( /*_.VALDATA___V590*/ meltfptr[589]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V592*/ meltfptr[591]); MELT_LOCATION ("warmelt-normal.melt:342:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V593*/ meltfptr[592])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V593*/ meltfptr[592])))); ((meltobject_ptr_t) ( /*_.VALDATA___V593*/ meltfptr[592]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V594*/ meltfptr[593]); MELT_LOCATION ("warmelt-normal.melt:342:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V593*/ meltfptr[592])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V593*/ meltfptr[592])))); ((meltobject_ptr_t) ( /*_.VALDATA___V593*/ meltfptr[592]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V590*/ meltfptr[589]); MELT_LOCATION ("warmelt-normal.melt:342:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V593*/ meltfptr[592]); MELT_LOCATION ("warmelt-normal.melt:342:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V593*/ meltfptr[592], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:342:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V595*/ meltfptr[594])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V595*/ meltfptr[594])))); ((meltobject_ptr_t) ( /*_.VALDATA___V595*/ meltfptr[594]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V596*/ meltfptr[595]); MELT_LOCATION ("warmelt-normal.melt:342:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V595*/ meltfptr[594])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V595*/ meltfptr[594])))); ((meltobject_ptr_t) ( /*_.VALDATA___V595*/ meltfptr[594]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V590*/ meltfptr[589]); MELT_LOCATION ("warmelt-normal.melt:342:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V595*/ meltfptr[594]); MELT_LOCATION ("warmelt-normal.melt:342:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V595*/ meltfptr[594], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:342:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V597*/ meltfptr[596])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V597*/ meltfptr[596])))); ((meltobject_ptr_t) ( /*_.VALDATA___V597*/ meltfptr[596]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V598*/ meltfptr[597]); MELT_LOCATION ("warmelt-normal.melt:342:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V597*/ meltfptr[596])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V597*/ meltfptr[596])))); ((meltobject_ptr_t) ( /*_.VALDATA___V597*/ meltfptr[596]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V590*/ meltfptr[589]); MELT_LOCATION ("warmelt-normal.melt:342:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V597*/ meltfptr[596]); MELT_LOCATION ("warmelt-normal.melt:342:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V597*/ meltfptr[596], "new static instance"); /*putupl#270 */ melt_assertmsg ("putupl #270 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V599*/ meltfptr[598])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #270 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V599*/ meltfptr[598])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V599*/ meltfptr[598]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#271 */ melt_assertmsg ("putupl #271 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V599*/ meltfptr[598])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #271 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V599*/ meltfptr[598])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V599*/ meltfptr[598]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V593*/ meltfptr[592]); /*putupl#272 */ melt_assertmsg ("putupl #272 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V599*/ meltfptr[598])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #272 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V599*/ meltfptr[598])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V599*/ meltfptr[598]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V595*/ meltfptr[594]); /*putupl#273 */ melt_assertmsg ("putupl #273 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V599*/ meltfptr[598])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #273 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V599*/ meltfptr[598])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V599*/ meltfptr[598]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V597*/ meltfptr[596]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V599*/ meltfptr[598]); MELT_LOCATION ("warmelt-normal.melt:342:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V590*/ meltfptr[589])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V590*/ meltfptr[589])))); ((meltobject_ptr_t) ( /*_.VALDATA___V590*/ meltfptr[589]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V599*/ meltfptr[598]); MELT_LOCATION ("warmelt-normal.melt:342:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V590*/ meltfptr[589]); MELT_LOCATION ("warmelt-normal.melt:342:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V590*/ meltfptr[589], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V600*/ meltfptr[599])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V600*/ meltfptr[599])))); ((meltobject_ptr_t) ( /*_.VALDATA___V600*/ meltfptr[599]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V601*/ meltfptr[600]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V600*/ meltfptr[599]); melt_dbgtrace_written_object ( /*_.VALDATA___V600*/ meltfptr[599], "new static instance"); /*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]); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_7 */ void meltmod__warmelt_normal__initialmeltchunk_8 (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___V602*/ meltfptr[601], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V604*/ meltfptr[603])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V604*/ meltfptr[603])))); ((meltobject_ptr_t) ( /*_.VALDATA___V604*/ meltfptr[603]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V605*/ meltfptr[604]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V604*/ meltfptr[603]); melt_dbgtrace_written_object ( /*_.VALDATA___V604*/ meltfptr[603], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V606*/ meltfptr[605])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V606*/ meltfptr[605])))); ((meltobject_ptr_t) ( /*_.VALDATA___V606*/ meltfptr[605]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V607*/ meltfptr[606]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V606*/ meltfptr[605]); melt_dbgtrace_written_object ( /*_.VALDATA___V606*/ meltfptr[605], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:350:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V608*/ meltfptr[607])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V608*/ meltfptr[607])))); ((meltobject_ptr_t) ( /*_.VALDATA___V608*/ meltfptr[607]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V609*/ meltfptr[608]); MELT_LOCATION ("warmelt-normal.melt:350:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V608*/ meltfptr[607])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V608*/ meltfptr[607])))); ((meltobject_ptr_t) ( /*_.VALDATA___V608*/ meltfptr[607]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*putupl#274 */ melt_assertmsg ("putupl #274 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V610*/ meltfptr[609])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #274 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V610*/ meltfptr[609])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V610*/ meltfptr[609]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#275 */ melt_assertmsg ("putupl #275 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V610*/ meltfptr[609])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #275 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V610*/ meltfptr[609])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V610*/ meltfptr[609]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#276 */ melt_assertmsg ("putupl #276 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V610*/ meltfptr[609])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #276 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V610*/ meltfptr[609])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V610*/ meltfptr[609]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V610*/ meltfptr[609]); MELT_LOCATION ("warmelt-normal.melt:350:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V608*/ meltfptr[607])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V608*/ meltfptr[607])))); ((meltobject_ptr_t) ( /*_.VALDATA___V608*/ meltfptr[607]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V610*/ meltfptr[609]); MELT_LOCATION ("warmelt-normal.melt:350:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V611*/ meltfptr[610])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V611*/ meltfptr[610])))); ((meltobject_ptr_t) ( /*_.VALDATA___V611*/ meltfptr[610]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V612*/ meltfptr[611]); MELT_LOCATION ("warmelt-normal.melt:350:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V611*/ meltfptr[610])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V611*/ meltfptr[610])))); ((meltobject_ptr_t) ( /*_.VALDATA___V611*/ meltfptr[610]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V608*/ meltfptr[607]); MELT_LOCATION ("warmelt-normal.melt:350:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V611*/ meltfptr[610]); MELT_LOCATION ("warmelt-normal.melt:350:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V611*/ meltfptr[610], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:350:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:350:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V613*/ meltfptr[612])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V613*/ meltfptr[612])))); ((meltobject_ptr_t) ( /*_.VALDATA___V613*/ meltfptr[612]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V608*/ meltfptr[607]); MELT_LOCATION ("warmelt-normal.melt:350:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V613*/ meltfptr[612]); MELT_LOCATION ("warmelt-normal.melt:350:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V613*/ meltfptr[612], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:350:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:350:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V615*/ meltfptr[614])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V615*/ meltfptr[614])))); ((meltobject_ptr_t) ( /*_.VALDATA___V615*/ meltfptr[614]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V608*/ meltfptr[607]); MELT_LOCATION ("warmelt-normal.melt:350:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V615*/ meltfptr[614]); MELT_LOCATION ("warmelt-normal.melt:350:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V615*/ meltfptr[614], "new static instance"); /*putupl#277 */ melt_assertmsg ("putupl #277 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V617*/ meltfptr[616])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #277 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V617*/ meltfptr[616])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V617*/ meltfptr[616]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#278 */ melt_assertmsg ("putupl #278 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V617*/ meltfptr[616])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #278 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V617*/ meltfptr[616])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V617*/ meltfptr[616]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V611*/ meltfptr[610]); /*putupl#279 */ melt_assertmsg ("putupl #279 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V617*/ meltfptr[616])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #279 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V617*/ meltfptr[616])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V617*/ meltfptr[616]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V613*/ meltfptr[612]); /*putupl#280 */ melt_assertmsg ("putupl #280 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V617*/ meltfptr[616])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #280 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V617*/ meltfptr[616])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V617*/ meltfptr[616]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V615*/ meltfptr[614]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V617*/ meltfptr[616]); MELT_LOCATION ("warmelt-normal.melt:350:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V608*/ meltfptr[607])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V608*/ meltfptr[607])))); ((meltobject_ptr_t) ( /*_.VALDATA___V608*/ meltfptr[607]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V617*/ meltfptr[616]); MELT_LOCATION ("warmelt-normal.melt:350:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V608*/ meltfptr[607]); MELT_LOCATION ("warmelt-normal.melt:350:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V608*/ meltfptr[607], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V618*/ meltfptr[617])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V618*/ meltfptr[617])))); ((meltobject_ptr_t) ( /*_.VALDATA___V618*/ meltfptr[617]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V619*/ meltfptr[618]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V618*/ meltfptr[617]); melt_dbgtrace_written_object ( /*_.VALDATA___V618*/ meltfptr[617], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V620*/ meltfptr[619])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V620*/ meltfptr[619])))); ((meltobject_ptr_t) ( /*_.VALDATA___V620*/ meltfptr[619]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V621*/ meltfptr[620]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V620*/ meltfptr[619]); melt_dbgtrace_written_object ( /*_.VALDATA___V620*/ meltfptr[619], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V622*/ meltfptr[621])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V622*/ meltfptr[621])))); ((meltobject_ptr_t) ( /*_.VALDATA___V622*/ meltfptr[621]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V623*/ meltfptr[622]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V622*/ meltfptr[621]); melt_dbgtrace_written_object ( /*_.VALDATA___V622*/ meltfptr[621], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V624*/ meltfptr[623])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V624*/ meltfptr[623])))); ((meltobject_ptr_t) ( /*_.VALDATA___V624*/ meltfptr[623]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V625*/ meltfptr[624]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V624*/ meltfptr[623]); melt_dbgtrace_written_object ( /*_.VALDATA___V624*/ meltfptr[623], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:358:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V626*/ meltfptr[625])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V626*/ meltfptr[625])))); ((meltobject_ptr_t) ( /*_.VALDATA___V626*/ meltfptr[625]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V627*/ meltfptr[626]); MELT_LOCATION ("warmelt-normal.melt:358:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V626*/ meltfptr[625])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V626*/ meltfptr[625])))); ((meltobject_ptr_t) ( /*_.VALDATA___V626*/ meltfptr[625]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*putupl#281 */ melt_assertmsg ("putupl #281 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V628*/ meltfptr[627])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #281 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V628*/ meltfptr[627])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V628*/ meltfptr[627]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#282 */ melt_assertmsg ("putupl #282 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V628*/ meltfptr[627])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #282 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V628*/ meltfptr[627])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V628*/ meltfptr[627]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#283 */ melt_assertmsg ("putupl #283 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V628*/ meltfptr[627])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #283 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V628*/ meltfptr[627])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V628*/ meltfptr[627]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V628*/ meltfptr[627]); MELT_LOCATION ("warmelt-normal.melt:358:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V626*/ meltfptr[625])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V626*/ meltfptr[625])))); ((meltobject_ptr_t) ( /*_.VALDATA___V626*/ meltfptr[625]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V628*/ meltfptr[627]); MELT_LOCATION ("warmelt-normal.melt:358:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V629*/ meltfptr[628])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V629*/ meltfptr[628])))); ((meltobject_ptr_t) ( /*_.VALDATA___V629*/ meltfptr[628]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V630*/ meltfptr[629]); MELT_LOCATION ("warmelt-normal.melt:358:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V629*/ meltfptr[628])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V629*/ meltfptr[628])))); ((meltobject_ptr_t) ( /*_.VALDATA___V629*/ meltfptr[628]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V626*/ meltfptr[625]); MELT_LOCATION ("warmelt-normal.melt:358:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V629*/ meltfptr[628]); MELT_LOCATION ("warmelt-normal.melt:358:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V629*/ meltfptr[628], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:358:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V631*/ meltfptr[630])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V631*/ meltfptr[630])))); ((meltobject_ptr_t) ( /*_.VALDATA___V631*/ meltfptr[630]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V632*/ meltfptr[631]); MELT_LOCATION ("warmelt-normal.melt:358:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V631*/ meltfptr[630])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V631*/ meltfptr[630])))); ((meltobject_ptr_t) ( /*_.VALDATA___V631*/ meltfptr[630]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V626*/ meltfptr[625]); MELT_LOCATION ("warmelt-normal.melt:358:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V631*/ meltfptr[630]); MELT_LOCATION ("warmelt-normal.melt:358:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V631*/ meltfptr[630], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:358:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V633*/ meltfptr[632])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V633*/ meltfptr[632])))); ((meltobject_ptr_t) ( /*_.VALDATA___V633*/ meltfptr[632]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V634*/ meltfptr[633]); MELT_LOCATION ("warmelt-normal.melt:358:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V633*/ meltfptr[632])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V633*/ meltfptr[632])))); ((meltobject_ptr_t) ( /*_.VALDATA___V633*/ meltfptr[632]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V626*/ meltfptr[625]); MELT_LOCATION ("warmelt-normal.melt:358:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V633*/ meltfptr[632]); MELT_LOCATION ("warmelt-normal.melt:358:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V633*/ meltfptr[632], "new static instance"); /*putupl#284 */ melt_assertmsg ("putupl #284 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V635*/ meltfptr[634])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #284 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V635*/ meltfptr[634])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V635*/ meltfptr[634]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#285 */ melt_assertmsg ("putupl #285 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V635*/ meltfptr[634])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #285 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V635*/ meltfptr[634])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V635*/ meltfptr[634]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V629*/ meltfptr[628]); /*putupl#286 */ melt_assertmsg ("putupl #286 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V635*/ meltfptr[634])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #286 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V635*/ meltfptr[634])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V635*/ meltfptr[634]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V631*/ meltfptr[630]); /*putupl#287 */ melt_assertmsg ("putupl #287 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V635*/ meltfptr[634])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #287 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V635*/ meltfptr[634])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V635*/ meltfptr[634]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V633*/ meltfptr[632]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V635*/ meltfptr[634]); MELT_LOCATION ("warmelt-normal.melt:358:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V626*/ meltfptr[625])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V626*/ meltfptr[625])))); ((meltobject_ptr_t) ( /*_.VALDATA___V626*/ meltfptr[625]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V635*/ meltfptr[634]); MELT_LOCATION ("warmelt-normal.melt:358:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V626*/ meltfptr[625]); MELT_LOCATION ("warmelt-normal.melt:358:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V626*/ meltfptr[625], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V636*/ meltfptr[635]); melt_dbgtrace_written_object ( /*_.VALDATA___V636*/ meltfptr[635], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V638*/ meltfptr[637]); melt_dbgtrace_written_object ( /*_.VALDATA___V638*/ meltfptr[637], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V640*/ meltfptr[639]); melt_dbgtrace_written_object ( /*_.VALDATA___V640*/ meltfptr[639], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V642*/ meltfptr[641]); melt_dbgtrace_written_object ( /*_.VALDATA___V642*/ meltfptr[641], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:367:/ 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-normal.melt:367:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V644*/ meltfptr[643])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V644*/ meltfptr[643])))); ((meltobject_ptr_t) ( /*_.VALDATA___V644*/ meltfptr[643]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*putupl#288 */ melt_assertmsg ("putupl #288 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V646*/ meltfptr[645])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #288 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V646*/ meltfptr[645])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V646*/ meltfptr[645]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#289 */ melt_assertmsg ("putupl #289 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V646*/ meltfptr[645])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #289 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V646*/ meltfptr[645])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V646*/ meltfptr[645]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#290 */ melt_assertmsg ("putupl #290 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V646*/ meltfptr[645])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #290 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V646*/ meltfptr[645])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V646*/ meltfptr[645]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V646*/ meltfptr[645]); MELT_LOCATION ("warmelt-normal.melt:367:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V644*/ meltfptr[643])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V644*/ meltfptr[643])))); ((meltobject_ptr_t) ( /*_.VALDATA___V644*/ meltfptr[643]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V646*/ meltfptr[645]); MELT_LOCATION ("warmelt-normal.melt:367:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V647*/ meltfptr[646])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V647*/ meltfptr[646])))); ((meltobject_ptr_t) ( /*_.VALDATA___V647*/ meltfptr[646]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V648*/ meltfptr[647]); MELT_LOCATION ("warmelt-normal.melt:367:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V647*/ meltfptr[646])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V647*/ meltfptr[646])))); ((meltobject_ptr_t) ( /*_.VALDATA___V647*/ meltfptr[646]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V644*/ meltfptr[643]); MELT_LOCATION ("warmelt-normal.melt:367:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V647*/ meltfptr[646]); MELT_LOCATION ("warmelt-normal.melt:367:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V647*/ meltfptr[646], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:367:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V649*/ meltfptr[648])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V649*/ meltfptr[648])))); ((meltobject_ptr_t) ( /*_.VALDATA___V649*/ meltfptr[648]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V650*/ meltfptr[649]); MELT_LOCATION ("warmelt-normal.melt:367:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V649*/ meltfptr[648])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V649*/ meltfptr[648])))); ((meltobject_ptr_t) ( /*_.VALDATA___V649*/ meltfptr[648]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V644*/ meltfptr[643]); MELT_LOCATION ("warmelt-normal.melt:367:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V649*/ meltfptr[648]); MELT_LOCATION ("warmelt-normal.melt:367:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V649*/ meltfptr[648], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:367:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:367:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V651*/ meltfptr[650])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V651*/ meltfptr[650])))); ((meltobject_ptr_t) ( /*_.VALDATA___V651*/ meltfptr[650]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V644*/ meltfptr[643]); MELT_LOCATION ("warmelt-normal.melt:367:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V651*/ meltfptr[650]); MELT_LOCATION ("warmelt-normal.melt:367:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V651*/ meltfptr[650], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:367:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:367:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V653*/ meltfptr[652])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V653*/ meltfptr[652])))); ((meltobject_ptr_t) ( /*_.VALDATA___V653*/ meltfptr[652]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V644*/ meltfptr[643]); MELT_LOCATION ("warmelt-normal.melt:367:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V653*/ meltfptr[652]); MELT_LOCATION ("warmelt-normal.melt:367:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V653*/ meltfptr[652], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:367:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:367:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V655*/ meltfptr[654])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V655*/ meltfptr[654])))); ((meltobject_ptr_t) ( /*_.VALDATA___V655*/ meltfptr[654]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V644*/ meltfptr[643]); MELT_LOCATION ("warmelt-normal.melt:367:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V655*/ meltfptr[654]); MELT_LOCATION ("warmelt-normal.melt:367:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V655*/ meltfptr[654], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:367:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:367:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V657*/ meltfptr[656])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V657*/ meltfptr[656])))); ((meltobject_ptr_t) ( /*_.VALDATA___V657*/ meltfptr[656]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V644*/ meltfptr[643]); MELT_LOCATION ("warmelt-normal.melt:367:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V657*/ meltfptr[656]); MELT_LOCATION ("warmelt-normal.melt:367:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V657*/ meltfptr[656], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:367:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:367:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V659*/ meltfptr[658])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V659*/ meltfptr[658])))); ((meltobject_ptr_t) ( /*_.VALDATA___V659*/ meltfptr[658]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V644*/ meltfptr[643]); MELT_LOCATION ("warmelt-normal.melt:367:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V659*/ meltfptr[658]); MELT_LOCATION ("warmelt-normal.melt:367:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V659*/ meltfptr[658], "new static instance"); /*putupl#291 */ melt_assertmsg ("putupl #291 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V661*/ meltfptr[660])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #291 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V661*/ meltfptr[660])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V661*/ meltfptr[660]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#292 */ melt_assertmsg ("putupl #292 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V661*/ meltfptr[660])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #292 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V661*/ meltfptr[660])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V661*/ meltfptr[660]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V647*/ meltfptr[646]); /*putupl#293 */ melt_assertmsg ("putupl #293 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V661*/ meltfptr[660])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #293 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V661*/ meltfptr[660])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V661*/ meltfptr[660]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V649*/ meltfptr[648]); /*putupl#294 */ melt_assertmsg ("putupl #294 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V661*/ meltfptr[660])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #294 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V661*/ meltfptr[660])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V661*/ meltfptr[660]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V651*/ meltfptr[650]); /*putupl#295 */ melt_assertmsg ("putupl #295 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V661*/ meltfptr[660])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #295 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V661*/ meltfptr[660])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V661*/ meltfptr[660]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V653*/ meltfptr[652]); /*putupl#296 */ melt_assertmsg ("putupl #296 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V661*/ meltfptr[660])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #296 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V661*/ meltfptr[660])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V661*/ meltfptr[660]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V655*/ meltfptr[654]); /*putupl#297 */ melt_assertmsg ("putupl #297 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V661*/ meltfptr[660])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #297 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V661*/ meltfptr[660])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V661*/ meltfptr[660]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V657*/ meltfptr[656]); /*putupl#298 */ melt_assertmsg ("putupl #298 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V661*/ meltfptr[660])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #298 checkoff", (7 >= 0 && 7 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V661*/ meltfptr[660])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V661*/ meltfptr[660]))->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V659*/ meltfptr[658]); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_8 */ void meltmod__warmelt_normal__initialmeltchunk_9 (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___V661*/ meltfptr[660]); MELT_LOCATION ("warmelt-normal.melt:367:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V644*/ meltfptr[643])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V644*/ meltfptr[643])))); ((meltobject_ptr_t) ( /*_.VALDATA___V644*/ meltfptr[643]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V661*/ meltfptr[660]); MELT_LOCATION ("warmelt-normal.melt:367:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V644*/ meltfptr[643]); MELT_LOCATION ("warmelt-normal.melt:367:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V644*/ meltfptr[643], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V662*/ meltfptr[661])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V662*/ meltfptr[661])))); ((meltobject_ptr_t) ( /*_.VALDATA___V662*/ meltfptr[661]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V663*/ meltfptr[662]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V662*/ meltfptr[661]); melt_dbgtrace_written_object ( /*_.VALDATA___V662*/ meltfptr[661], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V664*/ meltfptr[663])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V664*/ meltfptr[663])))); ((meltobject_ptr_t) ( /*_.VALDATA___V664*/ meltfptr[663]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V665*/ meltfptr[664]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V664*/ meltfptr[663]); melt_dbgtrace_written_object ( /*_.VALDATA___V664*/ meltfptr[663], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V666*/ meltfptr[665])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V666*/ meltfptr[665])))); ((meltobject_ptr_t) ( /*_.VALDATA___V666*/ meltfptr[665]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V667*/ meltfptr[666]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V666*/ meltfptr[665]); melt_dbgtrace_written_object ( /*_.VALDATA___V666*/ meltfptr[665], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V668*/ meltfptr[667])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V668*/ meltfptr[667])))); ((meltobject_ptr_t) ( /*_.VALDATA___V668*/ meltfptr[667]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V669*/ meltfptr[668]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V668*/ meltfptr[667]); melt_dbgtrace_written_object ( /*_.VALDATA___V668*/ meltfptr[667], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V670*/ meltfptr[669])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V670*/ meltfptr[669])))); ((meltobject_ptr_t) ( /*_.VALDATA___V670*/ meltfptr[669]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V671*/ meltfptr[670]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V670*/ meltfptr[669]); melt_dbgtrace_written_object ( /*_.VALDATA___V670*/ meltfptr[669], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V672*/ meltfptr[671])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V672*/ meltfptr[671])))); ((meltobject_ptr_t) ( /*_.VALDATA___V672*/ meltfptr[671]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V673*/ meltfptr[672]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V672*/ meltfptr[671]); melt_dbgtrace_written_object ( /*_.VALDATA___V672*/ meltfptr[671], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V674*/ meltfptr[673])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V674*/ meltfptr[673])))); ((meltobject_ptr_t) ( /*_.VALDATA___V674*/ meltfptr[673]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V675*/ meltfptr[674]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V674*/ meltfptr[673]); melt_dbgtrace_written_object ( /*_.VALDATA___V674*/ meltfptr[673], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V676*/ meltfptr[675]); melt_dbgtrace_written_object ( /*_.VALDATA___V676*/ meltfptr[675], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:379:/ 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-normal.melt:379:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V678*/ meltfptr[677])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V678*/ meltfptr[677])))); ((meltobject_ptr_t) ( /*_.VALDATA___V678*/ meltfptr[677]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*putupl#299 */ melt_assertmsg ("putupl #299 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V680*/ meltfptr[679])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #299 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V680*/ meltfptr[679])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V680*/ meltfptr[679]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#300 */ melt_assertmsg ("putupl #300 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V680*/ meltfptr[679])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #300 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V680*/ meltfptr[679])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V680*/ meltfptr[679]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#301 */ melt_assertmsg ("putupl #301 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V680*/ meltfptr[679])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #301 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V680*/ meltfptr[679])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V680*/ meltfptr[679]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V680*/ meltfptr[679]); MELT_LOCATION ("warmelt-normal.melt:379:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V678*/ meltfptr[677])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V678*/ meltfptr[677])))); ((meltobject_ptr_t) ( /*_.VALDATA___V678*/ meltfptr[677]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V680*/ meltfptr[679]); MELT_LOCATION ("warmelt-normal.melt:379:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V681*/ meltfptr[680])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V681*/ meltfptr[680])))); ((meltobject_ptr_t) ( /*_.VALDATA___V681*/ meltfptr[680]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V682*/ meltfptr[681]); MELT_LOCATION ("warmelt-normal.melt:379:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V681*/ meltfptr[680])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V681*/ meltfptr[680])))); ((meltobject_ptr_t) ( /*_.VALDATA___V681*/ meltfptr[680]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V678*/ meltfptr[677]); MELT_LOCATION ("warmelt-normal.melt:379:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V681*/ meltfptr[680]); MELT_LOCATION ("warmelt-normal.melt:379:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V681*/ meltfptr[680], "new static instance"); /*putupl#302 */ melt_assertmsg ("putupl #302 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V683*/ meltfptr[682])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #302 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V683*/ meltfptr[682])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V683*/ meltfptr[682]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#303 */ melt_assertmsg ("putupl #303 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V683*/ meltfptr[682])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #303 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V683*/ meltfptr[682])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V683*/ meltfptr[682]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V681*/ meltfptr[680]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V683*/ meltfptr[682]); MELT_LOCATION ("warmelt-normal.melt:379:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V678*/ meltfptr[677])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V678*/ meltfptr[677])))); ((meltobject_ptr_t) ( /*_.VALDATA___V678*/ meltfptr[677]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V683*/ meltfptr[682]); MELT_LOCATION ("warmelt-normal.melt:379:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V678*/ meltfptr[677]); MELT_LOCATION ("warmelt-normal.melt:379:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V678*/ meltfptr[677], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V684*/ meltfptr[683])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V684*/ meltfptr[683])))); ((meltobject_ptr_t) ( /*_.VALDATA___V684*/ meltfptr[683]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V685*/ meltfptr[684]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V684*/ meltfptr[683]); melt_dbgtrace_written_object ( /*_.VALDATA___V684*/ meltfptr[683], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685])))); ((meltobject_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V687*/ meltfptr[686]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V686*/ meltfptr[685]); melt_dbgtrace_written_object ( /*_.VALDATA___V686*/ meltfptr[685], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V688*/ meltfptr[687])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V688*/ meltfptr[687])))); ((meltobject_ptr_t) ( /*_.VALDATA___V688*/ meltfptr[687]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V689*/ meltfptr[688]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V688*/ meltfptr[687]); melt_dbgtrace_written_object ( /*_.VALDATA___V688*/ meltfptr[687], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:386:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V690*/ meltfptr[689])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V690*/ meltfptr[689])))); ((meltobject_ptr_t) ( /*_.VALDATA___V690*/ meltfptr[689]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V691*/ meltfptr[690]); MELT_LOCATION ("warmelt-normal.melt:386:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V690*/ meltfptr[689])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V690*/ meltfptr[689])))); ((meltobject_ptr_t) ( /*_.VALDATA___V690*/ meltfptr[689]))->obj_vartab[4] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7]); /*putupl#304 */ melt_assertmsg ("putupl #304 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V692*/ meltfptr[691])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #304 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V692*/ meltfptr[691])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V692*/ meltfptr[691]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7]), 5))), (0)))); /*putupl#305 */ melt_assertmsg ("putupl #305 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V692*/ meltfptr[691])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #305 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V692*/ meltfptr[691])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V692*/ meltfptr[691]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V692*/ meltfptr[691]); MELT_LOCATION ("warmelt-normal.melt:386:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V690*/ meltfptr[689])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V690*/ meltfptr[689])))); ((meltobject_ptr_t) ( /*_.VALDATA___V690*/ meltfptr[689]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V692*/ meltfptr[691]); MELT_LOCATION ("warmelt-normal.melt:386:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:386:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V693*/ meltfptr[692])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V693*/ meltfptr[692])))); ((meltobject_ptr_t) ( /*_.VALDATA___V693*/ meltfptr[692]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V690*/ meltfptr[689]); MELT_LOCATION ("warmelt-normal.melt:386:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V693*/ meltfptr[692]); MELT_LOCATION ("warmelt-normal.melt:386:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V693*/ meltfptr[692], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:386:/ 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-normal.melt:386:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694])))); ((meltobject_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V690*/ meltfptr[689]); MELT_LOCATION ("warmelt-normal.melt:386:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V695*/ meltfptr[694]); MELT_LOCATION ("warmelt-normal.melt:386:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V695*/ meltfptr[694], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:386:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V697*/ meltfptr[696])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V697*/ meltfptr[696])))); ((meltobject_ptr_t) ( /*_.VALDATA___V697*/ meltfptr[696]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V698*/ meltfptr[697]); MELT_LOCATION ("warmelt-normal.melt:386:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V697*/ meltfptr[696])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V697*/ meltfptr[696])))); ((meltobject_ptr_t) ( /*_.VALDATA___V697*/ meltfptr[696]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V690*/ meltfptr[689]); MELT_LOCATION ("warmelt-normal.melt:386:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V697*/ meltfptr[696]); MELT_LOCATION ("warmelt-normal.melt:386:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V697*/ meltfptr[696], "new static instance"); /*putupl#306 */ melt_assertmsg ("putupl #306 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V699*/ meltfptr[698])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #306 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V699*/ meltfptr[698])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V699*/ meltfptr[698]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7]), 6))), (0)))); /*putupl#307 */ melt_assertmsg ("putupl #307 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V699*/ meltfptr[698])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #307 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V699*/ meltfptr[698])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V699*/ meltfptr[698]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V693*/ meltfptr[692]); /*putupl#308 */ melt_assertmsg ("putupl #308 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V699*/ meltfptr[698])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #308 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V699*/ meltfptr[698])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V699*/ meltfptr[698]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); /*putupl#309 */ melt_assertmsg ("putupl #309 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V699*/ meltfptr[698])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #309 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V699*/ meltfptr[698])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V699*/ meltfptr[698]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V697*/ meltfptr[696]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V699*/ meltfptr[698]); MELT_LOCATION ("warmelt-normal.melt:386:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V690*/ meltfptr[689])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V690*/ meltfptr[689])))); ((meltobject_ptr_t) ( /*_.VALDATA___V690*/ meltfptr[689]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V699*/ meltfptr[698]); MELT_LOCATION ("warmelt-normal.melt:386:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V690*/ meltfptr[689]); MELT_LOCATION ("warmelt-normal.melt:386:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V690*/ meltfptr[689], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V700*/ meltfptr[699]); melt_dbgtrace_written_object ( /*_.VALDATA___V700*/ meltfptr[699], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V702*/ meltfptr[701]); melt_dbgtrace_written_object ( /*_.VALDATA___V702*/ meltfptr[701], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V704*/ meltfptr[703]); melt_dbgtrace_written_object ( /*_.VALDATA___V704*/ meltfptr[703], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V706*/ meltfptr[705])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V706*/ meltfptr[705])))); ((meltobject_ptr_t) ( /*_.VALDATA___V706*/ meltfptr[705]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V707*/ meltfptr[706]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V706*/ meltfptr[705]); melt_dbgtrace_written_object ( /*_.VALDATA___V706*/ meltfptr[705], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:395:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V708*/ meltfptr[707])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V708*/ meltfptr[707])))); ((meltobject_ptr_t) ( /*_.VALDATA___V708*/ meltfptr[707]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V709*/ meltfptr[708]); MELT_LOCATION ("warmelt-normal.melt:395:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V708*/ meltfptr[707])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V708*/ meltfptr[707])))); ((meltobject_ptr_t) ( /*_.VALDATA___V708*/ meltfptr[707]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V690*/ meltfptr[689]); /*putupl#310 */ melt_assertmsg ("putupl #310 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V710*/ meltfptr[709])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #310 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V710*/ meltfptr[709])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V710*/ meltfptr[709]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7]), 5))), (0)))); /*putupl#311 */ melt_assertmsg ("putupl #311 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V710*/ meltfptr[709])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #311 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V710*/ meltfptr[709])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V710*/ meltfptr[709]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7]); /*putupl#312 */ melt_assertmsg ("putupl #312 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V710*/ meltfptr[709])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #312 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V710*/ meltfptr[709])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V710*/ meltfptr[709]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V690*/ meltfptr[689]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V710*/ meltfptr[709]); MELT_LOCATION ("warmelt-normal.melt:395:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V708*/ meltfptr[707])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V708*/ meltfptr[707])))); ((meltobject_ptr_t) ( /*_.VALDATA___V708*/ meltfptr[707]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V710*/ meltfptr[709]); MELT_LOCATION ("warmelt-normal.melt:395:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:395:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V711*/ meltfptr[710])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V711*/ meltfptr[710])))); ((meltobject_ptr_t) ( /*_.VALDATA___V711*/ meltfptr[710]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V708*/ meltfptr[707]); MELT_LOCATION ("warmelt-normal.melt:395:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V711*/ meltfptr[710]); MELT_LOCATION ("warmelt-normal.melt:395:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V711*/ meltfptr[710], "new static instance"); /*putupl#313 */ melt_assertmsg ("putupl #313 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V713*/ meltfptr[712])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #313 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V713*/ meltfptr[712])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V713*/ meltfptr[712]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7]), 6))), (0)))); /*putupl#314 */ melt_assertmsg ("putupl #314 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V713*/ meltfptr[712])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #314 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V713*/ meltfptr[712])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V713*/ meltfptr[712]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V693*/ meltfptr[692]); /*putupl#315 */ melt_assertmsg ("putupl #315 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V713*/ meltfptr[712])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #315 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V713*/ meltfptr[712])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V713*/ meltfptr[712]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); /*putupl#316 */ melt_assertmsg ("putupl #316 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V713*/ meltfptr[712])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #316 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V713*/ meltfptr[712])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V713*/ meltfptr[712]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V697*/ meltfptr[696]); /*putupl#317 */ melt_assertmsg ("putupl #317 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V713*/ meltfptr[712])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #317 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V713*/ meltfptr[712])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V713*/ meltfptr[712]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V711*/ meltfptr[710]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V713*/ meltfptr[712]); MELT_LOCATION ("warmelt-normal.melt:395:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V708*/ meltfptr[707])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V708*/ meltfptr[707])))); ((meltobject_ptr_t) ( /*_.VALDATA___V708*/ meltfptr[707]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V713*/ meltfptr[712]); MELT_LOCATION ("warmelt-normal.melt:395:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V708*/ meltfptr[707]); MELT_LOCATION ("warmelt-normal.melt:395:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V708*/ meltfptr[707], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V714*/ meltfptr[713])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V714*/ meltfptr[713])))); ((meltobject_ptr_t) ( /*_.VALDATA___V714*/ meltfptr[713]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V715*/ meltfptr[714]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V714*/ meltfptr[713]); melt_dbgtrace_written_object ( /*_.VALDATA___V714*/ meltfptr[713], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V716*/ meltfptr[715])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V716*/ meltfptr[715])))); ((meltobject_ptr_t) ( /*_.VALDATA___V716*/ meltfptr[715]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V717*/ meltfptr[716]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V716*/ meltfptr[715]); melt_dbgtrace_written_object ( /*_.VALDATA___V716*/ meltfptr[715], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:402:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V718*/ meltfptr[717])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V718*/ meltfptr[717])))); ((meltobject_ptr_t) ( /*_.VALDATA___V718*/ meltfptr[717]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V719*/ meltfptr[718]); MELT_LOCATION ("warmelt-normal.melt:402:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V718*/ meltfptr[717])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V718*/ meltfptr[717])))); ((meltobject_ptr_t) ( /*_.VALDATA___V718*/ meltfptr[717]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V690*/ meltfptr[689]); /*putupl#318 */ melt_assertmsg ("putupl #318 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V720*/ meltfptr[719])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #318 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_ANY_BINDING__V8*/ meltfptr[7]), 5))), (0)))); /*putupl#319 */ melt_assertmsg ("putupl #319 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V720*/ meltfptr[719])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #319 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) ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7]); /*putupl#320 */ melt_assertmsg ("putupl #320 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V720*/ meltfptr[719])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #320 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___V690*/ meltfptr[689]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V720*/ meltfptr[719]); MELT_LOCATION ("warmelt-normal.melt:402:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V718*/ meltfptr[717])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V718*/ meltfptr[717])))); ((meltobject_ptr_t) ( /*_.VALDATA___V718*/ meltfptr[717]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V720*/ meltfptr[719]); MELT_LOCATION ("warmelt-normal.melt:402:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:402:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V721*/ meltfptr[720])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V721*/ meltfptr[720])))); ((meltobject_ptr_t) ( /*_.VALDATA___V721*/ meltfptr[720]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V718*/ meltfptr[717]); MELT_LOCATION ("warmelt-normal.melt:402:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V721*/ meltfptr[720]); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_9 */ void meltmod__warmelt_normal__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-normal.melt:402:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V721*/ meltfptr[720], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:402:/ 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-normal.melt:402:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V723*/ meltfptr[722])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V723*/ meltfptr[722])))); ((meltobject_ptr_t) ( /*_.VALDATA___V723*/ meltfptr[722]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V718*/ meltfptr[717]); MELT_LOCATION ("warmelt-normal.melt:402:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V723*/ meltfptr[722]); MELT_LOCATION ("warmelt-normal.melt:402:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V723*/ meltfptr[722], "new static instance"); /*putupl#321 */ melt_assertmsg ("putupl #321 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V725*/ meltfptr[724])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #321 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__V8*/ meltfptr[7]), 6))), (0)))); /*putupl#322 */ melt_assertmsg ("putupl #322 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V725*/ meltfptr[724])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #322 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) ( /*_.VALDATA___V693*/ meltfptr[692]); /*putupl#323 */ melt_assertmsg ("putupl #323 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V725*/ meltfptr[724])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #323 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V725*/ meltfptr[724])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V725*/ meltfptr[724]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); /*putupl#324 */ melt_assertmsg ("putupl #324 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V725*/ meltfptr[724])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #324 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V725*/ meltfptr[724])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V725*/ meltfptr[724]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V697*/ meltfptr[696]); /*putupl#325 */ melt_assertmsg ("putupl #325 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V725*/ meltfptr[724])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #325 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V725*/ meltfptr[724])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V725*/ meltfptr[724]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V721*/ meltfptr[720]); /*putupl#326 */ melt_assertmsg ("putupl #326 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V725*/ meltfptr[724])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #326 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V725*/ meltfptr[724])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V725*/ meltfptr[724]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V723*/ meltfptr[722]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V725*/ meltfptr[724]); MELT_LOCATION ("warmelt-normal.melt:402:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V718*/ meltfptr[717])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V718*/ meltfptr[717])))); ((meltobject_ptr_t) ( /*_.VALDATA___V718*/ meltfptr[717]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V725*/ meltfptr[724]); MELT_LOCATION ("warmelt-normal.melt:402:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V718*/ meltfptr[717]); MELT_LOCATION ("warmelt-normal.melt:402:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V718*/ meltfptr[717], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V726*/ meltfptr[725]); melt_dbgtrace_written_object ( /*_.VALDATA___V726*/ meltfptr[725], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V728*/ meltfptr[727]); melt_dbgtrace_written_object ( /*_.VALDATA___V728*/ meltfptr[727], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V730*/ meltfptr[729])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V730*/ meltfptr[729])))); ((meltobject_ptr_t) ( /*_.VALDATA___V730*/ meltfptr[729]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V731*/ meltfptr[730]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V730*/ meltfptr[729]); melt_dbgtrace_written_object ( /*_.VALDATA___V730*/ meltfptr[729], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:409:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731])))); ((meltobject_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V733*/ meltfptr[732]); MELT_LOCATION ("warmelt-normal.melt:409:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731])))); ((meltobject_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V690*/ meltfptr[689]); /*putupl#327 */ melt_assertmsg ("putupl #327 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V734*/ meltfptr[733])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #327 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V734*/ meltfptr[733])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V734*/ meltfptr[733]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7]), 5))), (0)))); /*putupl#328 */ melt_assertmsg ("putupl #328 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V734*/ meltfptr[733])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #328 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V734*/ meltfptr[733])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V734*/ meltfptr[733]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7]); /*putupl#329 */ melt_assertmsg ("putupl #329 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V734*/ meltfptr[733])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #329 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V734*/ meltfptr[733])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V734*/ meltfptr[733]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V690*/ meltfptr[689]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V734*/ meltfptr[733]); MELT_LOCATION ("warmelt-normal.melt:409:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731])))); ((meltobject_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V734*/ meltfptr[733]); MELT_LOCATION ("warmelt-normal.melt:409:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V735*/ meltfptr[734])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V735*/ meltfptr[734])))); ((meltobject_ptr_t) ( /*_.VALDATA___V735*/ meltfptr[734]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V736*/ meltfptr[735]); MELT_LOCATION ("warmelt-normal.melt:409:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V735*/ meltfptr[734])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V735*/ meltfptr[734])))); ((meltobject_ptr_t) ( /*_.VALDATA___V735*/ meltfptr[734]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731]); MELT_LOCATION ("warmelt-normal.melt:409:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V735*/ meltfptr[734]); MELT_LOCATION ("warmelt-normal.melt:409:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V735*/ meltfptr[734], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:409:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:409:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V737*/ meltfptr[736])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V737*/ meltfptr[736])))); ((meltobject_ptr_t) ( /*_.VALDATA___V737*/ meltfptr[736]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731]); MELT_LOCATION ("warmelt-normal.melt:409:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V737*/ meltfptr[736]); MELT_LOCATION ("warmelt-normal.melt:409:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V737*/ meltfptr[736], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:409:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:409:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V739*/ meltfptr[738])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V739*/ meltfptr[738])))); ((meltobject_ptr_t) ( /*_.VALDATA___V739*/ meltfptr[738]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731]); MELT_LOCATION ("warmelt-normal.melt:409:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V739*/ meltfptr[738]); MELT_LOCATION ("warmelt-normal.melt:409:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V739*/ meltfptr[738], "new static instance"); /*putupl#330 */ melt_assertmsg ("putupl #330 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V741*/ meltfptr[740])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #330 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V741*/ meltfptr[740])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V741*/ meltfptr[740]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7]), 6))), (0)))); /*putupl#331 */ melt_assertmsg ("putupl #331 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V741*/ meltfptr[740])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #331 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V741*/ meltfptr[740])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V741*/ meltfptr[740]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V693*/ meltfptr[692]); /*putupl#332 */ melt_assertmsg ("putupl #332 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V741*/ meltfptr[740])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #332 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V741*/ meltfptr[740])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V741*/ meltfptr[740]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); /*putupl#333 */ melt_assertmsg ("putupl #333 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V741*/ meltfptr[740])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #333 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V741*/ meltfptr[740])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V741*/ meltfptr[740]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V697*/ meltfptr[696]); /*putupl#334 */ melt_assertmsg ("putupl #334 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V741*/ meltfptr[740])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #334 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V741*/ meltfptr[740])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V741*/ meltfptr[740]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V735*/ meltfptr[734]); /*putupl#335 */ melt_assertmsg ("putupl #335 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V741*/ meltfptr[740])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #335 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V741*/ meltfptr[740])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V741*/ meltfptr[740]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V737*/ meltfptr[736]); /*putupl#336 */ melt_assertmsg ("putupl #336 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V741*/ meltfptr[740])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #336 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V741*/ meltfptr[740])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V741*/ meltfptr[740]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V739*/ meltfptr[738]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V741*/ meltfptr[740]); MELT_LOCATION ("warmelt-normal.melt:409:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731])))); ((meltobject_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V741*/ meltfptr[740]); MELT_LOCATION ("warmelt-normal.melt:409:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V732*/ meltfptr[731]); MELT_LOCATION ("warmelt-normal.melt:409:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V732*/ meltfptr[731], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V742*/ meltfptr[741])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V742*/ meltfptr[741])))); ((meltobject_ptr_t) ( /*_.VALDATA___V742*/ meltfptr[741]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V743*/ meltfptr[742]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V742*/ meltfptr[741]); melt_dbgtrace_written_object ( /*_.VALDATA___V742*/ meltfptr[741], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V744*/ meltfptr[743]); melt_dbgtrace_written_object ( /*_.VALDATA___V744*/ meltfptr[743], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V746*/ meltfptr[745]); melt_dbgtrace_written_object ( /*_.VALDATA___V746*/ meltfptr[745], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V748*/ meltfptr[747]); melt_dbgtrace_written_object ( /*_.VALDATA___V748*/ meltfptr[747], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:417:/ 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-normal.melt:417:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V750*/ meltfptr[749])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V750*/ meltfptr[749])))); ((meltobject_ptr_t) ( /*_.VALDATA___V750*/ meltfptr[749]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V690*/ meltfptr[689]); /*putupl#337 */ melt_assertmsg ("putupl #337 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V752*/ meltfptr[751])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #337 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_ANY_BINDING__V8*/ meltfptr[7]), 5))), (0)))); /*putupl#338 */ melt_assertmsg ("putupl #338 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V752*/ meltfptr[751])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #338 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) ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7]); /*putupl#339 */ melt_assertmsg ("putupl #339 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V752*/ meltfptr[751])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #339 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___V690*/ meltfptr[689]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V752*/ meltfptr[751]); MELT_LOCATION ("warmelt-normal.melt:417:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V750*/ meltfptr[749])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V750*/ meltfptr[749])))); ((meltobject_ptr_t) ( /*_.VALDATA___V750*/ meltfptr[749]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V752*/ meltfptr[751]); MELT_LOCATION ("warmelt-normal.melt:417:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:417:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V753*/ meltfptr[752])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V753*/ meltfptr[752])))); ((meltobject_ptr_t) ( /*_.VALDATA___V753*/ meltfptr[752]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V750*/ meltfptr[749]); MELT_LOCATION ("warmelt-normal.melt:417:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V753*/ meltfptr[752]); MELT_LOCATION ("warmelt-normal.melt:417:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V753*/ meltfptr[752], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:417:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:417:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V755*/ meltfptr[754])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V755*/ meltfptr[754])))); ((meltobject_ptr_t) ( /*_.VALDATA___V755*/ meltfptr[754]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V750*/ meltfptr[749]); MELT_LOCATION ("warmelt-normal.melt:417:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V755*/ meltfptr[754]); MELT_LOCATION ("warmelt-normal.melt:417:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V755*/ meltfptr[754], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:417:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:417:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756])))); ((meltobject_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V750*/ meltfptr[749]); MELT_LOCATION ("warmelt-normal.melt:417:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V757*/ meltfptr[756]); MELT_LOCATION ("warmelt-normal.melt:417:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V757*/ meltfptr[756], "new static instance"); /*putupl#340 */ melt_assertmsg ("putupl #340 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V759*/ meltfptr[758])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #340 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V759*/ meltfptr[758])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V759*/ meltfptr[758]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7]), 6))), (0)))); /*putupl#341 */ melt_assertmsg ("putupl #341 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V759*/ meltfptr[758])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #341 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V759*/ meltfptr[758])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V759*/ meltfptr[758]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V693*/ meltfptr[692]); /*putupl#342 */ melt_assertmsg ("putupl #342 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V759*/ meltfptr[758])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #342 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V759*/ meltfptr[758])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V759*/ meltfptr[758]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); /*putupl#343 */ melt_assertmsg ("putupl #343 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V759*/ meltfptr[758])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #343 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V759*/ meltfptr[758])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V759*/ meltfptr[758]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V697*/ meltfptr[696]); /*putupl#344 */ melt_assertmsg ("putupl #344 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V759*/ meltfptr[758])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #344 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V759*/ meltfptr[758])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V759*/ meltfptr[758]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V753*/ meltfptr[752]); /*putupl#345 */ melt_assertmsg ("putupl #345 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V759*/ meltfptr[758])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #345 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V759*/ meltfptr[758])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V759*/ meltfptr[758]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V755*/ meltfptr[754]); /*putupl#346 */ melt_assertmsg ("putupl #346 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V759*/ meltfptr[758])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #346 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V759*/ meltfptr[758])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V759*/ meltfptr[758]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V759*/ meltfptr[758]); MELT_LOCATION ("warmelt-normal.melt:417:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V750*/ meltfptr[749])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V750*/ meltfptr[749])))); ((meltobject_ptr_t) ( /*_.VALDATA___V750*/ meltfptr[749]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V759*/ meltfptr[758]); MELT_LOCATION ("warmelt-normal.melt:417:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V750*/ meltfptr[749]); MELT_LOCATION ("warmelt-normal.melt:417:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V750*/ meltfptr[749], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V760*/ meltfptr[759])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V760*/ meltfptr[759])))); ((meltobject_ptr_t) ( /*_.VALDATA___V760*/ meltfptr[759]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V761*/ meltfptr[760]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V760*/ meltfptr[759]); melt_dbgtrace_written_object ( /*_.VALDATA___V760*/ meltfptr[759], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V762*/ meltfptr[761])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V762*/ meltfptr[761])))); ((meltobject_ptr_t) ( /*_.VALDATA___V762*/ meltfptr[761]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V763*/ meltfptr[762]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V762*/ meltfptr[761]); melt_dbgtrace_written_object ( /*_.VALDATA___V762*/ meltfptr[761], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V764*/ meltfptr[763])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V764*/ meltfptr[763])))); ((meltobject_ptr_t) ( /*_.VALDATA___V764*/ meltfptr[763]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V765*/ meltfptr[764]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V764*/ meltfptr[763]); melt_dbgtrace_written_object ( /*_.VALDATA___V764*/ meltfptr[763], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V766*/ meltfptr[765])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V766*/ meltfptr[765])))); ((meltobject_ptr_t) ( /*_.VALDATA___V766*/ meltfptr[765]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V767*/ meltfptr[766]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V766*/ meltfptr[765]); melt_dbgtrace_written_object ( /*_.VALDATA___V766*/ meltfptr[765], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:424:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V768*/ meltfptr[767])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V768*/ meltfptr[767])))); ((meltobject_ptr_t) ( /*_.VALDATA___V768*/ meltfptr[767]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V769*/ meltfptr[768]); MELT_LOCATION ("warmelt-normal.melt:424:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V768*/ meltfptr[767])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V768*/ meltfptr[767])))); ((meltobject_ptr_t) ( /*_.VALDATA___V768*/ meltfptr[767]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V690*/ meltfptr[689]); /*putupl#347 */ melt_assertmsg ("putupl #347 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V770*/ meltfptr[769])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #347 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V770*/ meltfptr[769])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V770*/ meltfptr[769]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7]), 5))), (0)))); /*putupl#348 */ melt_assertmsg ("putupl #348 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V770*/ meltfptr[769])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #348 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V770*/ meltfptr[769])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V770*/ meltfptr[769]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7]); /*putupl#349 */ melt_assertmsg ("putupl #349 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V770*/ meltfptr[769])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #349 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V770*/ meltfptr[769])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V770*/ meltfptr[769]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V690*/ meltfptr[689]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V770*/ meltfptr[769]); MELT_LOCATION ("warmelt-normal.melt:424:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V768*/ meltfptr[767])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V768*/ meltfptr[767])))); ((meltobject_ptr_t) ( /*_.VALDATA___V768*/ meltfptr[767]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V770*/ meltfptr[769]); MELT_LOCATION ("warmelt-normal.melt:424:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V771*/ meltfptr[770])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V771*/ meltfptr[770])))); ((meltobject_ptr_t) ( /*_.VALDATA___V771*/ meltfptr[770]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V772*/ meltfptr[771]); MELT_LOCATION ("warmelt-normal.melt:424:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V771*/ meltfptr[770])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V771*/ meltfptr[770])))); ((meltobject_ptr_t) ( /*_.VALDATA___V771*/ meltfptr[770]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V768*/ meltfptr[767]); MELT_LOCATION ("warmelt-normal.melt:424:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V771*/ meltfptr[770]); MELT_LOCATION ("warmelt-normal.melt:424:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V771*/ meltfptr[770], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:424:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V773*/ meltfptr[772])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V773*/ meltfptr[772])))); ((meltobject_ptr_t) ( /*_.VALDATA___V773*/ meltfptr[772]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V774*/ meltfptr[773]); MELT_LOCATION ("warmelt-normal.melt:424:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V773*/ meltfptr[772])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V773*/ meltfptr[772])))); ((meltobject_ptr_t) ( /*_.VALDATA___V773*/ meltfptr[772]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V768*/ meltfptr[767]); MELT_LOCATION ("warmelt-normal.melt:424:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V773*/ meltfptr[772]); MELT_LOCATION ("warmelt-normal.melt:424:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V773*/ meltfptr[772], "new static instance"); /*putupl#350 */ melt_assertmsg ("putupl #350 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V775*/ meltfptr[774])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #350 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V775*/ meltfptr[774])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V775*/ meltfptr[774]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7]), 6))), (0)))); /*putupl#351 */ melt_assertmsg ("putupl #351 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V775*/ meltfptr[774])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #351 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V775*/ meltfptr[774])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V775*/ meltfptr[774]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V693*/ meltfptr[692]); /*putupl#352 */ melt_assertmsg ("putupl #352 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V775*/ meltfptr[774])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #352 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V775*/ meltfptr[774])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V775*/ meltfptr[774]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V695*/ meltfptr[694]); /*putupl#353 */ melt_assertmsg ("putupl #353 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V775*/ meltfptr[774])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #353 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V775*/ meltfptr[774])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V775*/ meltfptr[774]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V697*/ meltfptr[696]); /*putupl#354 */ melt_assertmsg ("putupl #354 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V775*/ meltfptr[774])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #354 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V775*/ meltfptr[774])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V775*/ meltfptr[774]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V771*/ meltfptr[770]); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_10 */ void meltmod__warmelt_normal__initialmeltchunk_11 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*putupl#355*/ melt_assertmsg ("putupl #355 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V775*/ meltfptr[774])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #355 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V775*/ meltfptr[774])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V775*/ meltfptr[774]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V773*/ meltfptr[772]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V775*/ meltfptr[774]); MELT_LOCATION ("warmelt-normal.melt:424:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V768*/ meltfptr[767])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V768*/ meltfptr[767])))); ((meltobject_ptr_t) ( /*_.VALDATA___V768*/ meltfptr[767]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V775*/ meltfptr[774]); MELT_LOCATION ("warmelt-normal.melt:424:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V768*/ meltfptr[767]); MELT_LOCATION ("warmelt-normal.melt:424:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V768*/ meltfptr[767], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V776*/ meltfptr[775])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V776*/ meltfptr[775])))); ((meltobject_ptr_t) ( /*_.VALDATA___V776*/ meltfptr[775]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V777*/ meltfptr[776]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V776*/ meltfptr[775]); melt_dbgtrace_written_object ( /*_.VALDATA___V776*/ meltfptr[775], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V778*/ meltfptr[777])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V778*/ meltfptr[777])))); ((meltobject_ptr_t) ( /*_.VALDATA___V778*/ meltfptr[777]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V779*/ meltfptr[778]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V778*/ meltfptr[777]); melt_dbgtrace_written_object ( /*_.VALDATA___V778*/ meltfptr[777], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V780*/ meltfptr[779])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V780*/ meltfptr[779])))); ((meltobject_ptr_t) ( /*_.VALDATA___V780*/ meltfptr[779]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V781*/ meltfptr[780]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V780*/ meltfptr[779]); melt_dbgtrace_written_object ( /*_.VALDATA___V780*/ meltfptr[779], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:433:/ 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-normal.melt:433:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V782*/ meltfptr[781])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V782*/ meltfptr[781])))); ((meltobject_ptr_t) ( /*_.VALDATA___V782*/ meltfptr[781]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#356 */ melt_assertmsg ("putupl #356 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V784*/ meltfptr[783])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #356 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) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#357 */ melt_assertmsg ("putupl #357 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V784*/ meltfptr[783])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #357 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) ( /*_.VALDATA___V176*/ meltfptr[175]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V784*/ meltfptr[783]); MELT_LOCATION ("warmelt-normal.melt:433:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V782*/ meltfptr[781])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V782*/ meltfptr[781])))); ((meltobject_ptr_t) ( /*_.VALDATA___V782*/ meltfptr[781]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V784*/ meltfptr[783]); MELT_LOCATION ("warmelt-normal.melt:433:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:433:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V785*/ meltfptr[784])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V785*/ meltfptr[784])))); ((meltobject_ptr_t) ( /*_.VALDATA___V785*/ meltfptr[784]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V782*/ meltfptr[781]); MELT_LOCATION ("warmelt-normal.melt:433:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V785*/ meltfptr[784]); MELT_LOCATION ("warmelt-normal.melt:433:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V785*/ meltfptr[784], "new static instance"); /*putupl#358 */ melt_assertmsg ("putupl #358 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V787*/ meltfptr[786])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #358 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V787*/ meltfptr[786])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V787*/ meltfptr[786]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#359 */ melt_assertmsg ("putupl #359 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V787*/ meltfptr[786])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #359 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V787*/ meltfptr[786])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V787*/ meltfptr[786]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V785*/ meltfptr[784]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V787*/ meltfptr[786]); MELT_LOCATION ("warmelt-normal.melt:433:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V782*/ meltfptr[781])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V782*/ meltfptr[781])))); ((meltobject_ptr_t) ( /*_.VALDATA___V782*/ meltfptr[781]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V787*/ meltfptr[786]); MELT_LOCATION ("warmelt-normal.melt:433:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V782*/ meltfptr[781]); MELT_LOCATION ("warmelt-normal.melt:433:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V782*/ meltfptr[781], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V788*/ meltfptr[787])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V788*/ meltfptr[787])))); ((meltobject_ptr_t) ( /*_.VALDATA___V788*/ meltfptr[787]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V789*/ meltfptr[788]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V788*/ meltfptr[787]); melt_dbgtrace_written_object ( /*_.VALDATA___V788*/ meltfptr[787], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V790*/ meltfptr[789])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V790*/ meltfptr[789])))); ((meltobject_ptr_t) ( /*_.VALDATA___V790*/ meltfptr[789]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V791*/ meltfptr[790]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V790*/ meltfptr[789]); melt_dbgtrace_written_object ( /*_.VALDATA___V790*/ meltfptr[789], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:443:/ 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-normal.melt:443:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V792*/ meltfptr[791])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V792*/ meltfptr[791])))); ((meltobject_ptr_t) ( /*_.VALDATA___V792*/ meltfptr[791]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V782*/ meltfptr[781]); /*putupl#360 */ melt_assertmsg ("putupl #360 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V794*/ meltfptr[793])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #360 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) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#361 */ melt_assertmsg ("putupl #361 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V794*/ meltfptr[793])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #361 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) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#362 */ melt_assertmsg ("putupl #362 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V794*/ meltfptr[793])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #362 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___V782*/ meltfptr[781]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V794*/ meltfptr[793]); MELT_LOCATION ("warmelt-normal.melt:443:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V792*/ meltfptr[791])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V792*/ meltfptr[791])))); ((meltobject_ptr_t) ( /*_.VALDATA___V792*/ meltfptr[791]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V794*/ meltfptr[793]); MELT_LOCATION ("warmelt-normal.melt:443:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:443:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V795*/ meltfptr[794])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V795*/ meltfptr[794])))); ((meltobject_ptr_t) ( /*_.VALDATA___V795*/ meltfptr[794]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V792*/ meltfptr[791]); MELT_LOCATION ("warmelt-normal.melt:443:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V795*/ meltfptr[794]); MELT_LOCATION ("warmelt-normal.melt:443:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V795*/ meltfptr[794], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:443:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:443:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V797*/ meltfptr[796])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V797*/ meltfptr[796])))); ((meltobject_ptr_t) ( /*_.VALDATA___V797*/ meltfptr[796]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V792*/ meltfptr[791]); MELT_LOCATION ("warmelt-normal.melt:443:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V797*/ meltfptr[796]); MELT_LOCATION ("warmelt-normal.melt:443:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V797*/ meltfptr[796], "new static instance"); /*putupl#363 */ melt_assertmsg ("putupl #363 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V799*/ meltfptr[798])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #363 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V799*/ meltfptr[798])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V799*/ meltfptr[798]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#364 */ melt_assertmsg ("putupl #364 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V799*/ meltfptr[798])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #364 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V799*/ meltfptr[798])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V799*/ meltfptr[798]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V785*/ meltfptr[784]); /*putupl#365 */ melt_assertmsg ("putupl #365 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V799*/ meltfptr[798])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #365 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V799*/ meltfptr[798])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V799*/ meltfptr[798]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V795*/ meltfptr[794]); /*putupl#366 */ melt_assertmsg ("putupl #366 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V799*/ meltfptr[798])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #366 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V799*/ meltfptr[798])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V799*/ meltfptr[798]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V797*/ meltfptr[796]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V799*/ meltfptr[798]); MELT_LOCATION ("warmelt-normal.melt:443:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V792*/ meltfptr[791])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V792*/ meltfptr[791])))); ((meltobject_ptr_t) ( /*_.VALDATA___V792*/ meltfptr[791]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V799*/ meltfptr[798]); MELT_LOCATION ("warmelt-normal.melt:443:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V792*/ meltfptr[791]); MELT_LOCATION ("warmelt-normal.melt:443:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V792*/ meltfptr[791], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V800*/ meltfptr[799])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V800*/ meltfptr[799])))); ((meltobject_ptr_t) ( /*_.VALDATA___V800*/ meltfptr[799]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V801*/ meltfptr[800]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V800*/ meltfptr[799]); melt_dbgtrace_written_object ( /*_.VALDATA___V800*/ meltfptr[799], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V802*/ meltfptr[801]); melt_dbgtrace_written_object ( /*_.VALDATA___V802*/ meltfptr[801], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V804*/ meltfptr[803]); melt_dbgtrace_written_object ( /*_.VALDATA___V804*/ meltfptr[803], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:453:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V806*/ meltfptr[805])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V806*/ meltfptr[805])))); ((meltobject_ptr_t) ( /*_.VALDATA___V806*/ meltfptr[805]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V807*/ meltfptr[806]); MELT_LOCATION ("warmelt-normal.melt:453:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V806*/ meltfptr[805])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V806*/ meltfptr[805])))); ((meltobject_ptr_t) ( /*_.VALDATA___V806*/ meltfptr[805]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V792*/ meltfptr[791]); /*putupl#367 */ melt_assertmsg ("putupl #367 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V808*/ meltfptr[807])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #367 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V808*/ meltfptr[807])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V808*/ meltfptr[807]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#368 */ melt_assertmsg ("putupl #368 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V808*/ meltfptr[807])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #368 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V808*/ meltfptr[807])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V808*/ meltfptr[807]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#369 */ melt_assertmsg ("putupl #369 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V808*/ meltfptr[807])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #369 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V808*/ meltfptr[807])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V808*/ meltfptr[807]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V782*/ meltfptr[781]); /*putupl#370 */ melt_assertmsg ("putupl #370 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V808*/ meltfptr[807])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #370 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V808*/ meltfptr[807])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V808*/ meltfptr[807]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V792*/ meltfptr[791]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V808*/ meltfptr[807]); MELT_LOCATION ("warmelt-normal.melt:453:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V806*/ meltfptr[805])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V806*/ meltfptr[805])))); ((meltobject_ptr_t) ( /*_.VALDATA___V806*/ meltfptr[805]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V808*/ meltfptr[807]); MELT_LOCATION ("warmelt-normal.melt:453:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:453:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V809*/ meltfptr[808])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V809*/ meltfptr[808])))); ((meltobject_ptr_t) ( /*_.VALDATA___V809*/ meltfptr[808]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V806*/ meltfptr[805]); MELT_LOCATION ("warmelt-normal.melt:453:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V809*/ meltfptr[808]); MELT_LOCATION ("warmelt-normal.melt:453:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V809*/ meltfptr[808], "new static instance"); /*putupl#371 */ melt_assertmsg ("putupl #371 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V811*/ meltfptr[810])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #371 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V811*/ meltfptr[810])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V811*/ meltfptr[810]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#372 */ melt_assertmsg ("putupl #372 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V811*/ meltfptr[810])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #372 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V811*/ meltfptr[810])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V811*/ meltfptr[810]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V785*/ meltfptr[784]); /*putupl#373 */ melt_assertmsg ("putupl #373 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V811*/ meltfptr[810])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #373 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V811*/ meltfptr[810])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V811*/ meltfptr[810]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V795*/ meltfptr[794]); /*putupl#374 */ melt_assertmsg ("putupl #374 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V811*/ meltfptr[810])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #374 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V811*/ meltfptr[810])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V811*/ meltfptr[810]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V797*/ meltfptr[796]); /*putupl#375 */ melt_assertmsg ("putupl #375 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V811*/ meltfptr[810])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #375 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V811*/ meltfptr[810])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V811*/ meltfptr[810]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V809*/ meltfptr[808]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V811*/ meltfptr[810]); MELT_LOCATION ("warmelt-normal.melt:453:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V806*/ meltfptr[805])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V806*/ meltfptr[805])))); ((meltobject_ptr_t) ( /*_.VALDATA___V806*/ meltfptr[805]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V811*/ meltfptr[810]); MELT_LOCATION ("warmelt-normal.melt:453:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V806*/ meltfptr[805]); MELT_LOCATION ("warmelt-normal.melt:453:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V806*/ meltfptr[805], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V812*/ meltfptr[811])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V812*/ meltfptr[811])))); ((meltobject_ptr_t) ( /*_.VALDATA___V812*/ meltfptr[811]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V813*/ meltfptr[812]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V812*/ meltfptr[811]); melt_dbgtrace_written_object ( /*_.VALDATA___V812*/ meltfptr[811], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V814*/ meltfptr[813])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V814*/ meltfptr[813])))); ((meltobject_ptr_t) ( /*_.VALDATA___V814*/ meltfptr[813]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V815*/ meltfptr[814]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V814*/ meltfptr[813]); melt_dbgtrace_written_object ( /*_.VALDATA___V814*/ meltfptr[813], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:462:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815])))); ((meltobject_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V817*/ meltfptr[816]); MELT_LOCATION ("warmelt-normal.melt:462:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815])))); ((meltobject_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V782*/ meltfptr[781]); /*putupl#376 */ melt_assertmsg ("putupl #376 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V818*/ meltfptr[817])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #376 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V818*/ meltfptr[817])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V818*/ meltfptr[817]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#377 */ melt_assertmsg ("putupl #377 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V818*/ meltfptr[817])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #377 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V818*/ meltfptr[817])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V818*/ meltfptr[817]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#378 */ melt_assertmsg ("putupl #378 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V818*/ meltfptr[817])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #378 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V818*/ meltfptr[817])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V818*/ meltfptr[817]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V782*/ meltfptr[781]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V818*/ meltfptr[817]); MELT_LOCATION ("warmelt-normal.melt:462:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815])))); ((meltobject_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V818*/ meltfptr[817]); MELT_LOCATION ("warmelt-normal.melt:462:/ 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-normal.melt:462:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818])))); ((meltobject_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]); MELT_LOCATION ("warmelt-normal.melt:462:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V819*/ meltfptr[818]); MELT_LOCATION ("warmelt-normal.melt:462:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V819*/ meltfptr[818], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:462:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V821*/ meltfptr[820])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V821*/ meltfptr[820])))); ((meltobject_ptr_t) ( /*_.VALDATA___V821*/ meltfptr[820]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V822*/ meltfptr[821]); MELT_LOCATION ("warmelt-normal.melt:462:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V821*/ meltfptr[820])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V821*/ meltfptr[820])))); ((meltobject_ptr_t) ( /*_.VALDATA___V821*/ meltfptr[820]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]); MELT_LOCATION ("warmelt-normal.melt:462:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V821*/ meltfptr[820]); MELT_LOCATION ("warmelt-normal.melt:462:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V821*/ meltfptr[820], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:462:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V823*/ meltfptr[822])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V823*/ meltfptr[822])))); ((meltobject_ptr_t) ( /*_.VALDATA___V823*/ meltfptr[822]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V824*/ meltfptr[823]); MELT_LOCATION ("warmelt-normal.melt:462:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V823*/ meltfptr[822])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V823*/ meltfptr[822])))); ((meltobject_ptr_t) ( /*_.VALDATA___V823*/ meltfptr[822]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]); MELT_LOCATION ("warmelt-normal.melt:462:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V823*/ meltfptr[822]); MELT_LOCATION ("warmelt-normal.melt:462:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V823*/ meltfptr[822], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:462:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:462:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V825*/ meltfptr[824])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V825*/ meltfptr[824])))); ((meltobject_ptr_t) ( /*_.VALDATA___V825*/ meltfptr[824]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]); MELT_LOCATION ("warmelt-normal.melt:462:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V825*/ meltfptr[824]); MELT_LOCATION ("warmelt-normal.melt:462:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V825*/ meltfptr[824], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:462:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:462:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V827*/ meltfptr[826])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V827*/ meltfptr[826])))); ((meltobject_ptr_t) ( /*_.VALDATA___V827*/ meltfptr[826]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]); MELT_LOCATION ("warmelt-normal.melt:462:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V827*/ meltfptr[826]); MELT_LOCATION ("warmelt-normal.melt:462:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V827*/ meltfptr[826], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:462:/ 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-normal.melt:462:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V829*/ meltfptr[828])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V829*/ meltfptr[828])))); ((meltobject_ptr_t) ( /*_.VALDATA___V829*/ meltfptr[828]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]); MELT_LOCATION ("warmelt-normal.melt:462:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V829*/ meltfptr[828]); MELT_LOCATION ("warmelt-normal.melt:462:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V829*/ meltfptr[828], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:462:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V831*/ meltfptr[830])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V831*/ meltfptr[830])))); ((meltobject_ptr_t) ( /*_.VALDATA___V831*/ meltfptr[830]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V832*/ meltfptr[831]); MELT_LOCATION ("warmelt-normal.melt:462:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V831*/ meltfptr[830])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V831*/ meltfptr[830])))); ((meltobject_ptr_t) ( /*_.VALDATA___V831*/ meltfptr[830]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_11 */ void meltmod__warmelt_normal__initialmeltchunk_12 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-normal.melt:462:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V831*/ meltfptr[830]); MELT_LOCATION ("warmelt-normal.melt:462:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V831*/ meltfptr[830], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:462:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:462:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V833*/ meltfptr[832])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V833*/ meltfptr[832])))); ((meltobject_ptr_t) ( /*_.VALDATA___V833*/ meltfptr[832]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]); MELT_LOCATION ("warmelt-normal.melt:462:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V833*/ meltfptr[832]); MELT_LOCATION ("warmelt-normal.melt:462:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V833*/ meltfptr[832], "new static instance"); /*putupl#379 */ melt_assertmsg ("putupl #379 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V835*/ meltfptr[834])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #379 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V835*/ meltfptr[834])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V835*/ meltfptr[834]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#380 */ melt_assertmsg ("putupl #380 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V835*/ meltfptr[834])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #380 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V835*/ meltfptr[834])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V835*/ meltfptr[834]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V785*/ meltfptr[784]); /*putupl#381 */ melt_assertmsg ("putupl #381 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V835*/ meltfptr[834])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #381 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V835*/ meltfptr[834])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V835*/ meltfptr[834]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818]); /*putupl#382 */ melt_assertmsg ("putupl #382 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V835*/ meltfptr[834])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #382 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V835*/ meltfptr[834])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V835*/ meltfptr[834]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V821*/ meltfptr[820]); /*putupl#383 */ melt_assertmsg ("putupl #383 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V835*/ meltfptr[834])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #383 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V835*/ meltfptr[834])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V835*/ meltfptr[834]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V823*/ meltfptr[822]); /*putupl#384 */ melt_assertmsg ("putupl #384 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V835*/ meltfptr[834])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #384 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V835*/ meltfptr[834])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V835*/ meltfptr[834]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V825*/ meltfptr[824]); /*putupl#385 */ melt_assertmsg ("putupl #385 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V835*/ meltfptr[834])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #385 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V835*/ meltfptr[834])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V835*/ meltfptr[834]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V827*/ meltfptr[826]); /*putupl#386 */ melt_assertmsg ("putupl #386 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V835*/ meltfptr[834])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #386 checkoff", (7 >= 0 && 7 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V835*/ meltfptr[834])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V835*/ meltfptr[834]))->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V829*/ meltfptr[828]); /*putupl#387 */ melt_assertmsg ("putupl #387 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V835*/ meltfptr[834])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #387 checkoff", (8 >= 0 && 8 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V835*/ meltfptr[834])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V835*/ meltfptr[834]))->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V831*/ meltfptr[830]); /*putupl#388 */ melt_assertmsg ("putupl #388 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V835*/ meltfptr[834])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #388 checkoff", (9 >= 0 && 9 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V835*/ meltfptr[834])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V835*/ meltfptr[834]))->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V833*/ meltfptr[832]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V835*/ meltfptr[834]); MELT_LOCATION ("warmelt-normal.melt:462:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815])))); ((meltobject_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V835*/ meltfptr[834]); MELT_LOCATION ("warmelt-normal.melt:462:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V816*/ meltfptr[815]); MELT_LOCATION ("warmelt-normal.melt:462:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V816*/ meltfptr[815], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V836*/ meltfptr[835])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V836*/ meltfptr[835])))); ((meltobject_ptr_t) ( /*_.VALDATA___V836*/ meltfptr[835]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V837*/ meltfptr[836]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V836*/ meltfptr[835]); melt_dbgtrace_written_object ( /*_.VALDATA___V836*/ meltfptr[835], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V838*/ meltfptr[837])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V838*/ meltfptr[837])))); ((meltobject_ptr_t) ( /*_.VALDATA___V838*/ meltfptr[837]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V839*/ meltfptr[838]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V838*/ meltfptr[837]); melt_dbgtrace_written_object ( /*_.VALDATA___V838*/ meltfptr[837], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V840*/ meltfptr[839])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V840*/ meltfptr[839])))); ((meltobject_ptr_t) ( /*_.VALDATA___V840*/ meltfptr[839]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V841*/ meltfptr[840]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V840*/ meltfptr[839]); melt_dbgtrace_written_object ( /*_.VALDATA___V840*/ meltfptr[839], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V842*/ meltfptr[841])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V842*/ meltfptr[841])))); ((meltobject_ptr_t) ( /*_.VALDATA___V842*/ meltfptr[841]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V843*/ meltfptr[842]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V842*/ meltfptr[841]); melt_dbgtrace_written_object ( /*_.VALDATA___V842*/ meltfptr[841], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V844*/ meltfptr[843]); melt_dbgtrace_written_object ( /*_.VALDATA___V844*/ meltfptr[843], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V846*/ meltfptr[845]); melt_dbgtrace_written_object ( /*_.VALDATA___V846*/ meltfptr[845], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V848*/ meltfptr[847]); melt_dbgtrace_written_object ( /*_.VALDATA___V848*/ meltfptr[847], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V850*/ meltfptr[849])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V850*/ meltfptr[849])))); ((meltobject_ptr_t) ( /*_.VALDATA___V850*/ meltfptr[849]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V851*/ meltfptr[850]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V850*/ meltfptr[849]); melt_dbgtrace_written_object ( /*_.VALDATA___V850*/ meltfptr[849], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V852*/ meltfptr[851])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V852*/ meltfptr[851])))); ((meltobject_ptr_t) ( /*_.VALDATA___V852*/ meltfptr[851]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V853*/ meltfptr[852]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V852*/ meltfptr[851]); melt_dbgtrace_written_object ( /*_.VALDATA___V852*/ meltfptr[851], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:483:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V854*/ meltfptr[853])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V854*/ meltfptr[853])))); ((meltobject_ptr_t) ( /*_.VALDATA___V854*/ meltfptr[853]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V855*/ meltfptr[854]); MELT_LOCATION ("warmelt-normal.melt:483:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V854*/ meltfptr[853])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V854*/ meltfptr[853])))); ((meltobject_ptr_t) ( /*_.VALDATA___V854*/ meltfptr[853]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]); /*putupl#389 */ melt_assertmsg ("putupl #389 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V856*/ meltfptr[855])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #389 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V856*/ meltfptr[855])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V856*/ meltfptr[855]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#390 */ melt_assertmsg ("putupl #390 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V856*/ meltfptr[855])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #390 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V856*/ meltfptr[855])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V856*/ meltfptr[855]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#391 */ melt_assertmsg ("putupl #391 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V856*/ meltfptr[855])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #391 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V856*/ meltfptr[855])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V856*/ meltfptr[855]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V782*/ meltfptr[781]); /*putupl#392 */ melt_assertmsg ("putupl #392 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V856*/ meltfptr[855])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #392 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V856*/ meltfptr[855])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V856*/ meltfptr[855]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V856*/ meltfptr[855]); MELT_LOCATION ("warmelt-normal.melt:483:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V854*/ meltfptr[853])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V854*/ meltfptr[853])))); ((meltobject_ptr_t) ( /*_.VALDATA___V854*/ meltfptr[853]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V856*/ meltfptr[855]); /*putupl#393 */ melt_assertmsg ("putupl #393 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V857*/ meltfptr[856])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #393 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V857*/ meltfptr[856])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V857*/ meltfptr[856]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#394 */ melt_assertmsg ("putupl #394 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V857*/ meltfptr[856])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #394 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V857*/ meltfptr[856])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V857*/ meltfptr[856]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V785*/ meltfptr[784]); /*putupl#395 */ melt_assertmsg ("putupl #395 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V857*/ meltfptr[856])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #395 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V857*/ meltfptr[856])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V857*/ meltfptr[856]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818]); /*putupl#396 */ melt_assertmsg ("putupl #396 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V857*/ meltfptr[856])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #396 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V857*/ meltfptr[856])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V857*/ meltfptr[856]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V821*/ meltfptr[820]); /*putupl#397 */ melt_assertmsg ("putupl #397 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V857*/ meltfptr[856])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #397 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V857*/ meltfptr[856])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V857*/ meltfptr[856]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V823*/ meltfptr[822]); /*putupl#398 */ melt_assertmsg ("putupl #398 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V857*/ meltfptr[856])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #398 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V857*/ meltfptr[856])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V857*/ meltfptr[856]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V825*/ meltfptr[824]); /*putupl#399 */ melt_assertmsg ("putupl #399 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V857*/ meltfptr[856])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #399 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V857*/ meltfptr[856])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V857*/ meltfptr[856]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V827*/ meltfptr[826]); /*putupl#400 */ melt_assertmsg ("putupl #400 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V857*/ meltfptr[856])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #400 checkoff", (7 >= 0 && 7 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V857*/ meltfptr[856])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V857*/ meltfptr[856]))->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V829*/ meltfptr[828]); /*putupl#401 */ melt_assertmsg ("putupl #401 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V857*/ meltfptr[856])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #401 checkoff", (8 >= 0 && 8 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V857*/ meltfptr[856])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V857*/ meltfptr[856]))->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V831*/ meltfptr[830]); /*putupl#402 */ melt_assertmsg ("putupl #402 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V857*/ meltfptr[856])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #402 checkoff", (9 >= 0 && 9 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V857*/ meltfptr[856])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V857*/ meltfptr[856]))->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V833*/ meltfptr[832]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V857*/ meltfptr[856]); MELT_LOCATION ("warmelt-normal.melt:483:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V854*/ meltfptr[853])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V854*/ meltfptr[853])))); ((meltobject_ptr_t) ( /*_.VALDATA___V854*/ meltfptr[853]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V857*/ meltfptr[856]); MELT_LOCATION ("warmelt-normal.melt:483:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V854*/ meltfptr[853]); MELT_LOCATION ("warmelt-normal.melt:483:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V854*/ meltfptr[853], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V858*/ meltfptr[857])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V858*/ meltfptr[857])))); ((meltobject_ptr_t) ( /*_.VALDATA___V858*/ meltfptr[857]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V859*/ meltfptr[858]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V858*/ meltfptr[857]); melt_dbgtrace_written_object ( /*_.VALDATA___V858*/ meltfptr[857], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:489:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V860*/ meltfptr[859])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V860*/ meltfptr[859])))); ((meltobject_ptr_t) ( /*_.VALDATA___V860*/ meltfptr[859]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V861*/ meltfptr[860]); MELT_LOCATION ("warmelt-normal.melt:489:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V860*/ meltfptr[859])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V860*/ meltfptr[859])))); ((meltobject_ptr_t) ( /*_.VALDATA___V860*/ meltfptr[859]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]); /*putupl#403 */ melt_assertmsg ("putupl #403 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V862*/ meltfptr[861])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #403 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V862*/ meltfptr[861])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V862*/ meltfptr[861]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#404 */ melt_assertmsg ("putupl #404 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V862*/ meltfptr[861])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #404 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V862*/ meltfptr[861])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V862*/ meltfptr[861]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#405 */ melt_assertmsg ("putupl #405 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V862*/ meltfptr[861])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #405 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V862*/ meltfptr[861])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V862*/ meltfptr[861]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V782*/ meltfptr[781]); /*putupl#406 */ melt_assertmsg ("putupl #406 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V862*/ meltfptr[861])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #406 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V862*/ meltfptr[861])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V862*/ meltfptr[861]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V862*/ meltfptr[861]); MELT_LOCATION ("warmelt-normal.melt:489:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V860*/ meltfptr[859])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V860*/ meltfptr[859])))); ((meltobject_ptr_t) ( /*_.VALDATA___V860*/ meltfptr[859]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V862*/ meltfptr[861]); /*putupl#407 */ melt_assertmsg ("putupl #407 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V863*/ meltfptr[862])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #407 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V863*/ meltfptr[862])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V863*/ meltfptr[862]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#408 */ melt_assertmsg ("putupl #408 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V863*/ meltfptr[862])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #408 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V863*/ meltfptr[862])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V863*/ meltfptr[862]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V785*/ meltfptr[784]); /*putupl#409 */ melt_assertmsg ("putupl #409 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V863*/ meltfptr[862])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #409 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V863*/ meltfptr[862])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V863*/ meltfptr[862]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818]); /*putupl#410 */ melt_assertmsg ("putupl #410 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V863*/ meltfptr[862])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #410 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V863*/ meltfptr[862])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V863*/ meltfptr[862]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V821*/ meltfptr[820]); /*putupl#411 */ melt_assertmsg ("putupl #411 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V863*/ meltfptr[862])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #411 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V863*/ meltfptr[862])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V863*/ meltfptr[862]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V823*/ meltfptr[822]); /*putupl#412 */ melt_assertmsg ("putupl #412 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V863*/ meltfptr[862])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #412 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V863*/ meltfptr[862])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V863*/ meltfptr[862]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V825*/ meltfptr[824]); /*putupl#413 */ melt_assertmsg ("putupl #413 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V863*/ meltfptr[862])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #413 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V863*/ meltfptr[862])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V863*/ meltfptr[862]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V827*/ meltfptr[826]); /*putupl#414 */ melt_assertmsg ("putupl #414 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V863*/ meltfptr[862])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #414 checkoff", (7 >= 0 && 7 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V863*/ meltfptr[862])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V863*/ meltfptr[862]))->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V829*/ meltfptr[828]); /*putupl#415 */ melt_assertmsg ("putupl #415 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V863*/ meltfptr[862])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #415 checkoff", (8 >= 0 && 8 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V863*/ meltfptr[862])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V863*/ meltfptr[862]))->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V831*/ meltfptr[830]); /*putupl#416 */ melt_assertmsg ("putupl #416 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V863*/ meltfptr[862])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #416 checkoff", (9 >= 0 && 9 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V863*/ meltfptr[862])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V863*/ meltfptr[862]))->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V833*/ meltfptr[832]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V863*/ meltfptr[862]); MELT_LOCATION ("warmelt-normal.melt:489:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V860*/ meltfptr[859])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V860*/ meltfptr[859])))); ((meltobject_ptr_t) ( /*_.VALDATA___V860*/ meltfptr[859]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V863*/ meltfptr[862]); MELT_LOCATION ("warmelt-normal.melt:489:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V860*/ meltfptr[859]); MELT_LOCATION ("warmelt-normal.melt:489:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V860*/ meltfptr[859], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V864*/ meltfptr[863])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V864*/ meltfptr[863])))); ((meltobject_ptr_t) ( /*_.VALDATA___V864*/ meltfptr[863]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V865*/ meltfptr[864]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V864*/ meltfptr[863]); melt_dbgtrace_written_object ( /*_.VALDATA___V864*/ meltfptr[863], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:497:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V866*/ meltfptr[865])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V866*/ meltfptr[865])))); ((meltobject_ptr_t) ( /*_.VALDATA___V866*/ meltfptr[865]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V867*/ meltfptr[866]); MELT_LOCATION ("warmelt-normal.melt:497:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V866*/ meltfptr[865])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V866*/ meltfptr[865])))); ((meltobject_ptr_t) ( /*_.VALDATA___V866*/ meltfptr[865]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V186*/ meltfptr[185]); /*putupl#417 */ melt_assertmsg ("putupl #417 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V868*/ meltfptr[867])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #417 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V868*/ meltfptr[867])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V868*/ meltfptr[867]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#418 */ melt_assertmsg ("putupl #418 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V868*/ meltfptr[867])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #418 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V868*/ meltfptr[867])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V868*/ meltfptr[867]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#419 */ melt_assertmsg ("putupl #419 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V868*/ meltfptr[867])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #419 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V868*/ meltfptr[867])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V868*/ meltfptr[867]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V186*/ meltfptr[185]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V868*/ meltfptr[867]); MELT_LOCATION ("warmelt-normal.melt:497:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V866*/ meltfptr[865])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V866*/ meltfptr[865])))); ((meltobject_ptr_t) ( /*_.VALDATA___V866*/ meltfptr[865]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V868*/ meltfptr[867]); MELT_LOCATION ("warmelt-normal.melt:497:/ 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-normal.melt:497:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V869*/ meltfptr[868])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V869*/ meltfptr[868])))); ((meltobject_ptr_t) ( /*_.VALDATA___V869*/ meltfptr[868]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V866*/ meltfptr[865]); MELT_LOCATION ("warmelt-normal.melt:497:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V869*/ meltfptr[868]); MELT_LOCATION ("warmelt-normal.melt:497:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V869*/ meltfptr[868], "new static instance"); /*putupl#420 */ melt_assertmsg ("putupl #420 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V871*/ meltfptr[870])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #420 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) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#421 */ melt_assertmsg ("putupl #421 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V871*/ meltfptr[870])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #421 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) ( /*_.VALDATA___V869*/ meltfptr[868]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V871*/ meltfptr[870]); MELT_LOCATION ("warmelt-normal.melt:497:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V866*/ meltfptr[865])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V866*/ meltfptr[865])))); ((meltobject_ptr_t) ( /*_.VALDATA___V866*/ meltfptr[865]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V871*/ meltfptr[870]); MELT_LOCATION ("warmelt-normal.melt:497:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V866*/ meltfptr[865]); MELT_LOCATION ("warmelt-normal.melt:497:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V866*/ meltfptr[865], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V872*/ meltfptr[871]); melt_dbgtrace_written_object ( /*_.VALDATA___V872*/ meltfptr[871], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V874*/ meltfptr[873])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V874*/ meltfptr[873])))); ((meltobject_ptr_t) ( /*_.VALDATA___V874*/ meltfptr[873]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V875*/ meltfptr[874]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V874*/ meltfptr[873]); melt_dbgtrace_written_object ( /*_.VALDATA___V874*/ meltfptr[873], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:506:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V876*/ meltfptr[875])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V876*/ meltfptr[875])))); ((meltobject_ptr_t) ( /*_.VALDATA___V876*/ meltfptr[875]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V877*/ meltfptr[876]); MELT_LOCATION ("warmelt-normal.melt:506:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V876*/ meltfptr[875])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V876*/ meltfptr[875])))); ((meltobject_ptr_t) ( /*_.VALDATA___V876*/ meltfptr[875]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V186*/ meltfptr[185]); /*putupl#422 */ melt_assertmsg ("putupl #422 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V878*/ meltfptr[877])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #422 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V878*/ meltfptr[877])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V878*/ meltfptr[877]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#423 */ melt_assertmsg ("putupl #423 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V878*/ meltfptr[877])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #423 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V878*/ meltfptr[877])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V878*/ meltfptr[877]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#424 */ melt_assertmsg ("putupl #424 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V878*/ meltfptr[877])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #424 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V878*/ meltfptr[877])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V878*/ meltfptr[877]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V186*/ meltfptr[185]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V878*/ meltfptr[877]); MELT_LOCATION ("warmelt-normal.melt:506:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V876*/ meltfptr[875])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V876*/ meltfptr[875])))); ((meltobject_ptr_t) ( /*_.VALDATA___V876*/ meltfptr[875]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V878*/ meltfptr[877]); /*putupl#425 */ melt_assertmsg ("putupl #425 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V879*/ meltfptr[878])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #425 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V879*/ meltfptr[878])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V879*/ meltfptr[878]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_12 */ void meltmod__warmelt_normal__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___V879*/ meltfptr[878]); MELT_LOCATION ("warmelt-normal.melt:506:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V876*/ meltfptr[875])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V876*/ meltfptr[875])))); ((meltobject_ptr_t) ( /*_.VALDATA___V876*/ meltfptr[875]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V879*/ meltfptr[878]); MELT_LOCATION ("warmelt-normal.melt:506:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V876*/ meltfptr[875]); MELT_LOCATION ("warmelt-normal.melt:506:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V876*/ meltfptr[875], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V880*/ meltfptr[879])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V880*/ meltfptr[879])))); ((meltobject_ptr_t) ( /*_.VALDATA___V880*/ meltfptr[879]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V881*/ meltfptr[880]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V880*/ meltfptr[879]); melt_dbgtrace_written_object ( /*_.VALDATA___V880*/ meltfptr[879], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:517:/ 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-normal.melt:517:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V882*/ meltfptr[881])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V882*/ meltfptr[881])))); ((meltobject_ptr_t) ( /*_.VALDATA___V882*/ meltfptr[881]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#426 */ melt_assertmsg ("putupl #426 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V884*/ meltfptr[883])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #426 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V884*/ meltfptr[883])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V884*/ meltfptr[883]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#427 */ melt_assertmsg ("putupl #427 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V884*/ meltfptr[883])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #427 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V884*/ meltfptr[883])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V884*/ meltfptr[883]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V884*/ meltfptr[883]); MELT_LOCATION ("warmelt-normal.melt:517:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V882*/ meltfptr[881])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V882*/ meltfptr[881])))); ((meltobject_ptr_t) ( /*_.VALDATA___V882*/ meltfptr[881]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V884*/ meltfptr[883]); /*putupl#428 */ melt_assertmsg ("putupl #428 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V885*/ meltfptr[884])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #428 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V885*/ meltfptr[884])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V885*/ meltfptr[884]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V885*/ meltfptr[884]); MELT_LOCATION ("warmelt-normal.melt:517:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V882*/ meltfptr[881])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V882*/ meltfptr[881])))); ((meltobject_ptr_t) ( /*_.VALDATA___V882*/ meltfptr[881]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V885*/ meltfptr[884]); MELT_LOCATION ("warmelt-normal.melt:517:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V882*/ meltfptr[881]); MELT_LOCATION ("warmelt-normal.melt:517:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V882*/ meltfptr[881], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V886*/ meltfptr[885])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V886*/ meltfptr[885])))); ((meltobject_ptr_t) ( /*_.VALDATA___V886*/ meltfptr[885]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V887*/ meltfptr[886]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V886*/ meltfptr[885]); melt_dbgtrace_written_object ( /*_.VALDATA___V886*/ meltfptr[885], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:524:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V888*/ meltfptr[887])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V888*/ meltfptr[887])))); ((meltobject_ptr_t) ( /*_.VALDATA___V888*/ meltfptr[887]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V889*/ meltfptr[888]); MELT_LOCATION ("warmelt-normal.melt:524:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V888*/ meltfptr[887])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V888*/ meltfptr[887])))); ((meltobject_ptr_t) ( /*_.VALDATA___V888*/ meltfptr[887]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V882*/ meltfptr[881]); /*putupl#429 */ melt_assertmsg ("putupl #429 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V890*/ meltfptr[889])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #429 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V890*/ meltfptr[889])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V890*/ meltfptr[889]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#430 */ melt_assertmsg ("putupl #430 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V890*/ meltfptr[889])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #430 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V890*/ meltfptr[889])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V890*/ meltfptr[889]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#431 */ melt_assertmsg ("putupl #431 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V890*/ meltfptr[889])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #431 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V890*/ meltfptr[889])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V890*/ meltfptr[889]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V882*/ meltfptr[881]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V890*/ meltfptr[889]); MELT_LOCATION ("warmelt-normal.melt:524:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V888*/ meltfptr[887])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V888*/ meltfptr[887])))); ((meltobject_ptr_t) ( /*_.VALDATA___V888*/ meltfptr[887]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V890*/ meltfptr[889]); MELT_LOCATION ("warmelt-normal.melt:524:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:524:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V891*/ meltfptr[890])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V891*/ meltfptr[890])))); ((meltobject_ptr_t) ( /*_.VALDATA___V891*/ meltfptr[890]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V888*/ meltfptr[887]); MELT_LOCATION ("warmelt-normal.melt:524:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V891*/ meltfptr[890]); MELT_LOCATION ("warmelt-normal.melt:524:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V891*/ meltfptr[890], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:524:/ 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-normal.melt:524:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892])))); ((meltobject_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V888*/ meltfptr[887]); MELT_LOCATION ("warmelt-normal.melt:524:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V893*/ meltfptr[892]); MELT_LOCATION ("warmelt-normal.melt:524:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V893*/ meltfptr[892], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:524:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V895*/ meltfptr[894])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V895*/ meltfptr[894])))); ((meltobject_ptr_t) ( /*_.VALDATA___V895*/ meltfptr[894]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V896*/ meltfptr[895]); MELT_LOCATION ("warmelt-normal.melt:524:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V895*/ meltfptr[894])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V895*/ meltfptr[894])))); ((meltobject_ptr_t) ( /*_.VALDATA___V895*/ meltfptr[894]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V888*/ meltfptr[887]); MELT_LOCATION ("warmelt-normal.melt:524:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V895*/ meltfptr[894]); MELT_LOCATION ("warmelt-normal.melt:524:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V895*/ meltfptr[894], "new static instance"); /*putupl#432 */ melt_assertmsg ("putupl #432 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V897*/ meltfptr[896])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #432 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V897*/ meltfptr[896])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V897*/ meltfptr[896]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#433 */ melt_assertmsg ("putupl #433 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V897*/ meltfptr[896])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #433 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V897*/ meltfptr[896])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V897*/ meltfptr[896]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V891*/ meltfptr[890]); /*putupl#434 */ melt_assertmsg ("putupl #434 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V897*/ meltfptr[896])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #434 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V897*/ meltfptr[896])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V897*/ meltfptr[896]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]); /*putupl#435 */ melt_assertmsg ("putupl #435 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V897*/ meltfptr[896])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #435 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V897*/ meltfptr[896])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V897*/ meltfptr[896]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V895*/ meltfptr[894]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V897*/ meltfptr[896]); MELT_LOCATION ("warmelt-normal.melt:524:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V888*/ meltfptr[887])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V888*/ meltfptr[887])))); ((meltobject_ptr_t) ( /*_.VALDATA___V888*/ meltfptr[887]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V897*/ meltfptr[896]); MELT_LOCATION ("warmelt-normal.melt:524:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V888*/ meltfptr[887]); MELT_LOCATION ("warmelt-normal.melt:524:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V888*/ meltfptr[887], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V898*/ meltfptr[897]); melt_dbgtrace_written_object ( /*_.VALDATA___V898*/ meltfptr[897], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V900*/ meltfptr[899]); melt_dbgtrace_written_object ( /*_.VALDATA___V900*/ meltfptr[899], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V902*/ meltfptr[901])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V902*/ meltfptr[901])))); ((meltobject_ptr_t) ( /*_.VALDATA___V902*/ meltfptr[901]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V903*/ meltfptr[902]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V902*/ meltfptr[901]); melt_dbgtrace_written_object ( /*_.VALDATA___V902*/ meltfptr[901], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V904*/ meltfptr[903])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V904*/ meltfptr[903])))); ((meltobject_ptr_t) ( /*_.VALDATA___V904*/ meltfptr[903]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V905*/ meltfptr[904]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V904*/ meltfptr[903]); melt_dbgtrace_written_object ( /*_.VALDATA___V904*/ meltfptr[903], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:538:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V906*/ meltfptr[905])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V906*/ meltfptr[905])))); ((meltobject_ptr_t) ( /*_.VALDATA___V906*/ meltfptr[905]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V907*/ meltfptr[906]); MELT_LOCATION ("warmelt-normal.melt:538:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V906*/ meltfptr[905])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V906*/ meltfptr[905])))); ((meltobject_ptr_t) ( /*_.VALDATA___V906*/ meltfptr[905]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V888*/ meltfptr[887]); /*putupl#436 */ melt_assertmsg ("putupl #436 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V908*/ meltfptr[907])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #436 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V908*/ meltfptr[907])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V908*/ meltfptr[907]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#437 */ melt_assertmsg ("putupl #437 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V908*/ meltfptr[907])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #437 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V908*/ meltfptr[907])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V908*/ meltfptr[907]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#438 */ melt_assertmsg ("putupl #438 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V908*/ meltfptr[907])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #438 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V908*/ meltfptr[907])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V908*/ meltfptr[907]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V882*/ meltfptr[881]); /*putupl#439 */ melt_assertmsg ("putupl #439 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V908*/ meltfptr[907])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #439 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V908*/ meltfptr[907])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V908*/ meltfptr[907]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V888*/ meltfptr[887]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V908*/ meltfptr[907]); MELT_LOCATION ("warmelt-normal.melt:538:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V906*/ meltfptr[905])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V906*/ meltfptr[905])))); ((meltobject_ptr_t) ( /*_.VALDATA___V906*/ meltfptr[905]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V908*/ meltfptr[907]); MELT_LOCATION ("warmelt-normal.melt:538:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:538:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V909*/ meltfptr[908])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V909*/ meltfptr[908])))); ((meltobject_ptr_t) ( /*_.VALDATA___V909*/ meltfptr[908]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V906*/ meltfptr[905]); MELT_LOCATION ("warmelt-normal.melt:538:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V909*/ meltfptr[908]); MELT_LOCATION ("warmelt-normal.melt:538:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V909*/ meltfptr[908], "new static instance"); /*putupl#440 */ melt_assertmsg ("putupl #440 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V911*/ meltfptr[910])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #440 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V911*/ meltfptr[910])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V911*/ meltfptr[910]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#441 */ melt_assertmsg ("putupl #441 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V911*/ meltfptr[910])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #441 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V911*/ meltfptr[910])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V911*/ meltfptr[910]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V891*/ meltfptr[890]); /*putupl#442 */ melt_assertmsg ("putupl #442 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V911*/ meltfptr[910])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #442 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V911*/ meltfptr[910])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V911*/ meltfptr[910]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]); /*putupl#443 */ melt_assertmsg ("putupl #443 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V911*/ meltfptr[910])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #443 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V911*/ meltfptr[910])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V911*/ meltfptr[910]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V895*/ meltfptr[894]); /*putupl#444 */ melt_assertmsg ("putupl #444 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V911*/ meltfptr[910])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #444 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V911*/ meltfptr[910])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V911*/ meltfptr[910]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V909*/ meltfptr[908]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V911*/ meltfptr[910]); MELT_LOCATION ("warmelt-normal.melt:538:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V906*/ meltfptr[905])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V906*/ meltfptr[905])))); ((meltobject_ptr_t) ( /*_.VALDATA___V906*/ meltfptr[905]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V911*/ meltfptr[910]); MELT_LOCATION ("warmelt-normal.melt:538:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V906*/ meltfptr[905]); MELT_LOCATION ("warmelt-normal.melt:538:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V906*/ meltfptr[905], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V912*/ meltfptr[911])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V912*/ meltfptr[911])))); ((meltobject_ptr_t) ( /*_.VALDATA___V912*/ meltfptr[911]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V913*/ meltfptr[912]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V912*/ meltfptr[911]); melt_dbgtrace_written_object ( /*_.VALDATA___V912*/ meltfptr[911], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V914*/ meltfptr[913]); melt_dbgtrace_written_object ( /*_.VALDATA___V914*/ meltfptr[913], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:547:/ 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-normal.melt:547:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915])))); ((meltobject_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V906*/ meltfptr[905]); /*putupl#445 */ melt_assertmsg ("putupl #445 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V918*/ meltfptr[917])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #445 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) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#446 */ melt_assertmsg ("putupl #446 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V918*/ meltfptr[917])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #446 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) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#447 */ melt_assertmsg ("putupl #447 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V918*/ meltfptr[917])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #447 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___V882*/ meltfptr[881]); /*putupl#448 */ melt_assertmsg ("putupl #448 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V918*/ meltfptr[917])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #448 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___V888*/ meltfptr[887]); /*putupl#449 */ melt_assertmsg ("putupl #449 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V918*/ meltfptr[917])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #449 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___V906*/ meltfptr[905]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V918*/ meltfptr[917]); MELT_LOCATION ("warmelt-normal.melt:547:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915])))); ((meltobject_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V918*/ meltfptr[917]); MELT_LOCATION ("warmelt-normal.melt:547:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:547:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V919*/ meltfptr[918])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V919*/ meltfptr[918])))); ((meltobject_ptr_t) ( /*_.VALDATA___V919*/ meltfptr[918]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915]); MELT_LOCATION ("warmelt-normal.melt:547:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V919*/ meltfptr[918]); MELT_LOCATION ("warmelt-normal.melt:547:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V919*/ meltfptr[918], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:547:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:547:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V921*/ meltfptr[920])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V921*/ meltfptr[920])))); ((meltobject_ptr_t) ( /*_.VALDATA___V921*/ meltfptr[920]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915]); MELT_LOCATION ("warmelt-normal.melt:547:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V921*/ meltfptr[920]); MELT_LOCATION ("warmelt-normal.melt:547:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V921*/ meltfptr[920], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:547:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:547:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V923*/ meltfptr[922])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V923*/ meltfptr[922])))); ((meltobject_ptr_t) ( /*_.VALDATA___V923*/ meltfptr[922]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915]); MELT_LOCATION ("warmelt-normal.melt:547:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V923*/ meltfptr[922]); MELT_LOCATION ("warmelt-normal.melt:547:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V923*/ meltfptr[922], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:547:/ 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-normal.melt:547:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V925*/ meltfptr[924])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V925*/ meltfptr[924])))); ((meltobject_ptr_t) ( /*_.VALDATA___V925*/ meltfptr[924]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915]); MELT_LOCATION ("warmelt-normal.melt:547:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V925*/ meltfptr[924]); MELT_LOCATION ("warmelt-normal.melt:547:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V925*/ meltfptr[924], "new static instance"); /*putupl#450 */ melt_assertmsg ("putupl #450 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V927*/ meltfptr[926])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #450 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) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#451 */ melt_assertmsg ("putupl #451 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V927*/ meltfptr[926])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #451 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) ( /*_.VALDATA___V891*/ meltfptr[890]); /*putupl#452 */ melt_assertmsg ("putupl #452 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V927*/ meltfptr[926])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #452 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) ( /*_.VALDATA___V893*/ meltfptr[892]); /*putupl#453 */ melt_assertmsg ("putupl #453 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V927*/ meltfptr[926])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #453 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___V895*/ meltfptr[894]); /*putupl#454 */ melt_assertmsg ("putupl #454 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V927*/ meltfptr[926])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #454 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___V909*/ meltfptr[908]); /*putupl#455 */ melt_assertmsg ("putupl #455 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V927*/ meltfptr[926])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #455 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___V919*/ meltfptr[918]); /*putupl#456 */ melt_assertmsg ("putupl #456 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V927*/ meltfptr[926])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #456 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___V921*/ meltfptr[920]); /*putupl#457 */ melt_assertmsg ("putupl #457 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V927*/ meltfptr[926])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #457 checkoff", (7 >= 0 && 7 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V927*/ meltfptr[926])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V927*/ meltfptr[926]))->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V923*/ meltfptr[922]); /*putupl#458 */ melt_assertmsg ("putupl #458 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V927*/ meltfptr[926])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #458 checkoff", (8 >= 0 && 8 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V927*/ meltfptr[926])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V927*/ meltfptr[926]))->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V925*/ meltfptr[924]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V927*/ meltfptr[926]); MELT_LOCATION ("warmelt-normal.melt:547:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915])))); ((meltobject_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V927*/ meltfptr[926]); MELT_LOCATION ("warmelt-normal.melt:547:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V916*/ meltfptr[915]); MELT_LOCATION ("warmelt-normal.melt:547:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V916*/ meltfptr[915], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V928*/ meltfptr[927]); melt_dbgtrace_written_object ( /*_.VALDATA___V928*/ meltfptr[927], "new static instance"); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_13 */ void meltmod__warmelt_normal__initialmeltchunk_14 (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___V930*/ meltfptr[929])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V930*/ meltfptr[929])))); ((meltobject_ptr_t) ( /*_.VALDATA___V930*/ meltfptr[929]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V931*/ meltfptr[930]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V930*/ meltfptr[929]); melt_dbgtrace_written_object ( /*_.VALDATA___V930*/ meltfptr[929], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V932*/ meltfptr[931])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V932*/ meltfptr[931])))); ((meltobject_ptr_t) ( /*_.VALDATA___V932*/ meltfptr[931]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V933*/ meltfptr[932]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V932*/ meltfptr[931]); melt_dbgtrace_written_object ( /*_.VALDATA___V932*/ meltfptr[931], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V934*/ meltfptr[933])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V934*/ meltfptr[933])))); ((meltobject_ptr_t) ( /*_.VALDATA___V934*/ meltfptr[933]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V935*/ meltfptr[934]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V934*/ meltfptr[933]); melt_dbgtrace_written_object ( /*_.VALDATA___V934*/ meltfptr[933], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V936*/ meltfptr[935])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V936*/ meltfptr[935])))); ((meltobject_ptr_t) ( /*_.VALDATA___V936*/ meltfptr[935]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V937*/ meltfptr[936]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V936*/ meltfptr[935]); melt_dbgtrace_written_object ( /*_.VALDATA___V936*/ meltfptr[935], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:556:/ 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-normal.melt:556:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V938*/ meltfptr[937])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V938*/ meltfptr[937])))); ((meltobject_ptr_t) ( /*_.VALDATA___V938*/ meltfptr[937]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V906*/ meltfptr[905]); /*putupl#459 */ melt_assertmsg ("putupl #459 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V940*/ meltfptr[939])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #459 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V940*/ meltfptr[939])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V940*/ meltfptr[939]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#460 */ melt_assertmsg ("putupl #460 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V940*/ meltfptr[939])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #460 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V940*/ meltfptr[939])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V940*/ meltfptr[939]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#461 */ melt_assertmsg ("putupl #461 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V940*/ meltfptr[939])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #461 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V940*/ meltfptr[939])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V940*/ meltfptr[939]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V882*/ meltfptr[881]); /*putupl#462 */ melt_assertmsg ("putupl #462 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V940*/ meltfptr[939])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #462 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V940*/ meltfptr[939])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V940*/ meltfptr[939]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V888*/ meltfptr[887]); /*putupl#463 */ melt_assertmsg ("putupl #463 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V940*/ meltfptr[939])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #463 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V940*/ meltfptr[939])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V940*/ meltfptr[939]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V906*/ meltfptr[905]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V940*/ meltfptr[939]); MELT_LOCATION ("warmelt-normal.melt:556:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V938*/ meltfptr[937])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V938*/ meltfptr[937])))); ((meltobject_ptr_t) ( /*_.VALDATA___V938*/ meltfptr[937]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V940*/ meltfptr[939]); MELT_LOCATION ("warmelt-normal.melt:556:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V941*/ meltfptr[940])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V941*/ meltfptr[940])))); ((meltobject_ptr_t) ( /*_.VALDATA___V941*/ meltfptr[940]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V942*/ meltfptr[941]); MELT_LOCATION ("warmelt-normal.melt:556:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V941*/ meltfptr[940])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V941*/ meltfptr[940])))); ((meltobject_ptr_t) ( /*_.VALDATA___V941*/ meltfptr[940]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V938*/ meltfptr[937]); MELT_LOCATION ("warmelt-normal.melt:556:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V941*/ meltfptr[940]); MELT_LOCATION ("warmelt-normal.melt:556:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V941*/ meltfptr[940], "new static instance"); /*putupl#464 */ melt_assertmsg ("putupl #464 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V943*/ meltfptr[942])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #464 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V943*/ meltfptr[942])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V943*/ meltfptr[942]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#465 */ melt_assertmsg ("putupl #465 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V943*/ meltfptr[942])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #465 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V943*/ meltfptr[942])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V943*/ meltfptr[942]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V891*/ meltfptr[890]); /*putupl#466 */ melt_assertmsg ("putupl #466 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V943*/ meltfptr[942])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #466 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V943*/ meltfptr[942])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V943*/ meltfptr[942]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]); /*putupl#467 */ melt_assertmsg ("putupl #467 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V943*/ meltfptr[942])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #467 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V943*/ meltfptr[942])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V943*/ meltfptr[942]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V895*/ meltfptr[894]); /*putupl#468 */ melt_assertmsg ("putupl #468 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V943*/ meltfptr[942])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #468 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V943*/ meltfptr[942])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V943*/ meltfptr[942]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V909*/ meltfptr[908]); /*putupl#469 */ melt_assertmsg ("putupl #469 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V943*/ meltfptr[942])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #469 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V943*/ meltfptr[942])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V943*/ meltfptr[942]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V941*/ meltfptr[940]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V943*/ meltfptr[942]); MELT_LOCATION ("warmelt-normal.melt:556:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V938*/ meltfptr[937])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V938*/ meltfptr[937])))); ((meltobject_ptr_t) ( /*_.VALDATA___V938*/ meltfptr[937]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V943*/ meltfptr[942]); MELT_LOCATION ("warmelt-normal.melt:556:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V938*/ meltfptr[937]); MELT_LOCATION ("warmelt-normal.melt:556:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V938*/ meltfptr[937], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V944*/ meltfptr[943]); melt_dbgtrace_written_object ( /*_.VALDATA___V944*/ meltfptr[943], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V946*/ meltfptr[945])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V946*/ meltfptr[945])))); ((meltobject_ptr_t) ( /*_.VALDATA___V946*/ meltfptr[945]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V947*/ meltfptr[946]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V946*/ meltfptr[945]); melt_dbgtrace_written_object ( /*_.VALDATA___V946*/ meltfptr[945], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:562:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V948*/ meltfptr[947])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V948*/ meltfptr[947])))); ((meltobject_ptr_t) ( /*_.VALDATA___V948*/ meltfptr[947]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V949*/ meltfptr[948]); MELT_LOCATION ("warmelt-normal.melt:562:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V948*/ meltfptr[947])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V948*/ meltfptr[947])))); ((meltobject_ptr_t) ( /*_.VALDATA___V948*/ meltfptr[947]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V906*/ meltfptr[905]); /*putupl#470 */ melt_assertmsg ("putupl #470 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V950*/ meltfptr[949])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #470 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V950*/ meltfptr[949])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V950*/ meltfptr[949]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#471 */ melt_assertmsg ("putupl #471 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V950*/ meltfptr[949])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #471 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V950*/ meltfptr[949])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V950*/ meltfptr[949]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#472 */ melt_assertmsg ("putupl #472 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V950*/ meltfptr[949])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #472 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V950*/ meltfptr[949])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V950*/ meltfptr[949]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V882*/ meltfptr[881]); /*putupl#473 */ melt_assertmsg ("putupl #473 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V950*/ meltfptr[949])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #473 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V950*/ meltfptr[949])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V950*/ meltfptr[949]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V888*/ meltfptr[887]); /*putupl#474 */ melt_assertmsg ("putupl #474 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V950*/ meltfptr[949])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #474 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V950*/ meltfptr[949])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V950*/ meltfptr[949]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V906*/ meltfptr[905]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V950*/ meltfptr[949]); MELT_LOCATION ("warmelt-normal.melt:562:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V948*/ meltfptr[947])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V948*/ meltfptr[947])))); ((meltobject_ptr_t) ( /*_.VALDATA___V948*/ meltfptr[947]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V950*/ meltfptr[949]); MELT_LOCATION ("warmelt-normal.melt:562:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:562:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V951*/ meltfptr[950])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V951*/ meltfptr[950])))); ((meltobject_ptr_t) ( /*_.VALDATA___V951*/ meltfptr[950]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V948*/ meltfptr[947]); MELT_LOCATION ("warmelt-normal.melt:562:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V951*/ meltfptr[950]); MELT_LOCATION ("warmelt-normal.melt:562:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V951*/ meltfptr[950], "new static instance"); /*putupl#475 */ melt_assertmsg ("putupl #475 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V953*/ meltfptr[952])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #475 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V953*/ meltfptr[952])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V953*/ meltfptr[952]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#476 */ melt_assertmsg ("putupl #476 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V953*/ meltfptr[952])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #476 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V953*/ meltfptr[952])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V953*/ meltfptr[952]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V891*/ meltfptr[890]); /*putupl#477 */ melt_assertmsg ("putupl #477 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V953*/ meltfptr[952])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #477 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V953*/ meltfptr[952])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V953*/ meltfptr[952]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]); /*putupl#478 */ melt_assertmsg ("putupl #478 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V953*/ meltfptr[952])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #478 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V953*/ meltfptr[952])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V953*/ meltfptr[952]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V895*/ meltfptr[894]); /*putupl#479 */ melt_assertmsg ("putupl #479 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V953*/ meltfptr[952])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #479 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V953*/ meltfptr[952])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V953*/ meltfptr[952]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V909*/ meltfptr[908]); /*putupl#480 */ melt_assertmsg ("putupl #480 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V953*/ meltfptr[952])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #480 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V953*/ meltfptr[952])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V953*/ meltfptr[952]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V951*/ meltfptr[950]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V953*/ meltfptr[952]); MELT_LOCATION ("warmelt-normal.melt:562:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V948*/ meltfptr[947])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V948*/ meltfptr[947])))); ((meltobject_ptr_t) ( /*_.VALDATA___V948*/ meltfptr[947]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V953*/ meltfptr[952]); MELT_LOCATION ("warmelt-normal.melt:562:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V948*/ meltfptr[947]); MELT_LOCATION ("warmelt-normal.melt:562:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V948*/ meltfptr[947], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V954*/ meltfptr[953])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V954*/ meltfptr[953])))); ((meltobject_ptr_t) ( /*_.VALDATA___V954*/ meltfptr[953]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V955*/ meltfptr[954]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V954*/ meltfptr[953]); melt_dbgtrace_written_object ( /*_.VALDATA___V954*/ meltfptr[953], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V956*/ meltfptr[955])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V956*/ meltfptr[955])))); ((meltobject_ptr_t) ( /*_.VALDATA___V956*/ meltfptr[955]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V957*/ meltfptr[956]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V956*/ meltfptr[955]); melt_dbgtrace_written_object ( /*_.VALDATA___V956*/ meltfptr[955], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:568:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V958*/ meltfptr[957])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V958*/ meltfptr[957])))); ((meltobject_ptr_t) ( /*_.VALDATA___V958*/ meltfptr[957]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V959*/ meltfptr[958]); MELT_LOCATION ("warmelt-normal.melt:568:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V958*/ meltfptr[957])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V958*/ meltfptr[957])))); ((meltobject_ptr_t) ( /*_.VALDATA___V958*/ meltfptr[957]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V906*/ meltfptr[905]); /*putupl#481 */ melt_assertmsg ("putupl #481 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V960*/ meltfptr[959])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #481 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V960*/ meltfptr[959])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V960*/ meltfptr[959]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#482 */ melt_assertmsg ("putupl #482 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V960*/ meltfptr[959])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #482 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V960*/ meltfptr[959])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V960*/ meltfptr[959]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#483 */ melt_assertmsg ("putupl #483 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V960*/ meltfptr[959])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #483 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V960*/ meltfptr[959])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V960*/ meltfptr[959]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V882*/ meltfptr[881]); /*putupl#484 */ melt_assertmsg ("putupl #484 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V960*/ meltfptr[959])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #484 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V960*/ meltfptr[959])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V960*/ meltfptr[959]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V888*/ meltfptr[887]); /*putupl#485 */ melt_assertmsg ("putupl #485 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V960*/ meltfptr[959])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #485 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V960*/ meltfptr[959])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V960*/ meltfptr[959]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V906*/ meltfptr[905]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V960*/ meltfptr[959]); MELT_LOCATION ("warmelt-normal.melt:568:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V958*/ meltfptr[957])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V958*/ meltfptr[957])))); ((meltobject_ptr_t) ( /*_.VALDATA___V958*/ meltfptr[957]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V960*/ meltfptr[959]); MELT_LOCATION ("warmelt-normal.melt:568:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V961*/ meltfptr[960])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V961*/ meltfptr[960])))); ((meltobject_ptr_t) ( /*_.VALDATA___V961*/ meltfptr[960]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V962*/ meltfptr[961]); MELT_LOCATION ("warmelt-normal.melt:568:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V961*/ meltfptr[960])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V961*/ meltfptr[960])))); ((meltobject_ptr_t) ( /*_.VALDATA___V961*/ meltfptr[960]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V958*/ meltfptr[957]); MELT_LOCATION ("warmelt-normal.melt:568:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V961*/ meltfptr[960]); MELT_LOCATION ("warmelt-normal.melt:568:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V961*/ meltfptr[960], "new static instance"); /*putupl#486 */ melt_assertmsg ("putupl #486 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V963*/ meltfptr[962])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #486 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V963*/ meltfptr[962])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V963*/ meltfptr[962]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#487 */ melt_assertmsg ("putupl #487 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V963*/ meltfptr[962])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #487 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V963*/ meltfptr[962])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V963*/ meltfptr[962]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V891*/ meltfptr[890]); /*putupl#488 */ melt_assertmsg ("putupl #488 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V963*/ meltfptr[962])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #488 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V963*/ meltfptr[962])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V963*/ meltfptr[962]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]); /*putupl#489 */ melt_assertmsg ("putupl #489 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V963*/ meltfptr[962])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #489 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V963*/ meltfptr[962])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V963*/ meltfptr[962]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V895*/ meltfptr[894]); /*putupl#490 */ melt_assertmsg ("putupl #490 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V963*/ meltfptr[962])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #490 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V963*/ meltfptr[962])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V963*/ meltfptr[962]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V909*/ meltfptr[908]); /*putupl#491 */ melt_assertmsg ("putupl #491 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V963*/ meltfptr[962])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #491 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V963*/ meltfptr[962])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V963*/ meltfptr[962]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V961*/ meltfptr[960]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V963*/ meltfptr[962]); MELT_LOCATION ("warmelt-normal.melt:568:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V958*/ meltfptr[957])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V958*/ meltfptr[957])))); ((meltobject_ptr_t) ( /*_.VALDATA___V958*/ meltfptr[957]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V963*/ meltfptr[962]); MELT_LOCATION ("warmelt-normal.melt:568:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V958*/ meltfptr[957]); MELT_LOCATION ("warmelt-normal.melt:568:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V958*/ meltfptr[957], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V964*/ meltfptr[963]); melt_dbgtrace_written_object ( /*_.VALDATA___V964*/ meltfptr[963], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V966*/ meltfptr[965])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V966*/ meltfptr[965])))); ((meltobject_ptr_t) ( /*_.VALDATA___V966*/ meltfptr[965]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V967*/ meltfptr[966]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V966*/ meltfptr[965]); melt_dbgtrace_written_object ( /*_.VALDATA___V966*/ meltfptr[965], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:574:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V968*/ meltfptr[967])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V968*/ meltfptr[967])))); ((meltobject_ptr_t) ( /*_.VALDATA___V968*/ meltfptr[967]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V969*/ meltfptr[968]); MELT_LOCATION ("warmelt-normal.melt:574:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V968*/ meltfptr[967])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V968*/ meltfptr[967])))); ((meltobject_ptr_t) ( /*_.VALDATA___V968*/ meltfptr[967]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915]); /*putupl#492 */ melt_assertmsg ("putupl #492 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V970*/ meltfptr[969])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #492 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V970*/ meltfptr[969])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V970*/ meltfptr[969]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#493 */ melt_assertmsg ("putupl #493 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V970*/ meltfptr[969])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #493 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V970*/ meltfptr[969])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V970*/ meltfptr[969]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#494 */ melt_assertmsg ("putupl #494 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V970*/ meltfptr[969])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #494 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V970*/ meltfptr[969])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V970*/ meltfptr[969]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V882*/ meltfptr[881]); /*putupl#495 */ melt_assertmsg ("putupl #495 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V970*/ meltfptr[969])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #495 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V970*/ meltfptr[969])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V970*/ meltfptr[969]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V888*/ meltfptr[887]); /*putupl#496 */ melt_assertmsg ("putupl #496 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V970*/ meltfptr[969])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #496 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V970*/ meltfptr[969])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V970*/ meltfptr[969]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V906*/ meltfptr[905]); /*putupl#497 */ melt_assertmsg ("putupl #497 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V970*/ meltfptr[969])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #497 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V970*/ meltfptr[969])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V970*/ meltfptr[969]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V970*/ meltfptr[969]); MELT_LOCATION ("warmelt-normal.melt:574:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V968*/ meltfptr[967])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V968*/ meltfptr[967])))); ((meltobject_ptr_t) ( /*_.VALDATA___V968*/ meltfptr[967]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V970*/ meltfptr[969]); MELT_LOCATION ("warmelt-normal.melt:574:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:574:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V971*/ meltfptr[970])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V971*/ meltfptr[970])))); ((meltobject_ptr_t) ( /*_.VALDATA___V971*/ meltfptr[970]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V968*/ meltfptr[967]); MELT_LOCATION ("warmelt-normal.melt:574:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V971*/ meltfptr[970]); MELT_LOCATION ("warmelt-normal.melt:574:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V971*/ meltfptr[970], "new static instance"); /*putupl#498 */ melt_assertmsg ("putupl #498 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V973*/ meltfptr[972])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #498 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V973*/ meltfptr[972])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V973*/ meltfptr[972]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#499 */ melt_assertmsg ("putupl #499 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V973*/ meltfptr[972])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #499 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V973*/ meltfptr[972])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V973*/ meltfptr[972]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V891*/ meltfptr[890]); /*putupl#500 */ melt_assertmsg ("putupl #500 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V973*/ meltfptr[972])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #500 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V973*/ meltfptr[972])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V973*/ meltfptr[972]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]); /*putupl#501 */ melt_assertmsg ("putupl #501 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V973*/ meltfptr[972])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #501 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V973*/ meltfptr[972])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V973*/ meltfptr[972]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V895*/ meltfptr[894]); /*putupl#502 */ melt_assertmsg ("putupl #502 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V973*/ meltfptr[972])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #502 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V973*/ meltfptr[972])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V973*/ meltfptr[972]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V909*/ meltfptr[908]); /*putupl#503 */ melt_assertmsg ("putupl #503 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V973*/ meltfptr[972])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #503 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V973*/ meltfptr[972])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V973*/ meltfptr[972]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V919*/ meltfptr[918]); /*putupl#504 */ melt_assertmsg ("putupl #504 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V973*/ meltfptr[972])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #504 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V973*/ meltfptr[972])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V973*/ meltfptr[972]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V921*/ meltfptr[920]); /*putupl#505 */ melt_assertmsg ("putupl #505 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V973*/ meltfptr[972])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #505 checkoff", (7 >= 0 && 7 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V973*/ meltfptr[972])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V973*/ meltfptr[972]))->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V923*/ meltfptr[922]); /*putupl#506 */ melt_assertmsg ("putupl #506 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V973*/ meltfptr[972])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #506 checkoff", (8 >= 0 && 8 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V973*/ meltfptr[972])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V973*/ meltfptr[972]))->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V925*/ meltfptr[924]); /*putupl#507 */ melt_assertmsg ("putupl #507 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V973*/ meltfptr[972])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #507 checkoff", (9 >= 0 && 9 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V973*/ meltfptr[972])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V973*/ meltfptr[972]))->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V971*/ meltfptr[970]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V973*/ meltfptr[972]); MELT_LOCATION ("warmelt-normal.melt:574:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V968*/ meltfptr[967])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V968*/ meltfptr[967])))); ((meltobject_ptr_t) ( /*_.VALDATA___V968*/ meltfptr[967]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V973*/ meltfptr[972]); MELT_LOCATION ("warmelt-normal.melt:574:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V968*/ meltfptr[967]); MELT_LOCATION ("warmelt-normal.melt:574:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V968*/ meltfptr[967], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V974*/ meltfptr[973])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V974*/ meltfptr[973])))); ((meltobject_ptr_t) ( /*_.VALDATA___V974*/ meltfptr[973]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V975*/ meltfptr[974]); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_14 */ void meltmod__warmelt_normal__initialmeltchunk_15 (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___V974*/ meltfptr[973]); melt_dbgtrace_written_object ( /*_.VALDATA___V974*/ meltfptr[973], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V976*/ meltfptr[975]); melt_dbgtrace_written_object ( /*_.VALDATA___V976*/ meltfptr[975], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:580:/ 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-normal.melt:580:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V978*/ meltfptr[977])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V978*/ meltfptr[977])))); ((meltobject_ptr_t) ( /*_.VALDATA___V978*/ meltfptr[977]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V968*/ meltfptr[967]); /*putupl#508 */ melt_assertmsg ("putupl #508 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V980*/ meltfptr[979])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #508 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V980*/ meltfptr[979])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V980*/ meltfptr[979]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#509 */ melt_assertmsg ("putupl #509 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V980*/ meltfptr[979])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #509 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V980*/ meltfptr[979])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V980*/ meltfptr[979]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#510 */ melt_assertmsg ("putupl #510 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V980*/ meltfptr[979])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #510 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V980*/ meltfptr[979])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V980*/ meltfptr[979]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V882*/ meltfptr[881]); /*putupl#511 */ melt_assertmsg ("putupl #511 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V980*/ meltfptr[979])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #511 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V980*/ meltfptr[979])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V980*/ meltfptr[979]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V888*/ meltfptr[887]); /*putupl#512 */ melt_assertmsg ("putupl #512 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V980*/ meltfptr[979])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #512 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V980*/ meltfptr[979])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V980*/ meltfptr[979]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V906*/ meltfptr[905]); /*putupl#513 */ melt_assertmsg ("putupl #513 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V980*/ meltfptr[979])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #513 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V980*/ meltfptr[979])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V980*/ meltfptr[979]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915]); /*putupl#514 */ melt_assertmsg ("putupl #514 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V980*/ meltfptr[979])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #514 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V980*/ meltfptr[979])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V980*/ meltfptr[979]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V968*/ meltfptr[967]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V980*/ meltfptr[979]); MELT_LOCATION ("warmelt-normal.melt:580:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V978*/ meltfptr[977])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V978*/ meltfptr[977])))); ((meltobject_ptr_t) ( /*_.VALDATA___V978*/ meltfptr[977]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V980*/ meltfptr[979]); /*putupl#515 */ melt_assertmsg ("putupl #515 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V981*/ meltfptr[980])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #515 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V981*/ meltfptr[980])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V981*/ meltfptr[980]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#516 */ melt_assertmsg ("putupl #516 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V981*/ meltfptr[980])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #516 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V981*/ meltfptr[980])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V981*/ meltfptr[980]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V891*/ meltfptr[890]); /*putupl#517 */ melt_assertmsg ("putupl #517 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V981*/ meltfptr[980])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #517 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V981*/ meltfptr[980])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V981*/ meltfptr[980]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]); /*putupl#518 */ melt_assertmsg ("putupl #518 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V981*/ meltfptr[980])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #518 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V981*/ meltfptr[980])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V981*/ meltfptr[980]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V895*/ meltfptr[894]); /*putupl#519 */ melt_assertmsg ("putupl #519 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V981*/ meltfptr[980])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #519 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V981*/ meltfptr[980])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V981*/ meltfptr[980]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V909*/ meltfptr[908]); /*putupl#520 */ melt_assertmsg ("putupl #520 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V981*/ meltfptr[980])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #520 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V981*/ meltfptr[980])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V981*/ meltfptr[980]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V919*/ meltfptr[918]); /*putupl#521 */ melt_assertmsg ("putupl #521 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V981*/ meltfptr[980])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #521 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V981*/ meltfptr[980])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V981*/ meltfptr[980]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V921*/ meltfptr[920]); /*putupl#522 */ melt_assertmsg ("putupl #522 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V981*/ meltfptr[980])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #522 checkoff", (7 >= 0 && 7 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V981*/ meltfptr[980])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V981*/ meltfptr[980]))->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V923*/ meltfptr[922]); /*putupl#523 */ melt_assertmsg ("putupl #523 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V981*/ meltfptr[980])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #523 checkoff", (8 >= 0 && 8 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V981*/ meltfptr[980])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V981*/ meltfptr[980]))->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V925*/ meltfptr[924]); /*putupl#524 */ melt_assertmsg ("putupl #524 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V981*/ meltfptr[980])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #524 checkoff", (9 >= 0 && 9 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V981*/ meltfptr[980])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V981*/ meltfptr[980]))->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V971*/ meltfptr[970]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V981*/ meltfptr[980]); MELT_LOCATION ("warmelt-normal.melt:580:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V978*/ meltfptr[977])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V978*/ meltfptr[977])))); ((meltobject_ptr_t) ( /*_.VALDATA___V978*/ meltfptr[977]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V981*/ meltfptr[980]); MELT_LOCATION ("warmelt-normal.melt:580:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V978*/ meltfptr[977]); MELT_LOCATION ("warmelt-normal.melt:580:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V978*/ meltfptr[977], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V982*/ meltfptr[981])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V982*/ meltfptr[981])))); ((meltobject_ptr_t) ( /*_.VALDATA___V982*/ meltfptr[981]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V983*/ meltfptr[982]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V982*/ meltfptr[981]); melt_dbgtrace_written_object ( /*_.VALDATA___V982*/ meltfptr[981], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:586:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V984*/ meltfptr[983])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V984*/ meltfptr[983])))); ((meltobject_ptr_t) ( /*_.VALDATA___V984*/ meltfptr[983]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V985*/ meltfptr[984]); MELT_LOCATION ("warmelt-normal.melt:586:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V984*/ meltfptr[983])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V984*/ meltfptr[983])))); ((meltobject_ptr_t) ( /*_.VALDATA___V984*/ meltfptr[983]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V906*/ meltfptr[905]); /*putupl#525 */ melt_assertmsg ("putupl #525 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V986*/ meltfptr[985])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #525 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V986*/ meltfptr[985])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V986*/ meltfptr[985]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#526 */ melt_assertmsg ("putupl #526 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V986*/ meltfptr[985])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #526 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V986*/ meltfptr[985])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V986*/ meltfptr[985]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#527 */ melt_assertmsg ("putupl #527 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V986*/ meltfptr[985])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #527 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V986*/ meltfptr[985])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V986*/ meltfptr[985]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V882*/ meltfptr[881]); /*putupl#528 */ melt_assertmsg ("putupl #528 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V986*/ meltfptr[985])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #528 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V986*/ meltfptr[985])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V986*/ meltfptr[985]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V888*/ meltfptr[887]); /*putupl#529 */ melt_assertmsg ("putupl #529 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V986*/ meltfptr[985])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #529 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V986*/ meltfptr[985])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V986*/ meltfptr[985]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V906*/ meltfptr[905]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V986*/ meltfptr[985]); MELT_LOCATION ("warmelt-normal.melt:586:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V984*/ meltfptr[983])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V984*/ meltfptr[983])))); ((meltobject_ptr_t) ( /*_.VALDATA___V984*/ meltfptr[983]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V986*/ meltfptr[985]); MELT_LOCATION ("warmelt-normal.melt:586:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:586:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V987*/ meltfptr[986])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V987*/ meltfptr[986])))); ((meltobject_ptr_t) ( /*_.VALDATA___V987*/ meltfptr[986]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V984*/ meltfptr[983]); MELT_LOCATION ("warmelt-normal.melt:586:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V987*/ meltfptr[986]); MELT_LOCATION ("warmelt-normal.melt:586:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V987*/ meltfptr[986], "new static instance"); /*putupl#530 */ melt_assertmsg ("putupl #530 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V989*/ meltfptr[988])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #530 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V989*/ meltfptr[988])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V989*/ meltfptr[988]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#531 */ melt_assertmsg ("putupl #531 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V989*/ meltfptr[988])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #531 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V989*/ meltfptr[988])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V989*/ meltfptr[988]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V891*/ meltfptr[890]); /*putupl#532 */ melt_assertmsg ("putupl #532 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V989*/ meltfptr[988])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #532 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V989*/ meltfptr[988])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V989*/ meltfptr[988]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]); /*putupl#533 */ melt_assertmsg ("putupl #533 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V989*/ meltfptr[988])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #533 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V989*/ meltfptr[988])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V989*/ meltfptr[988]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V895*/ meltfptr[894]); /*putupl#534 */ melt_assertmsg ("putupl #534 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V989*/ meltfptr[988])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #534 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V989*/ meltfptr[988])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V989*/ meltfptr[988]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V909*/ meltfptr[908]); /*putupl#535 */ melt_assertmsg ("putupl #535 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V989*/ meltfptr[988])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #535 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V989*/ meltfptr[988])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V989*/ meltfptr[988]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V987*/ meltfptr[986]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V989*/ meltfptr[988]); MELT_LOCATION ("warmelt-normal.melt:586:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V984*/ meltfptr[983])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V984*/ meltfptr[983])))); ((meltobject_ptr_t) ( /*_.VALDATA___V984*/ meltfptr[983]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V989*/ meltfptr[988]); MELT_LOCATION ("warmelt-normal.melt:586:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V984*/ meltfptr[983]); MELT_LOCATION ("warmelt-normal.melt:586:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V984*/ meltfptr[983], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V990*/ meltfptr[989])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V990*/ meltfptr[989])))); ((meltobject_ptr_t) ( /*_.VALDATA___V990*/ meltfptr[989]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V991*/ meltfptr[990]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V990*/ meltfptr[989]); melt_dbgtrace_written_object ( /*_.VALDATA___V990*/ meltfptr[989], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V992*/ meltfptr[991])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V992*/ meltfptr[991])))); ((meltobject_ptr_t) ( /*_.VALDATA___V992*/ meltfptr[991]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V993*/ meltfptr[992]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V992*/ meltfptr[991]); melt_dbgtrace_written_object ( /*_.VALDATA___V992*/ meltfptr[991], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:592:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V994*/ meltfptr[993])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V994*/ meltfptr[993])))); ((meltobject_ptr_t) ( /*_.VALDATA___V994*/ meltfptr[993]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V995*/ meltfptr[994]); MELT_LOCATION ("warmelt-normal.melt:592:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V994*/ meltfptr[993])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V994*/ meltfptr[993])))); ((meltobject_ptr_t) ( /*_.VALDATA___V994*/ meltfptr[993]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V906*/ meltfptr[905]); /*putupl#536 */ melt_assertmsg ("putupl #536 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V996*/ meltfptr[995])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #536 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V996*/ meltfptr[995])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V996*/ meltfptr[995]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#537 */ melt_assertmsg ("putupl #537 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V996*/ meltfptr[995])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #537 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V996*/ meltfptr[995])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V996*/ meltfptr[995]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#538 */ melt_assertmsg ("putupl #538 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V996*/ meltfptr[995])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #538 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V996*/ meltfptr[995])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V996*/ meltfptr[995]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V882*/ meltfptr[881]); /*putupl#539 */ melt_assertmsg ("putupl #539 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V996*/ meltfptr[995])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #539 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V996*/ meltfptr[995])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V996*/ meltfptr[995]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V888*/ meltfptr[887]); /*putupl#540 */ melt_assertmsg ("putupl #540 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V996*/ meltfptr[995])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #540 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V996*/ meltfptr[995])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V996*/ meltfptr[995]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V906*/ meltfptr[905]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V996*/ meltfptr[995]); MELT_LOCATION ("warmelt-normal.melt:592:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V994*/ meltfptr[993])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V994*/ meltfptr[993])))); ((meltobject_ptr_t) ( /*_.VALDATA___V994*/ meltfptr[993]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V996*/ meltfptr[995]); MELT_LOCATION ("warmelt-normal.melt:592:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V997*/ meltfptr[996])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V997*/ meltfptr[996])))); ((meltobject_ptr_t) ( /*_.VALDATA___V997*/ meltfptr[996]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V998*/ meltfptr[997]); MELT_LOCATION ("warmelt-normal.melt:592:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V997*/ meltfptr[996])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V997*/ meltfptr[996])))); ((meltobject_ptr_t) ( /*_.VALDATA___V997*/ meltfptr[996]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V994*/ meltfptr[993]); MELT_LOCATION ("warmelt-normal.melt:592:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V997*/ meltfptr[996]); MELT_LOCATION ("warmelt-normal.melt:592:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V997*/ meltfptr[996], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:592:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:592:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V999*/ meltfptr[998])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V999*/ meltfptr[998])))); ((meltobject_ptr_t) ( /*_.VALDATA___V999*/ meltfptr[998]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V994*/ meltfptr[993]); MELT_LOCATION ("warmelt-normal.melt:592:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V999*/ meltfptr[998]); MELT_LOCATION ("warmelt-normal.melt:592:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V999*/ meltfptr[998], "new static instance"); /*putupl#541 */ melt_assertmsg ("putupl #541 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1001*/ meltfptr[1000])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #541 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1001*/ meltfptr[1000])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1001*/ meltfptr[1000]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#542 */ melt_assertmsg ("putupl #542 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1001*/ meltfptr[1000])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #542 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1001*/ meltfptr[1000])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1001*/ meltfptr[1000]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V891*/ meltfptr[890]); /*putupl#543 */ melt_assertmsg ("putupl #543 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1001*/ meltfptr[1000])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #543 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1001*/ meltfptr[1000])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1001*/ meltfptr[1000]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V893*/ meltfptr[892]); /*putupl#544 */ melt_assertmsg ("putupl #544 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1001*/ meltfptr[1000])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #544 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1001*/ meltfptr[1000])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1001*/ meltfptr[1000]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V895*/ meltfptr[894]); /*putupl#545 */ melt_assertmsg ("putupl #545 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1001*/ meltfptr[1000])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #545 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1001*/ meltfptr[1000])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1001*/ meltfptr[1000]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V909*/ meltfptr[908]); /*putupl#546 */ melt_assertmsg ("putupl #546 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1001*/ meltfptr[1000])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #546 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1001*/ meltfptr[1000])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1001*/ meltfptr[1000]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V997*/ meltfptr[996]); /*putupl#547 */ melt_assertmsg ("putupl #547 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1001*/ meltfptr[1000])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #547 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1001*/ meltfptr[1000])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1001*/ meltfptr[1000]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V999*/ meltfptr[998]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1001*/ meltfptr[1000]); MELT_LOCATION ("warmelt-normal.melt:592:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V994*/ meltfptr[993])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V994*/ meltfptr[993])))); ((meltobject_ptr_t) ( /*_.VALDATA___V994*/ meltfptr[993]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1001*/ meltfptr[1000]); MELT_LOCATION ("warmelt-normal.melt:592:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V994*/ meltfptr[993]); MELT_LOCATION ("warmelt-normal.melt:592:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V994*/ meltfptr[993], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1002*/ meltfptr[1001])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1002*/ meltfptr[1001])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1002*/ meltfptr[1001]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1003*/ meltfptr[1002]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1002*/ meltfptr[1001]); melt_dbgtrace_written_object ( /*_.VALDATA___V1002*/ meltfptr[1001], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1004*/ meltfptr[1003])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1004*/ meltfptr[1003])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1004*/ meltfptr[1003]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1005*/ meltfptr[1004]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1004*/ meltfptr[1003]); melt_dbgtrace_written_object ( /*_.VALDATA___V1004*/ meltfptr[1003], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1006*/ meltfptr[1005])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1006*/ meltfptr[1005])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1006*/ meltfptr[1005]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1007*/ meltfptr[1006]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1006*/ meltfptr[1005]); melt_dbgtrace_written_object ( /*_.VALDATA___V1006*/ meltfptr[1005], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:600:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1008*/ meltfptr[1007])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1008*/ meltfptr[1007])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1008*/ meltfptr[1007]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1009*/ meltfptr[1008]); MELT_LOCATION ("warmelt-normal.melt:600:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1008*/ meltfptr[1007])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1008*/ meltfptr[1007])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1008*/ meltfptr[1007]))-> obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V186*/ meltfptr[185]); /*putupl#548 */ melt_assertmsg ("putupl #548 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1010*/ meltfptr[1009])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #548 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1010*/ meltfptr[1009])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1010*/ meltfptr[1009]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#549 */ melt_assertmsg ("putupl #549 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1010*/ meltfptr[1009])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #549 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1010*/ meltfptr[1009])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1010*/ meltfptr[1009]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#550 */ melt_assertmsg ("putupl #550 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1010*/ meltfptr[1009])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #550 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1010*/ meltfptr[1009])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1010*/ meltfptr[1009]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V186*/ meltfptr[185]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1010*/ meltfptr[1009]); MELT_LOCATION ("warmelt-normal.melt:600:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1008*/ meltfptr[1007])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1008*/ meltfptr[1007])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1008*/ meltfptr[1007]))-> obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1010*/ meltfptr[1009]); MELT_LOCATION ("warmelt-normal.melt:600:/ 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) ( /*_.VALSTR___V1012*/ meltfptr[1011]); MELT_LOCATION ("warmelt-normal.melt:600:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1011*/ meltfptr[1010])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1011*/ meltfptr[1010])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1011*/ meltfptr[1010]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1008*/ meltfptr[1007]); MELT_LOCATION ("warmelt-normal.melt:600:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1011*/ meltfptr[1010]); MELT_LOCATION ("warmelt-normal.melt:600:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1011*/ meltfptr[1010], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:600:/ 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-normal.melt:600:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1013*/ meltfptr[1012])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1013*/ meltfptr[1012])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1013*/ meltfptr[1012]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1008*/ meltfptr[1007]); MELT_LOCATION ("warmelt-normal.melt:600:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1013*/ meltfptr[1012]); MELT_LOCATION ("warmelt-normal.melt:600:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1013*/ meltfptr[1012], "new static instance"); /*putupl#551 */ melt_assertmsg ("putupl #551 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1015*/ meltfptr[1014])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #551 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1015*/ meltfptr[1014])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1015*/ meltfptr[1014]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#552 */ melt_assertmsg ("putupl #552 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1015*/ meltfptr[1014])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #552 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1015*/ meltfptr[1014])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1015*/ meltfptr[1014]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1011*/ meltfptr[1010]); /*putupl#553 */ melt_assertmsg ("putupl #553 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1015*/ meltfptr[1014])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #553 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1015*/ meltfptr[1014])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1015*/ meltfptr[1014]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1013*/ meltfptr[1012]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1015*/ meltfptr[1014]); MELT_LOCATION ("warmelt-normal.melt:600:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1008*/ meltfptr[1007])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1008*/ meltfptr[1007])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1008*/ meltfptr[1007]))-> obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1015*/ meltfptr[1014]); MELT_LOCATION ("warmelt-normal.melt:600:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1008*/ meltfptr[1007]); MELT_LOCATION ("warmelt-normal.melt:600:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1008*/ meltfptr[1007], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1016*/ meltfptr[1015])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1016*/ meltfptr[1015])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1016*/ meltfptr[1015]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1017*/ meltfptr[1016]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1016*/ meltfptr[1015]); melt_dbgtrace_written_object ( /*_.VALDATA___V1016*/ meltfptr[1015], "new static instance"); /*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) ( /*_.VALSTR___V1019*/ meltfptr[1018]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1018*/ meltfptr[1017]); melt_dbgtrace_written_object ( /*_.VALDATA___V1018*/ meltfptr[1017], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1020*/ meltfptr[1019])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1020*/ meltfptr[1019])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1020*/ meltfptr[1019]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1021*/ meltfptr[1020]); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_15 */ void meltmod__warmelt_normal__initialmeltchunk_16 (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___V1020*/ meltfptr[1019]); melt_dbgtrace_written_object ( /*_.VALDATA___V1020*/ meltfptr[1019], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:607:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1022*/ meltfptr[1021])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1022*/ meltfptr[1021])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1022*/ meltfptr[1021]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1023*/ meltfptr[1022]); MELT_LOCATION ("warmelt-normal.melt:607:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1022*/ meltfptr[1021])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1022*/ meltfptr[1021])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1022*/ meltfptr[1021]))-> obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V186*/ meltfptr[185]); /*putupl#554 */ melt_assertmsg ("putupl #554 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1024*/ meltfptr[1023])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #554 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1024*/ meltfptr[1023])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1024*/ meltfptr[1023]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#555 */ melt_assertmsg ("putupl #555 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1024*/ meltfptr[1023])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #555 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1024*/ meltfptr[1023])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1024*/ meltfptr[1023]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#556 */ melt_assertmsg ("putupl #556 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1024*/ meltfptr[1023])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #556 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1024*/ meltfptr[1023])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1024*/ meltfptr[1023]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V186*/ meltfptr[185]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1024*/ meltfptr[1023]); MELT_LOCATION ("warmelt-normal.melt:607:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1022*/ meltfptr[1021])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1022*/ meltfptr[1021])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1022*/ meltfptr[1021]))-> obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1024*/ meltfptr[1023]); MELT_LOCATION ("warmelt-normal.melt:607:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1025*/ meltfptr[1024])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1025*/ meltfptr[1024])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1025*/ meltfptr[1024]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1026*/ meltfptr[1025]); MELT_LOCATION ("warmelt-normal.melt:607:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1025*/ meltfptr[1024])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1025*/ meltfptr[1024])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1025*/ meltfptr[1024]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1022*/ meltfptr[1021]); MELT_LOCATION ("warmelt-normal.melt:607:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1025*/ meltfptr[1024]); MELT_LOCATION ("warmelt-normal.melt:607:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1025*/ meltfptr[1024], "new static instance"); /*putupl#557 */ melt_assertmsg ("putupl #557 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1027*/ meltfptr[1026])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #557 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1027*/ meltfptr[1026])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1027*/ meltfptr[1026]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#558 */ melt_assertmsg ("putupl #558 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1027*/ meltfptr[1026])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #558 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1027*/ meltfptr[1026])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1027*/ meltfptr[1026]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1025*/ meltfptr[1024]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1027*/ meltfptr[1026]); MELT_LOCATION ("warmelt-normal.melt:607:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1022*/ meltfptr[1021])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1022*/ meltfptr[1021])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1022*/ meltfptr[1021]))-> obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1027*/ meltfptr[1026]); MELT_LOCATION ("warmelt-normal.melt:607:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1022*/ meltfptr[1021]); MELT_LOCATION ("warmelt-normal.melt:607:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1022*/ meltfptr[1021], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1028*/ meltfptr[1027])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1028*/ meltfptr[1027])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1028*/ meltfptr[1027]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1029*/ meltfptr[1028]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1028*/ meltfptr[1027]); melt_dbgtrace_written_object ( /*_.VALDATA___V1028*/ meltfptr[1027], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1030*/ meltfptr[1029])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1030*/ meltfptr[1029])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1030*/ meltfptr[1029]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1031*/ meltfptr[1030]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1030*/ meltfptr[1029]); melt_dbgtrace_written_object ( /*_.VALDATA___V1030*/ meltfptr[1029], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:613:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1032*/ meltfptr[1031])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1032*/ meltfptr[1031])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1032*/ meltfptr[1031]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1033*/ meltfptr[1032]); MELT_LOCATION ("warmelt-normal.melt:613:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1032*/ meltfptr[1031])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1032*/ meltfptr[1031])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1032*/ meltfptr[1031]))-> obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V1022*/ meltfptr[1021]); /*putupl#559 */ melt_assertmsg ("putupl #559 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1034*/ meltfptr[1033])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #559 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1034*/ meltfptr[1033])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1034*/ meltfptr[1033]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#560 */ melt_assertmsg ("putupl #560 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1034*/ meltfptr[1033])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #560 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1034*/ meltfptr[1033])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1034*/ meltfptr[1033]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#561 */ melt_assertmsg ("putupl #561 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1034*/ meltfptr[1033])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #561 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1034*/ meltfptr[1033])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1034*/ meltfptr[1033]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V186*/ meltfptr[185]); /*putupl#562 */ melt_assertmsg ("putupl #562 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1034*/ meltfptr[1033])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #562 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1034*/ meltfptr[1033])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1034*/ meltfptr[1033]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1022*/ meltfptr[1021]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1034*/ meltfptr[1033]); MELT_LOCATION ("warmelt-normal.melt:613:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1032*/ meltfptr[1031])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1032*/ meltfptr[1031])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1032*/ meltfptr[1031]))-> obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1034*/ meltfptr[1033]); MELT_LOCATION ("warmelt-normal.melt:613:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1035*/ meltfptr[1034])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1035*/ meltfptr[1034])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1035*/ meltfptr[1034]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1036*/ meltfptr[1035]); MELT_LOCATION ("warmelt-normal.melt:613:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1035*/ meltfptr[1034])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1035*/ meltfptr[1034])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1035*/ meltfptr[1034]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1032*/ meltfptr[1031]); MELT_LOCATION ("warmelt-normal.melt:613:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1035*/ meltfptr[1034]); MELT_LOCATION ("warmelt-normal.melt:613:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1035*/ meltfptr[1034], "new static instance"); /*putupl#563 */ melt_assertmsg ("putupl #563 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1037*/ meltfptr[1036])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #563 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1037*/ meltfptr[1036])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1037*/ meltfptr[1036]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#564 */ melt_assertmsg ("putupl #564 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1037*/ meltfptr[1036])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #564 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1037*/ meltfptr[1036])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1037*/ meltfptr[1036]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1025*/ meltfptr[1024]); /*putupl#565 */ melt_assertmsg ("putupl #565 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1037*/ meltfptr[1036])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #565 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1037*/ meltfptr[1036])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1037*/ meltfptr[1036]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1035*/ meltfptr[1034]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1037*/ meltfptr[1036]); MELT_LOCATION ("warmelt-normal.melt:613:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1032*/ meltfptr[1031])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1032*/ meltfptr[1031])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1032*/ meltfptr[1031]))-> obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1037*/ meltfptr[1036]); MELT_LOCATION ("warmelt-normal.melt:613:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1032*/ meltfptr[1031]); MELT_LOCATION ("warmelt-normal.melt:613:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1032*/ meltfptr[1031], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1038*/ meltfptr[1037])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1038*/ meltfptr[1037])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1038*/ meltfptr[1037]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1039*/ meltfptr[1038]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1038*/ meltfptr[1037]); melt_dbgtrace_written_object ( /*_.VALDATA___V1038*/ meltfptr[1037], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1040*/ meltfptr[1039])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1040*/ meltfptr[1039])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1040*/ meltfptr[1039]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1041*/ meltfptr[1040]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1040*/ meltfptr[1039]); melt_dbgtrace_written_object ( /*_.VALDATA___V1040*/ meltfptr[1039], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:619:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:619:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1042*/ meltfptr[1041])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1042*/ meltfptr[1041])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1042*/ meltfptr[1041]))-> obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V186*/ meltfptr[185]); /*putupl#566 */ melt_assertmsg ("putupl #566 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1044*/ meltfptr[1043])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #566 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1044*/ meltfptr[1043])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1044*/ meltfptr[1043]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#567 */ melt_assertmsg ("putupl #567 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1044*/ meltfptr[1043])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #567 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1044*/ meltfptr[1043])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1044*/ meltfptr[1043]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#568 */ melt_assertmsg ("putupl #568 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1044*/ meltfptr[1043])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #568 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1044*/ meltfptr[1043])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1044*/ meltfptr[1043]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V186*/ meltfptr[185]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1044*/ meltfptr[1043]); MELT_LOCATION ("warmelt-normal.melt:619:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1042*/ meltfptr[1041])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1042*/ meltfptr[1041])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1042*/ meltfptr[1041]))-> obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1044*/ meltfptr[1043]); MELT_LOCATION ("warmelt-normal.melt:619:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:619:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1045*/ meltfptr[1044])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1045*/ meltfptr[1044])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1045*/ meltfptr[1044]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1042*/ meltfptr[1041]); MELT_LOCATION ("warmelt-normal.melt:619:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1045*/ meltfptr[1044]); MELT_LOCATION ("warmelt-normal.melt:619:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1045*/ meltfptr[1044], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:619:/ 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) ( /*_.VALSTR___V1048*/ meltfptr[1047]); MELT_LOCATION ("warmelt-normal.melt:619:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1047*/ meltfptr[1046])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1047*/ meltfptr[1046])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1047*/ meltfptr[1046]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1042*/ meltfptr[1041]); MELT_LOCATION ("warmelt-normal.melt:619:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1047*/ meltfptr[1046]); MELT_LOCATION ("warmelt-normal.melt:619:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1047*/ meltfptr[1046], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:619:/ 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-normal.melt:619:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1049*/ meltfptr[1048])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1049*/ meltfptr[1048])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1049*/ meltfptr[1048]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1042*/ meltfptr[1041]); MELT_LOCATION ("warmelt-normal.melt:619:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1049*/ meltfptr[1048]); MELT_LOCATION ("warmelt-normal.melt:619:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1049*/ meltfptr[1048], "new static instance"); /*putupl#569 */ melt_assertmsg ("putupl #569 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1051*/ meltfptr[1050])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #569 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1051*/ meltfptr[1050])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1051*/ meltfptr[1050]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#570 */ melt_assertmsg ("putupl #570 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1051*/ meltfptr[1050])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #570 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1051*/ meltfptr[1050])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1051*/ meltfptr[1050]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1045*/ meltfptr[1044]); /*putupl#571 */ melt_assertmsg ("putupl #571 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1051*/ meltfptr[1050])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #571 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1051*/ meltfptr[1050])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1051*/ meltfptr[1050]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1047*/ meltfptr[1046]); /*putupl#572 */ melt_assertmsg ("putupl #572 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1051*/ meltfptr[1050])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #572 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1051*/ meltfptr[1050])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1051*/ meltfptr[1050]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1049*/ meltfptr[1048]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1051*/ meltfptr[1050]); MELT_LOCATION ("warmelt-normal.melt:619:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1042*/ meltfptr[1041])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1042*/ meltfptr[1041])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1042*/ meltfptr[1041]))-> obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1051*/ meltfptr[1050]); MELT_LOCATION ("warmelt-normal.melt:619:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1042*/ meltfptr[1041]); MELT_LOCATION ("warmelt-normal.melt:619:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1042*/ meltfptr[1041], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1052*/ meltfptr[1051])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1052*/ meltfptr[1051])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1052*/ meltfptr[1051]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1053*/ meltfptr[1052]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1052*/ meltfptr[1051]); melt_dbgtrace_written_object ( /*_.VALDATA___V1052*/ meltfptr[1051], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1054*/ meltfptr[1053])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1054*/ meltfptr[1053])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1054*/ meltfptr[1053]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1055*/ meltfptr[1054]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1054*/ meltfptr[1053]); melt_dbgtrace_written_object ( /*_.VALDATA___V1054*/ meltfptr[1053], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1056*/ meltfptr[1055])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1056*/ meltfptr[1055])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1056*/ meltfptr[1055]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1057*/ meltfptr[1056]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1056*/ meltfptr[1055]); melt_dbgtrace_written_object ( /*_.VALDATA___V1056*/ meltfptr[1055], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1058*/ meltfptr[1057])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1058*/ meltfptr[1057])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1058*/ meltfptr[1057]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1059*/ meltfptr[1058]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1058*/ meltfptr[1057]); melt_dbgtrace_written_object ( /*_.VALDATA___V1058*/ meltfptr[1057], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:627:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1061*/ meltfptr[1060]); MELT_LOCATION ("warmelt-normal.melt:627:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]))-> obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V1042*/ meltfptr[1041]); /*putupl#573 */ melt_assertmsg ("putupl #573 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1062*/ meltfptr[1061])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #573 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1062*/ meltfptr[1061])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1062*/ meltfptr[1061]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#574 */ melt_assertmsg ("putupl #574 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1062*/ meltfptr[1061])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #574 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1062*/ meltfptr[1061])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1062*/ meltfptr[1061]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#575 */ melt_assertmsg ("putupl #575 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1062*/ meltfptr[1061])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #575 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1062*/ meltfptr[1061])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1062*/ meltfptr[1061]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V186*/ meltfptr[185]); /*putupl#576 */ melt_assertmsg ("putupl #576 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1062*/ meltfptr[1061])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #576 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1062*/ meltfptr[1061])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1062*/ meltfptr[1061]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1042*/ meltfptr[1041]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1062*/ meltfptr[1061]); MELT_LOCATION ("warmelt-normal.melt:627:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]))-> obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1062*/ meltfptr[1061]); /*putupl#577 */ melt_assertmsg ("putupl #577 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1063*/ meltfptr[1062])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #577 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1063*/ meltfptr[1062])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1063*/ meltfptr[1062]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#578 */ melt_assertmsg ("putupl #578 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1063*/ meltfptr[1062])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #578 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1063*/ meltfptr[1062])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1063*/ meltfptr[1062]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1045*/ meltfptr[1044]); /*putupl#579 */ melt_assertmsg ("putupl #579 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1063*/ meltfptr[1062])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #579 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1063*/ meltfptr[1062])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1063*/ meltfptr[1062]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1047*/ meltfptr[1046]); /*putupl#580 */ melt_assertmsg ("putupl #580 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1063*/ meltfptr[1062])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #580 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1063*/ meltfptr[1062])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1063*/ meltfptr[1062]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1049*/ meltfptr[1048]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1063*/ meltfptr[1062]); MELT_LOCATION ("warmelt-normal.melt:627:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]))-> obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1063*/ meltfptr[1062]); MELT_LOCATION ("warmelt-normal.melt:627:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:627:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1060*/ meltfptr[1059], "new static instance"); /*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) ( /*_.VALSTR___V1065*/ meltfptr[1064]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1064*/ meltfptr[1063]); melt_dbgtrace_written_object ( /*_.VALDATA___V1064*/ meltfptr[1063], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:633:/ 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-normal.melt:633:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1066*/ meltfptr[1065])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1066*/ meltfptr[1065])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1066*/ meltfptr[1065]))-> obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V1042*/ meltfptr[1041]); /*putupl#581 */ melt_assertmsg ("putupl #581 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1068*/ meltfptr[1067])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #581 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1068*/ meltfptr[1067])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1068*/ meltfptr[1067]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#582 */ melt_assertmsg ("putupl #582 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1068*/ meltfptr[1067])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #582 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1068*/ meltfptr[1067])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1068*/ meltfptr[1067]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#583 */ melt_assertmsg ("putupl #583 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1068*/ meltfptr[1067])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #583 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1068*/ meltfptr[1067])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1068*/ meltfptr[1067]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V186*/ meltfptr[185]); /*putupl#584 */ melt_assertmsg ("putupl #584 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1068*/ meltfptr[1067])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #584 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1068*/ meltfptr[1067])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1068*/ meltfptr[1067]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1042*/ meltfptr[1041]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1068*/ meltfptr[1067]); MELT_LOCATION ("warmelt-normal.melt:633:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1066*/ meltfptr[1065])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1066*/ meltfptr[1065])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1066*/ meltfptr[1065]))-> obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1068*/ meltfptr[1067]); MELT_LOCATION ("warmelt-normal.melt:633:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1069*/ meltfptr[1068])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1069*/ meltfptr[1068])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1069*/ meltfptr[1068]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1070*/ meltfptr[1069]); MELT_LOCATION ("warmelt-normal.melt:633:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1069*/ meltfptr[1068])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1069*/ meltfptr[1068])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1069*/ meltfptr[1068]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1066*/ meltfptr[1065]); MELT_LOCATION ("warmelt-normal.melt:633:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1069*/ meltfptr[1068]); MELT_LOCATION ("warmelt-normal.melt:633:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1069*/ meltfptr[1068], "new static instance"); /*putupl#585 */ melt_assertmsg ("putupl #585 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1071*/ meltfptr[1070])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #585 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1071*/ meltfptr[1070])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1071*/ meltfptr[1070]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#586 */ melt_assertmsg ("putupl #586 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1071*/ meltfptr[1070])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #586 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1071*/ meltfptr[1070])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1071*/ meltfptr[1070]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1045*/ meltfptr[1044]); /*putupl#587 */ melt_assertmsg ("putupl #587 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1071*/ meltfptr[1070])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #587 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1071*/ meltfptr[1070])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1071*/ meltfptr[1070]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1047*/ meltfptr[1046]); /*putupl#588 */ melt_assertmsg ("putupl #588 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1071*/ meltfptr[1070])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #588 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1071*/ meltfptr[1070])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1071*/ meltfptr[1070]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1049*/ meltfptr[1048]); /*putupl#589 */ melt_assertmsg ("putupl #589 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1071*/ meltfptr[1070])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #589 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1071*/ meltfptr[1070])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1071*/ meltfptr[1070]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V1069*/ meltfptr[1068]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1071*/ meltfptr[1070]); MELT_LOCATION ("warmelt-normal.melt:633:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1066*/ meltfptr[1065])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1066*/ meltfptr[1065])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1066*/ meltfptr[1065]))-> obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1071*/ meltfptr[1070]); MELT_LOCATION ("warmelt-normal.melt:633:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1066*/ meltfptr[1065]); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_16 */ void meltmod__warmelt_normal__initialmeltchunk_17 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-normal.melt:633:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1066*/ meltfptr[1065], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1072*/ meltfptr[1071])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1072*/ meltfptr[1071])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1072*/ meltfptr[1071]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1073*/ meltfptr[1072]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1072*/ meltfptr[1071]); melt_dbgtrace_written_object ( /*_.VALDATA___V1072*/ meltfptr[1071], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1074*/ meltfptr[1073])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1074*/ meltfptr[1073])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1074*/ meltfptr[1073]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1075*/ meltfptr[1074]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1074*/ meltfptr[1073]); melt_dbgtrace_written_object ( /*_.VALDATA___V1074*/ meltfptr[1073], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:639:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1076*/ meltfptr[1075])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1076*/ meltfptr[1075])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1076*/ meltfptr[1075]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1077*/ meltfptr[1076]); MELT_LOCATION ("warmelt-normal.melt:639:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1076*/ meltfptr[1075])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1076*/ meltfptr[1075])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1076*/ meltfptr[1075]))-> obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V1066*/ meltfptr[1065]); /*putupl#590 */ melt_assertmsg ("putupl #590 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1078*/ meltfptr[1077])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #590 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1078*/ meltfptr[1077])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1078*/ meltfptr[1077]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#591 */ melt_assertmsg ("putupl #591 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1078*/ meltfptr[1077])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #591 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1078*/ meltfptr[1077])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1078*/ meltfptr[1077]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#592 */ melt_assertmsg ("putupl #592 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1078*/ meltfptr[1077])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #592 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1078*/ meltfptr[1077])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1078*/ meltfptr[1077]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V186*/ meltfptr[185]); /*putupl#593 */ melt_assertmsg ("putupl #593 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1078*/ meltfptr[1077])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #593 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1078*/ meltfptr[1077])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1078*/ meltfptr[1077]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1042*/ meltfptr[1041]); /*putupl#594 */ melt_assertmsg ("putupl #594 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1078*/ meltfptr[1077])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #594 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1078*/ meltfptr[1077])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1078*/ meltfptr[1077]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V1066*/ meltfptr[1065]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1078*/ meltfptr[1077]); MELT_LOCATION ("warmelt-normal.melt:639:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1076*/ meltfptr[1075])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1076*/ meltfptr[1075])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1076*/ meltfptr[1075]))-> obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1078*/ meltfptr[1077]); /*putupl#595 */ melt_assertmsg ("putupl #595 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1079*/ meltfptr[1078])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #595 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1079*/ meltfptr[1078])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1079*/ meltfptr[1078]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#596 */ melt_assertmsg ("putupl #596 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1079*/ meltfptr[1078])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #596 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1079*/ meltfptr[1078])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1079*/ meltfptr[1078]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1045*/ meltfptr[1044]); /*putupl#597 */ melt_assertmsg ("putupl #597 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1079*/ meltfptr[1078])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #597 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1079*/ meltfptr[1078])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1079*/ meltfptr[1078]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1047*/ meltfptr[1046]); /*putupl#598 */ melt_assertmsg ("putupl #598 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1079*/ meltfptr[1078])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #598 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1079*/ meltfptr[1078])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1079*/ meltfptr[1078]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1049*/ meltfptr[1048]); /*putupl#599 */ melt_assertmsg ("putupl #599 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1079*/ meltfptr[1078])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #599 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1079*/ meltfptr[1078])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1079*/ meltfptr[1078]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V1069*/ meltfptr[1068]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1079*/ meltfptr[1078]); MELT_LOCATION ("warmelt-normal.melt:639:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1076*/ meltfptr[1075])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1076*/ meltfptr[1075])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1076*/ meltfptr[1075]))-> obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1079*/ meltfptr[1078]); MELT_LOCATION ("warmelt-normal.melt:639:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1076*/ meltfptr[1075]); MELT_LOCATION ("warmelt-normal.melt:639:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1076*/ meltfptr[1075], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1080*/ meltfptr[1079])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1080*/ meltfptr[1079])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1080*/ meltfptr[1079]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1081*/ meltfptr[1080]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1080*/ meltfptr[1079]); melt_dbgtrace_written_object ( /*_.VALDATA___V1080*/ meltfptr[1079], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:645:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1082*/ meltfptr[1081])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1082*/ meltfptr[1081])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1082*/ meltfptr[1081]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1083*/ meltfptr[1082]); MELT_LOCATION ("warmelt-normal.melt:645:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1082*/ meltfptr[1081])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1082*/ meltfptr[1081])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1082*/ meltfptr[1081]))-> obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V186*/ meltfptr[185]); /*putupl#600 */ melt_assertmsg ("putupl #600 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1084*/ meltfptr[1083])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #600 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1084*/ meltfptr[1083])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1084*/ meltfptr[1083]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#601 */ melt_assertmsg ("putupl #601 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1084*/ meltfptr[1083])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #601 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1084*/ meltfptr[1083])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1084*/ meltfptr[1083]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#602 */ melt_assertmsg ("putupl #602 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1084*/ meltfptr[1083])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #602 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1084*/ meltfptr[1083])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1084*/ meltfptr[1083]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V186*/ meltfptr[185]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1084*/ meltfptr[1083]); MELT_LOCATION ("warmelt-normal.melt:645:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1082*/ meltfptr[1081])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1082*/ meltfptr[1081])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1082*/ meltfptr[1081]))-> obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1084*/ meltfptr[1083]); MELT_LOCATION ("warmelt-normal.melt:645:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1085*/ meltfptr[1084])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1085*/ meltfptr[1084])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1085*/ meltfptr[1084]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1086*/ meltfptr[1085]); MELT_LOCATION ("warmelt-normal.melt:645:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1085*/ meltfptr[1084])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1085*/ meltfptr[1084])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1085*/ meltfptr[1084]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1082*/ meltfptr[1081]); MELT_LOCATION ("warmelt-normal.melt:645:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1085*/ meltfptr[1084]); MELT_LOCATION ("warmelt-normal.melt:645:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1085*/ meltfptr[1084], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:645:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1087*/ meltfptr[1086])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1087*/ meltfptr[1086])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1087*/ meltfptr[1086]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1088*/ meltfptr[1087]); MELT_LOCATION ("warmelt-normal.melt:645:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1087*/ meltfptr[1086])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1087*/ meltfptr[1086])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1087*/ meltfptr[1086]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1082*/ meltfptr[1081]); MELT_LOCATION ("warmelt-normal.melt:645:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1087*/ meltfptr[1086]); MELT_LOCATION ("warmelt-normal.melt:645:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1087*/ meltfptr[1086], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:645:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1089*/ meltfptr[1088])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1089*/ meltfptr[1088])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1089*/ meltfptr[1088]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1090*/ meltfptr[1089]); MELT_LOCATION ("warmelt-normal.melt:645:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1089*/ meltfptr[1088])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1089*/ meltfptr[1088])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1089*/ meltfptr[1088]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1082*/ meltfptr[1081]); MELT_LOCATION ("warmelt-normal.melt:645:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1089*/ meltfptr[1088]); MELT_LOCATION ("warmelt-normal.melt:645:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1089*/ meltfptr[1088], "new static instance"); /*putupl#603 */ melt_assertmsg ("putupl #603 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1091*/ meltfptr[1090])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #603 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1091*/ meltfptr[1090])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1091*/ meltfptr[1090]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#604 */ melt_assertmsg ("putupl #604 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1091*/ meltfptr[1090])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #604 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1091*/ meltfptr[1090])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1091*/ meltfptr[1090]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1085*/ meltfptr[1084]); /*putupl#605 */ melt_assertmsg ("putupl #605 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1091*/ meltfptr[1090])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #605 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1091*/ meltfptr[1090])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1091*/ meltfptr[1090]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1087*/ meltfptr[1086]); /*putupl#606 */ melt_assertmsg ("putupl #606 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1091*/ meltfptr[1090])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #606 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1091*/ meltfptr[1090])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1091*/ meltfptr[1090]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1089*/ meltfptr[1088]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1091*/ meltfptr[1090]); MELT_LOCATION ("warmelt-normal.melt:645:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1082*/ meltfptr[1081])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1082*/ meltfptr[1081])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1082*/ meltfptr[1081]))-> obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1091*/ meltfptr[1090]); MELT_LOCATION ("warmelt-normal.melt:645:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1082*/ meltfptr[1081]); MELT_LOCATION ("warmelt-normal.melt:645:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1082*/ meltfptr[1081], "new static instance"); /*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) ( /*_.VALSTR___V1093*/ meltfptr[1092]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1092*/ meltfptr[1091]); melt_dbgtrace_written_object ( /*_.VALDATA___V1092*/ meltfptr[1091], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1094*/ meltfptr[1093])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1094*/ meltfptr[1093])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1094*/ meltfptr[1093]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1095*/ meltfptr[1094]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1094*/ meltfptr[1093]); melt_dbgtrace_written_object ( /*_.VALDATA___V1094*/ meltfptr[1093], "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"); /*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) ( /*_.VALSTR___V1099*/ meltfptr[1098]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1098*/ meltfptr[1097]); melt_dbgtrace_written_object ( /*_.VALDATA___V1098*/ meltfptr[1097], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:653:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1100*/ meltfptr[1099])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1100*/ meltfptr[1099])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1100*/ meltfptr[1099]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1101*/ meltfptr[1100]); MELT_LOCATION ("warmelt-normal.melt:653:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1100*/ meltfptr[1099])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1100*/ meltfptr[1099])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1100*/ meltfptr[1099]))-> obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V1082*/ meltfptr[1081]); /*putupl#607 */ melt_assertmsg ("putupl #607 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1102*/ meltfptr[1101])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #607 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1102*/ meltfptr[1101])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1102*/ meltfptr[1101]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#608 */ melt_assertmsg ("putupl #608 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1102*/ meltfptr[1101])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #608 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1102*/ meltfptr[1101])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1102*/ meltfptr[1101]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#609 */ melt_assertmsg ("putupl #609 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1102*/ meltfptr[1101])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #609 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1102*/ meltfptr[1101])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1102*/ meltfptr[1101]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V186*/ meltfptr[185]); /*putupl#610 */ melt_assertmsg ("putupl #610 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1102*/ meltfptr[1101])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #610 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1102*/ meltfptr[1101])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1102*/ meltfptr[1101]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1082*/ meltfptr[1081]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1102*/ meltfptr[1101]); MELT_LOCATION ("warmelt-normal.melt:653:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1100*/ meltfptr[1099])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1100*/ meltfptr[1099])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1100*/ meltfptr[1099]))-> obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1102*/ meltfptr[1101]); /*putupl#611 */ melt_assertmsg ("putupl #611 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1103*/ meltfptr[1102])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #611 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1103*/ meltfptr[1102])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1103*/ meltfptr[1102]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#612 */ melt_assertmsg ("putupl #612 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1103*/ meltfptr[1102])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #612 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1103*/ meltfptr[1102])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1103*/ meltfptr[1102]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1085*/ meltfptr[1084]); /*putupl#613 */ melt_assertmsg ("putupl #613 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1103*/ meltfptr[1102])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #613 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1103*/ meltfptr[1102])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1103*/ meltfptr[1102]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1087*/ meltfptr[1086]); /*putupl#614 */ melt_assertmsg ("putupl #614 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1103*/ meltfptr[1102])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #614 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1103*/ meltfptr[1102])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1103*/ meltfptr[1102]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1089*/ meltfptr[1088]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1103*/ meltfptr[1102]); MELT_LOCATION ("warmelt-normal.melt:653:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1100*/ meltfptr[1099])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1100*/ meltfptr[1099])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1100*/ meltfptr[1099]))-> obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1103*/ meltfptr[1102]); MELT_LOCATION ("warmelt-normal.melt:653:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1100*/ meltfptr[1099]); MELT_LOCATION ("warmelt-normal.melt:653:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1100*/ meltfptr[1099], "new static instance"); /*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) ( /*_.VALSTR___V1105*/ meltfptr[1104]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1104*/ meltfptr[1103]); melt_dbgtrace_written_object ( /*_.VALDATA___V1104*/ meltfptr[1103], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:658:/ 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-normal.melt:658:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1106*/ meltfptr[1105])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1106*/ meltfptr[1105])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1106*/ meltfptr[1105]))-> obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V1082*/ meltfptr[1081]); /*putupl#615 */ melt_assertmsg ("putupl #615 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1108*/ meltfptr[1107])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #615 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1108*/ meltfptr[1107])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1108*/ meltfptr[1107]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#616 */ melt_assertmsg ("putupl #616 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1108*/ meltfptr[1107])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #616 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1108*/ meltfptr[1107])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1108*/ meltfptr[1107]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#617 */ melt_assertmsg ("putupl #617 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1108*/ meltfptr[1107])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #617 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1108*/ meltfptr[1107])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1108*/ meltfptr[1107]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V186*/ meltfptr[185]); /*putupl#618 */ melt_assertmsg ("putupl #618 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1108*/ meltfptr[1107])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #618 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1108*/ meltfptr[1107])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1108*/ meltfptr[1107]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1082*/ meltfptr[1081]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1108*/ meltfptr[1107]); MELT_LOCATION ("warmelt-normal.melt:658:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1106*/ meltfptr[1105])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1106*/ meltfptr[1105])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1106*/ meltfptr[1105]))-> obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1108*/ meltfptr[1107]); MELT_LOCATION ("warmelt-normal.melt:658:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1109*/ meltfptr[1108])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1109*/ meltfptr[1108])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1109*/ meltfptr[1108]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1110*/ meltfptr[1109]); MELT_LOCATION ("warmelt-normal.melt:658:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1109*/ meltfptr[1108])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1109*/ meltfptr[1108])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1109*/ meltfptr[1108]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1106*/ meltfptr[1105]); MELT_LOCATION ("warmelt-normal.melt:658:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1109*/ meltfptr[1108]); MELT_LOCATION ("warmelt-normal.melt:658:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1109*/ meltfptr[1108], "new static instance"); /*putupl#619 */ melt_assertmsg ("putupl #619 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #619 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#620 */ melt_assertmsg ("putupl #620 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #620 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1085*/ meltfptr[1084]); /*putupl#621 */ melt_assertmsg ("putupl #621 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #621 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1087*/ meltfptr[1086]); /*putupl#622 */ melt_assertmsg ("putupl #622 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #622 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1089*/ meltfptr[1088]); /*putupl#623 */ melt_assertmsg ("putupl #623 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #623 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V1109*/ meltfptr[1108]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1111*/ meltfptr[1110]); MELT_LOCATION ("warmelt-normal.melt:658:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1106*/ meltfptr[1105])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1106*/ meltfptr[1105])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1106*/ meltfptr[1105]))-> obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110]); MELT_LOCATION ("warmelt-normal.melt:658:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1106*/ meltfptr[1105]); MELT_LOCATION ("warmelt-normal.melt:658:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1106*/ meltfptr[1105], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1112*/ meltfptr[1111])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1112*/ meltfptr[1111])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1112*/ meltfptr[1111]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1113*/ meltfptr[1112]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1112*/ meltfptr[1111]); melt_dbgtrace_written_object ( /*_.VALDATA___V1112*/ meltfptr[1111], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1114*/ meltfptr[1113])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1114*/ meltfptr[1113])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1114*/ meltfptr[1113]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1115*/ meltfptr[1114]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1114*/ meltfptr[1113]); melt_dbgtrace_written_object ( /*_.VALDATA___V1114*/ meltfptr[1113], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:665:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1116*/ meltfptr[1115])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1116*/ meltfptr[1115])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1116*/ meltfptr[1115]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1117*/ meltfptr[1116]); MELT_LOCATION ("warmelt-normal.melt:665:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1116*/ meltfptr[1115])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1116*/ meltfptr[1115])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1116*/ meltfptr[1115]))-> obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V1082*/ meltfptr[1081]); /*putupl#624 */ melt_assertmsg ("putupl #624 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1118*/ meltfptr[1117])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #624 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1118*/ meltfptr[1117])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1118*/ meltfptr[1117]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#625 */ melt_assertmsg ("putupl #625 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1118*/ meltfptr[1117])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #625 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1118*/ meltfptr[1117])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1118*/ meltfptr[1117]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#626 */ melt_assertmsg ("putupl #626 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1118*/ meltfptr[1117])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #626 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1118*/ meltfptr[1117])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1118*/ meltfptr[1117]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V186*/ meltfptr[185]); /*putupl#627 */ melt_assertmsg ("putupl #627 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1118*/ meltfptr[1117])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #627 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1118*/ meltfptr[1117])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1118*/ meltfptr[1117]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1082*/ meltfptr[1081]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1118*/ meltfptr[1117]); MELT_LOCATION ("warmelt-normal.melt:665:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1116*/ meltfptr[1115])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1116*/ meltfptr[1115])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1116*/ meltfptr[1115]))-> obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1118*/ meltfptr[1117]); MELT_LOCATION ("warmelt-normal.melt:665:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1119*/ meltfptr[1118])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1119*/ meltfptr[1118])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1119*/ meltfptr[1118]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1120*/ meltfptr[1119]); MELT_LOCATION ("warmelt-normal.melt:665:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1119*/ meltfptr[1118])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1119*/ meltfptr[1118])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1119*/ meltfptr[1118]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1116*/ meltfptr[1115]); MELT_LOCATION ("warmelt-normal.melt:665:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1119*/ meltfptr[1118]); MELT_LOCATION ("warmelt-normal.melt:665:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1119*/ meltfptr[1118], "new static instance"); /*putupl#628 */ melt_assertmsg ("putupl #628 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #628 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#629 */ melt_assertmsg ("putupl #629 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #629 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1085*/ meltfptr[1084]); /*putupl#630 */ melt_assertmsg ("putupl #630 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #630 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1087*/ meltfptr[1086]); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_17 */ void meltmod__warmelt_normal__initialmeltchunk_18 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*putupl#631*/ melt_assertmsg ("putupl #631 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #631 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1089*/ meltfptr[1088]); /*putupl#632 */ melt_assertmsg ("putupl #632 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #632 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V1119*/ meltfptr[1118]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1121*/ meltfptr[1120]); MELT_LOCATION ("warmelt-normal.melt:665:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1116*/ meltfptr[1115])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1116*/ meltfptr[1115])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1116*/ meltfptr[1115]))-> obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120]); MELT_LOCATION ("warmelt-normal.melt:665:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1116*/ meltfptr[1115]); MELT_LOCATION ("warmelt-normal.melt:665:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1116*/ meltfptr[1115], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1122*/ meltfptr[1121])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1122*/ meltfptr[1121])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1122*/ meltfptr[1121]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1123*/ meltfptr[1122]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1122*/ meltfptr[1121]); melt_dbgtrace_written_object ( /*_.VALDATA___V1122*/ meltfptr[1121], "new static instance"); /*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-normal.melt:672:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1126*/ meltfptr[1125])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1126*/ meltfptr[1125])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1126*/ meltfptr[1125]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1127*/ meltfptr[1126]); MELT_LOCATION ("warmelt-normal.melt:672:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1126*/ meltfptr[1125])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1126*/ meltfptr[1125])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1126*/ meltfptr[1125]))-> obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V882*/ meltfptr[881]); /*putupl#633 */ melt_assertmsg ("putupl #633 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1128*/ meltfptr[1127])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #633 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1128*/ meltfptr[1127])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1128*/ meltfptr[1127]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#634 */ melt_assertmsg ("putupl #634 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1128*/ meltfptr[1127])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #634 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1128*/ meltfptr[1127])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1128*/ meltfptr[1127]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#635 */ melt_assertmsg ("putupl #635 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1128*/ meltfptr[1127])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #635 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1128*/ meltfptr[1127])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1128*/ meltfptr[1127]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V882*/ meltfptr[881]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1128*/ meltfptr[1127]); MELT_LOCATION ("warmelt-normal.melt:672:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1126*/ meltfptr[1125])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1126*/ meltfptr[1125])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1126*/ meltfptr[1125]))-> obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1128*/ meltfptr[1127]); /*putupl#636 */ melt_assertmsg ("putupl #636 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1129*/ meltfptr[1128])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #636 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1129*/ meltfptr[1128])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1129*/ meltfptr[1128]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1129*/ meltfptr[1128]); MELT_LOCATION ("warmelt-normal.melt:672:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1126*/ meltfptr[1125])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1126*/ meltfptr[1125])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1126*/ meltfptr[1125]))-> obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1129*/ meltfptr[1128]); MELT_LOCATION ("warmelt-normal.melt:672:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1126*/ meltfptr[1125]); MELT_LOCATION ("warmelt-normal.melt:672:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1126*/ meltfptr[1125], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1130*/ meltfptr[1129])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1130*/ meltfptr[1129])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1130*/ meltfptr[1129]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1131*/ meltfptr[1130]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1130*/ meltfptr[1129]); melt_dbgtrace_written_object ( /*_.VALDATA___V1130*/ meltfptr[1129], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:678:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1132*/ meltfptr[1131])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1132*/ meltfptr[1131])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1132*/ meltfptr[1131]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1133*/ meltfptr[1132]); MELT_LOCATION ("warmelt-normal.melt:678:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1132*/ meltfptr[1131])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1132*/ meltfptr[1131])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1132*/ meltfptr[1131]))-> obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V1082*/ meltfptr[1081]); /*putupl#637 */ melt_assertmsg ("putupl #637 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1134*/ meltfptr[1133])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #637 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1134*/ meltfptr[1133])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1134*/ meltfptr[1133]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#638 */ melt_assertmsg ("putupl #638 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1134*/ meltfptr[1133])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #638 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1134*/ meltfptr[1133])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1134*/ meltfptr[1133]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#639 */ melt_assertmsg ("putupl #639 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1134*/ meltfptr[1133])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #639 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1134*/ meltfptr[1133])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1134*/ meltfptr[1133]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V186*/ meltfptr[185]); /*putupl#640 */ melt_assertmsg ("putupl #640 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1134*/ meltfptr[1133])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #640 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1134*/ meltfptr[1133])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1134*/ meltfptr[1133]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1082*/ meltfptr[1081]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1134*/ meltfptr[1133]); MELT_LOCATION ("warmelt-normal.melt:678:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1132*/ meltfptr[1131])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1132*/ meltfptr[1131])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1132*/ meltfptr[1131]))-> obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1134*/ meltfptr[1133]); /*putupl#641 */ melt_assertmsg ("putupl #641 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1135*/ meltfptr[1134])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #641 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1135*/ meltfptr[1134])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1135*/ meltfptr[1134]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#642 */ melt_assertmsg ("putupl #642 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1135*/ meltfptr[1134])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #642 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1135*/ meltfptr[1134])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1135*/ meltfptr[1134]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1085*/ meltfptr[1084]); /*putupl#643 */ melt_assertmsg ("putupl #643 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1135*/ meltfptr[1134])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #643 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1135*/ meltfptr[1134])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1135*/ meltfptr[1134]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1087*/ meltfptr[1086]); /*putupl#644 */ melt_assertmsg ("putupl #644 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1135*/ meltfptr[1134])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #644 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1135*/ meltfptr[1134])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1135*/ meltfptr[1134]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1089*/ meltfptr[1088]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1135*/ meltfptr[1134]); MELT_LOCATION ("warmelt-normal.melt:678:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1132*/ meltfptr[1131])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1132*/ meltfptr[1131])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1132*/ meltfptr[1131]))-> obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1135*/ meltfptr[1134]); MELT_LOCATION ("warmelt-normal.melt:678:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1132*/ meltfptr[1131]); MELT_LOCATION ("warmelt-normal.melt:678:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1132*/ meltfptr[1131], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1136*/ meltfptr[1135])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1136*/ meltfptr[1135])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1136*/ meltfptr[1135]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1137*/ meltfptr[1136]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1136*/ meltfptr[1135]); melt_dbgtrace_written_object ( /*_.VALDATA___V1136*/ meltfptr[1135], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:684:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1138*/ meltfptr[1137])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1138*/ meltfptr[1137])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1138*/ meltfptr[1137]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1139*/ meltfptr[1138]); MELT_LOCATION ("warmelt-normal.melt:684:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1138*/ meltfptr[1137])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1138*/ meltfptr[1137])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1138*/ meltfptr[1137]))-> obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V882*/ meltfptr[881]); /*putupl#645 */ melt_assertmsg ("putupl #645 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1140*/ meltfptr[1139])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #645 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1140*/ meltfptr[1139])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1140*/ meltfptr[1139]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#646 */ melt_assertmsg ("putupl #646 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1140*/ meltfptr[1139])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #646 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1140*/ meltfptr[1139])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1140*/ meltfptr[1139]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#647 */ melt_assertmsg ("putupl #647 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1140*/ meltfptr[1139])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #647 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1140*/ meltfptr[1139])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1140*/ meltfptr[1139]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V882*/ meltfptr[881]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1140*/ meltfptr[1139]); MELT_LOCATION ("warmelt-normal.melt:684:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1138*/ meltfptr[1137])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1138*/ meltfptr[1137])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1138*/ meltfptr[1137]))-> obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1140*/ meltfptr[1139]); /*putupl#648 */ melt_assertmsg ("putupl #648 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1141*/ meltfptr[1140])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #648 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1141*/ meltfptr[1140])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1141*/ meltfptr[1140]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1141*/ meltfptr[1140]); MELT_LOCATION ("warmelt-normal.melt:684:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1138*/ meltfptr[1137])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1138*/ meltfptr[1137])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1138*/ meltfptr[1137]))-> obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1141*/ meltfptr[1140]); MELT_LOCATION ("warmelt-normal.melt:684:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1138*/ meltfptr[1137]); MELT_LOCATION ("warmelt-normal.melt:684:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1138*/ meltfptr[1137], "new static instance"); /*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-normal.melt:692:/ 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-normal.melt:692:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1144*/ meltfptr[1143])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1144*/ meltfptr[1143])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1144*/ meltfptr[1143]))-> obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*putupl#649 */ melt_assertmsg ("putupl #649 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1146*/ meltfptr[1145])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #649 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1146*/ meltfptr[1145])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1146*/ meltfptr[1145]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#650 */ melt_assertmsg ("putupl #650 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1146*/ meltfptr[1145])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #650 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1146*/ meltfptr[1145])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1146*/ meltfptr[1145]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#651 */ melt_assertmsg ("putupl #651 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1146*/ meltfptr[1145])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #651 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1146*/ meltfptr[1145])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1146*/ meltfptr[1145]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1146*/ meltfptr[1145]); MELT_LOCATION ("warmelt-normal.melt:692:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1144*/ meltfptr[1143])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1144*/ meltfptr[1143])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1144*/ meltfptr[1143]))-> obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1146*/ meltfptr[1145]); MELT_LOCATION ("warmelt-normal.melt:692:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1147*/ meltfptr[1146])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1147*/ meltfptr[1146])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1147*/ meltfptr[1146]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1148*/ meltfptr[1147]); MELT_LOCATION ("warmelt-normal.melt:692:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1147*/ meltfptr[1146])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1147*/ meltfptr[1146])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1147*/ meltfptr[1146]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1144*/ meltfptr[1143]); MELT_LOCATION ("warmelt-normal.melt:692:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1147*/ meltfptr[1146]); MELT_LOCATION ("warmelt-normal.melt:692:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1147*/ meltfptr[1146], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:692:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1149*/ meltfptr[1148])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1149*/ meltfptr[1148])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1149*/ meltfptr[1148]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1150*/ meltfptr[1149]); MELT_LOCATION ("warmelt-normal.melt:692:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1149*/ meltfptr[1148])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1149*/ meltfptr[1148])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1149*/ meltfptr[1148]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1144*/ meltfptr[1143]); MELT_LOCATION ("warmelt-normal.melt:692:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1149*/ meltfptr[1148]); MELT_LOCATION ("warmelt-normal.melt:692:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1149*/ meltfptr[1148], "new static instance"); /*putupl#652 */ melt_assertmsg ("putupl #652 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1151*/ meltfptr[1150])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #652 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1151*/ meltfptr[1150])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1151*/ meltfptr[1150]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#653 */ melt_assertmsg ("putupl #653 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1151*/ meltfptr[1150])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #653 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1151*/ meltfptr[1150])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1151*/ meltfptr[1150]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1147*/ meltfptr[1146]); /*putupl#654 */ melt_assertmsg ("putupl #654 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1151*/ meltfptr[1150])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #654 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1151*/ meltfptr[1150])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1151*/ meltfptr[1150]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1149*/ meltfptr[1148]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1151*/ meltfptr[1150]); MELT_LOCATION ("warmelt-normal.melt:692:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1144*/ meltfptr[1143])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1144*/ meltfptr[1143])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1144*/ meltfptr[1143]))-> obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1151*/ meltfptr[1150]); MELT_LOCATION ("warmelt-normal.melt:692:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1144*/ meltfptr[1143]); MELT_LOCATION ("warmelt-normal.melt:692:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1144*/ meltfptr[1143], "new static instance"); /*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"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1154*/ meltfptr[1153])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1154*/ meltfptr[1153])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1154*/ meltfptr[1153]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1155*/ meltfptr[1154]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1154*/ meltfptr[1153]); melt_dbgtrace_written_object ( /*_.VALDATA___V1154*/ meltfptr[1153], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1156*/ meltfptr[1155])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1156*/ meltfptr[1155])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1156*/ meltfptr[1155]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1157*/ meltfptr[1156]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1156*/ meltfptr[1155]); melt_dbgtrace_written_object ( /*_.VALDATA___V1156*/ meltfptr[1155], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:701:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1158*/ meltfptr[1157])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1158*/ meltfptr[1157])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1158*/ meltfptr[1157]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1159*/ meltfptr[1158]); MELT_LOCATION ("warmelt-normal.melt:701:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1158*/ meltfptr[1157])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1158*/ meltfptr[1157])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1158*/ meltfptr[1157]))-> obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*putupl#655 */ melt_assertmsg ("putupl #655 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1160*/ meltfptr[1159])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #655 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1160*/ meltfptr[1159])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1160*/ meltfptr[1159]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#656 */ melt_assertmsg ("putupl #656 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1160*/ meltfptr[1159])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #656 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1160*/ meltfptr[1159])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1160*/ meltfptr[1159]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#657 */ melt_assertmsg ("putupl #657 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1160*/ meltfptr[1159])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #657 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1160*/ meltfptr[1159])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1160*/ meltfptr[1159]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1160*/ meltfptr[1159]); MELT_LOCATION ("warmelt-normal.melt:701:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1158*/ meltfptr[1157])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1158*/ meltfptr[1157])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1158*/ meltfptr[1157]))-> obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1160*/ meltfptr[1159]); MELT_LOCATION ("warmelt-normal.melt:701:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1161*/ meltfptr[1160])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1161*/ meltfptr[1160])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1161*/ meltfptr[1160]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1162*/ meltfptr[1161]); MELT_LOCATION ("warmelt-normal.melt:701:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1161*/ meltfptr[1160])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1161*/ meltfptr[1160])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1161*/ meltfptr[1160]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1158*/ meltfptr[1157]); MELT_LOCATION ("warmelt-normal.melt:701:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1161*/ meltfptr[1160]); MELT_LOCATION ("warmelt-normal.melt:701:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1161*/ meltfptr[1160], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:701:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1163*/ meltfptr[1162])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1163*/ meltfptr[1162])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1163*/ meltfptr[1162]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1164*/ meltfptr[1163]); MELT_LOCATION ("warmelt-normal.melt:701:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1163*/ meltfptr[1162])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1163*/ meltfptr[1162])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1163*/ meltfptr[1162]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1158*/ meltfptr[1157]); MELT_LOCATION ("warmelt-normal.melt:701:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1163*/ meltfptr[1162]); MELT_LOCATION ("warmelt-normal.melt:701:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1163*/ meltfptr[1162], "new static instance"); /*putupl#658 */ melt_assertmsg ("putupl #658 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1165*/ meltfptr[1164])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #658 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1165*/ meltfptr[1164])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1165*/ meltfptr[1164]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#659 */ melt_assertmsg ("putupl #659 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1165*/ meltfptr[1164])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #659 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1165*/ meltfptr[1164])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1165*/ meltfptr[1164]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1161*/ meltfptr[1160]); /*putupl#660 */ melt_assertmsg ("putupl #660 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1165*/ meltfptr[1164])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #660 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1165*/ meltfptr[1164])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1165*/ meltfptr[1164]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1163*/ meltfptr[1162]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1165*/ meltfptr[1164]); MELT_LOCATION ("warmelt-normal.melt:701:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1158*/ meltfptr[1157])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1158*/ meltfptr[1157])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1158*/ meltfptr[1157]))-> obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1165*/ meltfptr[1164]); MELT_LOCATION ("warmelt-normal.melt:701:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1158*/ meltfptr[1157]); MELT_LOCATION ("warmelt-normal.melt:701:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1158*/ meltfptr[1157], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1166*/ meltfptr[1165])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1166*/ meltfptr[1165])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1166*/ meltfptr[1165]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1167*/ meltfptr[1166]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1166*/ meltfptr[1165]); melt_dbgtrace_written_object ( /*_.VALDATA___V1166*/ meltfptr[1165], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1168*/ meltfptr[1167])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1168*/ meltfptr[1167])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1168*/ meltfptr[1167]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1169*/ meltfptr[1168]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1168*/ meltfptr[1167]); melt_dbgtrace_written_object ( /*_.VALDATA___V1168*/ meltfptr[1167], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1170*/ meltfptr[1169])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1170*/ meltfptr[1169])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1170*/ meltfptr[1169]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1171*/ meltfptr[1170]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1170*/ meltfptr[1169]); melt_dbgtrace_written_object ( /*_.VALDATA___V1170*/ meltfptr[1169], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:708:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1172*/ meltfptr[1171])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1172*/ meltfptr[1171])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1172*/ meltfptr[1171]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1173*/ meltfptr[1172]); MELT_LOCATION ("warmelt-normal.melt:708:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1172*/ meltfptr[1171])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1172*/ meltfptr[1171])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1172*/ meltfptr[1171]))-> obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*putupl#661 */ melt_assertmsg ("putupl #661 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1174*/ meltfptr[1173])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #661 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1174*/ meltfptr[1173])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1174*/ meltfptr[1173]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#662 */ melt_assertmsg ("putupl #662 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1174*/ meltfptr[1173])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #662 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1174*/ meltfptr[1173])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1174*/ meltfptr[1173]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#663 */ melt_assertmsg ("putupl #663 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1174*/ meltfptr[1173])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #663 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1174*/ meltfptr[1173])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1174*/ meltfptr[1173]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_18 */ void meltmod__warmelt_normal__initialmeltchunk_19 (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___V1174*/ meltfptr[1173]); MELT_LOCATION ("warmelt-normal.melt:708:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1172*/ meltfptr[1171])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1172*/ meltfptr[1171])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1172*/ meltfptr[1171]))-> obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1174*/ meltfptr[1173]); MELT_LOCATION ("warmelt-normal.melt:708:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:708:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1175*/ meltfptr[1174])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1175*/ meltfptr[1174])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1175*/ meltfptr[1174]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1172*/ meltfptr[1171]); MELT_LOCATION ("warmelt-normal.melt:708:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1175*/ meltfptr[1174]); MELT_LOCATION ("warmelt-normal.melt:708:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1175*/ meltfptr[1174], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:708:/ 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-normal.melt:708:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1177*/ meltfptr[1176])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1177*/ meltfptr[1176])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1177*/ meltfptr[1176]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1172*/ meltfptr[1171]); MELT_LOCATION ("warmelt-normal.melt:708:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1177*/ meltfptr[1176]); MELT_LOCATION ("warmelt-normal.melt:708:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1177*/ meltfptr[1176], "new static instance"); /*putupl#664 */ melt_assertmsg ("putupl #664 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1179*/ meltfptr[1178])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #664 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) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#665 */ melt_assertmsg ("putupl #665 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1179*/ meltfptr[1178])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #665 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) ( /*_.VALDATA___V1175*/ meltfptr[1174]); /*putupl#666 */ melt_assertmsg ("putupl #666 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1179*/ meltfptr[1178])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #666 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) ( /*_.VALDATA___V1177*/ meltfptr[1176]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1179*/ meltfptr[1178]); MELT_LOCATION ("warmelt-normal.melt:708:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1172*/ meltfptr[1171])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1172*/ meltfptr[1171])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1172*/ meltfptr[1171]))-> obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1179*/ meltfptr[1178]); MELT_LOCATION ("warmelt-normal.melt:708:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1172*/ meltfptr[1171]); MELT_LOCATION ("warmelt-normal.melt:708:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1172*/ meltfptr[1171], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1180*/ meltfptr[1179]); melt_dbgtrace_written_object ( /*_.VALDATA___V1180*/ meltfptr[1179], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1182*/ meltfptr[1181]); melt_dbgtrace_written_object ( /*_.VALDATA___V1182*/ meltfptr[1181], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1184*/ meltfptr[1183]); melt_dbgtrace_written_object ( /*_.VALDATA___V1184*/ meltfptr[1183], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:715:/ 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-normal.melt:715:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1186*/ meltfptr[1185])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1186*/ meltfptr[1185])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1186*/ meltfptr[1185]))-> obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*putupl#667 */ melt_assertmsg ("putupl #667 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1188*/ meltfptr[1187])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #667 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1188*/ meltfptr[1187])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1188*/ meltfptr[1187]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#668 */ melt_assertmsg ("putupl #668 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1188*/ meltfptr[1187])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #668 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1188*/ meltfptr[1187])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1188*/ meltfptr[1187]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#669 */ melt_assertmsg ("putupl #669 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1188*/ meltfptr[1187])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #669 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1188*/ meltfptr[1187])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1188*/ meltfptr[1187]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1188*/ meltfptr[1187]); MELT_LOCATION ("warmelt-normal.melt:715:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1186*/ meltfptr[1185])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1186*/ meltfptr[1185])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1186*/ meltfptr[1185]))-> obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1188*/ meltfptr[1187]); MELT_LOCATION ("warmelt-normal.melt:715:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1189*/ meltfptr[1188])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1189*/ meltfptr[1188])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1189*/ meltfptr[1188]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1190*/ meltfptr[1189]); MELT_LOCATION ("warmelt-normal.melt:715:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1189*/ meltfptr[1188])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1189*/ meltfptr[1188])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1189*/ meltfptr[1188]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1186*/ meltfptr[1185]); MELT_LOCATION ("warmelt-normal.melt:715:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1189*/ meltfptr[1188]); MELT_LOCATION ("warmelt-normal.melt:715:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1189*/ meltfptr[1188], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:715:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1191*/ meltfptr[1190])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1191*/ meltfptr[1190])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1191*/ meltfptr[1190]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1192*/ meltfptr[1191]); MELT_LOCATION ("warmelt-normal.melt:715:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1191*/ meltfptr[1190])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1191*/ meltfptr[1190])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1191*/ meltfptr[1190]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1186*/ meltfptr[1185]); MELT_LOCATION ("warmelt-normal.melt:715:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1191*/ meltfptr[1190]); MELT_LOCATION ("warmelt-normal.melt:715:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1191*/ meltfptr[1190], "new static instance"); /*putupl#670 */ melt_assertmsg ("putupl #670 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1193*/ meltfptr[1192])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #670 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1193*/ meltfptr[1192])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1193*/ meltfptr[1192]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#671 */ melt_assertmsg ("putupl #671 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1193*/ meltfptr[1192])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #671 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1193*/ meltfptr[1192])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1193*/ meltfptr[1192]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1189*/ meltfptr[1188]); /*putupl#672 */ melt_assertmsg ("putupl #672 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1193*/ meltfptr[1192])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #672 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1193*/ meltfptr[1192])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1193*/ meltfptr[1192]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1191*/ meltfptr[1190]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1193*/ meltfptr[1192]); MELT_LOCATION ("warmelt-normal.melt:715:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1186*/ meltfptr[1185])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1186*/ meltfptr[1185])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1186*/ meltfptr[1185]))-> obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1193*/ meltfptr[1192]); MELT_LOCATION ("warmelt-normal.melt:715:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1186*/ meltfptr[1185]); MELT_LOCATION ("warmelt-normal.melt:715:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1186*/ meltfptr[1185], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1194*/ meltfptr[1193])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1194*/ meltfptr[1193])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1194*/ meltfptr[1193]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1195*/ meltfptr[1194]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1194*/ meltfptr[1193]); melt_dbgtrace_written_object ( /*_.VALDATA___V1194*/ meltfptr[1193], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1196*/ meltfptr[1195])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1196*/ meltfptr[1195])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1196*/ meltfptr[1195]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1197*/ meltfptr[1196]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1196*/ meltfptr[1195]); melt_dbgtrace_written_object ( /*_.VALDATA___V1196*/ meltfptr[1195], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1198*/ meltfptr[1197])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1198*/ meltfptr[1197])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1198*/ meltfptr[1197]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1199*/ meltfptr[1198]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1198*/ meltfptr[1197]); melt_dbgtrace_written_object ( /*_.VALDATA___V1198*/ meltfptr[1197], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:724:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1200*/ meltfptr[1199])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1200*/ meltfptr[1199])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1200*/ meltfptr[1199]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1201*/ meltfptr[1200]); MELT_LOCATION ("warmelt-normal.melt:724:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1200*/ meltfptr[1199])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1200*/ meltfptr[1199])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1200*/ meltfptr[1199]))-> obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*putupl#673 */ melt_assertmsg ("putupl #673 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1202*/ meltfptr[1201])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #673 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1202*/ meltfptr[1201])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1202*/ meltfptr[1201]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]); /*putupl#674 */ melt_assertmsg ("putupl #674 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1202*/ meltfptr[1201])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #674 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1202*/ meltfptr[1201])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1202*/ meltfptr[1201]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); /*putupl#675 */ melt_assertmsg ("putupl #675 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1202*/ meltfptr[1201])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #675 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1202*/ meltfptr[1201])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1202*/ meltfptr[1201]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1202*/ meltfptr[1201]); MELT_LOCATION ("warmelt-normal.melt:724:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1200*/ meltfptr[1199])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1200*/ meltfptr[1199])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1200*/ meltfptr[1199]))-> obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1202*/ meltfptr[1201]); MELT_LOCATION ("warmelt-normal.melt:724:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-normal.melt:724:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1203*/ meltfptr[1202])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1203*/ meltfptr[1202])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1203*/ meltfptr[1202]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1200*/ meltfptr[1199]); MELT_LOCATION ("warmelt-normal.melt:724:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1203*/ meltfptr[1202]); MELT_LOCATION ("warmelt-normal.melt:724:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1203*/ meltfptr[1202], "new static instance"); /*putupl#676 */ melt_assertmsg ("putupl #676 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1205*/ meltfptr[1204])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #676 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1205*/ meltfptr[1204])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1205*/ meltfptr[1204]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V179*/ meltfptr[178]); /*putupl#677 */ melt_assertmsg ("putupl #677 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1205*/ meltfptr[1204])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #677 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1205*/ meltfptr[1204])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1205*/ meltfptr[1204]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1203*/ meltfptr[1202]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1205*/ meltfptr[1204]); MELT_LOCATION ("warmelt-normal.melt:724:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1200*/ meltfptr[1199])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1200*/ meltfptr[1199])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1200*/ meltfptr[1199]))-> obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1205*/ meltfptr[1204]); MELT_LOCATION ("warmelt-normal.melt:724:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1200*/ meltfptr[1199]); MELT_LOCATION ("warmelt-normal.melt:724:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1200*/ meltfptr[1199], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1206*/ meltfptr[1205])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1206*/ meltfptr[1205])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1206*/ meltfptr[1205]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1207*/ meltfptr[1206]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1206*/ meltfptr[1205]); melt_dbgtrace_written_object ( /*_.VALDATA___V1206*/ meltfptr[1205], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1208*/ meltfptr[1207])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1208*/ meltfptr[1207])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1208*/ meltfptr[1207]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1209*/ meltfptr[1208]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1208*/ meltfptr[1207]); melt_dbgtrace_written_object ( /*_.VALDATA___V1208*/ meltfptr[1207], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:819:/ 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]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1212*/ meltfptr[1211]); MELT_LOCATION ("warmelt-normal.melt:819:/ 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) ( /*_.VALTUP___V1212*/ meltfptr[1211]); MELT_LOCATION ("warmelt-normal.melt:819:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1210*/ meltfptr[1209])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (3 >= 0 && 3 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1210*/ meltfptr[1209])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1210*/ meltfptr[1209]))-> obj_vartab[3] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_LONG)))); /*putupl#678 */ melt_assertmsg ("putupl #678 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1214*/ meltfptr[1213])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #678 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1214*/ meltfptr[1213])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1214*/ meltfptr[1213]))->tabval[0] = (melt_ptr_t) ( /*_.VALSTR___V1213*/ meltfptr[1212]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1214*/ meltfptr[1213]); MELT_LOCATION ("warmelt-normal.melt:819:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1210*/ meltfptr[1209])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1210*/ meltfptr[1209])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1210*/ meltfptr[1209]))-> obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V1214*/ meltfptr[1213]); MELT_LOCATION ("warmelt-normal.melt:819:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1210*/ meltfptr[1209]); MELT_LOCATION ("warmelt-normal.melt:819:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1210*/ meltfptr[1209], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1215*/ meltfptr[1214])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1044__ADD_NCTX_DATA#0", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1215*/ meltfptr[1214])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:828:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1215*/ meltfptr[1214])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V888*/ meltfptr[887]); ((meltroutine_ptr_t) /*_.VALROUT___V1215*/ meltfptr[1214])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V888*/ meltfptr[887]); MELT_LOCATION ("warmelt-normal.melt:828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1215*/ meltfptr[1214])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1044__ADD_NCTX_DATA#2", NULL != ( /*_.DISCR_INTEGER__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1215*/ meltfptr[1214])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normal.melt:828:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1215*/ meltfptr[1214]); /*putclosurout#1 */ melt_assertmsg ("putclosrout#1 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1216*/ meltfptr[1215])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#1 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1215*/ meltfptr[1214])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1216*/ meltfptr[1215])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1215*/ meltfptr[1214]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1216*/ meltfptr[1215]); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1217*/ meltfptr[1216]); melt_dbgtrace_written_object ( /*_.VALDATA___V1217*/ meltfptr[1216], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1219*/ meltfptr[1218])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1219*/ meltfptr[1218])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1219*/ meltfptr[1218]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1220*/ meltfptr[1219]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1219*/ meltfptr[1218]); melt_dbgtrace_written_object ( /*_.VALDATA___V1219*/ meltfptr[1218], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1222*/ meltfptr[1221])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1222*/ meltfptr[1221])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1222*/ meltfptr[1221]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1223*/ meltfptr[1222]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1222*/ meltfptr[1221]); melt_dbgtrace_written_object ( /*_.VALDATA___V1222*/ meltfptr[1221], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#0", NULL != ( /*_.VALDATA___V1222*/ meltfptr[1221])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V1222*/ meltfptr[1221]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1224*/ meltfptr[1223])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1224*/ meltfptr[1223])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1224*/ meltfptr[1223]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1225*/ meltfptr[1224]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1224*/ meltfptr[1223]); melt_dbgtrace_written_object ( /*_.VALDATA___V1224*/ meltfptr[1223], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#1", NULL != ( /*_.VALDATA___V1224*/ meltfptr[1223])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1224*/ meltfptr[1223]); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1226*/ meltfptr[1225]); melt_dbgtrace_written_object ( /*_.VALDATA___V1226*/ meltfptr[1225], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#2", NULL != ( /*_.VALDATA___V1226*/ meltfptr[1225])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1226*/ meltfptr[1225]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1228*/ meltfptr[1227])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1228*/ meltfptr[1227])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1228*/ meltfptr[1227]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1229*/ meltfptr[1228]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1228*/ meltfptr[1227]); melt_dbgtrace_written_object ( /*_.VALDATA___V1228*/ meltfptr[1227], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#3", NULL != ( /*_.VALDATA___V1228*/ meltfptr[1227])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1228*/ meltfptr[1227]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1230*/ meltfptr[1229])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1230*/ meltfptr[1229])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1230*/ meltfptr[1229]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1231*/ meltfptr[1230]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1230*/ meltfptr[1229]); melt_dbgtrace_written_object ( /*_.VALDATA___V1230*/ meltfptr[1229], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#4", NULL != ( /*_.VALDATA___V1230*/ meltfptr[1229])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V1230*/ meltfptr[1229]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1232*/ meltfptr[1231])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1232*/ meltfptr[1231])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1232*/ meltfptr[1231]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1233*/ meltfptr[1232]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1232*/ meltfptr[1231]); melt_dbgtrace_written_object ( /*_.VALDATA___V1232*/ meltfptr[1231], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#5", NULL != ( /*_.VALDATA___V1232*/ meltfptr[1231])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1232*/ meltfptr[1231]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1234*/ meltfptr[1233])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1234*/ meltfptr[1233])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1234*/ meltfptr[1233]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1235*/ meltfptr[1234]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1234*/ meltfptr[1233]); melt_dbgtrace_written_object ( /*_.VALDATA___V1234*/ meltfptr[1233], "new static instance"); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_19 */ void meltmod__warmelt_normal__initialmeltchunk_20 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#6", NULL != ( /*_.VALDATA___V1234*/ meltfptr[1233])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1234*/ meltfptr[1233]); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1236*/ meltfptr[1235]); melt_dbgtrace_written_object ( /*_.VALDATA___V1236*/ meltfptr[1235], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#7", NULL != ( /*_.VALDATA___V1236*/ meltfptr[1235])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V1236*/ meltfptr[1235]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1238*/ meltfptr[1237])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1238*/ meltfptr[1237])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1238*/ meltfptr[1237]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1239*/ meltfptr[1238]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1238*/ meltfptr[1237]); melt_dbgtrace_written_object ( /*_.VALDATA___V1238*/ meltfptr[1237], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#8", NULL != ( /*_.VALDATA___V1238*/ meltfptr[1237])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V1238*/ meltfptr[1237]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1240*/ meltfptr[1239])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1240*/ meltfptr[1239])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1240*/ meltfptr[1239]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1241*/ meltfptr[1240]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1240*/ meltfptr[1239]); melt_dbgtrace_written_object ( /*_.VALDATA___V1240*/ meltfptr[1239], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#9", NULL != ( /*_.VALDATA___V1240*/ meltfptr[1239])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V1240*/ meltfptr[1239]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1242*/ meltfptr[1241])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1242*/ meltfptr[1241])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1242*/ meltfptr[1241]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1243*/ meltfptr[1242]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1242*/ meltfptr[1241]); melt_dbgtrace_written_object ( /*_.VALDATA___V1242*/ meltfptr[1241], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#10", NULL != ( /*_.VALDATA___V1242*/ meltfptr[1241])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V1242*/ meltfptr[1241]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1244*/ meltfptr[1243])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1244*/ meltfptr[1243])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1244*/ meltfptr[1243]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1245*/ meltfptr[1244]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1244*/ meltfptr[1243]); melt_dbgtrace_written_object ( /*_.VALDATA___V1244*/ meltfptr[1243], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#11", NULL != ( /*_.VALDATA___V1244*/ meltfptr[1243])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V1244*/ meltfptr[1243]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1246*/ meltfptr[1245])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1246*/ meltfptr[1245])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1246*/ meltfptr[1245]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1247*/ meltfptr[1246]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1246*/ meltfptr[1245]); melt_dbgtrace_written_object ( /*_.VALDATA___V1246*/ meltfptr[1245], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#12", NULL != ( /*_.VALDATA___V1246*/ meltfptr[1245])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V1246*/ meltfptr[1245]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1248*/ meltfptr[1247])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1248*/ meltfptr[1247])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1248*/ meltfptr[1247]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1249*/ meltfptr[1248]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1248*/ meltfptr[1247]); melt_dbgtrace_written_object ( /*_.VALDATA___V1248*/ meltfptr[1247], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#13", NULL != ( /*_.VALDATA___V1248*/ meltfptr[1247])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V1248*/ meltfptr[1247]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1250*/ meltfptr[1249])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1250*/ meltfptr[1249])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1250*/ meltfptr[1249]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1251*/ meltfptr[1250]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1250*/ meltfptr[1249]); melt_dbgtrace_written_object ( /*_.VALDATA___V1250*/ meltfptr[1249], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#14", NULL != ( /*_.VALDATA___V1250*/ meltfptr[1249])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[14] = (melt_ptr_t) ( /*_.VALDATA___V1250*/ meltfptr[1249]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1252*/ meltfptr[1251])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1252*/ meltfptr[1251])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1252*/ meltfptr[1251]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1253*/ meltfptr[1252]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1252*/ meltfptr[1251]); melt_dbgtrace_written_object ( /*_.VALDATA___V1252*/ meltfptr[1251], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#15", NULL != ( /*_.VALDATA___V1252*/ meltfptr[1251])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[15] = (melt_ptr_t) ( /*_.VALDATA___V1252*/ meltfptr[1251]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1254*/ meltfptr[1253])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1254*/ meltfptr[1253])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1254*/ meltfptr[1253]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1255*/ meltfptr[1254]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1254*/ meltfptr[1253]); melt_dbgtrace_written_object ( /*_.VALDATA___V1254*/ meltfptr[1253], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#16", NULL != ( /*_.VALDATA___V1254*/ meltfptr[1253])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[16] = (melt_ptr_t) ( /*_.VALDATA___V1254*/ meltfptr[1253]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1256*/ meltfptr[1255])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1256*/ meltfptr[1255])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1256*/ meltfptr[1255]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1257*/ meltfptr[1256]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1256*/ meltfptr[1255]); melt_dbgtrace_written_object ( /*_.VALDATA___V1256*/ meltfptr[1255], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#17", NULL != ( /*_.VALDATA___V1256*/ meltfptr[1255])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[17] = (melt_ptr_t) ( /*_.VALDATA___V1256*/ meltfptr[1255]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1258*/ meltfptr[1257])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1258*/ meltfptr[1257])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1258*/ meltfptr[1257]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1259*/ meltfptr[1258]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1258*/ meltfptr[1257]); melt_dbgtrace_written_object ( /*_.VALDATA___V1258*/ meltfptr[1257], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#18", NULL != ( /*_.VALDATA___V1258*/ meltfptr[1257])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[18] = (melt_ptr_t) ( /*_.VALDATA___V1258*/ meltfptr[1257]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1260*/ meltfptr[1259])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1260*/ meltfptr[1259])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1260*/ meltfptr[1259]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1261*/ meltfptr[1260]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1260*/ meltfptr[1259]); melt_dbgtrace_written_object ( /*_.VALDATA___V1260*/ meltfptr[1259], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#19", NULL != ( /*_.VALDATA___V1260*/ meltfptr[1259])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[19] = (melt_ptr_t) ( /*_.VALDATA___V1260*/ meltfptr[1259]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1262*/ meltfptr[1261])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1262*/ meltfptr[1261])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1262*/ meltfptr[1261]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1263*/ meltfptr[1262]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1262*/ meltfptr[1261]); melt_dbgtrace_written_object ( /*_.VALDATA___V1262*/ meltfptr[1261], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#20", NULL != ( /*_.VALDATA___V1262*/ meltfptr[1261])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[20] = (melt_ptr_t) ( /*_.VALDATA___V1262*/ meltfptr[1261]); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1264*/ meltfptr[1263]); melt_dbgtrace_written_object ( /*_.VALDATA___V1264*/ meltfptr[1263], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#21", NULL != ( /*_.VALDATA___V1264*/ meltfptr[1263])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[21] = (melt_ptr_t) ( /*_.VALDATA___V1264*/ meltfptr[1263]); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1266*/ meltfptr[1265]); melt_dbgtrace_written_object ( /*_.VALDATA___V1266*/ meltfptr[1265], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#22", NULL != ( /*_.VALDATA___V1266*/ meltfptr[1265])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[22] = (melt_ptr_t) ( /*_.VALDATA___V1266*/ meltfptr[1265]); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1268*/ meltfptr[1267]); melt_dbgtrace_written_object ( /*_.VALDATA___V1268*/ meltfptr[1267], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#23", NULL != ( /*_.VALDATA___V1268*/ meltfptr[1267])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[23] = (melt_ptr_t) ( /*_.VALDATA___V1268*/ meltfptr[1267]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1270*/ meltfptr[1269])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1270*/ meltfptr[1269])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1270*/ meltfptr[1269]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1271*/ meltfptr[1270]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1270*/ meltfptr[1269]); melt_dbgtrace_written_object ( /*_.VALDATA___V1270*/ meltfptr[1269], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#24", NULL != ( /*_.VALDATA___V1270*/ meltfptr[1269])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[24] = (melt_ptr_t) ( /*_.VALDATA___V1270*/ meltfptr[1269]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1272*/ meltfptr[1271])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1272*/ meltfptr[1271])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1272*/ meltfptr[1271]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1273*/ meltfptr[1272]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1272*/ meltfptr[1271]); melt_dbgtrace_written_object ( /*_.VALDATA___V1272*/ meltfptr[1271], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#25", NULL != ( /*_.VALDATA___V1272*/ meltfptr[1271])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[25] = (melt_ptr_t) ( /*_.VALDATA___V1272*/ meltfptr[1271]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1274*/ meltfptr[1273])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1274*/ meltfptr[1273])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1274*/ meltfptr[1273]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1275*/ meltfptr[1274]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1274*/ meltfptr[1273]); melt_dbgtrace_written_object ( /*_.VALDATA___V1274*/ meltfptr[1273], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#26", NULL != ( /*_.VALDATA___V1274*/ meltfptr[1273])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[26] = (melt_ptr_t) ( /*_.VALDATA___V1274*/ meltfptr[1273]); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#27", NULL != ( /*_.VALDATA___V174*/ meltfptr[173])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[27] = (melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1276*/ meltfptr[1275])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1276*/ meltfptr[1275])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1276*/ meltfptr[1275]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1277*/ meltfptr[1276]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1276*/ meltfptr[1275]); melt_dbgtrace_written_object ( /*_.VALDATA___V1276*/ meltfptr[1275], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#28", NULL != ( /*_.VALDATA___V1276*/ meltfptr[1275])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[28] = (melt_ptr_t) ( /*_.VALDATA___V1276*/ meltfptr[1275]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1278*/ meltfptr[1277])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1278*/ meltfptr[1277])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1278*/ meltfptr[1277]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1279*/ meltfptr[1278]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1278*/ meltfptr[1277]); melt_dbgtrace_written_object ( /*_.VALDATA___V1278*/ meltfptr[1277], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#29", NULL != ( /*_.VALDATA___V1278*/ meltfptr[1277])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[29] = (melt_ptr_t) ( /*_.VALDATA___V1278*/ meltfptr[1277]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1280*/ meltfptr[1279])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1280*/ meltfptr[1279])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1280*/ meltfptr[1279]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1281*/ meltfptr[1280]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1280*/ meltfptr[1279]); melt_dbgtrace_written_object ( /*_.VALDATA___V1280*/ meltfptr[1279], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#30", NULL != ( /*_.VALDATA___V1280*/ meltfptr[1279])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[30] = (melt_ptr_t) ( /*_.VALDATA___V1280*/ meltfptr[1279]); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1282*/ meltfptr[1281]); melt_dbgtrace_written_object ( /*_.VALDATA___V1282*/ meltfptr[1281], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#31", NULL != ( /*_.VALDATA___V1282*/ meltfptr[1281])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[31] = (melt_ptr_t) ( /*_.VALDATA___V1282*/ meltfptr[1281]); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1284*/ meltfptr[1283]); melt_dbgtrace_written_object ( /*_.VALDATA___V1284*/ meltfptr[1283], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#32", NULL != ( /*_.VALDATA___V1284*/ meltfptr[1283])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[32] = (melt_ptr_t) ( /*_.VALDATA___V1284*/ meltfptr[1283]); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1286*/ meltfptr[1285]); melt_dbgtrace_written_object ( /*_.VALDATA___V1286*/ meltfptr[1285], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#33", NULL != ( /*_.VALDATA___V1286*/ meltfptr[1285])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[33] = (melt_ptr_t) ( /*_.VALDATA___V1286*/ meltfptr[1285]); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1288*/ meltfptr[1287]); melt_dbgtrace_written_object ( /*_.VALDATA___V1288*/ meltfptr[1287], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#34", NULL != ( /*_.VALDATA___V1288*/ meltfptr[1287])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[34] = (melt_ptr_t) ( /*_.VALDATA___V1288*/ meltfptr[1287]); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1290*/ meltfptr[1289]); melt_dbgtrace_written_object ( /*_.VALDATA___V1290*/ meltfptr[1289], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#35", NULL != ( /*_.VALDATA___V1290*/ meltfptr[1289])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[35] = (melt_ptr_t) ( /*_.VALDATA___V1290*/ meltfptr[1289]); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1292*/ meltfptr[1291]); melt_dbgtrace_written_object ( /*_.VALDATA___V1292*/ meltfptr[1291], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#36", NULL != ( /*_.VALDATA___V1292*/ meltfptr[1291])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[36] = (melt_ptr_t) ( /*_.VALDATA___V1292*/ meltfptr[1291]); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1294*/ meltfptr[1293]); melt_dbgtrace_written_object ( /*_.VALDATA___V1294*/ meltfptr[1293], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#37", NULL != ( /*_.VALDATA___V1294*/ meltfptr[1293])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[37] = (melt_ptr_t) ( /*_.VALDATA___V1294*/ meltfptr[1293]); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1296*/ meltfptr[1295]); melt_dbgtrace_written_object ( /*_.VALDATA___V1296*/ meltfptr[1295], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#38", NULL != ( /*_.VALDATA___V1296*/ meltfptr[1295])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[38] = (melt_ptr_t) ( /*_.VALDATA___V1296*/ meltfptr[1295]); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1298*/ meltfptr[1297]); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_20 */ void meltmod__warmelt_normal__initialmeltchunk_21 (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___V1298*/ meltfptr[1297], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#39", NULL != ( /*_.VALDATA___V1298*/ meltfptr[1297])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[39] = (melt_ptr_t) ( /*_.VALDATA___V1298*/ meltfptr[1297]); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1300*/ meltfptr[1299]); melt_dbgtrace_written_object ( /*_.VALDATA___V1300*/ meltfptr[1299], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#40", NULL != ( /*_.VALDATA___V1300*/ meltfptr[1299])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[40] = (melt_ptr_t) ( /*_.VALDATA___V1300*/ meltfptr[1299]); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1302*/ meltfptr[1301]); melt_dbgtrace_written_object ( /*_.VALDATA___V1302*/ meltfptr[1301], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#41", NULL != ( /*_.VALDATA___V1302*/ meltfptr[1301])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[41] = (melt_ptr_t) ( /*_.VALDATA___V1302*/ meltfptr[1301]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1304*/ meltfptr[1303])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1304*/ meltfptr[1303])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1304*/ meltfptr[1303]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1305*/ meltfptr[1304]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1304*/ meltfptr[1303]); melt_dbgtrace_written_object ( /*_.VALDATA___V1304*/ meltfptr[1303], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#42", NULL != ( /*_.VALDATA___V1304*/ meltfptr[1303])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[42] = (melt_ptr_t) ( /*_.VALDATA___V1304*/ meltfptr[1303]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1306*/ meltfptr[1305])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1306*/ meltfptr[1305])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1306*/ meltfptr[1305]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1307*/ meltfptr[1306]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1306*/ meltfptr[1305]); melt_dbgtrace_written_object ( /*_.VALDATA___V1306*/ meltfptr[1305], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#43", NULL != ( /*_.VALDATA___V1306*/ meltfptr[1305])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[43] = (melt_ptr_t) ( /*_.VALDATA___V1306*/ meltfptr[1305]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1308*/ meltfptr[1307])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1308*/ meltfptr[1307])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1308*/ meltfptr[1307]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1309*/ meltfptr[1308]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1308*/ meltfptr[1307]); melt_dbgtrace_written_object ( /*_.VALDATA___V1308*/ meltfptr[1307], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#44", NULL != ( /*_.VALDATA___V1308*/ meltfptr[1307])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[44] = (melt_ptr_t) ( /*_.VALDATA___V1308*/ meltfptr[1307]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1310*/ meltfptr[1309])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1310*/ meltfptr[1309])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1310*/ meltfptr[1309]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1311*/ meltfptr[1310]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1310*/ meltfptr[1309]); melt_dbgtrace_written_object ( /*_.VALDATA___V1310*/ meltfptr[1309], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#45", NULL != ( /*_.VALDATA___V1310*/ meltfptr[1309])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[45] = (melt_ptr_t) ( /*_.VALDATA___V1310*/ meltfptr[1309]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1312*/ meltfptr[1311])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1312*/ meltfptr[1311])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1312*/ meltfptr[1311]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1313*/ meltfptr[1312]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1312*/ meltfptr[1311]); melt_dbgtrace_written_object ( /*_.VALDATA___V1312*/ meltfptr[1311], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#46", NULL != ( /*_.VALDATA___V1312*/ meltfptr[1311])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[46] = (melt_ptr_t) ( /*_.VALDATA___V1312*/ meltfptr[1311]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1314*/ meltfptr[1313])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1314*/ meltfptr[1313])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1314*/ meltfptr[1313]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1315*/ meltfptr[1314]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1314*/ meltfptr[1313]); melt_dbgtrace_written_object ( /*_.VALDATA___V1314*/ meltfptr[1313], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#47", NULL != ( /*_.VALDATA___V1314*/ meltfptr[1313])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[47] = (melt_ptr_t) ( /*_.VALDATA___V1314*/ meltfptr[1313]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1316*/ meltfptr[1315])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1316*/ meltfptr[1315])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1316*/ meltfptr[1315]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1317*/ meltfptr[1316]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1316*/ meltfptr[1315]); melt_dbgtrace_written_object ( /*_.VALDATA___V1316*/ meltfptr[1315], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#48", NULL != ( /*_.VALDATA___V1316*/ meltfptr[1315])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[48] = (melt_ptr_t) ( /*_.VALDATA___V1316*/ meltfptr[1315]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1318*/ meltfptr[1317])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1318*/ meltfptr[1317])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1318*/ meltfptr[1317]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1319*/ meltfptr[1318]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1318*/ meltfptr[1317]); melt_dbgtrace_written_object ( /*_.VALDATA___V1318*/ meltfptr[1317], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#49", NULL != ( /*_.VALDATA___V1318*/ meltfptr[1317])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[49] = (melt_ptr_t) ( /*_.VALDATA___V1318*/ meltfptr[1317]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1320*/ meltfptr[1319])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1320*/ meltfptr[1319])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1320*/ meltfptr[1319]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1321*/ meltfptr[1320]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1320*/ meltfptr[1319]); melt_dbgtrace_written_object ( /*_.VALDATA___V1320*/ meltfptr[1319], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#50", NULL != ( /*_.VALDATA___V1320*/ meltfptr[1319])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[50] = (melt_ptr_t) ( /*_.VALDATA___V1320*/ meltfptr[1319]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1322*/ meltfptr[1321])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1322*/ meltfptr[1321])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1322*/ meltfptr[1321]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1323*/ meltfptr[1322]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1322*/ meltfptr[1321]); melt_dbgtrace_written_object ( /*_.VALDATA___V1322*/ meltfptr[1321], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#51", NULL != ( /*_.VALDATA___V1322*/ meltfptr[1321])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[51] = (melt_ptr_t) ( /*_.VALDATA___V1322*/ meltfptr[1321]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1324*/ meltfptr[1323])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1324*/ meltfptr[1323])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1324*/ meltfptr[1323]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1325*/ meltfptr[1324]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1324*/ meltfptr[1323]); melt_dbgtrace_written_object ( /*_.VALDATA___V1324*/ meltfptr[1323], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#52", NULL != ( /*_.VALDATA___V1324*/ meltfptr[1323])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[52] = (melt_ptr_t) ( /*_.VALDATA___V1324*/ meltfptr[1323]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1326*/ meltfptr[1325])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1326*/ meltfptr[1325])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1326*/ meltfptr[1325]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1327*/ meltfptr[1326]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1326*/ meltfptr[1325]); melt_dbgtrace_written_object ( /*_.VALDATA___V1326*/ meltfptr[1325], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#53", NULL != ( /*_.VALDATA___V1326*/ meltfptr[1325])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[53] = (melt_ptr_t) ( /*_.VALDATA___V1326*/ meltfptr[1325]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1328*/ meltfptr[1327])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1328*/ meltfptr[1327])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1328*/ meltfptr[1327]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1329*/ meltfptr[1328]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1328*/ meltfptr[1327]); melt_dbgtrace_written_object ( /*_.VALDATA___V1328*/ meltfptr[1327], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#54", NULL != ( /*_.VALDATA___V1328*/ meltfptr[1327])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[54] = (melt_ptr_t) ( /*_.VALDATA___V1328*/ meltfptr[1327]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1330*/ meltfptr[1329])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1330*/ meltfptr[1329])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1330*/ meltfptr[1329]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1331*/ meltfptr[1330]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1330*/ meltfptr[1329]); melt_dbgtrace_written_object ( /*_.VALDATA___V1330*/ meltfptr[1329], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#55", NULL != ( /*_.VALDATA___V1330*/ meltfptr[1329])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[55] = (melt_ptr_t) ( /*_.VALDATA___V1330*/ meltfptr[1329]); /*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-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#56", NULL != ( /*_.VALDATA___V1332*/ meltfptr[1331])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[56] = (melt_ptr_t) ( /*_.VALDATA___V1332*/ meltfptr[1331]); /*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) ( /*_.VALSTR___V1335*/ meltfptr[1334]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1334*/ meltfptr[1333]); melt_dbgtrace_written_object ( /*_.VALDATA___V1334*/ meltfptr[1333], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#57", NULL != ( /*_.VALDATA___V1334*/ meltfptr[1333])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[57] = (melt_ptr_t) ( /*_.VALDATA___V1334*/ meltfptr[1333]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1336*/ meltfptr[1335])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1336*/ meltfptr[1335])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1336*/ meltfptr[1335]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1337*/ meltfptr[1336]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1336*/ meltfptr[1335]); melt_dbgtrace_written_object ( /*_.VALDATA___V1336*/ meltfptr[1335], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#58", NULL != ( /*_.VALDATA___V1336*/ meltfptr[1335])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[58] = (melt_ptr_t) ( /*_.VALDATA___V1336*/ meltfptr[1335]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1338*/ meltfptr[1337])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1338*/ meltfptr[1337])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1338*/ meltfptr[1337]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1339*/ meltfptr[1338]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1338*/ meltfptr[1337]); melt_dbgtrace_written_object ( /*_.VALDATA___V1338*/ meltfptr[1337], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#59", NULL != ( /*_.VALDATA___V1338*/ meltfptr[1337])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[59] = (melt_ptr_t) ( /*_.VALDATA___V1338*/ meltfptr[1337]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1340*/ meltfptr[1339])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1340*/ meltfptr[1339])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1340*/ meltfptr[1339]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1341*/ meltfptr[1340]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1340*/ meltfptr[1339]); melt_dbgtrace_written_object ( /*_.VALDATA___V1340*/ meltfptr[1339], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#60", NULL != ( /*_.VALDATA___V1340*/ meltfptr[1339])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[60] = (melt_ptr_t) ( /*_.VALDATA___V1340*/ meltfptr[1339]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1342*/ meltfptr[1341])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1342*/ meltfptr[1341])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1342*/ meltfptr[1341]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1343*/ meltfptr[1342]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1342*/ meltfptr[1341]); melt_dbgtrace_written_object ( /*_.VALDATA___V1342*/ meltfptr[1341], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#61", NULL != ( /*_.VALDATA___V1342*/ meltfptr[1341])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[61] = (melt_ptr_t) ( /*_.VALDATA___V1342*/ meltfptr[1341]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1344*/ meltfptr[1343])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1344*/ meltfptr[1343])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1344*/ meltfptr[1343]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1345*/ meltfptr[1344]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1344*/ meltfptr[1343]); melt_dbgtrace_written_object ( /*_.VALDATA___V1344*/ meltfptr[1343], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#62", NULL != ( /*_.VALDATA___V1344*/ meltfptr[1343])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[62] = (melt_ptr_t) ( /*_.VALDATA___V1344*/ meltfptr[1343]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1346*/ meltfptr[1345])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1346*/ meltfptr[1345])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1346*/ meltfptr[1345]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1347*/ meltfptr[1346]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1346*/ meltfptr[1345]); melt_dbgtrace_written_object ( /*_.VALDATA___V1346*/ meltfptr[1345], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#63", NULL != ( /*_.VALDATA___V1346*/ meltfptr[1345])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[63] = (melt_ptr_t) ( /*_.VALDATA___V1346*/ meltfptr[1345]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1348*/ meltfptr[1347])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1348*/ meltfptr[1347])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1348*/ meltfptr[1347]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1349*/ meltfptr[1348]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1348*/ meltfptr[1347]); melt_dbgtrace_written_object ( /*_.VALDATA___V1348*/ meltfptr[1347], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#64", NULL != ( /*_.VALDATA___V1348*/ meltfptr[1347])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[64] = (melt_ptr_t) ( /*_.VALDATA___V1348*/ meltfptr[1347]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1350*/ meltfptr[1349])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1350*/ meltfptr[1349])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1350*/ meltfptr[1349]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1351*/ meltfptr[1350]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1350*/ meltfptr[1349]); melt_dbgtrace_written_object ( /*_.VALDATA___V1350*/ meltfptr[1349], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#65", NULL != ( /*_.VALDATA___V1350*/ meltfptr[1349])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[65] = (melt_ptr_t) ( /*_.VALDATA___V1350*/ meltfptr[1349]); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#66", NULL != ( /*_.VALDATA___V1219*/ meltfptr[1218])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[66] = (melt_ptr_t) ( /*_.VALDATA___V1219*/ meltfptr[1218]); /*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-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#67", NULL != ( /*_.VALDATA___V1352*/ meltfptr[1351])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[67] = (melt_ptr_t) ( /*_.VALDATA___V1352*/ meltfptr[1351]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1354*/ meltfptr[1353])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1354*/ meltfptr[1353])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1354*/ meltfptr[1353]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1355*/ meltfptr[1354]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1354*/ meltfptr[1353]); melt_dbgtrace_written_object ( /*_.VALDATA___V1354*/ meltfptr[1353], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#68", NULL != ( /*_.VALDATA___V1354*/ meltfptr[1353])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[68] = (melt_ptr_t) ( /*_.VALDATA___V1354*/ meltfptr[1353]); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1356*/ meltfptr[1355]); melt_dbgtrace_written_object ( /*_.VALDATA___V1356*/ meltfptr[1355], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#69", NULL != ( /*_.VALDATA___V1356*/ meltfptr[1355])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[69] = (melt_ptr_t) ( /*_.VALDATA___V1356*/ meltfptr[1355]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1358*/ meltfptr[1357])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1358*/ meltfptr[1357])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1358*/ meltfptr[1357]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1359*/ meltfptr[1358]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1358*/ meltfptr[1357]); melt_dbgtrace_written_object ( /*_.VALDATA___V1358*/ meltfptr[1357], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#70", NULL != ( /*_.VALDATA___V1358*/ meltfptr[1357])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[70] = (melt_ptr_t) ( /*_.VALDATA___V1358*/ meltfptr[1357]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1360*/ meltfptr[1359])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1360*/ meltfptr[1359])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1360*/ meltfptr[1359]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1361*/ meltfptr[1360]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1360*/ meltfptr[1359]); melt_dbgtrace_written_object ( /*_.VALDATA___V1360*/ meltfptr[1359], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#71", NULL != ( /*_.VALDATA___V1360*/ meltfptr[1359])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[71] = (melt_ptr_t) ( /*_.VALDATA___V1360*/ meltfptr[1359]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1362*/ meltfptr[1361])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1362*/ meltfptr[1361])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1362*/ meltfptr[1361]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1363*/ meltfptr[1362]); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_21 */ void meltmod__warmelt_normal__initialmeltchunk_22 (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___V1362*/ meltfptr[1361]); melt_dbgtrace_written_object ( /*_.VALDATA___V1362*/ meltfptr[1361], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#72", NULL != ( /*_.VALDATA___V1362*/ meltfptr[1361])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[72] = (melt_ptr_t) ( /*_.VALDATA___V1362*/ meltfptr[1361]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1364*/ meltfptr[1363])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1364*/ meltfptr[1363])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1364*/ meltfptr[1363]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1365*/ meltfptr[1364]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1364*/ meltfptr[1363]); melt_dbgtrace_written_object ( /*_.VALDATA___V1364*/ meltfptr[1363], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#73", NULL != ( /*_.VALDATA___V1364*/ meltfptr[1363])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[73] = (melt_ptr_t) ( /*_.VALDATA___V1364*/ meltfptr[1363]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1366*/ meltfptr[1365])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1366*/ meltfptr[1365])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1366*/ meltfptr[1365]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1367*/ meltfptr[1366]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1366*/ meltfptr[1365]); melt_dbgtrace_written_object ( /*_.VALDATA___V1366*/ meltfptr[1365], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#74", NULL != ( /*_.VALDATA___V1366*/ meltfptr[1365])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[74] = (melt_ptr_t) ( /*_.VALDATA___V1366*/ meltfptr[1365]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1368*/ meltfptr[1367])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1368*/ meltfptr[1367])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1368*/ meltfptr[1367]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1369*/ meltfptr[1368]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1368*/ meltfptr[1367]); melt_dbgtrace_written_object ( /*_.VALDATA___V1368*/ meltfptr[1367], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#75", NULL != ( /*_.VALDATA___V1368*/ meltfptr[1367])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[75] = (melt_ptr_t) ( /*_.VALDATA___V1368*/ meltfptr[1367]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1370*/ meltfptr[1369])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1370*/ meltfptr[1369])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1370*/ meltfptr[1369]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1371*/ meltfptr[1370]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1370*/ meltfptr[1369]); melt_dbgtrace_written_object ( /*_.VALDATA___V1370*/ meltfptr[1369], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#76", NULL != ( /*_.VALDATA___V1370*/ meltfptr[1369])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[76] = (melt_ptr_t) ( /*_.VALDATA___V1370*/ meltfptr[1369]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1372*/ meltfptr[1371])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1372*/ meltfptr[1371])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1372*/ meltfptr[1371]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1373*/ meltfptr[1372]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1372*/ meltfptr[1371]); melt_dbgtrace_written_object ( /*_.VALDATA___V1372*/ meltfptr[1371], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#77", NULL != ( /*_.VALDATA___V1372*/ meltfptr[1371])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[77] = (melt_ptr_t) ( /*_.VALDATA___V1372*/ meltfptr[1371]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1374*/ meltfptr[1373])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1374*/ meltfptr[1373])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1374*/ meltfptr[1373]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1375*/ meltfptr[1374]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1374*/ meltfptr[1373]); melt_dbgtrace_written_object ( /*_.VALDATA___V1374*/ meltfptr[1373], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#78", NULL != ( /*_.VALDATA___V1374*/ meltfptr[1373])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[78] = (melt_ptr_t) ( /*_.VALDATA___V1374*/ meltfptr[1373]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1376*/ meltfptr[1375])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1376*/ meltfptr[1375])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1376*/ meltfptr[1375]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1377*/ meltfptr[1376]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1376*/ meltfptr[1375]); melt_dbgtrace_written_object ( /*_.VALDATA___V1376*/ meltfptr[1375], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#79", NULL != ( /*_.VALDATA___V1376*/ meltfptr[1375])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[79] = (melt_ptr_t) ( /*_.VALDATA___V1376*/ meltfptr[1375]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1378*/ meltfptr[1377])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1378*/ meltfptr[1377])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1378*/ meltfptr[1377]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1379*/ meltfptr[1378]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1378*/ meltfptr[1377]); melt_dbgtrace_written_object ( /*_.VALDATA___V1378*/ meltfptr[1377], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#80", NULL != ( /*_.VALDATA___V1378*/ meltfptr[1377])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[80] = (melt_ptr_t) ( /*_.VALDATA___V1378*/ meltfptr[1377]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1380*/ meltfptr[1379])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1380*/ meltfptr[1379])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1380*/ meltfptr[1379]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1381*/ meltfptr[1380]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1380*/ meltfptr[1379]); melt_dbgtrace_written_object ( /*_.VALDATA___V1380*/ meltfptr[1379], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#81", NULL != ( /*_.VALDATA___V1380*/ meltfptr[1379])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[81] = (melt_ptr_t) ( /*_.VALDATA___V1380*/ meltfptr[1379]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1382*/ meltfptr[1381])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1382*/ meltfptr[1381])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1382*/ meltfptr[1381]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1383*/ meltfptr[1382]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1382*/ meltfptr[1381]); melt_dbgtrace_written_object ( /*_.VALDATA___V1382*/ meltfptr[1381], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#82", NULL != ( /*_.VALDATA___V1382*/ meltfptr[1381])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[82] = (melt_ptr_t) ( /*_.VALDATA___V1382*/ meltfptr[1381]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1384*/ meltfptr[1383])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1384*/ meltfptr[1383])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1384*/ meltfptr[1383]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1385*/ meltfptr[1384]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1384*/ meltfptr[1383]); melt_dbgtrace_written_object ( /*_.VALDATA___V1384*/ meltfptr[1383], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#83", NULL != ( /*_.VALDATA___V1384*/ meltfptr[1383])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[83] = (melt_ptr_t) ( /*_.VALDATA___V1384*/ meltfptr[1383]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1386*/ meltfptr[1385])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1386*/ meltfptr[1385])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1386*/ meltfptr[1385]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1387*/ meltfptr[1386]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1386*/ meltfptr[1385]); melt_dbgtrace_written_object ( /*_.VALDATA___V1386*/ meltfptr[1385], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#84", NULL != ( /*_.VALDATA___V1386*/ meltfptr[1385])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[84] = (melt_ptr_t) ( /*_.VALDATA___V1386*/ meltfptr[1385]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1388*/ meltfptr[1387])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1388*/ meltfptr[1387])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1388*/ meltfptr[1387]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1389*/ meltfptr[1388]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1388*/ meltfptr[1387]); melt_dbgtrace_written_object ( /*_.VALDATA___V1388*/ meltfptr[1387], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#85", NULL != ( /*_.VALDATA___V1388*/ meltfptr[1387])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[85] = (melt_ptr_t) ( /*_.VALDATA___V1388*/ meltfptr[1387]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1390*/ meltfptr[1389])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1390*/ meltfptr[1389])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1390*/ meltfptr[1389]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1391*/ meltfptr[1390]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1390*/ meltfptr[1389]); melt_dbgtrace_written_object ( /*_.VALDATA___V1390*/ meltfptr[1389], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#86", NULL != ( /*_.VALDATA___V1390*/ meltfptr[1389])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[86] = (melt_ptr_t) ( /*_.VALDATA___V1390*/ meltfptr[1389]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1392*/ meltfptr[1391])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1392*/ meltfptr[1391])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1392*/ meltfptr[1391]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1393*/ meltfptr[1392]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1392*/ meltfptr[1391]); melt_dbgtrace_written_object ( /*_.VALDATA___V1392*/ meltfptr[1391], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#87", NULL != ( /*_.VALDATA___V1392*/ meltfptr[1391])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[87] = (melt_ptr_t) ( /*_.VALDATA___V1392*/ meltfptr[1391]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1394*/ meltfptr[1393])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1394*/ meltfptr[1393])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1394*/ meltfptr[1393]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1395*/ meltfptr[1394]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1394*/ meltfptr[1393]); melt_dbgtrace_written_object ( /*_.VALDATA___V1394*/ meltfptr[1393], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#88", NULL != ( /*_.VALDATA___V1394*/ meltfptr[1393])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[88] = (melt_ptr_t) ( /*_.VALDATA___V1394*/ meltfptr[1393]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1396*/ meltfptr[1395])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1396*/ meltfptr[1395])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1396*/ meltfptr[1395]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1397*/ meltfptr[1396]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1396*/ meltfptr[1395]); melt_dbgtrace_written_object ( /*_.VALDATA___V1396*/ meltfptr[1395], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#89", NULL != ( /*_.VALDATA___V1396*/ meltfptr[1395])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[89] = (melt_ptr_t) ( /*_.VALDATA___V1396*/ meltfptr[1395]); /*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) ( /*_.VALSTR___V1399*/ meltfptr[1398]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1398*/ meltfptr[1397]); melt_dbgtrace_written_object ( /*_.VALDATA___V1398*/ meltfptr[1397], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#90", NULL != ( /*_.VALDATA___V1398*/ meltfptr[1397])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[90] = (melt_ptr_t) ( /*_.VALDATA___V1398*/ meltfptr[1397]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1400*/ meltfptr[1399])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1400*/ meltfptr[1399])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1400*/ meltfptr[1399]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1401*/ meltfptr[1400]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1400*/ meltfptr[1399]); melt_dbgtrace_written_object ( /*_.VALDATA___V1400*/ meltfptr[1399], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#91", NULL != ( /*_.VALDATA___V1400*/ meltfptr[1399])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[91] = (melt_ptr_t) ( /*_.VALDATA___V1400*/ meltfptr[1399]); /*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-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#92", NULL != ( /*_.VALDATA___V1402*/ meltfptr[1401])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[92] = (melt_ptr_t) ( /*_.VALDATA___V1402*/ meltfptr[1401]); /*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) ( /*_.VALSTR___V1405*/ meltfptr[1404]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1404*/ meltfptr[1403]); melt_dbgtrace_written_object ( /*_.VALDATA___V1404*/ meltfptr[1403], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#93", NULL != ( /*_.VALDATA___V1404*/ meltfptr[1403])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[93] = (melt_ptr_t) ( /*_.VALDATA___V1404*/ meltfptr[1403]); /*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-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#94", NULL != ( /*_.VALDATA___V1406*/ meltfptr[1405])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[94] = (melt_ptr_t) ( /*_.VALDATA___V1406*/ meltfptr[1405]); /*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) ( /*_.VALSTR___V1409*/ meltfptr[1408]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1408*/ meltfptr[1407]); melt_dbgtrace_written_object ( /*_.VALDATA___V1408*/ meltfptr[1407], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#95", NULL != ( /*_.VALDATA___V1408*/ meltfptr[1407])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[95] = (melt_ptr_t) ( /*_.VALDATA___V1408*/ meltfptr[1407]); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1410*/ meltfptr[1409]); melt_dbgtrace_written_object ( /*_.VALDATA___V1410*/ meltfptr[1409], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#96", NULL != ( /*_.VALDATA___V1410*/ meltfptr[1409])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[96] = (melt_ptr_t) ( /*_.VALDATA___V1410*/ meltfptr[1409]); /*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-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#97", NULL != ( /*_.VALDATA___V1412*/ meltfptr[1411])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[97] = (melt_ptr_t) ( /*_.VALDATA___V1412*/ meltfptr[1411]); /*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) ( /*_.VALSTR___V1415*/ meltfptr[1414]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1414*/ meltfptr[1413]); melt_dbgtrace_written_object ( /*_.VALDATA___V1414*/ meltfptr[1413], "new static instance"); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1050__FILL_INITIAL_PREDEFMAP#98", NULL != ( /*_.VALDATA___V1414*/ meltfptr[1413])); ((meltroutine_ptr_t) /*_.VALROUT___V1221*/ meltfptr[1220])->tabval[98] = (melt_ptr_t) ( /*_.VALDATA___V1414*/ meltfptr[1413]); MELT_LOCATION ("warmelt-predef.melt:3:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1221*/ meltfptr[1220]); /*putclosurout#2 */ melt_assertmsg ("putclosrout#2 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1416*/ meltfptr[1415])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#2 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1416*/ meltfptr[1415])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1221*/ meltfptr[1220]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1416*/ meltfptr[1415]); /*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) ( /*_.VALSTR___V1418*/ meltfptr[1417]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1417*/ meltfptr[1416]); melt_dbgtrace_written_object ( /*_.VALDATA___V1417*/ meltfptr[1416], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:852:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1419*/ meltfptr[1418])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1419*/ meltfptr[1418])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1419*/ meltfptr[1418]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1420*/ meltfptr[1419]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1421*/ meltfptr[1420]); MELT_LOCATION ("warmelt-normal.melt:852:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1419*/ meltfptr[1418])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1419*/ meltfptr[1418])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1419*/ meltfptr[1418]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V1421*/ meltfptr[1420]); MELT_LOCATION ("warmelt-normal.melt:852:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1419*/ meltfptr[1418])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (3 >= 0 && 3 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1419*/ meltfptr[1418])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1419*/ meltfptr[1418]))-> obj_vartab[3] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_LONG)))); /*putupl#679 */ melt_assertmsg ("putupl #679 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1423*/ meltfptr[1422])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #679 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1423*/ meltfptr[1422])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1423*/ meltfptr[1422]))->tabval[0] = (melt_ptr_t) ( /*_.VALSTR___V1422*/ meltfptr[1421]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1423*/ meltfptr[1422]); MELT_LOCATION ("warmelt-normal.melt:852:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1419*/ meltfptr[1418])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1419*/ meltfptr[1418])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1419*/ meltfptr[1418]))-> obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V1423*/ meltfptr[1422]); MELT_LOCATION ("warmelt-normal.melt:852:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1419*/ meltfptr[1418]); MELT_LOCATION ("warmelt-normal.melt:852:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1419*/ meltfptr[1418], "new static instance"); /*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) ( /*_.VALSTR___V1425*/ meltfptr[1424]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1424*/ meltfptr[1423]); melt_dbgtrace_written_object ( /*_.VALDATA___V1424*/ meltfptr[1423], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:858:/ 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-normal.melt:858:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1426*/ meltfptr[1425])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1426*/ meltfptr[1425])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1426*/ meltfptr[1425]))-> obj_vartab[4] = (melt_ptr_t) ( /*_.CLASS_PROPED__V11*/ meltfptr[10]); /*putupl#680 */ melt_assertmsg ("putupl #680 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1428*/ meltfptr[1427])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #680 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1428*/ meltfptr[1427])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1428*/ meltfptr[1427]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_PROPED__V11*/ meltfptr[10]), 5))), (0)))); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_22 */ void meltmod__warmelt_normal__initialmeltchunk_23 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*putupl#681*/ melt_assertmsg ("putupl #681 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1428*/ meltfptr[1427])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #681 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1428*/ meltfptr[1427])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1428*/ meltfptr[1427]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_PROPED__V11*/ meltfptr[10]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1428*/ meltfptr[1427]); MELT_LOCATION ("warmelt-normal.melt:858:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1426*/ meltfptr[1425])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1426*/ meltfptr[1425])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1426*/ meltfptr[1425]))-> obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1428*/ meltfptr[1427]); MELT_LOCATION ("warmelt-normal.melt:858:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1429*/ meltfptr[1428])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1429*/ meltfptr[1428])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1429*/ meltfptr[1428]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1430*/ meltfptr[1429]); MELT_LOCATION ("warmelt-normal.melt:858:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1429*/ meltfptr[1428])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1429*/ meltfptr[1428])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1429*/ meltfptr[1428]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1426*/ meltfptr[1425]); MELT_LOCATION ("warmelt-normal.melt:858:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1429*/ meltfptr[1428]); MELT_LOCATION ("warmelt-normal.melt:858:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1429*/ meltfptr[1428], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:858:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1431*/ meltfptr[1430])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1431*/ meltfptr[1430])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1431*/ meltfptr[1430]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1432*/ meltfptr[1431]); MELT_LOCATION ("warmelt-normal.melt:858:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1431*/ meltfptr[1430])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1431*/ meltfptr[1430])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1431*/ meltfptr[1430]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1426*/ meltfptr[1425]); MELT_LOCATION ("warmelt-normal.melt:858:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1431*/ meltfptr[1430]); MELT_LOCATION ("warmelt-normal.melt:858:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1431*/ meltfptr[1430], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:858:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1433*/ meltfptr[1432])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1433*/ meltfptr[1432])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1433*/ meltfptr[1432]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1434*/ meltfptr[1433]); MELT_LOCATION ("warmelt-normal.melt:858:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1433*/ meltfptr[1432])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1433*/ meltfptr[1432])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1433*/ meltfptr[1432]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1426*/ meltfptr[1425]); MELT_LOCATION ("warmelt-normal.melt:858:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1433*/ meltfptr[1432]); MELT_LOCATION ("warmelt-normal.melt:858:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1433*/ meltfptr[1432], "new static instance"); /*putupl#682 */ melt_assertmsg ("putupl #682 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1435*/ meltfptr[1434])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #682 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1435*/ meltfptr[1434])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1435*/ meltfptr[1434]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_PROPED__V11*/ meltfptr[10]), 6))), (0)))); /*putupl#683 */ melt_assertmsg ("putupl #683 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1435*/ meltfptr[1434])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #683 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1435*/ meltfptr[1434])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1435*/ meltfptr[1434]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1429*/ meltfptr[1428]); /*putupl#684 */ melt_assertmsg ("putupl #684 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1435*/ meltfptr[1434])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #684 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1435*/ meltfptr[1434])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1435*/ meltfptr[1434]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1431*/ meltfptr[1430]); /*putupl#685 */ melt_assertmsg ("putupl #685 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1435*/ meltfptr[1434])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #685 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1435*/ meltfptr[1434])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1435*/ meltfptr[1434]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1433*/ meltfptr[1432]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1435*/ meltfptr[1434]); MELT_LOCATION ("warmelt-normal.melt:858:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1426*/ meltfptr[1425])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1426*/ meltfptr[1425])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1426*/ meltfptr[1425]))-> obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1435*/ meltfptr[1434]); MELT_LOCATION ("warmelt-normal.melt:858:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1426*/ meltfptr[1425]); MELT_LOCATION ("warmelt-normal.melt:858:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1426*/ meltfptr[1425], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1436*/ meltfptr[1435])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1436*/ meltfptr[1435])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1436*/ meltfptr[1435]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1437*/ meltfptr[1436]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1436*/ meltfptr[1435]); melt_dbgtrace_written_object ( /*_.VALDATA___V1436*/ meltfptr[1435], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1438*/ meltfptr[1437])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1438*/ meltfptr[1437])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1438*/ meltfptr[1437]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1439*/ meltfptr[1438]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1438*/ meltfptr[1437]); melt_dbgtrace_written_object ( /*_.VALDATA___V1438*/ meltfptr[1437], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1440*/ meltfptr[1439])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1440*/ meltfptr[1439])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1440*/ meltfptr[1439]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1441*/ meltfptr[1440]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1440*/ meltfptr[1439]); melt_dbgtrace_written_object ( /*_.VALDATA___V1440*/ meltfptr[1439], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:870:/ 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_1271__REGISTER_LITERAL_VALUE#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1442*/ meltfptr[1441])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:870:/ 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_1271__REGISTER_LITERAL_VALUE#1", NULL != ( /*_.CLASS_RUNNING_EXTENSION_MODULE_CONTEXT__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1442*/ meltfptr[1441])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_RUNNING_EXTENSION_MODULE_CONTEXT__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-normal.melt:870:/ 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___V1426*/ meltfptr[1425]); ((meltroutine_ptr_t) /*_.VALROUT___V1442*/ meltfptr[1441])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1426*/ meltfptr[1425]); MELT_LOCATION ("warmelt-normal.melt:870:/ 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_1271__REGISTER_LITERAL_VALUE#3", NULL != ( /*_.DISCR_CONSTANT_INTEGER__V14*/ meltfptr[13])); ((meltroutine_ptr_t) /*_.VALROUT___V1442*/ meltfptr[1441])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_CONSTANT_INTEGER__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-normal.melt:870:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1442*/ meltfptr[1441]); /*putclosurout#3 */ melt_assertmsg ("putclosrout#3 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1443*/ meltfptr[1442])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#3 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1442*/ meltfptr[1441])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1443*/ meltfptr[1442])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1442*/ meltfptr[1441]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1443*/ meltfptr[1442]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1444*/ meltfptr[1443])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1444*/ meltfptr[1443])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1444*/ meltfptr[1443]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1445*/ meltfptr[1444]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1444*/ meltfptr[1443]); melt_dbgtrace_written_object ( /*_.VALDATA___V1444*/ meltfptr[1443], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1446*/ meltfptr[1445])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1446*/ meltfptr[1445])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1446*/ meltfptr[1445]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1447*/ meltfptr[1446]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1446*/ meltfptr[1445]); melt_dbgtrace_written_object ( /*_.VALDATA___V1446*/ meltfptr[1445], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:931:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1448*/ meltfptr[1447])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1277__CREATE_NORMCONTEXT#0", NULL != ( /*_.DISCR_MAP_OBJECTS__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1448*/ meltfptr[1447])->tabval[0] = (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-normal.melt:931:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1448*/ meltfptr[1447])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1277__CREATE_NORMCONTEXT#1", NULL != ( /*_.CLASS_MODULE_CONTEXT__V16*/ meltfptr[15])); ((meltroutine_ptr_t) /*_.VALROUT___V1448*/ meltfptr[1447])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_MODULE_CONTEXT__V16*/ meltfptr[15]); MELT_LOCATION ("warmelt-normal.melt:931:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1448*/ meltfptr[1447])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1277__CREATE_NORMCONTEXT#2", NULL != ( /*_.DISCR_INTEGER__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1448*/ meltfptr[1447])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normal.melt:931:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1448*/ meltfptr[1447])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1416*/ meltfptr[1415]); ((meltroutine_ptr_t) /*_.VALROUT___V1448*/ meltfptr[1447])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V1416*/ meltfptr[1415]); MELT_LOCATION ("warmelt-normal.melt:931:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1448*/ meltfptr[1447])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V792*/ meltfptr[791]); ((meltroutine_ptr_t) /*_.VALROUT___V1448*/ meltfptr[1447])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V792*/ meltfptr[791]); MELT_LOCATION ("warmelt-normal.melt:931:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1448*/ meltfptr[1447])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1277__CREATE_NORMCONTEXT#5", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1448*/ meltfptr[1447])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:931:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1448*/ meltfptr[1447])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1277__CREATE_NORMCONTEXT#6", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1448*/ meltfptr[1447])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:931:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1448*/ meltfptr[1447])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1277__CREATE_NORMCONTEXT#7", NULL != ( /*_.DISCR_MAP_STRINGS__V18*/ meltfptr[17])); ((meltroutine_ptr_t) /*_.VALROUT___V1448*/ meltfptr[1447])->tabval[7] = (melt_ptr_t) ( /*_.DISCR_MAP_STRINGS__V18*/ meltfptr[17]); MELT_LOCATION ("warmelt-normal.melt:931:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1448*/ meltfptr[1447])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1126*/ meltfptr[1125]); ((meltroutine_ptr_t) /*_.VALROUT___V1448*/ meltfptr[1447])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V1126*/ meltfptr[1125]); MELT_LOCATION ("warmelt-normal.melt:931:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1448*/ meltfptr[1447])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1138*/ meltfptr[1137]); ((meltroutine_ptr_t) /*_.VALROUT___V1448*/ meltfptr[1447])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V1138*/ meltfptr[1137]); MELT_LOCATION ("warmelt-normal.melt:931:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1448*/ meltfptr[1447])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1277__CREATE_NORMCONTEXT#10", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1448*/ meltfptr[1447])->tabval[10] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:931:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1448*/ meltfptr[1447]); /*putclosurout#4 */ melt_assertmsg ("putclosrout#4 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1449*/ meltfptr[1448])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#4 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1448*/ meltfptr[1447])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1449*/ meltfptr[1448])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1448*/ meltfptr[1447]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1449*/ meltfptr[1448]); /*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-normal.melt:980:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1452*/ meltfptr[1451])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1281__CREATE_NORMAL_EXTENDING_CONTEXT#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1452*/ meltfptr[1451])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:980:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1452*/ meltfptr[1451])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1281__CREATE_NORMAL_EXTENDING_CONTEXT#1", NULL != ( /*_.DISCR_MAP_OBJECTS__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1452*/ meltfptr[1451])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-normal.melt:980:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1452*/ meltfptr[1451])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1281__CREATE_NORMAL_EXTENDING_CONTEXT#2", NULL != ( /*_.CLASS_MODULE_CONTEXT__V16*/ meltfptr[15])); ((meltroutine_ptr_t) /*_.VALROUT___V1452*/ meltfptr[1451])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_MODULE_CONTEXT__V16*/ meltfptr[15]); MELT_LOCATION ("warmelt-normal.melt:980:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1452*/ meltfptr[1451])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1281__CREATE_NORMAL_EXTENDING_CONTEXT#3", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1452*/ meltfptr[1451])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:980:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1452*/ meltfptr[1451])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1281__CREATE_NORMAL_EXTENDING_CONTEXT#4", NULL != ( /*_.DISCR_INTEGER__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1452*/ meltfptr[1451])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normal.melt:980:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1452*/ meltfptr[1451])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1416*/ meltfptr[1415]); ((meltroutine_ptr_t) /*_.VALROUT___V1452*/ meltfptr[1451])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1416*/ meltfptr[1415]); MELT_LOCATION ("warmelt-normal.melt:980:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1452*/ meltfptr[1451])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V806*/ meltfptr[805]); ((meltroutine_ptr_t) /*_.VALROUT___V1452*/ meltfptr[1451])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V806*/ meltfptr[805]); MELT_LOCATION ("warmelt-normal.melt:980:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1452*/ meltfptr[1451])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1281__CREATE_NORMAL_EXTENDING_CONTEXT#7", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1452*/ meltfptr[1451])->tabval[7] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:980:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1452*/ meltfptr[1451])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1281__CREATE_NORMAL_EXTENDING_CONTEXT#8", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1452*/ meltfptr[1451])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:980:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1452*/ meltfptr[1451])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1281__CREATE_NORMAL_EXTENDING_CONTEXT#9", NULL != ( /*_.DISCR_MAP_STRINGS__V18*/ meltfptr[17])); ((meltroutine_ptr_t) /*_.VALROUT___V1452*/ meltfptr[1451])->tabval[9] = (melt_ptr_t) ( /*_.DISCR_MAP_STRINGS__V18*/ meltfptr[17]); MELT_LOCATION ("warmelt-normal.melt:980:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1452*/ meltfptr[1451])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1126*/ meltfptr[1125]); ((meltroutine_ptr_t) /*_.VALROUT___V1452*/ meltfptr[1451])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V1126*/ meltfptr[1125]); MELT_LOCATION ("warmelt-normal.melt:980:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1452*/ meltfptr[1451])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1138*/ meltfptr[1137]); ((meltroutine_ptr_t) /*_.VALROUT___V1452*/ meltfptr[1451])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V1138*/ meltfptr[1137]); MELT_LOCATION ("warmelt-normal.melt:980:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1452*/ meltfptr[1451]); /*putclosurout#5 */ melt_assertmsg ("putclosrout#5 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1453*/ meltfptr[1452])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#5 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1452*/ meltfptr[1451])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1453*/ meltfptr[1452])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1452*/ meltfptr[1451]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1453*/ meltfptr[1452]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1454*/ meltfptr[1453])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1454*/ meltfptr[1453])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1454*/ meltfptr[1453]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1455*/ meltfptr[1454]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1454*/ meltfptr[1453]); melt_dbgtrace_written_object ( /*_.VALDATA___V1454*/ meltfptr[1453], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1456*/ meltfptr[1455])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1456*/ meltfptr[1455])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1456*/ meltfptr[1455]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1457*/ meltfptr[1456]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1456*/ meltfptr[1455]); melt_dbgtrace_written_object ( /*_.VALDATA___V1456*/ meltfptr[1455], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:1045:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1458*/ meltfptr[1457])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1458*/ meltfptr[1457])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1458*/ meltfptr[1457]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1456*/ meltfptr[1455]); MELT_LOCATION ("warmelt-normal.melt:1045:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1458*/ meltfptr[1457])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1458*/ meltfptr[1457])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1458*/ meltfptr[1457]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normal.melt:1045:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1458*/ meltfptr[1457]); MELT_LOCATION ("warmelt-normal.melt:1045:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1458*/ meltfptr[1457], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1459*/ meltfptr[1458])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1459*/ meltfptr[1458])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1459*/ meltfptr[1458]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1460*/ meltfptr[1459]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1459*/ meltfptr[1458]); melt_dbgtrace_written_object ( /*_.VALDATA___V1459*/ meltfptr[1458], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:1045:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1461*/ meltfptr[1460])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1461*/ meltfptr[1460])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1461*/ meltfptr[1460]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1459*/ meltfptr[1458]); MELT_LOCATION ("warmelt-normal.melt:1045:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1461*/ meltfptr[1460])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1461*/ meltfptr[1460])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1461*/ meltfptr[1460]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normal.melt:1045:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1461*/ meltfptr[1460]); MELT_LOCATION ("warmelt-normal.melt:1045:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1461*/ meltfptr[1460], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1462*/ meltfptr[1461])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1462*/ meltfptr[1461])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1462*/ meltfptr[1461]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1463*/ meltfptr[1462]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1462*/ meltfptr[1461]); melt_dbgtrace_written_object ( /*_.VALDATA___V1462*/ meltfptr[1461], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:1045:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1464*/ meltfptr[1463])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1464*/ meltfptr[1463])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1464*/ meltfptr[1463]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1462*/ meltfptr[1461]); MELT_LOCATION ("warmelt-normal.melt:1045:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1464*/ meltfptr[1463])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1464*/ meltfptr[1463])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1464*/ meltfptr[1463]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normal.melt:1045:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1464*/ meltfptr[1463]); MELT_LOCATION ("warmelt-normal.melt:1045:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1464*/ meltfptr[1463], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1465*/ meltfptr[1464])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1465*/ meltfptr[1464])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1465*/ meltfptr[1464]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1466*/ meltfptr[1465]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1465*/ meltfptr[1464]); melt_dbgtrace_written_object ( /*_.VALDATA___V1465*/ meltfptr[1464], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:1045:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1467*/ meltfptr[1466])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1467*/ meltfptr[1466])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1467*/ meltfptr[1466]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1465*/ meltfptr[1464]); MELT_LOCATION ("warmelt-normal.melt:1045:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1467*/ meltfptr[1466])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1467*/ meltfptr[1466])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1467*/ meltfptr[1466]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normal.melt:1045:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1467*/ meltfptr[1466]); MELT_LOCATION ("warmelt-normal.melt:1045:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1467*/ meltfptr[1466], "new static instance"); /*putupl#686 */ melt_assertmsg ("putupl #686 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1468*/ meltfptr[1467])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #686 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1468*/ meltfptr[1467])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1468*/ meltfptr[1467]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V1458*/ meltfptr[1457]); /*putupl#687 */ melt_assertmsg ("putupl #687 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1468*/ meltfptr[1467])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #687 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1468*/ meltfptr[1467])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1468*/ meltfptr[1467]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1461*/ meltfptr[1460]); /*putupl#688 */ melt_assertmsg ("putupl #688 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1468*/ meltfptr[1467])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #688 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1468*/ meltfptr[1467])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1468*/ meltfptr[1467]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1464*/ meltfptr[1463]); /*putupl#689 */ melt_assertmsg ("putupl #689 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1468*/ meltfptr[1467])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #689 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1468*/ meltfptr[1467])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1468*/ meltfptr[1467]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1467*/ meltfptr[1466]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1468*/ meltfptr[1467]); MELT_LOCATION ("warmelt-normal.melt:1045:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1470*/ meltfptr[1469]); MELT_LOCATION ("warmelt-normal.melt:1045:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:1045:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1469*/ meltfptr[1468], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:1058:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1471*/ meltfptr[1470])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1300__NORMEXP_IDENTICAL#0", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1471*/ meltfptr[1470])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:1058:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1471*/ meltfptr[1470])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1300__NORMEXP_IDENTICAL#1", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1471*/ meltfptr[1470])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:1058:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1471*/ meltfptr[1470])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1300__NORMEXP_IDENTICAL#2", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1471*/ meltfptr[1470])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:1058:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1471*/ meltfptr[1470]); /*putclosurout#6 */ melt_assertmsg ("putclosrout#6 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1472*/ meltfptr[1471])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#6 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1471*/ meltfptr[1470])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1472*/ meltfptr[1471])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1471*/ meltfptr[1470]); /*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-normal.melt:1068:/ 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_1304__NORMEXP_NULL#0", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1475*/ meltfptr[1474])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:1068:/ 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_1304__NORMEXP_NULL#1", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1475*/ meltfptr[1474])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:1068:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1475*/ meltfptr[1474])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V876*/ meltfptr[875]); ((meltroutine_ptr_t) /*_.VALROUT___V1475*/ meltfptr[1474])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V876*/ meltfptr[875]); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_23 */ void meltmod__warmelt_normal__initialmeltchunk_24 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-normal.melt:1068:/ 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_1304__NORMEXP_NULL#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1475*/ meltfptr[1474])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:1068:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1475*/ meltfptr[1474]); /*putclosurout#7 */ melt_assertmsg ("putclosrout#7 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1476*/ meltfptr[1475])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#7 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]); MELT_LOCATION ("warmelt-normal.melt:1083:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1477*/ meltfptr[1476])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1306__NORMEXP_ANY_OBJECT#0", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1477*/ meltfptr[1476])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:1083:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1477*/ meltfptr[1476])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1306__NORMEXP_ANY_OBJECT#1", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1477*/ meltfptr[1476])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:1083:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1477*/ meltfptr[1476])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1306__NORMEXP_ANY_OBJECT#2", NULL != ( /*_.CLASS_NAMED__V24*/ meltfptr[23])); ((meltroutine_ptr_t) /*_.VALROUT___V1477*/ meltfptr[1476])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NAMED__V24*/ meltfptr[23]); MELT_LOCATION ("warmelt-normal.melt:1083:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1477*/ meltfptr[1476]); /*putclosurout#8 */ melt_assertmsg ("putclosrout#8 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1478*/ meltfptr[1477])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#8 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1477*/ meltfptr[1476])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1478*/ meltfptr[1477])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1477*/ meltfptr[1476]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1478*/ meltfptr[1477]); MELT_LOCATION ("warmelt-normal.melt:1102:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1479*/ meltfptr[1478])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1308__NORMEXP_ANY_VALUE#0", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1479*/ meltfptr[1478])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:1102:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1479*/ meltfptr[1478])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1308__NORMEXP_ANY_VALUE#1", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1479*/ meltfptr[1478])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:1102:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1479*/ meltfptr[1478])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1308__NORMEXP_ANY_VALUE#2", NULL != ( /*_.CLASS_NAMED__V24*/ meltfptr[23])); ((meltroutine_ptr_t) /*_.VALROUT___V1479*/ meltfptr[1478])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NAMED__V24*/ meltfptr[23]); MELT_LOCATION ("warmelt-normal.melt:1102:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1479*/ meltfptr[1478]); /*putclosurout#9 */ melt_assertmsg ("putclosrout#9 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1480*/ meltfptr[1479])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#9 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1479*/ meltfptr[1478])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1480*/ meltfptr[1479])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1479*/ meltfptr[1478]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1480*/ meltfptr[1479]); MELT_LOCATION ("warmelt-normal.melt:1118:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1481*/ meltfptr[1480])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1310__NORMEXP_SRC_CATCHALL#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1481*/ meltfptr[1480])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:1118:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1481*/ meltfptr[1480])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1310__NORMEXP_SRC_CATCHALL#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1481*/ meltfptr[1480])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:1118:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1481*/ meltfptr[1480])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1310__NORMEXP_SRC_CATCHALL#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1481*/ meltfptr[1480])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:1118:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1481*/ meltfptr[1480]); /*putclosurout#10 */ melt_assertmsg ("putclosrout#10 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1482*/ meltfptr[1481])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#10 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1481*/ meltfptr[1480])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1482*/ meltfptr[1481])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1481*/ meltfptr[1480]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1482*/ meltfptr[1481]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1483*/ meltfptr[1482])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1483*/ meltfptr[1482])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1483*/ meltfptr[1482]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1484*/ meltfptr[1483]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1483*/ meltfptr[1482]); melt_dbgtrace_written_object ( /*_.VALDATA___V1483*/ meltfptr[1482], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:1132:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1485*/ meltfptr[1484])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1314__NORMEXP_LAZYMACROEXP#0", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1485*/ meltfptr[1484])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:1132:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1485*/ meltfptr[1484])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1314__NORMEXP_LAZYMACROEXP#1", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1485*/ meltfptr[1484])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:1132:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1485*/ meltfptr[1484])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1314__NORMEXP_LAZYMACROEXP#2", NULL != ( /*_.CLASS_LOCATED__V27*/ meltfptr[26])); ((meltroutine_ptr_t) /*_.VALROUT___V1485*/ meltfptr[1484])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V27*/ meltfptr[26]); MELT_LOCATION ("warmelt-normal.melt:1132:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1485*/ meltfptr[1484])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1314__NORMEXP_LAZYMACROEXP#3", NULL != ( /*_.CLASS_SOURCE_LAZY_MACRO_EXPANSION__V28*/ meltfptr[27])); ((meltroutine_ptr_t) /*_.VALROUT___V1485*/ meltfptr[1484])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_SOURCE_LAZY_MACRO_EXPANSION__V28*/ meltfptr[27]); MELT_LOCATION ("warmelt-normal.melt:1132:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1485*/ meltfptr[1484])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1314__NORMEXP_LAZYMACROEXP#4", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1485*/ meltfptr[1484])->tabval[4] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:1132:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1485*/ meltfptr[1484])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1314__NORMEXP_LAZYMACROEXP#5", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V1485*/ meltfptr[1484])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normal.melt:1132:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1485*/ meltfptr[1484])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1314__NORMEXP_LAZYMACROEXP#6", NULL != ( /*_.CLASS_NAMED__V24*/ meltfptr[23])); ((meltroutine_ptr_t) /*_.VALROUT___V1485*/ meltfptr[1484])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_NAMED__V24*/ meltfptr[23]); MELT_LOCATION ("warmelt-normal.melt:1132:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1485*/ meltfptr[1484])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V1485*/ meltfptr[1484])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:1132:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1485*/ meltfptr[1484]); /*putclosurout#11 */ melt_assertmsg ("putclosrout#11 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1486*/ meltfptr[1485])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#11 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1485*/ meltfptr[1484])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1486*/ meltfptr[1485])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1485*/ meltfptr[1484]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1486*/ meltfptr[1485]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1487*/ meltfptr[1486])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1487*/ meltfptr[1486])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1487*/ meltfptr[1486]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1488*/ meltfptr[1487]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1487*/ meltfptr[1486]); melt_dbgtrace_written_object ( /*_.VALDATA___V1487*/ meltfptr[1486], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1489*/ meltfptr[1488])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1489*/ meltfptr[1488])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1489*/ meltfptr[1488]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1490*/ meltfptr[1489]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1489*/ meltfptr[1488]); melt_dbgtrace_written_object ( /*_.VALDATA___V1489*/ meltfptr[1488], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:1171:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1492*/ meltfptr[1491]); MELT_LOCATION ("warmelt-normal.melt:1171:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-normal.melt:1171:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1491*/ meltfptr[1490], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1493*/ meltfptr[1492])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1493*/ meltfptr[1492])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1493*/ meltfptr[1492]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1494*/ meltfptr[1493]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1493*/ meltfptr[1492]); melt_dbgtrace_written_object ( /*_.VALDATA___V1493*/ meltfptr[1492], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:1180:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1495*/ meltfptr[1494])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1495*/ meltfptr[1494])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1495*/ meltfptr[1494]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1496*/ meltfptr[1495]); MELT_LOCATION ("warmelt-normal.melt:1180:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1495*/ meltfptr[1494]); MELT_LOCATION ("warmelt-normal.melt:1180:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1495*/ meltfptr[1494], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:1184:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1497*/ meltfptr[1496])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1326__GECTYP_ANYRECV#0", NULL != ( /*_.CTYPE_VALUE__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V1497*/ meltfptr[1496])->tabval[0] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normal.melt:1184:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1497*/ meltfptr[1496]); /*putclosurout#12 */ melt_assertmsg ("putclosrout#12 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1498*/ meltfptr[1497])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#12 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1497*/ meltfptr[1496])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1498*/ meltfptr[1497])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1497*/ meltfptr[1496]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1498*/ meltfptr[1497]); MELT_LOCATION ("warmelt-normal.melt:1187:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1499*/ meltfptr[1498])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1328__GECTYP_ROOT#0", NULL != ( /*_.CTYPE_VALUE__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V1499*/ meltfptr[1498])->tabval[0] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normal.melt:1187:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1499*/ meltfptr[1498]); /*putclosurout#13 */ melt_assertmsg ("putclosrout#13 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1500*/ meltfptr[1499])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#13 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1499*/ meltfptr[1498])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1500*/ meltfptr[1499])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1499*/ meltfptr[1498]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1500*/ meltfptr[1499]); MELT_LOCATION ("warmelt-normal.melt:1191:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1501*/ meltfptr[1500])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1330__GECTYP_INTEGER#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1501*/ meltfptr[1500])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:1191:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1501*/ meltfptr[1500])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1330__GECTYP_INTEGER#1", NULL != ( /*_.CTYPE_LONG__V31*/ meltfptr[30])); ((meltroutine_ptr_t) /*_.VALROUT___V1501*/ meltfptr[1500])->tabval[1] = (melt_ptr_t) ( /*_.CTYPE_LONG__V31*/ meltfptr[30]); MELT_LOCATION ("warmelt-normal.melt:1191:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1501*/ meltfptr[1500]); /*putclosurout#14 */ melt_assertmsg ("putclosrout#14 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1502*/ meltfptr[1501])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#14 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1501*/ meltfptr[1500])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1502*/ meltfptr[1501])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1501*/ meltfptr[1500]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1502*/ meltfptr[1501]); MELT_LOCATION ("warmelt-normal.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1503*/ meltfptr[1502])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1332__GECTYP_STRING#0", NULL != ( /*_.CTYPE_CSTRING__V32*/ meltfptr[31])); ((meltroutine_ptr_t) /*_.VALROUT___V1503*/ meltfptr[1502])->tabval[0] = (melt_ptr_t) ( /*_.CTYPE_CSTRING__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-normal.melt:1197:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1503*/ meltfptr[1502]); /*putclosurout#15 */ melt_assertmsg ("putclosrout#15 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1504*/ meltfptr[1503])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#15 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1503*/ meltfptr[1502])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1504*/ meltfptr[1503])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1503*/ meltfptr[1502]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1504*/ meltfptr[1503]); MELT_LOCATION ("warmelt-normal.melt:1202:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1505*/ meltfptr[1504])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1334__NORMALIZE_TUPLE#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1505*/ meltfptr[1504])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:1202:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1505*/ meltfptr[1504])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1334__NORMALIZE_TUPLE#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1505*/ meltfptr[1504])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:1202:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1505*/ meltfptr[1504])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1334__NORMALIZE_TUPLE#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1505*/ meltfptr[1504])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:1202:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1505*/ meltfptr[1504])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1334__NORMALIZE_TUPLE#3", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1505*/ meltfptr[1504])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:1202:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1505*/ meltfptr[1504])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1334__NORMALIZE_TUPLE#4", NULL != ( /*_.MULTIPLE_MAP__V33*/ meltfptr[32])); ((meltroutine_ptr_t) /*_.VALROUT___V1505*/ meltfptr[1504])->tabval[4] = (melt_ptr_t) ( /*_.MULTIPLE_MAP__V33*/ meltfptr[32]); MELT_LOCATION ("warmelt-normal.melt:1202:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1505*/ meltfptr[1504])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1334__NORMALIZE_TUPLE#5", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1505*/ meltfptr[1504])->tabval[5] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:1202:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1505*/ meltfptr[1504])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V1505*/ meltfptr[1504])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:1202:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1505*/ meltfptr[1504])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V192*/ meltfptr[191]); ((meltroutine_ptr_t) /*_.VALROUT___V1505*/ meltfptr[1504])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-normal.melt:1202:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1505*/ meltfptr[1504])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1334__NORMALIZE_TUPLE#8", NULL != ( /*_.LIST_EVERY__V34*/ meltfptr[33])); ((meltroutine_ptr_t) /*_.VALROUT___V1505*/ meltfptr[1504])->tabval[8] = (melt_ptr_t) ( /*_.LIST_EVERY__V34*/ meltfptr[33]); MELT_LOCATION ("warmelt-normal.melt:1202:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1505*/ meltfptr[1504])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1334__NORMALIZE_TUPLE#9", NULL != ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7])); ((meltroutine_ptr_t) /*_.VALROUT___V1505*/ meltfptr[1504])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-normal.melt:1212:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1506*/ meltfptr[1505])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1338__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1506*/ meltfptr[1505])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:1212:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1506*/ meltfptr[1505])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V1506*/ meltfptr[1505])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:1212:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1506*/ meltfptr[1505])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V192*/ meltfptr[191]); ((meltroutine_ptr_t) /*_.VALROUT___V1506*/ meltfptr[1505])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-normal.melt:1212:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1506*/ meltfptr[1505])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1338__LAMBDA_#3", NULL != ( /*_.LIST_EVERY__V34*/ meltfptr[33])); ((meltroutine_ptr_t) /*_.VALROUT___V1506*/ meltfptr[1505])->tabval[3] = (melt_ptr_t) ( /*_.LIST_EVERY__V34*/ meltfptr[33]); MELT_LOCATION ("warmelt-normal.melt:1212:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1506*/ meltfptr[1505])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1338__LAMBDA_#4", NULL != ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7])); ((meltroutine_ptr_t) /*_.VALROUT___V1506*/ meltfptr[1505])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-normal.melt:1223:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1507*/ meltfptr[1506])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1341__LAMBDA_#0", NULL != ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7])); ((meltroutine_ptr_t) /*_.VALROUT___V1507*/ meltfptr[1506])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-normal.melt:1223:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1507*/ meltfptr[1506]); MELT_LOCATION ("warmelt-normal.melt:1212:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1506*/ meltfptr[1505])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1338__LAMBDA_#5", NULL != ( /*_.VALROUT___V1507*/ meltfptr[1506])); ((meltroutine_ptr_t) /*_.VALROUT___V1506*/ meltfptr[1505])->tabval[5] = (melt_ptr_t) ( /*_.VALROUT___V1507*/ meltfptr[1506]); MELT_LOCATION ("warmelt-normal.melt:1212:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1506*/ meltfptr[1505]); MELT_LOCATION ("warmelt-normal.melt:1202:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1505*/ meltfptr[1504])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1334__NORMALIZE_TUPLE#10", NULL != ( /*_.VALROUT___V1506*/ meltfptr[1505])); ((meltroutine_ptr_t) /*_.VALROUT___V1505*/ meltfptr[1504])->tabval[10] = (melt_ptr_t) ( /*_.VALROUT___V1506*/ meltfptr[1505]); MELT_LOCATION ("warmelt-normal.melt:1202:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1505*/ meltfptr[1504]); /*putclosurout#16 */ melt_assertmsg ("putclosrout#16 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1508*/ meltfptr[1507])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#16 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1505*/ meltfptr[1504])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1508*/ meltfptr[1507])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1505*/ meltfptr[1504]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1508*/ meltfptr[1507]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1509*/ meltfptr[1508])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1509*/ meltfptr[1508])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1509*/ meltfptr[1508]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1510*/ meltfptr[1509]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1509*/ meltfptr[1508]); melt_dbgtrace_written_object ( /*_.VALDATA___V1509*/ meltfptr[1508], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1511*/ meltfptr[1510])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1511*/ meltfptr[1510])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1511*/ meltfptr[1510]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1512*/ meltfptr[1511]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1511*/ meltfptr[1510]); melt_dbgtrace_written_object ( /*_.VALDATA___V1511*/ meltfptr[1510], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:1240:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1513*/ meltfptr[1512])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1342__WRAP_NORMAL_LET1#0", NULL != ( /*_.LIST_EVERY__V34*/ meltfptr[33])); ((meltroutine_ptr_t) /*_.VALROUT___V1513*/ meltfptr[1512])->tabval[0] = (melt_ptr_t) ( /*_.LIST_EVERY__V34*/ meltfptr[33]); MELT_LOCATION ("warmelt-normal.melt:1240:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1513*/ meltfptr[1512])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1342__WRAP_NORMAL_LET1#1", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1513*/ meltfptr[1512])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:1240:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1513*/ meltfptr[1512])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1342__WRAP_NORMAL_LET1#2", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1513*/ meltfptr[1512])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:1244:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1514*/ meltfptr[1513])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1344__LAMBDA_#0", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1514*/ meltfptr[1513])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:1244:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1514*/ meltfptr[1513])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1344__LAMBDA_#1", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1514*/ meltfptr[1513])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:1244:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1514*/ meltfptr[1513]); MELT_LOCATION ("warmelt-normal.melt:1240:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1513*/ meltfptr[1512])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1342__WRAP_NORMAL_LET1#3", NULL != ( /*_.VALROUT___V1514*/ meltfptr[1513])); ((meltroutine_ptr_t) /*_.VALROUT___V1513*/ meltfptr[1512])->tabval[3] = (melt_ptr_t) ( /*_.VALROUT___V1514*/ meltfptr[1513]); MELT_LOCATION ("warmelt-normal.melt:1240:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1513*/ meltfptr[1512])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V294*/ meltfptr[293]); ((meltroutine_ptr_t) /*_.VALROUT___V1513*/ meltfptr[1512])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V294*/ meltfptr[293]); MELT_LOCATION ("warmelt-normal.melt:1240:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1513*/ meltfptr[1512])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1342__WRAP_NORMAL_LET1#5", NULL != ( /*_.LIST_TO_MULTIPLE__V36*/ meltfptr[35])); ((meltroutine_ptr_t) /*_.VALROUT___V1513*/ meltfptr[1512])->tabval[5] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V36*/ meltfptr[35]); MELT_LOCATION ("warmelt-normal.melt:1240:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1513*/ meltfptr[1512]); /*putclosurout#17 */ melt_assertmsg ("putclosrout#17 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1515*/ meltfptr[1514])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#17 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1513*/ meltfptr[1512])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1515*/ meltfptr[1514])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1513*/ meltfptr[1512]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1515*/ meltfptr[1514]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1516*/ meltfptr[1515])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1516*/ meltfptr[1515])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1516*/ meltfptr[1515]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1517*/ meltfptr[1516]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1516*/ meltfptr[1515]); melt_dbgtrace_written_object ( /*_.VALDATA___V1516*/ meltfptr[1515], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1518*/ meltfptr[1517])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1518*/ meltfptr[1517])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1518*/ meltfptr[1517]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1519*/ meltfptr[1518]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1518*/ meltfptr[1517]); melt_dbgtrace_written_object ( /*_.VALDATA___V1518*/ meltfptr[1517], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:1265:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1520*/ meltfptr[1519])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1349__WRAP_NORMAL_LETSEQ#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1520*/ meltfptr[1519])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:1265:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1520*/ meltfptr[1519])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1515*/ meltfptr[1514]); ((meltroutine_ptr_t) /*_.VALROUT___V1520*/ meltfptr[1519])->tabval[1] = (melt_ptr_t) ( /*_.VALCLO___V1515*/ meltfptr[1514]); MELT_LOCATION ("warmelt-normal.melt:1265:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1520*/ meltfptr[1519])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V472*/ meltfptr[471]); ((meltroutine_ptr_t) /*_.VALROUT___V1520*/ meltfptr[1519])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471]); MELT_LOCATION ("warmelt-normal.melt:1265:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1520*/ meltfptr[1519])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1349__WRAP_NORMAL_LETSEQ#3", NULL != ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1520*/ meltfptr[1519])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-normal.melt:1265:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1520*/ meltfptr[1519])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V176*/ meltfptr[175]); ((meltroutine_ptr_t) /*_.VALROUT___V1520*/ meltfptr[1519])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); MELT_LOCATION ("warmelt-normal.melt:1265:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1520*/ meltfptr[1519])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1349__WRAP_NORMAL_LETSEQ#5", NULL != ( /*_.LIST_EVERY__V34*/ meltfptr[33])); ((meltroutine_ptr_t) /*_.VALROUT___V1520*/ meltfptr[1519])->tabval[5] = (melt_ptr_t) ( /*_.LIST_EVERY__V34*/ meltfptr[33]); MELT_LOCATION ("warmelt-normal.melt:1265:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1520*/ meltfptr[1519])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1349__WRAP_NORMAL_LETSEQ#6", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1520*/ meltfptr[1519])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:1265:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1520*/ meltfptr[1519])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1349__WRAP_NORMAL_LETSEQ#7", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1520*/ meltfptr[1519])->tabval[7] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:1303:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1521*/ meltfptr[1520])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1351__LAMBDA_#0", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1521*/ meltfptr[1520])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:1303:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1521*/ meltfptr[1520])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1351__LAMBDA_#1", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1521*/ meltfptr[1520])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:1303:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1521*/ meltfptr[1520]); MELT_LOCATION ("warmelt-normal.melt:1265:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1520*/ meltfptr[1519])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1349__WRAP_NORMAL_LETSEQ#8", NULL != ( /*_.VALROUT___V1521*/ meltfptr[1520])); ((meltroutine_ptr_t) /*_.VALROUT___V1520*/ meltfptr[1519])->tabval[8] = (melt_ptr_t) ( /*_.VALROUT___V1521*/ meltfptr[1520]); MELT_LOCATION ("warmelt-normal.melt:1265:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1520*/ meltfptr[1519])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V294*/ meltfptr[293]); ((meltroutine_ptr_t) /*_.VALROUT___V1520*/ meltfptr[1519])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V294*/ meltfptr[293]); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_24 */ void meltmod__warmelt_normal__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-normal.melt:1265:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1520*/ meltfptr[1519])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1349__WRAP_NORMAL_LETSEQ#10", NULL != ( /*_.LIST_TO_MULTIPLE__V36*/ meltfptr[35])); ((meltroutine_ptr_t) /*_.VALROUT___V1520*/ meltfptr[1519])->tabval[10] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V36*/ meltfptr[35]); MELT_LOCATION ("warmelt-normal.melt:1265:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1520*/ meltfptr[1519]); /*putclosurout#18 */ melt_assertmsg ("putclosrout#18 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1522*/ meltfptr[1521])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#18 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1520*/ meltfptr[1519])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1522*/ meltfptr[1521])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1520*/ meltfptr[1519]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1522*/ meltfptr[1521]); MELT_LOCATION ("warmelt-normal.melt:1322:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1523*/ meltfptr[1522])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1352__CHECK_CTYPE_NARGS#0", NULL != ( /*_.MULTIPLE_EVERY__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1523*/ meltfptr[1522])->tabval[0] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-normal.melt:1322:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1523*/ meltfptr[1522])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V1523*/ meltfptr[1522])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-normal.melt:1322:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1523*/ meltfptr[1522])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1352__CHECK_CTYPE_NARGS#2", NULL != ( /*_.CLASS_CTYPE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V1523*/ meltfptr[1522])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normal.melt:1325:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1524*/ meltfptr[1523])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V1524*/ meltfptr[1523])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-normal.melt:1325:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1524*/ meltfptr[1523])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1356__LAMBDA_#1", NULL != ( /*_.CLASS_CTYPE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V1524*/ meltfptr[1523])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normal.melt:1325:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1524*/ meltfptr[1523]); MELT_LOCATION ("warmelt-normal.melt:1322:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1523*/ meltfptr[1522])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1352__CHECK_CTYPE_NARGS#3", NULL != ( /*_.VALROUT___V1524*/ meltfptr[1523])); ((meltroutine_ptr_t) /*_.VALROUT___V1523*/ meltfptr[1522])->tabval[3] = (melt_ptr_t) ( /*_.VALROUT___V1524*/ meltfptr[1523]); MELT_LOCATION ("warmelt-normal.melt:1322:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1523*/ meltfptr[1522]); /*putclosurout#19 */ melt_assertmsg ("putclosrout#19 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1525*/ meltfptr[1524])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#19 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1523*/ meltfptr[1522])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1525*/ meltfptr[1524])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1523*/ meltfptr[1522]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1525*/ meltfptr[1524]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1526*/ meltfptr[1525])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1526*/ meltfptr[1525])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1526*/ meltfptr[1525]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1527*/ meltfptr[1526]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1526*/ meltfptr[1525]); melt_dbgtrace_written_object ( /*_.VALDATA___V1526*/ meltfptr[1525], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1528*/ meltfptr[1527])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1528*/ meltfptr[1527])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1528*/ meltfptr[1527]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1529*/ meltfptr[1528]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1528*/ meltfptr[1527]); melt_dbgtrace_written_object ( /*_.VALDATA___V1528*/ meltfptr[1527], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:1334:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1530*/ meltfptr[1529])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1530*/ meltfptr[1529])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1530*/ meltfptr[1529]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1456*/ meltfptr[1455]); MELT_LOCATION ("warmelt-normal.melt:1334:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1530*/ meltfptr[1529])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1530*/ meltfptr[1529])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1530*/ meltfptr[1529]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normal.melt:1334:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1530*/ meltfptr[1529]); MELT_LOCATION ("warmelt-normal.melt:1334:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1530*/ meltfptr[1529], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:1334:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1531*/ meltfptr[1530])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1531*/ meltfptr[1530])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1531*/ meltfptr[1530]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1459*/ meltfptr[1458]); MELT_LOCATION ("warmelt-normal.melt:1334:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1531*/ meltfptr[1530])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1531*/ meltfptr[1530])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1531*/ meltfptr[1530]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normal.melt:1334:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1531*/ meltfptr[1530]); MELT_LOCATION ("warmelt-normal.melt:1334:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1531*/ meltfptr[1530], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:1334:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1532*/ meltfptr[1531])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1532*/ meltfptr[1531])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1532*/ meltfptr[1531]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1462*/ meltfptr[1461]); MELT_LOCATION ("warmelt-normal.melt:1334:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1532*/ meltfptr[1531])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1532*/ meltfptr[1531])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1532*/ meltfptr[1531]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normal.melt:1334:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1532*/ meltfptr[1531]); MELT_LOCATION ("warmelt-normal.melt:1334:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1532*/ meltfptr[1531], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1533*/ meltfptr[1532])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1533*/ meltfptr[1532])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1533*/ meltfptr[1532]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1534*/ meltfptr[1533]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1533*/ meltfptr[1532]); melt_dbgtrace_written_object ( /*_.VALDATA___V1533*/ meltfptr[1532], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:1334:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1535*/ meltfptr[1534])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1535*/ meltfptr[1534])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1535*/ meltfptr[1534]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1533*/ meltfptr[1532]); MELT_LOCATION ("warmelt-normal.melt:1334:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1535*/ meltfptr[1534])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1535*/ meltfptr[1534])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1535*/ meltfptr[1534]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normal.melt:1334:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1535*/ meltfptr[1534]); MELT_LOCATION ("warmelt-normal.melt:1334:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1535*/ meltfptr[1534], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:1334:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1536*/ meltfptr[1535])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1536*/ meltfptr[1535])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1536*/ meltfptr[1535]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1465*/ meltfptr[1464]); MELT_LOCATION ("warmelt-normal.melt:1334:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1536*/ meltfptr[1535])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1536*/ meltfptr[1535])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1536*/ meltfptr[1535]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normal.melt:1334:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1536*/ meltfptr[1535]); MELT_LOCATION ("warmelt-normal.melt:1334:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1536*/ meltfptr[1535], "new static instance"); /*putupl#690 */ melt_assertmsg ("putupl #690 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1537*/ meltfptr[1536])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #690 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1537*/ meltfptr[1536])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1537*/ meltfptr[1536]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V1530*/ meltfptr[1529]); /*putupl#691 */ melt_assertmsg ("putupl #691 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1537*/ meltfptr[1536])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #691 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1537*/ meltfptr[1536])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1537*/ meltfptr[1536]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1531*/ meltfptr[1530]); /*putupl#692 */ melt_assertmsg ("putupl #692 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1537*/ meltfptr[1536])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #692 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1537*/ meltfptr[1536])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1537*/ meltfptr[1536]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1532*/ meltfptr[1531]); /*putupl#693 */ melt_assertmsg ("putupl #693 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1537*/ meltfptr[1536])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #693 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1537*/ meltfptr[1536])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1537*/ meltfptr[1536]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1535*/ meltfptr[1534]); /*putupl#694 */ melt_assertmsg ("putupl #694 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1537*/ meltfptr[1536])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #694 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1537*/ meltfptr[1536])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1537*/ meltfptr[1536]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V1536*/ meltfptr[1535]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1537*/ meltfptr[1536]); MELT_LOCATION ("warmelt-normal.melt:1334:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1538*/ meltfptr[1537])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1538*/ meltfptr[1537])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1538*/ meltfptr[1537]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1539*/ meltfptr[1538]); MELT_LOCATION ("warmelt-normal.melt:1334:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1538*/ meltfptr[1537]); MELT_LOCATION ("warmelt-normal.melt:1334:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1538*/ meltfptr[1537], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:1340:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1540*/ meltfptr[1539])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1369__NORMBIND_FAILANY#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1540*/ meltfptr[1539])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:1340:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1540*/ meltfptr[1539])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1369__NORMBIND_FAILANY#1", NULL != ( /*_.CLASS_NAMED__V24*/ meltfptr[23])); ((meltroutine_ptr_t) /*_.VALROUT___V1540*/ meltfptr[1539])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NAMED__V24*/ meltfptr[23]); MELT_LOCATION ("warmelt-normal.melt:1340:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1540*/ meltfptr[1539]); /*putclosurout#20 */ melt_assertmsg ("putclosrout#20 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1541*/ meltfptr[1540])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#20 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1540*/ meltfptr[1539])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1541*/ meltfptr[1540])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1540*/ meltfptr[1539]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1541*/ meltfptr[1540]); MELT_LOCATION ("warmelt-normal.melt:1350:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1542*/ meltfptr[1541])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1371__NORMBIND_ANYBIND#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1542*/ meltfptr[1541])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:1350:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1542*/ meltfptr[1541])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1371__NORMBIND_ANYBIND#1", NULL != ( /*_.CLASS_NAMED__V24*/ meltfptr[23])); ((meltroutine_ptr_t) /*_.VALROUT___V1542*/ meltfptr[1541])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NAMED__V24*/ meltfptr[23]); MELT_LOCATION ("warmelt-normal.melt:1350:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1542*/ meltfptr[1541])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1076*/ meltfptr[1075]); ((meltroutine_ptr_t) /*_.VALROUT___V1542*/ meltfptr[1541])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1076*/ meltfptr[1075]); MELT_LOCATION ("warmelt-normal.melt:1350:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1542*/ meltfptr[1541])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1371__NORMBIND_ANYBIND#3", NULL != ( /*_.CTYPE_VALUE__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V1542*/ meltfptr[1541])->tabval[3] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normal.melt:1350:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1542*/ meltfptr[1541])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V782*/ meltfptr[781]); ((meltroutine_ptr_t) /*_.VALROUT___V1542*/ meltfptr[1541])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V782*/ meltfptr[781]); MELT_LOCATION ("warmelt-normal.melt:1350:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1542*/ meltfptr[1541])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1371__NORMBIND_ANYBIND#5", NULL != ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1542*/ meltfptr[1541])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normal.melt:1350:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1542*/ meltfptr[1541]); /*putclosurout#21 */ melt_assertmsg ("putclosrout#21 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1543*/ meltfptr[1542])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#21 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1542*/ meltfptr[1541])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1543*/ meltfptr[1542])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1542*/ meltfptr[1541]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1543*/ meltfptr[1542]); MELT_LOCATION ("warmelt-normal.melt:1392:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1544*/ meltfptr[1543])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1373__NORMBIND_FORMALBIND#0", NULL != ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V1544*/ meltfptr[1543])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-normal.melt:1392:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1544*/ meltfptr[1543])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1373__NORMBIND_FORMALBIND#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1544*/ meltfptr[1543])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:1392:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1544*/ meltfptr[1543])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1373__NORMBIND_FORMALBIND#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1544*/ meltfptr[1543])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:1392:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1544*/ meltfptr[1543])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1544*/ meltfptr[1543])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:1392:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1544*/ meltfptr[1543])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1373__NORMBIND_FORMALBIND#4", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1544*/ meltfptr[1543])->tabval[4] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:1392:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1544*/ meltfptr[1543]); /*putclosurout#22 */ melt_assertmsg ("putclosrout#22 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1545*/ meltfptr[1544])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#22 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1544*/ meltfptr[1543])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1545*/ meltfptr[1544])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1544*/ meltfptr[1543]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1545*/ meltfptr[1544]); MELT_LOCATION ("warmelt-normal.melt:1415:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1546*/ meltfptr[1545])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1375__NORMBIND_LETBIND#0", NULL != ( /*_.CLASS_LET_BINDING__V42*/ meltfptr[41])); ((meltroutine_ptr_t) /*_.VALROUT___V1546*/ meltfptr[1545])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_LET_BINDING__V42*/ meltfptr[41]); MELT_LOCATION ("warmelt-normal.melt:1415:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1546*/ meltfptr[1545])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1375__NORMBIND_LETBIND#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1546*/ meltfptr[1545])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:1415:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1546*/ meltfptr[1545])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1375__NORMBIND_LETBIND#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1546*/ meltfptr[1545])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:1415:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1546*/ meltfptr[1545])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1546*/ meltfptr[1545])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:1415:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1546*/ meltfptr[1545])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1375__NORMBIND_LETBIND#4", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1546*/ meltfptr[1545])->tabval[4] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:1415:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1546*/ meltfptr[1545]); /*putclosurout#23 */ melt_assertmsg ("putclosrout#23 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1547*/ meltfptr[1546])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#23 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1546*/ meltfptr[1545])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1547*/ meltfptr[1546])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1546*/ meltfptr[1545]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1547*/ meltfptr[1546]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1548*/ meltfptr[1547])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1548*/ meltfptr[1547])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1548*/ meltfptr[1547]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1549*/ meltfptr[1548]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1548*/ meltfptr[1547]); melt_dbgtrace_written_object ( /*_.VALDATA___V1548*/ meltfptr[1547], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:1437:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1550*/ meltfptr[1549])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1379__NORMBIND_FIXBIND#0", NULL != ( /*_.CLASS_FIXED_BINDING__V43*/ meltfptr[42])); ((meltroutine_ptr_t) /*_.VALROUT___V1550*/ meltfptr[1549])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_FIXED_BINDING__V43*/ meltfptr[42]); MELT_LOCATION ("warmelt-normal.melt:1437:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1550*/ meltfptr[1549])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1379__NORMBIND_FIXBIND#1", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1550*/ meltfptr[1549])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:1437:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1550*/ meltfptr[1549])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1379__NORMBIND_FIXBIND#2", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1550*/ meltfptr[1549])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:1437:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1550*/ meltfptr[1549])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1379__NORMBIND_FIXBIND#3", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1550*/ meltfptr[1549])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:1437:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1550*/ meltfptr[1549])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V888*/ meltfptr[887]); ((meltroutine_ptr_t) /*_.VALROUT___V1550*/ meltfptr[1549])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V888*/ meltfptr[887]); MELT_LOCATION ("warmelt-normal.melt:1437:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1550*/ meltfptr[1549]); /*putclosurout#24 */ melt_assertmsg ("putclosrout#24 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1551*/ meltfptr[1550])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#24 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1550*/ meltfptr[1549])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1551*/ meltfptr[1550])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1550*/ meltfptr[1549]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1551*/ meltfptr[1550]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1552*/ meltfptr[1551])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1552*/ meltfptr[1551])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1552*/ meltfptr[1551]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1553*/ meltfptr[1552]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1552*/ meltfptr[1551]); melt_dbgtrace_written_object ( /*_.VALDATA___V1552*/ meltfptr[1551], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:1464:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1554*/ meltfptr[1553])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1383__NORMBIND_DEFINEDVALBIND#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1554*/ meltfptr[1553])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:1464:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1554*/ meltfptr[1553])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1383__NORMBIND_DEFINEDVALBIND#1", NULL != ( /*_.CLASS_DEFINED_VALUE_BINDING__V44*/ meltfptr[43])); ((meltroutine_ptr_t) /*_.VALROUT___V1554*/ meltfptr[1553])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_DEFINED_VALUE_BINDING__V44*/ meltfptr[43]); MELT_LOCATION ("warmelt-normal.melt:1464:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1554*/ meltfptr[1553])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1383__NORMBIND_DEFINEDVALBIND#2", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1554*/ meltfptr[1553])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:1464:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1554*/ meltfptr[1553])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1383__NORMBIND_DEFINEDVALBIND#3", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1554*/ meltfptr[1553])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:1464:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1554*/ meltfptr[1553])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1106*/ meltfptr[1105]); ((meltroutine_ptr_t) /*_.VALROUT___V1554*/ meltfptr[1553])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V1106*/ meltfptr[1105]); MELT_LOCATION ("warmelt-normal.melt:1464:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1554*/ meltfptr[1553])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1383__NORMBIND_DEFINEDVALBIND#5", NULL != ( /*_.CLASS_FIXED_BINDING__V43*/ meltfptr[42])); ((meltroutine_ptr_t) /*_.VALROUT___V1554*/ meltfptr[1553])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_FIXED_BINDING__V43*/ meltfptr[42]); MELT_LOCATION ("warmelt-normal.melt:1464:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1554*/ meltfptr[1553]); /*putclosurout#25 */ melt_assertmsg ("putclosrout#25 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1555*/ meltfptr[1554])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#25 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1554*/ meltfptr[1553])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1555*/ meltfptr[1554])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1554*/ meltfptr[1553]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1555*/ meltfptr[1554]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1556*/ meltfptr[1555])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1556*/ meltfptr[1555])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1556*/ meltfptr[1555]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1557*/ meltfptr[1556]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1556*/ meltfptr[1555]); melt_dbgtrace_written_object ( /*_.VALDATA___V1556*/ meltfptr[1555], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:1499:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1558*/ meltfptr[1557])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V690*/ meltfptr[689]); ((meltroutine_ptr_t) /*_.VALROUT___V1558*/ meltfptr[1557])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V690*/ meltfptr[689]); MELT_LOCATION ("warmelt-normal.melt:1499:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1558*/ meltfptr[1557])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1387__NORMBIND_CONSTRUCTBIND#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1558*/ meltfptr[1557])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:1499:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1558*/ meltfptr[1557])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1387__NORMBIND_CONSTRUCTBIND#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1558*/ meltfptr[1557])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:1499:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1558*/ meltfptr[1557])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1387__NORMBIND_CONSTRUCTBIND#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1558*/ meltfptr[1557])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:1499:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1558*/ meltfptr[1557])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V308*/ meltfptr[307]); ((meltroutine_ptr_t) /*_.VALROUT___V1558*/ meltfptr[1557])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V308*/ meltfptr[307]); MELT_LOCATION ("warmelt-normal.melt:1499:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1558*/ meltfptr[1557])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1042*/ meltfptr[1041]); ((meltroutine_ptr_t) /*_.VALROUT___V1558*/ meltfptr[1557])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1042*/ meltfptr[1041]); MELT_LOCATION ("warmelt-normal.melt:1499:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1558*/ meltfptr[1557])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1558*/ meltfptr[1557])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:1499:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1558*/ meltfptr[1557]); /*putclosurout#26 */ melt_assertmsg ("putclosrout#26 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1559*/ meltfptr[1558])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#26 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1558*/ meltfptr[1557])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1559*/ meltfptr[1558])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1558*/ meltfptr[1557]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1559*/ meltfptr[1558]); MELT_LOCATION ("warmelt-normal.melt:1540:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1560*/ meltfptr[1559])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1389__NORMEXP_SYMBOL#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1560*/ meltfptr[1559])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:1540:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1560*/ meltfptr[1559])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1389__NORMEXP_SYMBOL#1", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1560*/ meltfptr[1559])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:1540:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1560*/ meltfptr[1559])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1389__NORMEXP_SYMBOL#2", NULL != ( /*_.FIND_ENCLOSING_ENV__V45*/ meltfptr[44])); ((meltroutine_ptr_t) /*_.VALROUT___V1560*/ meltfptr[1559])->tabval[2] = (melt_ptr_t) ( /*_.FIND_ENCLOSING_ENV__V45*/ meltfptr[44]); MELT_LOCATION ("warmelt-normal.melt:1540:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1560*/ meltfptr[1559])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1389__NORMEXP_SYMBOL#3", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V1560*/ meltfptr[1559])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normal.melt:1540:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1560*/ meltfptr[1559])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1389__NORMEXP_SYMBOL#4", NULL != ( /*_.CLASS_VALUE_BINDING__V46*/ meltfptr[45])); ((meltroutine_ptr_t) /*_.VALROUT___V1560*/ meltfptr[1559])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_VALUE_BINDING__V46*/ meltfptr[45]); MELT_LOCATION ("warmelt-normal.melt:1540:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1560*/ meltfptr[1559])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1389__NORMEXP_SYMBOL#5", NULL != ( /*_.CLASS_RUNNING_EXTENSION_MODULE_CONTEXT__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1560*/ meltfptr[1559])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_RUNNING_EXTENSION_MODULE_CONTEXT__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-normal.melt:1540:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1560*/ meltfptr[1559])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1443*/ meltfptr[1442]); ((meltroutine_ptr_t) /*_.VALROUT___V1560*/ meltfptr[1559])->tabval[6] = (melt_ptr_t) ( /*_.VALCLO___V1443*/ meltfptr[1442]); MELT_LOCATION ("warmelt-normal.melt:1540:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1560*/ meltfptr[1559])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1032*/ meltfptr[1031]); ((meltroutine_ptr_t) /*_.VALROUT___V1560*/ meltfptr[1559])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V1032*/ meltfptr[1031]); MELT_LOCATION ("warmelt-normal.melt:1540:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1560*/ meltfptr[1559])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1008*/ meltfptr[1007]); ((meltroutine_ptr_t) /*_.VALROUT___V1560*/ meltfptr[1559])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V1008*/ meltfptr[1007]); MELT_LOCATION ("warmelt-normal.melt:5043:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1562*/ meltfptr[1561])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1718__NORMAL_SYMBOL_DATA#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1562*/ meltfptr[1561])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_25 */ void meltmod__warmelt_normal__initialmeltchunk_26 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-normal.melt:5043:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1562*/ meltfptr[1561])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1718__NORMAL_SYMBOL_DATA#1", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V1562*/ meltfptr[1561])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normal.melt:5043:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1562*/ meltfptr[1561])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1718__NORMAL_SYMBOL_DATA#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1562*/ meltfptr[1561])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:5043:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1562*/ meltfptr[1561])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V938*/ meltfptr[937]); ((meltroutine_ptr_t) /*_.VALROUT___V1562*/ meltfptr[1561])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V938*/ meltfptr[937]); MELT_LOCATION ("warmelt-normal.melt:5025:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1564*/ meltfptr[1563])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1716__NORMAL_PREDEF#0", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1564*/ meltfptr[1563])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:5025:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1564*/ meltfptr[1563])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1716__NORMAL_PREDEF#1", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V1564*/ meltfptr[1563])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normal.melt:5025:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1564*/ meltfptr[1563])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V866*/ meltfptr[865]); ((meltroutine_ptr_t) /*_.VALROUT___V1564*/ meltfptr[1563])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V866*/ meltfptr[865]); MELT_LOCATION ("warmelt-normal.melt:5025:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1564*/ meltfptr[1563])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1716__NORMAL_PREDEF#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1564*/ meltfptr[1563])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:5025:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1564*/ meltfptr[1563]); /*putclosurout#27 */ melt_assertmsg ("putclosrout#27 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1563*/ meltfptr[1562])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#27 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1564*/ meltfptr[1563])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1563*/ meltfptr[1562])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1564*/ meltfptr[1563]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1563*/ meltfptr[1562]); MELT_LOCATION ("warmelt-normal.melt:5043:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1562*/ meltfptr[1561])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1563*/ meltfptr[1562]); ((meltroutine_ptr_t) /*_.VALROUT___V1562*/ meltfptr[1561])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V1563*/ meltfptr[1562]); MELT_LOCATION ("warmelt-normal.melt:5043:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1562*/ meltfptr[1561])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1718__NORMAL_SYMBOL_DATA#5", NULL != ( /*_.DISCR_STRING__V22*/ meltfptr[21])); ((meltroutine_ptr_t) /*_.VALROUT___V1562*/ meltfptr[1561])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_STRING__V22*/ meltfptr[21]); MELT_LOCATION ("warmelt-normal.melt:5043:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1562*/ meltfptr[1561])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1718__NORMAL_SYMBOL_DATA#6", NULL != ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1562*/ meltfptr[1561])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-normal.melt:5043:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1562*/ meltfptr[1561])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V968*/ meltfptr[967]); ((meltroutine_ptr_t) /*_.VALROUT___V1562*/ meltfptr[1561])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V968*/ meltfptr[967]); MELT_LOCATION ("warmelt-normal.melt:5043:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1562*/ meltfptr[1561])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1718__NORMAL_SYMBOL_DATA#8", NULL != ( /*_.DISCR_INTEGER__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1562*/ meltfptr[1561])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normal.melt:5043:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1562*/ meltfptr[1561])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1718__NORMAL_SYMBOL_DATA#9", NULL != ( /*_.NAMED_NAME__V108*/ meltfptr[107])); ((meltroutine_ptr_t) /*_.VALROUT___V1562*/ meltfptr[1561])->tabval[9] = (melt_ptr_t) ( /*_.NAMED_NAME__V108*/ meltfptr[107]); MELT_LOCATION ("warmelt-normal.melt:5043:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1562*/ meltfptr[1561])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1216*/ meltfptr[1215]); ((meltroutine_ptr_t) /*_.VALROUT___V1562*/ meltfptr[1561])->tabval[10] = (melt_ptr_t) ( /*_.VALCLO___V1216*/ meltfptr[1215]); MELT_LOCATION ("warmelt-normal.melt:5043:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1562*/ meltfptr[1561]); /*putclosurout#28 */ melt_assertmsg ("putclosrout#28 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1561*/ meltfptr[1560])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#28 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1562*/ meltfptr[1561])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1561*/ meltfptr[1560])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1562*/ meltfptr[1561]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1561*/ meltfptr[1560]); MELT_LOCATION ("warmelt-normal.melt:1540:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1560*/ meltfptr[1559])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1561*/ meltfptr[1560]); ((meltroutine_ptr_t) /*_.VALROUT___V1560*/ meltfptr[1559])->tabval[9] = (melt_ptr_t) ( /*_.VALCLO___V1561*/ meltfptr[1560]); MELT_LOCATION ("warmelt-normal.melt:1540:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1560*/ meltfptr[1559])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1076*/ meltfptr[1075]); ((meltroutine_ptr_t) /*_.VALROUT___V1560*/ meltfptr[1559])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V1076*/ meltfptr[1075]); MELT_LOCATION ("warmelt-normal.melt:1540:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1560*/ meltfptr[1559])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1389__NORMEXP_SYMBOL#11", NULL != ( /*_.CTYPE_VALUE__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V1560*/ meltfptr[1559])->tabval[11] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normal.melt:1540:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1560*/ meltfptr[1559])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1389__NORMEXP_SYMBOL#12", NULL != ( /*_.LIST_EVERY__V34*/ meltfptr[33])); ((meltroutine_ptr_t) /*_.VALROUT___V1560*/ meltfptr[1559])->tabval[12] = (melt_ptr_t) ( /*_.LIST_EVERY__V34*/ meltfptr[33]); MELT_LOCATION ("warmelt-normal.melt:1540:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1560*/ meltfptr[1559])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V782*/ meltfptr[781]); ((meltroutine_ptr_t) /*_.VALROUT___V1560*/ meltfptr[1559])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V782*/ meltfptr[781]); MELT_LOCATION ("warmelt-normal.melt:1540:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1560*/ meltfptr[1559])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1389__NORMEXP_SYMBOL#14", NULL != ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1560*/ meltfptr[1559])->tabval[14] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normal.melt:1540:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1560*/ meltfptr[1559])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1389__NORMEXP_SYMBOL#15", NULL != ( /*_.LIST_EVERY__V34*/ meltfptr[33])); ((meltroutine_ptr_t) /*_.VALROUT___V1560*/ meltfptr[1559])->tabval[15] = (melt_ptr_t) ( /*_.LIST_EVERY__V34*/ meltfptr[33]); MELT_LOCATION ("warmelt-normal.melt:1540:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1560*/ meltfptr[1559])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1389__NORMEXP_SYMBOL#16", NULL != ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1560*/ meltfptr[1559])->tabval[16] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normal.melt:1616:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1565*/ meltfptr[1564])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V782*/ meltfptr[781]); ((meltroutine_ptr_t) /*_.VALROUT___V1565*/ meltfptr[1564])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V782*/ meltfptr[781]); MELT_LOCATION ("warmelt-normal.melt:1616:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1565*/ meltfptr[1564])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1395__LAMBDA_#1", NULL != ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1565*/ meltfptr[1564])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normal.melt:1616:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1565*/ meltfptr[1564])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1395__LAMBDA_#2", NULL != ( /*_.LIST_EVERY__V34*/ meltfptr[33])); ((meltroutine_ptr_t) /*_.VALROUT___V1565*/ meltfptr[1564])->tabval[2] = (melt_ptr_t) ( /*_.LIST_EVERY__V34*/ meltfptr[33]); MELT_LOCATION ("warmelt-normal.melt:1616:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1565*/ meltfptr[1564])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1395__LAMBDA_#3", NULL != ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1565*/ meltfptr[1564])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normal.melt:1623:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1566*/ meltfptr[1565])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1396__LAMBDA_#0", NULL != ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1566*/ meltfptr[1565])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normal.melt:1623:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1566*/ meltfptr[1565]); MELT_LOCATION ("warmelt-normal.melt:1616:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1565*/ meltfptr[1564])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1395__LAMBDA_#4", NULL != ( /*_.VALROUT___V1566*/ meltfptr[1565])); ((meltroutine_ptr_t) /*_.VALROUT___V1565*/ meltfptr[1564])->tabval[4] = (melt_ptr_t) ( /*_.VALROUT___V1566*/ meltfptr[1565]); MELT_LOCATION ("warmelt-normal.melt:1616:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1565*/ meltfptr[1564]); MELT_LOCATION ("warmelt-normal.melt:1540:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1560*/ meltfptr[1559])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1389__NORMEXP_SYMBOL#17", NULL != ( /*_.VALROUT___V1565*/ meltfptr[1564])); ((meltroutine_ptr_t) /*_.VALROUT___V1560*/ meltfptr[1559])->tabval[17] = (melt_ptr_t) ( /*_.VALROUT___V1565*/ meltfptr[1564]); MELT_LOCATION ("warmelt-normal.melt:1540:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1560*/ meltfptr[1559])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1389__NORMEXP_SYMBOL#18", NULL != ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V1560*/ meltfptr[1559])->tabval[18] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-normal.melt:1540:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1560*/ meltfptr[1559])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1389__NORMEXP_SYMBOL#19", NULL != ( /*_.CLASS_LET_BINDING__V42*/ meltfptr[41])); ((meltroutine_ptr_t) /*_.VALROUT___V1560*/ meltfptr[1559])->tabval[19] = (melt_ptr_t) ( /*_.CLASS_LET_BINDING__V42*/ meltfptr[41]); MELT_LOCATION ("warmelt-normal.melt:1540:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1560*/ meltfptr[1559])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1389__NORMEXP_SYMBOL#20", NULL != ( /*_.CLASS_FIXED_BINDING__V43*/ meltfptr[42])); ((meltroutine_ptr_t) /*_.VALROUT___V1560*/ meltfptr[1559])->tabval[20] = (melt_ptr_t) ( /*_.CLASS_FIXED_BINDING__V43*/ meltfptr[42]); MELT_LOCATION ("warmelt-normal.melt:1540:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1560*/ meltfptr[1559])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V782*/ meltfptr[781]); ((meltroutine_ptr_t) /*_.VALROUT___V1560*/ meltfptr[1559])->tabval[21] = (melt_ptr_t) ( /*_.VALDATA___V782*/ meltfptr[781]); MELT_LOCATION ("warmelt-normal.melt:1540:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1560*/ meltfptr[1559])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1389__NORMEXP_SYMBOL#22", NULL != ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1560*/ meltfptr[1559])->tabval[22] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normal.melt:1540:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1560*/ meltfptr[1559])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1389__NORMEXP_SYMBOL#23", NULL != ( /*_.LIST_EVERY__V34*/ meltfptr[33])); ((meltroutine_ptr_t) /*_.VALROUT___V1560*/ meltfptr[1559])->tabval[23] = (melt_ptr_t) ( /*_.LIST_EVERY__V34*/ meltfptr[33]); MELT_LOCATION ("warmelt-normal.melt:1540:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1560*/ meltfptr[1559])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1389__NORMEXP_SYMBOL#24", NULL != ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1560*/ meltfptr[1559])->tabval[24] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normal.melt:1672:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1567*/ meltfptr[1566])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V782*/ meltfptr[781]); ((meltroutine_ptr_t) /*_.VALROUT___V1567*/ meltfptr[1566])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V782*/ meltfptr[781]); MELT_LOCATION ("warmelt-normal.melt:1672:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1567*/ meltfptr[1566])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1397__LAMBDA_#1", NULL != ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1567*/ meltfptr[1566])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normal.melt:1672:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1567*/ meltfptr[1566])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1397__LAMBDA_#2", NULL != ( /*_.LIST_EVERY__V34*/ meltfptr[33])); ((meltroutine_ptr_t) /*_.VALROUT___V1567*/ meltfptr[1566])->tabval[2] = (melt_ptr_t) ( /*_.LIST_EVERY__V34*/ meltfptr[33]); MELT_LOCATION ("warmelt-normal.melt:1672:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1567*/ meltfptr[1566])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1397__LAMBDA_#3", NULL != ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1567*/ meltfptr[1566])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normal.melt:1679:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1568*/ meltfptr[1567])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1398__LAMBDA_#0", NULL != ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1568*/ meltfptr[1567])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normal.melt:1679:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1568*/ meltfptr[1567]); MELT_LOCATION ("warmelt-normal.melt:1672:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1567*/ meltfptr[1566])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1397__LAMBDA_#4", NULL != ( /*_.VALROUT___V1568*/ meltfptr[1567])); ((meltroutine_ptr_t) /*_.VALROUT___V1567*/ meltfptr[1566])->tabval[4] = (melt_ptr_t) ( /*_.VALROUT___V1568*/ meltfptr[1567]); MELT_LOCATION ("warmelt-normal.melt:1672:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1567*/ meltfptr[1566]); MELT_LOCATION ("warmelt-normal.melt:1540:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1560*/ meltfptr[1559])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1389__NORMEXP_SYMBOL#25", NULL != ( /*_.VALROUT___V1567*/ meltfptr[1566])); ((meltroutine_ptr_t) /*_.VALROUT___V1560*/ meltfptr[1559])->tabval[25] = (melt_ptr_t) ( /*_.VALROUT___V1567*/ meltfptr[1566]); MELT_LOCATION ("warmelt-normal.melt:1540:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1560*/ meltfptr[1559])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1066*/ meltfptr[1065]); ((meltroutine_ptr_t) /*_.VALROUT___V1560*/ meltfptr[1559])->tabval[26] = (melt_ptr_t) ( /*_.VALDATA___V1066*/ meltfptr[1065]); MELT_LOCATION ("warmelt-normal.melt:1540:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1560*/ meltfptr[1559])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V782*/ meltfptr[781]); ((meltroutine_ptr_t) /*_.VALROUT___V1560*/ meltfptr[1559])->tabval[27] = (melt_ptr_t) ( /*_.VALDATA___V782*/ meltfptr[781]); MELT_LOCATION ("warmelt-normal.melt:1540:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1560*/ meltfptr[1559])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1389__NORMEXP_SYMBOL#28", NULL != ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1560*/ meltfptr[1559])->tabval[28] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normal.melt:1540:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1560*/ meltfptr[1559])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1389__NORMEXP_SYMBOL#29", NULL != ( /*_.LIST_EVERY__V34*/ meltfptr[33])); ((meltroutine_ptr_t) /*_.VALROUT___V1560*/ meltfptr[1559])->tabval[29] = (melt_ptr_t) ( /*_.LIST_EVERY__V34*/ meltfptr[33]); MELT_LOCATION ("warmelt-normal.melt:1540:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1560*/ meltfptr[1559])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1389__NORMEXP_SYMBOL#30", NULL != ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1560*/ meltfptr[1559])->tabval[30] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normal.melt:1701:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1569*/ meltfptr[1568])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V782*/ meltfptr[781]); ((meltroutine_ptr_t) /*_.VALROUT___V1569*/ meltfptr[1568])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V782*/ meltfptr[781]); MELT_LOCATION ("warmelt-normal.melt:1701:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1569*/ meltfptr[1568])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1399__LAMBDA_#1", NULL != ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1569*/ meltfptr[1568])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normal.melt:1701:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1569*/ meltfptr[1568])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1399__LAMBDA_#2", NULL != ( /*_.LIST_EVERY__V34*/ meltfptr[33])); ((meltroutine_ptr_t) /*_.VALROUT___V1569*/ meltfptr[1568])->tabval[2] = (melt_ptr_t) ( /*_.LIST_EVERY__V34*/ meltfptr[33]); MELT_LOCATION ("warmelt-normal.melt:1701:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1569*/ meltfptr[1568])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1399__LAMBDA_#3", NULL != ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1569*/ meltfptr[1568])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normal.melt:1707:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1570*/ meltfptr[1569])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1400__LAMBDA_#0", NULL != ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1570*/ meltfptr[1569])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normal.melt:1707:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1570*/ meltfptr[1569]); MELT_LOCATION ("warmelt-normal.melt:1701:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1569*/ meltfptr[1568])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1399__LAMBDA_#4", NULL != ( /*_.VALROUT___V1570*/ meltfptr[1569])); ((meltroutine_ptr_t) /*_.VALROUT___V1569*/ meltfptr[1568])->tabval[4] = (melt_ptr_t) ( /*_.VALROUT___V1570*/ meltfptr[1569]); MELT_LOCATION ("warmelt-normal.melt:1701:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1569*/ meltfptr[1568]); MELT_LOCATION ("warmelt-normal.melt:1540:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1560*/ meltfptr[1559])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1389__NORMEXP_SYMBOL#31", NULL != ( /*_.VALROUT___V1569*/ meltfptr[1568])); ((meltroutine_ptr_t) /*_.VALROUT___V1560*/ meltfptr[1559])->tabval[31] = (melt_ptr_t) ( /*_.VALROUT___V1569*/ meltfptr[1568]); MELT_LOCATION ("warmelt-normal.melt:1540:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1560*/ meltfptr[1559])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1538*/ meltfptr[1537]); ((meltroutine_ptr_t) /*_.VALROUT___V1560*/ meltfptr[1559])->tabval[32] = (melt_ptr_t) ( /*_.VALDATA___V1538*/ meltfptr[1537]); MELT_LOCATION ("warmelt-normal.melt:1540:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1560*/ meltfptr[1559]); /*putclosurout#29 */ melt_assertmsg ("putclosrout#29 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1571*/ meltfptr[1570])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#29 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1560*/ meltfptr[1559])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1571*/ meltfptr[1570])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1560*/ meltfptr[1559]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1571*/ meltfptr[1570]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1572*/ meltfptr[1571])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1572*/ meltfptr[1571])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1572*/ meltfptr[1571]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1573*/ meltfptr[1572]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1572*/ meltfptr[1571]); melt_dbgtrace_written_object ( /*_.VALDATA___V1572*/ meltfptr[1571], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1574*/ meltfptr[1573])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1574*/ meltfptr[1573])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1574*/ meltfptr[1573]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1575*/ meltfptr[1574]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1574*/ meltfptr[1573]); melt_dbgtrace_written_object ( /*_.VALDATA___V1574*/ meltfptr[1573], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:1730:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1576*/ meltfptr[1575])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1042*/ meltfptr[1041]); ((meltroutine_ptr_t) /*_.VALROUT___V1576*/ meltfptr[1575])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V1042*/ meltfptr[1041]); MELT_LOCATION ("warmelt-normal.melt:1730:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1576*/ meltfptr[1575]); /*putclosurout#30 */ melt_assertmsg ("putclosrout#30 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1577*/ meltfptr[1576])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#30 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1576*/ meltfptr[1575])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1577*/ meltfptr[1576])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1576*/ meltfptr[1575]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1577*/ meltfptr[1576]); MELT_LOCATION ("warmelt-normal.melt:1740:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1578*/ meltfptr[1577])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1403__NORMEXP_CLASS#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1578*/ meltfptr[1577])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:1740:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1578*/ meltfptr[1577])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1403__NORMEXP_CLASS#1", NULL != ( /*_.CLASS_CLASS__V47*/ meltfptr[46])); ((meltroutine_ptr_t) /*_.VALROUT___V1578*/ meltfptr[1577])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_CLASS__V47*/ meltfptr[46]); MELT_LOCATION ("warmelt-normal.melt:1740:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1578*/ meltfptr[1577])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1403__NORMEXP_CLASS#2", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1578*/ meltfptr[1577])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:1740:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1578*/ meltfptr[1577])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1403__NORMEXP_CLASS#3", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1578*/ meltfptr[1577])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:1740:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1578*/ meltfptr[1577])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1403__NORMEXP_CLASS#4", NULL != ( /*_.FIND_ENV__V48*/ meltfptr[47])); ((meltroutine_ptr_t) /*_.VALROUT___V1578*/ meltfptr[1577])->tabval[4] = (melt_ptr_t) ( /*_.FIND_ENV__V48*/ meltfptr[47]); MELT_LOCATION ("warmelt-normal.melt:1740:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1578*/ meltfptr[1577])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1403__NORMEXP_CLASS#5", NULL != ( /*_.CLASS_CLASS_BINDING__V49*/ meltfptr[48])); ((meltroutine_ptr_t) /*_.VALROUT___V1578*/ meltfptr[1577])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_CLASS_BINDING__V49*/ meltfptr[48]); MELT_LOCATION ("warmelt-normal.melt:1740:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1578*/ meltfptr[1577])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1571*/ meltfptr[1570]); ((meltroutine_ptr_t) /*_.VALROUT___V1578*/ meltfptr[1577])->tabval[6] = (melt_ptr_t) ( /*_.VALCLO___V1571*/ meltfptr[1570]); MELT_LOCATION ("warmelt-normal.melt:1740:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1578*/ meltfptr[1577])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1076*/ meltfptr[1075]); ((meltroutine_ptr_t) /*_.VALROUT___V1578*/ meltfptr[1577])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V1076*/ meltfptr[1075]); MELT_LOCATION ("warmelt-normal.melt:1740:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1578*/ meltfptr[1577])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V916*/ meltfptr[915]); ((meltroutine_ptr_t) /*_.VALROUT___V1578*/ meltfptr[1577])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915]); MELT_LOCATION ("warmelt-normal.melt:1740:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1578*/ meltfptr[1577])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1403__NORMEXP_CLASS#9", NULL != ( /*_.CLASS_VALUE_BINDING__V46*/ meltfptr[45])); ((meltroutine_ptr_t) /*_.VALROUT___V1578*/ meltfptr[1577])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_VALUE_BINDING__V46*/ meltfptr[45]); MELT_LOCATION ("warmelt-normal.melt:1740:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1578*/ meltfptr[1577])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V176*/ meltfptr[175]); ((meltroutine_ptr_t) /*_.VALROUT___V1578*/ meltfptr[1577])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); MELT_LOCATION ("warmelt-normal.melt:1740:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1578*/ meltfptr[1577]); /*putclosurout#31 */ melt_assertmsg ("putclosrout#31 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1579*/ meltfptr[1578])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#31 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1578*/ meltfptr[1577])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1579*/ meltfptr[1578])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1578*/ meltfptr[1577]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1579*/ meltfptr[1578]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1580*/ meltfptr[1579])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1580*/ meltfptr[1579])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1580*/ meltfptr[1579]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1581*/ meltfptr[1580]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1580*/ meltfptr[1579]); melt_dbgtrace_written_object ( /*_.VALDATA___V1580*/ meltfptr[1579], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1582*/ meltfptr[1581])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1582*/ meltfptr[1581])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1582*/ meltfptr[1581]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1583*/ meltfptr[1582]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1582*/ meltfptr[1581]); melt_dbgtrace_written_object ( /*_.VALDATA___V1582*/ meltfptr[1581], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:1784:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1584*/ meltfptr[1583])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1409__NORMEXP_PRIMITIVE#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1584*/ meltfptr[1583])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:1784:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1584*/ meltfptr[1583])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1409__NORMEXP_PRIMITIVE#1", NULL != ( /*_.CLASS_SOURCE_PRIMITIVE__V50*/ meltfptr[49])); ((meltroutine_ptr_t) /*_.VALROUT___V1584*/ meltfptr[1583])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PRIMITIVE__V50*/ meltfptr[49]); MELT_LOCATION ("warmelt-normal.melt:1784:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1584*/ meltfptr[1583])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1409__NORMEXP_PRIMITIVE#2", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1584*/ meltfptr[1583])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:1784:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1584*/ meltfptr[1583])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1409__NORMEXP_PRIMITIVE#3", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1584*/ meltfptr[1583])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:1784:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1584*/ meltfptr[1583])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1409__NORMEXP_PRIMITIVE#4", NULL != ( /*_.CLASS_PRIMITIVE__V51*/ meltfptr[50])); ((meltroutine_ptr_t) /*_.VALROUT___V1584*/ meltfptr[1583])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_PRIMITIVE__V51*/ meltfptr[50]); MELT_LOCATION ("warmelt-normal.melt:1784:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1584*/ meltfptr[1583])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1508*/ meltfptr[1507]); ((meltroutine_ptr_t) /*_.VALROUT___V1584*/ meltfptr[1583])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1508*/ meltfptr[1507]); MELT_LOCATION ("warmelt-normal.melt:1784:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1584*/ meltfptr[1583])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1409__NORMEXP_PRIMITIVE#6", NULL != ( /*_.CLASS_CTYPE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V1584*/ meltfptr[1583])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normal.melt:1784:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1584*/ meltfptr[1583])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1409__NORMEXP_PRIMITIVE#7", NULL != ( /*_.DISCR_MAP_OBJECTS__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1584*/ meltfptr[1583])->tabval[7] = (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-normal.melt:1784:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1584*/ meltfptr[1583])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1409__NORMEXP_PRIMITIVE#8", NULL != ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1584*/ meltfptr[1583])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-normal.melt:1784:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1584*/ meltfptr[1583])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1409__NORMEXP_PRIMITIVE#9", NULL != ( /*_.MULTIPLE_EVERY__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1584*/ meltfptr[1583])->tabval[9] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-normal.melt:1784:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1584*/ meltfptr[1583])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1409__NORMEXP_PRIMITIVE#10", NULL != ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V1584*/ meltfptr[1583])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-normal.melt:1784:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1584*/ meltfptr[1583])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1409__NORMEXP_PRIMITIVE#11", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1584*/ meltfptr[1583])->tabval[11] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:1784:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1584*/ meltfptr[1583])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V1584*/ meltfptr[1583])->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-normal.melt:1784:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1584*/ meltfptr[1583])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1409__NORMEXP_PRIMITIVE#13", NULL != ( /*_.CLASS_CTYPE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V1584*/ meltfptr[1583])->tabval[13] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normal.melt:1816:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1585*/ meltfptr[1584])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1413__LAMBDA_#0", NULL != ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V1585*/ meltfptr[1584])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-normal.melt:1816:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1585*/ meltfptr[1584])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1413__LAMBDA_#1", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1585*/ meltfptr[1584])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:1816:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1585*/ meltfptr[1584])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V1585*/ meltfptr[1584])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-normal.melt:1816:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1585*/ meltfptr[1584])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1413__LAMBDA_#3", NULL != ( /*_.CLASS_CTYPE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V1585*/ meltfptr[1584])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normal.melt:1816:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1585*/ meltfptr[1584]); MELT_LOCATION ("warmelt-normal.melt:1784:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1584*/ meltfptr[1583])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1409__NORMEXP_PRIMITIVE#14", NULL != ( /*_.VALROUT___V1585*/ meltfptr[1584])); ((meltroutine_ptr_t) /*_.VALROUT___V1584*/ meltfptr[1583])->tabval[14] = (melt_ptr_t) ( /*_.VALROUT___V1585*/ meltfptr[1584]); MELT_LOCATION ("warmelt-normal.melt:1784:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1584*/ meltfptr[1583])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1409__NORMEXP_PRIMITIVE#15", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V1584*/ meltfptr[1583])->tabval[15] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normal.melt:1784:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1584*/ meltfptr[1583])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1409__NORMEXP_PRIMITIVE#16", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1584*/ meltfptr[1583])->tabval[16] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:1784:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1584*/ meltfptr[1583])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1409__NORMEXP_PRIMITIVE#17", NULL != ( /*_.CLASS_NAMED__V24*/ meltfptr[23])); ((meltroutine_ptr_t) /*_.VALROUT___V1584*/ meltfptr[1583])->tabval[17] = (melt_ptr_t) ( /*_.CLASS_NAMED__V24*/ meltfptr[23]); MELT_LOCATION ("warmelt-normal.melt:1843:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1586*/ meltfptr[1585])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1414__LAMBDA_#0", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V1586*/ meltfptr[1585])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normal.melt:1843:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1586*/ meltfptr[1585])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1414__LAMBDA_#1", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1586*/ meltfptr[1585])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:1843:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1586*/ meltfptr[1585])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1414__LAMBDA_#2", NULL != ( /*_.CLASS_NAMED__V24*/ meltfptr[23])); ((meltroutine_ptr_t) /*_.VALROUT___V1586*/ meltfptr[1585])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NAMED__V24*/ meltfptr[23]); MELT_LOCATION ("warmelt-normal.melt:1843:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1586*/ meltfptr[1585]); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_26 */ void meltmod__warmelt_normal__initialmeltchunk_27 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-normal.melt:1784:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1584*/ meltfptr[1583])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1409__NORMEXP_PRIMITIVE#18", NULL != ( /*_.VALROUT___V1586*/ meltfptr[1585])); ((meltroutine_ptr_t) /*_.VALROUT___V1584*/ meltfptr[1583])->tabval[18] = (melt_ptr_t) ( /*_.VALROUT___V1586*/ meltfptr[1585]); MELT_LOCATION ("warmelt-normal.melt:1784:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1584*/ meltfptr[1583])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1409__NORMEXP_PRIMITIVE#19", NULL != ( /*_.CLASS_NAMED__V24*/ meltfptr[23])); ((meltroutine_ptr_t) /*_.VALROUT___V1584*/ meltfptr[1583])->tabval[19] = (melt_ptr_t) ( /*_.CLASS_NAMED__V24*/ meltfptr[23]); MELT_LOCATION ("warmelt-normal.melt:1784:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1584*/ meltfptr[1583])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1409__NORMEXP_PRIMITIVE#20", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1584*/ meltfptr[1583])->tabval[20] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-normal.melt:1784:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1584*/ meltfptr[1583])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1409__NORMEXP_PRIMITIVE#21", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1584*/ meltfptr[1583])->tabval[21] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:1784:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1584*/ meltfptr[1583])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V270*/ meltfptr[269]); ((meltroutine_ptr_t) /*_.VALROUT___V1584*/ meltfptr[1583])->tabval[22] = (melt_ptr_t) ( /*_.VALDATA___V270*/ meltfptr[269]); MELT_LOCATION ("warmelt-normal.melt:1784:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1584*/ meltfptr[1583])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1584*/ meltfptr[1583])->tabval[23] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:1784:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1584*/ meltfptr[1583])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1409__NORMEXP_PRIMITIVE#24", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1584*/ meltfptr[1583])->tabval[24] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:1784:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1584*/ meltfptr[1583]); /*putclosurout#32 */ melt_assertmsg ("putclosrout#32 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1587*/ meltfptr[1586])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#32 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1584*/ meltfptr[1583])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1587*/ meltfptr[1586])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1584*/ meltfptr[1583]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1587*/ meltfptr[1586]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1588*/ meltfptr[1587])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1588*/ meltfptr[1587])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1588*/ meltfptr[1587]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1589*/ meltfptr[1588]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1588*/ meltfptr[1587]); melt_dbgtrace_written_object ( /*_.VALDATA___V1588*/ meltfptr[1587], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1590*/ meltfptr[1589])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1590*/ meltfptr[1589])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1590*/ meltfptr[1589]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1591*/ meltfptr[1590]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1590*/ meltfptr[1589]); melt_dbgtrace_written_object ( /*_.VALDATA___V1590*/ meltfptr[1589], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:1909:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1592*/ meltfptr[1591])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1417__NORMEXP_CODE_CHUNK#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1592*/ meltfptr[1591])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:1909:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1592*/ meltfptr[1591])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1417__NORMEXP_CODE_CHUNK#1", NULL != ( /*_.CLASS_SOURCE_CODECHUNK__V53*/ meltfptr[52])); ((meltroutine_ptr_t) /*_.VALROUT___V1592*/ meltfptr[1591])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SOURCE_CODECHUNK__V53*/ meltfptr[52]); MELT_LOCATION ("warmelt-normal.melt:1909:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1592*/ meltfptr[1591])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1417__NORMEXP_CODE_CHUNK#2", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1592*/ meltfptr[1591])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:1909:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1592*/ meltfptr[1591])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1417__NORMEXP_CODE_CHUNK#3", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1592*/ meltfptr[1591])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:1909:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1592*/ meltfptr[1591])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1417__NORMEXP_CODE_CHUNK#4", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1592*/ meltfptr[1591])->tabval[4] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-normal.melt:1909:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1592*/ meltfptr[1591])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1417__NORMEXP_CODE_CHUNK#5", NULL != ( /*_.DISCR_STRBUF__V54*/ meltfptr[53])); ((meltroutine_ptr_t) /*_.VALROUT___V1592*/ meltfptr[1591])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V54*/ meltfptr[53]); MELT_LOCATION ("warmelt-normal.melt:1909:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1592*/ meltfptr[1591])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1417__NORMEXP_CODE_CHUNK#6", NULL != ( /*_.CLASS_NAMED__V24*/ meltfptr[23])); ((meltroutine_ptr_t) /*_.VALROUT___V1592*/ meltfptr[1591])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_NAMED__V24*/ meltfptr[23]); MELT_LOCATION ("warmelt-normal.melt:1909:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1592*/ meltfptr[1591])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1417__NORMEXP_CODE_CHUNK#7", NULL != ( /*_.CLASS_CLONED_SYMBOL__V55*/ meltfptr[54])); ((meltroutine_ptr_t) /*_.VALROUT___V1592*/ meltfptr[1591])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V55*/ meltfptr[54]); MELT_LOCATION ("warmelt-normal.melt:1909:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1592*/ meltfptr[1591])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1417__NORMEXP_CODE_CHUNK#8", NULL != ( /*_.DISCR_VERBATIM_STRING__V56*/ meltfptr[55])); ((meltroutine_ptr_t) /*_.VALROUT___V1592*/ meltfptr[1591])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V56*/ meltfptr[55]); MELT_LOCATION ("warmelt-normal.melt:1909:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1592*/ meltfptr[1591])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1417__NORMEXP_CODE_CHUNK#9", NULL != ( /*_.MULTIPLE_MAP__V33*/ meltfptr[32])); ((meltroutine_ptr_t) /*_.VALROUT___V1592*/ meltfptr[1591])->tabval[9] = (melt_ptr_t) ( /*_.MULTIPLE_MAP__V33*/ meltfptr[32]); MELT_LOCATION ("warmelt-normal.melt:1909:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1592*/ meltfptr[1591])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1417__NORMEXP_CODE_CHUNK#10", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V1592*/ meltfptr[1591])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normal.melt:1909:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1592*/ meltfptr[1591])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V1592*/ meltfptr[1591])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:1926:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1593*/ meltfptr[1592])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1423__LAMBDA_#0", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V1593*/ meltfptr[1592])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normal.melt:1926:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1593*/ meltfptr[1592])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V1593*/ meltfptr[1592])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:1926:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1593*/ meltfptr[1592]); MELT_LOCATION ("warmelt-normal.melt:1909:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1592*/ meltfptr[1591])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1417__NORMEXP_CODE_CHUNK#12", NULL != ( /*_.VALROUT___V1593*/ meltfptr[1592])); ((meltroutine_ptr_t) /*_.VALROUT___V1592*/ meltfptr[1591])->tabval[12] = (melt_ptr_t) ( /*_.VALROUT___V1593*/ meltfptr[1592]); MELT_LOCATION ("warmelt-normal.melt:1909:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1592*/ meltfptr[1591])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1417__NORMEXP_CODE_CHUNK#13", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1592*/ meltfptr[1591])->tabval[13] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:1909:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1592*/ meltfptr[1591])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1417__NORMEXP_CODE_CHUNK#14", NULL != ( /*_.CTYPE_VOID__V57*/ meltfptr[56])); ((meltroutine_ptr_t) /*_.VALROUT___V1592*/ meltfptr[1591])->tabval[14] = (melt_ptr_t) ( /*_.CTYPE_VOID__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-normal.melt:1909:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1592*/ meltfptr[1591])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V270*/ meltfptr[269]); ((meltroutine_ptr_t) /*_.VALROUT___V1592*/ meltfptr[1591])->tabval[15] = (melt_ptr_t) ( /*_.VALDATA___V270*/ meltfptr[269]); MELT_LOCATION ("warmelt-normal.melt:1909:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1592*/ meltfptr[1591])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1592*/ meltfptr[1591])->tabval[16] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:1909:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1592*/ meltfptr[1591]); /*putclosurout#33 */ melt_assertmsg ("putclosrout#33 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1594*/ meltfptr[1593])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#33 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1592*/ meltfptr[1591])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1594*/ meltfptr[1593])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1592*/ meltfptr[1591]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1594*/ meltfptr[1593]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1595*/ meltfptr[1594])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1595*/ meltfptr[1594])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1595*/ meltfptr[1594]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1596*/ meltfptr[1595]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1595*/ meltfptr[1594]); melt_dbgtrace_written_object ( /*_.VALDATA___V1595*/ meltfptr[1594], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1597*/ meltfptr[1596])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1597*/ meltfptr[1596])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1597*/ meltfptr[1596]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1598*/ meltfptr[1597]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1597*/ meltfptr[1596]); melt_dbgtrace_written_object ( /*_.VALDATA___V1597*/ meltfptr[1596], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:1960:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1599*/ meltfptr[1598])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1424__NORMEXP_CMATCHEXPR#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1599*/ meltfptr[1598])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:1960:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1599*/ meltfptr[1598])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1424__NORMEXP_CMATCHEXPR#1", NULL != ( /*_.CLASS_SOURCE_CMATCHEXPR__V58*/ meltfptr[57])); ((meltroutine_ptr_t) /*_.VALROUT___V1599*/ meltfptr[1598])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SOURCE_CMATCHEXPR__V58*/ meltfptr[57]); MELT_LOCATION ("warmelt-normal.melt:1960:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1599*/ meltfptr[1598])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1424__NORMEXP_CMATCHEXPR#2", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1599*/ meltfptr[1598])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:1960:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1599*/ meltfptr[1598])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1424__NORMEXP_CMATCHEXPR#3", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1599*/ meltfptr[1598])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:1960:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1599*/ meltfptr[1598])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1424__NORMEXP_CMATCHEXPR#4", NULL != ( /*_.CLASS_CMATCHER__V59*/ meltfptr[58])); ((meltroutine_ptr_t) /*_.VALROUT___V1599*/ meltfptr[1598])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_CMATCHER__V59*/ meltfptr[58]); MELT_LOCATION ("warmelt-normal.melt:1960:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1599*/ meltfptr[1598])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1508*/ meltfptr[1507]); ((meltroutine_ptr_t) /*_.VALROUT___V1599*/ meltfptr[1598])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1508*/ meltfptr[1507]); MELT_LOCATION ("warmelt-normal.melt:1960:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1599*/ meltfptr[1598])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1424__NORMEXP_CMATCHEXPR#6", NULL != ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V1599*/ meltfptr[1598])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-normal.melt:1960:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1599*/ meltfptr[1598])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1424__NORMEXP_CMATCHEXPR#7", NULL != ( /*_.CLASS_CTYPE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V1599*/ meltfptr[1598])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normal.melt:1960:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1599*/ meltfptr[1598])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1424__NORMEXP_CMATCHEXPR#8", NULL != ( /*_.DISCR_MAP_OBJECTS__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1599*/ meltfptr[1598])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-normal.melt:1960:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1599*/ meltfptr[1598])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1424__NORMEXP_CMATCHEXPR#9", NULL != ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1599*/ meltfptr[1598])->tabval[9] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-normal.melt:1960:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1599*/ meltfptr[1598])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1424__NORMEXP_CMATCHEXPR#10", NULL != ( /*_.MULTIPLE_EVERY__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1599*/ meltfptr[1598])->tabval[10] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-normal.melt:1960:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1599*/ meltfptr[1598])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1424__NORMEXP_CMATCHEXPR#11", NULL != ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V1599*/ meltfptr[1598])->tabval[11] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-normal.melt:1960:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1599*/ meltfptr[1598])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1424__NORMEXP_CMATCHEXPR#12", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1599*/ meltfptr[1598])->tabval[12] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:1960:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1599*/ meltfptr[1598])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V1599*/ meltfptr[1598])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-normal.melt:1960:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1599*/ meltfptr[1598])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1424__NORMEXP_CMATCHEXPR#14", NULL != ( /*_.CLASS_CTYPE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V1599*/ meltfptr[1598])->tabval[14] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normal.melt:1998:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1600*/ meltfptr[1599])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1428__LAMBDA_#0", NULL != ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V1600*/ meltfptr[1599])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-normal.melt:1998:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1600*/ meltfptr[1599])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1428__LAMBDA_#1", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1600*/ meltfptr[1599])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:1998:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1600*/ meltfptr[1599])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V1600*/ meltfptr[1599])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-normal.melt:1998:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1600*/ meltfptr[1599])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1428__LAMBDA_#3", NULL != ( /*_.CLASS_CTYPE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V1600*/ meltfptr[1599])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normal.melt:1998:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1600*/ meltfptr[1599]); MELT_LOCATION ("warmelt-normal.melt:1960:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1599*/ meltfptr[1598])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1424__NORMEXP_CMATCHEXPR#15", NULL != ( /*_.VALROUT___V1600*/ meltfptr[1599])); ((meltroutine_ptr_t) /*_.VALROUT___V1599*/ meltfptr[1598])->tabval[15] = (melt_ptr_t) ( /*_.VALROUT___V1600*/ meltfptr[1599]); MELT_LOCATION ("warmelt-normal.melt:1960:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1599*/ meltfptr[1598])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1424__NORMEXP_CMATCHEXPR#16", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V1599*/ meltfptr[1598])->tabval[16] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normal.melt:1960:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1599*/ meltfptr[1598])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1424__NORMEXP_CMATCHEXPR#17", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1599*/ meltfptr[1598])->tabval[17] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:1960:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1599*/ meltfptr[1598])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1424__NORMEXP_CMATCHEXPR#18", NULL != ( /*_.CLASS_NAMED__V24*/ meltfptr[23])); ((meltroutine_ptr_t) /*_.VALROUT___V1599*/ meltfptr[1598])->tabval[18] = (melt_ptr_t) ( /*_.CLASS_NAMED__V24*/ meltfptr[23]); MELT_LOCATION ("warmelt-normal.melt:2025:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1601*/ meltfptr[1600])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1429__LAMBDA_#0", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V1601*/ meltfptr[1600])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normal.melt:2025:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1601*/ meltfptr[1600])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1429__LAMBDA_#1", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1601*/ meltfptr[1600])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:2025:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1601*/ meltfptr[1600])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1429__LAMBDA_#2", NULL != ( /*_.CLASS_NAMED__V24*/ meltfptr[23])); ((meltroutine_ptr_t) /*_.VALROUT___V1601*/ meltfptr[1600])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NAMED__V24*/ meltfptr[23]); MELT_LOCATION ("warmelt-normal.melt:2025:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1601*/ meltfptr[1600]); MELT_LOCATION ("warmelt-normal.melt:1960:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1599*/ meltfptr[1598])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1424__NORMEXP_CMATCHEXPR#19", NULL != ( /*_.VALROUT___V1601*/ meltfptr[1600])); ((meltroutine_ptr_t) /*_.VALROUT___V1599*/ meltfptr[1598])->tabval[19] = (melt_ptr_t) ( /*_.VALROUT___V1601*/ meltfptr[1600]); MELT_LOCATION ("warmelt-normal.melt:1960:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1599*/ meltfptr[1598])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1424__NORMEXP_CMATCHEXPR#20", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1599*/ meltfptr[1598])->tabval[20] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-normal.melt:1960:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1599*/ meltfptr[1598])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1424__NORMEXP_CMATCHEXPR#21", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1599*/ meltfptr[1598])->tabval[21] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:1960:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1599*/ meltfptr[1598])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V270*/ meltfptr[269]); ((meltroutine_ptr_t) /*_.VALROUT___V1599*/ meltfptr[1598])->tabval[22] = (melt_ptr_t) ( /*_.VALDATA___V270*/ meltfptr[269]); MELT_LOCATION ("warmelt-normal.melt:1960:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1599*/ meltfptr[1598])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1599*/ meltfptr[1598])->tabval[23] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:1960:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1599*/ meltfptr[1598])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1424__NORMEXP_CMATCHEXPR#24", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1599*/ meltfptr[1598])->tabval[24] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:1960:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1599*/ meltfptr[1598]); /*putclosurout#34 */ melt_assertmsg ("putclosrout#34 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1602*/ meltfptr[1601])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#34 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1599*/ meltfptr[1598])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1602*/ meltfptr[1601])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1599*/ meltfptr[1598]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1602*/ meltfptr[1601]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1603*/ meltfptr[1602])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1603*/ meltfptr[1602])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1603*/ meltfptr[1602]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1604*/ meltfptr[1603]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1603*/ meltfptr[1602]); melt_dbgtrace_written_object ( /*_.VALDATA___V1603*/ meltfptr[1602], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:2090:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1605*/ meltfptr[1604])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1430__NORMEXP_FUNMATCHEXPR#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1605*/ meltfptr[1604])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:2090:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1605*/ meltfptr[1604])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1430__NORMEXP_FUNMATCHEXPR#1", NULL != ( /*_.CLASS_SOURCE_FUNMATCHEXPR__V60*/ meltfptr[59])); ((meltroutine_ptr_t) /*_.VALROUT___V1605*/ meltfptr[1604])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SOURCE_FUNMATCHEXPR__V60*/ meltfptr[59]); MELT_LOCATION ("warmelt-normal.melt:2090:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1605*/ meltfptr[1604])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1430__NORMEXP_FUNMATCHEXPR#2", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1605*/ meltfptr[1604])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:2090:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1605*/ meltfptr[1604])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1430__NORMEXP_FUNMATCHEXPR#3", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1605*/ meltfptr[1604])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:2090:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1605*/ meltfptr[1604])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1430__NORMEXP_FUNMATCHEXPR#4", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1605*/ meltfptr[1604])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:2090:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1605*/ meltfptr[1604])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1430__NORMEXP_FUNMATCHEXPR#5", NULL != ( /*_.CLASS_FUNMATCHER__V61*/ meltfptr[60])); ((meltroutine_ptr_t) /*_.VALROUT___V1605*/ meltfptr[1604])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_FUNMATCHER__V61*/ meltfptr[60]); MELT_LOCATION ("warmelt-normal.melt:2090:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1605*/ meltfptr[1604])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1430__NORMEXP_FUNMATCHEXPR#6", NULL != ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7])); ((meltroutine_ptr_t) /*_.VALROUT___V1605*/ meltfptr[1604])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-normal.melt:2090:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1605*/ meltfptr[1604])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1430__NORMEXP_FUNMATCHEXPR#7", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V1605*/ meltfptr[1604])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normal.melt:2090:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1605*/ meltfptr[1604])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1430__NORMEXP_FUNMATCHEXPR#8", NULL != ( /*_.FIND_ENV__V48*/ meltfptr[47])); ((meltroutine_ptr_t) /*_.VALROUT___V1605*/ meltfptr[1604])->tabval[8] = (melt_ptr_t) ( /*_.FIND_ENV__V48*/ meltfptr[47]); MELT_LOCATION ("warmelt-normal.melt:2090:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1605*/ meltfptr[1604])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V1605*/ meltfptr[1604])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:2090:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1605*/ meltfptr[1604])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1430__NORMEXP_FUNMATCHEXPR#10", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1605*/ meltfptr[1604])->tabval[10] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-normal.melt:2090:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1605*/ meltfptr[1604])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1430__NORMEXP_FUNMATCHEXPR#11", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1605*/ meltfptr[1604])->tabval[11] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:2090:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1605*/ meltfptr[1604])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1430__NORMEXP_FUNMATCHEXPR#12", NULL != ( /*_.CTYPE_VALUE__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V1605*/ meltfptr[1604])->tabval[12] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normal.melt:2090:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1605*/ meltfptr[1604])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V478*/ meltfptr[477]); ((meltroutine_ptr_t) /*_.VALROUT___V1605*/ meltfptr[1604])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V478*/ meltfptr[477]); MELT_LOCATION ("warmelt-normal.melt:2090:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1605*/ meltfptr[1604])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1430__NORMEXP_FUNMATCHEXPR#14", NULL != ( /*_.FMATCH_APPLYF__V62*/ meltfptr[61])); ((meltroutine_ptr_t) /*_.VALROUT___V1605*/ meltfptr[1604])->tabval[14] = (melt_ptr_t) ( /*_.FMATCH_APPLYF__V62*/ meltfptr[61]); MELT_LOCATION ("warmelt-normal.melt:2090:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1605*/ meltfptr[1604])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1605*/ meltfptr[1604])->tabval[15] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:2090:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1605*/ meltfptr[1604])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1508*/ meltfptr[1507]); ((meltroutine_ptr_t) /*_.VALROUT___V1605*/ meltfptr[1604])->tabval[16] = (melt_ptr_t) ( /*_.VALCLO___V1508*/ meltfptr[1507]); MELT_LOCATION ("warmelt-normal.melt:2090:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1605*/ meltfptr[1604])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1430__NORMEXP_FUNMATCHEXPR#17", NULL != ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V1605*/ meltfptr[1604])->tabval[17] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normal.melt:2090:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1605*/ meltfptr[1604])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V218*/ meltfptr[217]); ((meltroutine_ptr_t) /*_.VALROUT___V1605*/ meltfptr[1604])->tabval[18] = (melt_ptr_t) ( /*_.VALDATA___V218*/ meltfptr[217]); MELT_LOCATION ("warmelt-normal.melt:2090:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1605*/ meltfptr[1604]); /*putclosurout#35 */ melt_assertmsg ("putclosrout#35 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1606*/ meltfptr[1605])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#35 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1605*/ meltfptr[1604])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1606*/ meltfptr[1605])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1605*/ meltfptr[1604]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1606*/ meltfptr[1605]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1607*/ meltfptr[1606])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1607*/ meltfptr[1606])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1607*/ meltfptr[1606]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1608*/ meltfptr[1607]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1607*/ meltfptr[1606]); melt_dbgtrace_written_object ( /*_.VALDATA___V1607*/ meltfptr[1606], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1609*/ meltfptr[1608])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1609*/ meltfptr[1608])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1609*/ meltfptr[1608]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1610*/ meltfptr[1609]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1609*/ meltfptr[1608]); melt_dbgtrace_written_object ( /*_.VALDATA___V1609*/ meltfptr[1608], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1611*/ meltfptr[1610])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1611*/ meltfptr[1610])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1611*/ meltfptr[1610]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1612*/ meltfptr[1611]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1611*/ meltfptr[1610]); melt_dbgtrace_written_object ( /*_.VALDATA___V1611*/ meltfptr[1610], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:2162:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1613*/ meltfptr[1612])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1438__NORMEXP_APPLY#0", NULL != ( /*_.CLASS_SOURCE_APPLY__V64*/ meltfptr[63])); ((meltroutine_ptr_t) /*_.VALROUT___V1613*/ meltfptr[1612])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_APPLY__V64*/ meltfptr[63]); MELT_LOCATION ("warmelt-normal.melt:2162:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1613*/ meltfptr[1612])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1438__NORMEXP_APPLY#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1613*/ meltfptr[1612])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:2162:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1613*/ meltfptr[1612])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1438__NORMEXP_APPLY#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1613*/ meltfptr[1612])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:2162:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1613*/ meltfptr[1612])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1438__NORMEXP_APPLY#3", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V1613*/ meltfptr[1612])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1614*/ meltfptr[1613])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1614*/ meltfptr[1613])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1614*/ meltfptr[1613]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1615*/ meltfptr[1614]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1614*/ meltfptr[1613]); melt_dbgtrace_written_object ( /*_.VALDATA___V1614*/ meltfptr[1613], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:2162:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1613*/ meltfptr[1612])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1438__NORMEXP_APPLY#4", NULL != ( /*_.VALDATA___V1614*/ meltfptr[1613])); ((meltroutine_ptr_t) /*_.VALROUT___V1613*/ meltfptr[1612])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V1614*/ meltfptr[1613]); MELT_LOCATION ("warmelt-normal.melt:2162:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1613*/ meltfptr[1612])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V1613*/ meltfptr[1612])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:2162:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1613*/ meltfptr[1612])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1438__NORMEXP_APPLY#6", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1613*/ meltfptr[1612])->tabval[6] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:2162:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1613*/ meltfptr[1612])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V1613*/ meltfptr[1612])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-normal.melt:2162:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1613*/ meltfptr[1612])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1438__NORMEXP_APPLY#8", NULL != ( /*_.CTYPE_VALUE__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V1613*/ meltfptr[1612])->tabval[8] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V30*/ meltfptr[29]); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_27 */ void meltmod__warmelt_normal__initialmeltchunk_28 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-normal.melt:2162:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1613*/ meltfptr[1612])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1438__NORMEXP_APPLY#9", NULL != ( /*_.CLASS_NAMED__V24*/ meltfptr[23])); ((meltroutine_ptr_t) /*_.VALROUT___V1613*/ meltfptr[1612])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_NAMED__V24*/ meltfptr[23]); MELT_LOCATION ("warmelt-normal.melt:2162:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1613*/ meltfptr[1612])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1438__NORMEXP_APPLY#10", NULL != ( /*_.CLASS_LOCATED__V27*/ meltfptr[26])); ((meltroutine_ptr_t) /*_.VALROUT___V1613*/ meltfptr[1612])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V27*/ meltfptr[26]); MELT_LOCATION ("warmelt-normal.melt:2162:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1613*/ meltfptr[1612])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1508*/ meltfptr[1507]); ((meltroutine_ptr_t) /*_.VALROUT___V1613*/ meltfptr[1612])->tabval[11] = (melt_ptr_t) ( /*_.VALCLO___V1508*/ meltfptr[1507]); MELT_LOCATION ("warmelt-normal.melt:2162:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1613*/ meltfptr[1612])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1525*/ meltfptr[1524]); ((meltroutine_ptr_t) /*_.VALROUT___V1613*/ meltfptr[1612])->tabval[12] = (melt_ptr_t) ( /*_.VALCLO___V1525*/ meltfptr[1524]); MELT_LOCATION ("warmelt-normal.melt:2162:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1613*/ meltfptr[1612])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1438__NORMEXP_APPLY#13", NULL != ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V1613*/ meltfptr[1612])->tabval[13] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normal.melt:2162:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1613*/ meltfptr[1612])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1438__NORMEXP_APPLY#14", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1613*/ meltfptr[1612])->tabval[14] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-normal.melt:2162:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1613*/ meltfptr[1612])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V472*/ meltfptr[471]); ((meltroutine_ptr_t) /*_.VALROUT___V1613*/ meltfptr[1612])->tabval[15] = (melt_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471]); MELT_LOCATION ("warmelt-normal.melt:2162:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1613*/ meltfptr[1612])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1438__NORMEXP_APPLY#16", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1613*/ meltfptr[1612])->tabval[16] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:2162:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1613*/ meltfptr[1612])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1438__NORMEXP_APPLY#17", NULL != ( /*_.CTYPE_VOID__V57*/ meltfptr[56])); ((meltroutine_ptr_t) /*_.VALROUT___V1613*/ meltfptr[1612])->tabval[17] = (melt_ptr_t) ( /*_.CTYPE_VOID__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-normal.melt:2162:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1613*/ meltfptr[1612])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V218*/ meltfptr[217]); ((meltroutine_ptr_t) /*_.VALROUT___V1613*/ meltfptr[1612])->tabval[18] = (melt_ptr_t) ( /*_.VALDATA___V218*/ meltfptr[217]); MELT_LOCATION ("warmelt-normal.melt:2162:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1613*/ meltfptr[1612])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1613*/ meltfptr[1612])->tabval[19] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:2162:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1613*/ meltfptr[1612]); /*putclosurout#36 */ melt_assertmsg ("putclosrout#36 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1616*/ meltfptr[1615])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#36 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1613*/ meltfptr[1612])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1616*/ meltfptr[1615])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1613*/ meltfptr[1612]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1616*/ meltfptr[1615]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1617*/ meltfptr[1616])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1617*/ meltfptr[1616])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1617*/ meltfptr[1616]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1618*/ meltfptr[1617]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1617*/ meltfptr[1616]); melt_dbgtrace_written_object ( /*_.VALDATA___V1617*/ meltfptr[1616], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:2256:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1619*/ meltfptr[1618])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1444__NORMEXP_MSEND#0", NULL != ( /*_.CLASS_SOURCE_MSEND__V65*/ meltfptr[64])); ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_MSEND__V65*/ meltfptr[64]); MELT_LOCATION ("warmelt-normal.melt:2256:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1619*/ meltfptr[1618])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1444__NORMEXP_MSEND#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:2256:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1619*/ meltfptr[1618])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1444__NORMEXP_MSEND#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:2256:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1619*/ meltfptr[1618])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1444__NORMEXP_MSEND#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:2256:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1619*/ meltfptr[1618])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1571*/ meltfptr[1570]); ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V1571*/ meltfptr[1570]); MELT_LOCATION ("warmelt-normal.melt:2256:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1619*/ meltfptr[1618])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1444__NORMEXP_MSEND#5", NULL != ( /*_.FIND_ENV__V48*/ meltfptr[47])); ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[5] = (melt_ptr_t) ( /*_.FIND_ENV__V48*/ meltfptr[47]); MELT_LOCATION ("warmelt-normal.melt:2256:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1619*/ meltfptr[1618])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:2256:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1619*/ meltfptr[1618])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-normal.melt:2256:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1619*/ meltfptr[1618])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1444__NORMEXP_MSEND#8", NULL != ( /*_.CLASS_CTYPE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normal.melt:2256:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1619*/ meltfptr[1618])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1444__NORMEXP_MSEND#9", NULL != ( /*_.CTYPE_VALUE__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[9] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normal.melt:2256:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1619*/ meltfptr[1618])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1508*/ meltfptr[1507]); ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[10] = (melt_ptr_t) ( /*_.VALCLO___V1508*/ meltfptr[1507]); MELT_LOCATION ("warmelt-normal.melt:2256:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1619*/ meltfptr[1618])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1444__NORMEXP_MSEND#11", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[11] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-normal.melt:2256:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1619*/ meltfptr[1618])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V472*/ meltfptr[471]); ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471]); MELT_LOCATION ("warmelt-normal.melt:2256:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1619*/ meltfptr[1618])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1444__NORMEXP_MSEND#13", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[13] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:2256:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1619*/ meltfptr[1618])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1444__NORMEXP_MSEND#14", NULL != ( /*_.CTYPE_VOID__V57*/ meltfptr[56])); ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[14] = (melt_ptr_t) ( /*_.CTYPE_VOID__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-normal.melt:2256:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1619*/ meltfptr[1618])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1444__NORMEXP_MSEND#15", NULL != ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[15] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normal.melt:2256:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1619*/ meltfptr[1618])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1525*/ meltfptr[1524]); ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[16] = (melt_ptr_t) ( /*_.VALCLO___V1525*/ meltfptr[1524]); MELT_LOCATION ("warmelt-normal.melt:2256:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1619*/ meltfptr[1618])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1444__NORMEXP_MSEND#17", NULL != ( /*_.CLASS_SELECTOR_BINDING__V66*/ meltfptr[65])); ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[17] = (melt_ptr_t) ( /*_.CLASS_SELECTOR_BINDING__V66*/ meltfptr[65]); MELT_LOCATION ("warmelt-normal.melt:2256:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1619*/ meltfptr[1618])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1444__NORMEXP_MSEND#18", NULL != ( /*_.CLASS_SOURCE_DEFSELECTOR__V67*/ meltfptr[66])); ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[18] = (melt_ptr_t) ( /*_.CLASS_SOURCE_DEFSELECTOR__V67*/ meltfptr[66]); MELT_LOCATION ("warmelt-normal.melt:2256:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1619*/ meltfptr[1618])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1444__NORMEXP_MSEND#19", NULL != ( /*_.CLASS_VALUE_BINDING__V46*/ meltfptr[45])); ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[19] = (melt_ptr_t) ( /*_.CLASS_VALUE_BINDING__V46*/ meltfptr[45]); MELT_LOCATION ("warmelt-normal.melt:2256:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1619*/ meltfptr[1618])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1444__NORMEXP_MSEND#20", NULL != ( /*_.CLASS_SELECTOR__V20*/ meltfptr[19])); ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[20] = (melt_ptr_t) ( /*_.CLASS_SELECTOR__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-normal.melt:2256:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1619*/ meltfptr[1618])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V242*/ meltfptr[241]); ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[21] = (melt_ptr_t) ( /*_.VALDATA___V242*/ meltfptr[241]); MELT_LOCATION ("warmelt-normal.melt:2256:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1619*/ meltfptr[1618])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[22] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:2256:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1619*/ meltfptr[1618])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1444__NORMEXP_MSEND#23", NULL != ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[23] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-normal.melt:2256:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1619*/ meltfptr[1618])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1444__NORMEXP_MSEND#24", NULL != ( /*_.CLASS_NAMED__V24*/ meltfptr[23])); ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[24] = (melt_ptr_t) ( /*_.CLASS_NAMED__V24*/ meltfptr[23]); MELT_LOCATION ("warmelt-normal.melt:2256:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1619*/ meltfptr[1618])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1444__NORMEXP_MSEND#25", NULL != ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7])); ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[25] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-normal.melt:2256:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1619*/ meltfptr[1618])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1444__NORMEXP_MSEND#26", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[26] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:2256:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1619*/ meltfptr[1618]); /*putclosurout#37 */ melt_assertmsg ("putclosrout#37 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1620*/ meltfptr[1619])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#37 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1619*/ meltfptr[1618])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1620*/ meltfptr[1619])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1619*/ meltfptr[1618]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1620*/ meltfptr[1619]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1621*/ meltfptr[1620])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1621*/ meltfptr[1620])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1621*/ meltfptr[1620]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1622*/ meltfptr[1621]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1621*/ meltfptr[1620]); melt_dbgtrace_written_object ( /*_.VALDATA___V1621*/ meltfptr[1620], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1623*/ meltfptr[1622])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1623*/ meltfptr[1622])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1623*/ meltfptr[1622]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1624*/ meltfptr[1623]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1623*/ meltfptr[1622]); melt_dbgtrace_written_object ( /*_.VALDATA___V1623*/ meltfptr[1622], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1625*/ meltfptr[1624])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1625*/ meltfptr[1624])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1625*/ meltfptr[1624]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1626*/ meltfptr[1625]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1625*/ meltfptr[1624]); melt_dbgtrace_written_object ( /*_.VALDATA___V1625*/ meltfptr[1624], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:2382:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1627*/ meltfptr[1626])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1452__NORMEXP_RETURN#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1627*/ meltfptr[1626])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:2382:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1627*/ meltfptr[1626])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1452__NORMEXP_RETURN#1", NULL != ( /*_.CLASS_SOURCE_RETURN__V68*/ meltfptr[67])); ((meltroutine_ptr_t) /*_.VALROUT___V1627*/ meltfptr[1626])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SOURCE_RETURN__V68*/ meltfptr[67]); MELT_LOCATION ("warmelt-normal.melt:2382:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1627*/ meltfptr[1626])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1452__NORMEXP_RETURN#2", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1627*/ meltfptr[1626])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:2382:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1627*/ meltfptr[1626])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1452__NORMEXP_RETURN#3", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1627*/ meltfptr[1626])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:2382:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1627*/ meltfptr[1626])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1452__NORMEXP_RETURN#4", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1627*/ meltfptr[1626])->tabval[4] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1628*/ meltfptr[1627])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1628*/ meltfptr[1627])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1628*/ meltfptr[1627]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1629*/ meltfptr[1628]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1628*/ meltfptr[1627]); melt_dbgtrace_written_object ( /*_.VALDATA___V1628*/ meltfptr[1627], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:2382:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1627*/ meltfptr[1626])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1452__NORMEXP_RETURN#5", NULL != ( /*_.VALDATA___V1628*/ meltfptr[1627])); ((meltroutine_ptr_t) /*_.VALROUT___V1627*/ meltfptr[1626])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1628*/ meltfptr[1627]); MELT_LOCATION ("warmelt-normal.melt:2382:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1627*/ meltfptr[1626])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1452__NORMEXP_RETURN#6", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1627*/ meltfptr[1626])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:2382:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1627*/ meltfptr[1626])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1452__NORMEXP_RETURN#7", NULL != ( /*_.CTYPE_VALUE__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V1627*/ meltfptr[1626])->tabval[7] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normal.melt:2382:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1627*/ meltfptr[1626])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1627*/ meltfptr[1626])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:2382:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1627*/ meltfptr[1626])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1452__NORMEXP_RETURN#9", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1627*/ meltfptr[1626])->tabval[9] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:2382:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1627*/ meltfptr[1626])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V326*/ meltfptr[325]); ((meltroutine_ptr_t) /*_.VALROUT___V1627*/ meltfptr[1626])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V326*/ meltfptr[325]); MELT_LOCATION ("warmelt-normal.melt:2382:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1627*/ meltfptr[1626])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1508*/ meltfptr[1507]); ((meltroutine_ptr_t) /*_.VALROUT___V1627*/ meltfptr[1626])->tabval[11] = (melt_ptr_t) ( /*_.VALCLO___V1508*/ meltfptr[1507]); MELT_LOCATION ("warmelt-normal.melt:2382:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1627*/ meltfptr[1626])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1452__NORMEXP_RETURN#12", NULL != ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1627*/ meltfptr[1626])->tabval[12] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-normal.melt:2382:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1627*/ meltfptr[1626])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V1627*/ meltfptr[1626])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1630*/ meltfptr[1629])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1630*/ meltfptr[1629])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1630*/ meltfptr[1629]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1631*/ meltfptr[1630]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1630*/ meltfptr[1629]); melt_dbgtrace_written_object ( /*_.VALDATA___V1630*/ meltfptr[1629], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:2382:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1627*/ meltfptr[1626])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1452__NORMEXP_RETURN#14", NULL != ( /*_.VALDATA___V1630*/ meltfptr[1629])); ((meltroutine_ptr_t) /*_.VALROUT___V1627*/ meltfptr[1626])->tabval[14] = (melt_ptr_t) ( /*_.VALDATA___V1630*/ meltfptr[1629]); MELT_LOCATION ("warmelt-normal.melt:2382:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1627*/ meltfptr[1626])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V472*/ meltfptr[471]); ((meltroutine_ptr_t) /*_.VALROUT___V1627*/ meltfptr[1626])->tabval[15] = (melt_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471]); MELT_LOCATION ("warmelt-normal.melt:2382:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1627*/ meltfptr[1626])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1452__NORMEXP_RETURN#16", NULL != ( /*_.CTYPE_VOID__V57*/ meltfptr[56])); ((meltroutine_ptr_t) /*_.VALROUT___V1627*/ meltfptr[1626])->tabval[16] = (melt_ptr_t) ( /*_.CTYPE_VOID__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-normal.melt:2382:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1627*/ meltfptr[1626])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1452__NORMEXP_RETURN#17", NULL != ( /*_.CLASS_CTYPE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V1627*/ meltfptr[1626])->tabval[17] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normal.melt:2382:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1627*/ meltfptr[1626])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1452__NORMEXP_RETURN#18", NULL != ( /*_.CLASS_NAMED__V24*/ meltfptr[23])); ((meltroutine_ptr_t) /*_.VALROUT___V1627*/ meltfptr[1626])->tabval[18] = (melt_ptr_t) ( /*_.CLASS_NAMED__V24*/ meltfptr[23]); MELT_LOCATION ("warmelt-normal.melt:2382:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1627*/ meltfptr[1626]); /*putclosurout#38 */ melt_assertmsg ("putclosrout#38 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1632*/ meltfptr[1631])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#38 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1627*/ meltfptr[1626])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1632*/ meltfptr[1631])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1627*/ meltfptr[1626]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1632*/ meltfptr[1631]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1633*/ meltfptr[1632])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1633*/ meltfptr[1632])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1633*/ meltfptr[1632]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1634*/ meltfptr[1633]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1633*/ meltfptr[1632]); melt_dbgtrace_written_object ( /*_.VALDATA___V1633*/ meltfptr[1632], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:2470:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1635*/ meltfptr[1634])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1460__NORMEXP_IF#0", NULL != ( /*_.CLASS_SOURCE_IF__V69*/ meltfptr[68])); ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_IF__V69*/ meltfptr[68]); MELT_LOCATION ("warmelt-normal.melt:2470:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1635*/ meltfptr[1634])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1460__NORMEXP_IF#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:2470:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1635*/ meltfptr[1634])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1460__NORMEXP_IF#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:2470:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1635*/ meltfptr[1634])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1460__NORMEXP_IF#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:2470:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1635*/ meltfptr[1634])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1460__NORMEXP_IF#4", NULL != ( /*_.CTYPE_VOID__V57*/ meltfptr[56])); ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[4] = (melt_ptr_t) ( /*_.CTYPE_VOID__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-normal.melt:2470:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1635*/ meltfptr[1634])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1460__NORMEXP_IF#5", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[5] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1636*/ meltfptr[1635])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1636*/ meltfptr[1635])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1636*/ meltfptr[1635]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1637*/ meltfptr[1636]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1636*/ meltfptr[1635]); melt_dbgtrace_written_object ( /*_.VALDATA___V1636*/ meltfptr[1635], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:2470:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1635*/ meltfptr[1634])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1460__NORMEXP_IF#6", NULL != ( /*_.VALDATA___V1636*/ meltfptr[1635])); ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1636*/ meltfptr[1635]); MELT_LOCATION ("warmelt-normal.melt:2470:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1635*/ meltfptr[1634])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V472*/ meltfptr[471]); ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471]); MELT_LOCATION ("warmelt-normal.melt:2470:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1635*/ meltfptr[1634])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1460__NORMEXP_IF#8", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:2470:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1635*/ meltfptr[1634])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:2470:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1635*/ meltfptr[1634])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1460__NORMEXP_IF#10", NULL != ( /*_.FRESH_ENV__V70*/ meltfptr[69])); ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[10] = (melt_ptr_t) ( /*_.FRESH_ENV__V70*/ meltfptr[69]); MELT_LOCATION ("warmelt-normal.melt:2470:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1635*/ meltfptr[1634])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1460__NORMEXP_IF#11", NULL != ( /*_.LIST_EVERY__V34*/ meltfptr[33])); ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[11] = (melt_ptr_t) ( /*_.LIST_EVERY__V34*/ meltfptr[33]); MELT_LOCATION ("warmelt-normal.melt:2470:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1635*/ meltfptr[1634])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1460__NORMEXP_IF#12", NULL != ( /*_.PUT_ENV__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[12] = (melt_ptr_t) ( /*_.PUT_ENV__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normal.melt:2509:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1638*/ meltfptr[1637])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1468__LAMBDA_#0", NULL != ( /*_.PUT_ENV__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V1638*/ meltfptr[1637])->tabval[0] = (melt_ptr_t) ( /*_.PUT_ENV__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normal.melt:2509:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1638*/ meltfptr[1637]); MELT_LOCATION ("warmelt-normal.melt:2470:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1635*/ meltfptr[1634])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1460__NORMEXP_IF#13", NULL != ( /*_.VALROUT___V1638*/ meltfptr[1637])); ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[13] = (melt_ptr_t) ( /*_.VALROUT___V1638*/ meltfptr[1637]); MELT_LOCATION ("warmelt-normal.melt:2470:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1635*/ meltfptr[1634])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[14] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1639*/ meltfptr[1638])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1639*/ meltfptr[1638])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1639*/ meltfptr[1638]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1640*/ meltfptr[1639]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1639*/ meltfptr[1638]); melt_dbgtrace_written_object ( /*_.VALDATA___V1639*/ meltfptr[1638], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:2470:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1635*/ meltfptr[1634])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1460__NORMEXP_IF#15", NULL != ( /*_.VALDATA___V1639*/ meltfptr[1638])); ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[15] = (melt_ptr_t) ( /*_.VALDATA___V1639*/ meltfptr[1638]); MELT_LOCATION ("warmelt-normal.melt:2470:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1635*/ meltfptr[1634])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[16] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:2470:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1635*/ meltfptr[1634])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1515*/ meltfptr[1514]); ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[17] = (melt_ptr_t) ( /*_.VALCLO___V1515*/ meltfptr[1514]); MELT_LOCATION ("warmelt-normal.melt:2470:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1635*/ meltfptr[1634])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V426*/ meltfptr[425]); ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[18] = (melt_ptr_t) ( /*_.VALDATA___V426*/ meltfptr[425]); MELT_LOCATION ("warmelt-normal.melt:2470:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1635*/ meltfptr[1634])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1460__NORMEXP_IF#19", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[19] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:2470:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1635*/ meltfptr[1634]); /*putclosurout#39 */ melt_assertmsg ("putclosrout#39 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1641*/ meltfptr[1640])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#39 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1635*/ meltfptr[1634])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1641*/ meltfptr[1640])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1635*/ meltfptr[1634]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1641*/ meltfptr[1640]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1642*/ meltfptr[1641])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1642*/ meltfptr[1641])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1642*/ meltfptr[1641]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1643*/ meltfptr[1642]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1642*/ meltfptr[1641]); melt_dbgtrace_written_object ( /*_.VALDATA___V1642*/ meltfptr[1641], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1644*/ meltfptr[1643])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1644*/ meltfptr[1643])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1644*/ meltfptr[1643]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1645*/ meltfptr[1644]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1644*/ meltfptr[1643]); melt_dbgtrace_written_object ( /*_.VALDATA___V1644*/ meltfptr[1643], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1646*/ meltfptr[1645])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1646*/ meltfptr[1645])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1646*/ meltfptr[1645]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1647*/ meltfptr[1646]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1646*/ meltfptr[1645]); melt_dbgtrace_written_object ( /*_.VALDATA___V1646*/ meltfptr[1645], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:2545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1648*/ meltfptr[1647])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1473__NORMEXP_IFELSE#0", NULL != ( /*_.CLASS_SOURCE_IFELSE__V72*/ meltfptr[71])); ((meltroutine_ptr_t) /*_.VALROUT___V1648*/ meltfptr[1647])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_IFELSE__V72*/ meltfptr[71]); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_28 */ void meltmod__warmelt_normal__initialmeltchunk_29 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-normal.melt:2545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1648*/ meltfptr[1647])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1473__NORMEXP_IFELSE#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1648*/ meltfptr[1647])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:2545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1648*/ meltfptr[1647])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1473__NORMEXP_IFELSE#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1648*/ meltfptr[1647])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:2545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1648*/ meltfptr[1647])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1473__NORMEXP_IFELSE#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1648*/ meltfptr[1647])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:2545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1648*/ meltfptr[1647])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1473__NORMEXP_IFELSE#4", NULL != ( /*_.CTYPE_VOID__V57*/ meltfptr[56])); ((meltroutine_ptr_t) /*_.VALROUT___V1648*/ meltfptr[1647])->tabval[4] = (melt_ptr_t) ( /*_.CTYPE_VOID__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-normal.melt:2545:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1648*/ meltfptr[1647])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V1648*/ meltfptr[1647])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:2545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1648*/ meltfptr[1647])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1473__NORMEXP_IFELSE#6", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1648*/ meltfptr[1647])->tabval[6] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1649*/ meltfptr[1648])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1649*/ meltfptr[1648])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1649*/ meltfptr[1648]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1650*/ meltfptr[1649]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1649*/ meltfptr[1648]); melt_dbgtrace_written_object ( /*_.VALDATA___V1649*/ meltfptr[1648], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:2545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1648*/ meltfptr[1647])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1473__NORMEXP_IFELSE#7", NULL != ( /*_.VALDATA___V1649*/ meltfptr[1648])); ((meltroutine_ptr_t) /*_.VALROUT___V1648*/ meltfptr[1647])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V1649*/ meltfptr[1648]); MELT_LOCATION ("warmelt-normal.melt:2545:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1648*/ meltfptr[1647])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V472*/ meltfptr[471]); ((meltroutine_ptr_t) /*_.VALROUT___V1648*/ meltfptr[1647])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471]); MELT_LOCATION ("warmelt-normal.melt:2545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1648*/ meltfptr[1647])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1473__NORMEXP_IFELSE#9", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1648*/ meltfptr[1647])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:2545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1648*/ meltfptr[1647])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1473__NORMEXP_IFELSE#10", NULL != ( /*_.FRESH_ENV__V70*/ meltfptr[69])); ((meltroutine_ptr_t) /*_.VALROUT___V1648*/ meltfptr[1647])->tabval[10] = (melt_ptr_t) ( /*_.FRESH_ENV__V70*/ meltfptr[69]); MELT_LOCATION ("warmelt-normal.melt:2545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1648*/ meltfptr[1647])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1473__NORMEXP_IFELSE#11", NULL != ( /*_.LIST_EVERY__V34*/ meltfptr[33])); ((meltroutine_ptr_t) /*_.VALROUT___V1648*/ meltfptr[1647])->tabval[11] = (melt_ptr_t) ( /*_.LIST_EVERY__V34*/ meltfptr[33]); MELT_LOCATION ("warmelt-normal.melt:2545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1648*/ meltfptr[1647])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1473__NORMEXP_IFELSE#12", NULL != ( /*_.PUT_ENV__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V1648*/ meltfptr[1647])->tabval[12] = (melt_ptr_t) ( /*_.PUT_ENV__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normal.melt:2585:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1651*/ meltfptr[1650])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1479__LAMBDA_#0", NULL != ( /*_.PUT_ENV__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V1651*/ meltfptr[1650])->tabval[0] = (melt_ptr_t) ( /*_.PUT_ENV__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normal.melt:2585:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1651*/ meltfptr[1650]); MELT_LOCATION ("warmelt-normal.melt:2545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1648*/ meltfptr[1647])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1473__NORMEXP_IFELSE#13", NULL != ( /*_.VALROUT___V1651*/ meltfptr[1650])); ((meltroutine_ptr_t) /*_.VALROUT___V1648*/ meltfptr[1647])->tabval[13] = (melt_ptr_t) ( /*_.VALROUT___V1651*/ meltfptr[1650]); MELT_LOCATION ("warmelt-normal.melt:2545:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1648*/ meltfptr[1647])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V1648*/ meltfptr[1647])->tabval[14] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-normal.melt:2545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1648*/ meltfptr[1647])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1473__NORMEXP_IFELSE#15", NULL != ( /*_.PUT_ENV__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V1648*/ meltfptr[1647])->tabval[15] = (melt_ptr_t) ( /*_.PUT_ENV__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normal.melt:2598:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1652*/ meltfptr[1651])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1480__LAMBDA_#0", NULL != ( /*_.PUT_ENV__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V1652*/ meltfptr[1651])->tabval[0] = (melt_ptr_t) ( /*_.PUT_ENV__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normal.melt:2598:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1652*/ meltfptr[1651]); MELT_LOCATION ("warmelt-normal.melt:2545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1648*/ meltfptr[1647])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1473__NORMEXP_IFELSE#16", NULL != ( /*_.VALROUT___V1652*/ meltfptr[1651])); ((meltroutine_ptr_t) /*_.VALROUT___V1648*/ meltfptr[1647])->tabval[16] = (melt_ptr_t) ( /*_.VALROUT___V1652*/ meltfptr[1651]); MELT_LOCATION ("warmelt-normal.melt:2545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1648*/ meltfptr[1647])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1473__NORMEXP_IFELSE#17", NULL != ( /*_.CLASS_CTYPE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V1648*/ meltfptr[1647])->tabval[17] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V39*/ meltfptr[38]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1653*/ meltfptr[1652])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1653*/ meltfptr[1652])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1653*/ meltfptr[1652]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1654*/ meltfptr[1653]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1653*/ meltfptr[1652]); melt_dbgtrace_written_object ( /*_.VALDATA___V1653*/ meltfptr[1652], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:2545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1648*/ meltfptr[1647])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1473__NORMEXP_IFELSE#18", NULL != ( /*_.VALDATA___V1653*/ meltfptr[1652])); ((meltroutine_ptr_t) /*_.VALROUT___V1648*/ meltfptr[1647])->tabval[18] = (melt_ptr_t) ( /*_.VALDATA___V1653*/ meltfptr[1652]); MELT_LOCATION ("warmelt-normal.melt:2545:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1648*/ meltfptr[1647])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1648*/ meltfptr[1647])->tabval[19] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:2545:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1648*/ meltfptr[1647])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1515*/ meltfptr[1514]); ((meltroutine_ptr_t) /*_.VALROUT___V1648*/ meltfptr[1647])->tabval[20] = (melt_ptr_t) ( /*_.VALCLO___V1515*/ meltfptr[1514]); MELT_LOCATION ("warmelt-normal.melt:2545:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1648*/ meltfptr[1647])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V426*/ meltfptr[425]); ((meltroutine_ptr_t) /*_.VALROUT___V1648*/ meltfptr[1647])->tabval[21] = (melt_ptr_t) ( /*_.VALDATA___V426*/ meltfptr[425]); MELT_LOCATION ("warmelt-normal.melt:2545:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1648*/ meltfptr[1647])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1473__NORMEXP_IFELSE#22", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1648*/ meltfptr[1647])->tabval[22] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:2545:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1648*/ meltfptr[1647]); /*putclosurout#40 */ melt_assertmsg ("putclosrout#40 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1655*/ meltfptr[1654])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#40 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1648*/ meltfptr[1647])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1655*/ meltfptr[1654])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1648*/ meltfptr[1647]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1655*/ meltfptr[1654]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1656*/ meltfptr[1655])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1656*/ meltfptr[1655])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1656*/ meltfptr[1655]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1657*/ meltfptr[1656]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1656*/ meltfptr[1655]); melt_dbgtrace_written_object ( /*_.VALDATA___V1656*/ meltfptr[1655], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:2656:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1658*/ meltfptr[1657])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1483__NORMEXP_CPPIF#0", NULL != ( /*_.CLASS_SOURCE_CPPIF__V73*/ meltfptr[72])); ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_CPPIF__V73*/ meltfptr[72]); MELT_LOCATION ("warmelt-normal.melt:2656:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1658*/ meltfptr[1657])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1483__NORMEXP_CPPIF#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:2656:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1658*/ meltfptr[1657])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1483__NORMEXP_CPPIF#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:2656:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1658*/ meltfptr[1657])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1483__NORMEXP_CPPIF#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:2656:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1658*/ meltfptr[1657])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1483__NORMEXP_CPPIF#4", NULL != ( /*_.CTYPE_VOID__V57*/ meltfptr[56])); ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[4] = (melt_ptr_t) ( /*_.CTYPE_VOID__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-normal.melt:2656:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1658*/ meltfptr[1657])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:2656:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1658*/ meltfptr[1657])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1483__NORMEXP_CPPIF#6", NULL != ( /*_.FRESH_ENV__V70*/ meltfptr[69])); ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[6] = (melt_ptr_t) ( /*_.FRESH_ENV__V70*/ meltfptr[69]); MELT_LOCATION ("warmelt-normal.melt:2656:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1658*/ meltfptr[1657])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1483__NORMEXP_CPPIF#7", NULL != ( /*_.LIST_EVERY__V34*/ meltfptr[33])); ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[7] = (melt_ptr_t) ( /*_.LIST_EVERY__V34*/ meltfptr[33]); MELT_LOCATION ("warmelt-normal.melt:2656:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1658*/ meltfptr[1657])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1483__NORMEXP_CPPIF#8", NULL != ( /*_.PUT_ENV__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[8] = (melt_ptr_t) ( /*_.PUT_ENV__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normal.melt:2676:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1659*/ meltfptr[1658])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1487__LAMBDA_#0", NULL != ( /*_.PUT_ENV__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V1659*/ meltfptr[1658])->tabval[0] = (melt_ptr_t) ( /*_.PUT_ENV__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normal.melt:2676:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1659*/ meltfptr[1658]); MELT_LOCATION ("warmelt-normal.melt:2656:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1658*/ meltfptr[1657])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1483__NORMEXP_CPPIF#9", NULL != ( /*_.VALROUT___V1659*/ meltfptr[1658])); ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[9] = (melt_ptr_t) ( /*_.VALROUT___V1659*/ meltfptr[1658]); MELT_LOCATION ("warmelt-normal.melt:2656:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1658*/ meltfptr[1657])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-normal.melt:2656:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1658*/ meltfptr[1657])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1483__NORMEXP_CPPIF#11", NULL != ( /*_.CLASS_CTYPE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[11] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normal.melt:2656:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1658*/ meltfptr[1657])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1483__NORMEXP_CPPIF#12", NULL != ( /*_.PUT_ENV__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[12] = (melt_ptr_t) ( /*_.PUT_ENV__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normal.melt:2689:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1660*/ meltfptr[1659])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1488__LAMBDA_#0", NULL != ( /*_.PUT_ENV__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V1660*/ meltfptr[1659])->tabval[0] = (melt_ptr_t) ( /*_.PUT_ENV__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normal.melt:2689:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1660*/ meltfptr[1659]); MELT_LOCATION ("warmelt-normal.melt:2656:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1658*/ meltfptr[1657])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1483__NORMEXP_CPPIF#13", NULL != ( /*_.VALROUT___V1660*/ meltfptr[1659])); ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[13] = (melt_ptr_t) ( /*_.VALROUT___V1660*/ meltfptr[1659]); MELT_LOCATION ("warmelt-normal.melt:2656:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1658*/ meltfptr[1657])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1483__NORMEXP_CPPIF#14", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[14] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1661*/ meltfptr[1660])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1661*/ meltfptr[1660])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1661*/ meltfptr[1660]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1662*/ meltfptr[1661]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1661*/ meltfptr[1660]); melt_dbgtrace_written_object ( /*_.VALDATA___V1661*/ meltfptr[1660], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:2656:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1658*/ meltfptr[1657])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1483__NORMEXP_CPPIF#15", NULL != ( /*_.VALDATA___V1661*/ meltfptr[1660])); ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[15] = (melt_ptr_t) ( /*_.VALDATA___V1661*/ meltfptr[1660]); MELT_LOCATION ("warmelt-normal.melt:2656:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1658*/ meltfptr[1657])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[16] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:2656:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1658*/ meltfptr[1657])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1515*/ meltfptr[1514]); ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[17] = (melt_ptr_t) ( /*_.VALCLO___V1515*/ meltfptr[1514]); MELT_LOCATION ("warmelt-normal.melt:2656:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1658*/ meltfptr[1657])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1483__NORMEXP_CPPIF#18", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[18] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:2656:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1658*/ meltfptr[1657])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V436*/ meltfptr[435]); ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[19] = (melt_ptr_t) ( /*_.VALDATA___V436*/ meltfptr[435]); MELT_LOCATION ("warmelt-normal.melt:2656:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1658*/ meltfptr[1657])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1483__NORMEXP_CPPIF#20", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[20] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:2656:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1658*/ meltfptr[1657]); /*putclosurout#41 */ melt_assertmsg ("putclosrout#41 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1663*/ meltfptr[1662])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#41 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1658*/ meltfptr[1657])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1663*/ meltfptr[1662])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1658*/ meltfptr[1657]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1663*/ meltfptr[1662]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1664*/ meltfptr[1663])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1664*/ meltfptr[1663])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1664*/ meltfptr[1663]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1665*/ meltfptr[1664]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1664*/ meltfptr[1663]); melt_dbgtrace_written_object ( /*_.VALDATA___V1664*/ meltfptr[1663], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:2730:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1666*/ meltfptr[1665])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1491__NORMEXP_OR#0", NULL != ( /*_.CLASS_SOURCE_OR__V74*/ meltfptr[73])); ((meltroutine_ptr_t) /*_.VALROUT___V1666*/ meltfptr[1665])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_OR__V74*/ meltfptr[73]); MELT_LOCATION ("warmelt-normal.melt:2730:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1666*/ meltfptr[1665])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1491__NORMEXP_OR#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1666*/ meltfptr[1665])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:2730:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1666*/ meltfptr[1665])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1491__NORMEXP_OR#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1666*/ meltfptr[1665])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:2730:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1666*/ meltfptr[1665])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1491__NORMEXP_OR#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1666*/ meltfptr[1665])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:2730:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1666*/ meltfptr[1665])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1491__NORMEXP_OR#4", NULL != ( /*_.DISCR_INTEGER__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1666*/ meltfptr[1665])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normal.melt:2730:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1666*/ meltfptr[1665])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1491__NORMEXP_OR#5", NULL != ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1666*/ meltfptr[1665])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normal.melt:2730:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1666*/ meltfptr[1665])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1491__NORMEXP_OR#6", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1666*/ meltfptr[1665])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:2730:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1666*/ meltfptr[1665])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1491__NORMEXP_OR#7", NULL != ( /*_.CTYPE_VOID__V57*/ meltfptr[56])); ((meltroutine_ptr_t) /*_.VALROUT___V1666*/ meltfptr[1665])->tabval[7] = (melt_ptr_t) ( /*_.CTYPE_VOID__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-normal.melt:2730:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1666*/ meltfptr[1665])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1491__NORMEXP_OR#8", NULL != ( /*_.FRESH_ENV__V70*/ meltfptr[69])); ((meltroutine_ptr_t) /*_.VALROUT___V1666*/ meltfptr[1665])->tabval[8] = (melt_ptr_t) ( /*_.FRESH_ENV__V70*/ meltfptr[69]); MELT_LOCATION ("warmelt-normal.melt:2730:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1666*/ meltfptr[1665])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1491__NORMEXP_OR#9", NULL != ( /*_.MULTIPLE_BACKWARD_EVERY__V75*/ meltfptr[74])); ((meltroutine_ptr_t) /*_.VALROUT___V1666*/ meltfptr[1665])->tabval[9] = (melt_ptr_t) ( /*_.MULTIPLE_BACKWARD_EVERY__V75*/ meltfptr[74]); MELT_LOCATION ("warmelt-normal.melt:2730:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1666*/ meltfptr[1665])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1491__NORMEXP_OR#10", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1666*/ meltfptr[1665])->tabval[10] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:2730:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1666*/ meltfptr[1665])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V1666*/ meltfptr[1665])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:2730:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1666*/ meltfptr[1665])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1491__NORMEXP_OR#12", NULL != ( /*_.LIST_EVERY__V34*/ meltfptr[33])); ((meltroutine_ptr_t) /*_.VALROUT___V1666*/ meltfptr[1665])->tabval[12] = (melt_ptr_t) ( /*_.LIST_EVERY__V34*/ meltfptr[33]); MELT_LOCATION ("warmelt-normal.melt:2730:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1666*/ meltfptr[1665])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1491__NORMEXP_OR#13", NULL != ( /*_.PUT_ENV__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V1666*/ meltfptr[1665])->tabval[13] = (melt_ptr_t) ( /*_.PUT_ENV__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normal.melt:2730:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1666*/ meltfptr[1665])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1491__NORMEXP_OR#14", NULL != ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1666*/ meltfptr[1665])->tabval[14] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normal.melt:2730:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1666*/ meltfptr[1665])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V1666*/ meltfptr[1665])->tabval[15] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-normal.melt:2730:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1666*/ meltfptr[1665])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1491__NORMEXP_OR#16", NULL != ( /*_.CLASS_CTYPE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V1666*/ meltfptr[1665])->tabval[16] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normal.melt:2730:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1666*/ meltfptr[1665])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V426*/ meltfptr[425]); ((meltroutine_ptr_t) /*_.VALROUT___V1666*/ meltfptr[1665])->tabval[17] = (melt_ptr_t) ( /*_.VALDATA___V426*/ meltfptr[425]); MELT_LOCATION ("warmelt-normal.melt:2730:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1666*/ meltfptr[1665])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1515*/ meltfptr[1514]); ((meltroutine_ptr_t) /*_.VALROUT___V1666*/ meltfptr[1665])->tabval[18] = (melt_ptr_t) ( /*_.VALCLO___V1515*/ meltfptr[1514]); MELT_LOCATION ("warmelt-normal.melt:2730:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1666*/ meltfptr[1665])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1491__NORMEXP_OR#19", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1666*/ meltfptr[1665])->tabval[19] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-normal.melt:2730:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1666*/ meltfptr[1665])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1491__NORMEXP_OR#20", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1666*/ meltfptr[1665])->tabval[20] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:2730:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1666*/ meltfptr[1665])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1666*/ meltfptr[1665])->tabval[21] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:2730:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1666*/ meltfptr[1665])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1491__NORMEXP_OR#22", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1666*/ meltfptr[1665])->tabval[22] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:2730:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1666*/ meltfptr[1665])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1491__NORMEXP_OR#23", NULL != ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V1666*/ meltfptr[1665])->tabval[23] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normal.melt:2748:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1667*/ meltfptr[1666])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1497__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1667*/ meltfptr[1666])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:2748:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1667*/ meltfptr[1666])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V1667*/ meltfptr[1666])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:2748:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1667*/ meltfptr[1666])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1497__LAMBDA_#2", NULL != ( /*_.LIST_EVERY__V34*/ meltfptr[33])); ((meltroutine_ptr_t) /*_.VALROUT___V1667*/ meltfptr[1666])->tabval[2] = (melt_ptr_t) ( /*_.LIST_EVERY__V34*/ meltfptr[33]); MELT_LOCATION ("warmelt-normal.melt:2748:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1667*/ meltfptr[1666])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1497__LAMBDA_#3", NULL != ( /*_.PUT_ENV__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V1667*/ meltfptr[1666])->tabval[3] = (melt_ptr_t) ( /*_.PUT_ENV__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normal.melt:2755:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1668*/ meltfptr[1667])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1498__LAMBDA_#0", NULL != ( /*_.PUT_ENV__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V1668*/ meltfptr[1667])->tabval[0] = (melt_ptr_t) ( /*_.PUT_ENV__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normal.melt:2755:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1668*/ meltfptr[1667]); MELT_LOCATION ("warmelt-normal.melt:2748:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1667*/ meltfptr[1666])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1497__LAMBDA_#4", NULL != ( /*_.VALROUT___V1668*/ meltfptr[1667])); ((meltroutine_ptr_t) /*_.VALROUT___V1667*/ meltfptr[1666])->tabval[4] = (melt_ptr_t) ( /*_.VALROUT___V1668*/ meltfptr[1667]); MELT_LOCATION ("warmelt-normal.melt:2748:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1667*/ meltfptr[1666])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1497__LAMBDA_#5", NULL != ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1667*/ meltfptr[1666])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normal.melt:2748:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1667*/ meltfptr[1666])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V1667*/ meltfptr[1666])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-normal.melt:2748:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1667*/ meltfptr[1666])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1497__LAMBDA_#7", NULL != ( /*_.CLASS_CTYPE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V1667*/ meltfptr[1666])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normal.melt:2748:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1667*/ meltfptr[1666])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V426*/ meltfptr[425]); ((meltroutine_ptr_t) /*_.VALROUT___V1667*/ meltfptr[1666])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V426*/ meltfptr[425]); MELT_LOCATION ("warmelt-normal.melt:2748:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1667*/ meltfptr[1666])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1515*/ meltfptr[1514]); ((meltroutine_ptr_t) /*_.VALROUT___V1667*/ meltfptr[1666])->tabval[9] = (melt_ptr_t) ( /*_.VALCLO___V1515*/ meltfptr[1514]); MELT_LOCATION ("warmelt-normal.melt:2748:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1667*/ meltfptr[1666])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1497__LAMBDA_#10", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1667*/ meltfptr[1666])->tabval[10] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1669*/ meltfptr[1668])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1669*/ meltfptr[1668])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1669*/ meltfptr[1668]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1670*/ meltfptr[1669]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1669*/ meltfptr[1668]); melt_dbgtrace_written_object ( /*_.VALDATA___V1669*/ meltfptr[1668], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:2748:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1667*/ meltfptr[1666])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1497__LAMBDA_#11", NULL != ( /*_.VALDATA___V1669*/ meltfptr[1668])); ((meltroutine_ptr_t) /*_.VALROUT___V1667*/ meltfptr[1666])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V1669*/ meltfptr[1668]); MELT_LOCATION ("warmelt-normal.melt:2748:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1667*/ meltfptr[1666])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1497__LAMBDA_#12", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1667*/ meltfptr[1666])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:2748:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1667*/ meltfptr[1666])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1667*/ meltfptr[1666])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:2748:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1667*/ meltfptr[1666])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1497__LAMBDA_#14", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1667*/ meltfptr[1666])->tabval[14] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:2748:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1667*/ meltfptr[1666])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1497__LAMBDA_#15", NULL != ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V1667*/ meltfptr[1666])->tabval[15] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normal.melt:2748:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1667*/ meltfptr[1666]); MELT_LOCATION ("warmelt-normal.melt:2730:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1666*/ meltfptr[1665])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1491__NORMEXP_OR#24", NULL != ( /*_.VALROUT___V1667*/ meltfptr[1666])); ((meltroutine_ptr_t) /*_.VALROUT___V1666*/ meltfptr[1665])->tabval[24] = (melt_ptr_t) ( /*_.VALROUT___V1667*/ meltfptr[1666]); MELT_LOCATION ("warmelt-normal.melt:2730:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1666*/ meltfptr[1665]); /*putclosurout#42 */ melt_assertmsg ("putclosrout#42 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1671*/ meltfptr[1670])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#42 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1666*/ meltfptr[1665])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1671*/ meltfptr[1670])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1666*/ meltfptr[1665]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1671*/ meltfptr[1670]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1672*/ meltfptr[1671])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1672*/ meltfptr[1671])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1672*/ meltfptr[1671]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1673*/ meltfptr[1672]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1672*/ meltfptr[1671]); melt_dbgtrace_written_object ( /*_.VALDATA___V1672*/ meltfptr[1671], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1674*/ meltfptr[1673])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1674*/ meltfptr[1673])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1674*/ meltfptr[1673]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1675*/ meltfptr[1674]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1674*/ meltfptr[1673]); melt_dbgtrace_written_object ( /*_.VALDATA___V1674*/ meltfptr[1673], "new static instance"); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_29 */ void meltmod__warmelt_normal__initialmeltchunk_30 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-normal.melt:2813:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1676*/ meltfptr[1675])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1501__NORMEXP_PROGN#0", NULL != ( /*_.CLASS_SOURCE_PROGN__V76*/ meltfptr[75])); ((meltroutine_ptr_t) /*_.VALROUT___V1676*/ meltfptr[1675])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PROGN__V76*/ meltfptr[75]); MELT_LOCATION ("warmelt-normal.melt:2813:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1676*/ meltfptr[1675])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1501__NORMEXP_PROGN#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1676*/ meltfptr[1675])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:2813:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1676*/ meltfptr[1675])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1501__NORMEXP_PROGN#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1676*/ meltfptr[1675])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:2813:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1676*/ meltfptr[1675])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1501__NORMEXP_PROGN#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1676*/ meltfptr[1675])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:2813:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1676*/ meltfptr[1675])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1501__NORMEXP_PROGN#4", NULL != ( /*_.DISCR_INTEGER__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1676*/ meltfptr[1675])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normal.melt:2813:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1676*/ meltfptr[1675])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V876*/ meltfptr[875]); ((meltroutine_ptr_t) /*_.VALROUT___V1676*/ meltfptr[1675])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V876*/ meltfptr[875]); MELT_LOCATION ("warmelt-normal.melt:2813:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1676*/ meltfptr[1675])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1508*/ meltfptr[1507]); ((meltroutine_ptr_t) /*_.VALROUT___V1676*/ meltfptr[1675])->tabval[6] = (melt_ptr_t) ( /*_.VALCLO___V1508*/ meltfptr[1507]); MELT_LOCATION ("warmelt-normal.melt:2813:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1676*/ meltfptr[1675])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1501__NORMEXP_PROGN#7", NULL != ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1676*/ meltfptr[1675])->tabval[7] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-normal.melt:2813:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1676*/ meltfptr[1675])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1501__NORMEXP_PROGN#8", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1676*/ meltfptr[1675])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:2813:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1676*/ meltfptr[1675])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1501__NORMEXP_PROGN#9", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1676*/ meltfptr[1675])->tabval[9] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1677*/ meltfptr[1676])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1677*/ meltfptr[1676])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1677*/ meltfptr[1676]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1678*/ meltfptr[1677]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1677*/ meltfptr[1676]); melt_dbgtrace_written_object ( /*_.VALDATA___V1677*/ meltfptr[1676], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:2813:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1676*/ meltfptr[1675])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1501__NORMEXP_PROGN#10", NULL != ( /*_.VALDATA___V1677*/ meltfptr[1676])); ((meltroutine_ptr_t) /*_.VALROUT___V1676*/ meltfptr[1675])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V1677*/ meltfptr[1676]); MELT_LOCATION ("warmelt-normal.melt:2813:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1676*/ meltfptr[1675])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V1676*/ meltfptr[1675])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-normal.melt:2813:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1676*/ meltfptr[1675])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1501__NORMEXP_PROGN#12", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1676*/ meltfptr[1675])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:2813:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1676*/ meltfptr[1675])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V458*/ meltfptr[457]); ((meltroutine_ptr_t) /*_.VALROUT___V1676*/ meltfptr[1675])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V458*/ meltfptr[457]); MELT_LOCATION ("warmelt-normal.melt:2813:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1676*/ meltfptr[1675])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1676*/ meltfptr[1675])->tabval[14] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:2813:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1676*/ meltfptr[1675]); /*putclosurout#43 */ melt_assertmsg ("putclosrout#43 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1679*/ meltfptr[1678])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#43 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1676*/ meltfptr[1675])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1679*/ meltfptr[1678])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1676*/ meltfptr[1675]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1679*/ meltfptr[1678]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1680*/ meltfptr[1679])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1680*/ meltfptr[1679])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1680*/ meltfptr[1679]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1681*/ meltfptr[1680]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1680*/ meltfptr[1679]); melt_dbgtrace_written_object ( /*_.VALDATA___V1680*/ meltfptr[1679], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:2867:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1682*/ meltfptr[1681])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V1682*/ meltfptr[1681])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-normal.melt:2867:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1682*/ meltfptr[1681]); MELT_LOCATION ("warmelt-normal.melt:2872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1683*/ meltfptr[1682])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1508__NORMEXP_LET#0", NULL != ( /*_.CLASS_SOURCE_LET__V77*/ meltfptr[76])); ((meltroutine_ptr_t) /*_.VALROUT___V1683*/ meltfptr[1682])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_LET__V77*/ meltfptr[76]); MELT_LOCATION ("warmelt-normal.melt:2872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1683*/ meltfptr[1682])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1508__NORMEXP_LET#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1683*/ meltfptr[1682])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:2872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1683*/ meltfptr[1682])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1508__NORMEXP_LET#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1683*/ meltfptr[1682])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:2872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1683*/ meltfptr[1682])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1508__NORMEXP_LET#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1683*/ meltfptr[1682])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:2872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1683*/ meltfptr[1682])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1508__NORMEXP_LET#4", NULL != ( /*_.FRESH_ENV__V70*/ meltfptr[69])); ((meltroutine_ptr_t) /*_.VALROUT___V1683*/ meltfptr[1682])->tabval[4] = (melt_ptr_t) ( /*_.FRESH_ENV__V70*/ meltfptr[69]); MELT_LOCATION ("warmelt-normal.melt:2872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1683*/ meltfptr[1682])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1508__NORMEXP_LET#5", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1683*/ meltfptr[1682])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:2872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1683*/ meltfptr[1682])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1508__NORMEXP_LET#6", NULL != ( /*_.MULTIPLE_EVERY__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1683*/ meltfptr[1682])->tabval[6] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-normal.melt:2872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1683*/ meltfptr[1682])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1508__NORMEXP_LET#7", NULL != ( /*_.CLASS_SOURCE_LET_BINDING__V78*/ meltfptr[77])); ((meltroutine_ptr_t) /*_.VALROUT___V1683*/ meltfptr[1682])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_SOURCE_LET_BINDING__V78*/ meltfptr[77]); MELT_LOCATION ("warmelt-normal.melt:2872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1683*/ meltfptr[1682])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1508__NORMEXP_LET#8", NULL != ( /*_.CLASS_CTYPE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V1683*/ meltfptr[1682])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normal.melt:2872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1683*/ meltfptr[1682])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1508__NORMEXP_LET#9", NULL != ( /*_.FIND_ENV__V48*/ meltfptr[47])); ((meltroutine_ptr_t) /*_.VALROUT___V1683*/ meltfptr[1682])->tabval[9] = (melt_ptr_t) ( /*_.FIND_ENV__V48*/ meltfptr[47]); MELT_LOCATION ("warmelt-normal.melt:2872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1683*/ meltfptr[1682])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1508__NORMEXP_LET#10", NULL != ( /*_.CLASS_NAMED__V24*/ meltfptr[23])); ((meltroutine_ptr_t) /*_.VALROUT___V1683*/ meltfptr[1682])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_NAMED__V24*/ meltfptr[23]); MELT_LOCATION ("warmelt-normal.melt:2872:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1683*/ meltfptr[1682])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V1683*/ meltfptr[1682])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:2872:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1683*/ meltfptr[1682])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V1683*/ meltfptr[1682])->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-normal.melt:2872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1683*/ meltfptr[1682])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1508__NORMEXP_LET#13", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1683*/ meltfptr[1682])->tabval[13] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:2872:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1683*/ meltfptr[1682])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1683*/ meltfptr[1682])->tabval[14] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:2872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1683*/ meltfptr[1682])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1508__NORMEXP_LET#15", NULL != ( /*_.LIST_EVERY__V34*/ meltfptr[33])); ((meltroutine_ptr_t) /*_.VALROUT___V1683*/ meltfptr[1682])->tabval[15] = (melt_ptr_t) ( /*_.LIST_EVERY__V34*/ meltfptr[33]); MELT_LOCATION ("warmelt-normal.melt:2872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1683*/ meltfptr[1682])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1508__NORMEXP_LET#16", NULL != ( /*_.PUT_ENV__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V1683*/ meltfptr[1682])->tabval[16] = (melt_ptr_t) ( /*_.PUT_ENV__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normal.melt:2872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1683*/ meltfptr[1682])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1508__NORMEXP_LET#17", NULL != ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V1683*/ meltfptr[1682])->tabval[17] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normal.melt:2885:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1684*/ meltfptr[1683])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1512__LAMBDA_#0", NULL != ( /*_.CLASS_SOURCE_LET_BINDING__V78*/ meltfptr[77])); ((meltroutine_ptr_t) /*_.VALROUT___V1684*/ meltfptr[1683])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_LET_BINDING__V78*/ meltfptr[77]); MELT_LOCATION ("warmelt-normal.melt:2885:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1684*/ meltfptr[1683])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1512__LAMBDA_#1", NULL != ( /*_.CLASS_CTYPE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V1684*/ meltfptr[1683])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normal.melt:2885:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1684*/ meltfptr[1683])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1512__LAMBDA_#2", NULL != ( /*_.FIND_ENV__V48*/ meltfptr[47])); ((meltroutine_ptr_t) /*_.VALROUT___V1684*/ meltfptr[1683])->tabval[2] = (melt_ptr_t) ( /*_.FIND_ENV__V48*/ meltfptr[47]); MELT_LOCATION ("warmelt-normal.melt:2885:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1684*/ meltfptr[1683])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1512__LAMBDA_#3", NULL != ( /*_.CLASS_NAMED__V24*/ meltfptr[23])); ((meltroutine_ptr_t) /*_.VALROUT___V1684*/ meltfptr[1683])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NAMED__V24*/ meltfptr[23]); MELT_LOCATION ("warmelt-normal.melt:2885:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1684*/ meltfptr[1683])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V1684*/ meltfptr[1683])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:2885:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1684*/ meltfptr[1683])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V1684*/ meltfptr[1683])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-normal.melt:2885:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1684*/ meltfptr[1683])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1512__LAMBDA_#6", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1684*/ meltfptr[1683])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:2885:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1684*/ meltfptr[1683])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1684*/ meltfptr[1683])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:2885:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1684*/ meltfptr[1683])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1512__LAMBDA_#8", NULL != ( /*_.LIST_EVERY__V34*/ meltfptr[33])); ((meltroutine_ptr_t) /*_.VALROUT___V1684*/ meltfptr[1683])->tabval[8] = (melt_ptr_t) ( /*_.LIST_EVERY__V34*/ meltfptr[33]); MELT_LOCATION ("warmelt-normal.melt:2885:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1684*/ meltfptr[1683])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1512__LAMBDA_#9", NULL != ( /*_.VALROUT___V1685*/ meltfptr[1684])); ((meltroutine_ptr_t) /*_.VALROUT___V1684*/ meltfptr[1683])->tabval[9] = (melt_ptr_t) ( /*_.VALROUT___V1685*/ meltfptr[1684]); MELT_LOCATION ("warmelt-normal.melt:2885:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1684*/ meltfptr[1683])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1512__LAMBDA_#10", NULL != ( /*_.PUT_ENV__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V1684*/ meltfptr[1683])->tabval[10] = (melt_ptr_t) ( /*_.PUT_ENV__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normal.melt:2885:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1684*/ meltfptr[1683])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1512__LAMBDA_#11", NULL != ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V1684*/ meltfptr[1683])->tabval[11] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normal.melt:2885:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1684*/ meltfptr[1683]); MELT_LOCATION ("warmelt-normal.melt:2872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1683*/ meltfptr[1682])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1508__NORMEXP_LET#18", NULL != ( /*_.VALROUT___V1684*/ meltfptr[1683])); ((meltroutine_ptr_t) /*_.VALROUT___V1683*/ meltfptr[1682])->tabval[18] = (melt_ptr_t) ( /*_.VALROUT___V1684*/ meltfptr[1683]); MELT_LOCATION ("warmelt-normal.melt:2872:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1683*/ meltfptr[1682])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1508*/ meltfptr[1507]); ((meltroutine_ptr_t) /*_.VALROUT___V1683*/ meltfptr[1682])->tabval[19] = (melt_ptr_t) ( /*_.VALCLO___V1508*/ meltfptr[1507]); MELT_LOCATION ("warmelt-normal.melt:2872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1683*/ meltfptr[1682])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1508__NORMEXP_LET#20", NULL != ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V1683*/ meltfptr[1682])->tabval[20] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normal.melt:2872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1683*/ meltfptr[1682])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1508__NORMEXP_LET#21", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1683*/ meltfptr[1682])->tabval[21] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:2872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1683*/ meltfptr[1682])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1508__NORMEXP_LET#22", NULL != ( /*_.CTYPE_VOID__V57*/ meltfptr[56])); ((meltroutine_ptr_t) /*_.VALROUT___V1683*/ meltfptr[1682])->tabval[22] = (melt_ptr_t) ( /*_.CTYPE_VOID__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-normal.melt:2872:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1683*/ meltfptr[1682])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V1683*/ meltfptr[1682])->tabval[23] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-normal.melt:2872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1683*/ meltfptr[1682])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1508__NORMEXP_LET#24", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1683*/ meltfptr[1682])->tabval[24] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1686*/ meltfptr[1685])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1686*/ meltfptr[1685])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1686*/ meltfptr[1685]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1687*/ meltfptr[1686]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1686*/ meltfptr[1685]); melt_dbgtrace_written_object ( /*_.VALDATA___V1686*/ meltfptr[1685], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:2872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1683*/ meltfptr[1682])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1508__NORMEXP_LET#25", NULL != ( /*_.VALDATA___V1686*/ meltfptr[1685])); ((meltroutine_ptr_t) /*_.VALROUT___V1683*/ meltfptr[1682])->tabval[25] = (melt_ptr_t) ( /*_.VALDATA___V1686*/ meltfptr[1685]); MELT_LOCATION ("warmelt-normal.melt:2872:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1683*/ meltfptr[1682])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V294*/ meltfptr[293]); ((meltroutine_ptr_t) /*_.VALROUT___V1683*/ meltfptr[1682])->tabval[26] = (melt_ptr_t) ( /*_.VALDATA___V294*/ meltfptr[293]); MELT_LOCATION ("warmelt-normal.melt:2872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1683*/ meltfptr[1682])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1508__NORMEXP_LET#27", NULL != ( /*_.LIST_TO_MULTIPLE__V36*/ meltfptr[35])); ((meltroutine_ptr_t) /*_.VALROUT___V1683*/ meltfptr[1682])->tabval[27] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V36*/ meltfptr[35]); MELT_LOCATION ("warmelt-normal.melt:2872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1683*/ meltfptr[1682])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1508__NORMEXP_LET#28", NULL != ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1683*/ meltfptr[1682])->tabval[28] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-normal.melt:2872:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1683*/ meltfptr[1682])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1683*/ meltfptr[1682])->tabval[29] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:2872:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1683*/ meltfptr[1682]); /*putclosurout#44 */ melt_assertmsg ("putclosrout#44 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1688*/ meltfptr[1687])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#44 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1683*/ meltfptr[1682])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1688*/ meltfptr[1687])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1683*/ meltfptr[1682]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1688*/ meltfptr[1687]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1689*/ meltfptr[1688])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1689*/ meltfptr[1688])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1689*/ meltfptr[1688]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1690*/ meltfptr[1689]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1689*/ meltfptr[1688]); melt_dbgtrace_written_object ( /*_.VALDATA___V1689*/ meltfptr[1688], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1691*/ meltfptr[1690])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1691*/ meltfptr[1690])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1691*/ meltfptr[1690]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1692*/ meltfptr[1691]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1691*/ meltfptr[1690]); melt_dbgtrace_written_object ( /*_.VALDATA___V1691*/ meltfptr[1690], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:3013:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1693*/ meltfptr[1692])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1518__LAMBDA_#0", NULL != ( /*_.CTYPE_VOID__V57*/ meltfptr[56])); ((meltroutine_ptr_t) /*_.VALROUT___V1693*/ meltfptr[1692])->tabval[0] = (melt_ptr_t) ( /*_.CTYPE_VOID__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-normal.melt:3013:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1693*/ meltfptr[1692])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V1693*/ meltfptr[1692])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-normal.melt:3013:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1693*/ meltfptr[1692]); MELT_LOCATION ("warmelt-normal.melt:3022:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1694*/ meltfptr[1693])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1519__NORMEXP_UNSAFE_GET_FIELD#0", NULL != ( /*_.CLASS_SOURCE_UNSAFE_GET_FIELD__V79*/ meltfptr[78])); ((meltroutine_ptr_t) /*_.VALROUT___V1694*/ meltfptr[1693])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_UNSAFE_GET_FIELD__V79*/ meltfptr[78]); MELT_LOCATION ("warmelt-normal.melt:3022:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1694*/ meltfptr[1693])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1519__NORMEXP_UNSAFE_GET_FIELD#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1694*/ meltfptr[1693])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:3022:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1694*/ meltfptr[1693])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1519__NORMEXP_UNSAFE_GET_FIELD#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1694*/ meltfptr[1693])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:3022:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1694*/ meltfptr[1693])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1519__NORMEXP_UNSAFE_GET_FIELD#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1694*/ meltfptr[1693])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:3022:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1694*/ meltfptr[1693])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1519__NORMEXP_UNSAFE_GET_FIELD#4", NULL != ( /*_.CLASS_FIELD__V80*/ meltfptr[79])); ((meltroutine_ptr_t) /*_.VALROUT___V1694*/ meltfptr[1693])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_FIELD__V80*/ meltfptr[79]); MELT_LOCATION ("warmelt-normal.melt:3022:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1694*/ meltfptr[1693])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V1694*/ meltfptr[1693])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:3022:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1694*/ meltfptr[1693])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1519__NORMEXP_UNSAFE_GET_FIELD#6", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1694*/ meltfptr[1693])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:3022:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1694*/ meltfptr[1693])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1519__NORMEXP_UNSAFE_GET_FIELD#7", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1694*/ meltfptr[1693])->tabval[7] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-normal.melt:3022:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1694*/ meltfptr[1693])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1519__NORMEXP_UNSAFE_GET_FIELD#8", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1694*/ meltfptr[1693])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:3022:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1694*/ meltfptr[1693])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1519__NORMEXP_UNSAFE_GET_FIELD#9", NULL != ( /*_.CTYPE_VALUE__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V1694*/ meltfptr[1693])->tabval[9] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normal.melt:3022:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1694*/ meltfptr[1693])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V478*/ meltfptr[477]); ((meltroutine_ptr_t) /*_.VALROUT___V1694*/ meltfptr[1693])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V478*/ meltfptr[477]); MELT_LOCATION ("warmelt-normal.melt:3022:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1694*/ meltfptr[1693])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1694*/ meltfptr[1693])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:3022:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1694*/ meltfptr[1693]); /*putclosurout#45 */ melt_assertmsg ("putclosrout#45 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1695*/ meltfptr[1694])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#45 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1694*/ meltfptr[1693])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1695*/ meltfptr[1694])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1694*/ meltfptr[1693]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1695*/ meltfptr[1694]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1696*/ meltfptr[1695])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1696*/ meltfptr[1695])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1696*/ meltfptr[1695]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1697*/ meltfptr[1696]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1696*/ meltfptr[1695]); melt_dbgtrace_written_object ( /*_.VALDATA___V1696*/ meltfptr[1695], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:3059:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1698*/ meltfptr[1697])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1523__NORMEXP_GET_FIELD#0", NULL != ( /*_.CLASS_SOURCE_GET_FIELD__V81*/ meltfptr[80])); ((meltroutine_ptr_t) /*_.VALROUT___V1698*/ meltfptr[1697])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_GET_FIELD__V81*/ meltfptr[80]); MELT_LOCATION ("warmelt-normal.melt:3059:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1698*/ meltfptr[1697])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1523__NORMEXP_GET_FIELD#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1698*/ meltfptr[1697])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:3059:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1698*/ meltfptr[1697])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1523__NORMEXP_GET_FIELD#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1698*/ meltfptr[1697])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:3059:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1698*/ meltfptr[1697])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1523__NORMEXP_GET_FIELD#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1698*/ meltfptr[1697])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:3059:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1698*/ meltfptr[1697])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1523__NORMEXP_GET_FIELD#4", NULL != ( /*_.CLASS_FIELD__V80*/ meltfptr[79])); ((meltroutine_ptr_t) /*_.VALROUT___V1698*/ meltfptr[1697])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_FIELD__V80*/ meltfptr[79]); MELT_LOCATION ("warmelt-normal.melt:3059:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1698*/ meltfptr[1697])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V1698*/ meltfptr[1697])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:3059:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1698*/ meltfptr[1697])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1523__NORMEXP_GET_FIELD#6", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1698*/ meltfptr[1697])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:3059:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1698*/ meltfptr[1697])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1523__NORMEXP_GET_FIELD#7", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1698*/ meltfptr[1697])->tabval[7] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-normal.melt:3059:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1698*/ meltfptr[1697])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V478*/ meltfptr[477]); ((meltroutine_ptr_t) /*_.VALROUT___V1698*/ meltfptr[1697])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V478*/ meltfptr[477]); MELT_LOCATION ("warmelt-normal.melt:3059:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1698*/ meltfptr[1697])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1523__NORMEXP_GET_FIELD#9", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1698*/ meltfptr[1697])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:3059:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1698*/ meltfptr[1697])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1523__NORMEXP_GET_FIELD#10", NULL != ( /*_.CTYPE_VALUE__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V1698*/ meltfptr[1697])->tabval[10] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normal.melt:3059:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1698*/ meltfptr[1697])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V364*/ meltfptr[363]); ((meltroutine_ptr_t) /*_.VALROUT___V1698*/ meltfptr[1697])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V364*/ meltfptr[363]); MELT_LOCATION ("warmelt-normal.melt:3059:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1698*/ meltfptr[1697])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1698*/ meltfptr[1697])->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:3059:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1698*/ meltfptr[1697]); /*putclosurout#46 */ melt_assertmsg ("putclosrout#46 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1699*/ meltfptr[1698])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#46 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1698*/ meltfptr[1697])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1699*/ meltfptr[1698])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1698*/ meltfptr[1697]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1699*/ meltfptr[1698]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1700*/ meltfptr[1699])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1700*/ meltfptr[1699])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1700*/ meltfptr[1699]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1701*/ meltfptr[1700]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1700*/ meltfptr[1699]); melt_dbgtrace_written_object ( /*_.VALDATA___V1700*/ meltfptr[1699], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:3109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1702*/ meltfptr[1701])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1527__NORMEXP_UNSAFE_PUT_FIELDS#0", NULL != ( /*_.CLASS_SOURCE_UNSAFE_PUT_FIELDS__V82*/ meltfptr[81])); ((meltroutine_ptr_t) /*_.VALROUT___V1702*/ meltfptr[1701])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_UNSAFE_PUT_FIELDS__V82*/ meltfptr[81]); MELT_LOCATION ("warmelt-normal.melt:3109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1702*/ meltfptr[1701])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1527__NORMEXP_UNSAFE_PUT_FIELDS#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1702*/ meltfptr[1701])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:3109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1702*/ meltfptr[1701])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1527__NORMEXP_UNSAFE_PUT_FIELDS#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1702*/ meltfptr[1701])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:3109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1702*/ meltfptr[1701])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1527__NORMEXP_UNSAFE_PUT_FIELDS#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1702*/ meltfptr[1701])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:3109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1702*/ meltfptr[1701])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1527__NORMEXP_UNSAFE_PUT_FIELDS#4", NULL != ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1702*/ meltfptr[1701])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-normal.melt:3109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1702*/ meltfptr[1701])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1527__NORMEXP_UNSAFE_PUT_FIELDS#5", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1702*/ meltfptr[1701])->tabval[5] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1703*/ meltfptr[1702])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1703*/ meltfptr[1702])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1703*/ meltfptr[1702]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1704*/ meltfptr[1703]); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_30 */ void meltmod__warmelt_normal__initialmeltchunk_31 (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___V1703*/ meltfptr[1702]); melt_dbgtrace_written_object ( /*_.VALDATA___V1703*/ meltfptr[1702], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:3109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1702*/ meltfptr[1701])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1527__NORMEXP_UNSAFE_PUT_FIELDS#6", NULL != ( /*_.VALDATA___V1703*/ meltfptr[1702])); ((meltroutine_ptr_t) /*_.VALROUT___V1702*/ meltfptr[1701])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1703*/ meltfptr[1702]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1705*/ meltfptr[1704])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1705*/ meltfptr[1704])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1705*/ meltfptr[1704]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1706*/ meltfptr[1705]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1705*/ meltfptr[1704]); melt_dbgtrace_written_object ( /*_.VALDATA___V1705*/ meltfptr[1704], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:3109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1702*/ meltfptr[1701])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1527__NORMEXP_UNSAFE_PUT_FIELDS#7", NULL != ( /*_.VALDATA___V1705*/ meltfptr[1704])); ((meltroutine_ptr_t) /*_.VALROUT___V1702*/ meltfptr[1701])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V1705*/ meltfptr[1704]); MELT_LOCATION ("warmelt-normal.melt:3109:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1702*/ meltfptr[1701])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V472*/ meltfptr[471]); ((meltroutine_ptr_t) /*_.VALROUT___V1702*/ meltfptr[1701])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471]); MELT_LOCATION ("warmelt-normal.melt:3109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1702*/ meltfptr[1701])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1527__NORMEXP_UNSAFE_PUT_FIELDS#9", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1702*/ meltfptr[1701])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:3109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1702*/ meltfptr[1701])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1527__NORMEXP_UNSAFE_PUT_FIELDS#10", NULL != ( /*_.CTYPE_VOID__V57*/ meltfptr[56])); ((meltroutine_ptr_t) /*_.VALROUT___V1702*/ meltfptr[1701])->tabval[10] = (melt_ptr_t) ( /*_.CTYPE_VOID__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-normal.melt:3109:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1702*/ meltfptr[1701])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1702*/ meltfptr[1701])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:3109:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1702*/ meltfptr[1701])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V1702*/ meltfptr[1701])->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:3109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1702*/ meltfptr[1701])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1527__NORMEXP_UNSAFE_PUT_FIELDS#13", NULL != ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V1702*/ meltfptr[1701])->tabval[13] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normal.melt:3109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1702*/ meltfptr[1701])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1527__NORMEXP_UNSAFE_PUT_FIELDS#14", NULL != ( /*_.MULTIPLE_EVERY__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1702*/ meltfptr[1701])->tabval[14] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-normal.melt:3109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1702*/ meltfptr[1701])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1527__NORMEXP_UNSAFE_PUT_FIELDS#15", NULL != ( /*_.CLASS_SOURCE_FIELDASSIGN__V83*/ meltfptr[82])); ((meltroutine_ptr_t) /*_.VALROUT___V1702*/ meltfptr[1701])->tabval[15] = (melt_ptr_t) ( /*_.CLASS_SOURCE_FIELDASSIGN__V83*/ meltfptr[82]); MELT_LOCATION ("warmelt-normal.melt:3109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1702*/ meltfptr[1701])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1527__NORMEXP_UNSAFE_PUT_FIELDS#16", NULL != ( /*_.CLASS_FIELD__V80*/ meltfptr[79])); ((meltroutine_ptr_t) /*_.VALROUT___V1702*/ meltfptr[1701])->tabval[16] = (melt_ptr_t) ( /*_.CLASS_FIELD__V80*/ meltfptr[79]); MELT_LOCATION ("warmelt-normal.melt:3109:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1702*/ meltfptr[1701])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V1702*/ meltfptr[1701])->tabval[17] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:3109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1702*/ meltfptr[1701])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1527__NORMEXP_UNSAFE_PUT_FIELDS#18", NULL != ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V1702*/ meltfptr[1701])->tabval[18] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normal.melt:3109:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1702*/ meltfptr[1701])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V576*/ meltfptr[575]); ((meltroutine_ptr_t) /*_.VALROUT___V1702*/ meltfptr[1701])->tabval[19] = (melt_ptr_t) ( /*_.VALDATA___V576*/ meltfptr[575]); MELT_LOCATION ("warmelt-normal.melt:3109:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1702*/ meltfptr[1701])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V1702*/ meltfptr[1701])->tabval[20] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-normal.melt:3109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1702*/ meltfptr[1701])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1527__NORMEXP_UNSAFE_PUT_FIELDS#21", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1702*/ meltfptr[1701])->tabval[21] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:3109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1702*/ meltfptr[1701])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1527__NORMEXP_UNSAFE_PUT_FIELDS#22", NULL != ( /*_.CTYPE_VALUE__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V1702*/ meltfptr[1701])->tabval[22] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normal.melt:3109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1702*/ meltfptr[1701])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1527__NORMEXP_UNSAFE_PUT_FIELDS#23", NULL != ( /*_.CLASS_NAMED__V24*/ meltfptr[23])); ((meltroutine_ptr_t) /*_.VALROUT___V1702*/ meltfptr[1701])->tabval[23] = (melt_ptr_t) ( /*_.CLASS_NAMED__V24*/ meltfptr[23]); MELT_LOCATION ("warmelt-normal.melt:3146:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1707*/ meltfptr[1706])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1535__LAMBDA_#0", NULL != ( /*_.CLASS_SOURCE_FIELDASSIGN__V83*/ meltfptr[82])); ((meltroutine_ptr_t) /*_.VALROUT___V1707*/ meltfptr[1706])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_FIELDASSIGN__V83*/ meltfptr[82]); MELT_LOCATION ("warmelt-normal.melt:3146:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1707*/ meltfptr[1706])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1535__LAMBDA_#1", NULL != ( /*_.CLASS_FIELD__V80*/ meltfptr[79])); ((meltroutine_ptr_t) /*_.VALROUT___V1707*/ meltfptr[1706])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_FIELD__V80*/ meltfptr[79]); MELT_LOCATION ("warmelt-normal.melt:3146:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1707*/ meltfptr[1706])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V1707*/ meltfptr[1706])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:3146:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1707*/ meltfptr[1706])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1535__LAMBDA_#3", NULL != ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V1707*/ meltfptr[1706])->tabval[3] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normal.melt:3146:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1707*/ meltfptr[1706])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V576*/ meltfptr[575]); ((meltroutine_ptr_t) /*_.VALROUT___V1707*/ meltfptr[1706])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V576*/ meltfptr[575]); MELT_LOCATION ("warmelt-normal.melt:3146:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1707*/ meltfptr[1706])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V1707*/ meltfptr[1706])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-normal.melt:3146:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1707*/ meltfptr[1706])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1535__LAMBDA_#6", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1707*/ meltfptr[1706])->tabval[6] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:3146:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1707*/ meltfptr[1706])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1535__LAMBDA_#7", NULL != ( /*_.CTYPE_VALUE__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V1707*/ meltfptr[1706])->tabval[7] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normal.melt:3146:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1707*/ meltfptr[1706])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1535__LAMBDA_#8", NULL != ( /*_.CLASS_NAMED__V24*/ meltfptr[23])); ((meltroutine_ptr_t) /*_.VALROUT___V1707*/ meltfptr[1706])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_NAMED__V24*/ meltfptr[23]); MELT_LOCATION ("warmelt-normal.melt:3146:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1707*/ meltfptr[1706]); MELT_LOCATION ("warmelt-normal.melt:3109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1702*/ meltfptr[1701])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1527__NORMEXP_UNSAFE_PUT_FIELDS#24", NULL != ( /*_.VALROUT___V1707*/ meltfptr[1706])); ((meltroutine_ptr_t) /*_.VALROUT___V1702*/ meltfptr[1701])->tabval[24] = (melt_ptr_t) ( /*_.VALROUT___V1707*/ meltfptr[1706]); MELT_LOCATION ("warmelt-normal.melt:3109:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1702*/ meltfptr[1701])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V492*/ meltfptr[491]); ((meltroutine_ptr_t) /*_.VALROUT___V1702*/ meltfptr[1701])->tabval[25] = (melt_ptr_t) ( /*_.VALDATA___V492*/ meltfptr[491]); MELT_LOCATION ("warmelt-normal.melt:3109:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1702*/ meltfptr[1701]); /*putclosurout#47 */ melt_assertmsg ("putclosrout#47 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1708*/ meltfptr[1707])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#47 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1702*/ meltfptr[1701])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1708*/ meltfptr[1707])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1702*/ meltfptr[1701]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1708*/ meltfptr[1707]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1709*/ meltfptr[1708])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1709*/ meltfptr[1708])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1709*/ meltfptr[1708]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1710*/ meltfptr[1709]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1709*/ meltfptr[1708]); melt_dbgtrace_written_object ( /*_.VALDATA___V1709*/ meltfptr[1708], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1711*/ meltfptr[1710])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1711*/ meltfptr[1710])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1711*/ meltfptr[1710]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1712*/ meltfptr[1711]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1711*/ meltfptr[1710]); melt_dbgtrace_written_object ( /*_.VALDATA___V1711*/ meltfptr[1710], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:3181:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1713*/ meltfptr[1712])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1538__LAMBDA_#0", NULL != ( /*_.CTYPE_VOID__V57*/ meltfptr[56])); ((meltroutine_ptr_t) /*_.VALROUT___V1713*/ meltfptr[1712])->tabval[0] = (melt_ptr_t) ( /*_.CTYPE_VOID__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-normal.melt:3181:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1713*/ meltfptr[1712]); MELT_LOCATION ("warmelt-normal.melt:3185:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1714*/ meltfptr[1713])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1539__NORMEXP_PUT_FIELDS#0", NULL != ( /*_.CLASS_SOURCE_PUT_FIELDS__V84*/ meltfptr[83])); ((meltroutine_ptr_t) /*_.VALROUT___V1714*/ meltfptr[1713])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PUT_FIELDS__V84*/ meltfptr[83]); MELT_LOCATION ("warmelt-normal.melt:3185:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1714*/ meltfptr[1713])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1539__NORMEXP_PUT_FIELDS#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1714*/ meltfptr[1713])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:3185:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1714*/ meltfptr[1713])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1539__NORMEXP_PUT_FIELDS#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1714*/ meltfptr[1713])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:3185:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1714*/ meltfptr[1713])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1539__NORMEXP_PUT_FIELDS#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1714*/ meltfptr[1713])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:3185:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1714*/ meltfptr[1713])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1539__NORMEXP_PUT_FIELDS#4", NULL != ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1714*/ meltfptr[1713])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-normal.melt:3185:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1714*/ meltfptr[1713])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1539__NORMEXP_PUT_FIELDS#5", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1714*/ meltfptr[1713])->tabval[5] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1715*/ meltfptr[1714])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1715*/ meltfptr[1714])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1715*/ meltfptr[1714]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1716*/ meltfptr[1715]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1715*/ meltfptr[1714]); melt_dbgtrace_written_object ( /*_.VALDATA___V1715*/ meltfptr[1714], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:3185:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1714*/ meltfptr[1713])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1539__NORMEXP_PUT_FIELDS#6", NULL != ( /*_.VALDATA___V1715*/ meltfptr[1714])); ((meltroutine_ptr_t) /*_.VALROUT___V1714*/ meltfptr[1713])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1715*/ meltfptr[1714]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1717*/ meltfptr[1716])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1717*/ meltfptr[1716])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1717*/ meltfptr[1716]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1718*/ meltfptr[1717]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1717*/ meltfptr[1716]); melt_dbgtrace_written_object ( /*_.VALDATA___V1717*/ meltfptr[1716], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:3185:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1714*/ meltfptr[1713])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1539__NORMEXP_PUT_FIELDS#7", NULL != ( /*_.VALDATA___V1717*/ meltfptr[1716])); ((meltroutine_ptr_t) /*_.VALROUT___V1714*/ meltfptr[1713])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V1717*/ meltfptr[1716]); MELT_LOCATION ("warmelt-normal.melt:3185:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1714*/ meltfptr[1713])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V472*/ meltfptr[471]); ((meltroutine_ptr_t) /*_.VALROUT___V1714*/ meltfptr[1713])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471]); MELT_LOCATION ("warmelt-normal.melt:3185:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1714*/ meltfptr[1713])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1539__NORMEXP_PUT_FIELDS#9", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1714*/ meltfptr[1713])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:3185:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1714*/ meltfptr[1713])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1539__NORMEXP_PUT_FIELDS#10", NULL != ( /*_.CTYPE_VOID__V57*/ meltfptr[56])); ((meltroutine_ptr_t) /*_.VALROUT___V1714*/ meltfptr[1713])->tabval[10] = (melt_ptr_t) ( /*_.CTYPE_VOID__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-normal.melt:3185:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1714*/ meltfptr[1713])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1714*/ meltfptr[1713])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:3185:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1714*/ meltfptr[1713])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1539__NORMEXP_PUT_FIELDS#12", NULL != ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1714*/ meltfptr[1713])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normal.melt:3185:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1714*/ meltfptr[1713])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V1714*/ meltfptr[1713])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:3185:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1714*/ meltfptr[1713])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1539__NORMEXP_PUT_FIELDS#14", NULL != ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V1714*/ meltfptr[1713])->tabval[14] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normal.melt:3185:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1714*/ meltfptr[1713])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1539__NORMEXP_PUT_FIELDS#15", NULL != ( /*_.CLASS_SOURCE_FIELDASSIGN__V83*/ meltfptr[82])); ((meltroutine_ptr_t) /*_.VALROUT___V1714*/ meltfptr[1713])->tabval[15] = (melt_ptr_t) ( /*_.CLASS_SOURCE_FIELDASSIGN__V83*/ meltfptr[82]); MELT_LOCATION ("warmelt-normal.melt:3185:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1714*/ meltfptr[1713])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1539__NORMEXP_PUT_FIELDS#16", NULL != ( /*_.CLASS_FIELD__V80*/ meltfptr[79])); ((meltroutine_ptr_t) /*_.VALROUT___V1714*/ meltfptr[1713])->tabval[16] = (melt_ptr_t) ( /*_.CLASS_FIELD__V80*/ meltfptr[79]); MELT_LOCATION ("warmelt-normal.melt:3185:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1714*/ meltfptr[1713])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1539__NORMEXP_PUT_FIELDS#17", NULL != ( /*_.CLASS_NAMED__V24*/ meltfptr[23])); ((meltroutine_ptr_t) /*_.VALROUT___V1714*/ meltfptr[1713])->tabval[17] = (melt_ptr_t) ( /*_.CLASS_NAMED__V24*/ meltfptr[23]); MELT_LOCATION ("warmelt-normal.melt:3185:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1714*/ meltfptr[1713])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V576*/ meltfptr[575]); ((meltroutine_ptr_t) /*_.VALROUT___V1714*/ meltfptr[1713])->tabval[18] = (melt_ptr_t) ( /*_.VALDATA___V576*/ meltfptr[575]); MELT_LOCATION ("warmelt-normal.melt:3185:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1714*/ meltfptr[1713])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V1714*/ meltfptr[1713])->tabval[19] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-normal.melt:3185:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1714*/ meltfptr[1713])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1539__NORMEXP_PUT_FIELDS#20", NULL != ( /*_.CTYPE_VALUE__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V1714*/ meltfptr[1713])->tabval[20] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normal.melt:3185:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1714*/ meltfptr[1713])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V492*/ meltfptr[491]); ((meltroutine_ptr_t) /*_.VALROUT___V1714*/ meltfptr[1713])->tabval[21] = (melt_ptr_t) ( /*_.VALDATA___V492*/ meltfptr[491]); MELT_LOCATION ("warmelt-normal.melt:3185:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1714*/ meltfptr[1713])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V364*/ meltfptr[363]); ((meltroutine_ptr_t) /*_.VALROUT___V1714*/ meltfptr[1713])->tabval[22] = (melt_ptr_t) ( /*_.VALDATA___V364*/ meltfptr[363]); MELT_LOCATION ("warmelt-normal.melt:3185:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1714*/ meltfptr[1713]); /*putclosurout#48 */ melt_assertmsg ("putclosrout#48 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1719*/ meltfptr[1718])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#48 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1714*/ meltfptr[1713])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1719*/ meltfptr[1718])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1714*/ meltfptr[1713]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1719*/ meltfptr[1718]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1720*/ meltfptr[1719])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1720*/ meltfptr[1719])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1720*/ meltfptr[1719]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1721*/ meltfptr[1720]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1720*/ meltfptr[1719]); melt_dbgtrace_written_object ( /*_.VALDATA___V1720*/ meltfptr[1719], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:3296:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1722*/ meltfptr[1721])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1547__NORMEXP_SETQ#0", NULL != ( /*_.CLASS_SOURCE_SETQ__V85*/ meltfptr[84])); ((meltroutine_ptr_t) /*_.VALROUT___V1722*/ meltfptr[1721])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_SETQ__V85*/ meltfptr[84]); MELT_LOCATION ("warmelt-normal.melt:3296:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1722*/ meltfptr[1721])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1547__NORMEXP_SETQ#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1722*/ meltfptr[1721])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:3296:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1722*/ meltfptr[1721])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1547__NORMEXP_SETQ#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1722*/ meltfptr[1721])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:3296:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1722*/ meltfptr[1721])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1547__NORMEXP_SETQ#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1722*/ meltfptr[1721])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:3296:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1722*/ meltfptr[1721])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1547__NORMEXP_SETQ#4", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V1722*/ meltfptr[1721])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normal.melt:3296:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1722*/ meltfptr[1721])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1571*/ meltfptr[1570]); ((meltroutine_ptr_t) /*_.VALROUT___V1722*/ meltfptr[1721])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1571*/ meltfptr[1570]); MELT_LOCATION ("warmelt-normal.melt:3296:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1722*/ meltfptr[1721])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V1722*/ meltfptr[1721])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-normal.melt:3296:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1722*/ meltfptr[1721])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1547__NORMEXP_SETQ#7", NULL != ( /*_.CLASS_CTYPE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V1722*/ meltfptr[1721])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normal.melt:3296:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1722*/ meltfptr[1721])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V1722*/ meltfptr[1721])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:3296:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1722*/ meltfptr[1721])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1547__NORMEXP_SETQ#9", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1722*/ meltfptr[1721])->tabval[9] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:3296:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1722*/ meltfptr[1721])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1547__NORMEXP_SETQ#10", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1722*/ meltfptr[1721])->tabval[10] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1723*/ meltfptr[1722])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1723*/ meltfptr[1722])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1723*/ meltfptr[1722]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1724*/ meltfptr[1723]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1723*/ meltfptr[1722]); melt_dbgtrace_written_object ( /*_.VALDATA___V1723*/ meltfptr[1722], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:3296:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1722*/ meltfptr[1721])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1547__NORMEXP_SETQ#11", NULL != ( /*_.VALDATA___V1723*/ meltfptr[1722])); ((meltroutine_ptr_t) /*_.VALROUT___V1722*/ meltfptr[1721])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V1723*/ meltfptr[1722]); MELT_LOCATION ("warmelt-normal.melt:3296:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1722*/ meltfptr[1721])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1547__NORMEXP_SETQ#12", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1722*/ meltfptr[1721])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:3296:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1722*/ meltfptr[1721])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V520*/ meltfptr[519]); ((meltroutine_ptr_t) /*_.VALROUT___V1722*/ meltfptr[1721])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V520*/ meltfptr[519]); MELT_LOCATION ("warmelt-normal.melt:3296:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1722*/ meltfptr[1721])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1722*/ meltfptr[1721])->tabval[14] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:3296:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1722*/ meltfptr[1721]); /*putclosurout#49 */ melt_assertmsg ("putclosrout#49 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1725*/ meltfptr[1724])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#49 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1722*/ meltfptr[1721])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1725*/ meltfptr[1724])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1722*/ meltfptr[1721]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1725*/ meltfptr[1724]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1726*/ meltfptr[1725])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1726*/ meltfptr[1725])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1726*/ meltfptr[1725]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1727*/ meltfptr[1726]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1726*/ meltfptr[1725]); melt_dbgtrace_written_object ( /*_.VALDATA___V1726*/ meltfptr[1725], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:3348:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1728*/ meltfptr[1727])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V1728*/ meltfptr[1727])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-normal.melt:3348:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1728*/ meltfptr[1727]); MELT_LOCATION ("warmelt-normal.melt:3355:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1729*/ meltfptr[1728])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1554__NORMEXP_INSTANCE#0", NULL != ( /*_.CLASS_SOURCE_INSTANCE__V86*/ meltfptr[85])); ((meltroutine_ptr_t) /*_.VALROUT___V1729*/ meltfptr[1728])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_INSTANCE__V86*/ meltfptr[85]); MELT_LOCATION ("warmelt-normal.melt:3355:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1729*/ meltfptr[1728])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1554__NORMEXP_INSTANCE#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1729*/ meltfptr[1728])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:3355:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1729*/ meltfptr[1728])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1554__NORMEXP_INSTANCE#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1729*/ meltfptr[1728])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:3355:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1729*/ meltfptr[1728])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1554__NORMEXP_INSTANCE#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1729*/ meltfptr[1728])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:3355:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1729*/ meltfptr[1728])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1554__NORMEXP_INSTANCE#4", NULL != ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7])); ((meltroutine_ptr_t) /*_.VALROUT___V1729*/ meltfptr[1728])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-normal.melt:3355:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1729*/ meltfptr[1728])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1554__NORMEXP_INSTANCE#5", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V1729*/ meltfptr[1728])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normal.melt:3355:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1729*/ meltfptr[1728])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V1729*/ meltfptr[1728])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:3355:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1729*/ meltfptr[1728])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1554__NORMEXP_INSTANCE#7", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1729*/ meltfptr[1728])->tabval[7] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1730*/ meltfptr[1729])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1730*/ meltfptr[1729])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1730*/ meltfptr[1729]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1731*/ meltfptr[1730]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1730*/ meltfptr[1729]); melt_dbgtrace_written_object ( /*_.VALDATA___V1730*/ meltfptr[1729], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:3355:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1729*/ meltfptr[1728])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1554__NORMEXP_INSTANCE#8", NULL != ( /*_.VALDATA___V1730*/ meltfptr[1729])); ((meltroutine_ptr_t) /*_.VALROUT___V1729*/ meltfptr[1728])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V1730*/ meltfptr[1729]); MELT_LOCATION ("warmelt-normal.melt:3355:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1729*/ meltfptr[1728])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V472*/ meltfptr[471]); ((meltroutine_ptr_t) /*_.VALROUT___V1729*/ meltfptr[1728])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471]); MELT_LOCATION ("warmelt-normal.melt:3355:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1729*/ meltfptr[1728])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1554__NORMEXP_INSTANCE#10", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1729*/ meltfptr[1728])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:3355:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1729*/ meltfptr[1728])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1554__NORMEXP_INSTANCE#11", NULL != ( /*_.CTYPE_VOID__V57*/ meltfptr[56])); ((meltroutine_ptr_t) /*_.VALROUT___V1729*/ meltfptr[1728])->tabval[11] = (melt_ptr_t) ( /*_.CTYPE_VOID__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-normal.melt:3355:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1729*/ meltfptr[1728])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1554__NORMEXP_INSTANCE#12", NULL != ( /*_.CLASS_CLASS__V47*/ meltfptr[46])); ((meltroutine_ptr_t) /*_.VALROUT___V1729*/ meltfptr[1728])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_CLASS__V47*/ meltfptr[46]); MELT_LOCATION ("warmelt-normal.melt:3355:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1729*/ meltfptr[1728])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V176*/ meltfptr[175]); ((meltroutine_ptr_t) /*_.VALROUT___V1729*/ meltfptr[1728])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); MELT_LOCATION ("warmelt-normal.melt:3355:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1729*/ meltfptr[1728])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1554__NORMEXP_INSTANCE#14", NULL != ( /*_.CLASS_NAMED__V24*/ meltfptr[23])); ((meltroutine_ptr_t) /*_.VALROUT___V1729*/ meltfptr[1728])->tabval[14] = (melt_ptr_t) ( /*_.CLASS_NAMED__V24*/ meltfptr[23]); MELT_LOCATION ("warmelt-normal.melt:3355:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1729*/ meltfptr[1728])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1554__NORMEXP_INSTANCE#15", NULL != ( /*_.MULTIPLE_MAP__V33*/ meltfptr[32])); ((meltroutine_ptr_t) /*_.VALROUT___V1729*/ meltfptr[1728])->tabval[15] = (melt_ptr_t) ( /*_.MULTIPLE_MAP__V33*/ meltfptr[32]); MELT_LOCATION ("warmelt-normal.melt:3355:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1729*/ meltfptr[1728])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1554__NORMEXP_INSTANCE#16", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1729*/ meltfptr[1728])->tabval[16] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:3355:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1729*/ meltfptr[1728])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1554__NORMEXP_INSTANCE#17", NULL != ( /*_.CLASS_SOURCE_FIELDASSIGN__V83*/ meltfptr[82])); ((meltroutine_ptr_t) /*_.VALROUT___V1729*/ meltfptr[1728])->tabval[17] = (melt_ptr_t) ( /*_.CLASS_SOURCE_FIELDASSIGN__V83*/ meltfptr[82]); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_31 */ void meltmod__warmelt_normal__initialmeltchunk_32 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-normal.melt:3355:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1729*/ meltfptr[1728])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1554__NORMEXP_INSTANCE#18", NULL != ( /*_.CLASS_FIELD__V80*/ meltfptr[79])); ((meltroutine_ptr_t) /*_.VALROUT___V1729*/ meltfptr[1728])->tabval[18] = (melt_ptr_t) ( /*_.CLASS_FIELD__V80*/ meltfptr[79]); MELT_LOCATION ("warmelt-normal.melt:3355:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1729*/ meltfptr[1728])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1554__NORMEXP_INSTANCE#19", NULL != ( /*_.CLASS_NAMED__V24*/ meltfptr[23])); ((meltroutine_ptr_t) /*_.VALROUT___V1729*/ meltfptr[1728])->tabval[19] = (melt_ptr_t) ( /*_.CLASS_NAMED__V24*/ meltfptr[23]); MELT_LOCATION ("warmelt-normal.melt:3355:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1729*/ meltfptr[1728])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V1729*/ meltfptr[1728])->tabval[20] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:3355:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1729*/ meltfptr[1728])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V1729*/ meltfptr[1728])->tabval[21] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-normal.melt:3355:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1729*/ meltfptr[1728])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1554__NORMEXP_INSTANCE#22", NULL != ( /*_.CTYPE_VALUE__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V1729*/ meltfptr[1728])->tabval[22] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normal.melt:3355:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1729*/ meltfptr[1728])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1554__NORMEXP_INSTANCE#23", NULL != ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V1729*/ meltfptr[1728])->tabval[23] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normal.melt:3355:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1729*/ meltfptr[1728])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V576*/ meltfptr[575]); ((meltroutine_ptr_t) /*_.VALROUT___V1729*/ meltfptr[1728])->tabval[24] = (melt_ptr_t) ( /*_.VALDATA___V576*/ meltfptr[575]); MELT_LOCATION ("warmelt-normal.melt:3393:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1732*/ meltfptr[1731])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1560__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1732*/ meltfptr[1731])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:3393:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1732*/ meltfptr[1731])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1560__LAMBDA_#1", NULL != ( /*_.CLASS_SOURCE_FIELDASSIGN__V83*/ meltfptr[82])); ((meltroutine_ptr_t) /*_.VALROUT___V1732*/ meltfptr[1731])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SOURCE_FIELDASSIGN__V83*/ meltfptr[82]); MELT_LOCATION ("warmelt-normal.melt:3393:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1732*/ meltfptr[1731])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1560__LAMBDA_#2", NULL != ( /*_.CLASS_FIELD__V80*/ meltfptr[79])); ((meltroutine_ptr_t) /*_.VALROUT___V1732*/ meltfptr[1731])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_FIELD__V80*/ meltfptr[79]); MELT_LOCATION ("warmelt-normal.melt:3393:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1732*/ meltfptr[1731])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1560__LAMBDA_#3", NULL != ( /*_.CLASS_NAMED__V24*/ meltfptr[23])); ((meltroutine_ptr_t) /*_.VALROUT___V1732*/ meltfptr[1731])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NAMED__V24*/ meltfptr[23]); MELT_LOCATION ("warmelt-normal.melt:3393:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1732*/ meltfptr[1731])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V1732*/ meltfptr[1731])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:3393:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1732*/ meltfptr[1731])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V1732*/ meltfptr[1731])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-normal.melt:3393:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1732*/ meltfptr[1731])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1560__LAMBDA_#6", NULL != ( /*_.CTYPE_VALUE__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V1732*/ meltfptr[1731])->tabval[6] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normal.melt:3393:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1732*/ meltfptr[1731])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1560__LAMBDA_#7", NULL != ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V1732*/ meltfptr[1731])->tabval[7] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normal.melt:3393:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1732*/ meltfptr[1731])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V576*/ meltfptr[575]); ((meltroutine_ptr_t) /*_.VALROUT___V1732*/ meltfptr[1731])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V576*/ meltfptr[575]); MELT_LOCATION ("warmelt-normal.melt:3393:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1732*/ meltfptr[1731]); MELT_LOCATION ("warmelt-normal.melt:3355:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1729*/ meltfptr[1728])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1554__NORMEXP_INSTANCE#25", NULL != ( /*_.VALROUT___V1732*/ meltfptr[1731])); ((meltroutine_ptr_t) /*_.VALROUT___V1729*/ meltfptr[1728])->tabval[25] = (melt_ptr_t) ( /*_.VALROUT___V1732*/ meltfptr[1731]); MELT_LOCATION ("warmelt-normal.melt:3355:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1729*/ meltfptr[1728])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V590*/ meltfptr[589]); ((meltroutine_ptr_t) /*_.VALROUT___V1729*/ meltfptr[1728])->tabval[26] = (melt_ptr_t) ( /*_.VALDATA___V590*/ meltfptr[589]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1733*/ meltfptr[1732])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1733*/ meltfptr[1732])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1733*/ meltfptr[1732]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1734*/ meltfptr[1733]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1733*/ meltfptr[1732]); melt_dbgtrace_written_object ( /*_.VALDATA___V1733*/ meltfptr[1732], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:3355:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1729*/ meltfptr[1728])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1554__NORMEXP_INSTANCE#27", NULL != ( /*_.VALDATA___V1733*/ meltfptr[1732])); ((meltroutine_ptr_t) /*_.VALROUT___V1729*/ meltfptr[1728])->tabval[27] = (melt_ptr_t) ( /*_.VALDATA___V1733*/ meltfptr[1732]); MELT_LOCATION ("warmelt-normal.melt:3355:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1729*/ meltfptr[1728])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1554__NORMEXP_INSTANCE#28", NULL != ( /*_.CTYPE_VALUE__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V1729*/ meltfptr[1728])->tabval[28] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normal.melt:3355:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1729*/ meltfptr[1728])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1729*/ meltfptr[1728])->tabval[29] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:3355:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1729*/ meltfptr[1728]); /*putclosurout#50 */ melt_assertmsg ("putclosrout#50 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1735*/ meltfptr[1734])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#50 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1729*/ meltfptr[1728])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1735*/ meltfptr[1734])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1729*/ meltfptr[1728]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1735*/ meltfptr[1734]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1736*/ meltfptr[1735])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1736*/ meltfptr[1735])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1736*/ meltfptr[1735]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1737*/ meltfptr[1736]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1736*/ meltfptr[1735]); melt_dbgtrace_written_object ( /*_.VALDATA___V1736*/ meltfptr[1735], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:3467:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1738*/ meltfptr[1737])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1563__LAMBDA_#0", NULL != ( /*_.CTYPE_VALUE__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V1738*/ meltfptr[1737])->tabval[0] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normal.melt:3467:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1738*/ meltfptr[1737]); MELT_LOCATION ("warmelt-normal.melt:3472:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1739*/ meltfptr[1738])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1564__NORMEXP_FOREVER#0", NULL != ( /*_.CLASS_SOURCE_FOREVER__V87*/ meltfptr[86])); ((meltroutine_ptr_t) /*_.VALROUT___V1739*/ meltfptr[1738])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_FOREVER__V87*/ meltfptr[86]); MELT_LOCATION ("warmelt-normal.melt:3472:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1739*/ meltfptr[1738])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1564__NORMEXP_FOREVER#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1739*/ meltfptr[1738])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:3472:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1739*/ meltfptr[1738])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1564__NORMEXP_FOREVER#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1739*/ meltfptr[1738])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:3472:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1739*/ meltfptr[1738])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1564__NORMEXP_FOREVER#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1739*/ meltfptr[1738])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:3472:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1739*/ meltfptr[1738])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1564__NORMEXP_FOREVER#4", NULL != ( /*_.FRESH_ENV__V70*/ meltfptr[69])); ((meltroutine_ptr_t) /*_.VALROUT___V1739*/ meltfptr[1738])->tabval[4] = (melt_ptr_t) ( /*_.FRESH_ENV__V70*/ meltfptr[69]); MELT_LOCATION ("warmelt-normal.melt:3472:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1739*/ meltfptr[1738])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1564__NORMEXP_FOREVER#5", NULL != ( /*_.CLASS_LABEL_BINDING__V88*/ meltfptr[87])); ((meltroutine_ptr_t) /*_.VALROUT___V1739*/ meltfptr[1738])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_LABEL_BINDING__V88*/ meltfptr[87]); MELT_LOCATION ("warmelt-normal.melt:3472:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1739*/ meltfptr[1738])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1564__NORMEXP_FOREVER#6", NULL != ( /*_.PUT_ENV__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V1739*/ meltfptr[1738])->tabval[6] = (melt_ptr_t) ( /*_.PUT_ENV__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normal.melt:3472:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1739*/ meltfptr[1738])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1564__NORMEXP_FOREVER#7", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1739*/ meltfptr[1738])->tabval[7] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-normal.melt:3472:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1739*/ meltfptr[1738])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1564__NORMEXP_FOREVER#8", NULL != ( /*_.CLASS_CLONED_SYMBOL__V55*/ meltfptr[54])); ((meltroutine_ptr_t) /*_.VALROUT___V1739*/ meltfptr[1738])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V55*/ meltfptr[54]); MELT_LOCATION ("warmelt-normal.melt:3472:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1739*/ meltfptr[1738])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1508*/ meltfptr[1507]); ((meltroutine_ptr_t) /*_.VALROUT___V1739*/ meltfptr[1738])->tabval[9] = (melt_ptr_t) ( /*_.VALCLO___V1508*/ meltfptr[1507]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1740*/ meltfptr[1739])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1740*/ meltfptr[1739])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1740*/ meltfptr[1739]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1741*/ meltfptr[1740]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1740*/ meltfptr[1739]); melt_dbgtrace_written_object ( /*_.VALDATA___V1740*/ meltfptr[1739], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:3472:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1739*/ meltfptr[1738])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1564__NORMEXP_FOREVER#10", NULL != ( /*_.VALDATA___V1740*/ meltfptr[1739])); ((meltroutine_ptr_t) /*_.VALROUT___V1739*/ meltfptr[1738])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V1740*/ meltfptr[1739]); MELT_LOCATION ("warmelt-normal.melt:3472:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1739*/ meltfptr[1738])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V472*/ meltfptr[471]); ((meltroutine_ptr_t) /*_.VALROUT___V1739*/ meltfptr[1738])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471]); MELT_LOCATION ("warmelt-normal.melt:3472:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1739*/ meltfptr[1738])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1564__NORMEXP_FOREVER#12", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1739*/ meltfptr[1738])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:3472:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1739*/ meltfptr[1738])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1564__NORMEXP_FOREVER#13", NULL != ( /*_.CTYPE_VOID__V57*/ meltfptr[56])); ((meltroutine_ptr_t) /*_.VALROUT___V1739*/ meltfptr[1738])->tabval[13] = (melt_ptr_t) ( /*_.CTYPE_VOID__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-normal.melt:3472:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1739*/ meltfptr[1738])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1564__NORMEXP_FOREVER#14", NULL != ( /*_.LABIND_CLONSY__V89*/ meltfptr[88])); ((meltroutine_ptr_t) /*_.VALROUT___V1739*/ meltfptr[1738])->tabval[14] = (melt_ptr_t) ( /*_.LABIND_CLONSY__V89*/ meltfptr[88]); MELT_LOCATION ("warmelt-normal.melt:3472:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1739*/ meltfptr[1738])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1522*/ meltfptr[1521]); ((meltroutine_ptr_t) /*_.VALROUT___V1739*/ meltfptr[1738])->tabval[15] = (melt_ptr_t) ( /*_.VALCLO___V1522*/ meltfptr[1521]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1742*/ meltfptr[1741])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1742*/ meltfptr[1741])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1742*/ meltfptr[1741]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1743*/ meltfptr[1742]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1742*/ meltfptr[1741]); melt_dbgtrace_written_object ( /*_.VALDATA___V1742*/ meltfptr[1741], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:3472:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1739*/ meltfptr[1738])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1564__NORMEXP_FOREVER#16", NULL != ( /*_.VALDATA___V1742*/ meltfptr[1741])); ((meltroutine_ptr_t) /*_.VALROUT___V1739*/ meltfptr[1738])->tabval[16] = (melt_ptr_t) ( /*_.VALDATA___V1742*/ meltfptr[1741]); MELT_LOCATION ("warmelt-normal.melt:3472:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1739*/ meltfptr[1738])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V534*/ meltfptr[533]); ((meltroutine_ptr_t) /*_.VALROUT___V1739*/ meltfptr[1738])->tabval[17] = (melt_ptr_t) ( /*_.VALDATA___V534*/ meltfptr[533]); MELT_LOCATION ("warmelt-normal.melt:3472:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1739*/ meltfptr[1738])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1564__NORMEXP_FOREVER#18", NULL != ( /*_.CTYPE_VALUE__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V1739*/ meltfptr[1738])->tabval[18] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normal.melt:3472:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1739*/ meltfptr[1738])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1739*/ meltfptr[1738])->tabval[19] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:3472:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1739*/ meltfptr[1738])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1564__NORMEXP_FOREVER#20", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1739*/ meltfptr[1738])->tabval[20] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:3472:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1739*/ meltfptr[1738]); /*putclosurout#51 */ melt_assertmsg ("putclosrout#51 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1744*/ meltfptr[1743])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#51 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1739*/ meltfptr[1738])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1744*/ meltfptr[1743])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1739*/ meltfptr[1738]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1744*/ meltfptr[1743]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1745*/ meltfptr[1744])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1745*/ meltfptr[1744])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1745*/ meltfptr[1744]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1746*/ meltfptr[1745]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1745*/ meltfptr[1744]); melt_dbgtrace_written_object ( /*_.VALDATA___V1745*/ meltfptr[1744], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1747*/ meltfptr[1746])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1747*/ meltfptr[1746])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1747*/ meltfptr[1746]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1748*/ meltfptr[1747]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1747*/ meltfptr[1746]); melt_dbgtrace_written_object ( /*_.VALDATA___V1747*/ meltfptr[1746], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1749*/ meltfptr[1748])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1749*/ meltfptr[1748])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1749*/ meltfptr[1748]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1750*/ meltfptr[1749]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1749*/ meltfptr[1748]); melt_dbgtrace_written_object ( /*_.VALDATA___V1749*/ meltfptr[1748], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:3546:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1751*/ meltfptr[1750])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1576__NORMEXP_EXIT#0", NULL != ( /*_.CLASS_SOURCE_EXIT__V90*/ meltfptr[89])); ((meltroutine_ptr_t) /*_.VALROUT___V1751*/ meltfptr[1750])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_EXIT__V90*/ meltfptr[89]); MELT_LOCATION ("warmelt-normal.melt:3546:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1751*/ meltfptr[1750])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1576__NORMEXP_EXIT#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1751*/ meltfptr[1750])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:3546:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1751*/ meltfptr[1750])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1576__NORMEXP_EXIT#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1751*/ meltfptr[1750])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:3546:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1751*/ meltfptr[1750])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1576__NORMEXP_EXIT#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1751*/ meltfptr[1750])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:3546:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1751*/ meltfptr[1750])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1576__NORMEXP_EXIT#4", NULL != ( /*_.FRESH_ENV__V70*/ meltfptr[69])); ((meltroutine_ptr_t) /*_.VALROUT___V1751*/ meltfptr[1750])->tabval[4] = (melt_ptr_t) ( /*_.FRESH_ENV__V70*/ meltfptr[69]); MELT_LOCATION ("warmelt-normal.melt:3546:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1751*/ meltfptr[1750])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1576__NORMEXP_EXIT#5", NULL != ( /*_.CLASS_LABEL_BINDING__V88*/ meltfptr[87])); ((meltroutine_ptr_t) /*_.VALROUT___V1751*/ meltfptr[1750])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_LABEL_BINDING__V88*/ meltfptr[87]); MELT_LOCATION ("warmelt-normal.melt:3546:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1751*/ meltfptr[1750])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1576__NORMEXP_EXIT#6", NULL != ( /*_.PUT_ENV__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V1751*/ meltfptr[1750])->tabval[6] = (melt_ptr_t) ( /*_.PUT_ENV__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normal.melt:3546:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1751*/ meltfptr[1750])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1508*/ meltfptr[1507]); ((meltroutine_ptr_t) /*_.VALROUT___V1751*/ meltfptr[1750])->tabval[7] = (melt_ptr_t) ( /*_.VALCLO___V1508*/ meltfptr[1507]); MELT_LOCATION ("warmelt-normal.melt:3546:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1751*/ meltfptr[1750])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1576__NORMEXP_EXIT#8", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1751*/ meltfptr[1750])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:3546:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1751*/ meltfptr[1750])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V552*/ meltfptr[551]); ((meltroutine_ptr_t) /*_.VALROUT___V1751*/ meltfptr[1750])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V552*/ meltfptr[551]); MELT_LOCATION ("warmelt-normal.melt:3546:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1751*/ meltfptr[1750])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1576__NORMEXP_EXIT#10", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1751*/ meltfptr[1750])->tabval[10] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1752*/ meltfptr[1751])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1752*/ meltfptr[1751])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1752*/ meltfptr[1751]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1753*/ meltfptr[1752]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1752*/ meltfptr[1751]); melt_dbgtrace_written_object ( /*_.VALDATA___V1752*/ meltfptr[1751], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:3546:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1751*/ meltfptr[1750])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1576__NORMEXP_EXIT#11", NULL != ( /*_.VALDATA___V1752*/ meltfptr[1751])); ((meltroutine_ptr_t) /*_.VALROUT___V1751*/ meltfptr[1750])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V1752*/ meltfptr[1751]); MELT_LOCATION ("warmelt-normal.melt:3546:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1751*/ meltfptr[1750])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1576__NORMEXP_EXIT#12", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1751*/ meltfptr[1750])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:3546:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1751*/ meltfptr[1750])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1576__NORMEXP_EXIT#13", NULL != ( /*_.CTYPE_VOID__V57*/ meltfptr[56])); ((meltroutine_ptr_t) /*_.VALROUT___V1751*/ meltfptr[1750])->tabval[13] = (melt_ptr_t) ( /*_.CTYPE_VOID__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-normal.melt:3546:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1751*/ meltfptr[1750])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1751*/ meltfptr[1750])->tabval[14] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:3546:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1751*/ meltfptr[1750]); /*putclosurout#52 */ melt_assertmsg ("putclosrout#52 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1754*/ meltfptr[1753])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#52 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1751*/ meltfptr[1750])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1754*/ meltfptr[1753])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1751*/ meltfptr[1750]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1754*/ meltfptr[1753]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1755*/ meltfptr[1754])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1755*/ meltfptr[1754])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1755*/ meltfptr[1754]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1756*/ meltfptr[1755]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1755*/ meltfptr[1754]); melt_dbgtrace_written_object ( /*_.VALDATA___V1755*/ meltfptr[1754], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:3588:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1757*/ meltfptr[1756])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1582__NORMEXP_AGAIN#0", NULL != ( /*_.CLASS_SOURCE_AGAIN__V91*/ meltfptr[90])); ((meltroutine_ptr_t) /*_.VALROUT___V1757*/ meltfptr[1756])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_AGAIN__V91*/ meltfptr[90]); MELT_LOCATION ("warmelt-normal.melt:3588:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1757*/ meltfptr[1756])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1582__NORMEXP_AGAIN#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1757*/ meltfptr[1756])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:3588:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1757*/ meltfptr[1756])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1582__NORMEXP_AGAIN#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1757*/ meltfptr[1756])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:3588:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1757*/ meltfptr[1756])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1582__NORMEXP_AGAIN#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1757*/ meltfptr[1756])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:3588:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1757*/ meltfptr[1756])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1582__NORMEXP_AGAIN#4", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1757*/ meltfptr[1756])->tabval[4] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1758*/ meltfptr[1757])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1758*/ meltfptr[1757])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1758*/ meltfptr[1757]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1759*/ meltfptr[1758]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1758*/ meltfptr[1757]); melt_dbgtrace_written_object ( /*_.VALDATA___V1758*/ meltfptr[1757], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:3588:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1757*/ meltfptr[1756])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1582__NORMEXP_AGAIN#5", NULL != ( /*_.VALDATA___V1758*/ meltfptr[1757])); ((meltroutine_ptr_t) /*_.VALROUT___V1757*/ meltfptr[1756])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1758*/ meltfptr[1757]); MELT_LOCATION ("warmelt-normal.melt:3588:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1757*/ meltfptr[1756])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V566*/ meltfptr[565]); ((meltroutine_ptr_t) /*_.VALROUT___V1757*/ meltfptr[1756])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V566*/ meltfptr[565]); MELT_LOCATION ("warmelt-normal.melt:3588:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1757*/ meltfptr[1756])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1582__NORMEXP_AGAIN#7", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1757*/ meltfptr[1756])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:3588:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1757*/ meltfptr[1756])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1582__NORMEXP_AGAIN#8", NULL != ( /*_.CTYPE_VOID__V57*/ meltfptr[56])); ((meltroutine_ptr_t) /*_.VALROUT___V1757*/ meltfptr[1756])->tabval[8] = (melt_ptr_t) ( /*_.CTYPE_VOID__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-normal.melt:3588:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1757*/ meltfptr[1756])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1757*/ meltfptr[1756])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:3588:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1757*/ meltfptr[1756])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1582__NORMEXP_AGAIN#10", NULL != ( /*_.CLASS_LABEL_BINDING__V88*/ meltfptr[87])); ((meltroutine_ptr_t) /*_.VALROUT___V1757*/ meltfptr[1756])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_LABEL_BINDING__V88*/ meltfptr[87]); MELT_LOCATION ("warmelt-normal.melt:3588:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1757*/ meltfptr[1756]); /*putclosurout#53 */ melt_assertmsg ("putclosrout#53 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1760*/ meltfptr[1759])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#53 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1757*/ meltfptr[1756])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1760*/ meltfptr[1759])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1757*/ meltfptr[1756]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1760*/ meltfptr[1759]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1761*/ meltfptr[1760])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1761*/ meltfptr[1760])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1761*/ meltfptr[1760]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1762*/ meltfptr[1761]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1761*/ meltfptr[1760]); melt_dbgtrace_written_object ( /*_.VALDATA___V1761*/ meltfptr[1760], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:3620:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1763*/ meltfptr[1762])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1588__NORMEXP_IFVARIADIC#0", NULL != ( /*_.CLASS_SOURCE_IFVARIADIC__V92*/ meltfptr[91])); ((meltroutine_ptr_t) /*_.VALROUT___V1763*/ meltfptr[1762])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_IFVARIADIC__V92*/ meltfptr[91]); MELT_LOCATION ("warmelt-normal.melt:3620:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1763*/ meltfptr[1762])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1588__NORMEXP_IFVARIADIC#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1763*/ meltfptr[1762])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:3620:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1763*/ meltfptr[1762])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1588__NORMEXP_IFVARIADIC#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1763*/ meltfptr[1762])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:3620:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1763*/ meltfptr[1762])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1588__NORMEXP_IFVARIADIC#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1763*/ meltfptr[1762])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:3620:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1763*/ meltfptr[1762])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V816*/ meltfptr[815]); ((meltroutine_ptr_t) /*_.VALROUT___V1763*/ meltfptr[1762])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]); MELT_LOCATION ("warmelt-normal.melt:3620:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1763*/ meltfptr[1762])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1588__NORMEXP_IFVARIADIC#5", NULL != ( /*_.FRESH_ENV__V70*/ meltfptr[69])); ((meltroutine_ptr_t) /*_.VALROUT___V1763*/ meltfptr[1762])->tabval[5] = (melt_ptr_t) ( /*_.FRESH_ENV__V70*/ meltfptr[69]); MELT_LOCATION ("warmelt-normal.melt:3620:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1763*/ meltfptr[1762])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1588__NORMEXP_IFVARIADIC#6", NULL != ( /*_.DISCR_VARIADIC_FORMAL_SEQUENCE__V93*/ meltfptr[92])); ((meltroutine_ptr_t) /*_.VALROUT___V1763*/ meltfptr[1762])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_VARIADIC_FORMAL_SEQUENCE__V93*/ meltfptr[92]); MELT_LOCATION ("warmelt-normal.melt:3620:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1763*/ meltfptr[1762])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1588__NORMEXP_IFVARIADIC#7", NULL != ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1763*/ meltfptr[1762])->tabval[7] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-normal.melt:3620:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1763*/ meltfptr[1762])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1588__NORMEXP_IFVARIADIC#8", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1763*/ meltfptr[1762])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:3620:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1763*/ meltfptr[1762])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1588__NORMEXP_IFVARIADIC#9", NULL != ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V1763*/ meltfptr[1762])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-normal.melt:3620:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1763*/ meltfptr[1762])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V608*/ meltfptr[607]); ((meltroutine_ptr_t) /*_.VALROUT___V1763*/ meltfptr[1762])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V608*/ meltfptr[607]); MELT_LOCATION ("warmelt-normal.melt:3620:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1763*/ meltfptr[1762])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1588__NORMEXP_IFVARIADIC#11", NULL != ( /*_.DISCR_CONSTANT_INTEGER__V14*/ meltfptr[13])); ((meltroutine_ptr_t) /*_.VALROUT___V1763*/ meltfptr[1762])->tabval[11] = (melt_ptr_t) ( /*_.DISCR_CONSTANT_INTEGER__V14*/ meltfptr[13]); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_32 */ void meltmod__warmelt_normal__initialmeltchunk_33 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-normal.melt:3620:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1763*/ meltfptr[1762])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1588__NORMEXP_IFVARIADIC#12", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1763*/ meltfptr[1762])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:3620:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1763*/ meltfptr[1762])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1763*/ meltfptr[1762])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:3620:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1763*/ meltfptr[1762])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1588__NORMEXP_IFVARIADIC#14", NULL != ( /*_.CLASS_CTYPE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V1763*/ meltfptr[1762])->tabval[14] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normal.melt:3620:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1763*/ meltfptr[1762])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1588__NORMEXP_IFVARIADIC#15", NULL != ( /*_.PUT_ENV__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V1763*/ meltfptr[1762])->tabval[15] = (melt_ptr_t) ( /*_.PUT_ENV__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normal.melt:3620:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1763*/ meltfptr[1762])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1588__NORMEXP_IFVARIADIC#16", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1763*/ meltfptr[1762])->tabval[16] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1764*/ meltfptr[1763])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1764*/ meltfptr[1763])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1764*/ meltfptr[1763]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1765*/ meltfptr[1764]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1764*/ meltfptr[1763]); melt_dbgtrace_written_object ( /*_.VALDATA___V1764*/ meltfptr[1763], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:3620:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1763*/ meltfptr[1762])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1588__NORMEXP_IFVARIADIC#17", NULL != ( /*_.VALDATA___V1764*/ meltfptr[1763])); ((meltroutine_ptr_t) /*_.VALROUT___V1763*/ meltfptr[1762])->tabval[17] = (melt_ptr_t) ( /*_.VALDATA___V1764*/ meltfptr[1763]); MELT_LOCATION ("warmelt-normal.melt:3620:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1763*/ meltfptr[1762])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V398*/ meltfptr[397]); ((meltroutine_ptr_t) /*_.VALROUT___V1763*/ meltfptr[1762])->tabval[18] = (melt_ptr_t) ( /*_.VALDATA___V398*/ meltfptr[397]); MELT_LOCATION ("warmelt-normal.melt:3620:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1763*/ meltfptr[1762])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1588__NORMEXP_IFVARIADIC#19", NULL != ( /*_.CTYPE_VOID__V57*/ meltfptr[56])); ((meltroutine_ptr_t) /*_.VALROUT___V1763*/ meltfptr[1762])->tabval[19] = (melt_ptr_t) ( /*_.CTYPE_VOID__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-normal.melt:3620:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1763*/ meltfptr[1762])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1508*/ meltfptr[1507]); ((meltroutine_ptr_t) /*_.VALROUT___V1763*/ meltfptr[1762])->tabval[20] = (melt_ptr_t) ( /*_.VALCLO___V1508*/ meltfptr[1507]); MELT_LOCATION ("warmelt-normal.melt:3620:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1763*/ meltfptr[1762])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1588__NORMEXP_IFVARIADIC#21", NULL != ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V1763*/ meltfptr[1762])->tabval[21] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1766*/ meltfptr[1765])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1766*/ meltfptr[1765])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1766*/ meltfptr[1765]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1767*/ meltfptr[1766]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1766*/ meltfptr[1765]); melt_dbgtrace_written_object ( /*_.VALDATA___V1766*/ meltfptr[1765], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:3620:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1763*/ meltfptr[1762])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1588__NORMEXP_IFVARIADIC#22", NULL != ( /*_.VALDATA___V1766*/ meltfptr[1765])); ((meltroutine_ptr_t) /*_.VALROUT___V1763*/ meltfptr[1762])->tabval[22] = (melt_ptr_t) ( /*_.VALDATA___V1766*/ meltfptr[1765]); MELT_LOCATION ("warmelt-normal.melt:3620:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1763*/ meltfptr[1762])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1522*/ meltfptr[1521]); ((meltroutine_ptr_t) /*_.VALROUT___V1763*/ meltfptr[1762])->tabval[23] = (melt_ptr_t) ( /*_.VALCLO___V1522*/ meltfptr[1521]); MELT_LOCATION ("warmelt-normal.melt:3620:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1763*/ meltfptr[1762])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V384*/ meltfptr[383]); ((meltroutine_ptr_t) /*_.VALROUT___V1763*/ meltfptr[1762])->tabval[24] = (melt_ptr_t) ( /*_.VALDATA___V384*/ meltfptr[383]); MELT_LOCATION ("warmelt-normal.melt:3620:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1763*/ meltfptr[1762])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1588__NORMEXP_IFVARIADIC#25", NULL != ( /*_.CLASS_LET_BINDING__V42*/ meltfptr[41])); ((meltroutine_ptr_t) /*_.VALROUT___V1763*/ meltfptr[1762])->tabval[25] = (melt_ptr_t) ( /*_.CLASS_LET_BINDING__V42*/ meltfptr[41]); MELT_LOCATION ("warmelt-normal.melt:3620:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1763*/ meltfptr[1762]); /*putclosurout#54 */ melt_assertmsg ("putclosrout#54 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1768*/ meltfptr[1767])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#54 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1763*/ meltfptr[1762])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1768*/ meltfptr[1767])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1763*/ meltfptr[1762]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1768*/ meltfptr[1767]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1769*/ meltfptr[1768])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1769*/ meltfptr[1768])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1769*/ meltfptr[1768]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1770*/ meltfptr[1769]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1769*/ meltfptr[1768]); melt_dbgtrace_written_object ( /*_.VALDATA___V1769*/ meltfptr[1768], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1771*/ meltfptr[1770])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1771*/ meltfptr[1770])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1771*/ meltfptr[1770]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1772*/ meltfptr[1771]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1771*/ meltfptr[1770]); melt_dbgtrace_written_object ( /*_.VALDATA___V1771*/ meltfptr[1770], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:3758:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1773*/ meltfptr[1772])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1598__NORMEXP_COMPILEWARNING#0", NULL != ( /*_.CLASS_SOURCE_COMPILEWARNING__V94*/ meltfptr[93])); ((meltroutine_ptr_t) /*_.VALROUT___V1773*/ meltfptr[1772])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_COMPILEWARNING__V94*/ meltfptr[93]); MELT_LOCATION ("warmelt-normal.melt:3758:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1773*/ meltfptr[1772])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1598__NORMEXP_COMPILEWARNING#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1773*/ meltfptr[1772])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:3758:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1773*/ meltfptr[1772])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1598__NORMEXP_COMPILEWARNING#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1773*/ meltfptr[1772])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:3758:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1773*/ meltfptr[1772])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1598__NORMEXP_COMPILEWARNING#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1773*/ meltfptr[1772])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:3758:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1773*/ meltfptr[1772])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V1773*/ meltfptr[1772])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:3758:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1773*/ meltfptr[1772]); /*putclosurout#55 */ melt_assertmsg ("putclosrout#55 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1774*/ meltfptr[1773])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#55 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1773*/ meltfptr[1772])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1774*/ meltfptr[1773])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1773*/ meltfptr[1772]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1774*/ meltfptr[1773]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1775*/ meltfptr[1774])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1775*/ meltfptr[1774])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1775*/ meltfptr[1774]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1776*/ meltfptr[1775]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1775*/ meltfptr[1774]); melt_dbgtrace_written_object ( /*_.VALDATA___V1775*/ meltfptr[1774], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:3777:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1777*/ meltfptr[1776])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V1777*/ meltfptr[1776])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-normal.melt:3777:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1777*/ meltfptr[1776]); MELT_LOCATION ("warmelt-normal.melt:3781:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1778*/ meltfptr[1777])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1603__REPLACE_LAST_BY_RETURN#0", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1778*/ meltfptr[1777])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:3781:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1778*/ meltfptr[1777])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V326*/ meltfptr[325]); ((meltroutine_ptr_t) /*_.VALROUT___V1778*/ meltfptr[1777])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V326*/ meltfptr[325]); MELT_LOCATION ("warmelt-normal.melt:3781:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1778*/ meltfptr[1777])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1042*/ meltfptr[1041]); ((meltroutine_ptr_t) /*_.VALROUT___V1778*/ meltfptr[1777])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1042*/ meltfptr[1041]); MELT_LOCATION ("warmelt-normal.melt:3781:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1778*/ meltfptr[1777])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1603__REPLACE_LAST_BY_RETURN#3", NULL != ( /*_.CTYPE_VALUE__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V1778*/ meltfptr[1777])->tabval[3] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normal.melt:3781:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1778*/ meltfptr[1777])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V888*/ meltfptr[887]); ((meltroutine_ptr_t) /*_.VALROUT___V1778*/ meltfptr[1777])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V888*/ meltfptr[887]); MELT_LOCATION ("warmelt-normal.melt:3781:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1778*/ meltfptr[1777])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V294*/ meltfptr[293]); ((meltroutine_ptr_t) /*_.VALROUT___V1778*/ meltfptr[1777])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V294*/ meltfptr[293]); MELT_LOCATION ("warmelt-normal.melt:3781:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1778*/ meltfptr[1777])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1603__REPLACE_LAST_BY_RETURN#6", NULL != ( /*_.FRESH_ENV__V70*/ meltfptr[69])); ((meltroutine_ptr_t) /*_.VALROUT___V1778*/ meltfptr[1777])->tabval[6] = (melt_ptr_t) ( /*_.FRESH_ENV__V70*/ meltfptr[69]); MELT_LOCATION ("warmelt-normal.melt:3781:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1778*/ meltfptr[1777])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1603__REPLACE_LAST_BY_RETURN#7", NULL != ( /*_.MULTIPLE_EVERY__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1778*/ meltfptr[1777])->tabval[7] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-normal.melt:3781:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1778*/ meltfptr[1777])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1603__REPLACE_LAST_BY_RETURN#8", NULL != ( /*_.PUT_ENV__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V1778*/ meltfptr[1777])->tabval[8] = (melt_ptr_t) ( /*_.PUT_ENV__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normal.melt:3823:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1779*/ meltfptr[1778])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1605__LAMBDA_#0", NULL != ( /*_.PUT_ENV__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V1779*/ meltfptr[1778])->tabval[0] = (melt_ptr_t) ( /*_.PUT_ENV__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normal.melt:3823:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1779*/ meltfptr[1778]); MELT_LOCATION ("warmelt-normal.melt:3781:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1778*/ meltfptr[1777])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1603__REPLACE_LAST_BY_RETURN#9", NULL != ( /*_.VALROUT___V1779*/ meltfptr[1778])); ((meltroutine_ptr_t) /*_.VALROUT___V1778*/ meltfptr[1777])->tabval[9] = (melt_ptr_t) ( /*_.VALROUT___V1779*/ meltfptr[1778]); /*putclosurout#56 */ melt_assertmsg ("putclosrout#56 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1780*/ meltfptr[1779])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#56 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1778*/ meltfptr[1777])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1780*/ meltfptr[1779])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1778*/ meltfptr[1777]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1780*/ meltfptr[1779]); MELT_LOCATION ("warmelt-normal.melt:3781:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1778*/ meltfptr[1777])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1780*/ meltfptr[1779]); ((meltroutine_ptr_t) /*_.VALROUT___V1778*/ meltfptr[1777])->tabval[10] = (melt_ptr_t) ( /*_.VALCLO___V1780*/ meltfptr[1779]); MELT_LOCATION ("warmelt-normal.melt:3781:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1778*/ meltfptr[1777])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V176*/ meltfptr[175]); ((meltroutine_ptr_t) /*_.VALROUT___V1778*/ meltfptr[1777])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); MELT_LOCATION ("warmelt-normal.melt:3781:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1778*/ meltfptr[1777])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V1778*/ meltfptr[1777])->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-normal.melt:3781:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1778*/ meltfptr[1777])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1603__REPLACE_LAST_BY_RETURN#13", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1778*/ meltfptr[1777])->tabval[13] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1781*/ meltfptr[1780])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1781*/ meltfptr[1780])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1781*/ meltfptr[1780]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1782*/ meltfptr[1781]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1781*/ meltfptr[1780]); melt_dbgtrace_written_object ( /*_.VALDATA___V1781*/ meltfptr[1780], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:3781:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1778*/ meltfptr[1777])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1603__REPLACE_LAST_BY_RETURN#14", NULL != ( /*_.VALDATA___V1781*/ meltfptr[1780])); ((meltroutine_ptr_t) /*_.VALROUT___V1778*/ meltfptr[1777])->tabval[14] = (melt_ptr_t) ( /*_.VALDATA___V1781*/ meltfptr[1780]); MELT_LOCATION ("warmelt-normal.melt:3781:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1778*/ meltfptr[1777])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1778*/ meltfptr[1777])->tabval[15] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:3781:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1778*/ meltfptr[1777])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1603__REPLACE_LAST_BY_RETURN#16", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1778*/ meltfptr[1777])->tabval[16] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:3781:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1778*/ meltfptr[1777]); MELT_LOCATION ("warmelt-normal.melt:3872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1783*/ meltfptr[1782])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1608__NORMEXP_DEFUN#0", NULL != ( /*_.CLASS_SOURCE_DEFUN__V95*/ meltfptr[94])); ((meltroutine_ptr_t) /*_.VALROUT___V1783*/ meltfptr[1782])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_DEFUN__V95*/ meltfptr[94]); MELT_LOCATION ("warmelt-normal.melt:3872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1783*/ meltfptr[1782])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1608__NORMEXP_DEFUN#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1783*/ meltfptr[1782])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:3872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1783*/ meltfptr[1782])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1608__NORMEXP_DEFUN#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1783*/ meltfptr[1782])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:3872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1783*/ meltfptr[1782])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1608__NORMEXP_DEFUN#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1783*/ meltfptr[1782])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:3872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1783*/ meltfptr[1782])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1608__NORMEXP_DEFUN#4", NULL != ( /*_.FIND_ENV__V48*/ meltfptr[47])); ((meltroutine_ptr_t) /*_.VALROUT___V1783*/ meltfptr[1782])->tabval[4] = (melt_ptr_t) ( /*_.FIND_ENV__V48*/ meltfptr[47]); MELT_LOCATION ("warmelt-normal.melt:3872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1783*/ meltfptr[1782])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1608__NORMEXP_DEFUN#5", NULL != ( /*_.FRESH_ENV__V70*/ meltfptr[69])); ((meltroutine_ptr_t) /*_.VALROUT___V1783*/ meltfptr[1782])->tabval[5] = (melt_ptr_t) ( /*_.FRESH_ENV__V70*/ meltfptr[69]); MELT_LOCATION ("warmelt-normal.melt:3872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1783*/ meltfptr[1782])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1608__NORMEXP_DEFUN#6", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1783*/ meltfptr[1782])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:3872:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1783*/ meltfptr[1782])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V860*/ meltfptr[859]); ((meltroutine_ptr_t) /*_.VALROUT___V1783*/ meltfptr[1782])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V860*/ meltfptr[859]); MELT_LOCATION ("warmelt-normal.melt:3872:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1783*/ meltfptr[1782])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V984*/ meltfptr[983]); ((meltroutine_ptr_t) /*_.VALROUT___V1783*/ meltfptr[1782])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V984*/ meltfptr[983]); MELT_LOCATION ("warmelt-normal.melt:3872:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1783*/ meltfptr[1782])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1563*/ meltfptr[1562]); ((meltroutine_ptr_t) /*_.VALROUT___V1783*/ meltfptr[1782])->tabval[9] = (melt_ptr_t) ( /*_.VALCLO___V1563*/ meltfptr[1562]); MELT_LOCATION ("warmelt-normal.melt:3872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1783*/ meltfptr[1782])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1608__NORMEXP_DEFUN#10", NULL != ( /*_.DISCR_ROUTINE__V96*/ meltfptr[95])); ((meltroutine_ptr_t) /*_.VALROUT___V1783*/ meltfptr[1782])->tabval[10] = (melt_ptr_t) ( /*_.DISCR_ROUTINE__V96*/ meltfptr[95]); MELT_LOCATION ("warmelt-normal.melt:3872:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1783*/ meltfptr[1782])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V994*/ meltfptr[993]); ((meltroutine_ptr_t) /*_.VALROUT___V1783*/ meltfptr[1782])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V994*/ meltfptr[993]); MELT_LOCATION ("warmelt-normal.melt:3872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1783*/ meltfptr[1782])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1608__NORMEXP_DEFUN#12", NULL != ( /*_.DISCR_CLOSURE__V97*/ meltfptr[96])); ((meltroutine_ptr_t) /*_.VALROUT___V1783*/ meltfptr[1782])->tabval[12] = (melt_ptr_t) ( /*_.DISCR_CLOSURE__V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-normal.melt:3872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1783*/ meltfptr[1782])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1608__NORMEXP_DEFUN#13", NULL != ( /*_.DISCR_MAP_OBJECTS__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1783*/ meltfptr[1782])->tabval[13] = (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-normal.melt:3872:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1783*/ meltfptr[1782])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1216*/ meltfptr[1215]); ((meltroutine_ptr_t) /*_.VALROUT___V1783*/ meltfptr[1782])->tabval[14] = (melt_ptr_t) ( /*_.VALCLO___V1216*/ meltfptr[1215]); MELT_LOCATION ("warmelt-normal.melt:3872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1783*/ meltfptr[1782])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1608__NORMEXP_DEFUN#15", NULL != ( /*_.CLASS_FUNCTION_BINDING__V98*/ meltfptr[97])); ((meltroutine_ptr_t) /*_.VALROUT___V1783*/ meltfptr[1782])->tabval[15] = (melt_ptr_t) ( /*_.CLASS_FUNCTION_BINDING__V98*/ meltfptr[97]); MELT_LOCATION ("warmelt-normal.melt:3872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1783*/ meltfptr[1782])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1608__NORMEXP_DEFUN#16", NULL != ( /*_.CLASS_NAMED__V24*/ meltfptr[23])); ((meltroutine_ptr_t) /*_.VALROUT___V1783*/ meltfptr[1782])->tabval[16] = (melt_ptr_t) ( /*_.CLASS_NAMED__V24*/ meltfptr[23]); MELT_LOCATION ("warmelt-normal.melt:3872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1783*/ meltfptr[1782])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1608__NORMEXP_DEFUN#17", NULL != ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V1783*/ meltfptr[1782])->tabval[17] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-normal.melt:3872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1783*/ meltfptr[1782])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1608__NORMEXP_DEFUN#18", NULL != ( /*_.PUT_ENV__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V1783*/ meltfptr[1782])->tabval[18] = (melt_ptr_t) ( /*_.PUT_ENV__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normal.melt:3872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1783*/ meltfptr[1782])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1608__NORMEXP_DEFUN#19", NULL != ( /*_.DISCR_VARIADIC_FORMAL_SEQUENCE__V93*/ meltfptr[92])); ((meltroutine_ptr_t) /*_.VALROUT___V1783*/ meltfptr[1782])->tabval[19] = (melt_ptr_t) ( /*_.DISCR_VARIADIC_FORMAL_SEQUENCE__V93*/ meltfptr[92]); MELT_LOCATION ("warmelt-normal.melt:3872:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1783*/ meltfptr[1782])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V816*/ meltfptr[815]); ((meltroutine_ptr_t) /*_.VALROUT___V1783*/ meltfptr[1782])->tabval[20] = (melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]); MELT_LOCATION ("warmelt-normal.melt:3872:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1783*/ meltfptr[1782])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1508*/ meltfptr[1507]); ((meltroutine_ptr_t) /*_.VALROUT___V1783*/ meltfptr[1782])->tabval[21] = (melt_ptr_t) ( /*_.VALCLO___V1508*/ meltfptr[1507]); MELT_LOCATION ("warmelt-normal.melt:3872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1783*/ meltfptr[1782])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1608__NORMEXP_DEFUN#22", NULL != ( /*_.MULTIPLE_EVERY__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1783*/ meltfptr[1782])->tabval[22] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-normal.melt:3872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1783*/ meltfptr[1782])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1608__NORMEXP_DEFUN#23", NULL != ( /*_.PUT_ENV__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V1783*/ meltfptr[1782])->tabval[23] = (melt_ptr_t) ( /*_.PUT_ENV__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normal.melt:3940:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1784*/ meltfptr[1783])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1614__LAMBDA_#0", NULL != ( /*_.PUT_ENV__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V1784*/ meltfptr[1783])->tabval[0] = (melt_ptr_t) ( /*_.PUT_ENV__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normal.melt:3940:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1784*/ meltfptr[1783]); MELT_LOCATION ("warmelt-normal.melt:3872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1783*/ meltfptr[1782])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1608__NORMEXP_DEFUN#24", NULL != ( /*_.VALROUT___V1784*/ meltfptr[1783])); ((meltroutine_ptr_t) /*_.VALROUT___V1783*/ meltfptr[1782])->tabval[24] = (melt_ptr_t) ( /*_.VALROUT___V1784*/ meltfptr[1783]); MELT_LOCATION ("warmelt-normal.melt:3872:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1783*/ meltfptr[1782])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1780*/ meltfptr[1779]); ((meltroutine_ptr_t) /*_.VALROUT___V1783*/ meltfptr[1782])->tabval[25] = (melt_ptr_t) ( /*_.VALCLO___V1780*/ meltfptr[1779]); MELT_LOCATION ("warmelt-normal.melt:3872:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1783*/ meltfptr[1782])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1522*/ meltfptr[1521]); ((meltroutine_ptr_t) /*_.VALROUT___V1783*/ meltfptr[1782])->tabval[26] = (melt_ptr_t) ( /*_.VALCLO___V1522*/ meltfptr[1521]); MELT_LOCATION ("warmelt-normal.melt:3872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1783*/ meltfptr[1782])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1608__NORMEXP_DEFUN#27", NULL != ( /*_.LIST_TO_MULTIPLE__V36*/ meltfptr[35])); ((meltroutine_ptr_t) /*_.VALROUT___V1783*/ meltfptr[1782])->tabval[27] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V36*/ meltfptr[35]); MELT_LOCATION ("warmelt-normal.melt:3872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1783*/ meltfptr[1782])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1608__NORMEXP_DEFUN#28", NULL != ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1783*/ meltfptr[1782])->tabval[28] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-normal.melt:3872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1783*/ meltfptr[1782])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1608__NORMEXP_DEFUN#29", NULL != ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7])); ((meltroutine_ptr_t) /*_.VALROUT___V1783*/ meltfptr[1782])->tabval[29] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-normal.melt:3872:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1783*/ meltfptr[1782])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V1783*/ meltfptr[1782])->tabval[30] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:3953:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1785*/ meltfptr[1784])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1615__LAMBDA_#0", NULL != ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7])); ((meltroutine_ptr_t) /*_.VALROUT___V1785*/ meltfptr[1784])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-normal.melt:3953:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1785*/ meltfptr[1784])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V1785*/ meltfptr[1784])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:3953:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1785*/ meltfptr[1784]); MELT_LOCATION ("warmelt-normal.melt:3872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1783*/ meltfptr[1782])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1608__NORMEXP_DEFUN#31", NULL != ( /*_.VALROUT___V1785*/ meltfptr[1784])); ((meltroutine_ptr_t) /*_.VALROUT___V1783*/ meltfptr[1782])->tabval[31] = (melt_ptr_t) ( /*_.VALROUT___V1785*/ meltfptr[1784]); MELT_LOCATION ("warmelt-normal.melt:3872:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1783*/ meltfptr[1782])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1608__NORMEXP_DEFUN#32", NULL != ( /*_.CLASS_FIXED_BINDING__V43*/ meltfptr[42])); ((meltroutine_ptr_t) /*_.VALROUT___V1783*/ meltfptr[1782])->tabval[32] = (melt_ptr_t) ( /*_.CLASS_FIXED_BINDING__V43*/ meltfptr[42]); MELT_LOCATION ("warmelt-normal.melt:3872:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1783*/ meltfptr[1782]); /*putclosurout#57 */ melt_assertmsg ("putclosrout#57 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1786*/ meltfptr[1785])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#57 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1783*/ meltfptr[1782])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1786*/ meltfptr[1785])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1783*/ meltfptr[1782]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1786*/ meltfptr[1785]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1787*/ meltfptr[1786])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1787*/ meltfptr[1786])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1787*/ meltfptr[1786]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1788*/ meltfptr[1787]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1787*/ meltfptr[1786]); melt_dbgtrace_written_object ( /*_.VALDATA___V1787*/ meltfptr[1786], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1789*/ meltfptr[1788])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1789*/ meltfptr[1788])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1789*/ meltfptr[1788]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1790*/ meltfptr[1789]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1789*/ meltfptr[1788]); melt_dbgtrace_written_object ( /*_.VALDATA___V1789*/ meltfptr[1788], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:3978:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1791*/ meltfptr[1790])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1616__NORMALIZE_LAMBDA#0", NULL != ( /*_.CLASS_SOURCE_LAMBDA__V99*/ meltfptr[98])); ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_LAMBDA__V99*/ meltfptr[98]); MELT_LOCATION ("warmelt-normal.melt:3978:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1791*/ meltfptr[1790])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1616__NORMALIZE_LAMBDA#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:3978:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1791*/ meltfptr[1790])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1616__NORMALIZE_LAMBDA#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:3978:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1791*/ meltfptr[1790])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1616__NORMALIZE_LAMBDA#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:3978:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1791*/ meltfptr[1790])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1616__NORMALIZE_LAMBDA#4", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[4] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1792*/ meltfptr[1791])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1792*/ meltfptr[1791])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1792*/ meltfptr[1791]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1793*/ meltfptr[1792]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1792*/ meltfptr[1791]); melt_dbgtrace_written_object ( /*_.VALDATA___V1792*/ meltfptr[1791], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:3978:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1791*/ meltfptr[1790])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1616__NORMALIZE_LAMBDA#5", NULL != ( /*_.VALDATA___V1792*/ meltfptr[1791])); ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1792*/ meltfptr[1791]); MELT_LOCATION ("warmelt-normal.melt:3978:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1791*/ meltfptr[1790])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:3978:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1791*/ meltfptr[1790])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1616__NORMALIZE_LAMBDA#7", NULL != ( /*_.CTYPE_VALUE__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[7] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normal.melt:3978:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1791*/ meltfptr[1790])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1616__NORMALIZE_LAMBDA#8", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:3978:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1791*/ meltfptr[1790])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V854*/ meltfptr[853]); ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V854*/ meltfptr[853]); MELT_LOCATION ("warmelt-normal.melt:3978:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1791*/ meltfptr[1790])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V984*/ meltfptr[983]); ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V984*/ meltfptr[983]); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_33 */ void meltmod__warmelt_normal__initialmeltchunk_34 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-normal.melt:3978:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1791*/ meltfptr[1790])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1563*/ meltfptr[1562]); ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[11] = (melt_ptr_t) ( /*_.VALCLO___V1563*/ meltfptr[1562]); MELT_LOCATION ("warmelt-normal.melt:3978:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1791*/ meltfptr[1790])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1616__NORMALIZE_LAMBDA#12", NULL != ( /*_.DISCR_ROUTINE__V96*/ meltfptr[95])); ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[12] = (melt_ptr_t) ( /*_.DISCR_ROUTINE__V96*/ meltfptr[95]); MELT_LOCATION ("warmelt-normal.melt:3978:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1791*/ meltfptr[1790])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1216*/ meltfptr[1215]); ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[13] = (melt_ptr_t) ( /*_.VALCLO___V1216*/ meltfptr[1215]); MELT_LOCATION ("warmelt-normal.melt:3978:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1791*/ meltfptr[1790])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1616__NORMALIZE_LAMBDA#14", NULL != ( /*_.DISCR_MAP_OBJECTS__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[14] = (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-normal.melt:3978:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1791*/ meltfptr[1790])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1616__NORMALIZE_LAMBDA#15", NULL != ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[15] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-normal.melt:3978:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1791*/ meltfptr[1790])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1616__NORMALIZE_LAMBDA#16", NULL != ( /*_.PUT_ENV__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[16] = (melt_ptr_t) ( /*_.PUT_ENV__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normal.melt:3978:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1791*/ meltfptr[1790])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1616__NORMALIZE_LAMBDA#17", NULL != ( /*_.DISCR_VARIADIC_FORMAL_SEQUENCE__V93*/ meltfptr[92])); ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[17] = (melt_ptr_t) ( /*_.DISCR_VARIADIC_FORMAL_SEQUENCE__V93*/ meltfptr[92]); MELT_LOCATION ("warmelt-normal.melt:3978:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1791*/ meltfptr[1790])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V816*/ meltfptr[815]); ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[18] = (melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]); MELT_LOCATION ("warmelt-normal.melt:3978:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1791*/ meltfptr[1790])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1508*/ meltfptr[1507]); ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[19] = (melt_ptr_t) ( /*_.VALCLO___V1508*/ meltfptr[1507]); MELT_LOCATION ("warmelt-normal.melt:3978:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1791*/ meltfptr[1790])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1522*/ meltfptr[1521]); ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[20] = (melt_ptr_t) ( /*_.VALCLO___V1522*/ meltfptr[1521]); MELT_LOCATION ("warmelt-normal.melt:3978:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1791*/ meltfptr[1790])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1780*/ meltfptr[1779]); ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[21] = (melt_ptr_t) ( /*_.VALCLO___V1780*/ meltfptr[1779]); MELT_LOCATION ("warmelt-normal.melt:3978:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1791*/ meltfptr[1790])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1100*/ meltfptr[1099]); ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[22] = (melt_ptr_t) ( /*_.VALDATA___V1100*/ meltfptr[1099]); MELT_LOCATION ("warmelt-normal.melt:3978:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1791*/ meltfptr[1790])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1616__NORMALIZE_LAMBDA#23", NULL != ( /*_.LIST_TO_MULTIPLE__V36*/ meltfptr[35])); ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[23] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V36*/ meltfptr[35]); MELT_LOCATION ("warmelt-normal.melt:3978:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1791*/ meltfptr[1790])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1616__NORMALIZE_LAMBDA#24", NULL != ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[24] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-normal.melt:3978:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1791*/ meltfptr[1790])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1616__NORMALIZE_LAMBDA#25", NULL != ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7])); ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[25] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-normal.melt:3978:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1791*/ meltfptr[1790])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[26] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:4059:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1794*/ meltfptr[1793])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1622__LAMBDA_#0", NULL != ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7])); ((meltroutine_ptr_t) /*_.VALROUT___V1794*/ meltfptr[1793])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-normal.melt:4059:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1794*/ meltfptr[1793])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V1794*/ meltfptr[1793])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:4059:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1794*/ meltfptr[1793]); MELT_LOCATION ("warmelt-normal.melt:3978:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1791*/ meltfptr[1790])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1616__NORMALIZE_LAMBDA#27", NULL != ( /*_.VALROUT___V1794*/ meltfptr[1793])); ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[27] = (melt_ptr_t) ( /*_.VALROUT___V1794*/ meltfptr[1793]); MELT_LOCATION ("warmelt-normal.melt:3978:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1791*/ meltfptr[1790]); /*putclosurout#58 */ melt_assertmsg ("putclosrout#58 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1795*/ meltfptr[1794])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#58 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1791*/ meltfptr[1790])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1795*/ meltfptr[1794])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1791*/ meltfptr[1790]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1795*/ meltfptr[1794]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1796*/ meltfptr[1795])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1796*/ meltfptr[1795])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1796*/ meltfptr[1795]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1797*/ meltfptr[1796]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1796*/ meltfptr[1795]); melt_dbgtrace_written_object ( /*_.VALDATA___V1796*/ meltfptr[1795], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:4073:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1798*/ meltfptr[1797])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1623__NORMEXP_LAMBDA#0", NULL != ( /*_.CLASS_SOURCE_LAMBDA__V99*/ meltfptr[98])); ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_LAMBDA__V99*/ meltfptr[98]); MELT_LOCATION ("warmelt-normal.melt:4073:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1798*/ meltfptr[1797])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1623__NORMEXP_LAMBDA#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:4073:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1798*/ meltfptr[1797])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1623__NORMEXP_LAMBDA#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:4073:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1798*/ meltfptr[1797])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1623__NORMEXP_LAMBDA#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:4073:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1798*/ meltfptr[1797])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1623__NORMEXP_LAMBDA#4", NULL != ( /*_.FRESH_ENV__V70*/ meltfptr[69])); ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[4] = (melt_ptr_t) ( /*_.FRESH_ENV__V70*/ meltfptr[69]); MELT_LOCATION ("warmelt-normal.melt:4073:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1798*/ meltfptr[1797])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1795*/ meltfptr[1794]); ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1795*/ meltfptr[1794]); MELT_LOCATION ("warmelt-normal.melt:4073:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1798*/ meltfptr[1797])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V626*/ meltfptr[625]); ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V626*/ meltfptr[625]); MELT_LOCATION ("warmelt-normal.melt:4073:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1798*/ meltfptr[1797])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1623__NORMEXP_LAMBDA#7", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:4073:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1798*/ meltfptr[1797])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1623__NORMEXP_LAMBDA#8", NULL != ( /*_.CTYPE_VALUE__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[8] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normal.melt:4073:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1798*/ meltfptr[1797])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1623__NORMEXP_LAMBDA#9", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[9] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:4073:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1798*/ meltfptr[1797]); /*putclosurout#59 */ melt_assertmsg ("putclosrout#59 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1799*/ meltfptr[1798])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#59 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1798*/ meltfptr[1797])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1799*/ meltfptr[1798])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1798*/ meltfptr[1797]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1799*/ meltfptr[1798]); MELT_LOCATION ("warmelt-normal.melt:4109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1800*/ meltfptr[1799])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1625__NORMEXP_MULTICALL#0", NULL != ( /*_.CLASS_SOURCE_MULTICALL__V100*/ meltfptr[99])); ((meltroutine_ptr_t) /*_.VALROUT___V1800*/ meltfptr[1799])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_MULTICALL__V100*/ meltfptr[99]); MELT_LOCATION ("warmelt-normal.melt:4109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1800*/ meltfptr[1799])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1625__NORMEXP_MULTICALL#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1800*/ meltfptr[1799])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:4109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1800*/ meltfptr[1799])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1625__NORMEXP_MULTICALL#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1800*/ meltfptr[1799])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:4109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1800*/ meltfptr[1799])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1625__NORMEXP_MULTICALL#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1800*/ meltfptr[1799])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:4109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1800*/ meltfptr[1799])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1625__NORMEXP_MULTICALL#4", NULL != ( /*_.FRESH_ENV__V70*/ meltfptr[69])); ((meltroutine_ptr_t) /*_.VALROUT___V1800*/ meltfptr[1799])->tabval[4] = (melt_ptr_t) ( /*_.FRESH_ENV__V70*/ meltfptr[69]); MELT_LOCATION ("warmelt-normal.melt:4109:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1800*/ meltfptr[1799])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V1800*/ meltfptr[1799])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:4109:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1800*/ meltfptr[1799])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1800*/ meltfptr[1799])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:4109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1800*/ meltfptr[1799])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1625__NORMEXP_MULTICALL#7", NULL != ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1800*/ meltfptr[1799])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normal.melt:4109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1800*/ meltfptr[1799])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1625__NORMEXP_MULTICALL#8", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1800*/ meltfptr[1799])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:4109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1800*/ meltfptr[1799])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1625__NORMEXP_MULTICALL#9", NULL != ( /*_.LIST_ITERATE_TEST__V101*/ meltfptr[100])); ((meltroutine_ptr_t) /*_.VALROUT___V1800*/ meltfptr[1799])->tabval[9] = (melt_ptr_t) ( /*_.LIST_ITERATE_TEST__V101*/ meltfptr[100]); MELT_LOCATION ("warmelt-normal.melt:4109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1800*/ meltfptr[1799])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1625__NORMEXP_MULTICALL#10", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1800*/ meltfptr[1799])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:4109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1800*/ meltfptr[1799])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1625__NORMEXP_MULTICALL#11", NULL != ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1800*/ meltfptr[1799])->tabval[11] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normal.melt:4136:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1801*/ meltfptr[1800])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1631__LAMBDA_#0", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1801*/ meltfptr[1800])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:4136:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1801*/ meltfptr[1800])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1631__LAMBDA_#1", NULL != ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1801*/ meltfptr[1800])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normal.melt:4136:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1801*/ meltfptr[1800]); MELT_LOCATION ("warmelt-normal.melt:4109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1800*/ meltfptr[1799])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1625__NORMEXP_MULTICALL#12", NULL != ( /*_.VALROUT___V1801*/ meltfptr[1800])); ((meltroutine_ptr_t) /*_.VALROUT___V1800*/ meltfptr[1799])->tabval[12] = (melt_ptr_t) ( /*_.VALROUT___V1801*/ meltfptr[1800]); MELT_LOCATION ("warmelt-normal.melt:4109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1800*/ meltfptr[1799])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1625__NORMEXP_MULTICALL#13", NULL != ( /*_.MULTIPLE_EVERY__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1800*/ meltfptr[1799])->tabval[13] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-normal.melt:4109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1800*/ meltfptr[1799])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1625__NORMEXP_MULTICALL#14", NULL != ( /*_.PUT_ENV__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V1800*/ meltfptr[1799])->tabval[14] = (melt_ptr_t) ( /*_.PUT_ENV__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normal.melt:4149:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1802*/ meltfptr[1801])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1632__LAMBDA_#0", NULL != ( /*_.PUT_ENV__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V1802*/ meltfptr[1801])->tabval[0] = (melt_ptr_t) ( /*_.PUT_ENV__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normal.melt:4149:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1802*/ meltfptr[1801]); MELT_LOCATION ("warmelt-normal.melt:4109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1800*/ meltfptr[1799])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1625__NORMEXP_MULTICALL#15", NULL != ( /*_.VALROUT___V1802*/ meltfptr[1801])); ((meltroutine_ptr_t) /*_.VALROUT___V1800*/ meltfptr[1799])->tabval[15] = (melt_ptr_t) ( /*_.VALROUT___V1802*/ meltfptr[1801]); MELT_LOCATION ("warmelt-normal.melt:4109:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1800*/ meltfptr[1799])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1508*/ meltfptr[1507]); ((meltroutine_ptr_t) /*_.VALROUT___V1800*/ meltfptr[1799])->tabval[16] = (melt_ptr_t) ( /*_.VALCLO___V1508*/ meltfptr[1507]); MELT_LOCATION ("warmelt-normal.melt:4109:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1800*/ meltfptr[1799])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1522*/ meltfptr[1521]); ((meltroutine_ptr_t) /*_.VALROUT___V1800*/ meltfptr[1799])->tabval[17] = (melt_ptr_t) ( /*_.VALCLO___V1522*/ meltfptr[1521]); MELT_LOCATION ("warmelt-normal.melt:4109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1800*/ meltfptr[1799])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1625__NORMEXP_MULTICALL#18", NULL != ( /*_.VALROUT___V1803*/ meltfptr[1802])); ((meltroutine_ptr_t) /*_.VALROUT___V1800*/ meltfptr[1799])->tabval[18] = (melt_ptr_t) ( /*_.VALROUT___V1803*/ meltfptr[1802]); MELT_LOCATION ("warmelt-normal.melt:4109:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1800*/ meltfptr[1799])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V1800*/ meltfptr[1799])->tabval[19] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-normal.melt:4109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1800*/ meltfptr[1799])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1625__NORMEXP_MULTICALL#20", NULL != ( /*_.CTYPE_VOID__V57*/ meltfptr[56])); ((meltroutine_ptr_t) /*_.VALROUT___V1800*/ meltfptr[1799])->tabval[20] = (melt_ptr_t) ( /*_.CTYPE_VOID__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-normal.melt:4109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1800*/ meltfptr[1799])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1625__NORMEXP_MULTICALL#21", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1800*/ meltfptr[1799])->tabval[21] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1804*/ meltfptr[1803])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1804*/ meltfptr[1803])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1804*/ meltfptr[1803]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1805*/ meltfptr[1804]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1804*/ meltfptr[1803]); melt_dbgtrace_written_object ( /*_.VALDATA___V1804*/ meltfptr[1803], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:4109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1800*/ meltfptr[1799])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1625__NORMEXP_MULTICALL#22", NULL != ( /*_.VALDATA___V1804*/ meltfptr[1803])); ((meltroutine_ptr_t) /*_.VALROUT___V1800*/ meltfptr[1799])->tabval[22] = (melt_ptr_t) ( /*_.VALDATA___V1804*/ meltfptr[1803]); MELT_LOCATION ("warmelt-normal.melt:4109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1800*/ meltfptr[1799])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1625__NORMEXP_MULTICALL#23", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1800*/ meltfptr[1799])->tabval[23] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:4109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1800*/ meltfptr[1799])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1625__NORMEXP_MULTICALL#24", NULL != ( /*_.CLASS_SOURCE_APPLY__V64*/ meltfptr[63])); ((meltroutine_ptr_t) /*_.VALROUT___V1800*/ meltfptr[1799])->tabval[24] = (melt_ptr_t) ( /*_.CLASS_SOURCE_APPLY__V64*/ meltfptr[63]); MELT_LOCATION ("warmelt-normal.melt:4109:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1800*/ meltfptr[1799])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V218*/ meltfptr[217]); ((meltroutine_ptr_t) /*_.VALROUT___V1800*/ meltfptr[1799])->tabval[25] = (melt_ptr_t) ( /*_.VALDATA___V218*/ meltfptr[217]); MELT_LOCATION ("warmelt-normal.melt:4109:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1800*/ meltfptr[1799])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V228*/ meltfptr[227]); ((meltroutine_ptr_t) /*_.VALROUT___V1800*/ meltfptr[1799])->tabval[26] = (melt_ptr_t) ( /*_.VALDATA___V228*/ meltfptr[227]); MELT_LOCATION ("warmelt-normal.melt:4109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1800*/ meltfptr[1799])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1625__NORMEXP_MULTICALL#27", NULL != ( /*_.CLASS_SOURCE_MSEND__V65*/ meltfptr[64])); ((meltroutine_ptr_t) /*_.VALROUT___V1800*/ meltfptr[1799])->tabval[27] = (melt_ptr_t) ( /*_.CLASS_SOURCE_MSEND__V65*/ meltfptr[64]); MELT_LOCATION ("warmelt-normal.melt:4109:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1800*/ meltfptr[1799])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V242*/ meltfptr[241]); ((meltroutine_ptr_t) /*_.VALROUT___V1800*/ meltfptr[1799])->tabval[28] = (melt_ptr_t) ( /*_.VALDATA___V242*/ meltfptr[241]); MELT_LOCATION ("warmelt-normal.melt:4109:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1800*/ meltfptr[1799])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V256*/ meltfptr[255]); ((meltroutine_ptr_t) /*_.VALROUT___V1800*/ meltfptr[1799])->tabval[29] = (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]); MELT_LOCATION ("warmelt-normal.melt:4109:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1800*/ meltfptr[1799]); /*putclosurout#60 */ melt_assertmsg ("putclosrout#60 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1806*/ meltfptr[1805])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#60 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1800*/ meltfptr[1799])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1806*/ meltfptr[1805])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1800*/ meltfptr[1799]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1806*/ meltfptr[1805]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1807*/ meltfptr[1806])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1807*/ meltfptr[1806])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1807*/ meltfptr[1806]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1808*/ meltfptr[1807]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1807*/ meltfptr[1806]); melt_dbgtrace_written_object ( /*_.VALDATA___V1807*/ meltfptr[1806], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1809*/ meltfptr[1808])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1809*/ meltfptr[1808])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1809*/ meltfptr[1808]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1810*/ meltfptr[1809]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1809*/ meltfptr[1808]); melt_dbgtrace_written_object ( /*_.VALDATA___V1809*/ meltfptr[1808], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:4230:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1811*/ meltfptr[1810])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1636__NORMEXP_TUPLE#0", NULL != ( /*_.CLASS_SOURCE_TUPLE__V102*/ meltfptr[101])); ((meltroutine_ptr_t) /*_.VALROUT___V1811*/ meltfptr[1810])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_TUPLE__V102*/ meltfptr[101]); MELT_LOCATION ("warmelt-normal.melt:4230:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1811*/ meltfptr[1810])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1636__NORMEXP_TUPLE#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1811*/ meltfptr[1810])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:4230:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1811*/ meltfptr[1810])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1636__NORMEXP_TUPLE#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1811*/ meltfptr[1810])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:4230:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1811*/ meltfptr[1810])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1636__NORMEXP_TUPLE#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1811*/ meltfptr[1810])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:4230:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1811*/ meltfptr[1810])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1636__NORMEXP_TUPLE#4", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1811*/ meltfptr[1810])->tabval[4] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1812*/ meltfptr[1811])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1812*/ meltfptr[1811])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1812*/ meltfptr[1811]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1813*/ meltfptr[1812]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1812*/ meltfptr[1811]); melt_dbgtrace_written_object ( /*_.VALDATA___V1812*/ meltfptr[1811], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:4230:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1811*/ meltfptr[1810])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1636__NORMEXP_TUPLE#5", NULL != ( /*_.VALDATA___V1812*/ meltfptr[1811])); ((meltroutine_ptr_t) /*_.VALROUT___V1811*/ meltfptr[1810])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1812*/ meltfptr[1811]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1814*/ meltfptr[1813])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1814*/ meltfptr[1813])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1814*/ meltfptr[1813]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1815*/ meltfptr[1814]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1814*/ meltfptr[1813]); melt_dbgtrace_written_object ( /*_.VALDATA___V1814*/ meltfptr[1813], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:4230:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1811*/ meltfptr[1810])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1636__NORMEXP_TUPLE#6", NULL != ( /*_.VALDATA___V1814*/ meltfptr[1813])); ((meltroutine_ptr_t) /*_.VALROUT___V1811*/ meltfptr[1810])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1814*/ meltfptr[1813]); MELT_LOCATION ("warmelt-normal.melt:4230:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1811*/ meltfptr[1810])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1563*/ meltfptr[1562]); ((meltroutine_ptr_t) /*_.VALROUT___V1811*/ meltfptr[1810])->tabval[7] = (melt_ptr_t) ( /*_.VALCLO___V1563*/ meltfptr[1562]); MELT_LOCATION ("warmelt-normal.melt:4230:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1811*/ meltfptr[1810])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1636__NORMEXP_TUPLE#8", NULL != ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1811*/ meltfptr[1810])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-normal.melt:4230:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1811*/ meltfptr[1810])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1636__NORMEXP_TUPLE#9", NULL != ( /*_.FRESH_ENV__V70*/ meltfptr[69])); ((meltroutine_ptr_t) /*_.VALROUT___V1811*/ meltfptr[1810])->tabval[9] = (melt_ptr_t) ( /*_.FRESH_ENV__V70*/ meltfptr[69]); MELT_LOCATION ("warmelt-normal.melt:4230:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1811*/ meltfptr[1810])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1508*/ meltfptr[1507]); ((meltroutine_ptr_t) /*_.VALROUT___V1811*/ meltfptr[1810])->tabval[10] = (melt_ptr_t) ( /*_.VALCLO___V1508*/ meltfptr[1507]); MELT_LOCATION ("warmelt-normal.melt:4230:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1811*/ meltfptr[1810])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V708*/ meltfptr[707]); ((meltroutine_ptr_t) /*_.VALROUT___V1811*/ meltfptr[1810])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V708*/ meltfptr[707]); MELT_LOCATION ("warmelt-normal.melt:4230:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1811*/ meltfptr[1810])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1811*/ meltfptr[1810])->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:4230:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1811*/ meltfptr[1810])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V308*/ meltfptr[307]); ((meltroutine_ptr_t) /*_.VALROUT___V1811*/ meltfptr[1810])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V308*/ meltfptr[307]); MELT_LOCATION ("warmelt-normal.melt:4230:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1811*/ meltfptr[1810])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1636__NORMEXP_TUPLE#14", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1811*/ meltfptr[1810])->tabval[14] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:4230:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1811*/ meltfptr[1810])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1636__NORMEXP_TUPLE#15", NULL != ( /*_.CTYPE_VALUE__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V1811*/ meltfptr[1810])->tabval[15] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normal.melt:4230:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1811*/ meltfptr[1810])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1636__NORMEXP_TUPLE#16", NULL != ( /*_.PUT_ENV__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V1811*/ meltfptr[1810])->tabval[16] = (melt_ptr_t) ( /*_.PUT_ENV__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normal.melt:4230:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1811*/ meltfptr[1810])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V1811*/ meltfptr[1810])->tabval[17] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-normal.melt:4230:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1811*/ meltfptr[1810]); /*putclosurout#61 */ melt_assertmsg ("putclosrout#61 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1816*/ meltfptr[1815])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#61 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1811*/ meltfptr[1810])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1816*/ meltfptr[1815])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1811*/ meltfptr[1810]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1816*/ meltfptr[1815]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1817*/ meltfptr[1816])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1817*/ meltfptr[1816])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1817*/ meltfptr[1816]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1818*/ meltfptr[1817]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1817*/ meltfptr[1816]); melt_dbgtrace_written_object ( /*_.VALDATA___V1817*/ meltfptr[1816], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:4316:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1819*/ meltfptr[1818])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1644__NORMEXP_LIST#0", NULL != ( /*_.CLASS_SOURCE_LIST__V103*/ meltfptr[102])); ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_LIST__V103*/ meltfptr[102]); MELT_LOCATION ("warmelt-normal.melt:4316:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1819*/ meltfptr[1818])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1644__NORMEXP_LIST#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:4316:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1819*/ meltfptr[1818])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1644__NORMEXP_LIST#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:4316:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1819*/ meltfptr[1818])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1644__NORMEXP_LIST#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:4316:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1819*/ meltfptr[1818])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1644__NORMEXP_LIST#4", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[4] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1820*/ meltfptr[1819])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1820*/ meltfptr[1819])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1820*/ meltfptr[1819]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1821*/ meltfptr[1820]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1820*/ meltfptr[1819]); melt_dbgtrace_written_object ( /*_.VALDATA___V1820*/ meltfptr[1819], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:4316:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1819*/ meltfptr[1818])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1644__NORMEXP_LIST#5", NULL != ( /*_.VALDATA___V1820*/ meltfptr[1819])); ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1820*/ meltfptr[1819]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1822*/ meltfptr[1821])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1822*/ meltfptr[1821])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1822*/ meltfptr[1821]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1823*/ meltfptr[1822]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1822*/ meltfptr[1821]); melt_dbgtrace_written_object ( /*_.VALDATA___V1822*/ meltfptr[1821], "new static instance"); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_34 */ void meltmod__warmelt_normal__initialmeltchunk_35 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-normal.melt:4316:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1819*/ meltfptr[1818])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1644__NORMEXP_LIST#6", NULL != ( /*_.VALDATA___V1822*/ meltfptr[1821])); ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1822*/ meltfptr[1821]); MELT_LOCATION ("warmelt-normal.melt:4316:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1819*/ meltfptr[1818])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1563*/ meltfptr[1562]); ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[7] = (melt_ptr_t) ( /*_.VALCLO___V1563*/ meltfptr[1562]); MELT_LOCATION ("warmelt-normal.melt:4316:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1819*/ meltfptr[1818])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1644__NORMEXP_LIST#8", NULL != ( /*_.DISCR_PAIR__V104*/ meltfptr[103])); ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_PAIR__V104*/ meltfptr[103]); MELT_LOCATION ("warmelt-normal.melt:4316:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1819*/ meltfptr[1818])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1644__NORMEXP_LIST#9", NULL != ( /*_.FRESH_ENV__V70*/ meltfptr[69])); ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[9] = (melt_ptr_t) ( /*_.FRESH_ENV__V70*/ meltfptr[69]); MELT_LOCATION ("warmelt-normal.melt:4316:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1819*/ meltfptr[1818])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1644__NORMEXP_LIST#10", NULL != ( /*_.LIST_TO_MULTIPLE__V36*/ meltfptr[35])); ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[10] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V36*/ meltfptr[35]); MELT_LOCATION ("warmelt-normal.melt:4455:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1824*/ meltfptr[1823])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1824*/ meltfptr[1823])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1824*/ meltfptr[1823]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1825*/ meltfptr[1824]); MELT_LOCATION ("warmelt-normal.melt:4455:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1824*/ meltfptr[1823]); MELT_LOCATION ("warmelt-normal.melt:4455:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1824*/ meltfptr[1823], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:4316:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1819*/ meltfptr[1818])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1824*/ meltfptr[1823]); ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V1824*/ meltfptr[1823]); MELT_LOCATION ("warmelt-normal.melt:4316:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1819*/ meltfptr[1818])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1644__NORMEXP_LIST#12", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[12] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:4316:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1819*/ meltfptr[1818])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1644__NORMEXP_LIST#13", NULL != ( /*_.MULTIPLE_MAP__V33*/ meltfptr[32])); ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[13] = (melt_ptr_t) ( /*_.MULTIPLE_MAP__V33*/ meltfptr[32]); MELT_LOCATION ("warmelt-normal.melt:4316:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1819*/ meltfptr[1818])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1644__NORMEXP_LIST#14", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[14] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:4316:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1819*/ meltfptr[1818])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V690*/ meltfptr[689]); ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[15] = (melt_ptr_t) ( /*_.VALDATA___V690*/ meltfptr[689]); MELT_LOCATION ("warmelt-normal.melt:4316:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1819*/ meltfptr[1818])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[16] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:4316:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1819*/ meltfptr[1818])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1644__NORMEXP_LIST#17", NULL != ( /*_.CTYPE_VALUE__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[17] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normal.melt:4316:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1819*/ meltfptr[1818])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1644__NORMEXP_LIST#18", NULL != ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7])); ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[18] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-normal.melt:4334:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1826*/ meltfptr[1825])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1652__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1826*/ meltfptr[1825])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:4334:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1826*/ meltfptr[1825])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V690*/ meltfptr[689]); ((meltroutine_ptr_t) /*_.VALROUT___V1826*/ meltfptr[1825])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V690*/ meltfptr[689]); MELT_LOCATION ("warmelt-normal.melt:4334:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1826*/ meltfptr[1825])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1826*/ meltfptr[1825])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:4334:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1826*/ meltfptr[1825])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1652__LAMBDA_#3", NULL != ( /*_.CTYPE_VALUE__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V1826*/ meltfptr[1825])->tabval[3] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normal.melt:4334:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1826*/ meltfptr[1825])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1652__LAMBDA_#4", NULL != ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7])); ((meltroutine_ptr_t) /*_.VALROUT___V1826*/ meltfptr[1825])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-normal.melt:4334:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1826*/ meltfptr[1825]); MELT_LOCATION ("warmelt-normal.melt:4316:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1819*/ meltfptr[1818])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1644__NORMEXP_LIST#19", NULL != ( /*_.VALROUT___V1826*/ meltfptr[1825])); ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[19] = (melt_ptr_t) ( /*_.VALROUT___V1826*/ meltfptr[1825]); MELT_LOCATION ("warmelt-normal.melt:4316:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1819*/ meltfptr[1818])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V732*/ meltfptr[731]); ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[20] = (melt_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731]); MELT_LOCATION ("warmelt-normal.melt:4316:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1819*/ meltfptr[1818])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1508*/ meltfptr[1507]); ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[21] = (melt_ptr_t) ( /*_.VALCLO___V1508*/ meltfptr[1507]); MELT_LOCATION ("warmelt-normal.melt:4316:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1819*/ meltfptr[1818])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1644__NORMEXP_LIST#22", NULL != ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[22] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normal.melt:4316:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1819*/ meltfptr[1818])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1644__NORMEXP_LIST#23", NULL != ( /*_.PUT_ENV__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[23] = (melt_ptr_t) ( /*_.PUT_ENV__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normal.melt:4316:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1819*/ meltfptr[1818])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[24] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-normal.melt:4316:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1819*/ meltfptr[1818])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1644__NORMEXP_LIST#25", NULL != ( /*_.CTYPE_VALUE__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[25] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normal.melt:4316:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1819*/ meltfptr[1818])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[26] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:4316:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1819*/ meltfptr[1818])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V308*/ meltfptr[307]); ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[27] = (melt_ptr_t) ( /*_.VALDATA___V308*/ meltfptr[307]); MELT_LOCATION ("warmelt-normal.melt:4316:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1819*/ meltfptr[1818])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1644__NORMEXP_LIST#28", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[28] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:4316:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1819*/ meltfptr[1818])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V718*/ meltfptr[717]); ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[29] = (melt_ptr_t) ( /*_.VALDATA___V718*/ meltfptr[717]); MELT_LOCATION ("warmelt-normal.melt:4316:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1819*/ meltfptr[1818])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V690*/ meltfptr[689]); ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[30] = (melt_ptr_t) ( /*_.VALDATA___V690*/ meltfptr[689]); MELT_LOCATION ("warmelt-normal.melt:4316:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1819*/ meltfptr[1818])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1644__NORMEXP_LIST#31", NULL != ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7])); ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[31] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-normal.melt:4640:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1828*/ meltfptr[1827])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1699__NRECLIST_FIND_LOCSYM#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1828*/ meltfptr[1827])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:4640:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1828*/ meltfptr[1827])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1699__NRECLIST_FIND_LOCSYM#1", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V1828*/ meltfptr[1827])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normal.melt:4640:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1828*/ meltfptr[1827])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V308*/ meltfptr[307]); ((meltroutine_ptr_t) /*_.VALROUT___V1828*/ meltfptr[1827])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V308*/ meltfptr[307]); MELT_LOCATION ("warmelt-normal.melt:4640:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1828*/ meltfptr[1827])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1042*/ meltfptr[1041]); ((meltroutine_ptr_t) /*_.VALROUT___V1828*/ meltfptr[1827])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1042*/ meltfptr[1041]); MELT_LOCATION ("warmelt-normal.melt:4640:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1828*/ meltfptr[1827]); /*putclosurout#62 */ melt_assertmsg ("putclosrout#62 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1827*/ meltfptr[1826])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#62 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1828*/ meltfptr[1827])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1827*/ meltfptr[1826])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1828*/ meltfptr[1827]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1827*/ meltfptr[1826]); MELT_LOCATION ("warmelt-normal.melt:4316:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1819*/ meltfptr[1818])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1827*/ meltfptr[1826]); ((meltroutine_ptr_t) /*_.VALROUT___V1819*/ meltfptr[1818])->tabval[32] = (melt_ptr_t) ( /*_.VALCLO___V1827*/ meltfptr[1826]); MELT_LOCATION ("warmelt-normal.melt:4316:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1819*/ meltfptr[1818]); /*putclosurout#63 */ melt_assertmsg ("putclosrout#63 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1829*/ meltfptr[1828])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#63 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1819*/ meltfptr[1818])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1829*/ meltfptr[1828])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1819*/ meltfptr[1818]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1829*/ meltfptr[1828]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1830*/ meltfptr[1829])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1830*/ meltfptr[1829])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1830*/ meltfptr[1829]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1831*/ meltfptr[1830]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1830*/ meltfptr[1829]); melt_dbgtrace_written_object ( /*_.VALDATA___V1830*/ meltfptr[1829], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1832*/ meltfptr[1831])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1832*/ meltfptr[1831])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1832*/ meltfptr[1831]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1833*/ meltfptr[1832]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1832*/ meltfptr[1831]); melt_dbgtrace_written_object ( /*_.VALDATA___V1832*/ meltfptr[1831], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:4455:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1834*/ meltfptr[1833])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1834*/ meltfptr[1833])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1834*/ meltfptr[1833]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1456*/ meltfptr[1455]); MELT_LOCATION ("warmelt-normal.melt:4455:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1834*/ meltfptr[1833])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1834*/ meltfptr[1833])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1834*/ meltfptr[1833]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normal.melt:4455:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1834*/ meltfptr[1833]); MELT_LOCATION ("warmelt-normal.melt:4455:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1834*/ meltfptr[1833], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1835*/ meltfptr[1834])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1835*/ meltfptr[1834])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1835*/ meltfptr[1834]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1836*/ meltfptr[1835]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1835*/ meltfptr[1834]); melt_dbgtrace_written_object ( /*_.VALDATA___V1835*/ meltfptr[1834], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:4455:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1837*/ meltfptr[1836])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1837*/ meltfptr[1836])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1837*/ meltfptr[1836]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1835*/ meltfptr[1834]); MELT_LOCATION ("warmelt-normal.melt:4455:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1837*/ meltfptr[1836])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1837*/ meltfptr[1836])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1837*/ meltfptr[1836]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normal.melt:4455:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1837*/ meltfptr[1836]); MELT_LOCATION ("warmelt-normal.melt:4455:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1837*/ meltfptr[1836], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:4455:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1838*/ meltfptr[1837])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1838*/ meltfptr[1837])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1838*/ meltfptr[1837]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1462*/ meltfptr[1461]); MELT_LOCATION ("warmelt-normal.melt:4455:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1838*/ meltfptr[1837])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1838*/ meltfptr[1837])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1838*/ meltfptr[1837]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normal.melt:4455:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1838*/ meltfptr[1837]); MELT_LOCATION ("warmelt-normal.melt:4455:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1838*/ meltfptr[1837], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1839*/ meltfptr[1838])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1839*/ meltfptr[1838])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1839*/ meltfptr[1838]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1840*/ meltfptr[1839]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1839*/ meltfptr[1838]); melt_dbgtrace_written_object ( /*_.VALDATA___V1839*/ meltfptr[1838], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:4455:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1841*/ meltfptr[1840])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1841*/ meltfptr[1840])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1841*/ meltfptr[1840]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1839*/ meltfptr[1838]); MELT_LOCATION ("warmelt-normal.melt:4455:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1841*/ meltfptr[1840])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1841*/ meltfptr[1840])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1841*/ meltfptr[1840]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normal.melt:4455:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1841*/ meltfptr[1840]); MELT_LOCATION ("warmelt-normal.melt:4455:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1841*/ meltfptr[1840], "new static instance"); /*putupl#695 */ melt_assertmsg ("putupl #695 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1842*/ meltfptr[1841])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #695 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1842*/ meltfptr[1841])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1842*/ meltfptr[1841]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V1834*/ meltfptr[1833]); /*putupl#696 */ melt_assertmsg ("putupl #696 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1842*/ meltfptr[1841])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #696 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1842*/ meltfptr[1841])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1842*/ meltfptr[1841]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1837*/ meltfptr[1836]); /*putupl#697 */ melt_assertmsg ("putupl #697 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1842*/ meltfptr[1841])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #697 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1842*/ meltfptr[1841])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1842*/ meltfptr[1841]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1838*/ meltfptr[1837]); /*putupl#698 */ melt_assertmsg ("putupl #698 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1842*/ meltfptr[1841])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #698 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1842*/ meltfptr[1841])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1842*/ meltfptr[1841]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1841*/ meltfptr[1840]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1842*/ meltfptr[1841]); MELT_LOCATION ("warmelt-normal.melt:4463:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1843*/ meltfptr[1842])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1666__BADMETH_PREPARE_CONSTRUCTOR_BINDING#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1843*/ meltfptr[1842])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:4463:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1843*/ meltfptr[1842])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1666__BADMETH_PREPARE_CONSTRUCTOR_BINDING#1", NULL != ( /*_.CLASS_NAMED__V24*/ meltfptr[23])); ((meltroutine_ptr_t) /*_.VALROUT___V1843*/ meltfptr[1842])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NAMED__V24*/ meltfptr[23]); MELT_LOCATION ("warmelt-normal.melt:4463:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1843*/ meltfptr[1842]); /*putclosurout#64 */ melt_assertmsg ("putclosrout#64 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1844*/ meltfptr[1843])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#64 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1843*/ meltfptr[1842])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1844*/ meltfptr[1843])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1843*/ meltfptr[1842]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1844*/ meltfptr[1843]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1845*/ meltfptr[1844])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1845*/ meltfptr[1844])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1845*/ meltfptr[1844]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1846*/ meltfptr[1845]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1845*/ meltfptr[1844]); melt_dbgtrace_written_object ( /*_.VALDATA___V1845*/ meltfptr[1844], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1847*/ meltfptr[1846])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1847*/ meltfptr[1846])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1847*/ meltfptr[1846]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1848*/ meltfptr[1847]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1847*/ meltfptr[1846]); melt_dbgtrace_written_object ( /*_.VALDATA___V1847*/ meltfptr[1846], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:4474:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1849*/ meltfptr[1848])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1849*/ meltfptr[1848])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1849*/ meltfptr[1848]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1847*/ meltfptr[1846]); MELT_LOCATION ("warmelt-normal.melt:4474:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1849*/ meltfptr[1848])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1849*/ meltfptr[1848])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1849*/ meltfptr[1848]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normal.melt:4474:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1849*/ meltfptr[1848]); MELT_LOCATION ("warmelt-normal.melt:4474:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1849*/ meltfptr[1848], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:4474:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1850*/ meltfptr[1849])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1850*/ meltfptr[1849])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1850*/ meltfptr[1849]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1835*/ meltfptr[1834]); MELT_LOCATION ("warmelt-normal.melt:4474:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1850*/ meltfptr[1849])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1850*/ meltfptr[1849])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1850*/ meltfptr[1849]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normal.melt:4474:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1850*/ meltfptr[1849]); MELT_LOCATION ("warmelt-normal.melt:4474:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1850*/ meltfptr[1849], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1851*/ meltfptr[1850])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1851*/ meltfptr[1850])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1851*/ meltfptr[1850]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1852*/ meltfptr[1851]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1851*/ meltfptr[1850]); melt_dbgtrace_written_object ( /*_.VALDATA___V1851*/ meltfptr[1850], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:4474:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1853*/ meltfptr[1852])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1853*/ meltfptr[1852])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1853*/ meltfptr[1852]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1851*/ meltfptr[1850]); MELT_LOCATION ("warmelt-normal.melt:4474:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1853*/ meltfptr[1852])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1853*/ meltfptr[1852])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1853*/ meltfptr[1852]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normal.melt:4474:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1853*/ meltfptr[1852]); MELT_LOCATION ("warmelt-normal.melt:4474:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1853*/ meltfptr[1852], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:4474:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1854*/ meltfptr[1853])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1854*/ meltfptr[1853])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1854*/ meltfptr[1853]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1459*/ meltfptr[1458]); MELT_LOCATION ("warmelt-normal.melt:4474:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1854*/ meltfptr[1853])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1854*/ meltfptr[1853])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1854*/ meltfptr[1853]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normal.melt:4474:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1854*/ meltfptr[1853]); MELT_LOCATION ("warmelt-normal.melt:4474:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1854*/ meltfptr[1853], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:4474:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1855*/ meltfptr[1854])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1855*/ meltfptr[1854])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1855*/ meltfptr[1854]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1462*/ meltfptr[1461]); MELT_LOCATION ("warmelt-normal.melt:4474:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1855*/ meltfptr[1854])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1855*/ meltfptr[1854])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1855*/ meltfptr[1854]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normal.melt:4474:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1855*/ meltfptr[1854]); MELT_LOCATION ("warmelt-normal.melt:4474:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1855*/ meltfptr[1854], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:4474:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1856*/ meltfptr[1855])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1856*/ meltfptr[1855])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1856*/ meltfptr[1855]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1839*/ meltfptr[1838]); MELT_LOCATION ("warmelt-normal.melt:4474:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1856*/ meltfptr[1855])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1856*/ meltfptr[1855])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1856*/ meltfptr[1855]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-normal.melt:4474:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1856*/ meltfptr[1855]); MELT_LOCATION ("warmelt-normal.melt:4474:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1856*/ meltfptr[1855], "new static instance"); /*putupl#699 */ melt_assertmsg ("putupl #699 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1857*/ meltfptr[1856])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #699 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1857*/ meltfptr[1856])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1857*/ meltfptr[1856]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V1849*/ meltfptr[1848]); /*putupl#700 */ melt_assertmsg ("putupl #700 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1857*/ meltfptr[1856])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #700 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1857*/ meltfptr[1856])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1857*/ meltfptr[1856]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1850*/ meltfptr[1849]); /*putupl#701 */ melt_assertmsg ("putupl #701 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1857*/ meltfptr[1856])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #701 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1857*/ meltfptr[1856])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1857*/ meltfptr[1856]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1853*/ meltfptr[1852]); /*putupl#702 */ melt_assertmsg ("putupl #702 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1857*/ meltfptr[1856])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #702 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1857*/ meltfptr[1856])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1857*/ meltfptr[1856]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1854*/ meltfptr[1853]); /*putupl#703 */ melt_assertmsg ("putupl #703 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1857*/ meltfptr[1856])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #703 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1857*/ meltfptr[1856])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1857*/ meltfptr[1856]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V1855*/ meltfptr[1854]); /*putupl#704 */ melt_assertmsg ("putupl #704 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1857*/ meltfptr[1856])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #704 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1857*/ meltfptr[1856])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1857*/ meltfptr[1856]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1856*/ meltfptr[1855]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1857*/ meltfptr[1856]); MELT_LOCATION ("warmelt-normal.melt:4474:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1858*/ meltfptr[1857])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1858*/ meltfptr[1857])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1858*/ meltfptr[1857]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1859*/ meltfptr[1858]); MELT_LOCATION ("warmelt-normal.melt:4474:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1858*/ meltfptr[1857]); MELT_LOCATION ("warmelt-normal.melt:4474:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1858*/ meltfptr[1857], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:4481:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1860*/ meltfptr[1859])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1683__BADMETH_NORMAL_LETREC_CONSTRUCTIVE#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1860*/ meltfptr[1859])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_35 */ void meltmod__warmelt_normal__initialmeltchunk_36 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-normal.melt:4481:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1860*/ meltfptr[1859])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1683__BADMETH_NORMAL_LETREC_CONSTRUCTIVE#1", NULL != ( /*_.CLASS_NAMED__V24*/ meltfptr[23])); ((meltroutine_ptr_t) /*_.VALROUT___V1860*/ meltfptr[1859])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NAMED__V24*/ meltfptr[23]); MELT_LOCATION ("warmelt-normal.melt:4481:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1860*/ meltfptr[1859]); /*putclosurout#65 */ melt_assertmsg ("putclosrout#65 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1861*/ meltfptr[1860])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#65 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1860*/ meltfptr[1859])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1861*/ meltfptr[1860])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1860*/ meltfptr[1859]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1861*/ meltfptr[1860]); MELT_LOCATION ("warmelt-normal.melt:4492:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1862*/ meltfptr[1861])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1685__PREPCONS_LAMBDA#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1862*/ meltfptr[1861])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:4492:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1862*/ meltfptr[1861])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1685__PREPCONS_LAMBDA#1", NULL != ( /*_.CLASS_SOURCE_LAMBDA__V99*/ meltfptr[98])); ((meltroutine_ptr_t) /*_.VALROUT___V1862*/ meltfptr[1861])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SOURCE_LAMBDA__V99*/ meltfptr[98]); MELT_LOCATION ("warmelt-normal.melt:4492:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1862*/ meltfptr[1861])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V750*/ meltfptr[749]); ((meltroutine_ptr_t) /*_.VALROUT___V1862*/ meltfptr[1861])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V750*/ meltfptr[749]); MELT_LOCATION ("warmelt-normal.melt:4492:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1862*/ meltfptr[1861])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1563*/ meltfptr[1562]); ((meltroutine_ptr_t) /*_.VALROUT___V1862*/ meltfptr[1861])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V1563*/ meltfptr[1562]); MELT_LOCATION ("warmelt-normal.melt:4492:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1862*/ meltfptr[1861])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1685__PREPCONS_LAMBDA#4", NULL != ( /*_.DISCR_CLOSURE__V97*/ meltfptr[96])); ((meltroutine_ptr_t) /*_.VALROUT___V1862*/ meltfptr[1861])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_CLOSURE__V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-normal.melt:4492:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1862*/ meltfptr[1861]); /*putclosurout#66 */ melt_assertmsg ("putclosrout#66 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1863*/ meltfptr[1862])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#66 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1862*/ meltfptr[1861])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1863*/ meltfptr[1862])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1862*/ meltfptr[1861]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1863*/ meltfptr[1862]); MELT_LOCATION ("warmelt-normal.melt:4509:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1864*/ meltfptr[1863])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1687__NORMLETREC_LAMBDA#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1864*/ meltfptr[1863])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:4509:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1864*/ meltfptr[1863])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V750*/ meltfptr[749]); ((meltroutine_ptr_t) /*_.VALROUT___V1864*/ meltfptr[1863])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V750*/ meltfptr[749]); MELT_LOCATION ("warmelt-normal.melt:4509:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1864*/ meltfptr[1863])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1687__NORMLETREC_LAMBDA#2", NULL != ( /*_.FRESH_ENV__V70*/ meltfptr[69])); ((meltroutine_ptr_t) /*_.VALROUT___V1864*/ meltfptr[1863])->tabval[2] = (melt_ptr_t) ( /*_.FRESH_ENV__V70*/ meltfptr[69]); MELT_LOCATION ("warmelt-normal.melt:4509:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1864*/ meltfptr[1863])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1687__NORMLETREC_LAMBDA#3", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1864*/ meltfptr[1863])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:4509:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1864*/ meltfptr[1863])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1795*/ meltfptr[1794]); ((meltroutine_ptr_t) /*_.VALROUT___V1864*/ meltfptr[1863])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V1795*/ meltfptr[1794]); MELT_LOCATION ("warmelt-normal.melt:4509:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1864*/ meltfptr[1863]); /*putclosurout#67 */ melt_assertmsg ("putclosrout#67 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1865*/ meltfptr[1864])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#67 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1864*/ meltfptr[1863])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1865*/ meltfptr[1864])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1864*/ meltfptr[1863]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1865*/ meltfptr[1864]); MELT_LOCATION ("warmelt-normal.melt:4541:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1866*/ meltfptr[1865])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1689__PREPCONS_TUPLE#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1866*/ meltfptr[1865])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:4541:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1866*/ meltfptr[1865])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1689__PREPCONS_TUPLE#1", NULL != ( /*_.CLASS_SOURCE_TUPLE__V102*/ meltfptr[101])); ((meltroutine_ptr_t) /*_.VALROUT___V1866*/ meltfptr[1865])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SOURCE_TUPLE__V102*/ meltfptr[101]); MELT_LOCATION ("warmelt-normal.melt:4541:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1866*/ meltfptr[1865])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1689__PREPCONS_TUPLE#2", NULL != ( /*_.CLASS_LOCATED__V27*/ meltfptr[26])); ((meltroutine_ptr_t) /*_.VALROUT___V1866*/ meltfptr[1865])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V27*/ meltfptr[26]); MELT_LOCATION ("warmelt-normal.melt:4541:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1866*/ meltfptr[1865])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1689__PREPCONS_TUPLE#3", NULL != ( /*_.CLASS_SOURCE_ARGUMENTED_OPERATOR__V105*/ meltfptr[104])); ((meltroutine_ptr_t) /*_.VALROUT___V1866*/ meltfptr[1865])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_SOURCE_ARGUMENTED_OPERATOR__V105*/ meltfptr[104]); MELT_LOCATION ("warmelt-normal.melt:4541:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1866*/ meltfptr[1865])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1689__PREPCONS_TUPLE#4", NULL != ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1866*/ meltfptr[1865])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-normal.melt:4541:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1866*/ meltfptr[1865])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V708*/ meltfptr[707]); ((meltroutine_ptr_t) /*_.VALROUT___V1866*/ meltfptr[1865])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V708*/ meltfptr[707]); MELT_LOCATION ("warmelt-normal.melt:4541:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1866*/ meltfptr[1865])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1563*/ meltfptr[1562]); ((meltroutine_ptr_t) /*_.VALROUT___V1866*/ meltfptr[1865])->tabval[6] = (melt_ptr_t) ( /*_.VALCLO___V1563*/ meltfptr[1562]); MELT_LOCATION ("warmelt-normal.melt:4541:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1866*/ meltfptr[1865]); /*putclosurout#68 */ melt_assertmsg ("putclosrout#68 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1867*/ meltfptr[1866])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#68 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1866*/ meltfptr[1865])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1867*/ meltfptr[1866])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1866*/ meltfptr[1865]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1867*/ meltfptr[1866]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1868*/ meltfptr[1867])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1868*/ meltfptr[1867])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1868*/ meltfptr[1867]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1869*/ meltfptr[1868]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1868*/ meltfptr[1867]); melt_dbgtrace_written_object ( /*_.VALDATA___V1868*/ meltfptr[1867], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:4562:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1870*/ meltfptr[1869])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1693__NORMLETREC_TUPLE#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1870*/ meltfptr[1869])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:4562:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1870*/ meltfptr[1869])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1693__NORMLETREC_TUPLE#1", NULL != ( /*_.CLASS_SOURCE_TUPLE__V102*/ meltfptr[101])); ((meltroutine_ptr_t) /*_.VALROUT___V1870*/ meltfptr[1869])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SOURCE_TUPLE__V102*/ meltfptr[101]); MELT_LOCATION ("warmelt-normal.melt:4562:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1870*/ meltfptr[1869])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1693__NORMLETREC_TUPLE#2", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1870*/ meltfptr[1869])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:4562:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1870*/ meltfptr[1869])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V708*/ meltfptr[707]); ((meltroutine_ptr_t) /*_.VALROUT___V1870*/ meltfptr[1869])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V708*/ meltfptr[707]); MELT_LOCATION ("warmelt-normal.melt:4562:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1870*/ meltfptr[1869])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1693__NORMLETREC_TUPLE#4", NULL != ( /*_.CLASS_LOCATED__V27*/ meltfptr[26])); ((meltroutine_ptr_t) /*_.VALROUT___V1870*/ meltfptr[1869])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V27*/ meltfptr[26]); MELT_LOCATION ("warmelt-normal.melt:4562:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1870*/ meltfptr[1869])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V690*/ meltfptr[689]); ((meltroutine_ptr_t) /*_.VALROUT___V1870*/ meltfptr[1869])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V690*/ meltfptr[689]); MELT_LOCATION ("warmelt-normal.melt:4562:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1870*/ meltfptr[1869])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V308*/ meltfptr[307]); ((meltroutine_ptr_t) /*_.VALROUT___V1870*/ meltfptr[1869])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V308*/ meltfptr[307]); MELT_LOCATION ("warmelt-normal.melt:4562:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1870*/ meltfptr[1869])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1508*/ meltfptr[1507]); ((meltroutine_ptr_t) /*_.VALROUT___V1870*/ meltfptr[1869])->tabval[7] = (melt_ptr_t) ( /*_.VALCLO___V1508*/ meltfptr[1507]); MELT_LOCATION ("warmelt-normal.melt:4562:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1870*/ meltfptr[1869])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1693__NORMLETREC_TUPLE#8", NULL != ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V1870*/ meltfptr[1869])->tabval[8] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normal.melt:4562:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1870*/ meltfptr[1869]); /*putclosurout#69 */ melt_assertmsg ("putclosrout#69 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1871*/ meltfptr[1870])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#69 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1870*/ meltfptr[1869])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1871*/ meltfptr[1870])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1870*/ meltfptr[1869]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1871*/ meltfptr[1870]); MELT_LOCATION ("warmelt-normal.melt:4597:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1872*/ meltfptr[1871])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1695__PREPCONS_LIST#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1872*/ meltfptr[1871])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:4597:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1872*/ meltfptr[1871])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1695__PREPCONS_LIST#1", NULL != ( /*_.CLASS_SOURCE_LIST__V103*/ meltfptr[102])); ((meltroutine_ptr_t) /*_.VALROUT___V1872*/ meltfptr[1871])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SOURCE_LIST__V103*/ meltfptr[102]); MELT_LOCATION ("warmelt-normal.melt:4597:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1872*/ meltfptr[1871])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1695__PREPCONS_LIST#2", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1872*/ meltfptr[1871])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:4597:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1872*/ meltfptr[1871])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1695__PREPCONS_LIST#3", NULL != ( /*_.CLASS_LOCATED__V27*/ meltfptr[26])); ((meltroutine_ptr_t) /*_.VALROUT___V1872*/ meltfptr[1871])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V27*/ meltfptr[26]); MELT_LOCATION ("warmelt-normal.melt:4597:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1872*/ meltfptr[1871])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1695__PREPCONS_LIST#4", NULL != ( /*_.CLASS_SOURCE_ARGUMENTED_OPERATOR__V105*/ meltfptr[104])); ((meltroutine_ptr_t) /*_.VALROUT___V1872*/ meltfptr[1871])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_SOURCE_ARGUMENTED_OPERATOR__V105*/ meltfptr[104]); MELT_LOCATION ("warmelt-normal.melt:4597:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1872*/ meltfptr[1871])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1695__PREPCONS_LIST#5", NULL != ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1872*/ meltfptr[1871])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-normal.melt:4597:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1872*/ meltfptr[1871])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V732*/ meltfptr[731]); ((meltroutine_ptr_t) /*_.VALROUT___V1872*/ meltfptr[1871])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731]); MELT_LOCATION ("warmelt-normal.melt:4597:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1872*/ meltfptr[1871])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1563*/ meltfptr[1562]); ((meltroutine_ptr_t) /*_.VALROUT___V1872*/ meltfptr[1871])->tabval[7] = (melt_ptr_t) ( /*_.VALCLO___V1563*/ meltfptr[1562]); MELT_LOCATION ("warmelt-normal.melt:4597:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1872*/ meltfptr[1871])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1695__PREPCONS_LIST#8", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1872*/ meltfptr[1871])->tabval[8] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-normal.melt:4597:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1872*/ meltfptr[1871])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1695__PREPCONS_LIST#9", NULL != ( /*_.CLASS_NAMED__V24*/ meltfptr[23])); ((meltroutine_ptr_t) /*_.VALROUT___V1872*/ meltfptr[1871])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_NAMED__V24*/ meltfptr[23]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1873*/ meltfptr[1872])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1873*/ meltfptr[1872])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1873*/ meltfptr[1872]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1874*/ meltfptr[1873]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1873*/ meltfptr[1872]); melt_dbgtrace_written_object ( /*_.VALDATA___V1873*/ meltfptr[1872], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:4597:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1872*/ meltfptr[1871])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1695__PREPCONS_LIST#10", NULL != ( /*_.VALDATA___V1873*/ meltfptr[1872])); ((meltroutine_ptr_t) /*_.VALROUT___V1872*/ meltfptr[1871])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V1873*/ meltfptr[1872]); MELT_LOCATION ("warmelt-normal.melt:4597:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1872*/ meltfptr[1871])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V718*/ meltfptr[717]); ((meltroutine_ptr_t) /*_.VALROUT___V1872*/ meltfptr[1871])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V718*/ meltfptr[717]); MELT_LOCATION ("warmelt-normal.melt:4597:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1872*/ meltfptr[1871])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1695__PREPCONS_LIST#12", NULL != ( /*_.DISCR_PAIR__V104*/ meltfptr[103])); ((meltroutine_ptr_t) /*_.VALROUT___V1872*/ meltfptr[1871])->tabval[12] = (melt_ptr_t) ( /*_.DISCR_PAIR__V104*/ meltfptr[103]); MELT_LOCATION ("warmelt-normal.melt:4597:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1872*/ meltfptr[1871]); /*putclosurout#70 */ melt_assertmsg ("putclosrout#70 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1875*/ meltfptr[1874])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#70 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1872*/ meltfptr[1871])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1875*/ meltfptr[1874])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1872*/ meltfptr[1871]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1875*/ meltfptr[1874]); MELT_LOCATION ("warmelt-normal.melt:4658:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1876*/ meltfptr[1875])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1701__NORMLETREC_LIST#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1876*/ meltfptr[1875])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:4658:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1876*/ meltfptr[1875])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1701__NORMLETREC_LIST#1", NULL != ( /*_.CLASS_SOURCE_LIST__V103*/ meltfptr[102])); ((meltroutine_ptr_t) /*_.VALROUT___V1876*/ meltfptr[1875])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SOURCE_LIST__V103*/ meltfptr[102]); MELT_LOCATION ("warmelt-normal.melt:4658:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1876*/ meltfptr[1875])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1701__NORMLETREC_LIST#2", NULL != ( /*_.CLASS_LOCATED__V27*/ meltfptr[26])); ((meltroutine_ptr_t) /*_.VALROUT___V1876*/ meltfptr[1875])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V27*/ meltfptr[26]); MELT_LOCATION ("warmelt-normal.melt:4658:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1876*/ meltfptr[1875])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1701__NORMLETREC_LIST#3", NULL != ( /*_.CLASS_SOURCE_ARGUMENTED_OPERATOR__V105*/ meltfptr[104])); ((meltroutine_ptr_t) /*_.VALROUT___V1876*/ meltfptr[1875])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_SOURCE_ARGUMENTED_OPERATOR__V105*/ meltfptr[104]); MELT_LOCATION ("warmelt-normal.melt:4658:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1876*/ meltfptr[1875])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V690*/ meltfptr[689]); ((meltroutine_ptr_t) /*_.VALROUT___V1876*/ meltfptr[1875])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V690*/ meltfptr[689]); MELT_LOCATION ("warmelt-normal.melt:4658:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1876*/ meltfptr[1875])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V308*/ meltfptr[307]); ((meltroutine_ptr_t) /*_.VALROUT___V1876*/ meltfptr[1875])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V308*/ meltfptr[307]); MELT_LOCATION ("warmelt-normal.melt:4658:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1876*/ meltfptr[1875])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V732*/ meltfptr[731]); ((meltroutine_ptr_t) /*_.VALROUT___V1876*/ meltfptr[1875])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731]); MELT_LOCATION ("warmelt-normal.melt:4658:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1876*/ meltfptr[1875])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1508*/ meltfptr[1507]); ((meltroutine_ptr_t) /*_.VALROUT___V1876*/ meltfptr[1875])->tabval[7] = (melt_ptr_t) ( /*_.VALCLO___V1508*/ meltfptr[1507]); MELT_LOCATION ("warmelt-normal.melt:4658:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1876*/ meltfptr[1875])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V718*/ meltfptr[717]); ((meltroutine_ptr_t) /*_.VALROUT___V1876*/ meltfptr[1875])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V718*/ meltfptr[717]); MELT_LOCATION ("warmelt-normal.melt:4658:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1876*/ meltfptr[1875])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1701__NORMLETREC_LIST#9", NULL != ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7])); ((meltroutine_ptr_t) /*_.VALROUT___V1876*/ meltfptr[1875])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-normal.melt:4658:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1876*/ meltfptr[1875])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1827*/ meltfptr[1826]); ((meltroutine_ptr_t) /*_.VALROUT___V1876*/ meltfptr[1875])->tabval[10] = (melt_ptr_t) ( /*_.VALCLO___V1827*/ meltfptr[1826]); MELT_LOCATION ("warmelt-normal.melt:4658:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1876*/ meltfptr[1875])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1701__NORMLETREC_LIST#11", NULL != ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V1876*/ meltfptr[1875])->tabval[11] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normal.melt:4658:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1876*/ meltfptr[1875]); /*putclosurout#71 */ melt_assertmsg ("putclosrout#71 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1877*/ meltfptr[1876])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#71 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1876*/ meltfptr[1875])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1877*/ meltfptr[1876])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1876*/ meltfptr[1875]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1877*/ meltfptr[1876]); MELT_LOCATION ("warmelt-normal.melt:4732:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1878*/ meltfptr[1877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1703__PREPCONS_INSTANCE#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1878*/ meltfptr[1877])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:4732:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1878*/ meltfptr[1877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1703__PREPCONS_INSTANCE#1", NULL != ( /*_.CLASS_SOURCE_INSTANCE__V86*/ meltfptr[85])); ((meltroutine_ptr_t) /*_.VALROUT___V1878*/ meltfptr[1877])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SOURCE_INSTANCE__V86*/ meltfptr[85]); MELT_LOCATION ("warmelt-normal.melt:4732:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1878*/ meltfptr[1877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1703__PREPCONS_INSTANCE#2", NULL != ( /*_.CLASS_LOCATED__V27*/ meltfptr[26])); ((meltroutine_ptr_t) /*_.VALROUT___V1878*/ meltfptr[1877])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V27*/ meltfptr[26]); MELT_LOCATION ("warmelt-normal.melt:4732:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1878*/ meltfptr[1877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1703__PREPCONS_INSTANCE#3", NULL != ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7])); ((meltroutine_ptr_t) /*_.VALROUT___V1878*/ meltfptr[1877])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-normal.melt:4732:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1878*/ meltfptr[1877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1703__PREPCONS_INSTANCE#4", NULL != ( /*_.CLASS_CLASS__V47*/ meltfptr[46])); ((meltroutine_ptr_t) /*_.VALROUT___V1878*/ meltfptr[1877])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_CLASS__V47*/ meltfptr[46]); MELT_LOCATION ("warmelt-normal.melt:4732:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1878*/ meltfptr[1877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1703__PREPCONS_INSTANCE#5", NULL != ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1878*/ meltfptr[1877])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-normal.melt:4732:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1878*/ meltfptr[1877])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V768*/ meltfptr[767]); ((meltroutine_ptr_t) /*_.VALROUT___V1878*/ meltfptr[1877])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V768*/ meltfptr[767]); MELT_LOCATION ("warmelt-normal.melt:4732:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1878*/ meltfptr[1877]); /*putclosurout#72 */ melt_assertmsg ("putclosrout#72 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1879*/ meltfptr[1878])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#72 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1878*/ meltfptr[1877])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1879*/ meltfptr[1878])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1878*/ meltfptr[1877]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1879*/ meltfptr[1878]); MELT_LOCATION ("warmelt-normal.melt:4759:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1880*/ meltfptr[1879])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1705__NORMLETREC_INSTANCE#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:4759:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1880*/ meltfptr[1879])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V768*/ meltfptr[767]); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V768*/ meltfptr[767]); MELT_LOCATION ("warmelt-normal.melt:4759:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1880*/ meltfptr[1879])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V690*/ meltfptr[689]); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V690*/ meltfptr[689]); MELT_LOCATION ("warmelt-normal.melt:4759:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1880*/ meltfptr[1879])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V308*/ meltfptr[307]); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V308*/ meltfptr[307]); MELT_LOCATION ("warmelt-normal.melt:4759:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1880*/ meltfptr[1879])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1705__NORMLETREC_INSTANCE#4", NULL != ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7])); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-normal.melt:4759:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1880*/ meltfptr[1879])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1705__NORMLETREC_INSTANCE#5", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normal.melt:4759:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1880*/ meltfptr[1879])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:4759:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1880*/ meltfptr[1879])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1705__NORMLETREC_INSTANCE#7", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[7] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:4759:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1880*/ meltfptr[1879])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V176*/ meltfptr[175]); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); MELT_LOCATION ("warmelt-normal.melt:4759:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1880*/ meltfptr[1879])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1705__NORMLETREC_INSTANCE#9", NULL != ( /*_.MULTIPLE_MAP__V33*/ meltfptr[32])); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[9] = (melt_ptr_t) ( /*_.MULTIPLE_MAP__V33*/ meltfptr[32]); MELT_LOCATION ("warmelt-normal.melt:4759:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1880*/ meltfptr[1879])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1705__NORMLETREC_INSTANCE#10", NULL != ( /*_.CLASS_SOURCE_FIELDASSIGN__V83*/ meltfptr[82])); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_SOURCE_FIELDASSIGN__V83*/ meltfptr[82]); MELT_LOCATION ("warmelt-normal.melt:4759:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1880*/ meltfptr[1879])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:4759:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1880*/ meltfptr[1879])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1705__NORMLETREC_INSTANCE#12", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[12] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:4759:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1880*/ meltfptr[1879])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1705__NORMLETREC_INSTANCE#13", NULL != ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[13] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normal.melt:4759:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1880*/ meltfptr[1879])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V576*/ meltfptr[575]); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[14] = (melt_ptr_t) ( /*_.VALDATA___V576*/ meltfptr[575]); MELT_LOCATION ("warmelt-normal.melt:4781:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1881*/ meltfptr[1880])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1707__LAMBDA_#0", NULL != ( /*_.CLASS_SOURCE_FIELDASSIGN__V83*/ meltfptr[82])); ((meltroutine_ptr_t) /*_.VALROUT___V1881*/ meltfptr[1880])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_FIELDASSIGN__V83*/ meltfptr[82]); MELT_LOCATION ("warmelt-normal.melt:4781:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1881*/ meltfptr[1880])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V1881*/ meltfptr[1880])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:4781:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1881*/ meltfptr[1880])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1707__LAMBDA_#2", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1881*/ meltfptr[1880])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:4781:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1881*/ meltfptr[1880])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1707__LAMBDA_#3", NULL != ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V1881*/ meltfptr[1880])->tabval[3] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normal.melt:4781:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1881*/ meltfptr[1880])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V576*/ meltfptr[575]); ((meltroutine_ptr_t) /*_.VALROUT___V1881*/ meltfptr[1880])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V576*/ meltfptr[575]); MELT_LOCATION ("warmelt-normal.melt:4781:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1881*/ meltfptr[1880]); MELT_LOCATION ("warmelt-normal.melt:4759:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1880*/ meltfptr[1879])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1705__NORMLETREC_INSTANCE#15", NULL != ( /*_.VALROUT___V1881*/ meltfptr[1880])); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[15] = (melt_ptr_t) ( /*_.VALROUT___V1881*/ meltfptr[1880]); MELT_LOCATION ("warmelt-normal.melt:4759:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1880*/ meltfptr[1879])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V576*/ meltfptr[575]); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[16] = (melt_ptr_t) ( /*_.VALDATA___V576*/ meltfptr[575]); MELT_LOCATION ("warmelt-normal.melt:4759:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1880*/ meltfptr[1879])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1705__NORMLETREC_INSTANCE#17", NULL != ( /*_.CLASS_FIELD__V80*/ meltfptr[79])); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[17] = (melt_ptr_t) ( /*_.CLASS_FIELD__V80*/ meltfptr[79]); MELT_LOCATION ("warmelt-normal.melt:4759:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1880*/ meltfptr[1879])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[18] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-normal.melt:4759:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1880*/ meltfptr[1879])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1705__NORMLETREC_INSTANCE#19", NULL != ( /*_.CTYPE_VALUE__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[19] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normal.melt:4759:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1880*/ meltfptr[1879])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1705__NORMLETREC_INSTANCE#20", NULL != ( /*_.CLASS_NAMED__V24*/ meltfptr[23])); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[20] = (melt_ptr_t) ( /*_.CLASS_NAMED__V24*/ meltfptr[23]); MELT_LOCATION ("warmelt-normal.melt:4759:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1880*/ meltfptr[1879])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1705__NORMLETREC_INSTANCE#21", NULL != ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[21] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normal.melt:4759:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1880*/ meltfptr[1879]); /*putclosurout#73 */ melt_assertmsg ("putclosrout#73 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1882*/ meltfptr[1881])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#73 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1880*/ meltfptr[1879])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1882*/ meltfptr[1881])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1880*/ meltfptr[1879]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1882*/ meltfptr[1881]); MELT_LOCATION ("warmelt-normal.melt:4828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1883*/ meltfptr[1882])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1708__NORMEXP_LETREC#0", NULL != ( /*_.CLASS_SOURCE_LETREC__V106*/ meltfptr[105])); ((meltroutine_ptr_t) /*_.VALROUT___V1883*/ meltfptr[1882])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_LETREC__V106*/ meltfptr[105]); MELT_LOCATION ("warmelt-normal.melt:4828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1883*/ meltfptr[1882])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1708__NORMEXP_LETREC#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1883*/ meltfptr[1882])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:4828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1883*/ meltfptr[1882])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1708__NORMEXP_LETREC#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1883*/ meltfptr[1882])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:4828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1883*/ meltfptr[1882])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1708__NORMEXP_LETREC#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1883*/ meltfptr[1882])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:4828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1883*/ meltfptr[1882])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1708__NORMEXP_LETREC#4", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1883*/ meltfptr[1882])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:4828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1883*/ meltfptr[1882])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1708__NORMEXP_LETREC#5", NULL != ( /*_.FRESH_ENV__V70*/ meltfptr[69])); ((meltroutine_ptr_t) /*_.VALROUT___V1883*/ meltfptr[1882])->tabval[5] = (melt_ptr_t) ( /*_.FRESH_ENV__V70*/ meltfptr[69]); MELT_LOCATION ("warmelt-normal.melt:4828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1883*/ meltfptr[1882])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1708__NORMEXP_LETREC#6", NULL != ( /*_.DISCR_MAP_OBJECTS__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1883*/ meltfptr[1882])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-normal.melt:4828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1883*/ meltfptr[1882])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1708__NORMEXP_LETREC#7", NULL != ( /*_.CLASS_SOURCE_LETREC_BINDING__V107*/ meltfptr[106])); ((meltroutine_ptr_t) /*_.VALROUT___V1883*/ meltfptr[1882])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_SOURCE_LETREC_BINDING__V107*/ meltfptr[106]); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_36 */ void meltmod__warmelt_normal__initialmeltchunk_37 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-normal.melt:4828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1883*/ meltfptr[1882])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1708__NORMEXP_LETREC#8", NULL != ( /*_.CLASS_SOURCE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1883*/ meltfptr[1882])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_SOURCE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-normal.melt:4828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1883*/ meltfptr[1882])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1708__NORMEXP_LETREC#9", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V1883*/ meltfptr[1882])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normal.melt:4828:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1883*/ meltfptr[1882])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1824*/ meltfptr[1823]); ((meltroutine_ptr_t) /*_.VALROUT___V1883*/ meltfptr[1882])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V1824*/ meltfptr[1823]); MELT_LOCATION ("warmelt-normal.melt:4828:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1883*/ meltfptr[1882])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V690*/ meltfptr[689]); ((meltroutine_ptr_t) /*_.VALROUT___V1883*/ meltfptr[1882])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V690*/ meltfptr[689]); MELT_LOCATION ("warmelt-normal.melt:4828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1883*/ meltfptr[1882])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1708__NORMEXP_LETREC#12", NULL != ( /*_.LIST_TO_MULTIPLE__V36*/ meltfptr[35])); ((meltroutine_ptr_t) /*_.VALROUT___V1883*/ meltfptr[1882])->tabval[12] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V36*/ meltfptr[35]); MELT_LOCATION ("warmelt-normal.melt:4828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1883*/ meltfptr[1882])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1708__NORMEXP_LETREC#13", NULL != ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1883*/ meltfptr[1882])->tabval[13] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-normal.melt:4828:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1883*/ meltfptr[1882])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V308*/ meltfptr[307]); ((meltroutine_ptr_t) /*_.VALROUT___V1883*/ meltfptr[1882])->tabval[14] = (melt_ptr_t) ( /*_.VALDATA___V308*/ meltfptr[307]); MELT_LOCATION ("warmelt-normal.melt:4828:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1883*/ meltfptr[1882])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1883*/ meltfptr[1882])->tabval[15] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:4828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1883*/ meltfptr[1882])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1708__NORMEXP_LETREC#16", NULL != ( /*_.CTYPE_VALUE__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V1883*/ meltfptr[1882])->tabval[16] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normal.melt:4828:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1883*/ meltfptr[1882])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V768*/ meltfptr[767]); ((meltroutine_ptr_t) /*_.VALROUT___V1883*/ meltfptr[1882])->tabval[17] = (melt_ptr_t) ( /*_.VALDATA___V768*/ meltfptr[767]); MELT_LOCATION ("warmelt-normal.melt:4828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1883*/ meltfptr[1882])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1708__NORMEXP_LETREC#18", NULL != ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7])); ((meltroutine_ptr_t) /*_.VALROUT___V1883*/ meltfptr[1882])->tabval[18] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-normal.melt:4828:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1883*/ meltfptr[1882])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V1883*/ meltfptr[1882])->tabval[19] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:4828:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1883*/ meltfptr[1882])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V176*/ meltfptr[175]); ((meltroutine_ptr_t) /*_.VALROUT___V1883*/ meltfptr[1882])->tabval[20] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); MELT_LOCATION ("warmelt-normal.melt:4828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1883*/ meltfptr[1882])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1708__NORMEXP_LETREC#21", NULL != ( /*_.PUT_ENV__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V1883*/ meltfptr[1882])->tabval[21] = (melt_ptr_t) ( /*_.PUT_ENV__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normal.melt:4828:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1883*/ meltfptr[1882])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1858*/ meltfptr[1857]); ((meltroutine_ptr_t) /*_.VALROUT___V1883*/ meltfptr[1882])->tabval[22] = (melt_ptr_t) ( /*_.VALDATA___V1858*/ meltfptr[1857]); MELT_LOCATION ("warmelt-normal.melt:4828:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1883*/ meltfptr[1882])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1508*/ meltfptr[1507]); ((meltroutine_ptr_t) /*_.VALROUT___V1883*/ meltfptr[1882])->tabval[23] = (melt_ptr_t) ( /*_.VALCLO___V1508*/ meltfptr[1507]); MELT_LOCATION ("warmelt-normal.melt:4828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1883*/ meltfptr[1882])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1708__NORMEXP_LETREC#24", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1883*/ meltfptr[1882])->tabval[24] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:4828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1883*/ meltfptr[1882])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1708__NORMEXP_LETREC#25", NULL != ( /*_.CTYPE_VOID__V57*/ meltfptr[56])); ((meltroutine_ptr_t) /*_.VALROUT___V1883*/ meltfptr[1882])->tabval[25] = (melt_ptr_t) ( /*_.CTYPE_VOID__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-normal.melt:4828:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1883*/ meltfptr[1882])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V1883*/ meltfptr[1882])->tabval[26] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-normal.melt:4828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1883*/ meltfptr[1882])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1708__NORMEXP_LETREC#27", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1883*/ meltfptr[1882])->tabval[27] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1884*/ meltfptr[1883])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1884*/ meltfptr[1883])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1884*/ meltfptr[1883]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1885*/ meltfptr[1884]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1884*/ meltfptr[1883]); melt_dbgtrace_written_object ( /*_.VALDATA___V1884*/ meltfptr[1883], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:4828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1883*/ meltfptr[1882])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1708__NORMEXP_LETREC#28", NULL != ( /*_.VALDATA___V1884*/ meltfptr[1883])); ((meltroutine_ptr_t) /*_.VALROUT___V1883*/ meltfptr[1882])->tabval[28] = (melt_ptr_t) ( /*_.VALDATA___V1884*/ meltfptr[1883]); MELT_LOCATION ("warmelt-normal.melt:4828:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1883*/ meltfptr[1882]); /*putclosurout#74 */ melt_assertmsg ("putclosrout#74 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1886*/ meltfptr[1885])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#74 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1883*/ meltfptr[1882])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1886*/ meltfptr[1885])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1883*/ meltfptr[1882]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1886*/ meltfptr[1885]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1887*/ meltfptr[1886])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1887*/ meltfptr[1886])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1887*/ meltfptr[1886]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1888*/ meltfptr[1887]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1887*/ meltfptr[1886]); melt_dbgtrace_written_object ( /*_.VALDATA___V1887*/ meltfptr[1886], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1889*/ meltfptr[1888])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1889*/ meltfptr[1888])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1889*/ meltfptr[1888]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1890*/ meltfptr[1889]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1889*/ meltfptr[1888]); melt_dbgtrace_written_object ( /*_.VALDATA___V1889*/ meltfptr[1888], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1891*/ meltfptr[1890])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1891*/ meltfptr[1890])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1891*/ meltfptr[1890]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1892*/ meltfptr[1891]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1891*/ meltfptr[1890]); melt_dbgtrace_written_object ( /*_.VALDATA___V1891*/ meltfptr[1890], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:5083:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1893*/ meltfptr[1892])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1722__NORMAL_KEYWORD_DATA#0", NULL != ( /*_.CLASS_KEYWORD__V109*/ meltfptr[108])); ((meltroutine_ptr_t) /*_.VALROUT___V1893*/ meltfptr[1892])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_KEYWORD__V109*/ meltfptr[108]); MELT_LOCATION ("warmelt-normal.melt:5083:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1893*/ meltfptr[1892])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1722__NORMAL_KEYWORD_DATA#1", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1893*/ meltfptr[1892])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:5083:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1893*/ meltfptr[1892])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V938*/ meltfptr[937]); ((meltroutine_ptr_t) /*_.VALROUT___V1893*/ meltfptr[1892])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V938*/ meltfptr[937]); MELT_LOCATION ("warmelt-normal.melt:5083:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1893*/ meltfptr[1892])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1563*/ meltfptr[1562]); ((meltroutine_ptr_t) /*_.VALROUT___V1893*/ meltfptr[1892])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V1563*/ meltfptr[1562]); MELT_LOCATION ("warmelt-normal.melt:5083:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1893*/ meltfptr[1892])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1722__NORMAL_KEYWORD_DATA#4", NULL != ( /*_.DISCR_STRING__V22*/ meltfptr[21])); ((meltroutine_ptr_t) /*_.VALROUT___V1893*/ meltfptr[1892])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_STRING__V22*/ meltfptr[21]); MELT_LOCATION ("warmelt-normal.melt:5083:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1893*/ meltfptr[1892])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1722__NORMAL_KEYWORD_DATA#5", NULL != ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1893*/ meltfptr[1892])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-normal.melt:5083:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1893*/ meltfptr[1892])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V978*/ meltfptr[977]); ((meltroutine_ptr_t) /*_.VALROUT___V1893*/ meltfptr[1892])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V978*/ meltfptr[977]); MELT_LOCATION ("warmelt-normal.melt:5083:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1893*/ meltfptr[1892])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1722__NORMAL_KEYWORD_DATA#7", NULL != ( /*_.DISCR_INTEGER__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1893*/ meltfptr[1892])->tabval[7] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normal.melt:5083:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1893*/ meltfptr[1892])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1722__NORMAL_KEYWORD_DATA#8", NULL != ( /*_.NAMED_NAME__V108*/ meltfptr[107])); ((meltroutine_ptr_t) /*_.VALROUT___V1893*/ meltfptr[1892])->tabval[8] = (melt_ptr_t) ( /*_.NAMED_NAME__V108*/ meltfptr[107]); MELT_LOCATION ("warmelt-normal.melt:5083:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1893*/ meltfptr[1892])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1216*/ meltfptr[1215]); ((meltroutine_ptr_t) /*_.VALROUT___V1893*/ meltfptr[1892])->tabval[9] = (melt_ptr_t) ( /*_.VALCLO___V1216*/ meltfptr[1215]); MELT_LOCATION ("warmelt-normal.melt:5083:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1893*/ meltfptr[1892]); /*putclosurout#75 */ melt_assertmsg ("putclosrout#75 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1894*/ meltfptr[1893])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#75 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1893*/ meltfptr[1892])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1894*/ meltfptr[1893])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1893*/ meltfptr[1892]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1894*/ meltfptr[1893]); MELT_LOCATION ("warmelt-normal.melt:5117:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1895*/ meltfptr[1894])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1724__CREATE_DATA_SLOTS#0", NULL != ( /*_.CLASS_CLASS__V47*/ meltfptr[46])); ((meltroutine_ptr_t) /*_.VALROUT___V1895*/ meltfptr[1894])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_CLASS__V47*/ meltfptr[46]); MELT_LOCATION ("warmelt-normal.melt:5117:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1895*/ meltfptr[1894])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1724__CREATE_DATA_SLOTS#1", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1895*/ meltfptr[1894])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:5117:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1895*/ meltfptr[1894])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1724__CREATE_DATA_SLOTS#2", NULL != ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1895*/ meltfptr[1894])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-normal.melt:5117:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1895*/ meltfptr[1894]); /*putclosurout#76 */ melt_assertmsg ("putclosrout#76 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1896*/ meltfptr[1895])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#76 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1895*/ meltfptr[1894])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1896*/ meltfptr[1895])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1895*/ meltfptr[1894]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1896*/ meltfptr[1895]); MELT_LOCATION ("warmelt-normal.melt:5128:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1897*/ meltfptr[1896])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V916*/ meltfptr[915]); ((meltroutine_ptr_t) /*_.VALROUT___V1897*/ meltfptr[1896])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915]); MELT_LOCATION ("warmelt-normal.melt:5128:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1897*/ meltfptr[1896])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1726__FILL_DATA_SLOT#1", NULL != ( /*_.CLASS_FIELD__V80*/ meltfptr[79])); ((meltroutine_ptr_t) /*_.VALROUT___V1897*/ meltfptr[1896])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_FIELD__V80*/ meltfptr[79]); MELT_LOCATION ("warmelt-normal.melt:5128:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1897*/ meltfptr[1896]); /*putclosurout#77 */ melt_assertmsg ("putclosrout#77 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1898*/ meltfptr[1897])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#77 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1897*/ meltfptr[1896])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1898*/ meltfptr[1897])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1897*/ meltfptr[1896]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1898*/ meltfptr[1897]); MELT_LOCATION ("warmelt-normal.melt:5139:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1899*/ meltfptr[1898])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1728__NORMEXP_QUOTE#0", NULL != ( /*_.CLASS_SOURCE_QUOTE__V110*/ meltfptr[109])); ((meltroutine_ptr_t) /*_.VALROUT___V1899*/ meltfptr[1898])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_QUOTE__V110*/ meltfptr[109]); MELT_LOCATION ("warmelt-normal.melt:5139:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1899*/ meltfptr[1898])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1728__NORMEXP_QUOTE#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1899*/ meltfptr[1898])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:5139:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1899*/ meltfptr[1898])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1728__NORMEXP_QUOTE#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1899*/ meltfptr[1898])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:5139:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1899*/ meltfptr[1898])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1728__NORMEXP_QUOTE#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1899*/ meltfptr[1898])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:5139:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1899*/ meltfptr[1898])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1728__NORMEXP_QUOTE#4", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V1899*/ meltfptr[1898])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normal.melt:5139:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1899*/ meltfptr[1898])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1561*/ meltfptr[1560]); ((meltroutine_ptr_t) /*_.VALROUT___V1899*/ meltfptr[1898])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1561*/ meltfptr[1560]); MELT_LOCATION ("warmelt-normal.melt:5139:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1899*/ meltfptr[1898])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V948*/ meltfptr[947]); ((meltroutine_ptr_t) /*_.VALROUT___V1899*/ meltfptr[1898])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V948*/ meltfptr[947]); MELT_LOCATION ("warmelt-normal.melt:5139:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1899*/ meltfptr[1898])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1563*/ meltfptr[1562]); ((meltroutine_ptr_t) /*_.VALROUT___V1899*/ meltfptr[1898])->tabval[7] = (melt_ptr_t) ( /*_.VALCLO___V1563*/ meltfptr[1562]); MELT_LOCATION ("warmelt-normal.melt:5139:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1899*/ meltfptr[1898])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1728__NORMEXP_QUOTE#8", NULL != ( /*_.DISCR_CONSTANT_INTEGER__V14*/ meltfptr[13])); ((meltroutine_ptr_t) /*_.VALROUT___V1899*/ meltfptr[1898])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_CONSTANT_INTEGER__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-normal.melt:5139:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1899*/ meltfptr[1898])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1216*/ meltfptr[1215]); ((meltroutine_ptr_t) /*_.VALROUT___V1899*/ meltfptr[1898])->tabval[9] = (melt_ptr_t) ( /*_.VALCLO___V1216*/ meltfptr[1215]); MELT_LOCATION ("warmelt-normal.melt:5139:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1899*/ meltfptr[1898])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V938*/ meltfptr[937]); ((meltroutine_ptr_t) /*_.VALROUT___V1899*/ meltfptr[1898])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V938*/ meltfptr[937]); MELT_LOCATION ("warmelt-normal.melt:5139:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1899*/ meltfptr[1898])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1728__NORMEXP_QUOTE#11", NULL != ( /*_.DISCR_STRING__V22*/ meltfptr[21])); ((meltroutine_ptr_t) /*_.VALROUT___V1899*/ meltfptr[1898])->tabval[11] = (melt_ptr_t) ( /*_.DISCR_STRING__V22*/ meltfptr[21]); MELT_LOCATION ("warmelt-normal.melt:5139:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1899*/ meltfptr[1898])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V816*/ meltfptr[815]); ((meltroutine_ptr_t) /*_.VALROUT___V1899*/ meltfptr[1898])->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]); MELT_LOCATION ("warmelt-normal.melt:5139:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1899*/ meltfptr[1898])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1100*/ meltfptr[1099]); ((meltroutine_ptr_t) /*_.VALROUT___V1899*/ meltfptr[1898])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V1100*/ meltfptr[1099]); MELT_LOCATION ("warmelt-normal.melt:5139:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1899*/ meltfptr[1898]); /*putclosurout#78 */ melt_assertmsg ("putclosrout#78 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1900*/ meltfptr[1899])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#78 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1899*/ meltfptr[1898])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1900*/ meltfptr[1899])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1899*/ meltfptr[1898]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1900*/ meltfptr[1899]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1901*/ meltfptr[1900])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1901*/ meltfptr[1900])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1901*/ meltfptr[1900]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1902*/ meltfptr[1901]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1901*/ meltfptr[1900]); melt_dbgtrace_written_object ( /*_.VALDATA___V1901*/ meltfptr[1900], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:5195:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1903*/ meltfptr[1902])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1732__NORMEXP_COMMENT#0", NULL != ( /*_.CLASS_SOURCE_COMMENT__V111*/ meltfptr[110])); ((meltroutine_ptr_t) /*_.VALROUT___V1903*/ meltfptr[1902])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_COMMENT__V111*/ meltfptr[110]); MELT_LOCATION ("warmelt-normal.melt:5195:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1903*/ meltfptr[1902])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1732__NORMEXP_COMMENT#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1903*/ meltfptr[1902])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:5195:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1903*/ meltfptr[1902])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1732__NORMEXP_COMMENT#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1903*/ meltfptr[1902])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:5195:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1903*/ meltfptr[1902])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1732__NORMEXP_COMMENT#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1903*/ meltfptr[1902])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:5195:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1903*/ meltfptr[1902])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V284*/ meltfptr[283]); ((meltroutine_ptr_t) /*_.VALROUT___V1903*/ meltfptr[1902])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V284*/ meltfptr[283]); MELT_LOCATION ("warmelt-normal.melt:5195:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1903*/ meltfptr[1902])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1732__NORMEXP_COMMENT#5", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1903*/ meltfptr[1902])->tabval[5] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1904*/ meltfptr[1903])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1904*/ meltfptr[1903])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1904*/ meltfptr[1903]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1905*/ meltfptr[1904]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1904*/ meltfptr[1903]); melt_dbgtrace_written_object ( /*_.VALDATA___V1904*/ meltfptr[1903], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:5195:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1903*/ meltfptr[1902])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1732__NORMEXP_COMMENT#6", NULL != ( /*_.VALDATA___V1904*/ meltfptr[1903])); ((meltroutine_ptr_t) /*_.VALROUT___V1903*/ meltfptr[1902])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1904*/ meltfptr[1903]); MELT_LOCATION ("warmelt-normal.melt:5195:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1903*/ meltfptr[1902])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1732__NORMEXP_COMMENT#7", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1903*/ meltfptr[1902])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:5195:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1903*/ meltfptr[1902])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1732__NORMEXP_COMMENT#8", NULL != ( /*_.CTYPE_VOID__V57*/ meltfptr[56])); ((meltroutine_ptr_t) /*_.VALROUT___V1903*/ meltfptr[1902])->tabval[8] = (melt_ptr_t) ( /*_.CTYPE_VOID__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-normal.melt:5195:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1903*/ meltfptr[1902])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1903*/ meltfptr[1902])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:5195:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1903*/ meltfptr[1902])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1732__NORMEXP_COMMENT#10", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1903*/ meltfptr[1902])->tabval[10] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:5195:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1903*/ meltfptr[1902]); /*putclosurout#79 */ melt_assertmsg ("putclosrout#79 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1906*/ meltfptr[1905])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#79 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1903*/ meltfptr[1902])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1906*/ meltfptr[1905])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1903*/ meltfptr[1902]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1906*/ meltfptr[1905]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1907*/ meltfptr[1906])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1907*/ meltfptr[1906])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1907*/ meltfptr[1906]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1908*/ meltfptr[1907]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1907*/ meltfptr[1906]); melt_dbgtrace_written_object ( /*_.VALDATA___V1907*/ meltfptr[1906], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:5229:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1909*/ meltfptr[1908])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1738__NORMEXP_KEYWORD#0", NULL != ( /*_.CLASS_KEYWORD__V109*/ meltfptr[108])); ((meltroutine_ptr_t) /*_.VALROUT___V1909*/ meltfptr[1908])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_KEYWORD__V109*/ meltfptr[108]); MELT_LOCATION ("warmelt-normal.melt:5229:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1909*/ meltfptr[1908])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1738__NORMEXP_KEYWORD#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1909*/ meltfptr[1908])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:5229:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1909*/ meltfptr[1908])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1738__NORMEXP_KEYWORD#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1909*/ meltfptr[1908])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:5229:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1909*/ meltfptr[1908])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1738__NORMEXP_KEYWORD#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1909*/ meltfptr[1908])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:5229:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1909*/ meltfptr[1908])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1894*/ meltfptr[1893]); ((meltroutine_ptr_t) /*_.VALROUT___V1909*/ meltfptr[1908])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V1894*/ meltfptr[1893]); MELT_LOCATION ("warmelt-normal.melt:5229:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1909*/ meltfptr[1908])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V782*/ meltfptr[781]); ((meltroutine_ptr_t) /*_.VALROUT___V1909*/ meltfptr[1908])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V782*/ meltfptr[781]); MELT_LOCATION ("warmelt-normal.melt:5229:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1909*/ meltfptr[1908])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V816*/ meltfptr[815]); ((meltroutine_ptr_t) /*_.VALROUT___V1909*/ meltfptr[1908])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]); MELT_LOCATION ("warmelt-normal.melt:5229:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1909*/ meltfptr[1908])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1100*/ meltfptr[1099]); ((meltroutine_ptr_t) /*_.VALROUT___V1909*/ meltfptr[1908])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V1100*/ meltfptr[1099]); MELT_LOCATION ("warmelt-normal.melt:5229:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1909*/ meltfptr[1908]); /*putclosurout#80 */ melt_assertmsg ("putclosrout#80 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1910*/ meltfptr[1909])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#80 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1909*/ meltfptr[1908])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1910*/ meltfptr[1909])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1909*/ meltfptr[1908]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1910*/ meltfptr[1909]); MELT_LOCATION ("warmelt-normal.melt:5261:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1911*/ meltfptr[1910])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1740__FILL_NORMAL_FORMALBIND#0", NULL != ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V1911*/ meltfptr[1910])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-normal.melt:5261:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1911*/ meltfptr[1910])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1896*/ meltfptr[1895]); ((meltroutine_ptr_t) /*_.VALROUT___V1911*/ meltfptr[1910])->tabval[1] = (melt_ptr_t) ( /*_.VALCLO___V1896*/ meltfptr[1895]); MELT_LOCATION ("warmelt-normal.melt:5261:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1911*/ meltfptr[1910])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V916*/ meltfptr[915]); ((meltroutine_ptr_t) /*_.VALROUT___V1911*/ meltfptr[1910])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915]); MELT_LOCATION ("warmelt-normal.melt:5261:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1911*/ meltfptr[1910])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1563*/ meltfptr[1562]); ((meltroutine_ptr_t) /*_.VALROUT___V1911*/ meltfptr[1910])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V1563*/ meltfptr[1562]); MELT_LOCATION ("warmelt-normal.melt:5261:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1911*/ meltfptr[1910])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1740__FILL_NORMAL_FORMALBIND#4", NULL != ( /*_.DISCR_INTEGER__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1911*/ meltfptr[1910])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normal.melt:5261:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1911*/ meltfptr[1910])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1561*/ meltfptr[1560]); ((meltroutine_ptr_t) /*_.VALROUT___V1911*/ meltfptr[1910])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1561*/ meltfptr[1560]); MELT_LOCATION ("warmelt-normal.melt:5261:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1911*/ meltfptr[1910])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1740__FILL_NORMAL_FORMALBIND#6", NULL != ( /*_.CLASS_CTYPE__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V1911*/ meltfptr[1910])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-normal.melt:5261:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1911*/ meltfptr[1910])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1216*/ meltfptr[1215]); ((meltroutine_ptr_t) /*_.VALROUT___V1911*/ meltfptr[1910])->tabval[7] = (melt_ptr_t) ( /*_.VALCLO___V1216*/ meltfptr[1215]); MELT_LOCATION ("warmelt-normal.melt:5261:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1911*/ meltfptr[1910])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1898*/ meltfptr[1897]); ((meltroutine_ptr_t) /*_.VALROUT___V1911*/ meltfptr[1910])->tabval[8] = (melt_ptr_t) ( /*_.VALCLO___V1898*/ meltfptr[1897]); MELT_LOCATION ("warmelt-normal.melt:5261:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1911*/ meltfptr[1910])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1740__FILL_NORMAL_FORMALBIND#9", NULL != ( /*_.BINDER__V112*/ meltfptr[111])); ((meltroutine_ptr_t) /*_.VALROUT___V1911*/ meltfptr[1910])->tabval[9] = (melt_ptr_t) ( /*_.BINDER__V112*/ meltfptr[111]); MELT_LOCATION ("warmelt-normal.melt:5261:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1911*/ meltfptr[1910])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1740__FILL_NORMAL_FORMALBIND#10", NULL != ( /*_.FBIND_TYPE__V113*/ meltfptr[112])); ((meltroutine_ptr_t) /*_.VALROUT___V1911*/ meltfptr[1910])->tabval[10] = (melt_ptr_t) ( /*_.FBIND_TYPE__V113*/ meltfptr[112]); MELT_LOCATION ("warmelt-normal.melt:5261:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1911*/ meltfptr[1910]); /*putclosurout#81 */ melt_assertmsg ("putclosrout#81 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1912*/ meltfptr[1911])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#81 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1911*/ meltfptr[1910])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1912*/ meltfptr[1911])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1911*/ meltfptr[1910]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1912*/ meltfptr[1911]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1913*/ meltfptr[1912])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1913*/ meltfptr[1912])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1913*/ meltfptr[1912]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1914*/ meltfptr[1913]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1913*/ meltfptr[1912]); melt_dbgtrace_written_object ( /*_.VALDATA___V1913*/ meltfptr[1912], "new static instance"); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_37 */ void meltmod__warmelt_normal__initialmeltchunk_38 (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___V1915*/ meltfptr[1914])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1915*/ meltfptr[1914])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1915*/ meltfptr[1914]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1916*/ meltfptr[1915]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1915*/ meltfptr[1914]); melt_dbgtrace_written_object ( /*_.VALDATA___V1915*/ meltfptr[1914], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:5286:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1917*/ meltfptr[1916])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1912*/ meltfptr[1911]); ((meltroutine_ptr_t) /*_.VALROUT___V1917*/ meltfptr[1916])->tabval[0] = (melt_ptr_t) ( /*_.VALCLO___V1912*/ meltfptr[1911]); MELT_LOCATION ("warmelt-normal.melt:5286:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1917*/ meltfptr[1916])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V916*/ meltfptr[915]); ((meltroutine_ptr_t) /*_.VALROUT___V1917*/ meltfptr[1916])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915]); MELT_LOCATION ("warmelt-normal.melt:5286:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1917*/ meltfptr[1916])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1746__FILL_NORMAL_FORMALS#2", NULL != ( /*_.DISCR_INTEGER__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1917*/ meltfptr[1916])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normal.melt:5286:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1917*/ meltfptr[1916]); /*putclosurout#82 */ melt_assertmsg ("putclosrout#82 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1918*/ meltfptr[1917])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#82 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1917*/ meltfptr[1916])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1918*/ meltfptr[1917])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1917*/ meltfptr[1916]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1918*/ meltfptr[1917]); MELT_LOCATION ("warmelt-normal.melt:5299:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1919*/ meltfptr[1918])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1748__FILL_NORMAL_EXPANSION#0", NULL != ( /*_.MULTIPLE_EVERY__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1919*/ meltfptr[1918])->tabval[0] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-normal.melt:5299:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1919*/ meltfptr[1918])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1748__FILL_NORMAL_EXPANSION#1", NULL != ( /*_.DISCR_VERBATIM_STRING__V56*/ meltfptr[55])); ((meltroutine_ptr_t) /*_.VALROUT___V1919*/ meltfptr[1918])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V56*/ meltfptr[55]); MELT_LOCATION ("warmelt-normal.melt:5299:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1919*/ meltfptr[1918])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1216*/ meltfptr[1215]); ((meltroutine_ptr_t) /*_.VALROUT___V1919*/ meltfptr[1918])->tabval[2] = (melt_ptr_t) ( /*_.VALCLO___V1216*/ meltfptr[1215]); MELT_LOCATION ("warmelt-normal.melt:5299:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1919*/ meltfptr[1918])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V938*/ meltfptr[937]); ((meltroutine_ptr_t) /*_.VALROUT___V1919*/ meltfptr[1918])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V938*/ meltfptr[937]); MELT_LOCATION ("warmelt-normal.melt:5299:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1919*/ meltfptr[1918])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1563*/ meltfptr[1562]); ((meltroutine_ptr_t) /*_.VALROUT___V1919*/ meltfptr[1918])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V1563*/ meltfptr[1562]); MELT_LOCATION ("warmelt-normal.melt:5299:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1919*/ meltfptr[1918])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1748__FILL_NORMAL_EXPANSION#5", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V1919*/ meltfptr[1918])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normal.melt:5299:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1919*/ meltfptr[1918])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1561*/ meltfptr[1560]); ((meltroutine_ptr_t) /*_.VALROUT___V1919*/ meltfptr[1918])->tabval[6] = (melt_ptr_t) ( /*_.VALCLO___V1561*/ meltfptr[1560]); MELT_LOCATION ("warmelt-normal.melt:5299:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1919*/ meltfptr[1918])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1748__FILL_NORMAL_EXPANSION#7", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1919*/ meltfptr[1918])->tabval[7] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:5302:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1920*/ meltfptr[1919])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1750__LAMBDA_#0", NULL != ( /*_.DISCR_VERBATIM_STRING__V56*/ meltfptr[55])); ((meltroutine_ptr_t) /*_.VALROUT___V1920*/ meltfptr[1919])->tabval[0] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V56*/ meltfptr[55]); MELT_LOCATION ("warmelt-normal.melt:5302:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1920*/ meltfptr[1919])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1216*/ meltfptr[1215]); ((meltroutine_ptr_t) /*_.VALROUT___V1920*/ meltfptr[1919])->tabval[1] = (melt_ptr_t) ( /*_.VALCLO___V1216*/ meltfptr[1215]); MELT_LOCATION ("warmelt-normal.melt:5302:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1920*/ meltfptr[1919])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V938*/ meltfptr[937]); ((meltroutine_ptr_t) /*_.VALROUT___V1920*/ meltfptr[1919])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V938*/ meltfptr[937]); MELT_LOCATION ("warmelt-normal.melt:5302:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1920*/ meltfptr[1919])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1563*/ meltfptr[1562]); ((meltroutine_ptr_t) /*_.VALROUT___V1920*/ meltfptr[1919])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V1563*/ meltfptr[1562]); MELT_LOCATION ("warmelt-normal.melt:5302:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1920*/ meltfptr[1919])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1750__LAMBDA_#4", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V1920*/ meltfptr[1919])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normal.melt:5302:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1920*/ meltfptr[1919])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1561*/ meltfptr[1560]); ((meltroutine_ptr_t) /*_.VALROUT___V1920*/ meltfptr[1919])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1561*/ meltfptr[1560]); MELT_LOCATION ("warmelt-normal.melt:5302:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1920*/ meltfptr[1919])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1750__LAMBDA_#6", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1920*/ meltfptr[1919])->tabval[6] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:5302:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1920*/ meltfptr[1919]); MELT_LOCATION ("warmelt-normal.melt:5299:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1919*/ meltfptr[1918])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1748__FILL_NORMAL_EXPANSION#8", NULL != ( /*_.VALROUT___V1920*/ meltfptr[1919])); ((meltroutine_ptr_t) /*_.VALROUT___V1919*/ meltfptr[1918])->tabval[8] = (melt_ptr_t) ( /*_.VALROUT___V1920*/ meltfptr[1919]); MELT_LOCATION ("warmelt-normal.melt:5299:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1919*/ meltfptr[1918]); /*putclosurout#83 */ melt_assertmsg ("putclosrout#83 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1921*/ meltfptr[1920])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#83 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1919*/ meltfptr[1918])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1921*/ meltfptr[1920])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1919*/ meltfptr[1918]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1921*/ meltfptr[1920]); MELT_LOCATION ("warmelt-normal.melt:5324:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1922*/ meltfptr[1921])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1751__NORMEXP_DEFPRIMITIVE#0", NULL != ( /*_.CLASS_SOURCE_DEFPRIMITIVE__V114*/ meltfptr[113])); ((meltroutine_ptr_t) /*_.VALROUT___V1922*/ meltfptr[1921])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_DEFPRIMITIVE__V114*/ meltfptr[113]); MELT_LOCATION ("warmelt-normal.melt:5324:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1922*/ meltfptr[1921])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1751__NORMEXP_DEFPRIMITIVE#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1922*/ meltfptr[1921])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:5324:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1922*/ meltfptr[1921])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1751__NORMEXP_DEFPRIMITIVE#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1922*/ meltfptr[1921])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:5324:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1922*/ meltfptr[1921])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1751__NORMEXP_DEFPRIMITIVE#3", NULL != ( /*_.FIND_ENV__V48*/ meltfptr[47])); ((meltroutine_ptr_t) /*_.VALROUT___V1922*/ meltfptr[1921])->tabval[3] = (melt_ptr_t) ( /*_.FIND_ENV__V48*/ meltfptr[47]); MELT_LOCATION ("warmelt-normal.melt:5324:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1922*/ meltfptr[1921])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1896*/ meltfptr[1895]); ((meltroutine_ptr_t) /*_.VALROUT___V1922*/ meltfptr[1921])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V1896*/ meltfptr[1895]); MELT_LOCATION ("warmelt-normal.melt:5324:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1922*/ meltfptr[1921])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1751__NORMEXP_DEFPRIMITIVE#5", NULL != ( /*_.CLASS_PRIMITIVE__V51*/ meltfptr[50])); ((meltroutine_ptr_t) /*_.VALROUT___V1922*/ meltfptr[1921])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_PRIMITIVE__V51*/ meltfptr[50]); MELT_LOCATION ("warmelt-normal.melt:5324:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1922*/ meltfptr[1921])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1751__NORMEXP_DEFPRIMITIVE#6", NULL != ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1922*/ meltfptr[1921])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-normal.melt:5324:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1922*/ meltfptr[1921])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V958*/ meltfptr[957]); ((meltroutine_ptr_t) /*_.VALROUT___V1922*/ meltfptr[1921])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V958*/ meltfptr[957]); MELT_LOCATION ("warmelt-normal.melt:5324:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1922*/ meltfptr[1921])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1563*/ meltfptr[1562]); ((meltroutine_ptr_t) /*_.VALROUT___V1922*/ meltfptr[1921])->tabval[8] = (melt_ptr_t) ( /*_.VALCLO___V1563*/ meltfptr[1562]); MELT_LOCATION ("warmelt-normal.melt:5324:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1922*/ meltfptr[1921])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V916*/ meltfptr[915]); ((meltroutine_ptr_t) /*_.VALROUT___V1922*/ meltfptr[1921])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915]); MELT_LOCATION ("warmelt-normal.melt:5324:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1922*/ meltfptr[1921])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1751__NORMEXP_DEFPRIMITIVE#10", NULL != ( /*_.DISCR_INTEGER__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1922*/ meltfptr[1921])->tabval[10] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normal.melt:5324:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1922*/ meltfptr[1921])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1561*/ meltfptr[1560]); ((meltroutine_ptr_t) /*_.VALROUT___V1922*/ meltfptr[1921])->tabval[11] = (melt_ptr_t) ( /*_.VALCLO___V1561*/ meltfptr[1560]); MELT_LOCATION ("warmelt-normal.melt:5324:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1922*/ meltfptr[1921])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1751__NORMEXP_DEFPRIMITIVE#12", NULL != ( /*_.DISCR_MAP_OBJECTS__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1922*/ meltfptr[1921])->tabval[12] = (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-normal.melt:5324:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1922*/ meltfptr[1921])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1216*/ meltfptr[1215]); ((meltroutine_ptr_t) /*_.VALROUT___V1922*/ meltfptr[1921])->tabval[13] = (melt_ptr_t) ( /*_.VALCLO___V1216*/ meltfptr[1215]); MELT_LOCATION ("warmelt-normal.melt:5324:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1922*/ meltfptr[1921])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1918*/ meltfptr[1917]); ((meltroutine_ptr_t) /*_.VALROUT___V1922*/ meltfptr[1921])->tabval[14] = (melt_ptr_t) ( /*_.VALCLO___V1918*/ meltfptr[1917]); MELT_LOCATION ("warmelt-normal.melt:5324:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1922*/ meltfptr[1921])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1921*/ meltfptr[1920]); ((meltroutine_ptr_t) /*_.VALROUT___V1922*/ meltfptr[1921])->tabval[15] = (melt_ptr_t) ( /*_.VALCLO___V1921*/ meltfptr[1920]); MELT_LOCATION ("warmelt-normal.melt:5324:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1922*/ meltfptr[1921])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1898*/ meltfptr[1897]); ((meltroutine_ptr_t) /*_.VALROUT___V1922*/ meltfptr[1921])->tabval[16] = (melt_ptr_t) ( /*_.VALCLO___V1898*/ meltfptr[1897]); MELT_LOCATION ("warmelt-normal.melt:5324:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1922*/ meltfptr[1921])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1751__NORMEXP_DEFPRIMITIVE#17", NULL != ( /*_.NAMED_NAME__V108*/ meltfptr[107])); ((meltroutine_ptr_t) /*_.VALROUT___V1922*/ meltfptr[1921])->tabval[17] = (melt_ptr_t) ( /*_.NAMED_NAME__V108*/ meltfptr[107]); MELT_LOCATION ("warmelt-normal.melt:5324:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1922*/ meltfptr[1921])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V938*/ meltfptr[937]); ((meltroutine_ptr_t) /*_.VALROUT___V1922*/ meltfptr[1921])->tabval[18] = (melt_ptr_t) ( /*_.VALDATA___V938*/ meltfptr[937]); MELT_LOCATION ("warmelt-normal.melt:5324:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1922*/ meltfptr[1921])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1751__NORMEXP_DEFPRIMITIVE#19", NULL != ( /*_.DISCR_STRING__V22*/ meltfptr[21])); ((meltroutine_ptr_t) /*_.VALROUT___V1922*/ meltfptr[1921])->tabval[19] = (melt_ptr_t) ( /*_.DISCR_STRING__V22*/ meltfptr[21]); MELT_LOCATION ("warmelt-normal.melt:5324:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1922*/ meltfptr[1921])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1751__NORMEXP_DEFPRIMITIVE#20", NULL != ( /*_.PRIM_FORMALS__V115*/ meltfptr[114])); ((meltroutine_ptr_t) /*_.VALROUT___V1922*/ meltfptr[1921])->tabval[20] = (melt_ptr_t) ( /*_.PRIM_FORMALS__V115*/ meltfptr[114]); MELT_LOCATION ("warmelt-normal.melt:5324:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1922*/ meltfptr[1921])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1751__NORMEXP_DEFPRIMITIVE#21", NULL != ( /*_.PRIM_EXPANSION__V116*/ meltfptr[115])); ((meltroutine_ptr_t) /*_.VALROUT___V1922*/ meltfptr[1921])->tabval[21] = (melt_ptr_t) ( /*_.PRIM_EXPANSION__V116*/ meltfptr[115]); MELT_LOCATION ("warmelt-normal.melt:5324:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1922*/ meltfptr[1921])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1751__NORMEXP_DEFPRIMITIVE#22", NULL != ( /*_.PRIM_TYPE__V117*/ meltfptr[116])); ((meltroutine_ptr_t) /*_.VALROUT___V1922*/ meltfptr[1921])->tabval[22] = (melt_ptr_t) ( /*_.PRIM_TYPE__V117*/ meltfptr[116]); MELT_LOCATION ("warmelt-normal.melt:5324:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1922*/ meltfptr[1921])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1751__NORMEXP_DEFPRIMITIVE#23", NULL != ( /*_.CLASS_PRIMITIVE_BINDING__V118*/ meltfptr[117])); ((meltroutine_ptr_t) /*_.VALROUT___V1922*/ meltfptr[1921])->tabval[23] = (melt_ptr_t) ( /*_.CLASS_PRIMITIVE_BINDING__V118*/ meltfptr[117]); MELT_LOCATION ("warmelt-normal.melt:5324:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1922*/ meltfptr[1921])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1751__NORMEXP_DEFPRIMITIVE#24", NULL != ( /*_.CLASS_FIXED_BINDING__V43*/ meltfptr[42])); ((meltroutine_ptr_t) /*_.VALROUT___V1922*/ meltfptr[1921])->tabval[24] = (melt_ptr_t) ( /*_.CLASS_FIXED_BINDING__V43*/ meltfptr[42]); MELT_LOCATION ("warmelt-normal.melt:5324:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1922*/ meltfptr[1921]); /*putclosurout#84 */ melt_assertmsg ("putclosrout#84 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1923*/ meltfptr[1922])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#84 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1922*/ meltfptr[1921])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1923*/ meltfptr[1922])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1922*/ meltfptr[1921]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1923*/ meltfptr[1922]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1924*/ meltfptr[1923])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1924*/ meltfptr[1923])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1924*/ meltfptr[1923]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1925*/ meltfptr[1924]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1924*/ meltfptr[1923]); melt_dbgtrace_written_object ( /*_.VALDATA___V1924*/ meltfptr[1923], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1926*/ meltfptr[1925])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1926*/ meltfptr[1925])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1926*/ meltfptr[1925]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1927*/ meltfptr[1926]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1926*/ meltfptr[1925]); melt_dbgtrace_written_object ( /*_.VALDATA___V1926*/ meltfptr[1925], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1928*/ meltfptr[1927])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1928*/ meltfptr[1927])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1928*/ meltfptr[1927]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1929*/ meltfptr[1928]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1928*/ meltfptr[1927]); melt_dbgtrace_written_object ( /*_.VALDATA___V1928*/ meltfptr[1927], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1930*/ meltfptr[1929])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1930*/ meltfptr[1929])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1930*/ meltfptr[1929]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1931*/ meltfptr[1930]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1930*/ meltfptr[1929]); melt_dbgtrace_written_object ( /*_.VALDATA___V1930*/ meltfptr[1929], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1932*/ meltfptr[1931])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1932*/ meltfptr[1931])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1932*/ meltfptr[1931]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1933*/ meltfptr[1932]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1932*/ meltfptr[1931]); melt_dbgtrace_written_object ( /*_.VALDATA___V1932*/ meltfptr[1931], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:5390:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1934*/ meltfptr[1933])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1763__NORMEXP_DEFCITERATOR#0", NULL != ( /*_.CLASS_SOURCE_DEFCITERATOR__V119*/ meltfptr[118])); ((meltroutine_ptr_t) /*_.VALROUT___V1934*/ meltfptr[1933])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_DEFCITERATOR__V119*/ meltfptr[118]); MELT_LOCATION ("warmelt-normal.melt:5390:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1934*/ meltfptr[1933])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1763__NORMEXP_DEFCITERATOR#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1934*/ meltfptr[1933])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:5390:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1934*/ meltfptr[1933])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1763__NORMEXP_DEFCITERATOR#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1934*/ meltfptr[1933])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:5390:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1934*/ meltfptr[1933])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1763__NORMEXP_DEFCITERATOR#3", NULL != ( /*_.CLASS_CITERATOR__V120*/ meltfptr[119])); ((meltroutine_ptr_t) /*_.VALROUT___V1934*/ meltfptr[1933])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_CITERATOR__V120*/ meltfptr[119]); MELT_LOCATION ("warmelt-normal.melt:5390:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1934*/ meltfptr[1933])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1763__NORMEXP_DEFCITERATOR#4", NULL != ( /*_.FIND_ENV__V48*/ meltfptr[47])); ((meltroutine_ptr_t) /*_.VALROUT___V1934*/ meltfptr[1933])->tabval[4] = (melt_ptr_t) ( /*_.FIND_ENV__V48*/ meltfptr[47]); MELT_LOCATION ("warmelt-normal.melt:5390:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1934*/ meltfptr[1933])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1763__NORMEXP_DEFCITERATOR#5", NULL != ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1934*/ meltfptr[1933])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-normal.melt:5390:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1934*/ meltfptr[1933])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1763__NORMEXP_DEFCITERATOR#6", NULL != ( /*_.DISCR_MAP_OBJECTS__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1934*/ meltfptr[1933])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-normal.melt:5390:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1934*/ meltfptr[1933])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V938*/ meltfptr[937]); ((meltroutine_ptr_t) /*_.VALROUT___V1934*/ meltfptr[1933])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V938*/ meltfptr[937]); MELT_LOCATION ("warmelt-normal.melt:5390:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1934*/ meltfptr[1933])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1563*/ meltfptr[1562]); ((meltroutine_ptr_t) /*_.VALROUT___V1934*/ meltfptr[1933])->tabval[8] = (melt_ptr_t) ( /*_.VALCLO___V1563*/ meltfptr[1562]); MELT_LOCATION ("warmelt-normal.melt:5390:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1934*/ meltfptr[1933])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1763__NORMEXP_DEFCITERATOR#9", NULL != ( /*_.DISCR_STRING__V22*/ meltfptr[21])); ((meltroutine_ptr_t) /*_.VALROUT___V1934*/ meltfptr[1933])->tabval[9] = (melt_ptr_t) ( /*_.DISCR_STRING__V22*/ meltfptr[21]); MELT_LOCATION ("warmelt-normal.melt:5390:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1934*/ meltfptr[1933])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V916*/ meltfptr[915]); ((meltroutine_ptr_t) /*_.VALROUT___V1934*/ meltfptr[1933])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915]); MELT_LOCATION ("warmelt-normal.melt:5390:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1934*/ meltfptr[1933])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1763__NORMEXP_DEFCITERATOR#11", NULL != ( /*_.DISCR_INTEGER__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1934*/ meltfptr[1933])->tabval[11] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normal.melt:5390:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1934*/ meltfptr[1933])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1216*/ meltfptr[1215]); ((meltroutine_ptr_t) /*_.VALROUT___V1934*/ meltfptr[1933])->tabval[12] = (melt_ptr_t) ( /*_.VALCLO___V1216*/ meltfptr[1215]); MELT_LOCATION ("warmelt-normal.melt:5390:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1934*/ meltfptr[1933])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1763__NORMEXP_DEFCITERATOR#13", NULL != ( /*_.NAMED_NAME__V108*/ meltfptr[107])); ((meltroutine_ptr_t) /*_.VALROUT___V1934*/ meltfptr[1933])->tabval[13] = (melt_ptr_t) ( /*_.NAMED_NAME__V108*/ meltfptr[107]); MELT_LOCATION ("warmelt-normal.melt:5390:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1934*/ meltfptr[1933])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1918*/ meltfptr[1917]); ((meltroutine_ptr_t) /*_.VALROUT___V1934*/ meltfptr[1933])->tabval[14] = (melt_ptr_t) ( /*_.VALCLO___V1918*/ meltfptr[1917]); MELT_LOCATION ("warmelt-normal.melt:5390:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1934*/ meltfptr[1933])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V958*/ meltfptr[957]); ((meltroutine_ptr_t) /*_.VALROUT___V1934*/ meltfptr[1933])->tabval[15] = (melt_ptr_t) ( /*_.VALDATA___V958*/ meltfptr[957]); MELT_LOCATION ("warmelt-normal.melt:5390:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1934*/ meltfptr[1933])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1763__NORMEXP_DEFCITERATOR#16", NULL != ( /*_.CITER_START_FORMALS__V121*/ meltfptr[120])); ((meltroutine_ptr_t) /*_.VALROUT___V1934*/ meltfptr[1933])->tabval[16] = (melt_ptr_t) ( /*_.CITER_START_FORMALS__V121*/ meltfptr[120]); MELT_LOCATION ("warmelt-normal.melt:5390:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1934*/ meltfptr[1933])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1763__NORMEXP_DEFCITERATOR#17", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V1934*/ meltfptr[1933])->tabval[17] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normal.melt:5390:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1934*/ meltfptr[1933])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1561*/ meltfptr[1560]); ((meltroutine_ptr_t) /*_.VALROUT___V1934*/ meltfptr[1933])->tabval[18] = (melt_ptr_t) ( /*_.VALCLO___V1561*/ meltfptr[1560]); MELT_LOCATION ("warmelt-normal.melt:5390:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1934*/ meltfptr[1933])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1763__NORMEXP_DEFCITERATOR#19", NULL != ( /*_.CITER_STATE__V122*/ meltfptr[121])); ((meltroutine_ptr_t) /*_.VALROUT___V1934*/ meltfptr[1933])->tabval[19] = (melt_ptr_t) ( /*_.CITER_STATE__V122*/ meltfptr[121]); MELT_LOCATION ("warmelt-normal.melt:5390:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1934*/ meltfptr[1933])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1763__NORMEXP_DEFCITERATOR#20", NULL != ( /*_.CITER_BODY_FORMALS__V123*/ meltfptr[122])); ((meltroutine_ptr_t) /*_.VALROUT___V1934*/ meltfptr[1933])->tabval[20] = (melt_ptr_t) ( /*_.CITER_BODY_FORMALS__V123*/ meltfptr[122]); MELT_LOCATION ("warmelt-normal.melt:5390:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1934*/ meltfptr[1933])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1921*/ meltfptr[1920]); ((meltroutine_ptr_t) /*_.VALROUT___V1934*/ meltfptr[1933])->tabval[21] = (melt_ptr_t) ( /*_.VALCLO___V1921*/ meltfptr[1920]); MELT_LOCATION ("warmelt-normal.melt:5390:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1934*/ meltfptr[1933])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1763__NORMEXP_DEFCITERATOR#22", NULL != ( /*_.CITER_EXPBEFORE__V124*/ meltfptr[123])); ((meltroutine_ptr_t) /*_.VALROUT___V1934*/ meltfptr[1933])->tabval[22] = (melt_ptr_t) ( /*_.CITER_EXPBEFORE__V124*/ meltfptr[123]); MELT_LOCATION ("warmelt-normal.melt:5390:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1934*/ meltfptr[1933])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1763__NORMEXP_DEFCITERATOR#23", NULL != ( /*_.CITER_EXPAFTER__V125*/ meltfptr[124])); ((meltroutine_ptr_t) /*_.VALROUT___V1934*/ meltfptr[1933])->tabval[23] = (melt_ptr_t) ( /*_.CITER_EXPAFTER__V125*/ meltfptr[124]); MELT_LOCATION ("warmelt-normal.melt:5390:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1934*/ meltfptr[1933])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1763__NORMEXP_DEFCITERATOR#24", NULL != ( /*_.CLASS_CITERATOR_BINDING__V126*/ meltfptr[125])); ((meltroutine_ptr_t) /*_.VALROUT___V1934*/ meltfptr[1933])->tabval[24] = (melt_ptr_t) ( /*_.CLASS_CITERATOR_BINDING__V126*/ meltfptr[125]); MELT_LOCATION ("warmelt-normal.melt:5390:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1934*/ meltfptr[1933])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1763__NORMEXP_DEFCITERATOR#25", NULL != ( /*_.CLASS_FIXED_BINDING__V43*/ meltfptr[42])); ((meltroutine_ptr_t) /*_.VALROUT___V1934*/ meltfptr[1933])->tabval[25] = (melt_ptr_t) ( /*_.CLASS_FIXED_BINDING__V43*/ meltfptr[42]); MELT_LOCATION ("warmelt-normal.melt:5390:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1934*/ meltfptr[1933])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1763__NORMEXP_DEFCITERATOR#26", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1934*/ meltfptr[1933])->tabval[26] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:5390:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1934*/ meltfptr[1933]); /*putclosurout#85 */ melt_assertmsg ("putclosrout#85 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1935*/ meltfptr[1934])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#85 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1934*/ meltfptr[1933])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1935*/ meltfptr[1934])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1934*/ meltfptr[1933]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1935*/ meltfptr[1934]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1936*/ meltfptr[1935])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1936*/ meltfptr[1935])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1936*/ meltfptr[1935]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1937*/ meltfptr[1936]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1936*/ meltfptr[1935]); melt_dbgtrace_written_object ( /*_.VALDATA___V1936*/ meltfptr[1935], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1938*/ meltfptr[1937])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1938*/ meltfptr[1937])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1938*/ meltfptr[1937]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1939*/ meltfptr[1938]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1938*/ meltfptr[1937]); melt_dbgtrace_written_object ( /*_.VALDATA___V1938*/ meltfptr[1937], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1940*/ meltfptr[1939])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1940*/ meltfptr[1939])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1940*/ meltfptr[1939]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1941*/ meltfptr[1940]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1940*/ meltfptr[1939]); melt_dbgtrace_written_object ( /*_.VALDATA___V1940*/ meltfptr[1939], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1942*/ meltfptr[1941])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1942*/ meltfptr[1941])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1942*/ meltfptr[1941]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1943*/ meltfptr[1942]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1942*/ meltfptr[1941]); melt_dbgtrace_written_object ( /*_.VALDATA___V1942*/ meltfptr[1941], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1944*/ meltfptr[1943])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1944*/ meltfptr[1943])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1944*/ meltfptr[1943]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1945*/ meltfptr[1944]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1944*/ meltfptr[1943]); melt_dbgtrace_written_object ( /*_.VALDATA___V1944*/ meltfptr[1943], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1946*/ meltfptr[1945])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1946*/ meltfptr[1945])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1946*/ meltfptr[1945]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1947*/ meltfptr[1946]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1946*/ meltfptr[1945]); melt_dbgtrace_written_object ( /*_.VALDATA___V1946*/ meltfptr[1945], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1948*/ meltfptr[1947])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1948*/ meltfptr[1947])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1948*/ meltfptr[1947]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1949*/ meltfptr[1948]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1948*/ meltfptr[1947]); melt_dbgtrace_written_object ( /*_.VALDATA___V1948*/ meltfptr[1947], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1779__NORMEXP_CITERATION#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1779__NORMEXP_CITERATION#1", NULL != ( /*_.CLASS_SOURCE_CITERATION__V127*/ meltfptr[126])); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SOURCE_CITERATION__V127*/ meltfptr[126]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1779__NORMEXP_CITERATION#2", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1779__NORMEXP_CITERATION#3", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1779__NORMEXP_CITERATION#4", NULL != ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36]); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_38 */ void meltmod__warmelt_normal__initialmeltchunk_39 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1779__NORMEXP_CITERATION#5", NULL != ( /*_.FRESH_ENV__V70*/ meltfptr[69])); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[5] = (melt_ptr_t) ( /*_.FRESH_ENV__V70*/ meltfptr[69]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1779__NORMEXP_CITERATION#6", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1779__NORMEXP_CITERATION#7", NULL != ( /*_.CLASS_CITERATOR__V120*/ meltfptr[119])); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_CITERATOR__V120*/ meltfptr[119]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1508*/ meltfptr[1507]); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[8] = (melt_ptr_t) ( /*_.VALCLO___V1508*/ meltfptr[1507]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1779__NORMEXP_CITERATION#9", NULL != ( /*_.MULTIPLE_EVERY_BOTH__V128*/ meltfptr[127])); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[9] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY_BOTH__V128*/ meltfptr[127]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1779__NORMEXP_CITERATION#10", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[10] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1779__NORMEXP_CITERATION#11", NULL != ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[11] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1779__NORMEXP_CITERATION#13", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[13] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:5529:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1951*/ meltfptr[1950])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1785__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1951*/ meltfptr[1950])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:5529:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1951*/ meltfptr[1950])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1785__LAMBDA_#1", NULL != ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V1951*/ meltfptr[1950])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-normal.melt:5529:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1951*/ meltfptr[1950])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V1951*/ meltfptr[1950])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-normal.melt:5529:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1951*/ meltfptr[1950])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1785__LAMBDA_#3", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1951*/ meltfptr[1950])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:5529:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1951*/ meltfptr[1950]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1779__NORMEXP_CITERATION#14", NULL != ( /*_.VALROUT___V1951*/ meltfptr[1950])); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[14] = (melt_ptr_t) ( /*_.VALROUT___V1951*/ meltfptr[1950]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1779__NORMEXP_CITERATION#15", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[15] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1779__NORMEXP_CITERATION#16", NULL != ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[16] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1779__NORMEXP_CITERATION#17", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[17] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[18] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1779__NORMEXP_CITERATION#19", NULL != ( /*_.PUT_ENV__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[19] = (melt_ptr_t) ( /*_.PUT_ENV__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normal.melt:5565:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1952*/ meltfptr[1951])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1786__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1952*/ meltfptr[1951])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:5565:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1952*/ meltfptr[1951])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1786__LAMBDA_#1", NULL != ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V1952*/ meltfptr[1951])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-normal.melt:5565:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1952*/ meltfptr[1951])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1786__LAMBDA_#2", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1952*/ meltfptr[1951])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:5565:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1952*/ meltfptr[1951])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1952*/ meltfptr[1951])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:5565:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1952*/ meltfptr[1951])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1786__LAMBDA_#4", NULL != ( /*_.PUT_ENV__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V1952*/ meltfptr[1951])->tabval[4] = (melt_ptr_t) ( /*_.PUT_ENV__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normal.melt:5565:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1952*/ meltfptr[1951]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1779__NORMEXP_CITERATION#20", NULL != ( /*_.VALROUT___V1952*/ meltfptr[1951])); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[20] = (melt_ptr_t) ( /*_.VALROUT___V1952*/ meltfptr[1951]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1779__NORMEXP_CITERATION#21", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[21] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V472*/ meltfptr[471]); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[22] = (melt_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1779__NORMEXP_CITERATION#23", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[23] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1779__NORMEXP_CITERATION#24", NULL != ( /*_.CTYPE_VOID__V57*/ meltfptr[56])); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[24] = (melt_ptr_t) ( /*_.CTYPE_VOID__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[25] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1779__NORMEXP_CITERATION#26", NULL != ( /*_.DISCR_MAP_OBJECTS__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[26] = (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1779__NORMEXP_CITERATION#27", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[27] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1779__NORMEXP_CITERATION#28", NULL != ( /*_.MULTIPLE_MAP__V33*/ meltfptr[32])); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[28] = (melt_ptr_t) ( /*_.MULTIPLE_MAP__V33*/ meltfptr[32]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1779__NORMEXP_CITERATION#29", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[29] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1779__NORMEXP_CITERATION#30", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[30] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:5630:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1953*/ meltfptr[1952])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1787__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1953*/ meltfptr[1952])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:5630:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1953*/ meltfptr[1952])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1787__LAMBDA_#1", NULL != ( /*_.MULTIPLE_MAP__V33*/ meltfptr[32])); ((meltroutine_ptr_t) /*_.VALROUT___V1953*/ meltfptr[1952])->tabval[1] = (melt_ptr_t) ( /*_.MULTIPLE_MAP__V33*/ meltfptr[32]); MELT_LOCATION ("warmelt-normal.melt:5630:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1953*/ meltfptr[1952])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1787__LAMBDA_#2", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V1953*/ meltfptr[1952])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normal.melt:5630:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1953*/ meltfptr[1952])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1787__LAMBDA_#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1953*/ meltfptr[1952])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:5634:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1954*/ meltfptr[1953])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1788__LAMBDA_#0", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V1954*/ meltfptr[1953])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normal.melt:5634:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1954*/ meltfptr[1953])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1788__LAMBDA_#1", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1954*/ meltfptr[1953])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:5634:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1954*/ meltfptr[1953]); MELT_LOCATION ("warmelt-normal.melt:5630:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1953*/ meltfptr[1952])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1787__LAMBDA_#4", NULL != ( /*_.VALROUT___V1954*/ meltfptr[1953])); ((meltroutine_ptr_t) /*_.VALROUT___V1953*/ meltfptr[1952])->tabval[4] = (melt_ptr_t) ( /*_.VALROUT___V1954*/ meltfptr[1953]); MELT_LOCATION ("warmelt-normal.melt:5630:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1953*/ meltfptr[1952]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1779__NORMEXP_CITERATION#31", NULL != ( /*_.VALROUT___V1953*/ meltfptr[1952])); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[31] = (melt_ptr_t) ( /*_.VALROUT___V1953*/ meltfptr[1952]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1779__NORMEXP_CITERATION#32", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[32] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:5650:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1955*/ meltfptr[1954])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1789__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1955*/ meltfptr[1954])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:5650:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1955*/ meltfptr[1954]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1779__NORMEXP_CITERATION#33", NULL != ( /*_.VALROUT___V1955*/ meltfptr[1954])); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[33] = (melt_ptr_t) ( /*_.VALROUT___V1955*/ meltfptr[1954]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1779__NORMEXP_CITERATION#34", NULL != ( /*_.MULTIPLE_EVERY__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[34] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1779__NORMEXP_CITERATION#35", NULL != ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[35] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-normal.melt:5658:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1956*/ meltfptr[1955])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1790__LAMBDA_#0", NULL != ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V1956*/ meltfptr[1955])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-normal.melt:5658:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1956*/ meltfptr[1955]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1779__NORMEXP_CITERATION#36", NULL != ( /*_.VALROUT___V1956*/ meltfptr[1955])); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[36] = (melt_ptr_t) ( /*_.VALROUT___V1956*/ meltfptr[1955]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V644*/ meltfptr[643]); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[37] = (melt_ptr_t) ( /*_.VALDATA___V644*/ meltfptr[643]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1779__NORMEXP_CITERATION#38", NULL != ( /*_.LIST_EVERY__V34*/ meltfptr[33])); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[38] = (melt_ptr_t) ( /*_.LIST_EVERY__V34*/ meltfptr[33]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1779__NORMEXP_CITERATION#39", NULL != ( /*_.VALROUT___V1957*/ meltfptr[1956])); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[39] = (melt_ptr_t) ( /*_.VALROUT___V1957*/ meltfptr[1956]); MELT_LOCATION ("warmelt-normal.melt:5497:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1950*/ meltfptr[1949]); /*putclosurout#86 */ melt_assertmsg ("putclosrout#86 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1958*/ meltfptr[1957])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#86 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1958*/ meltfptr[1957])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1958*/ meltfptr[1957]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1959*/ meltfptr[1958])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1959*/ meltfptr[1958])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1959*/ meltfptr[1958]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1960*/ meltfptr[1959]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1959*/ meltfptr[1958]); melt_dbgtrace_written_object ( /*_.VALDATA___V1959*/ meltfptr[1958], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1961*/ meltfptr[1960])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1961*/ meltfptr[1960])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1961*/ meltfptr[1960]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1962*/ meltfptr[1961]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1961*/ meltfptr[1960]); melt_dbgtrace_written_object ( /*_.VALDATA___V1961*/ meltfptr[1960], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:5714:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1963*/ meltfptr[1962])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1792__NORMEXP_DEFCMATCHER#0", NULL != ( /*_.CLASS_SOURCE_DEFCMATCHER__V129*/ meltfptr[128])); ((meltroutine_ptr_t) /*_.VALROUT___V1963*/ meltfptr[1962])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_DEFCMATCHER__V129*/ meltfptr[128]); MELT_LOCATION ("warmelt-normal.melt:5714:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1963*/ meltfptr[1962])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1792__NORMEXP_DEFCMATCHER#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1963*/ meltfptr[1962])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:5714:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1963*/ meltfptr[1962])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1792__NORMEXP_DEFCMATCHER#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1963*/ meltfptr[1962])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:5714:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1963*/ meltfptr[1962])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1792__NORMEXP_DEFCMATCHER#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1963*/ meltfptr[1962])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:5714:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1963*/ meltfptr[1962])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1792__NORMEXP_DEFCMATCHER#4", NULL != ( /*_.CLASS_CMATCHER__V59*/ meltfptr[58])); ((meltroutine_ptr_t) /*_.VALROUT___V1963*/ meltfptr[1962])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_CMATCHER__V59*/ meltfptr[58]); MELT_LOCATION ("warmelt-normal.melt:5714:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1963*/ meltfptr[1962])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1792__NORMEXP_DEFCMATCHER#5", NULL != ( /*_.FIND_ENV__V48*/ meltfptr[47])); ((meltroutine_ptr_t) /*_.VALROUT___V1963*/ meltfptr[1962])->tabval[5] = (melt_ptr_t) ( /*_.FIND_ENV__V48*/ meltfptr[47]); MELT_LOCATION ("warmelt-normal.melt:5714:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1963*/ meltfptr[1962])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1792__NORMEXP_DEFCMATCHER#6", NULL != ( /*_.CLASS_CMATCHER_BINDING__V130*/ meltfptr[129])); ((meltroutine_ptr_t) /*_.VALROUT___V1963*/ meltfptr[1962])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_CMATCHER_BINDING__V130*/ meltfptr[129]); MELT_LOCATION ("warmelt-normal.melt:5714:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1963*/ meltfptr[1962])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1792__NORMEXP_DEFCMATCHER#7", NULL != ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1963*/ meltfptr[1962])->tabval[7] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-normal.melt:5714:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1963*/ meltfptr[1962])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1792__NORMEXP_DEFCMATCHER#8", NULL != ( /*_.DISCR_MAP_OBJECTS__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1963*/ meltfptr[1962])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-normal.melt:5714:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1963*/ meltfptr[1962])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V938*/ meltfptr[937]); ((meltroutine_ptr_t) /*_.VALROUT___V1963*/ meltfptr[1962])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V938*/ meltfptr[937]); MELT_LOCATION ("warmelt-normal.melt:5714:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1963*/ meltfptr[1962])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1563*/ meltfptr[1562]); ((meltroutine_ptr_t) /*_.VALROUT___V1963*/ meltfptr[1962])->tabval[10] = (melt_ptr_t) ( /*_.VALCLO___V1563*/ meltfptr[1562]); MELT_LOCATION ("warmelt-normal.melt:5714:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1963*/ meltfptr[1962])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1792__NORMEXP_DEFCMATCHER#11", NULL != ( /*_.DISCR_STRING__V22*/ meltfptr[21])); ((meltroutine_ptr_t) /*_.VALROUT___V1963*/ meltfptr[1962])->tabval[11] = (melt_ptr_t) ( /*_.DISCR_STRING__V22*/ meltfptr[21]); MELT_LOCATION ("warmelt-normal.melt:5714:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1963*/ meltfptr[1962])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V916*/ meltfptr[915]); ((meltroutine_ptr_t) /*_.VALROUT___V1963*/ meltfptr[1962])->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915]); MELT_LOCATION ("warmelt-normal.melt:5714:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1963*/ meltfptr[1962])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1792__NORMEXP_DEFCMATCHER#13", NULL != ( /*_.DISCR_INTEGER__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1963*/ meltfptr[1962])->tabval[13] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normal.melt:5714:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1963*/ meltfptr[1962])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1216*/ meltfptr[1215]); ((meltroutine_ptr_t) /*_.VALROUT___V1963*/ meltfptr[1962])->tabval[14] = (melt_ptr_t) ( /*_.VALCLO___V1216*/ meltfptr[1215]); MELT_LOCATION ("warmelt-normal.melt:5714:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1963*/ meltfptr[1962])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1792__NORMEXP_DEFCMATCHER#15", NULL != ( /*_.NAMED_NAME__V108*/ meltfptr[107])); ((meltroutine_ptr_t) /*_.VALROUT___V1963*/ meltfptr[1962])->tabval[15] = (melt_ptr_t) ( /*_.NAMED_NAME__V108*/ meltfptr[107]); MELT_LOCATION ("warmelt-normal.melt:5714:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1963*/ meltfptr[1962])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1918*/ meltfptr[1917]); ((meltroutine_ptr_t) /*_.VALROUT___V1963*/ meltfptr[1962])->tabval[16] = (melt_ptr_t) ( /*_.VALCLO___V1918*/ meltfptr[1917]); MELT_LOCATION ("warmelt-normal.melt:5714:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1963*/ meltfptr[1962])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V958*/ meltfptr[957]); ((meltroutine_ptr_t) /*_.VALROUT___V1963*/ meltfptr[1962])->tabval[17] = (melt_ptr_t) ( /*_.VALDATA___V958*/ meltfptr[957]); MELT_LOCATION ("warmelt-normal.melt:5714:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1963*/ meltfptr[1962])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1792__NORMEXP_DEFCMATCHER#18", NULL != ( /*_.AMATCH_IN__V131*/ meltfptr[130])); ((meltroutine_ptr_t) /*_.VALROUT___V1963*/ meltfptr[1962])->tabval[18] = (melt_ptr_t) ( /*_.AMATCH_IN__V131*/ meltfptr[130]); MELT_LOCATION ("warmelt-normal.melt:5714:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1963*/ meltfptr[1962])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1912*/ meltfptr[1911]); ((meltroutine_ptr_t) /*_.VALROUT___V1963*/ meltfptr[1962])->tabval[19] = (melt_ptr_t) ( /*_.VALCLO___V1912*/ meltfptr[1911]); MELT_LOCATION ("warmelt-normal.melt:5714:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1963*/ meltfptr[1962])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1792__NORMEXP_DEFCMATCHER#20", NULL != ( /*_.AMATCH_MATCHBIND__V132*/ meltfptr[131])); ((meltroutine_ptr_t) /*_.VALROUT___V1963*/ meltfptr[1962])->tabval[20] = (melt_ptr_t) ( /*_.AMATCH_MATCHBIND__V132*/ meltfptr[131]); MELT_LOCATION ("warmelt-normal.melt:5714:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1963*/ meltfptr[1962])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1792__NORMEXP_DEFCMATCHER#21", NULL != ( /*_.AMATCH_OUT__V133*/ meltfptr[132])); ((meltroutine_ptr_t) /*_.VALROUT___V1963*/ meltfptr[1962])->tabval[21] = (melt_ptr_t) ( /*_.AMATCH_OUT__V133*/ meltfptr[132]); MELT_LOCATION ("warmelt-normal.melt:5714:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1963*/ meltfptr[1962])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1792__NORMEXP_DEFCMATCHER#22", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V1963*/ meltfptr[1962])->tabval[22] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normal.melt:5714:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1963*/ meltfptr[1962])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1561*/ meltfptr[1560]); ((meltroutine_ptr_t) /*_.VALROUT___V1963*/ meltfptr[1962])->tabval[23] = (melt_ptr_t) ( /*_.VALCLO___V1561*/ meltfptr[1560]); MELT_LOCATION ("warmelt-normal.melt:5714:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1963*/ meltfptr[1962])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1792__NORMEXP_DEFCMATCHER#24", NULL != ( /*_.CMATCH_STATE__V134*/ meltfptr[133])); ((meltroutine_ptr_t) /*_.VALROUT___V1963*/ meltfptr[1962])->tabval[24] = (melt_ptr_t) ( /*_.CMATCH_STATE__V134*/ meltfptr[133]); MELT_LOCATION ("warmelt-normal.melt:5714:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1963*/ meltfptr[1962])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1921*/ meltfptr[1920]); ((meltroutine_ptr_t) /*_.VALROUT___V1963*/ meltfptr[1962])->tabval[25] = (melt_ptr_t) ( /*_.VALCLO___V1921*/ meltfptr[1920]); MELT_LOCATION ("warmelt-normal.melt:5714:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1963*/ meltfptr[1962])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1792__NORMEXP_DEFCMATCHER#26", NULL != ( /*_.CMATCH_EXPTEST__V135*/ meltfptr[134])); ((meltroutine_ptr_t) /*_.VALROUT___V1963*/ meltfptr[1962])->tabval[26] = (melt_ptr_t) ( /*_.CMATCH_EXPTEST__V135*/ meltfptr[134]); MELT_LOCATION ("warmelt-normal.melt:5714:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1963*/ meltfptr[1962])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1792__NORMEXP_DEFCMATCHER#27", NULL != ( /*_.CMATCH_EXPFILL__V136*/ meltfptr[135])); ((meltroutine_ptr_t) /*_.VALROUT___V1963*/ meltfptr[1962])->tabval[27] = (melt_ptr_t) ( /*_.CMATCH_EXPFILL__V136*/ meltfptr[135]); MELT_LOCATION ("warmelt-normal.melt:5714:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1963*/ meltfptr[1962])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1792__NORMEXP_DEFCMATCHER#28", NULL != ( /*_.CMATCH_EXPOPER__V137*/ meltfptr[136])); ((meltroutine_ptr_t) /*_.VALROUT___V1963*/ meltfptr[1962])->tabval[28] = (melt_ptr_t) ( /*_.CMATCH_EXPOPER__V137*/ meltfptr[136]); MELT_LOCATION ("warmelt-normal.melt:5714:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1963*/ meltfptr[1962])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1792__NORMEXP_DEFCMATCHER#29", NULL != ( /*_.CLASS_FIXED_BINDING__V43*/ meltfptr[42])); ((meltroutine_ptr_t) /*_.VALROUT___V1963*/ meltfptr[1962])->tabval[29] = (melt_ptr_t) ( /*_.CLASS_FIXED_BINDING__V43*/ meltfptr[42]); MELT_LOCATION ("warmelt-normal.melt:5714:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1963*/ meltfptr[1962]); /*putclosurout#87 */ melt_assertmsg ("putclosrout#87 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1964*/ meltfptr[1963])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#87 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1963*/ meltfptr[1962])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1964*/ meltfptr[1963])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1963*/ meltfptr[1962]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1964*/ meltfptr[1963]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1965*/ meltfptr[1964])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1965*/ meltfptr[1964])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1965*/ meltfptr[1964]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1966*/ meltfptr[1965]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1965*/ meltfptr[1964]); melt_dbgtrace_written_object ( /*_.VALDATA___V1965*/ meltfptr[1964], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1967*/ meltfptr[1966])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1967*/ meltfptr[1966])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1967*/ meltfptr[1966]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1968*/ meltfptr[1967]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1967*/ meltfptr[1966]); melt_dbgtrace_written_object ( /*_.VALDATA___V1967*/ meltfptr[1966], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1969*/ meltfptr[1968])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1969*/ meltfptr[1968])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1969*/ meltfptr[1968]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1970*/ meltfptr[1969]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1969*/ meltfptr[1968]); melt_dbgtrace_written_object ( /*_.VALDATA___V1969*/ meltfptr[1968], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1971*/ meltfptr[1970])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1971*/ meltfptr[1970])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1971*/ meltfptr[1970]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1972*/ meltfptr[1971]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1971*/ meltfptr[1970]); melt_dbgtrace_written_object ( /*_.VALDATA___V1971*/ meltfptr[1970], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1973*/ meltfptr[1972])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1973*/ meltfptr[1972])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1973*/ meltfptr[1972]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1974*/ meltfptr[1973]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1973*/ meltfptr[1972]); melt_dbgtrace_written_object ( /*_.VALDATA___V1973*/ meltfptr[1972], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1975*/ meltfptr[1974])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1975*/ meltfptr[1974])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1975*/ meltfptr[1974]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1976*/ meltfptr[1975]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1975*/ meltfptr[1974]); melt_dbgtrace_written_object ( /*_.VALDATA___V1975*/ meltfptr[1974], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1977*/ meltfptr[1976])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1977*/ meltfptr[1976])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1977*/ meltfptr[1976]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1978*/ meltfptr[1977]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1977*/ meltfptr[1976]); melt_dbgtrace_written_object ( /*_.VALDATA___V1977*/ meltfptr[1976], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1979*/ meltfptr[1978])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1979*/ meltfptr[1978])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1979*/ meltfptr[1978]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1980*/ meltfptr[1979]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1979*/ meltfptr[1978]); melt_dbgtrace_written_object ( /*_.VALDATA___V1979*/ meltfptr[1978], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1981*/ meltfptr[1980])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1981*/ meltfptr[1980])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1981*/ meltfptr[1980]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1982*/ meltfptr[1981]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1981*/ meltfptr[1980]); melt_dbgtrace_written_object ( /*_.VALDATA___V1981*/ meltfptr[1980], "new static instance"); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_39 */ void meltmod__warmelt_normal__initialmeltchunk_40 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-normal.melt:5852:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1983*/ meltfptr[1982])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1812__NORMEXP_DEFUNMATCHER#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1983*/ meltfptr[1982])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:5852:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1983*/ meltfptr[1982])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1812__NORMEXP_DEFUNMATCHER#1", NULL != ( /*_.CLASS_SOURCE_DEFUNMATCHER__V138*/ meltfptr[137])); ((meltroutine_ptr_t) /*_.VALROUT___V1983*/ meltfptr[1982])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SOURCE_DEFUNMATCHER__V138*/ meltfptr[137]); MELT_LOCATION ("warmelt-normal.melt:5852:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1983*/ meltfptr[1982])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1812__NORMEXP_DEFUNMATCHER#2", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1983*/ meltfptr[1982])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:5852:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1983*/ meltfptr[1982])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1812__NORMEXP_DEFUNMATCHER#3", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1983*/ meltfptr[1982])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:5852:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1983*/ meltfptr[1982])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1812__NORMEXP_DEFUNMATCHER#4", NULL != ( /*_.CLASS_SOURCE_DEFINITION_FORMAL__V139*/ meltfptr[138])); ((meltroutine_ptr_t) /*_.VALROUT___V1983*/ meltfptr[1982])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_SOURCE_DEFINITION_FORMAL__V139*/ meltfptr[138]); MELT_LOCATION ("warmelt-normal.melt:5852:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1983*/ meltfptr[1982])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1812__NORMEXP_DEFUNMATCHER#5", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1983*/ meltfptr[1982])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:5852:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1983*/ meltfptr[1982])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1812__NORMEXP_DEFUNMATCHER#6", NULL != ( /*_.FIND_ENV__V48*/ meltfptr[47])); ((meltroutine_ptr_t) /*_.VALROUT___V1983*/ meltfptr[1982])->tabval[6] = (melt_ptr_t) ( /*_.FIND_ENV__V48*/ meltfptr[47]); MELT_LOCATION ("warmelt-normal.melt:5852:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1983*/ meltfptr[1982])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1812__NORMEXP_DEFUNMATCHER#7", NULL != ( /*_.CLASS_FUNMATCHER_BINDING__V140*/ meltfptr[139])); ((meltroutine_ptr_t) /*_.VALROUT___V1983*/ meltfptr[1982])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_FUNMATCHER_BINDING__V140*/ meltfptr[139]); MELT_LOCATION ("warmelt-normal.melt:5852:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1983*/ meltfptr[1982])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1812__NORMEXP_DEFUNMATCHER#8", NULL != ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V1983*/ meltfptr[1982])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-normal.melt:5852:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1983*/ meltfptr[1982])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V1983*/ meltfptr[1982])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:5852:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1983*/ meltfptr[1982])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1812__NORMEXP_DEFUNMATCHER#10", NULL != ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V1983*/ meltfptr[1982])->tabval[10] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normal.melt:5852:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1983*/ meltfptr[1982])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V938*/ meltfptr[937]); ((meltroutine_ptr_t) /*_.VALROUT___V1983*/ meltfptr[1982])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V938*/ meltfptr[937]); MELT_LOCATION ("warmelt-normal.melt:5852:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1983*/ meltfptr[1982])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1563*/ meltfptr[1562]); ((meltroutine_ptr_t) /*_.VALROUT___V1983*/ meltfptr[1982])->tabval[12] = (melt_ptr_t) ( /*_.VALCLO___V1563*/ meltfptr[1562]); MELT_LOCATION ("warmelt-normal.melt:5852:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1983*/ meltfptr[1982])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1812__NORMEXP_DEFUNMATCHER#13", NULL != ( /*_.DISCR_STRING__V22*/ meltfptr[21])); ((meltroutine_ptr_t) /*_.VALROUT___V1983*/ meltfptr[1982])->tabval[13] = (melt_ptr_t) ( /*_.DISCR_STRING__V22*/ meltfptr[21]); MELT_LOCATION ("warmelt-normal.melt:5852:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1983*/ meltfptr[1982])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1812__NORMEXP_DEFUNMATCHER#14", NULL != ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1983*/ meltfptr[1982])->tabval[14] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-normal.melt:5852:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1983*/ meltfptr[1982])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V916*/ meltfptr[915]); ((meltroutine_ptr_t) /*_.VALROUT___V1983*/ meltfptr[1982])->tabval[15] = (melt_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915]); MELT_LOCATION ("warmelt-normal.melt:5852:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1983*/ meltfptr[1982])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1812__NORMEXP_DEFUNMATCHER#16", NULL != ( /*_.CLASS_CMATCHER__V59*/ meltfptr[58])); ((meltroutine_ptr_t) /*_.VALROUT___V1983*/ meltfptr[1982])->tabval[16] = (melt_ptr_t) ( /*_.CLASS_CMATCHER__V59*/ meltfptr[58]); MELT_LOCATION ("warmelt-normal.melt:5852:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1983*/ meltfptr[1982])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1812__NORMEXP_DEFUNMATCHER#17", NULL != ( /*_.DISCR_INTEGER__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1983*/ meltfptr[1982])->tabval[17] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normal.melt:5852:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1983*/ meltfptr[1982])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1812__NORMEXP_DEFUNMATCHER#18", NULL != ( /*_.DISCR_MAP_OBJECTS__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1983*/ meltfptr[1982])->tabval[18] = (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-normal.melt:5852:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1983*/ meltfptr[1982])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1216*/ meltfptr[1215]); ((meltroutine_ptr_t) /*_.VALROUT___V1983*/ meltfptr[1982])->tabval[19] = (melt_ptr_t) ( /*_.VALCLO___V1216*/ meltfptr[1215]); MELT_LOCATION ("warmelt-normal.melt:5852:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1983*/ meltfptr[1982])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1812__NORMEXP_DEFUNMATCHER#20", NULL != ( /*_.NAMED_NAME__V108*/ meltfptr[107])); ((meltroutine_ptr_t) /*_.VALROUT___V1983*/ meltfptr[1982])->tabval[20] = (melt_ptr_t) ( /*_.NAMED_NAME__V108*/ meltfptr[107]); MELT_LOCATION ("warmelt-normal.melt:5852:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1983*/ meltfptr[1982])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1918*/ meltfptr[1917]); ((meltroutine_ptr_t) /*_.VALROUT___V1983*/ meltfptr[1982])->tabval[21] = (melt_ptr_t) ( /*_.VALCLO___V1918*/ meltfptr[1917]); MELT_LOCATION ("warmelt-normal.melt:5852:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1983*/ meltfptr[1982])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V958*/ meltfptr[957]); ((meltroutine_ptr_t) /*_.VALROUT___V1983*/ meltfptr[1982])->tabval[22] = (melt_ptr_t) ( /*_.VALDATA___V958*/ meltfptr[957]); MELT_LOCATION ("warmelt-normal.melt:5852:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1983*/ meltfptr[1982])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1812__NORMEXP_DEFUNMATCHER#23", NULL != ( /*_.AMATCH_IN__V131*/ meltfptr[130])); ((meltroutine_ptr_t) /*_.VALROUT___V1983*/ meltfptr[1982])->tabval[23] = (melt_ptr_t) ( /*_.AMATCH_IN__V131*/ meltfptr[130]); MELT_LOCATION ("warmelt-normal.melt:5852:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1983*/ meltfptr[1982])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1912*/ meltfptr[1911]); ((meltroutine_ptr_t) /*_.VALROUT___V1983*/ meltfptr[1982])->tabval[24] = (melt_ptr_t) ( /*_.VALCLO___V1912*/ meltfptr[1911]); MELT_LOCATION ("warmelt-normal.melt:5852:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1983*/ meltfptr[1982])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1812__NORMEXP_DEFUNMATCHER#25", NULL != ( /*_.AMATCH_MATCHBIND__V132*/ meltfptr[131])); ((meltroutine_ptr_t) /*_.VALROUT___V1983*/ meltfptr[1982])->tabval[25] = (melt_ptr_t) ( /*_.AMATCH_MATCHBIND__V132*/ meltfptr[131]); MELT_LOCATION ("warmelt-normal.melt:5852:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1983*/ meltfptr[1982])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1812__NORMEXP_DEFUNMATCHER#26", NULL != ( /*_.AMATCH_OUT__V133*/ meltfptr[132])); ((meltroutine_ptr_t) /*_.VALROUT___V1983*/ meltfptr[1982])->tabval[26] = (melt_ptr_t) ( /*_.AMATCH_OUT__V133*/ meltfptr[132]); MELT_LOCATION ("warmelt-normal.melt:5852:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1983*/ meltfptr[1982])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1812__NORMEXP_DEFUNMATCHER#27", NULL != ( /*_.FMATCH_MATCHF__V141*/ meltfptr[140])); ((meltroutine_ptr_t) /*_.VALROUT___V1983*/ meltfptr[1982])->tabval[27] = (melt_ptr_t) ( /*_.FMATCH_MATCHF__V141*/ meltfptr[140]); MELT_LOCATION ("warmelt-normal.melt:5852:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1983*/ meltfptr[1982])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1812__NORMEXP_DEFUNMATCHER#28", NULL != ( /*_.FMATCH_APPLYF__V62*/ meltfptr[61])); ((meltroutine_ptr_t) /*_.VALROUT___V1983*/ meltfptr[1982])->tabval[28] = (melt_ptr_t) ( /*_.FMATCH_APPLYF__V62*/ meltfptr[61]); MELT_LOCATION ("warmelt-normal.melt:5852:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1983*/ meltfptr[1982])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1812__NORMEXP_DEFUNMATCHER#29", NULL != ( /*_.FMATCH_DATA__V142*/ meltfptr[141])); ((meltroutine_ptr_t) /*_.VALROUT___V1983*/ meltfptr[1982])->tabval[29] = (melt_ptr_t) ( /*_.FMATCH_DATA__V142*/ meltfptr[141]); MELT_LOCATION ("warmelt-normal.melt:5852:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1983*/ meltfptr[1982])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1812__NORMEXP_DEFUNMATCHER#30", NULL != ( /*_.CLASS_FIXED_BINDING__V43*/ meltfptr[42])); ((meltroutine_ptr_t) /*_.VALROUT___V1983*/ meltfptr[1982])->tabval[30] = (melt_ptr_t) ( /*_.CLASS_FIXED_BINDING__V43*/ meltfptr[42]); MELT_LOCATION ("warmelt-normal.melt:5852:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1983*/ meltfptr[1982]); /*putclosurout#88 */ melt_assertmsg ("putclosrout#88 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1984*/ meltfptr[1983])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#88 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1983*/ meltfptr[1982])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1984*/ meltfptr[1983])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1983*/ meltfptr[1982]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1984*/ meltfptr[1983]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1985*/ meltfptr[1984])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1985*/ meltfptr[1984])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1985*/ meltfptr[1984]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1986*/ meltfptr[1985]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1985*/ meltfptr[1984]); melt_dbgtrace_written_object ( /*_.VALDATA___V1985*/ meltfptr[1984], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1987*/ meltfptr[1986])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1987*/ meltfptr[1986])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1987*/ meltfptr[1986]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1988*/ meltfptr[1987]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1987*/ meltfptr[1986]); melt_dbgtrace_written_object ( /*_.VALDATA___V1987*/ meltfptr[1986], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1989*/ meltfptr[1988])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1989*/ meltfptr[1988])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1989*/ meltfptr[1988]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1990*/ meltfptr[1989]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1989*/ meltfptr[1988]); melt_dbgtrace_written_object ( /*_.VALDATA___V1989*/ meltfptr[1988], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1991*/ meltfptr[1990])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1991*/ meltfptr[1990])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1991*/ meltfptr[1990]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1992*/ meltfptr[1991]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1991*/ meltfptr[1990]); melt_dbgtrace_written_object ( /*_.VALDATA___V1991*/ meltfptr[1990], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1993*/ meltfptr[1992])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1993*/ meltfptr[1992])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1993*/ meltfptr[1992]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1994*/ meltfptr[1993]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1993*/ meltfptr[1992]); melt_dbgtrace_written_object ( /*_.VALDATA___V1993*/ meltfptr[1992], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:5974:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1995*/ meltfptr[1994])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1824__NORMEXP_DEFCLASS#0", NULL != ( /*_.CLASS_SOURCE_DEFCLASS__V143*/ meltfptr[142])); ((meltroutine_ptr_t) /*_.VALROUT___V1995*/ meltfptr[1994])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_DEFCLASS__V143*/ meltfptr[142]); MELT_LOCATION ("warmelt-normal.melt:5974:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1995*/ meltfptr[1994])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1824__NORMEXP_DEFCLASS#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1995*/ meltfptr[1994])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:5974:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1995*/ meltfptr[1994])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1824__NORMEXP_DEFCLASS#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1995*/ meltfptr[1994])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:5974:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1995*/ meltfptr[1994])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1824__NORMEXP_DEFCLASS#3", NULL != ( /*_.CLASS_CLASS_BINDING__V49*/ meltfptr[48])); ((meltroutine_ptr_t) /*_.VALROUT___V1995*/ meltfptr[1994])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_CLASS_BINDING__V49*/ meltfptr[48]); MELT_LOCATION ("warmelt-normal.melt:5974:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1995*/ meltfptr[1994])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1561*/ meltfptr[1560]); ((meltroutine_ptr_t) /*_.VALROUT___V1995*/ meltfptr[1994])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V1561*/ meltfptr[1560]); MELT_LOCATION ("warmelt-normal.melt:5974:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1995*/ meltfptr[1994])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V938*/ meltfptr[937]); ((meltroutine_ptr_t) /*_.VALROUT___V1995*/ meltfptr[1994])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V938*/ meltfptr[937]); MELT_LOCATION ("warmelt-normal.melt:5974:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1995*/ meltfptr[1994])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1563*/ meltfptr[1562]); ((meltroutine_ptr_t) /*_.VALROUT___V1995*/ meltfptr[1994])->tabval[6] = (melt_ptr_t) ( /*_.VALCLO___V1563*/ meltfptr[1562]); MELT_LOCATION ("warmelt-normal.melt:5974:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1995*/ meltfptr[1994])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1824__NORMEXP_DEFCLASS#7", NULL != ( /*_.DISCR_STRING__V22*/ meltfptr[21])); ((meltroutine_ptr_t) /*_.VALROUT___V1995*/ meltfptr[1994])->tabval[7] = (melt_ptr_t) ( /*_.DISCR_STRING__V22*/ meltfptr[21]); MELT_LOCATION ("warmelt-normal.melt:5974:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1995*/ meltfptr[1994])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1824__NORMEXP_DEFCLASS#8", NULL != ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1995*/ meltfptr[1994])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-normal.melt:5974:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1995*/ meltfptr[1994])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V916*/ meltfptr[915]); ((meltroutine_ptr_t) /*_.VALROUT___V1995*/ meltfptr[1994])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915]); MELT_LOCATION ("warmelt-normal.melt:5974:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1995*/ meltfptr[1994])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1824__NORMEXP_DEFCLASS#10", NULL != ( /*_.CLASS_CLASS__V47*/ meltfptr[46])); ((meltroutine_ptr_t) /*_.VALROUT___V1995*/ meltfptr[1994])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_CLASS__V47*/ meltfptr[46]); MELT_LOCATION ("warmelt-normal.melt:5974:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1995*/ meltfptr[1994])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1824__NORMEXP_DEFCLASS#11", NULL != ( /*_.DISCR_INTEGER__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1995*/ meltfptr[1994])->tabval[11] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V10*/ meltfptr[9]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1996*/ meltfptr[1995])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1996*/ meltfptr[1995])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1996*/ meltfptr[1995]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1997*/ meltfptr[1996]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1996*/ meltfptr[1995]); melt_dbgtrace_written_object ( /*_.VALDATA___V1996*/ meltfptr[1995], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:5974:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1995*/ meltfptr[1994])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1824__NORMEXP_DEFCLASS#12", NULL != ( /*_.VALDATA___V1996*/ meltfptr[1995])); ((meltroutine_ptr_t) /*_.VALROUT___V1995*/ meltfptr[1994])->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V1996*/ meltfptr[1995]); MELT_LOCATION ("warmelt-normal.melt:5974:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1995*/ meltfptr[1994])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V958*/ meltfptr[957]); ((meltroutine_ptr_t) /*_.VALROUT___V1995*/ meltfptr[1994])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V958*/ meltfptr[957]); MELT_LOCATION ("warmelt-normal.melt:5974:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1995*/ meltfptr[1994])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1824__NORMEXP_DEFCLASS#14", NULL != ( /*_.DISCR_CLASS_SEQUENCE__V144*/ meltfptr[143])); ((meltroutine_ptr_t) /*_.VALROUT___V1995*/ meltfptr[1994])->tabval[14] = (melt_ptr_t) ( /*_.DISCR_CLASS_SEQUENCE__V144*/ meltfptr[143]); MELT_LOCATION ("warmelt-normal.melt:5974:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1995*/ meltfptr[1994])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1824__NORMEXP_DEFCLASS#15", NULL != ( /*_.DISCR_FIELD_SEQUENCE__V145*/ meltfptr[144])); ((meltroutine_ptr_t) /*_.VALROUT___V1995*/ meltfptr[1994])->tabval[15] = (melt_ptr_t) ( /*_.DISCR_FIELD_SEQUENCE__V145*/ meltfptr[144]); MELT_LOCATION ("warmelt-normal.melt:5974:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1995*/ meltfptr[1994])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1824__NORMEXP_DEFCLASS#16", NULL != ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7])); ((meltroutine_ptr_t) /*_.VALROUT___V1995*/ meltfptr[1994])->tabval[16] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-normal.melt:5974:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1995*/ meltfptr[1994])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V1995*/ meltfptr[1994])->tabval[17] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:5974:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1995*/ meltfptr[1994])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1216*/ meltfptr[1215]); ((meltroutine_ptr_t) /*_.VALROUT___V1995*/ meltfptr[1994])->tabval[18] = (melt_ptr_t) ( /*_.VALCLO___V1216*/ meltfptr[1215]); MELT_LOCATION ("warmelt-normal.melt:5974:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1995*/ meltfptr[1994])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1898*/ meltfptr[1897]); ((meltroutine_ptr_t) /*_.VALROUT___V1995*/ meltfptr[1994])->tabval[19] = (melt_ptr_t) ( /*_.VALCLO___V1898*/ meltfptr[1897]); MELT_LOCATION ("warmelt-normal.melt:5974:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1995*/ meltfptr[1994])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1824__NORMEXP_DEFCLASS#20", NULL != ( /*_.NAMED_NAME__V108*/ meltfptr[107])); ((meltroutine_ptr_t) /*_.VALROUT___V1995*/ meltfptr[1994])->tabval[20] = (melt_ptr_t) ( /*_.NAMED_NAME__V108*/ meltfptr[107]); MELT_LOCATION ("warmelt-normal.melt:5974:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1995*/ meltfptr[1994])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1824__NORMEXP_DEFCLASS#21", NULL != ( /*_.CLASS_ANCESTORS__V146*/ meltfptr[145])); ((meltroutine_ptr_t) /*_.VALROUT___V1995*/ meltfptr[1994])->tabval[21] = (melt_ptr_t) ( /*_.CLASS_ANCESTORS__V146*/ meltfptr[145]); MELT_LOCATION ("warmelt-normal.melt:5974:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1995*/ meltfptr[1994])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1824__NORMEXP_DEFCLASS#22", NULL != ( /*_.CLASS_FIELDS__V147*/ meltfptr[146])); ((meltroutine_ptr_t) /*_.VALROUT___V1995*/ meltfptr[1994])->tabval[22] = (melt_ptr_t) ( /*_.CLASS_FIELDS__V147*/ meltfptr[146]); MELT_LOCATION ("warmelt-normal.melt:5974:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1995*/ meltfptr[1994])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1824__NORMEXP_DEFCLASS#23", NULL != ( /*_.CLASS_FIXED_BINDING__V43*/ meltfptr[42])); ((meltroutine_ptr_t) /*_.VALROUT___V1995*/ meltfptr[1994])->tabval[23] = (melt_ptr_t) ( /*_.CLASS_FIXED_BINDING__V43*/ meltfptr[42]); MELT_LOCATION ("warmelt-normal.melt:5974:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1995*/ meltfptr[1994])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1158*/ meltfptr[1157]); ((meltroutine_ptr_t) /*_.VALROUT___V1995*/ meltfptr[1994])->tabval[24] = (melt_ptr_t) ( /*_.VALDATA___V1158*/ meltfptr[1157]); MELT_LOCATION ("warmelt-normal.melt:5974:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1995*/ meltfptr[1994])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1144*/ meltfptr[1143]); ((meltroutine_ptr_t) /*_.VALROUT___V1995*/ meltfptr[1994])->tabval[25] = (melt_ptr_t) ( /*_.VALDATA___V1144*/ meltfptr[1143]); MELT_LOCATION ("warmelt-normal.melt:5974:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1995*/ meltfptr[1994])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1824__NORMEXP_DEFCLASS#26", NULL != ( /*_.CLASS_FIELD_BINDING__V148*/ meltfptr[147])); ((meltroutine_ptr_t) /*_.VALROUT___V1995*/ meltfptr[1994])->tabval[26] = (melt_ptr_t) ( /*_.CLASS_FIELD_BINDING__V148*/ meltfptr[147]); MELT_LOCATION ("warmelt-normal.melt:5974:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1995*/ meltfptr[1994])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1824__NORMEXP_DEFCLASS#27", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V1995*/ meltfptr[1994])->tabval[27] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normal.melt:5974:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1995*/ meltfptr[1994])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1824__NORMEXP_DEFCLASS#28", NULL != ( /*_.CLASS_FIELD__V80*/ meltfptr[79])); ((meltroutine_ptr_t) /*_.VALROUT___V1995*/ meltfptr[1994])->tabval[28] = (melt_ptr_t) ( /*_.CLASS_FIELD__V80*/ meltfptr[79]); MELT_LOCATION ("warmelt-normal.melt:5974:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1995*/ meltfptr[1994])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1824__NORMEXP_DEFCLASS#29", NULL != ( /*_.FLD_OWNCLASS__V149*/ meltfptr[148])); ((meltroutine_ptr_t) /*_.VALROUT___V1995*/ meltfptr[1994])->tabval[29] = (melt_ptr_t) ( /*_.FLD_OWNCLASS__V149*/ meltfptr[148]); MELT_LOCATION ("warmelt-normal.melt:5974:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1995*/ meltfptr[1994])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1824__NORMEXP_DEFCLASS#30", NULL != ( /*_.DISC_SUPER__V150*/ meltfptr[149])); ((meltroutine_ptr_t) /*_.VALROUT___V1995*/ meltfptr[1994])->tabval[30] = (melt_ptr_t) ( /*_.DISC_SUPER__V150*/ meltfptr[149]); MELT_LOCATION ("warmelt-normal.melt:5974:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1995*/ meltfptr[1994]); /*putclosurout#89 */ melt_assertmsg ("putclosrout#89 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1998*/ meltfptr[1997])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#89 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1995*/ meltfptr[1994])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1998*/ meltfptr[1997])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1995*/ meltfptr[1994]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1998*/ meltfptr[1997]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1999*/ meltfptr[1998])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1999*/ meltfptr[1998])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1999*/ meltfptr[1998]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2000*/ meltfptr[1999]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1999*/ meltfptr[1998]); melt_dbgtrace_written_object ( /*_.VALDATA___V1999*/ meltfptr[1998], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2001*/ meltfptr[2000])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2001*/ meltfptr[2000])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2001*/ meltfptr[2000]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2002*/ meltfptr[2001]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2001*/ meltfptr[2000]); melt_dbgtrace_written_object ( /*_.VALDATA___V2001*/ meltfptr[2000], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2003*/ meltfptr[2002])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2003*/ meltfptr[2002])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2003*/ meltfptr[2002]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2004*/ meltfptr[2003]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2003*/ meltfptr[2002]); melt_dbgtrace_written_object ( /*_.VALDATA___V2003*/ meltfptr[2002], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2005*/ meltfptr[2004])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2005*/ meltfptr[2004])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2005*/ meltfptr[2004]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2006*/ meltfptr[2005]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2005*/ meltfptr[2004]); melt_dbgtrace_written_object ( /*_.VALDATA___V2005*/ meltfptr[2004], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2007*/ meltfptr[2006])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2007*/ meltfptr[2006])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2007*/ meltfptr[2006]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2008*/ meltfptr[2007]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2007*/ meltfptr[2006]); melt_dbgtrace_written_object ( /*_.VALDATA___V2007*/ meltfptr[2006], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2009*/ meltfptr[2008])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2009*/ meltfptr[2008])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2009*/ meltfptr[2008]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2010*/ meltfptr[2009]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2009*/ meltfptr[2008]); melt_dbgtrace_written_object ( /*_.VALDATA___V2009*/ meltfptr[2008], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:6151:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2011*/ meltfptr[2010])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1840__NORMEXP_DEFINSTANCE#0", NULL != ( /*_.CLASS_SOURCE_DEFINSTANCE__V151*/ meltfptr[150])); ((meltroutine_ptr_t) /*_.VALROUT___V2011*/ meltfptr[2010])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_DEFINSTANCE__V151*/ meltfptr[150]); MELT_LOCATION ("warmelt-normal.melt:6151:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2011*/ meltfptr[2010])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1840__NORMEXP_DEFINSTANCE#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V2011*/ meltfptr[2010])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:6151:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2011*/ meltfptr[2010])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1840__NORMEXP_DEFINSTANCE#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V2011*/ meltfptr[2010])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:6151:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2011*/ meltfptr[2010])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1840__NORMEXP_DEFINSTANCE#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V2011*/ meltfptr[2010])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:6151:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2011*/ meltfptr[2010])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1840__NORMEXP_DEFINSTANCE#4", NULL != ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7])); ((meltroutine_ptr_t) /*_.VALROUT___V2011*/ meltfptr[2010])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-normal.melt:6151:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2011*/ meltfptr[2010])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1840__NORMEXP_DEFINSTANCE#5", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V2011*/ meltfptr[2010])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:6151:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2011*/ meltfptr[2010])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1840__NORMEXP_DEFINSTANCE#6", NULL != ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V2011*/ meltfptr[2010])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normal.melt:6151:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2011*/ meltfptr[2010])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1840__NORMEXP_DEFINSTANCE#7", NULL != ( /*_.FIND_ENV__V48*/ meltfptr[47])); ((meltroutine_ptr_t) /*_.VALROUT___V2011*/ meltfptr[2010])->tabval[7] = (melt_ptr_t) ( /*_.FIND_ENV__V48*/ meltfptr[47]); MELT_LOCATION ("warmelt-normal.melt:6151:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2011*/ meltfptr[2010])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1561*/ meltfptr[1560]); ((meltroutine_ptr_t) /*_.VALROUT___V2011*/ meltfptr[2010])->tabval[8] = (melt_ptr_t) ( /*_.VALCLO___V1561*/ meltfptr[1560]); MELT_LOCATION ("warmelt-normal.melt:6151:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2011*/ meltfptr[2010])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1840__NORMEXP_DEFINSTANCE#9", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V2011*/ meltfptr[2010])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normal.melt:6151:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2011*/ meltfptr[2010])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V2011*/ meltfptr[2010])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:6151:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2011*/ meltfptr[2010])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1840__NORMEXP_DEFINSTANCE#11", NULL != ( /*_.CLASS_INSTANCE_BINDING__V152*/ meltfptr[151])); ((meltroutine_ptr_t) /*_.VALROUT___V2011*/ meltfptr[2010])->tabval[11] = (melt_ptr_t) ( /*_.CLASS_INSTANCE_BINDING__V152*/ meltfptr[151]); MELT_LOCATION ("warmelt-normal.melt:6151:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2011*/ meltfptr[2010])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V176*/ meltfptr[175]); ((meltroutine_ptr_t) /*_.VALROUT___V2011*/ meltfptr[2010])->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); MELT_LOCATION ("warmelt-normal.melt:6151:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2011*/ meltfptr[2010])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1840__NORMEXP_DEFINSTANCE#13", NULL != ( /*_.CLASS_CLASS__V47*/ meltfptr[46])); ((meltroutine_ptr_t) /*_.VALROUT___V2011*/ meltfptr[2010])->tabval[13] = (melt_ptr_t) ( /*_.CLASS_CLASS__V47*/ meltfptr[46]); MELT_LOCATION ("warmelt-normal.melt:6151:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2011*/ meltfptr[2010])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1840__NORMEXP_DEFINSTANCE#14", NULL != ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V2011*/ meltfptr[2010])->tabval[14] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-normal.melt:6151:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2011*/ meltfptr[2010])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V916*/ meltfptr[915]); ((meltroutine_ptr_t) /*_.VALROUT___V2011*/ meltfptr[2010])->tabval[15] = (melt_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915]); MELT_LOCATION ("warmelt-normal.melt:6151:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2011*/ meltfptr[2010])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1840__NORMEXP_DEFINSTANCE#16", NULL != ( /*_.DISCR_INTEGER__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V2011*/ meltfptr[2010])->tabval[16] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normal.melt:6151:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2011*/ meltfptr[2010])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1216*/ meltfptr[1215]); ((meltroutine_ptr_t) /*_.VALROUT___V2011*/ meltfptr[2010])->tabval[17] = (melt_ptr_t) ( /*_.VALCLO___V1216*/ meltfptr[1215]); MELT_LOCATION ("warmelt-normal.melt:6151:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2011*/ meltfptr[2010])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1840__NORMEXP_DEFINSTANCE#18", NULL != ( /*_.PUT_ENV__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V2011*/ meltfptr[2010])->tabval[18] = (melt_ptr_t) ( /*_.PUT_ENV__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normal.melt:6151:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2011*/ meltfptr[2010])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1840__NORMEXP_DEFINSTANCE#19", NULL != ( /*_.CLASS_FIXED_BINDING__V43*/ meltfptr[42])); ((meltroutine_ptr_t) /*_.VALROUT___V2011*/ meltfptr[2010])->tabval[19] = (melt_ptr_t) ( /*_.CLASS_FIXED_BINDING__V43*/ meltfptr[42]); MELT_LOCATION ("warmelt-normal.melt:6151:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2011*/ meltfptr[2010])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1840__NORMEXP_DEFINSTANCE#20", NULL != ( /*_.MULTIPLE_EVERY__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V2011*/ meltfptr[2010])->tabval[20] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-normal.melt:6151:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2011*/ meltfptr[2010])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1840__NORMEXP_DEFINSTANCE#21", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V2011*/ meltfptr[2010])->tabval[21] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:6151:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2011*/ meltfptr[2010])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1840__NORMEXP_DEFINSTANCE#22", NULL != ( /*_.CLASS_SOURCE_FIELDASSIGN__V83*/ meltfptr[82])); ((meltroutine_ptr_t) /*_.VALROUT___V2011*/ meltfptr[2010])->tabval[22] = (melt_ptr_t) ( /*_.CLASS_SOURCE_FIELDASSIGN__V83*/ meltfptr[82]); MELT_LOCATION ("warmelt-normal.melt:6151:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2011*/ meltfptr[2010])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1840__NORMEXP_DEFINSTANCE#23", NULL != ( /*_.CLASS_FIELD__V80*/ meltfptr[79])); ((meltroutine_ptr_t) /*_.VALROUT___V2011*/ meltfptr[2010])->tabval[23] = (melt_ptr_t) ( /*_.CLASS_FIELD__V80*/ meltfptr[79]); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_40 */ void meltmod__warmelt_normal__initialmeltchunk_41 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-normal.melt:6151:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2011*/ meltfptr[2010])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1840__NORMEXP_DEFINSTANCE#24", NULL != ( /*_.CLASS_NAMED__V24*/ meltfptr[23])); ((meltroutine_ptr_t) /*_.VALROUT___V2011*/ meltfptr[2010])->tabval[24] = (melt_ptr_t) ( /*_.CLASS_NAMED__V24*/ meltfptr[23]); MELT_LOCATION ("warmelt-normal.melt:6151:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2011*/ meltfptr[2010])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V2011*/ meltfptr[2010])->tabval[25] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:6151:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2011*/ meltfptr[2010])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V2011*/ meltfptr[2010])->tabval[26] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-normal.melt:6151:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2011*/ meltfptr[2010])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1840__NORMEXP_DEFINSTANCE#27", NULL != ( /*_.CTYPE_VALUE__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V2011*/ meltfptr[2010])->tabval[27] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normal.melt:6151:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2011*/ meltfptr[2010])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1840__NORMEXP_DEFINSTANCE#28", NULL != ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V2011*/ meltfptr[2010])->tabval[28] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normal.melt:6151:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2011*/ meltfptr[2010])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1840__NORMEXP_DEFINSTANCE#29", NULL != ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V2011*/ meltfptr[2010])->tabval[29] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normal.melt:6207:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2012*/ meltfptr[2011])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1846__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V2012*/ meltfptr[2011])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:6207:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2012*/ meltfptr[2011])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1846__LAMBDA_#1", NULL != ( /*_.CLASS_SOURCE_FIELDASSIGN__V83*/ meltfptr[82])); ((meltroutine_ptr_t) /*_.VALROUT___V2012*/ meltfptr[2011])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SOURCE_FIELDASSIGN__V83*/ meltfptr[82]); MELT_LOCATION ("warmelt-normal.melt:6207:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2012*/ meltfptr[2011])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1846__LAMBDA_#2", NULL != ( /*_.CLASS_FIELD__V80*/ meltfptr[79])); ((meltroutine_ptr_t) /*_.VALROUT___V2012*/ meltfptr[2011])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_FIELD__V80*/ meltfptr[79]); MELT_LOCATION ("warmelt-normal.melt:6207:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2012*/ meltfptr[2011])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1846__LAMBDA_#3", NULL != ( /*_.CLASS_NAMED__V24*/ meltfptr[23])); ((meltroutine_ptr_t) /*_.VALROUT___V2012*/ meltfptr[2011])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NAMED__V24*/ meltfptr[23]); MELT_LOCATION ("warmelt-normal.melt:6207:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2012*/ meltfptr[2011])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V2012*/ meltfptr[2011])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:6207:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2012*/ meltfptr[2011])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V2012*/ meltfptr[2011])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-normal.melt:6207:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2012*/ meltfptr[2011])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1846__LAMBDA_#6", NULL != ( /*_.CTYPE_VALUE__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V2012*/ meltfptr[2011])->tabval[6] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normal.melt:6207:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2012*/ meltfptr[2011])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1846__LAMBDA_#7", NULL != ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V2012*/ meltfptr[2011])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normal.melt:6207:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2012*/ meltfptr[2011])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1846__LAMBDA_#8", NULL != ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V2012*/ meltfptr[2011])->tabval[8] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normal.melt:6207:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2012*/ meltfptr[2011]); MELT_LOCATION ("warmelt-normal.melt:6151:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2011*/ meltfptr[2010])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1840__NORMEXP_DEFINSTANCE#30", NULL != ( /*_.VALROUT___V2012*/ meltfptr[2011])); ((meltroutine_ptr_t) /*_.VALROUT___V2011*/ meltfptr[2010])->tabval[30] = (melt_ptr_t) ( /*_.VALROUT___V2012*/ meltfptr[2011]); MELT_LOCATION ("warmelt-normal.melt:6151:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2011*/ meltfptr[2010])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1840__NORMEXP_DEFINSTANCE#31", NULL != ( /*_.LIST_TO_MULTIPLE__V36*/ meltfptr[35])); ((meltroutine_ptr_t) /*_.VALROUT___V2011*/ meltfptr[2010])->tabval[31] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V36*/ meltfptr[35]); MELT_LOCATION ("warmelt-normal.melt:6151:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2011*/ meltfptr[2010]); /*putclosurout#90 */ melt_assertmsg ("putclosrout#90 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V2013*/ meltfptr[2012])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#90 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2011*/ meltfptr[2010])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V2013*/ meltfptr[2012])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V2011*/ meltfptr[2010]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2013*/ meltfptr[2012]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2014*/ meltfptr[2013])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2014*/ meltfptr[2013])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2014*/ meltfptr[2013]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2015*/ meltfptr[2014]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2014*/ meltfptr[2013]); melt_dbgtrace_written_object ( /*_.VALDATA___V2014*/ meltfptr[2013], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2016*/ meltfptr[2015])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2016*/ meltfptr[2015])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2016*/ meltfptr[2015]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2017*/ meltfptr[2016]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2016*/ meltfptr[2015]); melt_dbgtrace_written_object ( /*_.VALDATA___V2016*/ meltfptr[2015], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:6252:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2018*/ meltfptr[2017])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1847__NORMEXP_DEFINE#0", NULL != ( /*_.CLASS_SOURCE_DEFINE__V153*/ meltfptr[152])); ((meltroutine_ptr_t) /*_.VALROUT___V2018*/ meltfptr[2017])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_DEFINE__V153*/ meltfptr[152]); MELT_LOCATION ("warmelt-normal.melt:6252:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2018*/ meltfptr[2017])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1847__NORMEXP_DEFINE#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V2018*/ meltfptr[2017])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:6252:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2018*/ meltfptr[2017])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1847__NORMEXP_DEFINE#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V2018*/ meltfptr[2017])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:6252:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2018*/ meltfptr[2017])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1847__NORMEXP_DEFINE#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V2018*/ meltfptr[2017])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:6252:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2018*/ meltfptr[2017])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1847__NORMEXP_DEFINE#4", NULL != ( /*_.FIND_ENV__V48*/ meltfptr[47])); ((meltroutine_ptr_t) /*_.VALROUT___V2018*/ meltfptr[2017])->tabval[4] = (melt_ptr_t) ( /*_.FIND_ENV__V48*/ meltfptr[47]); MELT_LOCATION ("warmelt-normal.melt:6252:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2018*/ meltfptr[2017])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1561*/ meltfptr[1560]); ((meltroutine_ptr_t) /*_.VALROUT___V2018*/ meltfptr[2017])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1561*/ meltfptr[1560]); MELT_LOCATION ("warmelt-normal.melt:6252:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2018*/ meltfptr[2017])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1847__NORMEXP_DEFINE#6", NULL != ( /*_.FRESH_ENV__V70*/ meltfptr[69])); ((meltroutine_ptr_t) /*_.VALROUT___V2018*/ meltfptr[2017])->tabval[6] = (melt_ptr_t) ( /*_.FRESH_ENV__V70*/ meltfptr[69]); MELT_LOCATION ("warmelt-normal.melt:6252:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2018*/ meltfptr[2017])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1847__NORMEXP_DEFINE#7", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V2018*/ meltfptr[2017])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:6252:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2018*/ meltfptr[2017])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1847__NORMEXP_DEFINE#8", NULL != ( /*_.CTYPE_VALUE__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V2018*/ meltfptr[2017])->tabval[8] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normal.melt:6252:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2018*/ meltfptr[2017])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1847__NORMEXP_DEFINE#9", NULL != ( /*_.CLASS_DEFINED_VALUE_BINDING__V44*/ meltfptr[43])); ((meltroutine_ptr_t) /*_.VALROUT___V2018*/ meltfptr[2017])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_DEFINED_VALUE_BINDING__V44*/ meltfptr[43]); MELT_LOCATION ("warmelt-normal.melt:6252:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2018*/ meltfptr[2017])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V792*/ meltfptr[791]); ((meltroutine_ptr_t) /*_.VALROUT___V2018*/ meltfptr[2017])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V792*/ meltfptr[791]); MELT_LOCATION ("warmelt-normal.melt:6252:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2018*/ meltfptr[2017])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1847__NORMEXP_DEFINE#11", NULL != ( /*_.PUT_ENV__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V2018*/ meltfptr[2017])->tabval[11] = (melt_ptr_t) ( /*_.PUT_ENV__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normal.melt:6252:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2018*/ meltfptr[2017])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1508*/ meltfptr[1507]); ((meltroutine_ptr_t) /*_.VALROUT___V2018*/ meltfptr[2017])->tabval[12] = (melt_ptr_t) ( /*_.VALCLO___V1508*/ meltfptr[1507]); MELT_LOCATION ("warmelt-normal.melt:6252:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2018*/ meltfptr[2017])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1847__NORMEXP_DEFINE#13", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V2018*/ meltfptr[2017])->tabval[13] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:6252:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2018*/ meltfptr[2017])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1571*/ meltfptr[1570]); ((meltroutine_ptr_t) /*_.VALROUT___V2018*/ meltfptr[2017])->tabval[14] = (melt_ptr_t) ( /*_.VALCLO___V1571*/ meltfptr[1570]); MELT_LOCATION ("warmelt-normal.melt:6252:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2018*/ meltfptr[2017])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1847__NORMEXP_DEFINE#15", NULL != ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V2018*/ meltfptr[2017])->tabval[15] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-normal.melt:6252:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2018*/ meltfptr[2017])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1847__NORMEXP_DEFINE#16", NULL != ( /*_.CLASS_NAMED__V24*/ meltfptr[23])); ((meltroutine_ptr_t) /*_.VALROUT___V2018*/ meltfptr[2017])->tabval[16] = (melt_ptr_t) ( /*_.CLASS_NAMED__V24*/ meltfptr[23]); MELT_LOCATION ("warmelt-normal.melt:6252:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2018*/ meltfptr[2017])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V520*/ meltfptr[519]); ((meltroutine_ptr_t) /*_.VALROUT___V2018*/ meltfptr[2017])->tabval[17] = (melt_ptr_t) ( /*_.VALDATA___V520*/ meltfptr[519]); MELT_LOCATION ("warmelt-normal.melt:6252:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2018*/ meltfptr[2017])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1847__NORMEXP_DEFINE#18", NULL != ( /*_.LIST_EVERY__V34*/ meltfptr[33])); ((meltroutine_ptr_t) /*_.VALROUT___V2018*/ meltfptr[2017])->tabval[18] = (melt_ptr_t) ( /*_.LIST_EVERY__V34*/ meltfptr[33]); MELT_LOCATION ("warmelt-normal.melt:6252:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2018*/ meltfptr[2017])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1847__NORMEXP_DEFINE#19", NULL != ( /*_.PUT_ENV__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V2018*/ meltfptr[2017])->tabval[19] = (melt_ptr_t) ( /*_.PUT_ENV__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normal.melt:6309:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2019*/ meltfptr[2018])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1851__LAMBDA_#0", NULL != ( /*_.PUT_ENV__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V2019*/ meltfptr[2018])->tabval[0] = (melt_ptr_t) ( /*_.PUT_ENV__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-normal.melt:6309:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2019*/ meltfptr[2018]); MELT_LOCATION ("warmelt-normal.melt:6252:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2018*/ meltfptr[2017])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1847__NORMEXP_DEFINE#20", NULL != ( /*_.VALROUT___V2019*/ meltfptr[2018])); ((meltroutine_ptr_t) /*_.VALROUT___V2018*/ meltfptr[2017])->tabval[20] = (melt_ptr_t) ( /*_.VALROUT___V2019*/ meltfptr[2018]); MELT_LOCATION ("warmelt-normal.melt:6252:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2018*/ meltfptr[2017])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1491*/ meltfptr[1490]); ((meltroutine_ptr_t) /*_.VALROUT___V2018*/ meltfptr[2017])->tabval[21] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-normal.melt:6252:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2018*/ meltfptr[2017])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1522*/ meltfptr[1521]); ((meltroutine_ptr_t) /*_.VALROUT___V2018*/ meltfptr[2017])->tabval[22] = (melt_ptr_t) ( /*_.VALCLO___V1522*/ meltfptr[1521]); MELT_LOCATION ("warmelt-normal.melt:6252:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2018*/ meltfptr[2017])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1106*/ meltfptr[1105]); ((meltroutine_ptr_t) /*_.VALROUT___V2018*/ meltfptr[2017])->tabval[23] = (melt_ptr_t) ( /*_.VALDATA___V1106*/ meltfptr[1105]); MELT_LOCATION ("warmelt-normal.melt:6252:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2018*/ meltfptr[2017]); /*putclosurout#91 */ melt_assertmsg ("putclosrout#91 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V2020*/ meltfptr[2019])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#91 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2018*/ meltfptr[2017])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V2020*/ meltfptr[2019])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V2018*/ meltfptr[2017]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2020*/ meltfptr[2019]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2021*/ meltfptr[2020])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2021*/ meltfptr[2020])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2021*/ meltfptr[2020]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2022*/ meltfptr[2021]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2021*/ meltfptr[2020]); melt_dbgtrace_written_object ( /*_.VALDATA___V2021*/ meltfptr[2020], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:6342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2023*/ meltfptr[2022])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1852__NORMEXP_DEFSELECTOR#0", NULL != ( /*_.CLASS_SOURCE_DEFSELECTOR__V67*/ meltfptr[66])); ((meltroutine_ptr_t) /*_.VALROUT___V2023*/ meltfptr[2022])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_DEFSELECTOR__V67*/ meltfptr[66]); MELT_LOCATION ("warmelt-normal.melt:6342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2023*/ meltfptr[2022])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1852__NORMEXP_DEFSELECTOR#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V2023*/ meltfptr[2022])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:6342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2023*/ meltfptr[2022])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1852__NORMEXP_DEFSELECTOR#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V2023*/ meltfptr[2022])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:6342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2023*/ meltfptr[2022])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1852__NORMEXP_DEFSELECTOR#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V2023*/ meltfptr[2022])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:6342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2023*/ meltfptr[2022])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1852__NORMEXP_DEFSELECTOR#4", NULL != ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7])); ((meltroutine_ptr_t) /*_.VALROUT___V2023*/ meltfptr[2022])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-normal.melt:6342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2023*/ meltfptr[2022])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1852__NORMEXP_DEFSELECTOR#5", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V2023*/ meltfptr[2022])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:6342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2023*/ meltfptr[2022])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1852__NORMEXP_DEFSELECTOR#6", NULL != ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V2023*/ meltfptr[2022])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normal.melt:6342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2023*/ meltfptr[2022])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1852__NORMEXP_DEFSELECTOR#7", NULL != ( /*_.FIND_ENV__V48*/ meltfptr[47])); ((meltroutine_ptr_t) /*_.VALROUT___V2023*/ meltfptr[2022])->tabval[7] = (melt_ptr_t) ( /*_.FIND_ENV__V48*/ meltfptr[47]); MELT_LOCATION ("warmelt-normal.melt:6342:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2023*/ meltfptr[2022])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1561*/ meltfptr[1560]); ((meltroutine_ptr_t) /*_.VALROUT___V2023*/ meltfptr[2022])->tabval[8] = (melt_ptr_t) ( /*_.VALCLO___V1561*/ meltfptr[1560]); MELT_LOCATION ("warmelt-normal.melt:6342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2023*/ meltfptr[2022])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1852__NORMEXP_DEFSELECTOR#9", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V2023*/ meltfptr[2022])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normal.melt:6342:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2023*/ meltfptr[2022])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V2023*/ meltfptr[2022])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:6342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2023*/ meltfptr[2022])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1852__NORMEXP_DEFSELECTOR#11", NULL != ( /*_.CLASS_SELECTOR_BINDING__V66*/ meltfptr[65])); ((meltroutine_ptr_t) /*_.VALROUT___V2023*/ meltfptr[2022])->tabval[11] = (melt_ptr_t) ( /*_.CLASS_SELECTOR_BINDING__V66*/ meltfptr[65]); MELT_LOCATION ("warmelt-normal.melt:6342:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2023*/ meltfptr[2022])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V176*/ meltfptr[175]); ((meltroutine_ptr_t) /*_.VALROUT___V2023*/ meltfptr[2022])->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); MELT_LOCATION ("warmelt-normal.melt:6342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2023*/ meltfptr[2022])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1852__NORMEXP_DEFSELECTOR#13", NULL != ( /*_.CLASS_CLASS__V47*/ meltfptr[46])); ((meltroutine_ptr_t) /*_.VALROUT___V2023*/ meltfptr[2022])->tabval[13] = (melt_ptr_t) ( /*_.CLASS_CLASS__V47*/ meltfptr[46]); MELT_LOCATION ("warmelt-normal.melt:6342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2023*/ meltfptr[2022])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1852__NORMEXP_DEFSELECTOR#14", NULL != ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V2023*/ meltfptr[2022])->tabval[14] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-normal.melt:6342:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2023*/ meltfptr[2022])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V938*/ meltfptr[937]); ((meltroutine_ptr_t) /*_.VALROUT___V2023*/ meltfptr[2022])->tabval[15] = (melt_ptr_t) ( /*_.VALDATA___V938*/ meltfptr[937]); MELT_LOCATION ("warmelt-normal.melt:6342:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2023*/ meltfptr[2022])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1563*/ meltfptr[1562]); ((meltroutine_ptr_t) /*_.VALROUT___V2023*/ meltfptr[2022])->tabval[16] = (melt_ptr_t) ( /*_.VALCLO___V1563*/ meltfptr[1562]); MELT_LOCATION ("warmelt-normal.melt:6342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2023*/ meltfptr[2022])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1852__NORMEXP_DEFSELECTOR#17", NULL != ( /*_.DISCR_STRING__V22*/ meltfptr[21])); ((meltroutine_ptr_t) /*_.VALROUT___V2023*/ meltfptr[2022])->tabval[17] = (melt_ptr_t) ( /*_.DISCR_STRING__V22*/ meltfptr[21]); MELT_LOCATION ("warmelt-normal.melt:6342:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2023*/ meltfptr[2022])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V916*/ meltfptr[915]); ((meltroutine_ptr_t) /*_.VALROUT___V2023*/ meltfptr[2022])->tabval[18] = (melt_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915]); MELT_LOCATION ("warmelt-normal.melt:6342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2023*/ meltfptr[2022])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1852__NORMEXP_DEFSELECTOR#19", NULL != ( /*_.DISCR_INTEGER__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V2023*/ meltfptr[2022])->tabval[19] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-normal.melt:6342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2023*/ meltfptr[2022])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1852__NORMEXP_DEFSELECTOR#20", NULL != ( /*_.DISCR_MAP_OBJECTS__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V2023*/ meltfptr[2022])->tabval[20] = (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-normal.melt:6342:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2023*/ meltfptr[2022])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V958*/ meltfptr[957]); ((meltroutine_ptr_t) /*_.VALROUT___V2023*/ meltfptr[2022])->tabval[21] = (melt_ptr_t) ( /*_.VALDATA___V958*/ meltfptr[957]); MELT_LOCATION ("warmelt-normal.melt:6342:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2023*/ meltfptr[2022])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1918*/ meltfptr[1917]); ((meltroutine_ptr_t) /*_.VALROUT___V2023*/ meltfptr[2022])->tabval[22] = (melt_ptr_t) ( /*_.VALCLO___V1918*/ meltfptr[1917]); MELT_LOCATION ("warmelt-normal.melt:6342:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2023*/ meltfptr[2022])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1216*/ meltfptr[1215]); ((meltroutine_ptr_t) /*_.VALROUT___V2023*/ meltfptr[2022])->tabval[23] = (melt_ptr_t) ( /*_.VALCLO___V1216*/ meltfptr[1215]); MELT_LOCATION ("warmelt-normal.melt:6342:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2023*/ meltfptr[2022])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1898*/ meltfptr[1897]); ((meltroutine_ptr_t) /*_.VALROUT___V2023*/ meltfptr[2022])->tabval[24] = (melt_ptr_t) ( /*_.VALCLO___V1898*/ meltfptr[1897]); MELT_LOCATION ("warmelt-normal.melt:6342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2023*/ meltfptr[2022])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1852__NORMEXP_DEFSELECTOR#25", NULL != ( /*_.SDEFSEL_FORMALS__V154*/ meltfptr[153])); ((meltroutine_ptr_t) /*_.VALROUT___V2023*/ meltfptr[2022])->tabval[25] = (melt_ptr_t) ( /*_.SDEFSEL_FORMALS__V154*/ meltfptr[153]); MELT_LOCATION ("warmelt-normal.melt:6342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2023*/ meltfptr[2022])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1852__NORMEXP_DEFSELECTOR#26", NULL != ( /*_.CLASS_FIXED_BINDING__V43*/ meltfptr[42])); ((meltroutine_ptr_t) /*_.VALROUT___V2023*/ meltfptr[2022])->tabval[26] = (melt_ptr_t) ( /*_.CLASS_FIXED_BINDING__V43*/ meltfptr[42]); MELT_LOCATION ("warmelt-normal.melt:6342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2023*/ meltfptr[2022])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1852__NORMEXP_DEFSELECTOR#27", NULL != ( /*_.MULTIPLE_EVERY__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V2023*/ meltfptr[2022])->tabval[27] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-normal.melt:6342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2023*/ meltfptr[2022])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1852__NORMEXP_DEFSELECTOR#28", NULL != ( /*_.CLASS_SOURCE_FIELDASSIGN__V83*/ meltfptr[82])); ((meltroutine_ptr_t) /*_.VALROUT___V2023*/ meltfptr[2022])->tabval[28] = (melt_ptr_t) ( /*_.CLASS_SOURCE_FIELDASSIGN__V83*/ meltfptr[82]); MELT_LOCATION ("warmelt-normal.melt:6342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2023*/ meltfptr[2022])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1852__NORMEXP_DEFSELECTOR#29", NULL != ( /*_.CLASS_FIELD__V80*/ meltfptr[79])); ((meltroutine_ptr_t) /*_.VALROUT___V2023*/ meltfptr[2022])->tabval[29] = (melt_ptr_t) ( /*_.CLASS_FIELD__V80*/ meltfptr[79]); MELT_LOCATION ("warmelt-normal.melt:6342:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2023*/ meltfptr[2022])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V2023*/ meltfptr[2022])->tabval[30] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:6342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2023*/ meltfptr[2022])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1852__NORMEXP_DEFSELECTOR#31", NULL != ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V2023*/ meltfptr[2022])->tabval[31] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normal.melt:6342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2023*/ meltfptr[2022])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1852__NORMEXP_DEFSELECTOR#32", NULL != ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V2023*/ meltfptr[2022])->tabval[32] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normal.melt:6417:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2024*/ meltfptr[2023])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1856__LAMBDA_#0", NULL != ( /*_.CLASS_SOURCE_FIELDASSIGN__V83*/ meltfptr[82])); ((meltroutine_ptr_t) /*_.VALROUT___V2024*/ meltfptr[2023])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_FIELDASSIGN__V83*/ meltfptr[82]); MELT_LOCATION ("warmelt-normal.melt:6417:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2024*/ meltfptr[2023])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1856__LAMBDA_#1", NULL != ( /*_.CLASS_FIELD__V80*/ meltfptr[79])); ((meltroutine_ptr_t) /*_.VALROUT___V2024*/ meltfptr[2023])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_FIELD__V80*/ meltfptr[79]); MELT_LOCATION ("warmelt-normal.melt:6417:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2024*/ meltfptr[2023])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V2024*/ meltfptr[2023])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:6417:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2024*/ meltfptr[2023])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1856__LAMBDA_#3", NULL != ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V2024*/ meltfptr[2023])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normal.melt:6417:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2024*/ meltfptr[2023])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1856__LAMBDA_#4", NULL != ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V2024*/ meltfptr[2023])->tabval[4] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normal.melt:6417:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2024*/ meltfptr[2023]); MELT_LOCATION ("warmelt-normal.melt:6342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2023*/ meltfptr[2022])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1852__NORMEXP_DEFSELECTOR#33", NULL != ( /*_.VALROUT___V2024*/ meltfptr[2023])); ((meltroutine_ptr_t) /*_.VALROUT___V2023*/ meltfptr[2022])->tabval[33] = (melt_ptr_t) ( /*_.VALROUT___V2024*/ meltfptr[2023]); MELT_LOCATION ("warmelt-normal.melt:6342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2023*/ meltfptr[2022])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1852__NORMEXP_DEFSELECTOR#34", NULL != ( /*_.LIST_TO_MULTIPLE__V36*/ meltfptr[35])); ((meltroutine_ptr_t) /*_.VALROUT___V2023*/ meltfptr[2022])->tabval[34] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V36*/ meltfptr[35]); MELT_LOCATION ("warmelt-normal.melt:6342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2023*/ meltfptr[2022])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1852__NORMEXP_DEFSELECTOR#35", NULL != ( /*_.NAMED_NAME__V108*/ meltfptr[107])); ((meltroutine_ptr_t) /*_.VALROUT___V2023*/ meltfptr[2022])->tabval[35] = (melt_ptr_t) ( /*_.NAMED_NAME__V108*/ meltfptr[107]); MELT_LOCATION ("warmelt-normal.melt:6342:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2023*/ meltfptr[2022]); /*putclosurout#92 */ melt_assertmsg ("putclosrout#92 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V2025*/ meltfptr[2024])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#92 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2023*/ meltfptr[2022])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V2025*/ meltfptr[2024])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V2023*/ meltfptr[2022]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2025*/ meltfptr[2024]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2026*/ meltfptr[2025])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2026*/ meltfptr[2025])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2026*/ meltfptr[2025]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2027*/ meltfptr[2026]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2026*/ meltfptr[2025]); melt_dbgtrace_written_object ( /*_.VALDATA___V2026*/ meltfptr[2025], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:6465:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2028*/ meltfptr[2027])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1857__NORMAL_VALUE_EXPORTER#0", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V2028*/ meltfptr[2027])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:6465:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2028*/ meltfptr[2027])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1857__NORMAL_VALUE_EXPORTER#1", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V2028*/ meltfptr[2027])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:6465:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2028*/ meltfptr[2027])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1857__NORMAL_VALUE_EXPORTER#2", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V2028*/ meltfptr[2027])->tabval[2] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2029*/ meltfptr[2028])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2029*/ meltfptr[2028])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2029*/ meltfptr[2028]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2030*/ meltfptr[2029]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2029*/ meltfptr[2028]); melt_dbgtrace_written_object ( /*_.VALDATA___V2029*/ meltfptr[2028], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:6465:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2028*/ meltfptr[2027])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1857__NORMAL_VALUE_EXPORTER#3", NULL != ( /*_.VALDATA___V2029*/ meltfptr[2028])); ((meltroutine_ptr_t) /*_.VALROUT___V2028*/ meltfptr[2027])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V2029*/ meltfptr[2028]); MELT_LOCATION ("warmelt-normal.melt:6465:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2028*/ meltfptr[2027])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V866*/ meltfptr[865]); ((meltroutine_ptr_t) /*_.VALROUT___V2028*/ meltfptr[2027])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V866*/ meltfptr[865]); MELT_LOCATION ("warmelt-normal.melt:6465:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2028*/ meltfptr[2027])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1857__NORMAL_VALUE_EXPORTER#5", NULL != ( /*_.VALDATA___V1412*/ meltfptr[1411])); ((meltroutine_ptr_t) /*_.VALROUT___V2028*/ meltfptr[2027])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1412*/ meltfptr[1411]); MELT_LOCATION ("warmelt-normal.melt:6465:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2028*/ meltfptr[2027])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1857__NORMAL_VALUE_EXPORTER#6", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V2028*/ meltfptr[2027])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:6465:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2028*/ meltfptr[2027])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1857__NORMAL_VALUE_EXPORTER#7", NULL != ( /*_.CTYPE_VALUE__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V2028*/ meltfptr[2027])->tabval[7] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normal.melt:6465:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2028*/ meltfptr[2027])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V478*/ meltfptr[477]); ((meltroutine_ptr_t) /*_.VALROUT___V2028*/ meltfptr[2027])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V478*/ meltfptr[477]); MELT_LOCATION ("warmelt-normal.melt:6465:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2028*/ meltfptr[2027])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1857__NORMAL_VALUE_EXPORTER#9", NULL != ( /*_.SYSDATA_VALUE_EXPORTER__V155*/ meltfptr[154])); ((meltroutine_ptr_t) /*_.VALROUT___V2028*/ meltfptr[2027])->tabval[9] = (melt_ptr_t) ( /*_.SYSDATA_VALUE_EXPORTER__V155*/ meltfptr[154]); MELT_LOCATION ("warmelt-normal.melt:6465:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2028*/ meltfptr[2027])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V2028*/ meltfptr[2027])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:6465:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2028*/ meltfptr[2027]); /*putclosurout#93 */ melt_assertmsg ("putclosrout#93 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V2031*/ meltfptr[2030])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#93 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2028*/ meltfptr[2027])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V2031*/ meltfptr[2030])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V2028*/ meltfptr[2027]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2031*/ meltfptr[2030]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2032*/ meltfptr[2031])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2032*/ meltfptr[2031])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2032*/ meltfptr[2031]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2033*/ meltfptr[2032]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2032*/ meltfptr[2031]); melt_dbgtrace_written_object ( /*_.VALDATA___V2032*/ meltfptr[2031], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:6500:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2034*/ meltfptr[2033])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1863__NORMAL_EXPORTED_VALUE#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V2034*/ meltfptr[2033])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_41 */ void meltmod__warmelt_normal__initialmeltchunk_42 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-normal.melt:6500:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2034*/ meltfptr[2033])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1863__NORMAL_EXPORTED_VALUE#1", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V2034*/ meltfptr[2033])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normal.melt:6500:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2034*/ meltfptr[2033])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V176*/ meltfptr[175]); ((meltroutine_ptr_t) /*_.VALROUT___V2034*/ meltfptr[2033])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); MELT_LOCATION ("warmelt-normal.melt:6500:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2034*/ meltfptr[2033])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1863__NORMAL_EXPORTED_VALUE#3", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V2034*/ meltfptr[2033])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:6500:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2034*/ meltfptr[2033])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1863__NORMAL_EXPORTED_VALUE#4", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V2034*/ meltfptr[2033])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:6500:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2034*/ meltfptr[2033])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1863__NORMAL_EXPORTED_VALUE#5", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V2034*/ meltfptr[2033])->tabval[5] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2035*/ meltfptr[2034])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2035*/ meltfptr[2034])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2035*/ meltfptr[2034]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2036*/ meltfptr[2035]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2035*/ meltfptr[2034]); melt_dbgtrace_written_object ( /*_.VALDATA___V2035*/ meltfptr[2034], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:6500:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2034*/ meltfptr[2033])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1863__NORMAL_EXPORTED_VALUE#6", NULL != ( /*_.VALDATA___V2035*/ meltfptr[2034])); ((meltroutine_ptr_t) /*_.VALROUT___V2034*/ meltfptr[2033])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V2035*/ meltfptr[2034]); MELT_LOCATION ("warmelt-normal.melt:6500:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2034*/ meltfptr[2033])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1561*/ meltfptr[1560]); ((meltroutine_ptr_t) /*_.VALROUT___V2034*/ meltfptr[2033])->tabval[7] = (melt_ptr_t) ( /*_.VALCLO___V1561*/ meltfptr[1560]); MELT_LOCATION ("warmelt-normal.melt:6500:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2034*/ meltfptr[2033])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1863__NORMAL_EXPORTED_VALUE#8", NULL != ( /*_.DISCR_STRBUF__V54*/ meltfptr[53])); ((meltroutine_ptr_t) /*_.VALROUT___V2034*/ meltfptr[2033])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V54*/ meltfptr[53]); MELT_LOCATION ("warmelt-normal.melt:6500:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2034*/ meltfptr[2033])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1863__NORMAL_EXPORTED_VALUE#9", NULL != ( /*_.CLASS_SOURCE_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V156*/ meltfptr[155])); ((meltroutine_ptr_t) /*_.VALROUT___V2034*/ meltfptr[2033])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_SOURCE_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V156*/ meltfptr[155]); MELT_LOCATION ("warmelt-normal.melt:6500:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2034*/ meltfptr[2033])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1863__NORMAL_EXPORTED_VALUE#10", NULL != ( /*_.DISCR_STRING__V22*/ meltfptr[21])); ((meltroutine_ptr_t) /*_.VALROUT___V2034*/ meltfptr[2033])->tabval[10] = (melt_ptr_t) ( /*_.DISCR_STRING__V22*/ meltfptr[21]); MELT_LOCATION ("warmelt-normal.melt:6500:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2034*/ meltfptr[2033])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V2034*/ meltfptr[2033])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:6500:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2034*/ meltfptr[2033])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1863__NORMAL_EXPORTED_VALUE#12", NULL != ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V2034*/ meltfptr[2033])->tabval[12] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normal.melt:6500:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2034*/ meltfptr[2033])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1863__NORMAL_EXPORTED_VALUE#13", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V2034*/ meltfptr[2033])->tabval[13] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:6500:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2034*/ meltfptr[2033])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1863__NORMAL_EXPORTED_VALUE#14", NULL != ( /*_.CTYPE_VOID__V57*/ meltfptr[56])); ((meltroutine_ptr_t) /*_.VALROUT___V2034*/ meltfptr[2033])->tabval[14] = (melt_ptr_t) ( /*_.CTYPE_VOID__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-normal.melt:6500:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2034*/ meltfptr[2033])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V218*/ meltfptr[217]); ((meltroutine_ptr_t) /*_.VALROUT___V2034*/ meltfptr[2033])->tabval[15] = (melt_ptr_t) ( /*_.VALDATA___V218*/ meltfptr[217]); MELT_LOCATION ("warmelt-normal.melt:6500:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2034*/ meltfptr[2033])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1863__NORMAL_EXPORTED_VALUE#16", NULL != ( /*_.CTYPE_VALUE__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V2034*/ meltfptr[2033])->tabval[16] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normal.melt:6500:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2034*/ meltfptr[2033])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V2034*/ meltfptr[2033])->tabval[17] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:6500:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2034*/ meltfptr[2033]); /*putclosurout#94 */ melt_assertmsg ("putclosrout#94 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V2037*/ meltfptr[2036])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#94 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2034*/ meltfptr[2033])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V2037*/ meltfptr[2036])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V2034*/ meltfptr[2033]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2037*/ meltfptr[2036]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2038*/ meltfptr[2037])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2038*/ meltfptr[2037])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2038*/ meltfptr[2037]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2039*/ meltfptr[2038]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2038*/ meltfptr[2037]); melt_dbgtrace_written_object ( /*_.VALDATA___V2038*/ meltfptr[2037], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:6554:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2040*/ meltfptr[2039])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1869__NORMEXP_EXPORT_VALUES#0", NULL != ( /*_.CLASS_SOURCE_EXPORT_VALUES__V157*/ meltfptr[156])); ((meltroutine_ptr_t) /*_.VALROUT___V2040*/ meltfptr[2039])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_EXPORT_VALUES__V157*/ meltfptr[156]); MELT_LOCATION ("warmelt-normal.melt:6554:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2040*/ meltfptr[2039])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1869__NORMEXP_EXPORT_VALUES#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V2040*/ meltfptr[2039])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:6554:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2040*/ meltfptr[2039])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1869__NORMEXP_EXPORT_VALUES#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V2040*/ meltfptr[2039])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:6554:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2040*/ meltfptr[2039])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1869__NORMEXP_EXPORT_VALUES#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V2040*/ meltfptr[2039])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:6554:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2040*/ meltfptr[2039])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1869__NORMEXP_EXPORT_VALUES#4", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V2040*/ meltfptr[2039])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:6554:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2040*/ meltfptr[2039])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V2031*/ meltfptr[2030]); ((meltroutine_ptr_t) /*_.VALROUT___V2040*/ meltfptr[2039])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V2031*/ meltfptr[2030]); MELT_LOCATION ("warmelt-normal.melt:6554:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2040*/ meltfptr[2039])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V876*/ meltfptr[875]); ((meltroutine_ptr_t) /*_.VALROUT___V2040*/ meltfptr[2039])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V876*/ meltfptr[875]); MELT_LOCATION ("warmelt-normal.melt:6554:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2040*/ meltfptr[2039])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1869__NORMEXP_EXPORT_VALUES#7", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V2040*/ meltfptr[2039])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normal.melt:6554:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2040*/ meltfptr[2039])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V2040*/ meltfptr[2039])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:6554:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2040*/ meltfptr[2039])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1869__NORMEXP_EXPORT_VALUES#9", NULL != ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V2040*/ meltfptr[2039])->tabval[9] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normal.melt:6554:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2040*/ meltfptr[2039])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V2037*/ meltfptr[2036]); ((meltroutine_ptr_t) /*_.VALROUT___V2040*/ meltfptr[2039])->tabval[10] = (melt_ptr_t) ( /*_.VALCLO___V2037*/ meltfptr[2036]); MELT_LOCATION ("warmelt-normal.melt:6554:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2040*/ meltfptr[2039]); /*putclosurout#95 */ melt_assertmsg ("putclosrout#95 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V2041*/ meltfptr[2040])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#95 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2040*/ meltfptr[2039])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V2041*/ meltfptr[2040])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V2040*/ meltfptr[2039]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2041*/ meltfptr[2040]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2042*/ meltfptr[2041])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2042*/ meltfptr[2041])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2042*/ meltfptr[2041]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2043*/ meltfptr[2042]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2042*/ meltfptr[2041]); melt_dbgtrace_written_object ( /*_.VALDATA___V2042*/ meltfptr[2041], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:6597:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2044*/ meltfptr[2043])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1873__NORMEXP_EXPORT_SYNONYM#0", NULL != ( /*_.CLASS_SOURCE_EXPORT_SYNONYM__V158*/ meltfptr[157])); ((meltroutine_ptr_t) /*_.VALROUT___V2044*/ meltfptr[2043])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_EXPORT_SYNONYM__V158*/ meltfptr[157]); MELT_LOCATION ("warmelt-normal.melt:6597:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2044*/ meltfptr[2043])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1873__NORMEXP_EXPORT_SYNONYM#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V2044*/ meltfptr[2043])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:6597:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2044*/ meltfptr[2043])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1873__NORMEXP_EXPORT_SYNONYM#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V2044*/ meltfptr[2043])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:6597:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2044*/ meltfptr[2043])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1873__NORMEXP_EXPORT_SYNONYM#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V2044*/ meltfptr[2043])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:6597:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2044*/ meltfptr[2043])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1873__NORMEXP_EXPORT_SYNONYM#4", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V2044*/ meltfptr[2043])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:6597:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2044*/ meltfptr[2043])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V2031*/ meltfptr[2030]); ((meltroutine_ptr_t) /*_.VALROUT___V2044*/ meltfptr[2043])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V2031*/ meltfptr[2030]); MELT_LOCATION ("warmelt-normal.melt:6597:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2044*/ meltfptr[2043])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V876*/ meltfptr[875]); ((meltroutine_ptr_t) /*_.VALROUT___V2044*/ meltfptr[2043])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V876*/ meltfptr[875]); MELT_LOCATION ("warmelt-normal.melt:6597:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2044*/ meltfptr[2043])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1873__NORMEXP_EXPORT_SYNONYM#7", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V2044*/ meltfptr[2043])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normal.melt:6597:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2044*/ meltfptr[2043])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V2044*/ meltfptr[2043])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:6597:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2044*/ meltfptr[2043])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1873__NORMEXP_EXPORT_SYNONYM#9", NULL != ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V2044*/ meltfptr[2043])->tabval[9] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normal.melt:6597:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2044*/ meltfptr[2043])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V2037*/ meltfptr[2036]); ((meltroutine_ptr_t) /*_.VALROUT___V2044*/ meltfptr[2043])->tabval[10] = (melt_ptr_t) ( /*_.VALCLO___V2037*/ meltfptr[2036]); MELT_LOCATION ("warmelt-normal.melt:6597:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2044*/ meltfptr[2043]); /*putclosurout#96 */ melt_assertmsg ("putclosrout#96 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V2045*/ meltfptr[2044])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#96 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2044*/ meltfptr[2043])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V2045*/ meltfptr[2044])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V2044*/ meltfptr[2043]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2045*/ meltfptr[2044]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2046*/ meltfptr[2045])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2046*/ meltfptr[2045])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2046*/ meltfptr[2045]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2047*/ meltfptr[2046]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2046*/ meltfptr[2045]); melt_dbgtrace_written_object ( /*_.VALDATA___V2046*/ meltfptr[2045], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:6638:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2048*/ meltfptr[2047])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1877__NORMEXP_EXPORT_CLASS#0", NULL != ( /*_.CLASS_SOURCE_EXPORT_CLASS__V159*/ meltfptr[158])); ((meltroutine_ptr_t) /*_.VALROUT___V2048*/ meltfptr[2047])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_EXPORT_CLASS__V159*/ meltfptr[158]); MELT_LOCATION ("warmelt-normal.melt:6638:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2048*/ meltfptr[2047])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1877__NORMEXP_EXPORT_CLASS#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V2048*/ meltfptr[2047])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:6638:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2048*/ meltfptr[2047])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1877__NORMEXP_EXPORT_CLASS#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V2048*/ meltfptr[2047])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:6638:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2048*/ meltfptr[2047])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1877__NORMEXP_EXPORT_CLASS#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V2048*/ meltfptr[2047])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:6638:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2048*/ meltfptr[2047])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1877__NORMEXP_EXPORT_CLASS#4", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V2048*/ meltfptr[2047])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:6638:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2048*/ meltfptr[2047])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V2031*/ meltfptr[2030]); ((meltroutine_ptr_t) /*_.VALROUT___V2048*/ meltfptr[2047])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V2031*/ meltfptr[2030]); MELT_LOCATION ("warmelt-normal.melt:6638:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2048*/ meltfptr[2047])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V876*/ meltfptr[875]); ((meltroutine_ptr_t) /*_.VALROUT___V2048*/ meltfptr[2047])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V876*/ meltfptr[875]); MELT_LOCATION ("warmelt-normal.melt:6638:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2048*/ meltfptr[2047])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1877__NORMEXP_EXPORT_CLASS#7", NULL != ( /*_.CLASS_MODULE_CONTEXT__V16*/ meltfptr[15])); ((meltroutine_ptr_t) /*_.VALROUT___V2048*/ meltfptr[2047])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_MODULE_CONTEXT__V16*/ meltfptr[15]); MELT_LOCATION ("warmelt-normal.melt:6638:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2048*/ meltfptr[2047])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1877__NORMEXP_EXPORT_CLASS#8", NULL != ( /*_.MULTIPLE_EVERY__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V2048*/ meltfptr[2047])->tabval[8] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-normal.melt:6638:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2048*/ meltfptr[2047])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1877__NORMEXP_EXPORT_CLASS#9", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V2048*/ meltfptr[2047])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normal.melt:6638:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2048*/ meltfptr[2047])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1877__NORMEXP_EXPORT_CLASS#10", NULL != ( /*_.FIND_ENV__V48*/ meltfptr[47])); ((meltroutine_ptr_t) /*_.VALROUT___V2048*/ meltfptr[2047])->tabval[10] = (melt_ptr_t) ( /*_.FIND_ENV__V48*/ meltfptr[47]); MELT_LOCATION ("warmelt-normal.melt:6638:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2048*/ meltfptr[2047])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1561*/ meltfptr[1560]); ((meltroutine_ptr_t) /*_.VALROUT___V2048*/ meltfptr[2047])->tabval[11] = (melt_ptr_t) ( /*_.VALCLO___V1561*/ meltfptr[1560]); MELT_LOCATION ("warmelt-normal.melt:6638:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2048*/ meltfptr[2047])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1877__NORMEXP_EXPORT_CLASS#12", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V2048*/ meltfptr[2047])->tabval[12] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:6638:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2048*/ meltfptr[2047])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V968*/ meltfptr[967]); ((meltroutine_ptr_t) /*_.VALROUT___V2048*/ meltfptr[2047])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V968*/ meltfptr[967]); MELT_LOCATION ("warmelt-normal.melt:6638:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2048*/ meltfptr[2047])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1877__NORMEXP_EXPORT_CLASS#14", NULL != ( /*_.CLASS_CLASS_BINDING__V49*/ meltfptr[48])); ((meltroutine_ptr_t) /*_.VALROUT___V2048*/ meltfptr[2047])->tabval[14] = (melt_ptr_t) ( /*_.CLASS_CLASS_BINDING__V49*/ meltfptr[48]); MELT_LOCATION ("warmelt-normal.melt:6638:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2048*/ meltfptr[2047])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V888*/ meltfptr[887]); ((meltroutine_ptr_t) /*_.VALROUT___V2048*/ meltfptr[2047])->tabval[15] = (melt_ptr_t) ( /*_.VALDATA___V888*/ meltfptr[887]); MELT_LOCATION ("warmelt-normal.melt:6638:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2048*/ meltfptr[2047])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V2037*/ meltfptr[2036]); ((meltroutine_ptr_t) /*_.VALROUT___V2048*/ meltfptr[2047])->tabval[16] = (melt_ptr_t) ( /*_.VALCLO___V2037*/ meltfptr[2036]); MELT_LOCATION ("warmelt-normal.melt:6638:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2048*/ meltfptr[2047])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1877__NORMEXP_EXPORT_CLASS#17", NULL != ( /*_.CLASS_CLASS__V47*/ meltfptr[46])); ((meltroutine_ptr_t) /*_.VALROUT___V2048*/ meltfptr[2047])->tabval[17] = (melt_ptr_t) ( /*_.CLASS_CLASS__V47*/ meltfptr[46]); MELT_LOCATION ("warmelt-normal.melt:6638:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2048*/ meltfptr[2047])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1877__NORMEXP_EXPORT_CLASS#18", NULL != ( /*_.CLASS_MODULE_CONTEXT__V16*/ meltfptr[15])); ((meltroutine_ptr_t) /*_.VALROUT___V2048*/ meltfptr[2047])->tabval[18] = (melt_ptr_t) ( /*_.CLASS_MODULE_CONTEXT__V16*/ meltfptr[15]); MELT_LOCATION ("warmelt-normal.melt:6638:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2048*/ meltfptr[2047])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1877__NORMEXP_EXPORT_CLASS#19", NULL != ( /*_.MULTIPLE_EVERY__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V2048*/ meltfptr[2047])->tabval[19] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-normal.melt:6638:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2048*/ meltfptr[2047])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1877__NORMEXP_EXPORT_CLASS#20", NULL != ( /*_.CLASS_FIELD__V80*/ meltfptr[79])); ((meltroutine_ptr_t) /*_.VALROUT___V2048*/ meltfptr[2047])->tabval[20] = (melt_ptr_t) ( /*_.CLASS_FIELD__V80*/ meltfptr[79]); MELT_LOCATION ("warmelt-normal.melt:6638:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2048*/ meltfptr[2047])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1877__NORMEXP_EXPORT_CLASS#21", NULL != ( /*_.FIND_ENV__V48*/ meltfptr[47])); ((meltroutine_ptr_t) /*_.VALROUT___V2048*/ meltfptr[2047])->tabval[21] = (melt_ptr_t) ( /*_.FIND_ENV__V48*/ meltfptr[47]); MELT_LOCATION ("warmelt-normal.melt:6638:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2048*/ meltfptr[2047])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1877__NORMEXP_EXPORT_CLASS#22", NULL != ( /*_.CLASS_FIELD_BINDING__V148*/ meltfptr[147])); ((meltroutine_ptr_t) /*_.VALROUT___V2048*/ meltfptr[2047])->tabval[22] = (melt_ptr_t) ( /*_.CLASS_FIELD_BINDING__V148*/ meltfptr[147]); MELT_LOCATION ("warmelt-normal.melt:6638:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2048*/ meltfptr[2047])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V2037*/ meltfptr[2036]); ((meltroutine_ptr_t) /*_.VALROUT___V2048*/ meltfptr[2047])->tabval[23] = (melt_ptr_t) ( /*_.VALCLO___V2037*/ meltfptr[2036]); MELT_LOCATION ("warmelt-normal.melt:6638:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2048*/ meltfptr[2047])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1877__NORMEXP_EXPORT_CLASS#24", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V2048*/ meltfptr[2047])->tabval[24] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:6655:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2049*/ meltfptr[2048])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1881__LAMBDA_#0", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V2049*/ meltfptr[2048])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normal.melt:6655:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2049*/ meltfptr[2048])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1881__LAMBDA_#1", NULL != ( /*_.FIND_ENV__V48*/ meltfptr[47])); ((meltroutine_ptr_t) /*_.VALROUT___V2049*/ meltfptr[2048])->tabval[1] = (melt_ptr_t) ( /*_.FIND_ENV__V48*/ meltfptr[47]); MELT_LOCATION ("warmelt-normal.melt:6655:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2049*/ meltfptr[2048])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1561*/ meltfptr[1560]); ((meltroutine_ptr_t) /*_.VALROUT___V2049*/ meltfptr[2048])->tabval[2] = (melt_ptr_t) ( /*_.VALCLO___V1561*/ meltfptr[1560]); MELT_LOCATION ("warmelt-normal.melt:6655:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2049*/ meltfptr[2048])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1881__LAMBDA_#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V2049*/ meltfptr[2048])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:6655:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2049*/ meltfptr[2048])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V968*/ meltfptr[967]); ((meltroutine_ptr_t) /*_.VALROUT___V2049*/ meltfptr[2048])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V968*/ meltfptr[967]); MELT_LOCATION ("warmelt-normal.melt:6655:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2049*/ meltfptr[2048])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1881__LAMBDA_#5", NULL != ( /*_.CLASS_CLASS_BINDING__V49*/ meltfptr[48])); ((meltroutine_ptr_t) /*_.VALROUT___V2049*/ meltfptr[2048])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_CLASS_BINDING__V49*/ meltfptr[48]); MELT_LOCATION ("warmelt-normal.melt:6655:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2049*/ meltfptr[2048])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V888*/ meltfptr[887]); ((meltroutine_ptr_t) /*_.VALROUT___V2049*/ meltfptr[2048])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V888*/ meltfptr[887]); MELT_LOCATION ("warmelt-normal.melt:6655:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2049*/ meltfptr[2048])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V2037*/ meltfptr[2036]); ((meltroutine_ptr_t) /*_.VALROUT___V2049*/ meltfptr[2048])->tabval[7] = (melt_ptr_t) ( /*_.VALCLO___V2037*/ meltfptr[2036]); MELT_LOCATION ("warmelt-normal.melt:6655:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2049*/ meltfptr[2048])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1881__LAMBDA_#8", NULL != ( /*_.CLASS_CLASS__V47*/ meltfptr[46])); ((meltroutine_ptr_t) /*_.VALROUT___V2049*/ meltfptr[2048])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_CLASS__V47*/ meltfptr[46]); MELT_LOCATION ("warmelt-normal.melt:6655:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2049*/ meltfptr[2048])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1881__LAMBDA_#9", NULL != ( /*_.CLASS_MODULE_CONTEXT__V16*/ meltfptr[15])); ((meltroutine_ptr_t) /*_.VALROUT___V2049*/ meltfptr[2048])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_MODULE_CONTEXT__V16*/ meltfptr[15]); MELT_LOCATION ("warmelt-normal.melt:6655:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2049*/ meltfptr[2048])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1881__LAMBDA_#10", NULL != ( /*_.MULTIPLE_EVERY__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V2049*/ meltfptr[2048])->tabval[10] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-normal.melt:6655:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2049*/ meltfptr[2048])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1881__LAMBDA_#11", NULL != ( /*_.CLASS_FIELD__V80*/ meltfptr[79])); ((meltroutine_ptr_t) /*_.VALROUT___V2049*/ meltfptr[2048])->tabval[11] = (melt_ptr_t) ( /*_.CLASS_FIELD__V80*/ meltfptr[79]); MELT_LOCATION ("warmelt-normal.melt:6655:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2049*/ meltfptr[2048])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1881__LAMBDA_#12", NULL != ( /*_.FIND_ENV__V48*/ meltfptr[47])); ((meltroutine_ptr_t) /*_.VALROUT___V2049*/ meltfptr[2048])->tabval[12] = (melt_ptr_t) ( /*_.FIND_ENV__V48*/ meltfptr[47]); MELT_LOCATION ("warmelt-normal.melt:6655:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2049*/ meltfptr[2048])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1881__LAMBDA_#13", NULL != ( /*_.CLASS_FIELD_BINDING__V148*/ meltfptr[147])); ((meltroutine_ptr_t) /*_.VALROUT___V2049*/ meltfptr[2048])->tabval[13] = (melt_ptr_t) ( /*_.CLASS_FIELD_BINDING__V148*/ meltfptr[147]); MELT_LOCATION ("warmelt-normal.melt:6655:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2049*/ meltfptr[2048])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V2037*/ meltfptr[2036]); ((meltroutine_ptr_t) /*_.VALROUT___V2049*/ meltfptr[2048])->tabval[14] = (melt_ptr_t) ( /*_.VALCLO___V2037*/ meltfptr[2036]); MELT_LOCATION ("warmelt-normal.melt:6655:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2049*/ meltfptr[2048])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1881__LAMBDA_#15", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V2049*/ meltfptr[2048])->tabval[15] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:6688:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2050*/ meltfptr[2049])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1882__LAMBDA_#0", NULL != ( /*_.CLASS_FIELD__V80*/ meltfptr[79])); ((meltroutine_ptr_t) /*_.VALROUT___V2050*/ meltfptr[2049])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_FIELD__V80*/ meltfptr[79]); MELT_LOCATION ("warmelt-normal.melt:6688:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2050*/ meltfptr[2049])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1882__LAMBDA_#1", NULL != ( /*_.FIND_ENV__V48*/ meltfptr[47])); ((meltroutine_ptr_t) /*_.VALROUT___V2050*/ meltfptr[2049])->tabval[1] = (melt_ptr_t) ( /*_.FIND_ENV__V48*/ meltfptr[47]); MELT_LOCATION ("warmelt-normal.melt:6688:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2050*/ meltfptr[2049])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1882__LAMBDA_#2", NULL != ( /*_.CLASS_FIELD_BINDING__V148*/ meltfptr[147])); ((meltroutine_ptr_t) /*_.VALROUT___V2050*/ meltfptr[2049])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_FIELD_BINDING__V148*/ meltfptr[147]); MELT_LOCATION ("warmelt-normal.melt:6688:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2050*/ meltfptr[2049])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V2037*/ meltfptr[2036]); ((meltroutine_ptr_t) /*_.VALROUT___V2050*/ meltfptr[2049])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V2037*/ meltfptr[2036]); MELT_LOCATION ("warmelt-normal.melt:6688:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2050*/ meltfptr[2049])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1882__LAMBDA_#4", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V2050*/ meltfptr[2049])->tabval[4] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:6688:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2050*/ meltfptr[2049]); MELT_LOCATION ("warmelt-normal.melt:6655:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2049*/ meltfptr[2048])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1881__LAMBDA_#16", NULL != ( /*_.VALROUT___V2050*/ meltfptr[2049])); ((meltroutine_ptr_t) /*_.VALROUT___V2049*/ meltfptr[2048])->tabval[16] = (melt_ptr_t) ( /*_.VALROUT___V2050*/ meltfptr[2049]); MELT_LOCATION ("warmelt-normal.melt:6655:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2049*/ meltfptr[2048]); MELT_LOCATION ("warmelt-normal.melt:6638:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2048*/ meltfptr[2047])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1877__NORMEXP_EXPORT_CLASS#25", NULL != ( /*_.VALROUT___V2049*/ meltfptr[2048])); ((meltroutine_ptr_t) /*_.VALROUT___V2048*/ meltfptr[2047])->tabval[25] = (melt_ptr_t) ( /*_.VALROUT___V2049*/ meltfptr[2048]); MELT_LOCATION ("warmelt-normal.melt:6638:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2048*/ meltfptr[2047]); /*putclosurout#97 */ melt_assertmsg ("putclosrout#97 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V2051*/ meltfptr[2050])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#97 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2048*/ meltfptr[2047])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V2051*/ meltfptr[2050])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V2048*/ meltfptr[2047]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2051*/ meltfptr[2050]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2052*/ meltfptr[2051])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2052*/ meltfptr[2051])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2052*/ meltfptr[2051]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2053*/ meltfptr[2052]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2052*/ meltfptr[2051]); melt_dbgtrace_written_object ( /*_.VALDATA___V2052*/ meltfptr[2051], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:6716:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2054*/ meltfptr[2053])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1883__NORMAL_MACRO_EXPORTER#0", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V2054*/ meltfptr[2053])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:6716:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2054*/ meltfptr[2053])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1883__NORMAL_MACRO_EXPORTER#1", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V2054*/ meltfptr[2053])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:6716:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2054*/ meltfptr[2053])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1883__NORMAL_MACRO_EXPORTER#2", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V2054*/ meltfptr[2053])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:6716:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2054*/ meltfptr[2053])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1883__NORMAL_MACRO_EXPORTER#3", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V2054*/ meltfptr[2053])->tabval[3] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2055*/ meltfptr[2054])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2055*/ meltfptr[2054])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2055*/ meltfptr[2054]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2056*/ meltfptr[2055]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2055*/ meltfptr[2054]); melt_dbgtrace_written_object ( /*_.VALDATA___V2055*/ meltfptr[2054], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:6716:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2054*/ meltfptr[2053])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1883__NORMAL_MACRO_EXPORTER#4", NULL != ( /*_.VALDATA___V2055*/ meltfptr[2054])); ((meltroutine_ptr_t) /*_.VALROUT___V2054*/ meltfptr[2053])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V2055*/ meltfptr[2054]); MELT_LOCATION ("warmelt-normal.melt:6716:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2054*/ meltfptr[2053])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V866*/ meltfptr[865]); ((meltroutine_ptr_t) /*_.VALROUT___V2054*/ meltfptr[2053])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V866*/ meltfptr[865]); MELT_LOCATION ("warmelt-normal.melt:6716:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2054*/ meltfptr[2053])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1883__NORMAL_MACRO_EXPORTER#6", NULL != ( /*_.VALDATA___V1412*/ meltfptr[1411])); ((meltroutine_ptr_t) /*_.VALROUT___V2054*/ meltfptr[2053])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1412*/ meltfptr[1411]); MELT_LOCATION ("warmelt-normal.melt:6716:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2054*/ meltfptr[2053])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1883__NORMAL_MACRO_EXPORTER#7", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V2054*/ meltfptr[2053])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:6716:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2054*/ meltfptr[2053])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1883__NORMAL_MACRO_EXPORTER#8", NULL != ( /*_.CTYPE_VALUE__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V2054*/ meltfptr[2053])->tabval[8] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V30*/ meltfptr[29]); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_42 */ void meltmod__warmelt_normal__initialmeltchunk_43 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-normal.melt:6716:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2054*/ meltfptr[2053])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V478*/ meltfptr[477]); ((meltroutine_ptr_t) /*_.VALROUT___V2054*/ meltfptr[2053])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V478*/ meltfptr[477]); MELT_LOCATION ("warmelt-normal.melt:6716:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2054*/ meltfptr[2053])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1883__NORMAL_MACRO_EXPORTER#10", NULL != ( /*_.SYSDATA_MACRO_EXPORTER__V160*/ meltfptr[159])); ((meltroutine_ptr_t) /*_.VALROUT___V2054*/ meltfptr[2053])->tabval[10] = (melt_ptr_t) ( /*_.SYSDATA_MACRO_EXPORTER__V160*/ meltfptr[159]); MELT_LOCATION ("warmelt-normal.melt:6716:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2054*/ meltfptr[2053])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V2054*/ meltfptr[2053])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:6716:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2054*/ meltfptr[2053]); /*putclosurout#98 */ melt_assertmsg ("putclosrout#98 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V2057*/ meltfptr[2056])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#98 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2054*/ meltfptr[2053])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V2057*/ meltfptr[2056])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V2054*/ meltfptr[2053]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2057*/ meltfptr[2056]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2058*/ meltfptr[2057])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2058*/ meltfptr[2057])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2058*/ meltfptr[2057]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2059*/ meltfptr[2058]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2058*/ meltfptr[2057]); melt_dbgtrace_written_object ( /*_.VALDATA___V2058*/ meltfptr[2057], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:6746:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2060*/ meltfptr[2059])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1889__NORMAL_PATMACRO_EXPORTER#0", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V2060*/ meltfptr[2059])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:6746:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2060*/ meltfptr[2059])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1889__NORMAL_PATMACRO_EXPORTER#1", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V2060*/ meltfptr[2059])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:6746:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2060*/ meltfptr[2059])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1889__NORMAL_PATMACRO_EXPORTER#2", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V2060*/ meltfptr[2059])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:6746:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2060*/ meltfptr[2059])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1889__NORMAL_PATMACRO_EXPORTER#3", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V2060*/ meltfptr[2059])->tabval[3] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2061*/ meltfptr[2060])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2061*/ meltfptr[2060])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2061*/ meltfptr[2060]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2062*/ meltfptr[2061]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2061*/ meltfptr[2060]); melt_dbgtrace_written_object ( /*_.VALDATA___V2061*/ meltfptr[2060], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:6746:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2060*/ meltfptr[2059])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1889__NORMAL_PATMACRO_EXPORTER#4", NULL != ( /*_.VALDATA___V2061*/ meltfptr[2060])); ((meltroutine_ptr_t) /*_.VALROUT___V2060*/ meltfptr[2059])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V2061*/ meltfptr[2060]); MELT_LOCATION ("warmelt-normal.melt:6746:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2060*/ meltfptr[2059])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V866*/ meltfptr[865]); ((meltroutine_ptr_t) /*_.VALROUT___V2060*/ meltfptr[2059])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V866*/ meltfptr[865]); MELT_LOCATION ("warmelt-normal.melt:6746:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2060*/ meltfptr[2059])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1889__NORMAL_PATMACRO_EXPORTER#6", NULL != ( /*_.VALDATA___V1412*/ meltfptr[1411])); ((meltroutine_ptr_t) /*_.VALROUT___V2060*/ meltfptr[2059])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1412*/ meltfptr[1411]); MELT_LOCATION ("warmelt-normal.melt:6746:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2060*/ meltfptr[2059])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1889__NORMAL_PATMACRO_EXPORTER#7", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V2060*/ meltfptr[2059])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:6746:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2060*/ meltfptr[2059])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1889__NORMAL_PATMACRO_EXPORTER#8", NULL != ( /*_.CTYPE_VALUE__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V2060*/ meltfptr[2059])->tabval[8] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normal.melt:6746:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2060*/ meltfptr[2059])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V478*/ meltfptr[477]); ((meltroutine_ptr_t) /*_.VALROUT___V2060*/ meltfptr[2059])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V478*/ meltfptr[477]); MELT_LOCATION ("warmelt-normal.melt:6746:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2060*/ meltfptr[2059])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1889__NORMAL_PATMACRO_EXPORTER#10", NULL != ( /*_.SYSDATA_PATMACRO_EXPORTER__V161*/ meltfptr[160])); ((meltroutine_ptr_t) /*_.VALROUT___V2060*/ meltfptr[2059])->tabval[10] = (melt_ptr_t) ( /*_.SYSDATA_PATMACRO_EXPORTER__V161*/ meltfptr[160]); MELT_LOCATION ("warmelt-normal.melt:6746:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2060*/ meltfptr[2059])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V2060*/ meltfptr[2059])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:6746:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2060*/ meltfptr[2059]); /*putclosurout#99 */ melt_assertmsg ("putclosrout#99 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V2063*/ meltfptr[2062])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#99 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2060*/ meltfptr[2059])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V2063*/ meltfptr[2062])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V2060*/ meltfptr[2059]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2063*/ meltfptr[2062]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2064*/ meltfptr[2063])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2064*/ meltfptr[2063])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2064*/ meltfptr[2063]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2065*/ meltfptr[2064]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2064*/ meltfptr[2063]); melt_dbgtrace_written_object ( /*_.VALDATA___V2064*/ meltfptr[2063], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:6778:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2066*/ meltfptr[2065])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1895__NORMAL_EXPORTED_MACRO#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V2066*/ meltfptr[2065])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:6778:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2066*/ meltfptr[2065])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1895__NORMAL_EXPORTED_MACRO#1", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V2066*/ meltfptr[2065])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normal.melt:6778:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2066*/ meltfptr[2065])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V176*/ meltfptr[175]); ((meltroutine_ptr_t) /*_.VALROUT___V2066*/ meltfptr[2065])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); MELT_LOCATION ("warmelt-normal.melt:6778:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2066*/ meltfptr[2065])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1895__NORMAL_EXPORTED_MACRO#3", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V2066*/ meltfptr[2065])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:6778:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2066*/ meltfptr[2065])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1895__NORMAL_EXPORTED_MACRO#4", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V2066*/ meltfptr[2065])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:6778:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2066*/ meltfptr[2065])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1895__NORMAL_EXPORTED_MACRO#5", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V2066*/ meltfptr[2065])->tabval[5] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2067*/ meltfptr[2066])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2067*/ meltfptr[2066])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2067*/ meltfptr[2066]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2068*/ meltfptr[2067]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2067*/ meltfptr[2066]); melt_dbgtrace_written_object ( /*_.VALDATA___V2067*/ meltfptr[2066], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:6778:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2066*/ meltfptr[2065])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1895__NORMAL_EXPORTED_MACRO#6", NULL != ( /*_.VALDATA___V2067*/ meltfptr[2066])); ((meltroutine_ptr_t) /*_.VALROUT___V2066*/ meltfptr[2065])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V2067*/ meltfptr[2066]); MELT_LOCATION ("warmelt-normal.melt:6778:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2066*/ meltfptr[2065])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1561*/ meltfptr[1560]); ((meltroutine_ptr_t) /*_.VALROUT___V2066*/ meltfptr[2065])->tabval[7] = (melt_ptr_t) ( /*_.VALCLO___V1561*/ meltfptr[1560]); MELT_LOCATION ("warmelt-normal.melt:6778:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2066*/ meltfptr[2065])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1895__NORMAL_EXPORTED_MACRO#8", NULL != ( /*_.DISCR_STRBUF__V54*/ meltfptr[53])); ((meltroutine_ptr_t) /*_.VALROUT___V2066*/ meltfptr[2065])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V54*/ meltfptr[53]); MELT_LOCATION ("warmelt-normal.melt:6778:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2066*/ meltfptr[2065])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1895__NORMAL_EXPORTED_MACRO#9", NULL != ( /*_.CLASS_SOURCE_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V156*/ meltfptr[155])); ((meltroutine_ptr_t) /*_.VALROUT___V2066*/ meltfptr[2065])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_SOURCE_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V156*/ meltfptr[155]); MELT_LOCATION ("warmelt-normal.melt:6778:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2066*/ meltfptr[2065])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1895__NORMAL_EXPORTED_MACRO#10", NULL != ( /*_.DISCR_STRING__V22*/ meltfptr[21])); ((meltroutine_ptr_t) /*_.VALROUT___V2066*/ meltfptr[2065])->tabval[10] = (melt_ptr_t) ( /*_.DISCR_STRING__V22*/ meltfptr[21]); MELT_LOCATION ("warmelt-normal.melt:6778:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2066*/ meltfptr[2065])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V2066*/ meltfptr[2065])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:6778:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2066*/ meltfptr[2065])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1895__NORMAL_EXPORTED_MACRO#12", NULL != ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V2066*/ meltfptr[2065])->tabval[12] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normal.melt:6778:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2066*/ meltfptr[2065])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1895__NORMAL_EXPORTED_MACRO#13", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V2066*/ meltfptr[2065])->tabval[13] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:6778:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2066*/ meltfptr[2065])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1895__NORMAL_EXPORTED_MACRO#14", NULL != ( /*_.CTYPE_VOID__V57*/ meltfptr[56])); ((meltroutine_ptr_t) /*_.VALROUT___V2066*/ meltfptr[2065])->tabval[14] = (melt_ptr_t) ( /*_.CTYPE_VOID__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-normal.melt:6778:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2066*/ meltfptr[2065])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V218*/ meltfptr[217]); ((meltroutine_ptr_t) /*_.VALROUT___V2066*/ meltfptr[2065])->tabval[15] = (melt_ptr_t) ( /*_.VALDATA___V218*/ meltfptr[217]); MELT_LOCATION ("warmelt-normal.melt:6778:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2066*/ meltfptr[2065])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V2066*/ meltfptr[2065])->tabval[16] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:6778:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2066*/ meltfptr[2065]); /*putclosurout#100 */ melt_assertmsg ("putclosrout#100 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V2069*/ meltfptr[2068])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#100 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2066*/ meltfptr[2065])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V2069*/ meltfptr[2068])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V2066*/ meltfptr[2065]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2069*/ meltfptr[2068]); MELT_LOCATION ("warmelt-normal.melt:6828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2070*/ meltfptr[2069])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1899__NORMEXP_EXPORT_MACRO#0", NULL != ( /*_.CLASS_SOURCE_EXPORT_MACRO__V162*/ meltfptr[161])); ((meltroutine_ptr_t) /*_.VALROUT___V2070*/ meltfptr[2069])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_EXPORT_MACRO__V162*/ meltfptr[161]); MELT_LOCATION ("warmelt-normal.melt:6828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2070*/ meltfptr[2069])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1899__NORMEXP_EXPORT_MACRO#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V2070*/ meltfptr[2069])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:6828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2070*/ meltfptr[2069])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1899__NORMEXP_EXPORT_MACRO#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V2070*/ meltfptr[2069])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:6828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2070*/ meltfptr[2069])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1899__NORMEXP_EXPORT_MACRO#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V2070*/ meltfptr[2069])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:6828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2070*/ meltfptr[2069])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1899__NORMEXP_EXPORT_MACRO#4", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V2070*/ meltfptr[2069])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:6828:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2070*/ meltfptr[2069])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V2057*/ meltfptr[2056]); ((meltroutine_ptr_t) /*_.VALROUT___V2070*/ meltfptr[2069])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V2057*/ meltfptr[2056]); MELT_LOCATION ("warmelt-normal.melt:6828:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2070*/ meltfptr[2069])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V876*/ meltfptr[875]); ((meltroutine_ptr_t) /*_.VALROUT___V2070*/ meltfptr[2069])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V876*/ meltfptr[875]); MELT_LOCATION ("warmelt-normal.melt:6828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2070*/ meltfptr[2069])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1899__NORMEXP_EXPORT_MACRO#7", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V2070*/ meltfptr[2069])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normal.melt:6828:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2070*/ meltfptr[2069])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V2070*/ meltfptr[2069])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:6828:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2070*/ meltfptr[2069])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1899__NORMEXP_EXPORT_MACRO#9", NULL != ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V2070*/ meltfptr[2069])->tabval[9] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normal.melt:6828:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2070*/ meltfptr[2069])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V2069*/ meltfptr[2068]); ((meltroutine_ptr_t) /*_.VALROUT___V2070*/ meltfptr[2069])->tabval[10] = (melt_ptr_t) ( /*_.VALCLO___V2069*/ meltfptr[2068]); MELT_LOCATION ("warmelt-normal.melt:6828:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2070*/ meltfptr[2069]); /*putclosurout#101 */ melt_assertmsg ("putclosrout#101 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V2071*/ meltfptr[2070])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#101 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2070*/ meltfptr[2069])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V2071*/ meltfptr[2070])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V2070*/ meltfptr[2069]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2071*/ meltfptr[2070]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2072*/ meltfptr[2071])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2072*/ meltfptr[2071])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2072*/ meltfptr[2071]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2073*/ meltfptr[2072]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2072*/ meltfptr[2071]); melt_dbgtrace_written_object ( /*_.VALDATA___V2072*/ meltfptr[2071], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:6865:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2074*/ meltfptr[2073])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1903__NORMAL_EXPORTED_PATMACRO#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V2074*/ meltfptr[2073])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:6865:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2074*/ meltfptr[2073])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1903__NORMAL_EXPORTED_PATMACRO#1", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V2074*/ meltfptr[2073])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normal.melt:6865:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2074*/ meltfptr[2073])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V176*/ meltfptr[175]); ((meltroutine_ptr_t) /*_.VALROUT___V2074*/ meltfptr[2073])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V176*/ meltfptr[175]); MELT_LOCATION ("warmelt-normal.melt:6865:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2074*/ meltfptr[2073])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1903__NORMAL_EXPORTED_PATMACRO#3", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V2074*/ meltfptr[2073])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:6865:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2074*/ meltfptr[2073])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1903__NORMAL_EXPORTED_PATMACRO#4", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V2074*/ meltfptr[2073])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:6865:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2074*/ meltfptr[2073])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1903__NORMAL_EXPORTED_PATMACRO#5", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V2074*/ meltfptr[2073])->tabval[5] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2075*/ meltfptr[2074])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2075*/ meltfptr[2074])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2075*/ meltfptr[2074]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2076*/ meltfptr[2075]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2075*/ meltfptr[2074]); melt_dbgtrace_written_object ( /*_.VALDATA___V2075*/ meltfptr[2074], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:6865:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2074*/ meltfptr[2073])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1903__NORMAL_EXPORTED_PATMACRO#6", NULL != ( /*_.VALDATA___V2075*/ meltfptr[2074])); ((meltroutine_ptr_t) /*_.VALROUT___V2074*/ meltfptr[2073])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V2075*/ meltfptr[2074]); MELT_LOCATION ("warmelt-normal.melt:6865:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2074*/ meltfptr[2073])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1561*/ meltfptr[1560]); ((meltroutine_ptr_t) /*_.VALROUT___V2074*/ meltfptr[2073])->tabval[7] = (melt_ptr_t) ( /*_.VALCLO___V1561*/ meltfptr[1560]); MELT_LOCATION ("warmelt-normal.melt:6865:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2074*/ meltfptr[2073])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1903__NORMAL_EXPORTED_PATMACRO#8", NULL != ( /*_.DISCR_STRBUF__V54*/ meltfptr[53])); ((meltroutine_ptr_t) /*_.VALROUT___V2074*/ meltfptr[2073])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V54*/ meltfptr[53]); MELT_LOCATION ("warmelt-normal.melt:6865:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2074*/ meltfptr[2073])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1903__NORMAL_EXPORTED_PATMACRO#9", NULL != ( /*_.CLASS_SOURCE_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V156*/ meltfptr[155])); ((meltroutine_ptr_t) /*_.VALROUT___V2074*/ meltfptr[2073])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_SOURCE_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V156*/ meltfptr[155]); MELT_LOCATION ("warmelt-normal.melt:6865:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2074*/ meltfptr[2073])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1903__NORMAL_EXPORTED_PATMACRO#10", NULL != ( /*_.DISCR_STRING__V22*/ meltfptr[21])); ((meltroutine_ptr_t) /*_.VALROUT___V2074*/ meltfptr[2073])->tabval[10] = (melt_ptr_t) ( /*_.DISCR_STRING__V22*/ meltfptr[21]); MELT_LOCATION ("warmelt-normal.melt:6865:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2074*/ meltfptr[2073])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V2074*/ meltfptr[2073])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:6865:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2074*/ meltfptr[2073])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1903__NORMAL_EXPORTED_PATMACRO#12", NULL != ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V2074*/ meltfptr[2073])->tabval[12] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normal.melt:6865:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2074*/ meltfptr[2073])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1903__NORMAL_EXPORTED_PATMACRO#13", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V2074*/ meltfptr[2073])->tabval[13] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:6865:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2074*/ meltfptr[2073])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1903__NORMAL_EXPORTED_PATMACRO#14", NULL != ( /*_.CTYPE_VOID__V57*/ meltfptr[56])); ((meltroutine_ptr_t) /*_.VALROUT___V2074*/ meltfptr[2073])->tabval[14] = (melt_ptr_t) ( /*_.CTYPE_VOID__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-normal.melt:6865:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2074*/ meltfptr[2073])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V218*/ meltfptr[217]); ((meltroutine_ptr_t) /*_.VALROUT___V2074*/ meltfptr[2073])->tabval[15] = (melt_ptr_t) ( /*_.VALDATA___V218*/ meltfptr[217]); MELT_LOCATION ("warmelt-normal.melt:6865:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2074*/ meltfptr[2073])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V2074*/ meltfptr[2073])->tabval[16] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:6865:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2074*/ meltfptr[2073]); /*putclosurout#102 */ melt_assertmsg ("putclosrout#102 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V2077*/ meltfptr[2076])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#102 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2074*/ meltfptr[2073])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V2077*/ meltfptr[2076])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V2074*/ meltfptr[2073]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2077*/ meltfptr[2076]); MELT_LOCATION ("warmelt-normal.melt:6916:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2078*/ meltfptr[2077])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1907__NORMEXP_EXPORT_PATMACRO#0", NULL != ( /*_.CLASS_SOURCE_EXPORT_PATMACRO__V163*/ meltfptr[162])); ((meltroutine_ptr_t) /*_.VALROUT___V2078*/ meltfptr[2077])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_EXPORT_PATMACRO__V163*/ meltfptr[162]); MELT_LOCATION ("warmelt-normal.melt:6916:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2078*/ meltfptr[2077])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1907__NORMEXP_EXPORT_PATMACRO#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V2078*/ meltfptr[2077])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:6916:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2078*/ meltfptr[2077])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1907__NORMEXP_EXPORT_PATMACRO#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V2078*/ meltfptr[2077])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:6916:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2078*/ meltfptr[2077])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1907__NORMEXP_EXPORT_PATMACRO#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V2078*/ meltfptr[2077])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:6916:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2078*/ meltfptr[2077])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1907__NORMEXP_EXPORT_PATMACRO#4", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V2078*/ meltfptr[2077])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:6916:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2078*/ meltfptr[2077])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V2063*/ meltfptr[2062]); ((meltroutine_ptr_t) /*_.VALROUT___V2078*/ meltfptr[2077])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V2063*/ meltfptr[2062]); MELT_LOCATION ("warmelt-normal.melt:6916:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2078*/ meltfptr[2077])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V876*/ meltfptr[875]); ((meltroutine_ptr_t) /*_.VALROUT___V2078*/ meltfptr[2077])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V876*/ meltfptr[875]); MELT_LOCATION ("warmelt-normal.melt:6916:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2078*/ meltfptr[2077])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1907__NORMEXP_EXPORT_PATMACRO#7", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V2078*/ meltfptr[2077])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normal.melt:6916:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2078*/ meltfptr[2077])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V2078*/ meltfptr[2077])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:6916:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2078*/ meltfptr[2077])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1907__NORMEXP_EXPORT_PATMACRO#9", NULL != ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V2078*/ meltfptr[2077])->tabval[9] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-normal.melt:6916:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2078*/ meltfptr[2077])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V2077*/ meltfptr[2076]); ((meltroutine_ptr_t) /*_.VALROUT___V2078*/ meltfptr[2077])->tabval[10] = (melt_ptr_t) ( /*_.VALCLO___V2077*/ meltfptr[2076]); MELT_LOCATION ("warmelt-normal.melt:6916:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2078*/ meltfptr[2077]); /*putclosurout#103 */ melt_assertmsg ("putclosrout#103 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V2079*/ meltfptr[2078])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#103 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2078*/ meltfptr[2077])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V2079*/ meltfptr[2078])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V2078*/ meltfptr[2077]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2079*/ meltfptr[2078]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2080*/ meltfptr[2079])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2080*/ meltfptr[2079])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2080*/ meltfptr[2079]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2081*/ meltfptr[2080]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2080*/ meltfptr[2079]); melt_dbgtrace_written_object ( /*_.VALDATA___V2080*/ meltfptr[2079], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:6953:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2082*/ meltfptr[2081])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1911__NORMEXP_CURRENT_MODULE_ENVIRONMENT_CONTAINER#0", NULL != ( /*_.CLASS_SOURCE_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V156*/ meltfptr[155])); ((meltroutine_ptr_t) /*_.VALROUT___V2082*/ meltfptr[2081])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V156*/ meltfptr[155]); MELT_LOCATION ("warmelt-normal.melt:6953:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2082*/ meltfptr[2081])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1911__NORMEXP_CURRENT_MODULE_ENVIRONMENT_CONTAINER#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V2082*/ meltfptr[2081])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:6953:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2082*/ meltfptr[2081])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1911__NORMEXP_CURRENT_MODULE_ENVIRONMENT_CONTAINER#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V2082*/ meltfptr[2081])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:6953:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2082*/ meltfptr[2081])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1911__NORMEXP_CURRENT_MODULE_ENVIRONMENT_CONTAINER#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V2082*/ meltfptr[2081])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:6953:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2082*/ meltfptr[2081])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1116*/ meltfptr[1115]); ((meltroutine_ptr_t) /*_.VALROUT___V2082*/ meltfptr[2081])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V1116*/ meltfptr[1115]); MELT_LOCATION ("warmelt-normal.melt:6953:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2082*/ meltfptr[2081])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1126*/ meltfptr[1125]); ((meltroutine_ptr_t) /*_.VALROUT___V2082*/ meltfptr[2081])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1126*/ meltfptr[1125]); MELT_LOCATION ("warmelt-normal.melt:6953:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2082*/ meltfptr[2081])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V816*/ meltfptr[815]); ((meltroutine_ptr_t) /*_.VALROUT___V2082*/ meltfptr[2081])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]); MELT_LOCATION ("warmelt-normal.melt:6953:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2082*/ meltfptr[2081]); /*putclosurout#104 */ melt_assertmsg ("putclosrout#104 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V2083*/ meltfptr[2082])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#104 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2082*/ meltfptr[2081])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V2083*/ meltfptr[2082])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V2082*/ meltfptr[2081]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2083*/ meltfptr[2082]); MELT_LOCATION ("warmelt-normal.melt:6985:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2084*/ meltfptr[2083])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1913__NORMEXP_PARENT_MODULE_ENVIRONMENT#0", NULL != ( /*_.CLASS_SOURCE_PARENT_MODULE_ENVIRONMENT__V164*/ meltfptr[163])); ((meltroutine_ptr_t) /*_.VALROUT___V2084*/ meltfptr[2083])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PARENT_MODULE_ENVIRONMENT__V164*/ meltfptr[163]); MELT_LOCATION ("warmelt-normal.melt:6985:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2084*/ meltfptr[2083])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1913__NORMEXP_PARENT_MODULE_ENVIRONMENT#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V2084*/ meltfptr[2083])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:6985:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2084*/ meltfptr[2083])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1913__NORMEXP_PARENT_MODULE_ENVIRONMENT#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V2084*/ meltfptr[2083])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:6985:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2084*/ meltfptr[2083])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1913__NORMEXP_PARENT_MODULE_ENVIRONMENT#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V2084*/ meltfptr[2083])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:6985:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2084*/ meltfptr[2083])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1132*/ meltfptr[1131]); ((meltroutine_ptr_t) /*_.VALROUT___V2084*/ meltfptr[2083])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V1132*/ meltfptr[1131]); MELT_LOCATION ("warmelt-normal.melt:6985:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2084*/ meltfptr[2083])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1138*/ meltfptr[1137]); ((meltroutine_ptr_t) /*_.VALROUT___V2084*/ meltfptr[2083])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1138*/ meltfptr[1137]); MELT_LOCATION ("warmelt-normal.melt:6985:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2084*/ meltfptr[2083])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V816*/ meltfptr[815]); ((meltroutine_ptr_t) /*_.VALROUT___V2084*/ meltfptr[2083])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V816*/ meltfptr[815]); MELT_LOCATION ("warmelt-normal.melt:6985:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2084*/ meltfptr[2083]); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_43 */ void meltmod__warmelt_normal__initialmeltchunk_44 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*putclosurout#105*/ melt_assertmsg ("putclosrout#105 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V2085*/ meltfptr[2084])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#105 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2084*/ meltfptr[2083])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V2085*/ meltfptr[2084])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V2084*/ meltfptr[2083]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2085*/ meltfptr[2084]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2086*/ meltfptr[2085])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2086*/ meltfptr[2085])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2086*/ meltfptr[2085]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2087*/ meltfptr[2086]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2086*/ meltfptr[2085]); melt_dbgtrace_written_object ( /*_.VALDATA___V2086*/ meltfptr[2085], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:7011:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2088*/ meltfptr[2087])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1917__NORMEXP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#0", NULL != ( /*_.CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V165*/ meltfptr[164])); ((meltroutine_ptr_t) /*_.VALROUT___V2088*/ meltfptr[2087])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V165*/ meltfptr[164]); MELT_LOCATION ("warmelt-normal.melt:7011:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2088*/ meltfptr[2087])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1917__NORMEXP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V2088*/ meltfptr[2087])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:7011:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2088*/ meltfptr[2087])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1917__NORMEXP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V2088*/ meltfptr[2087])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:7011:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2088*/ meltfptr[2087])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1917__NORMEXP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V2088*/ meltfptr[2087])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:7011:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2088*/ meltfptr[2087])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1917__NORMEXP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#4", NULL != ( /*_.CLASS_MODULE_CONTEXT__V16*/ meltfptr[15])); ((meltroutine_ptr_t) /*_.VALROUT___V2088*/ meltfptr[2087])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_MODULE_CONTEXT__V16*/ meltfptr[15]); MELT_LOCATION ("warmelt-normal.melt:7011:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2088*/ meltfptr[2087])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1917__NORMEXP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#5", NULL != ( /*_.CLASS_RUNNING_EXTENSION_MODULE_CONTEXT__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V2088*/ meltfptr[2087])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_RUNNING_EXTENSION_MODULE_CONTEXT__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-normal.melt:7011:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2088*/ meltfptr[2087])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1200*/ meltfptr[1199]); ((meltroutine_ptr_t) /*_.VALROUT___V2088*/ meltfptr[2087])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1200*/ meltfptr[1199]); MELT_LOCATION ("warmelt-normal.melt:7011:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2088*/ meltfptr[2087])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1917__NORMEXP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#7", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V2088*/ meltfptr[2087])->tabval[7] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2089*/ meltfptr[2088])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2089*/ meltfptr[2088])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2089*/ meltfptr[2088]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2090*/ meltfptr[2089]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2089*/ meltfptr[2088]); melt_dbgtrace_written_object ( /*_.VALDATA___V2089*/ meltfptr[2088], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:7011:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2088*/ meltfptr[2087])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1917__NORMEXP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#8", NULL != ( /*_.VALDATA___V2089*/ meltfptr[2088])); ((meltroutine_ptr_t) /*_.VALROUT___V2088*/ meltfptr[2087])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V2089*/ meltfptr[2088]); MELT_LOCATION ("warmelt-normal.melt:7011:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2088*/ meltfptr[2087])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1917__NORMEXP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#9", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V2088*/ meltfptr[2087])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:7011:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2088*/ meltfptr[2087])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1917__NORMEXP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#10", NULL != ( /*_.CTYPE_VOID__V57*/ meltfptr[56])); ((meltroutine_ptr_t) /*_.VALROUT___V2088*/ meltfptr[2087])->tabval[10] = (melt_ptr_t) ( /*_.CTYPE_VOID__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-normal.melt:7011:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2088*/ meltfptr[2087])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V2088*/ meltfptr[2087])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:7011:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2088*/ meltfptr[2087])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1186*/ meltfptr[1185]); ((meltroutine_ptr_t) /*_.VALROUT___V2088*/ meltfptr[2087])->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V1186*/ meltfptr[1185]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2091*/ meltfptr[2090])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2091*/ meltfptr[2090])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2091*/ meltfptr[2090]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2092*/ meltfptr[2091]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2091*/ meltfptr[2090]); melt_dbgtrace_written_object ( /*_.VALDATA___V2091*/ meltfptr[2090], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:7011:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2088*/ meltfptr[2087])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1917__NORMEXP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#13", NULL != ( /*_.VALDATA___V2091*/ meltfptr[2090])); ((meltroutine_ptr_t) /*_.VALROUT___V2088*/ meltfptr[2087])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V2091*/ meltfptr[2090]); MELT_LOCATION ("warmelt-normal.melt:7011:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2088*/ meltfptr[2087])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1917__NORMEXP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#14", NULL != ( /*_.DISCR_STRBUF__V54*/ meltfptr[53])); ((meltroutine_ptr_t) /*_.VALROUT___V2088*/ meltfptr[2087])->tabval[14] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V54*/ meltfptr[53]); MELT_LOCATION ("warmelt-normal.melt:7011:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2088*/ meltfptr[2087])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1917__NORMEXP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#15", NULL != ( /*_.CLASS_SOURCE_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V156*/ meltfptr[155])); ((meltroutine_ptr_t) /*_.VALROUT___V2088*/ meltfptr[2087])->tabval[15] = (melt_ptr_t) ( /*_.CLASS_SOURCE_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V156*/ meltfptr[155]); MELT_LOCATION ("warmelt-normal.melt:7011:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2088*/ meltfptr[2087])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1917__NORMEXP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#16", NULL != ( /*_.DISCR_STRING__V22*/ meltfptr[21])); ((meltroutine_ptr_t) /*_.VALROUT___V2088*/ meltfptr[2087])->tabval[16] = (melt_ptr_t) ( /*_.DISCR_STRING__V22*/ meltfptr[21]); MELT_LOCATION ("warmelt-normal.melt:7011:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2088*/ meltfptr[2087])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1917__NORMEXP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#17", NULL != ( /*_.CLASS_SOURCE_OR__V74*/ meltfptr[73])); ((meltroutine_ptr_t) /*_.VALROUT___V2088*/ meltfptr[2087])->tabval[17] = (melt_ptr_t) ( /*_.CLASS_SOURCE_OR__V74*/ meltfptr[73]); MELT_LOCATION ("warmelt-normal.melt:7011:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2088*/ meltfptr[2087])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1917__NORMEXP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#18", NULL != ( /*_.CLASS_SOURCE_APPLY__V64*/ meltfptr[63])); ((meltroutine_ptr_t) /*_.VALROUT___V2088*/ meltfptr[2087])->tabval[18] = (melt_ptr_t) ( /*_.CLASS_SOURCE_APPLY__V64*/ meltfptr[63]); MELT_LOCATION ("warmelt-normal.melt:7011:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2088*/ meltfptr[2087])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1917__NORMEXP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#19", NULL != ( /*_.CLASS_SOURCE_UNSAFE_GET_FIELD__V79*/ meltfptr[78])); ((meltroutine_ptr_t) /*_.VALROUT___V2088*/ meltfptr[2087])->tabval[19] = (melt_ptr_t) ( /*_.CLASS_SOURCE_UNSAFE_GET_FIELD__V79*/ meltfptr[78]); MELT_LOCATION ("warmelt-normal.melt:7011:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2088*/ meltfptr[2087])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1917__NORMEXP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#20", NULL != ( /*_.CLASS_SOURCE_FETCH_PREDEFINED__V166*/ meltfptr[165])); ((meltroutine_ptr_t) /*_.VALROUT___V2088*/ meltfptr[2087])->tabval[20] = (melt_ptr_t) ( /*_.CLASS_SOURCE_FETCH_PREDEFINED__V166*/ meltfptr[165]); MELT_LOCATION ("warmelt-normal.melt:7011:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2088*/ meltfptr[2087])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1917__NORMEXP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#21", NULL != ( /*_.VALDATA___V1412*/ meltfptr[1411])); ((meltroutine_ptr_t) /*_.VALROUT___V2088*/ meltfptr[2087])->tabval[21] = (melt_ptr_t) ( /*_.VALDATA___V1412*/ meltfptr[1411]); MELT_LOCATION ("warmelt-normal.melt:7011:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2088*/ meltfptr[2087])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1917__NORMEXP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#22", NULL != ( /*_.SYSDATA_CONT_FRESH_ENV__V167*/ meltfptr[166])); ((meltroutine_ptr_t) /*_.VALROUT___V2088*/ meltfptr[2087])->tabval[22] = (melt_ptr_t) ( /*_.SYSDATA_CONT_FRESH_ENV__V167*/ meltfptr[166]); MELT_LOCATION ("warmelt-normal.melt:7011:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2088*/ meltfptr[2087])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1917__NORMEXP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#23", NULL != ( /*_.CLASS_SOURCE_PARENT_MODULE_ENVIRONMENT__V164*/ meltfptr[163])); ((meltroutine_ptr_t) /*_.VALROUT___V2088*/ meltfptr[2087])->tabval[23] = (melt_ptr_t) ( /*_.CLASS_SOURCE_PARENT_MODULE_ENVIRONMENT__V164*/ meltfptr[163]); MELT_LOCATION ("warmelt-normal.melt:7011:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2088*/ meltfptr[2087])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V2088*/ meltfptr[2087])->tabval[24] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:7011:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2088*/ meltfptr[2087]); /*putclosurout#106 */ melt_assertmsg ("putclosrout#106 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V2093*/ meltfptr[2092])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#106 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2088*/ meltfptr[2087])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V2093*/ meltfptr[2092])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V2088*/ meltfptr[2087]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2093*/ meltfptr[2092]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2094*/ meltfptr[2093])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2094*/ meltfptr[2093])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2094*/ meltfptr[2093]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2095*/ meltfptr[2094]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2094*/ meltfptr[2093]); melt_dbgtrace_written_object ( /*_.VALDATA___V2094*/ meltfptr[2093], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2096*/ meltfptr[2095])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2096*/ meltfptr[2095])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2096*/ meltfptr[2095]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2097*/ meltfptr[2096]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2096*/ meltfptr[2095]); melt_dbgtrace_written_object ( /*_.VALDATA___V2096*/ meltfptr[2095], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2098*/ meltfptr[2097])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2098*/ meltfptr[2097])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2098*/ meltfptr[2097]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2099*/ meltfptr[2098]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2098*/ meltfptr[2097]); melt_dbgtrace_written_object ( /*_.VALDATA___V2098*/ meltfptr[2097], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:7128:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2100*/ meltfptr[2099])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1929__NORMEXP_FETCH_PREDEFINED#0", NULL != ( /*_.CLASS_SOURCE_FETCH_PREDEFINED__V166*/ meltfptr[165])); ((meltroutine_ptr_t) /*_.VALROUT___V2100*/ meltfptr[2099])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_FETCH_PREDEFINED__V166*/ meltfptr[165]); MELT_LOCATION ("warmelt-normal.melt:7128:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2100*/ meltfptr[2099])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1929__NORMEXP_FETCH_PREDEFINED#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V2100*/ meltfptr[2099])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:7128:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2100*/ meltfptr[2099])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1929__NORMEXP_FETCH_PREDEFINED#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V2100*/ meltfptr[2099])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:7128:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2100*/ meltfptr[2099])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1929__NORMEXP_FETCH_PREDEFINED#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V2100*/ meltfptr[2099])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:7128:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2100*/ meltfptr[2099])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1929__NORMEXP_FETCH_PREDEFINED#4", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V2100*/ meltfptr[2099])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normal.melt:7128:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2100*/ meltfptr[2099])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1929__NORMEXP_FETCH_PREDEFINED#5", NULL != ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V2100*/ meltfptr[2099])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normal.melt:7128:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2100*/ meltfptr[2099])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1929__NORMEXP_FETCH_PREDEFINED#6", NULL != ( /*_.MAPOBJECT_EVERY__V168*/ meltfptr[167])); ((meltroutine_ptr_t) /*_.VALROUT___V2100*/ meltfptr[2099])->tabval[6] = (melt_ptr_t) ( /*_.MAPOBJECT_EVERY__V168*/ meltfptr[167]); MELT_LOCATION ("warmelt-normal.melt:7128:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2100*/ meltfptr[2099])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1929__NORMEXP_FETCH_PREDEFINED#7", NULL != ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V2100*/ meltfptr[2099])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normal.melt:7143:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2101*/ meltfptr[2100])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1933__LAMBDA_#0", NULL != ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V2101*/ meltfptr[2100])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normal.melt:7143:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2101*/ meltfptr[2100]); MELT_LOCATION ("warmelt-normal.melt:7128:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2100*/ meltfptr[2099])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1929__NORMEXP_FETCH_PREDEFINED#8", NULL != ( /*_.VALROUT___V2101*/ meltfptr[2100])); ((meltroutine_ptr_t) /*_.VALROUT___V2100*/ meltfptr[2099])->tabval[8] = (melt_ptr_t) ( /*_.VALROUT___V2101*/ meltfptr[2100]); MELT_LOCATION ("warmelt-normal.melt:7128:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2100*/ meltfptr[2099])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V866*/ meltfptr[865]); ((meltroutine_ptr_t) /*_.VALROUT___V2100*/ meltfptr[2099])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V866*/ meltfptr[865]); MELT_LOCATION ("warmelt-normal.melt:7128:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2100*/ meltfptr[2099]); /*putclosurout#107 */ melt_assertmsg ("putclosrout#107 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V2102*/ meltfptr[2101])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#107 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2100*/ meltfptr[2099])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V2102*/ meltfptr[2101])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V2100*/ meltfptr[2099]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2102*/ meltfptr[2101]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2103*/ meltfptr[2102])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2103*/ meltfptr[2102])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2103*/ meltfptr[2102]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2104*/ meltfptr[2103]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2103*/ meltfptr[2102]); melt_dbgtrace_written_object ( /*_.VALDATA___V2103*/ meltfptr[2102], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:7174:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2105*/ meltfptr[2104])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1934__NORMEXP_STORE_PREDEFINED#0", NULL != ( /*_.CLASS_SOURCE_STORE_PREDEFINED__V169*/ meltfptr[168])); ((meltroutine_ptr_t) /*_.VALROUT___V2105*/ meltfptr[2104])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SOURCE_STORE_PREDEFINED__V169*/ meltfptr[168]); MELT_LOCATION ("warmelt-normal.melt:7174:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2105*/ meltfptr[2104])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1934__NORMEXP_STORE_PREDEFINED#1", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V2105*/ meltfptr[2104])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:7174:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2105*/ meltfptr[2104])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1934__NORMEXP_STORE_PREDEFINED#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V2105*/ meltfptr[2104])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:7174:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2105*/ meltfptr[2104])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1934__NORMEXP_STORE_PREDEFINED#3", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V2105*/ meltfptr[2104])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:7174:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2105*/ meltfptr[2104])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1934__NORMEXP_STORE_PREDEFINED#4", NULL != ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V2105*/ meltfptr[2104])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-normal.melt:7174:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2105*/ meltfptr[2104])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1934__NORMEXP_STORE_PREDEFINED#5", NULL != ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V2105*/ meltfptr[2104])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normal.melt:7174:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2105*/ meltfptr[2104])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1934__NORMEXP_STORE_PREDEFINED#6", NULL != ( /*_.MAPOBJECT_EVERY__V168*/ meltfptr[167])); ((meltroutine_ptr_t) /*_.VALROUT___V2105*/ meltfptr[2104])->tabval[6] = (melt_ptr_t) ( /*_.MAPOBJECT_EVERY__V168*/ meltfptr[167]); MELT_LOCATION ("warmelt-normal.melt:7174:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2105*/ meltfptr[2104])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1934__NORMEXP_STORE_PREDEFINED#7", NULL != ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V2105*/ meltfptr[2104])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normal.melt:7190:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2106*/ meltfptr[2105])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1938__LAMBDA_#0", NULL != ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V2106*/ meltfptr[2105])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-normal.melt:7190:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2106*/ meltfptr[2105]); MELT_LOCATION ("warmelt-normal.melt:7174:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2105*/ meltfptr[2104])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1934__NORMEXP_STORE_PREDEFINED#8", NULL != ( /*_.VALROUT___V2106*/ meltfptr[2105])); ((meltroutine_ptr_t) /*_.VALROUT___V2105*/ meltfptr[2104])->tabval[8] = (melt_ptr_t) ( /*_.VALROUT___V2106*/ meltfptr[2105]); MELT_LOCATION ("warmelt-normal.melt:7174:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2105*/ meltfptr[2104])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1469*/ meltfptr[1468]); ((meltroutine_ptr_t) /*_.VALROUT___V2105*/ meltfptr[2104])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V1469*/ meltfptr[1468]); MELT_LOCATION ("warmelt-normal.melt:7174:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2105*/ meltfptr[2104])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1934__NORMEXP_STORE_PREDEFINED#10", NULL != ( /*_.DISCR_LIST__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V2105*/ meltfptr[2104])->tabval[10] = (melt_ptr_t) ( /*_.DISCR_LIST__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-normal.melt:7174:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2105*/ meltfptr[2104])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1934__NORMEXP_STORE_PREDEFINED#11", NULL != ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V2105*/ meltfptr[2104])->tabval[11] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V52*/ meltfptr[51]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2107*/ meltfptr[2106])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2107*/ meltfptr[2106])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2107*/ meltfptr[2106]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2108*/ meltfptr[2107]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2107*/ meltfptr[2106]); melt_dbgtrace_written_object ( /*_.VALDATA___V2107*/ meltfptr[2106], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:7174:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2105*/ meltfptr[2104])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1934__NORMEXP_STORE_PREDEFINED#12", NULL != ( /*_.VALDATA___V2107*/ meltfptr[2106])); ((meltroutine_ptr_t) /*_.VALROUT___V2105*/ meltfptr[2104])->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V2107*/ meltfptr[2106]); MELT_LOCATION ("warmelt-normal.melt:7174:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2105*/ meltfptr[2104])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1172*/ meltfptr[1171]); ((meltroutine_ptr_t) /*_.VALROUT___V2105*/ meltfptr[2104])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V1172*/ meltfptr[1171]); MELT_LOCATION ("warmelt-normal.melt:7174:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2105*/ meltfptr[2104])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1934__NORMEXP_STORE_PREDEFINED#14", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V2105*/ meltfptr[2104])->tabval[14] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-normal.melt:7174:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2105*/ meltfptr[2104])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1934__NORMEXP_STORE_PREDEFINED#15", NULL != ( /*_.CTYPE_VALUE__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V2105*/ meltfptr[2104])->tabval[15] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-normal.melt:7174:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2105*/ meltfptr[2104])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1060*/ meltfptr[1059]); ((meltroutine_ptr_t) /*_.VALROUT___V2105*/ meltfptr[2104])->tabval[16] = (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]); MELT_LOCATION ("warmelt-normal.melt:7174:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2105*/ meltfptr[2104]); /*putclosurout#108 */ melt_assertmsg ("putclosrout#108 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V2109*/ meltfptr[2108])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#108 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2105*/ meltfptr[2104])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V2109*/ meltfptr[2108])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V2105*/ meltfptr[2104]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2109*/ meltfptr[2108]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2110*/ meltfptr[2109])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2110*/ meltfptr[2109])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2110*/ meltfptr[2109]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2111*/ meltfptr[2110]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2110*/ meltfptr[2109]); melt_dbgtrace_written_object ( /*_.VALDATA___V2110*/ meltfptr[2109], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:7236:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2112*/ meltfptr[2111])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1941__NORMEXP_CHEADER#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V2112*/ meltfptr[2111])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:7236:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2112*/ meltfptr[2111])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1941__NORMEXP_CHEADER#1", NULL != ( /*_.CLASS_SOURCE_CHEADER__V170*/ meltfptr[169])); ((meltroutine_ptr_t) /*_.VALROUT___V2112*/ meltfptr[2111])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SOURCE_CHEADER__V170*/ meltfptr[169]); MELT_LOCATION ("warmelt-normal.melt:7236:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2112*/ meltfptr[2111])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1941__NORMEXP_CHEADER#2", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V2112*/ meltfptr[2111])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:7236:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2112*/ meltfptr[2111])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1941__NORMEXP_CHEADER#3", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V2112*/ meltfptr[2111])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:7236:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2112*/ meltfptr[2111])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1941__NORMEXP_CHEADER#4", NULL != ( /*_.CLASS_MODULE_CONTEXT__V16*/ meltfptr[15])); ((meltroutine_ptr_t) /*_.VALROUT___V2112*/ meltfptr[2111])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_MODULE_CONTEXT__V16*/ meltfptr[15]); MELT_LOCATION ("warmelt-normal.melt:7236:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2112*/ meltfptr[2111]); /*putclosurout#109 */ melt_assertmsg ("putclosrout#109 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V2113*/ meltfptr[2112])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#109 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2112*/ meltfptr[2111])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V2113*/ meltfptr[2112])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V2112*/ meltfptr[2111]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2113*/ meltfptr[2112]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2114*/ meltfptr[2113])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2114*/ meltfptr[2113])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2114*/ meltfptr[2113]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2115*/ meltfptr[2114]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2114*/ meltfptr[2113]); melt_dbgtrace_written_object ( /*_.VALDATA___V2114*/ meltfptr[2113], "new static instance"); MELT_LOCATION ("warmelt-normal.melt:7259:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2116*/ meltfptr[2115])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1945__NORMEXP_USE_PACKAGE_FROM_PKG_CONFIG#0", NULL != ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V2116*/ meltfptr[2115])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-normal.melt:7259:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2116*/ meltfptr[2115])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1945__NORMEXP_USE_PACKAGE_FROM_PKG_CONFIG#1", NULL != ( /*_.CLASS_SOURCE_USE_PACKAGE_FROM_PKG_CONFIG__V171*/ meltfptr[170])); ((meltroutine_ptr_t) /*_.VALROUT___V2116*/ meltfptr[2115])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SOURCE_USE_PACKAGE_FROM_PKG_CONFIG__V171*/ meltfptr[170]); MELT_LOCATION ("warmelt-normal.melt:7259:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2116*/ meltfptr[2115])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1945__NORMEXP_USE_PACKAGE_FROM_PKG_CONFIG#2", NULL != ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V2116*/ meltfptr[2115])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-normal.melt:7259:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2116*/ meltfptr[2115])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1945__NORMEXP_USE_PACKAGE_FROM_PKG_CONFIG#3", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V2116*/ meltfptr[2115])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-normal.melt:7259:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2116*/ meltfptr[2115])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1945__NORMEXP_USE_PACKAGE_FROM_PKG_CONFIG#4", NULL != ( /*_.CLASS_MODULE_CONTEXT__V16*/ meltfptr[15])); ((meltroutine_ptr_t) /*_.VALROUT___V2116*/ meltfptr[2115])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_MODULE_CONTEXT__V16*/ meltfptr[15]); MELT_LOCATION ("warmelt-normal.melt:7259:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2116*/ meltfptr[2115]); /*putclosurout#110 */ melt_assertmsg ("putclosrout#110 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V2117*/ meltfptr[2116])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#110 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2116*/ meltfptr[2115])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V2117*/ meltfptr[2116])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V2116*/ meltfptr[2115]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2117*/ meltfptr[2116]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2118*/ meltfptr[2117])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2118*/ meltfptr[2117])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2118*/ meltfptr[2117]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2119*/ meltfptr[2118]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2118*/ meltfptr[2117]); melt_dbgtrace_written_object ( /*_.VALDATA___V2118*/ meltfptr[2117], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2120*/ meltfptr[2119])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2120*/ meltfptr[2119])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2120*/ meltfptr[2119]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2121*/ meltfptr[2120]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2120*/ meltfptr[2119]); melt_dbgtrace_written_object ( /*_.VALDATA___V2120*/ meltfptr[2119], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2122*/ meltfptr[2121])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2122*/ meltfptr[2121])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2122*/ meltfptr[2121]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2123*/ meltfptr[2122]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2122*/ meltfptr[2121]); melt_dbgtrace_written_object ( /*_.VALDATA___V2122*/ meltfptr[2121], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2124*/ meltfptr[2123])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2124*/ meltfptr[2123])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2124*/ meltfptr[2123]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2125*/ meltfptr[2124]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2124*/ meltfptr[2123]); melt_dbgtrace_written_object ( /*_.VALDATA___V2124*/ meltfptr[2123], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2126*/ meltfptr[2125])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2126*/ meltfptr[2125])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2126*/ meltfptr[2125]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2127*/ meltfptr[2126]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2126*/ meltfptr[2125]); melt_dbgtrace_written_object ( /*_.VALDATA___V2126*/ meltfptr[2125], "new static instance"); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_44 */ void meltmod__warmelt_normal__initialmeltchunk_45 (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___V2128*/ meltfptr[2127])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2128*/ meltfptr[2127])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2128*/ meltfptr[2127]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2129*/ meltfptr[2128]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2128*/ meltfptr[2127]); melt_dbgtrace_written_object ( /*_.VALDATA___V2128*/ meltfptr[2127], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2130*/ meltfptr[2129])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2130*/ meltfptr[2129])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2130*/ meltfptr[2129]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2131*/ meltfptr[2130]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2130*/ meltfptr[2129]); melt_dbgtrace_written_object ( /*_.VALDATA___V2130*/ meltfptr[2129], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2132*/ meltfptr[2131])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2132*/ meltfptr[2131])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2132*/ meltfptr[2131]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2133*/ meltfptr[2132]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2132*/ meltfptr[2131]); melt_dbgtrace_written_object ( /*_.VALDATA___V2132*/ meltfptr[2131], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2134*/ meltfptr[2133])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2134*/ meltfptr[2133])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2134*/ meltfptr[2133]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2135*/ meltfptr[2134]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2134*/ meltfptr[2133]); melt_dbgtrace_written_object ( /*_.VALDATA___V2134*/ meltfptr[2133], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2136*/ meltfptr[2135])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2136*/ meltfptr[2135])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2136*/ meltfptr[2135]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2137*/ meltfptr[2136]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2136*/ meltfptr[2135]); melt_dbgtrace_written_object ( /*_.VALDATA___V2136*/ meltfptr[2135], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2138*/ meltfptr[2137])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2138*/ meltfptr[2137])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2138*/ meltfptr[2137]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2139*/ meltfptr[2138]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2138*/ meltfptr[2137]); melt_dbgtrace_written_object ( /*_.VALDATA___V2138*/ meltfptr[2137], "new static instance"); /**COMMENT: before toplevel body **/ ; MELT_LOCATION ("warmelt-normal.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___V2140*/ meltfptr[2139] = /*quasi.cur.mod.env.cont cur.mod.env.cont : at very start */ /*_.CONTENV___V2*/ meltfptr[1];; } else { MELT_LOCATION ("warmelt-normal.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__V2141*/ meltfptr[2140] = slot; }; ; /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[1]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_cstring = "warmelt-normal"; /*_.FUN___V2142*/ meltfptr[2141] = melt_apply ((meltclosure_ptr_t) ( /*_.SYSDATA_CONT_FRESH_ENV__V2141*/ meltfptr[2140]), (melt_ptr_t) ( /*_.PREVENV___V4*/ meltfptr[3]), (MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } ; /*_.OR___V2140*/ meltfptr[2139] = /*_.FUN___V2142*/ meltfptr[2141];; /*epilog */ MELT_LOCATION ("warmelt-normal.melt:3:/ clear"); /*clear *//*_.SYSDATA_CONT_FRESH_ENV__V2141*/ meltfptr[2140] = 0; /*^clear */ /*clear *//*_.FUN___V2142*/ meltfptr[2141] = 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___V2140*/ meltfptr[2139] = 0; } MELT_LOCATION ("warmelt-normal.melt:730:/ 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___V2143*/ meltfptr[2140] = slot; }; ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V768*/ meltfptr[767]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V766*/ meltfptr[765]), (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___V771*/ meltfptr[770]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NINSTB_SLOTS */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V776*/ meltfptr[775]), (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___V773*/ meltfptr[772]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NINSTB_CLABIND */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V778*/ meltfptr[777]), (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 : CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V748*/ meltfptr[747]), (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___V753*/ meltfptr[752]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NLAMBDAB_NCLOSED */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V760*/ meltfptr[759]), (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___V755*/ meltfptr[754]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NLAMBDAB_CONSTROUT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V762*/ meltfptr[761]), (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___V757*/ meltfptr[756]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NLAMBDAB_DATAROUT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V764*/ meltfptr[763]), (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___V732*/ meltfptr[731]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NORMAL_CONSTRUCTED_LIST_BINDING */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V730*/ meltfptr[729]), (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___V735*/ meltfptr[734]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NLISTB_FIRST */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V742*/ meltfptr[741]), (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___V737*/ meltfptr[736]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NLISTB_LAST */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V744*/ meltfptr[743]), (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___V739*/ meltfptr[738]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NLISTB_PAIRSB */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V746*/ meltfptr[745]), (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___V718*/ meltfptr[717]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V716*/ meltfptr[715]), (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___V721*/ meltfptr[720]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NPAIRB_HEAD */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V726*/ meltfptr[725]), (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 : NPAIRB_TAIL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V728*/ meltfptr[727]), (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___V708*/ meltfptr[707]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V706*/ meltfptr[705]), (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___V711*/ meltfptr[710]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NTUPB_COMP */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V714*/ meltfptr[713]), (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___V690*/ meltfptr[689]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NORMAL_CONSTRUCTOR_BINDING */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]), (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___V693*/ meltfptr[692]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NCONSB_LOC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V700*/ meltfptr[699]), (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 : NCONSB_DISCR */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V702*/ meltfptr[701]), (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___V697*/ meltfptr[696]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NCONSB_NLETREC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V704*/ meltfptr[703]), (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___V176*/ meltfptr[175]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V172*/ meltfptr[171]), (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___V179*/ meltfptr[178]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NREP_LOC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V182*/ meltfptr[181]), (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___V566*/ meltfptr[565]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_AGAIN */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V564*/ meltfptr[563]), (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___V569*/ meltfptr[568]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NAGAIN_BIND */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V572*/ meltfptr[571]), (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 : CLASS_NREP_ANYPROC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V780*/ meltfptr[779]), (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___V785*/ meltfptr[784]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NPROC_BODY */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V788*/ meltfptr[787]), (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___V218*/ meltfptr[217]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_APPLY */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V216*/ meltfptr[215]), (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___V221*/ meltfptr[220]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NAPP_FUN */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V224*/ meltfptr[223]), (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___V270*/ meltfptr[269]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_CHUNK */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V268*/ meltfptr[267]), (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___V273*/ meltfptr[272]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NCHUNK_EXPANSION */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (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___V275*/ meltfptr[274]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NCHUNK_OPER */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (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___V644*/ meltfptr[643]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_CITERATION */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V642*/ meltfptr[641]), (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___V647*/ meltfptr[646]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NCITER_CITERATOR */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V662*/ meltfptr[661]), (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___V649*/ meltfptr[648]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NCITER_CHUNKBEFORE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V664*/ meltfptr[663]), (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___V651*/ meltfptr[650]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NCITER_CHUNKAFTER */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V666*/ meltfptr[665]), (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___V653*/ meltfptr[652]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NCITER_BODY */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V668*/ meltfptr[667]), (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___V655*/ meltfptr[654]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NCITER_STATOCC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V670*/ meltfptr[669]), (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___V657*/ meltfptr[656]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NCITER_LOCBINDINGS */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V672*/ meltfptr[671]), (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___V659*/ meltfptr[658]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NCITER_BODBINDINGS */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V674*/ meltfptr[673]), (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___V472*/ meltfptr[471]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_CHECKSIGNAL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V470*/ meltfptr[469]), (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___V1200*/ meltfptr[1199]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1198*/ meltfptr[1197]), (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___V1203*/ meltfptr[1202]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NCHRUMOD_COMMENT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1206*/ meltfptr[1205]), (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___V1066*/ meltfptr[1065]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_CLOSEDOCC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1064*/ meltfptr[1063]), (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___V1069*/ meltfptr[1068]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NCLOC_PROCS */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1072*/ meltfptr[1071]), (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___V284*/ meltfptr[283]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_COMMENT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (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___V287*/ meltfptr[286]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NCOMM_STRING */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V290*/ meltfptr[289]), (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___V1100*/ meltfptr[1099]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_CONSTANT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1098*/ meltfptr[1097]), (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___V1076*/ meltfptr[1075]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_CONSTOCC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1074*/ meltfptr[1073]), (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___V398*/ meltfptr[397]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_CONSUME_VARIADIC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V396*/ meltfptr[395]), (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___V401*/ meltfptr[400]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NCONSVA_VARIADIC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V406*/ meltfptr[405]), (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___V403*/ meltfptr[402]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NCONSVA_CTYPES */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V408*/ meltfptr[407]), (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___V436*/ meltfptr[435]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_CPPIF */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V434*/ meltfptr[433]), (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___V439*/ meltfptr[438]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NIFP_COND */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V448*/ meltfptr[447]), (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___V441*/ meltfptr[440]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NIFP_THEN */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V450*/ meltfptr[449]), (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___V443*/ meltfptr[442]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NIFP_ELSE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V452*/ meltfptr[451]), (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___V445*/ meltfptr[444]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NIFP_CTYP */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V454*/ meltfptr[453]), (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___V888*/ meltfptr[887]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_BOUND_DATA */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V886*/ meltfptr[885]), (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___V891*/ meltfptr[890]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NDATA_NAME */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V898*/ meltfptr[897]), (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 : NDATA_RANK */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V900*/ meltfptr[899]), (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___V895*/ meltfptr[894]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NDATA_LOCBIND */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V902*/ meltfptr[901]), (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___V948*/ meltfptr[947]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_DATABOXEDINTEGER */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V946*/ meltfptr[945]), (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___V951*/ meltfptr[950]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NBOXINT_NUM */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V954*/ meltfptr[953]), (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___V994*/ meltfptr[993]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_DATACLOSURE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V992*/ meltfptr[991]), (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___V997*/ meltfptr[996]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NDCLO_PROC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1002*/ meltfptr[1001]), (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___V999*/ meltfptr[998]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NDCLO_CLOSV */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1004*/ meltfptr[1003]), (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 : CLASS_NREP_DATAINSTANCE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V914*/ meltfptr[913]), (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___V919*/ meltfptr[918]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NINST_OBJNUM */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V928*/ meltfptr[927]), (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___V921*/ meltfptr[920]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NINST_PREDEF */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V930*/ meltfptr[929]), (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___V923*/ meltfptr[922]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NINST_HASH */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V932*/ meltfptr[931]), (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 : NINST_SLOTS */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V934*/ meltfptr[933]), (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 : CLASS_NREP_DATAKEYWORD */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V976*/ meltfptr[975]), (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___V984*/ meltfptr[983]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_DATAROUTINE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V982*/ meltfptr[981]), (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___V987*/ meltfptr[986]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NDROU_PROC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V990*/ meltfptr[989]), (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 : CLASS_NREP_DATASTRING */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V936*/ meltfptr[935]), (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___V941*/ meltfptr[940]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NSTR_STRING */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V944*/ meltfptr[943]), (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___V968*/ meltfptr[967]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_DATASYMBOL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V966*/ meltfptr[965]), (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___V971*/ meltfptr[970]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NDSY_NAMESTR */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V974*/ meltfptr[973]), (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___V958*/ meltfptr[957]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_DATATUPLE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V956*/ meltfptr[955]), (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___V961*/ meltfptr[960]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NTUP_COMP */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V964*/ meltfptr[963]), (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___V906*/ meltfptr[905]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_DISCRIMINATED_DATA */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V904*/ meltfptr[903]), (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___V909*/ meltfptr[908]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NDATA_DISCRX */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V912*/ meltfptr[911]), (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___V1106*/ meltfptr[1105]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_DEFINED_CONSTANT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1104*/ meltfptr[1103]), (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___V1109*/ meltfptr[1108]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NCONST_DEFBIND */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1112*/ meltfptr[1111]), (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___V860*/ meltfptr[859]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_DEFUNROUTPROC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V858*/ meltfptr[857]), (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___V552*/ meltfptr[551]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_EXIT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V550*/ meltfptr[549]), (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___V555*/ meltfptr[554]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NEXIT_BIND */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V560*/ meltfptr[559]), (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___V557*/ meltfptr[556]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NEXIT_VAL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V562*/ meltfptr[561]), (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___V192*/ meltfptr[191]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_EXPRESSION */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189]), (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___V1144*/ meltfptr[1143]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_FIELDACC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1142*/ meltfptr[1141]), (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___V1147*/ meltfptr[1146]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NACCF_OBJ */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1152*/ meltfptr[1151]), (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___V1149*/ meltfptr[1148]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NACCF_FLD */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1154*/ meltfptr[1153]), (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___V576*/ meltfptr[575]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_FIELDASSIGN */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V574*/ meltfptr[573]), (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___V579*/ meltfptr[578]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NFLA_FIELD */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V584*/ meltfptr[583]), (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___V581*/ meltfptr[580]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NFLA_VAL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V586*/ meltfptr[585]), (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___V534*/ meltfptr[533]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_FOREVER */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V532*/ meltfptr[531]), (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___V537*/ meltfptr[536]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NFOREVER_BIND */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V544*/ meltfptr[543]), (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___V539*/ meltfptr[538]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NFOREVER_BODY */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V546*/ meltfptr[545]), (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___V541*/ meltfptr[540]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NFOREVER_RESULT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V548*/ meltfptr[547]), (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___V426*/ meltfptr[425]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_IF */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V424*/ meltfptr[423]), (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___V429*/ meltfptr[428]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NIF_TEST */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V432*/ meltfptr[431]), (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___V340*/ meltfptr[339]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_IFCOMMON */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V338*/ meltfptr[337]), (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___V343*/ meltfptr[342]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NIF_THEN */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (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___V345*/ meltfptr[344]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NIF_ELSE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]), (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___V364*/ meltfptr[363]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_IFISA */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V362*/ meltfptr[361]), (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 : NIFA_CLASS */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V370*/ meltfptr[369]), (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___V412*/ meltfptr[411]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_IFSAME */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V410*/ meltfptr[409]), (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 : NIFS_LEFT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (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___V417*/ meltfptr[416]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NIFS_RIGHT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (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___V354*/ meltfptr[353]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_IFTESTVALUE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V352*/ meltfptr[351]), (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___V357*/ meltfptr[356]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NIF_TESTVAL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V360*/ meltfptr[359]), (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___V374*/ meltfptr[373]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_IFTUPLESIZED */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (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___V377*/ meltfptr[376]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NIF_TUPSIZ */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (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___V384*/ meltfptr[383]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_IFVARIADIC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V382*/ meltfptr[381]), (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 : NIFV_VARIADIC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (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___V389*/ meltfptr[388]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NIFV_CTYPES */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (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___V1008*/ meltfptr[1007]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_IMPORTEDVAL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1006*/ meltfptr[1005]), (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___V1011*/ meltfptr[1010]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NIMPORT_SYMB */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1016*/ meltfptr[1015]), (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___V1013*/ meltfptr[1012]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NIMPORT_SYDATA */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1018*/ meltfptr[1017]), (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___V806*/ meltfptr[805]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_INITEXTENDPROC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V804*/ meltfptr[803]), (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___V809*/ meltfptr[808]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NINITEXTEND_MODENV */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V812*/ meltfptr[811]), (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 : CLASS_NREP_INITPROC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V790*/ meltfptr[789]), (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___V795*/ meltfptr[794]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NINIT_TOPL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V800*/ meltfptr[799]), (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___V797*/ meltfptr[796]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NINIT_DEFBINDS */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V802*/ meltfptr[801]), (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___V590*/ meltfptr[589]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_INSTANCE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V588*/ meltfptr[587]), (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___V593*/ meltfptr[592]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NMINS_CLASS */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V600*/ meltfptr[599]), (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___V595*/ meltfptr[594]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NMINS_CLADATA */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V602*/ meltfptr[601]), (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___V597*/ meltfptr[596]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NMINS_FIELDS */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V604*/ meltfptr[603]), (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___V626*/ meltfptr[625]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_LAMBDA */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V624*/ meltfptr[623]), (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___V629*/ meltfptr[628]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NLAMBDA_PROC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V636*/ meltfptr[635]), (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___V631*/ meltfptr[630]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NLAMBDA_CONSTROUT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V638*/ meltfptr[637]), (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___V633*/ meltfptr[632]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NLAMBDA_CLOSEDV */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V640*/ meltfptr[639]), (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___V854*/ meltfptr[853]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_LAMBDAROUTPROC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V852*/ meltfptr[851]), (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___V1022*/ meltfptr[1021]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_LITERALVALUE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1020*/ meltfptr[1019]), (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___V1025*/ meltfptr[1024]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NLITVAL_REGVAL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1028*/ meltfptr[1027]), (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___V1032*/ meltfptr[1031]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_LITERALNAMEDVALUE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1030*/ meltfptr[1029]), (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___V1035*/ meltfptr[1034]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NLITVAL_SYMBOL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1038*/ meltfptr[1037]), (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___V294*/ meltfptr[293]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_LET */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (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___V297*/ meltfptr[296]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NLET_BINDINGS */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (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___V299*/ meltfptr[298]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NLET_BODY */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (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___V308*/ meltfptr[307]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_LETREC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V306*/ meltfptr[305]), (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___V311*/ meltfptr[310]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NLETREC_FILL_BINDINGS */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V318*/ meltfptr[317]), (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___V313*/ meltfptr[312]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NLETREC_BODY_BINDINGS */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (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___V315*/ meltfptr[314]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NLETREC_LOCSYMS */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (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___V1060*/ meltfptr[1059]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_LOCSYMOCC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1058*/ meltfptr[1057]), (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___V242*/ meltfptr[241]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_MSEND */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V240*/ meltfptr[239]), (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___V245*/ meltfptr[244]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NSEND_SEL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V250*/ meltfptr[249]), (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___V247*/ meltfptr[246]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NSEND_RECV */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (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___V1158*/ meltfptr[1157]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_MULTACC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1156*/ meltfptr[1155]), (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___V1161*/ meltfptr[1160]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NACCM_MUL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1166*/ meltfptr[1165]), (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___V1163*/ meltfptr[1162]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NACCM_IX */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1168*/ meltfptr[1167]), (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 : CLASS_NREP_MULTIAPPLY */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V226*/ meltfptr[225]), (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___V231*/ meltfptr[230]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NMULAPP_BINDINGS */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V236*/ meltfptr[235]), (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___V233*/ meltfptr[232]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NMULAPP_BODY */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V238*/ meltfptr[237]), (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_NREP_MULTIMSEND */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253]), (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 : NMULSEND_BINDINGS */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V264*/ meltfptr[263]), (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 : NMULSEND_BODY */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265]), (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___V876*/ meltfptr[875]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_NIL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V874*/ meltfptr[873]), (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___V866*/ meltfptr[865]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_PREDEF */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V864*/ meltfptr[863]), (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 : NRPREDEF */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V872*/ meltfptr[871]), (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___V458*/ meltfptr[457]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_PROGN */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V456*/ meltfptr[455]), (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___V461*/ meltfptr[460]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NPROGN_SEQ */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V466*/ meltfptr[465]), (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___V463*/ meltfptr[462]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NPROGN_LAST */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V468*/ meltfptr[467]), (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___V1116*/ meltfptr[1115]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1114*/ meltfptr[1113]), (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___V1119*/ meltfptr[1118]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NQCMEC_COMMENT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1122*/ meltfptr[1121]), (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___V1132*/ meltfptr[1131]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1130*/ meltfptr[1129]), (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___V1082*/ meltfptr[1081]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_QUASICONSTANT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1080*/ meltfptr[1079]), (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___V1085*/ meltfptr[1084]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NCONST_SVAL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1092*/ meltfptr[1091]), (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___V1087*/ meltfptr[1086]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NCONST_PROC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1094*/ meltfptr[1093]), (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___V1089*/ meltfptr[1088]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NCONST_DATA */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1096*/ meltfptr[1095]), (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___V882*/ meltfptr[881]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_QUASIDATA */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V880*/ meltfptr[879]), (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___V1126*/ meltfptr[1125]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1124*/ meltfptr[1123]), (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___V1138*/ meltfptr[1137]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1136*/ meltfptr[1135]), (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_NREP_RETURN */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (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___V329*/ meltfptr[328]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NRET_MAIN */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V334*/ meltfptr[333]), (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___V331*/ meltfptr[330]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NRET_REST */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V336*/ meltfptr[335]), (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___V816*/ meltfptr[815]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_ROUTPROC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V814*/ meltfptr[813]), (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 : NRPRO_NAME */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V836*/ meltfptr[835]), (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___V821*/ meltfptr[820]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NRPRO_ARGB */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V838*/ meltfptr[837]), (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___V823*/ meltfptr[822]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NRPRO_CLOSEDB */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V840*/ meltfptr[839]), (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___V825*/ meltfptr[824]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NRPRO_CONST */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V842*/ meltfptr[841]), (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___V827*/ meltfptr[826]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NRPRO_DATAROUT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V844*/ meltfptr[843]), (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 : NRPRO_DATACLOS */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V846*/ meltfptr[845]), (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___V831*/ meltfptr[830]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NRPRO_THUNKLIST */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V848*/ meltfptr[847]), (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___V833*/ meltfptr[832]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NRPRO_VARIADIC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V850*/ meltfptr[849]), (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___V520*/ meltfptr[519]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_SETQ */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V518*/ meltfptr[517]), (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___V523*/ meltfptr[522]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NSTQ_VAR */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V528*/ meltfptr[527]), (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___V525*/ meltfptr[524]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NSTQ_EXP */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V530*/ meltfptr[529]), (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___V186*/ meltfptr[185]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_SIMPLE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]), (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___V1172*/ meltfptr[1171]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_STORE_PREDEFINED */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1170*/ meltfptr[1169]), (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___V1175*/ meltfptr[1174]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NSTPD_PREDEF */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1180*/ meltfptr[1179]), (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 : NSTPD_VALUE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1182*/ meltfptr[1181]), (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___V1042*/ meltfptr[1041]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_SYMOCC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1040*/ meltfptr[1039]), (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___V1045*/ meltfptr[1044]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NOCC_SYMB */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1052*/ meltfptr[1051]), (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___V1047*/ meltfptr[1046]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NOCC_CTYP */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1054*/ meltfptr[1053]), (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___V1049*/ meltfptr[1048]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NOCC_BIND */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1056*/ meltfptr[1055]), (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___V198*/ meltfptr[197]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_TYPED_EXPRESSION */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V196*/ meltfptr[195]), (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___V201*/ meltfptr[200]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NEXPR_CTYP */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V204*/ meltfptr[203]), (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___V208*/ meltfptr[207]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V206*/ meltfptr[205]), (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___V211*/ meltfptr[210]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NEXPR_ARGS */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V214*/ meltfptr[213]), (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___V478*/ meltfptr[477]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_UNSAFE_GET_FIELD */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V476*/ meltfptr[475]), (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___V481*/ meltfptr[480]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NUGET_OBJ */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V486*/ meltfptr[485]), (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___V483*/ meltfptr[482]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NUGET_FIELD */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V488*/ meltfptr[487]), (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___V492*/ meltfptr[491]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_UNSAFE_PUT_FIELDS */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V490*/ meltfptr[489]), (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___V495*/ meltfptr[494]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NUPUT_OBJ */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V500*/ meltfptr[499]), (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___V497*/ meltfptr[496]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NUPUT_FIELDS */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V502*/ meltfptr[501]), (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___V506*/ meltfptr[505]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_UNSAFE_NTH_COMPONENT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V504*/ meltfptr[503]), (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___V509*/ meltfptr[508]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NUNTH_TUPLE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V514*/ meltfptr[513]), (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___V511*/ meltfptr[510]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NUNTH_INDEX */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V516*/ meltfptr[515]), (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 : CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1184*/ meltfptr[1183]), (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___V1189*/ meltfptr[1188]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NUCMEB_EXPR */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1194*/ meltfptr[1193]), (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___V1191*/ meltfptr[1190]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NCUMEB_COMMENT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V1196*/ meltfptr[1195]), (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___V608*/ meltfptr[607]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_VARIADIC_ARGUMENT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V606*/ meltfptr[605]), (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___V611*/ meltfptr[610]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NVARG_VARIADIC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V618*/ meltfptr[617]), (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___V613*/ meltfptr[612]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NVARG_CTYP */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V620*/ meltfptr[619]), (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___V615*/ meltfptr[614]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NVARG_OFFSET */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2143*/ meltfptr[2140]), (melt_ptr_t) ( /*_.VALDATA___V622*/ meltfptr[621]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.VALUEXPORTER___V2143*/ meltfptr[2140] = 0; } MELT_LOCATION ("warmelt-normal.melt:868:/ 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___V2144*/ meltfptr[2141] = slot; }; ; /*^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 *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_LITERAL_VALUE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2144*/ meltfptr[2141]), (melt_ptr_t) ( /*_.VALDATA___V1424*/ meltfptr[1423]), (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___V1429*/ meltfptr[1428]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : LITV_VALUE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2144*/ meltfptr[2141]), (melt_ptr_t) ( /*_.VALDATA___V1436*/ meltfptr[1435]), (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___V1431*/ meltfptr[1430]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : LITV_RANK */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2144*/ meltfptr[2141]), (melt_ptr_t) ( /*_.VALDATA___V1438*/ meltfptr[1437]), (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___V1433*/ meltfptr[1432]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : LITV_LOC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2144*/ meltfptr[2141]), (melt_ptr_t) ( /*_.VALDATA___V1440*/ meltfptr[1439]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.VALUEXPORTER___V2144*/ meltfptr[2141] = 0; } MELT_LOCATION ("warmelt-normal.melt:1065:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1472*/ meltfptr[1471]; /*_.INSTALL_METHOD__V2145*/ meltfptr[2139] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.DISCR_STRING__V22*/ meltfptr[21]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2145*/ meltfptr[2139] = 0; } MELT_LOCATION ("warmelt-normal.melt:1066:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1472*/ meltfptr[1471]; /*_.INSTALL_METHOD__V2146*/ meltfptr[2140] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.DISCR_INTEGER__V10*/ meltfptr[9]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2146*/ meltfptr[2140] = 0; } MELT_LOCATION ("warmelt-normal.melt:1075:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1476*/ meltfptr[1475]; /*_.INSTALL_METHOD__V2147*/ meltfptr[2141] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.DISCR_NULL_RECEIVER__V23*/ meltfptr[22]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2147*/ meltfptr[2141] = 0; } MELT_LOCATION ("warmelt-normal.melt:1100:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1478*/ meltfptr[1477]; /*_.INSTALL_METHOD__V2148*/ meltfptr[2139] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2148*/ meltfptr[2139] = 0; } MELT_LOCATION ("warmelt-normal.melt:1115:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1480*/ meltfptr[1479]; /*_.INSTALL_METHOD__V2149*/ meltfptr[2140] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.DISCR_ANY_RECEIVER__V25*/ meltfptr[24]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2149*/ meltfptr[2140] = 0; } MELT_LOCATION ("warmelt-normal.melt:1128:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1482*/ meltfptr[1481]; /*_.INSTALL_METHOD__V2150*/ meltfptr[2141] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE__V26*/ meltfptr[25]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2150*/ meltfptr[2141] = 0; } MELT_LOCATION ("warmelt-normal.melt:1165:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1486*/ meltfptr[1485]; /*_.INSTALL_METHOD__V2151*/ meltfptr[2139] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_LAZY_MACRO_EXPANSION__V28*/ meltfptr[27]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2151*/ meltfptr[2139] = 0; } MELT_LOCATION ("warmelt-normal.melt:1185:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1491*/ meltfptr[1490]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1498*/ meltfptr[1497]; /*_.INSTALL_METHOD__V2152*/ meltfptr[2140] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.DISCR_ANY_RECEIVER__V25*/ meltfptr[24]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2152*/ meltfptr[2140] = 0; } MELT_LOCATION ("warmelt-normal.melt:1188:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1491*/ meltfptr[1490]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1500*/ meltfptr[1499]; /*_.INSTALL_METHOD__V2153*/ meltfptr[2141] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_ROOT__V7*/ meltfptr[6]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2153*/ meltfptr[2141] = 0; } MELT_LOCATION ("warmelt-normal.melt:1194:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1491*/ meltfptr[1490]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1502*/ meltfptr[1501]; /*_.INSTALL_METHOD__V2154*/ meltfptr[2139] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.DISCR_INTEGER__V10*/ meltfptr[9]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2154*/ meltfptr[2139] = 0; } MELT_LOCATION ("warmelt-normal.melt:1199:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1491*/ meltfptr[1490]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1504*/ meltfptr[1503]; /*_.INSTALL_METHOD__V2155*/ meltfptr[2140] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.DISCR_STRING__V22*/ meltfptr[21]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2155*/ meltfptr[2140] = 0; } MELT_LOCATION ("warmelt-normal.melt:1348:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1538*/ meltfptr[1537]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1541*/ meltfptr[1540]; /*_.INSTALL_METHOD__V2156*/ meltfptr[2141] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.DISCR_ANY_RECEIVER__V25*/ meltfptr[24]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2156*/ meltfptr[2141] = 0; } MELT_LOCATION ("warmelt-normal.melt:1388:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1538*/ meltfptr[1537]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1543*/ meltfptr[1542]; /*_.INSTALL_METHOD__V2157*/ meltfptr[2139] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V8*/ meltfptr[7]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2157*/ meltfptr[2139] = 0; } MELT_LOCATION ("warmelt-normal.melt:1410:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1538*/ meltfptr[1537]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1545*/ meltfptr[1544]; /*_.INSTALL_METHOD__V2158*/ meltfptr[2140] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V41*/ meltfptr[40]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2158*/ meltfptr[2140] = 0; } MELT_LOCATION ("warmelt-normal.melt:1433:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1538*/ meltfptr[1537]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1547*/ meltfptr[1546]; /*_.INSTALL_METHOD__V2159*/ meltfptr[2141] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_LET_BINDING__V42*/ meltfptr[41]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2159*/ meltfptr[2141] = 0; } MELT_LOCATION ("warmelt-normal.melt:1460:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1538*/ meltfptr[1537]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1551*/ meltfptr[1550]; /*_.INSTALL_METHOD__V2160*/ meltfptr[2139] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_FIXED_BINDING__V43*/ meltfptr[42]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2160*/ meltfptr[2139] = 0; } MELT_LOCATION ("warmelt-normal.melt:1496:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1538*/ meltfptr[1537]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1555*/ meltfptr[1554]; /*_.INSTALL_METHOD__V2161*/ meltfptr[2140] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_DEFINED_VALUE_BINDING__V44*/ meltfptr[43]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2161*/ meltfptr[2140] = 0; } MELT_LOCATION ("warmelt-normal.melt:1530:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1538*/ meltfptr[1537]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1559*/ meltfptr[1558]; /*_.INSTALL_METHOD__V2162*/ meltfptr[2141] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.VALDATA___V690*/ meltfptr[689]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2162*/ meltfptr[2141] = 0; } MELT_LOCATION ("warmelt-normal.melt:1726:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1571*/ meltfptr[1570]; /*_.INSTALL_METHOD__V2163*/ meltfptr[2139] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SYMBOL__V29*/ meltfptr[28]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2163*/ meltfptr[2139] = 0; } MELT_LOCATION ("warmelt-normal.melt:1734:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1491*/ meltfptr[1490]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1577*/ meltfptr[1576]; /*_.INSTALL_METHOD__V2164*/ meltfptr[2140] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.VALDATA___V1042*/ meltfptr[1041]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2164*/ meltfptr[2140] = 0; } MELT_LOCATION ("warmelt-normal.melt:1779:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1579*/ meltfptr[1578]; /*_.INSTALL_METHOD__V2165*/ meltfptr[2141] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_CLASS__V47*/ meltfptr[46]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2165*/ meltfptr[2141] = 0; } MELT_LOCATION ("warmelt-normal.melt:1903:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1587*/ meltfptr[1586]; /*_.INSTALL_METHOD__V2166*/ meltfptr[2139] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_PRIMITIVE__V50*/ meltfptr[49]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2166*/ meltfptr[2139] = 0; } MELT_LOCATION ("warmelt-normal.melt:1956:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1594*/ meltfptr[1593]; /*_.INSTALL_METHOD__V2167*/ meltfptr[2140] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_CODECHUNK__V53*/ meltfptr[52]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2167*/ meltfptr[2140] = 0; } MELT_LOCATION ("warmelt-normal.melt:2085:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1602*/ meltfptr[1601]; /*_.INSTALL_METHOD__V2168*/ meltfptr[2141] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_CMATCHEXPR__V58*/ meltfptr[57]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2168*/ meltfptr[2141] = 0; } MELT_LOCATION ("warmelt-normal.melt:2158:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1606*/ meltfptr[1605]; /*_.INSTALL_METHOD__V2169*/ meltfptr[2139] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_FUNMATCHEXPR__V60*/ meltfptr[59]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2169*/ meltfptr[2139] = 0; } MELT_LOCATION ("warmelt-normal.melt:2252:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1616*/ meltfptr[1615]; /*_.INSTALL_METHOD__V2170*/ meltfptr[2140] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_APPLY__V64*/ meltfptr[63]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2170*/ meltfptr[2140] = 0; } MELT_LOCATION ("warmelt-normal.melt:2378:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1620*/ meltfptr[1619]; /*_.INSTALL_METHOD__V2171*/ meltfptr[2141] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_MSEND__V65*/ meltfptr[64]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2171*/ meltfptr[2141] = 0; } MELT_LOCATION ("warmelt-normal.melt:2466:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1632*/ meltfptr[1631]; /*_.INSTALL_METHOD__V2172*/ meltfptr[2139] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_RETURN__V68*/ meltfptr[67]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2172*/ meltfptr[2139] = 0; } MELT_LOCATION ("warmelt-normal.melt:2540:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1641*/ meltfptr[1640]; /*_.INSTALL_METHOD__V2173*/ meltfptr[2140] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_IF__V69*/ meltfptr[68]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2173*/ meltfptr[2140] = 0; } MELT_LOCATION ("warmelt-normal.melt:2652:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1655*/ meltfptr[1654]; /*_.INSTALL_METHOD__V2174*/ meltfptr[2141] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_IFELSE__V72*/ meltfptr[71]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2174*/ meltfptr[2141] = 0; } MELT_LOCATION ("warmelt-normal.melt:2725:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1663*/ meltfptr[1662]; /*_.INSTALL_METHOD__V2175*/ meltfptr[2139] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_CPPIF__V73*/ meltfptr[72]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2175*/ meltfptr[2139] = 0; } MELT_LOCATION ("warmelt-normal.melt:2808:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1671*/ meltfptr[1670]; /*_.INSTALL_METHOD__V2176*/ meltfptr[2140] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_OR__V74*/ meltfptr[73]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2176*/ meltfptr[2140] = 0; } MELT_LOCATION ("warmelt-normal.melt:2865:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1679*/ meltfptr[1678]; /*_.INSTALL_METHOD__V2177*/ meltfptr[2141] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_PROGN__V76*/ meltfptr[75]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2177*/ meltfptr[2141] = 0; } MELT_LOCATION ("warmelt-normal.melt:2866:/ initchunk"); /*^block */ /*anyblock */ { MELT_LOCATION ("warmelt-normal.melt:2867:/ quasiblock"); /*^newclosure */ /*newclosure *//*_.LAMBDA___V2179*/ meltfptr[2140] = (melt_ptr_t) meltgc_new_closure ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))), (meltroutine_ptr_t) ( /*_.VALROUT___V1682*/ meltfptr[1681]), (0)); ; /*_.LAMBDA___V2178*/ meltfptr[2139] = /*_.LAMBDA___V2179*/ meltfptr[2140];; MELT_LOCATION ("warmelt-normal.melt:2866:/ checksignal"); 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___V1491*/ meltfptr[1490]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.LAMBDA___V2178*/ meltfptr[2139]; /*_.INSTALL_METHOD__V2180*/ meltfptr[2141] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.VALDATA___V458*/ meltfptr[457]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.LAMBDA___V2178*/ meltfptr[2139] = 0; /*^clear */ /*clear *//*_.INSTALL_METHOD__V2180*/ meltfptr[2141] = 0; } MELT_LOCATION ("warmelt-normal.melt:3011:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1688*/ meltfptr[1687]; /*_.INSTALL_METHOD__V2181*/ meltfptr[2139] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_LET__V77*/ meltfptr[76]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2181*/ meltfptr[2139] = 0; } MELT_LOCATION ("warmelt-normal.melt:3012:/ initchunk"); /*^block */ /*anyblock */ { MELT_LOCATION ("warmelt-normal.melt:3013:/ quasiblock"); /*^newclosure */ /*newclosure *//*_.LAMBDA___V2183*/ meltfptr[2139] = (melt_ptr_t) meltgc_new_closure ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))), (meltroutine_ptr_t) ( /*_.VALROUT___V1693*/ meltfptr[1692]), (0)); ; /*_.LAMBDA___V2182*/ meltfptr[2141] = /*_.LAMBDA___V2183*/ meltfptr[2139];; MELT_LOCATION ("warmelt-normal.melt:3012:/ checksignal"); 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___V1491*/ meltfptr[1490]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.LAMBDA___V2182*/ meltfptr[2141]; /*_.INSTALL_METHOD__V2184*/ meltfptr[2183] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.VALDATA___V294*/ meltfptr[293]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.LAMBDA___V2182*/ meltfptr[2141] = 0; /*^clear */ /*clear *//*_.INSTALL_METHOD__V2184*/ meltfptr[2183] = 0; } MELT_LOCATION ("warmelt-normal.melt:3055:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1695*/ meltfptr[1694]; /*_.INSTALL_METHOD__V2185*/ meltfptr[2141] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_UNSAFE_GET_FIELD__V79*/ meltfptr[78]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2185*/ meltfptr[2141] = 0; } MELT_LOCATION ("warmelt-normal.melt:3104:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1699*/ meltfptr[1698]; /*_.INSTALL_METHOD__V2186*/ meltfptr[2183] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_GET_FIELD__V81*/ meltfptr[80]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2186*/ meltfptr[2183] = 0; } MELT_LOCATION ("warmelt-normal.melt:3180:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1708*/ meltfptr[1707]; /*_.INSTALL_METHOD__V2187*/ meltfptr[2141] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_UNSAFE_PUT_FIELDS__V82*/ meltfptr[81]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2187*/ meltfptr[2141] = 0; } MELT_LOCATION ("warmelt-normal.melt:3181:/ initchunk"); /*^block */ /*anyblock */ { /*^quasiblock */ /*^newclosure */ /*newclosure *//*_.LAMBDA___V2189*/ meltfptr[2141] = (melt_ptr_t) meltgc_new_closure ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))), (meltroutine_ptr_t) ( /*_.VALROUT___V1713*/ meltfptr[1712]), (0)); ; /*_.LAMBDA___V2188*/ meltfptr[2183] = /*_.LAMBDA___V2189*/ meltfptr[2141];; MELT_LOCATION ("warmelt-normal.melt:3181:/ checksignal"); 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___V1491*/ meltfptr[1490]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.LAMBDA___V2188*/ meltfptr[2183]; /*_.INSTALL_METHOD__V2190*/ meltfptr[2189] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.VALDATA___V492*/ meltfptr[491]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.LAMBDA___V2188*/ meltfptr[2183] = 0; /*^clear */ /*clear *//*_.INSTALL_METHOD__V2190*/ meltfptr[2189] = 0; } MELT_LOCATION ("warmelt-normal.melt:3293:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1719*/ meltfptr[1718]; /*_.INSTALL_METHOD__V2191*/ meltfptr[2183] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_PUT_FIELDS__V84*/ meltfptr[83]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2191*/ meltfptr[2183] = 0; } MELT_LOCATION ("warmelt-normal.melt:3346:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1725*/ meltfptr[1724]; /*_.INSTALL_METHOD__V2192*/ meltfptr[2189] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_SETQ__V85*/ meltfptr[84]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2192*/ meltfptr[2189] = 0; } MELT_LOCATION ("warmelt-normal.melt:3347:/ initchunk"); /*^block */ /*anyblock */ { MELT_LOCATION ("warmelt-normal.melt:3348:/ quasiblock"); /*^newclosure */ /*newclosure *//*_.LAMBDA___V2194*/ meltfptr[2189] = (melt_ptr_t) meltgc_new_closure ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))), (meltroutine_ptr_t) ( /*_.VALROUT___V1728*/ meltfptr[1727]), (0)); ; /*_.LAMBDA___V2193*/ meltfptr[2183] = /*_.LAMBDA___V2194*/ meltfptr[2189];; MELT_LOCATION ("warmelt-normal.melt:3347:/ checksignal"); 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___V1491*/ meltfptr[1490]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.LAMBDA___V2193*/ meltfptr[2183]; /*_.INSTALL_METHOD__V2195*/ meltfptr[2194] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.VALDATA___V520*/ meltfptr[519]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.LAMBDA___V2193*/ meltfptr[2183] = 0; /*^clear */ /*clear *//*_.INSTALL_METHOD__V2195*/ meltfptr[2194] = 0; } MELT_LOCATION ("warmelt-normal.melt:3465:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1735*/ meltfptr[1734]; /*_.INSTALL_METHOD__V2196*/ meltfptr[2183] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_INSTANCE__V86*/ meltfptr[85]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2196*/ meltfptr[2183] = 0; } MELT_LOCATION ("warmelt-normal.melt:3466:/ initchunk"); /*^block */ /*anyblock */ { MELT_LOCATION ("warmelt-normal.melt:3467:/ quasiblock"); /*^newclosure */ /*newclosure *//*_.LAMBDA___V2198*/ meltfptr[2183] = (melt_ptr_t) meltgc_new_closure ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))), (meltroutine_ptr_t) ( /*_.VALROUT___V1738*/ meltfptr[1737]), (0)); ; /*_.LAMBDA___V2197*/ meltfptr[2194] = /*_.LAMBDA___V2198*/ meltfptr[2183];; MELT_LOCATION ("warmelt-normal.melt:3466:/ checksignal"); 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___V1491*/ meltfptr[1490]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.LAMBDA___V2197*/ meltfptr[2194]; /*_.INSTALL_METHOD__V2199*/ meltfptr[2198] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_INSTANCE__V86*/ meltfptr[85]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.LAMBDA___V2197*/ meltfptr[2194] = 0; /*^clear */ /*clear *//*_.INSTALL_METHOD__V2199*/ meltfptr[2198] = 0; } MELT_LOCATION ("warmelt-normal.melt:3539:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1744*/ meltfptr[1743]; /*_.INSTALL_METHOD__V2200*/ meltfptr[2194] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_FOREVER__V87*/ meltfptr[86]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2200*/ meltfptr[2194] = 0; } MELT_LOCATION ("warmelt-normal.melt:3584:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1754*/ meltfptr[1753]; /*_.INSTALL_METHOD__V2201*/ meltfptr[2198] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_EXIT__V90*/ meltfptr[89]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2201*/ meltfptr[2198] = 0; } MELT_LOCATION ("warmelt-normal.melt:3615:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1760*/ meltfptr[1759]; /*_.INSTALL_METHOD__V2202*/ meltfptr[2194] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_AGAIN__V91*/ meltfptr[90]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2202*/ meltfptr[2194] = 0; } MELT_LOCATION ("warmelt-normal.melt:3753:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1768*/ meltfptr[1767]; /*_.INSTALL_METHOD__V2203*/ meltfptr[2198] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_IFVARIADIC__V92*/ meltfptr[91]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2203*/ meltfptr[2198] = 0; } MELT_LOCATION ("warmelt-normal.melt:3775:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1774*/ meltfptr[1773]; /*_.INSTALL_METHOD__V2204*/ meltfptr[2194] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_COMPILEWARNING__V94*/ meltfptr[93]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2204*/ meltfptr[2194] = 0; } MELT_LOCATION ("warmelt-normal.melt:3776:/ initchunk"); /*^block */ /*anyblock */ { MELT_LOCATION ("warmelt-normal.melt:3777:/ quasiblock"); /*^newclosure */ /*newclosure *//*_.LAMBDA___V2206*/ meltfptr[2194] = (melt_ptr_t) meltgc_new_closure ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))), (meltroutine_ptr_t) ( /*_.VALROUT___V1777*/ meltfptr[1776]), (0)); ; /*_.LAMBDA___V2205*/ meltfptr[2198] = /*_.LAMBDA___V2206*/ meltfptr[2194];; MELT_LOCATION ("warmelt-normal.melt:3776:/ checksignal"); 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___V1491*/ meltfptr[1490]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.LAMBDA___V2205*/ meltfptr[2198]; /*_.INSTALL_METHOD__V2207*/ meltfptr[2206] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_COMPILEWARNING__V94*/ meltfptr[93]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.LAMBDA___V2205*/ meltfptr[2198] = 0; /*^clear */ /*clear *//*_.INSTALL_METHOD__V2207*/ meltfptr[2206] = 0; } MELT_LOCATION ("warmelt-normal.melt:3969:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1786*/ meltfptr[1785]; /*_.INSTALL_METHOD__V2208*/ meltfptr[2198] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_DEFUN__V95*/ meltfptr[94]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2208*/ meltfptr[2198] = 0; } MELT_LOCATION ("warmelt-normal.melt:4106:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1799*/ meltfptr[1798]; /*_.INSTALL_METHOD__V2209*/ meltfptr[2206] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_LAMBDA__V99*/ meltfptr[98]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2209*/ meltfptr[2206] = 0; } MELT_LOCATION ("warmelt-normal.melt:4225:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1806*/ meltfptr[1805]; /*_.INSTALL_METHOD__V2210*/ meltfptr[2198] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_MULTICALL__V100*/ meltfptr[99]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2210*/ meltfptr[2198] = 0; } MELT_LOCATION ("warmelt-normal.melt:4311:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1816*/ meltfptr[1815]; /*_.INSTALL_METHOD__V2211*/ meltfptr[2206] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_TUPLE__V102*/ meltfptr[101]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2211*/ meltfptr[2206] = 0; } MELT_LOCATION ("warmelt-normal.melt:4452:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1829*/ meltfptr[1828]; /*_.INSTALL_METHOD__V2212*/ meltfptr[2198] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_LIST__V103*/ meltfptr[102]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2212*/ meltfptr[2198] = 0; } MELT_LOCATION ("warmelt-normal.melt:4470:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1824*/ meltfptr[1823]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1844*/ meltfptr[1843]; /*_.INSTALL_METHOD__V2213*/ meltfptr[2206] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.DISCR_ANY_RECEIVER__V25*/ meltfptr[24]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2213*/ meltfptr[2206] = 0; } MELT_LOCATION ("warmelt-normal.melt:4489:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1858*/ meltfptr[1857]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1861*/ meltfptr[1860]; /*_.INSTALL_METHOD__V2214*/ meltfptr[2198] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.DISCR_ANY_RECEIVER__V25*/ meltfptr[24]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2214*/ meltfptr[2198] = 0; } MELT_LOCATION ("warmelt-normal.melt:4504:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1824*/ meltfptr[1823]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1863*/ meltfptr[1862]; /*_.INSTALL_METHOD__V2215*/ meltfptr[2206] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_LAMBDA__V99*/ meltfptr[98]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2215*/ meltfptr[2206] = 0; } MELT_LOCATION ("warmelt-normal.melt:4537:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1858*/ meltfptr[1857]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1865*/ meltfptr[1864]; /*_.INSTALL_METHOD__V2216*/ meltfptr[2198] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_LAMBDA__V99*/ meltfptr[98]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2216*/ meltfptr[2198] = 0; } MELT_LOCATION ("warmelt-normal.melt:4559:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1824*/ meltfptr[1823]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1867*/ meltfptr[1866]; /*_.INSTALL_METHOD__V2217*/ meltfptr[2206] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_TUPLE__V102*/ meltfptr[101]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2217*/ meltfptr[2206] = 0; } MELT_LOCATION ("warmelt-normal.melt:4593:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1858*/ meltfptr[1857]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1871*/ meltfptr[1870]; /*_.INSTALL_METHOD__V2218*/ meltfptr[2198] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_TUPLE__V102*/ meltfptr[101]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2218*/ meltfptr[2198] = 0; } MELT_LOCATION ("warmelt-normal.melt:4635:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1824*/ meltfptr[1823]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1875*/ meltfptr[1874]; /*_.INSTALL_METHOD__V2219*/ meltfptr[2206] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_LIST__V103*/ meltfptr[102]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2219*/ meltfptr[2206] = 0; } MELT_LOCATION ("warmelt-normal.melt:4728:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1858*/ meltfptr[1857]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1877*/ meltfptr[1876]; /*_.INSTALL_METHOD__V2220*/ meltfptr[2198] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_LIST__V103*/ meltfptr[102]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2220*/ meltfptr[2198] = 0; } MELT_LOCATION ("warmelt-normal.melt:4755:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1824*/ meltfptr[1823]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1879*/ meltfptr[1878]; /*_.INSTALL_METHOD__V2221*/ meltfptr[2206] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_INSTANCE__V86*/ meltfptr[85]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2221*/ meltfptr[2206] = 0; } MELT_LOCATION ("warmelt-normal.melt:4823:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1858*/ meltfptr[1857]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1882*/ meltfptr[1881]; /*_.INSTALL_METHOD__V2222*/ meltfptr[2198] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_INSTANCE__V86*/ meltfptr[85]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2222*/ meltfptr[2198] = 0; } MELT_LOCATION ("warmelt-normal.melt:5018:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1886*/ meltfptr[1885]; /*_.INSTALL_METHOD__V2223*/ meltfptr[2206] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_LETREC__V106*/ meltfptr[105]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2223*/ meltfptr[2206] = 0; } MELT_LOCATION ("warmelt-normal.melt:5191:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1900*/ meltfptr[1899]; /*_.INSTALL_METHOD__V2224*/ meltfptr[2198] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_QUOTE__V110*/ meltfptr[109]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2224*/ meltfptr[2198] = 0; } MELT_LOCATION ("warmelt-normal.melt:5225:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1906*/ meltfptr[1905]; /*_.INSTALL_METHOD__V2225*/ meltfptr[2206] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_COMMENT__V111*/ meltfptr[110]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2225*/ meltfptr[2206] = 0; } MELT_LOCATION ("warmelt-normal.melt:5256:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1910*/ meltfptr[1909]; /*_.INSTALL_METHOD__V2226*/ meltfptr[2198] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_KEYWORD__V109*/ meltfptr[108]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2226*/ meltfptr[2198] = 0; } MELT_LOCATION ("warmelt-normal.melt:5385:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1923*/ meltfptr[1922]; /*_.INSTALL_METHOD__V2227*/ meltfptr[2206] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_DEFPRIMITIVE__V114*/ meltfptr[113]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2227*/ meltfptr[2206] = 0; } MELT_LOCATION ("warmelt-normal.melt:5491:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1935*/ meltfptr[1934]; /*_.INSTALL_METHOD__V2228*/ meltfptr[2198] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_DEFCITERATOR__V119*/ meltfptr[118]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2228*/ meltfptr[2198] = 0; } MELT_LOCATION ("warmelt-normal.melt:5704:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1958*/ meltfptr[1957]; /*_.INSTALL_METHOD__V2229*/ meltfptr[2206] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_CITERATION__V127*/ meltfptr[126]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2229*/ meltfptr[2206] = 0; } MELT_LOCATION ("warmelt-normal.melt:5846:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1964*/ meltfptr[1963]; /*_.INSTALL_METHOD__V2230*/ meltfptr[2198] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_DEFCMATCHER__V129*/ meltfptr[128]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2230*/ meltfptr[2198] = 0; } MELT_LOCATION ("warmelt-normal.melt:5967:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1984*/ meltfptr[1983]; /*_.INSTALL_METHOD__V2231*/ meltfptr[2206] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_DEFUNMATCHER__V138*/ meltfptr[137]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2231*/ meltfptr[2206] = 0; } MELT_LOCATION ("warmelt-normal.melt:6144:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1998*/ meltfptr[1997]; /*_.INSTALL_METHOD__V2232*/ meltfptr[2198] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_DEFCLASS__V143*/ meltfptr[142]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2232*/ meltfptr[2198] = 0; } MELT_LOCATION ("warmelt-normal.melt:6247:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V2013*/ meltfptr[2012]; /*_.INSTALL_METHOD__V2233*/ meltfptr[2206] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_DEFINSTANCE__V151*/ meltfptr[150]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2233*/ meltfptr[2206] = 0; } MELT_LOCATION ("warmelt-normal.melt:6336:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V2020*/ meltfptr[2019]; /*_.INSTALL_METHOD__V2234*/ meltfptr[2198] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_DEFINE__V153*/ meltfptr[152]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2234*/ meltfptr[2198] = 0; } MELT_LOCATION ("warmelt-normal.melt:6449:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V2025*/ meltfptr[2024]; /*_.INSTALL_METHOD__V2235*/ meltfptr[2206] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_DEFSELECTOR__V67*/ meltfptr[66]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2235*/ meltfptr[2206] = 0; } MELT_LOCATION ("warmelt-normal.melt:6594:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V2041*/ meltfptr[2040]; /*_.INSTALL_METHOD__V2236*/ meltfptr[2198] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_EXPORT_VALUES__V157*/ meltfptr[156]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2236*/ meltfptr[2198] = 0; } MELT_LOCATION ("warmelt-normal.melt:6634:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V2045*/ meltfptr[2044]; /*_.INSTALL_METHOD__V2237*/ meltfptr[2206] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_EXPORT_SYNONYM__V158*/ meltfptr[157]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2237*/ meltfptr[2206] = 0; } MELT_LOCATION ("warmelt-normal.melt:6711:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V2051*/ meltfptr[2050]; /*_.INSTALL_METHOD__V2238*/ meltfptr[2198] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_EXPORT_CLASS__V159*/ meltfptr[158]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2238*/ meltfptr[2198] = 0; } MELT_LOCATION ("warmelt-normal.melt:6855:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V2071*/ meltfptr[2070]; /*_.INSTALL_METHOD__V2239*/ meltfptr[2206] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_EXPORT_MACRO__V162*/ meltfptr[161]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2239*/ meltfptr[2206] = 0; } MELT_LOCATION ("warmelt-normal.melt:6949:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V2079*/ meltfptr[2078]; /*_.INSTALL_METHOD__V2240*/ meltfptr[2198] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_EXPORT_PATMACRO__V163*/ meltfptr[162]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2240*/ meltfptr[2198] = 0; } MELT_LOCATION ("warmelt-normal.melt:6981:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V2083*/ meltfptr[2082]; /*_.INSTALL_METHOD__V2241*/ meltfptr[2206] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V156*/ meltfptr[155]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2241*/ meltfptr[2206] = 0; } MELT_LOCATION ("warmelt-normal.melt:7007:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V2085*/ meltfptr[2084]; /*_.INSTALL_METHOD__V2242*/ meltfptr[2198] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_PARENT_MODULE_ENVIRONMENT__V164*/ meltfptr[163]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2242*/ meltfptr[2198] = 0; } MELT_LOCATION ("warmelt-normal.melt:7123:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V2093*/ meltfptr[2092]; /*_.INSTALL_METHOD__V2243*/ meltfptr[2206] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V165*/ meltfptr[164]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2243*/ meltfptr[2206] = 0; } MELT_LOCATION ("warmelt-normal.melt:7168:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V2102*/ meltfptr[2101]; /*_.INSTALL_METHOD__V2244*/ meltfptr[2198] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_FETCH_PREDEFINED__V166*/ meltfptr[165]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2244*/ meltfptr[2198] = 0; } MELT_LOCATION ("warmelt-normal.melt:7231:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V2109*/ meltfptr[2108]; /*_.INSTALL_METHOD__V2245*/ meltfptr[2206] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_STORE_PREDEFINED__V169*/ meltfptr[168]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2245*/ meltfptr[2206] = 0; } MELT_LOCATION ("warmelt-normal.melt:7253:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V2113*/ meltfptr[2112]; /*_.INSTALL_METHOD__V2246*/ meltfptr[2198] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_CHEADER__V170*/ meltfptr[169]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2246*/ meltfptr[2198] = 0; } MELT_LOCATION ("warmelt-normal.melt:7294:/ initchunk"); /*^block */ /*anyblock */ { /*^checksignal */ 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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V2117*/ meltfptr[2116]; /*_.INSTALL_METHOD__V2247*/ meltfptr[2206] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_SOURCE_USE_PACKAGE_FROM_PKG_CONFIG__V171*/ meltfptr[170]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2247*/ meltfptr[2206] = 0; } MELT_LOCATION ("warmelt-normal.melt:7300:/ 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___V2248*/ meltfptr[2198] = slot; }; ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1525*/ meltfptr[1524]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CHECK_CTYPE_NARGS */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2248*/ meltfptr[2198]), (melt_ptr_t) ( /*_.VALDATA___V2120*/ meltfptr[2119]), (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___V1495*/ meltfptr[1494]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : COMPILE_OBJ */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2248*/ meltfptr[2198]), (melt_ptr_t) ( /*_.VALDATA___V1493*/ meltfptr[1492]), (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 *) & /*_.VALCLO___V1449*/ meltfptr[1448]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CREATE_NORMCONTEXT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2248*/ meltfptr[2198]), (melt_ptr_t) ( /*_.VALDATA___V2122*/ meltfptr[2121]), (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 *) & /*_.VALCLO___V1453*/ meltfptr[1452]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CREATE_NORMAL_EXTENDING_CONTEXT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2248*/ meltfptr[2198]), (melt_ptr_t) ( /*_.VALDATA___V2124*/ meltfptr[2123]), (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___V1491*/ meltfptr[1490]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : GET_CTYPE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2248*/ meltfptr[2198]), (melt_ptr_t) ( /*_.VALDATA___V1489*/ meltfptr[1488]), (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___V1469*/ meltfptr[1468]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NORMAL_EXP */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2248*/ meltfptr[2198]), (melt_ptr_t) ( /*_.VALDATA___V1454*/ meltfptr[1453]), (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___V1858*/ meltfptr[1857]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NORMAL_LETREC_CONSTRUCTIVE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2248*/ meltfptr[2198]), (melt_ptr_t) ( /*_.VALDATA___V1845*/ meltfptr[1844]), (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 *) & /*_.VALCLO___V1563*/ meltfptr[1562]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NORMAL_PREDEF */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2248*/ meltfptr[2198]), (melt_ptr_t) ( /*_.VALDATA___V2126*/ meltfptr[2125]), (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___V1538*/ meltfptr[1537]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NORMALIZE_BINDING */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2248*/ meltfptr[2198]), (melt_ptr_t) ( /*_.VALDATA___V1528*/ meltfptr[1527]), (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 *) & /*_.VALCLO___V1508*/ meltfptr[1507]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : NORMALIZE_TUPLE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2248*/ meltfptr[2198]), (melt_ptr_t) ( /*_.VALDATA___V2128*/ meltfptr[2127]), (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___V1824*/ meltfptr[1823]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : PREPARE_CONSTRUCTOR_BINDING */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2248*/ meltfptr[2198]), (melt_ptr_t) ( /*_.VALDATA___V1832*/ meltfptr[1831]), (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 *) & /*_.VALCLO___V1443*/ meltfptr[1442]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : REGISTER_LITERAL_VALUE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2248*/ meltfptr[2198]), (melt_ptr_t) ( /*_.VALDATA___V2130*/ meltfptr[2129]), (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 *) & /*_.VALCLO___V1515*/ meltfptr[1514]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : WRAP_NORMAL_LET1 */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2248*/ meltfptr[2198]), (melt_ptr_t) ( /*_.VALDATA___V2132*/ meltfptr[2131]), (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 *) & /*_.VALCLO___V1522*/ meltfptr[1521]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : WRAP_NORMAL_LETSEQ */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2248*/ meltfptr[2198]), (melt_ptr_t) ( /*_.VALDATA___V2134*/ meltfptr[2133]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.VALUEXPORTER___V2248*/ meltfptr[2198] = 0; } MELT_LOCATION ("warmelt-normal.melt:7318:/ 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___V2249*/ meltfptr[2206] = slot; }; ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V888*/ meltfptr[887]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_DATA */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2249*/ meltfptr[2206]), (melt_ptr_t) ( /*_.VALDATA___V2136*/ meltfptr[2135]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.VALUEXPORTER___V2249*/ meltfptr[2206] = 0; } MELT_LOCATION ("warmelt-normal.melt:7319:/ 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___V2250*/ meltfptr[2198] = slot; }; ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V472*/ meltfptr[471]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_NREP_CHECKINTERRUPT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2250*/ meltfptr[2198]), (melt_ptr_t) ( /*_.VALDATA___V2138*/ meltfptr[2137]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.VALUEXPORTER___V2250*/ meltfptr[2198] = 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_NREP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V172*/ meltfptr[171])); /*internsym:CLASS_ROOT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173])); /*internsym:NREP_LOC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V182*/ meltfptr[181])); /*internsym:CLASS_NREP_SIMPLE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183])); /*internsym:CLASS_NREP_EXPRESSION */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189])); /*internsym:CLASS_NREP_TYPED_EXPRESSION */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V196*/ meltfptr[195])); /*internsym:NEXPR_CTYP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V204*/ meltfptr[203])); /*internsym:CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V206*/ meltfptr[205])); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_45 */ void meltmod__warmelt_normal__initialmeltchunk_46 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*internsym:NEXPR_ARGS*/ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V214*/ meltfptr[213])); /*internsym:CLASS_NREP_APPLY */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V216*/ meltfptr[215])); /*internsym:NAPP_FUN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V224*/ meltfptr[223])); /*internsym:CLASS_NREP_MULTIAPPLY */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V226*/ meltfptr[225])); /*internsym:NMULAPP_BINDINGS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V236*/ meltfptr[235])); /*internsym:NMULAPP_BODY */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V238*/ meltfptr[237])); /*internsym:CLASS_NREP_MSEND */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V240*/ meltfptr[239])); /*internsym:NSEND_SEL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V250*/ meltfptr[249])); /*internsym:NSEND_RECV */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V252*/ meltfptr[251])); /*internsym:CLASS_NREP_MULTIMSEND */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V254*/ meltfptr[253])); /*internsym:NMULSEND_BINDINGS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V264*/ meltfptr[263])); /*internsym:NMULSEND_BODY */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265])); /*internsym:CLASS_NREP_CHUNK */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V268*/ meltfptr[267])); /*internsym:NCHUNK_EXPANSION */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V278*/ meltfptr[277])); /*internsym:NCHUNK_OPER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V280*/ meltfptr[279])); /*internsym:CLASS_NREP_COMMENT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V282*/ meltfptr[281])); /*internsym:NCOMM_STRING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V290*/ meltfptr[289])); /*internsym:CLASS_NREP_LET */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V292*/ meltfptr[291])); /*internsym:NLET_BINDINGS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V302*/ meltfptr[301])); /*internsym:NLET_BODY */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V304*/ meltfptr[303])); /*internsym:CLASS_NREP_LETREC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V306*/ meltfptr[305])); /*internsym:NLETREC_FILL_BINDINGS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V318*/ meltfptr[317])); /*internsym:NLETREC_BODY_BINDINGS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V320*/ meltfptr[319])); /*internsym:NLETREC_LOCSYMS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V322*/ meltfptr[321])); /*internsym:CLASS_NREP_RETURN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V324*/ meltfptr[323])); /*internsym:NRET_MAIN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V334*/ meltfptr[333])); /*internsym:NRET_REST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V336*/ meltfptr[335])); /*internsym:CLASS_NREP_IFCOMMON */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V338*/ meltfptr[337])); /*internsym:NIF_THEN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V348*/ meltfptr[347])); /*internsym:NIF_ELSE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349])); /*internsym:CLASS_NREP_IFTESTVALUE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V352*/ meltfptr[351])); /*internsym:NIF_TESTVAL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V360*/ meltfptr[359])); /*internsym:CLASS_NREP_IFISA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V362*/ meltfptr[361])); /*internsym:NIFA_CLASS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V370*/ meltfptr[369])); /*internsym:CLASS_NREP_IFTUPLESIZED */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V372*/ meltfptr[371])); /*internsym:NIF_TUPSIZ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V380*/ meltfptr[379])); /*internsym:CLASS_NREP_IFVARIADIC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V382*/ meltfptr[381])); /*internsym:NIFV_VARIADIC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V392*/ meltfptr[391])); /*internsym:NIFV_CTYPES */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V394*/ meltfptr[393])); /*internsym:CLASS_NREP_CONSUME_VARIADIC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V396*/ meltfptr[395])); /*internsym:NCONSVA_VARIADIC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V406*/ meltfptr[405])); /*internsym:NCONSVA_CTYPES */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V408*/ meltfptr[407])); /*internsym:CLASS_NREP_IFSAME */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V410*/ meltfptr[409])); /*internsym:NIFS_LEFT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V420*/ meltfptr[419])); /*internsym:NIFS_RIGHT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V422*/ meltfptr[421])); /*internsym:CLASS_NREP_IF */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V424*/ meltfptr[423])); /*internsym:NIF_TEST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V432*/ meltfptr[431])); /*internsym:CLASS_NREP_CPPIF */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V434*/ meltfptr[433])); /*internsym:NIFP_COND */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V448*/ meltfptr[447])); /*internsym:NIFP_THEN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V450*/ meltfptr[449])); /*internsym:NIFP_ELSE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V452*/ meltfptr[451])); /*internsym:NIFP_CTYP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V454*/ meltfptr[453])); /*internsym:CLASS_NREP_PROGN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V456*/ meltfptr[455])); /*internsym:NPROGN_SEQ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V466*/ meltfptr[465])); /*internsym:NPROGN_LAST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V468*/ meltfptr[467])); /*internsym:CLASS_NREP_CHECKSIGNAL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V470*/ meltfptr[469])); /*internsym:CLASS_NREP_UNSAFE_GET_FIELD */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V476*/ meltfptr[475])); /*internsym:NUGET_OBJ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V486*/ meltfptr[485])); /*internsym:NUGET_FIELD */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V488*/ meltfptr[487])); /*internsym:CLASS_NREP_UNSAFE_PUT_FIELDS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V490*/ meltfptr[489])); /*internsym:NUPUT_OBJ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V500*/ meltfptr[499])); /*internsym:NUPUT_FIELDS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V502*/ meltfptr[501])); /*internsym:CLASS_NREP_UNSAFE_NTH_COMPONENT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V504*/ meltfptr[503])); /*internsym:NUNTH_TUPLE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V514*/ meltfptr[513])); /*internsym:NUNTH_INDEX */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V516*/ meltfptr[515])); /*internsym:CLASS_NREP_SETQ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V518*/ meltfptr[517])); /*internsym:NSTQ_VAR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V528*/ meltfptr[527])); /*internsym:NSTQ_EXP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V530*/ meltfptr[529])); /*internsym:CLASS_NREP_FOREVER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V532*/ meltfptr[531])); /*internsym:NFOREVER_BIND */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V544*/ meltfptr[543])); /*internsym:NFOREVER_BODY */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V546*/ meltfptr[545])); /*internsym:NFOREVER_RESULT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V548*/ meltfptr[547])); /*internsym:CLASS_NREP_EXIT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V550*/ meltfptr[549])); /*internsym:NEXIT_BIND */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V560*/ meltfptr[559])); /*internsym:NEXIT_VAL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V562*/ meltfptr[561])); /*internsym:CLASS_NREP_AGAIN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V564*/ meltfptr[563])); /*internsym:NAGAIN_BIND */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V572*/ meltfptr[571])); /*internsym:CLASS_NREP_FIELDASSIGN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V574*/ meltfptr[573])); /*internsym:NFLA_FIELD */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V584*/ meltfptr[583])); /*internsym:NFLA_VAL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V586*/ meltfptr[585])); /*internsym:CLASS_NREP_INSTANCE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V588*/ meltfptr[587])); /*internsym:NMINS_CLASS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V600*/ meltfptr[599])); /*internsym:NMINS_CLADATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V602*/ meltfptr[601])); /*internsym:NMINS_FIELDS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V604*/ meltfptr[603])); /*internsym:CLASS_NREP_VARIADIC_ARGUMENT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V606*/ meltfptr[605])); /*internsym:NVARG_VARIADIC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V618*/ meltfptr[617])); /*internsym:NVARG_CTYP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V620*/ meltfptr[619])); /*internsym:NVARG_OFFSET */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V622*/ meltfptr[621])); /*internsym:CLASS_NREP_LAMBDA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V624*/ meltfptr[623])); /*internsym:NLAMBDA_PROC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V636*/ meltfptr[635])); /*internsym:NLAMBDA_CONSTROUT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V638*/ meltfptr[637])); /*internsym:NLAMBDA_CLOSEDV */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V640*/ meltfptr[639])); /*internsym:CLASS_NREP_CITERATION */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V642*/ meltfptr[641])); /*internsym:NCITER_CITERATOR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V662*/ meltfptr[661])); /*internsym:NCITER_CHUNKBEFORE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V664*/ meltfptr[663])); /*internsym:NCITER_CHUNKAFTER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V666*/ meltfptr[665])); /*internsym:NCITER_BODY */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V668*/ meltfptr[667])); /*internsym:NCITER_STATOCC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V670*/ meltfptr[669])); /*internsym:NCITER_LOCBINDINGS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V672*/ meltfptr[671])); /*internsym:NCITER_BODBINDINGS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V674*/ meltfptr[673])); /*internsym:CLASS_NREP_TESTS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V676*/ meltfptr[675])); /*internsym:NTESTS_TESTSEQ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V684*/ meltfptr[683])); /*internsym:CLASS_NORMAL_CONSTRUCTOR_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685])); /*internsym:CLASS_ANY_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V688*/ meltfptr[687])); /*internsym:NCONSB_LOC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V700*/ meltfptr[699])); /*internsym:NCONSB_DISCR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V702*/ meltfptr[701])); /*internsym:NCONSB_NLETREC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V704*/ meltfptr[703])); /*internsym:CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V706*/ meltfptr[705])); /*internsym:NTUPB_COMP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V714*/ meltfptr[713])); /*internsym:CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V716*/ meltfptr[715])); /*internsym:NPAIRB_HEAD */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V726*/ meltfptr[725])); /*internsym:NPAIRB_TAIL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V728*/ meltfptr[727])); /*internsym:CLASS_NORMAL_CONSTRUCTED_LIST_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V730*/ meltfptr[729])); /*internsym:NLISTB_FIRST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V742*/ meltfptr[741])); /*internsym:NLISTB_LAST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V744*/ meltfptr[743])); /*internsym:NLISTB_PAIRSB */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V746*/ meltfptr[745])); /*internsym:CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V748*/ meltfptr[747])); /*internsym:NLAMBDAB_NCLOSED */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V760*/ meltfptr[759])); /*internsym:NLAMBDAB_CONSTROUT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V762*/ meltfptr[761])); /*internsym:NLAMBDAB_DATAROUT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V764*/ meltfptr[763])); /*internsym:CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V766*/ meltfptr[765])); /*internsym:NINSTB_SLOTS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V776*/ meltfptr[775])); /*internsym:NINSTB_CLABIND */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V778*/ meltfptr[777])); /*internsym:CLASS_NREP_ANYPROC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V780*/ meltfptr[779])); /*internsym:NPROC_BODY */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V788*/ meltfptr[787])); /*internsym:CLASS_NREP_INITPROC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V790*/ meltfptr[789])); /*internsym:NINIT_TOPL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V800*/ meltfptr[799])); /*internsym:NINIT_DEFBINDS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V802*/ meltfptr[801])); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_46 */ void meltmod__warmelt_normal__initialmeltchunk_47 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*internsym:CLASS_NREP_INITEXTENDPROC*/ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V804*/ meltfptr[803])); /*internsym:NINITEXTEND_MODENV */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V812*/ meltfptr[811])); /*internsym:CLASS_NREP_ROUTPROC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V814*/ meltfptr[813])); /*internsym:NRPRO_NAME */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V836*/ meltfptr[835])); /*internsym:NRPRO_ARGB */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V838*/ meltfptr[837])); /*internsym:NRPRO_CLOSEDB */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V840*/ meltfptr[839])); /*internsym:NRPRO_CONST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V842*/ meltfptr[841])); /*internsym:NRPRO_DATAROUT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V844*/ meltfptr[843])); /*internsym:NRPRO_DATACLOS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V846*/ meltfptr[845])); /*internsym:NRPRO_THUNKLIST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V848*/ meltfptr[847])); /*internsym:NRPRO_VARIADIC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V850*/ meltfptr[849])); /*internsym:CLASS_NREP_LAMBDAROUTPROC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V852*/ meltfptr[851])); /*internsym:CLASS_NREP_DEFUNROUTPROC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V858*/ meltfptr[857])); /*internsym:CLASS_NREP_PREDEF */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V864*/ meltfptr[863])); /*internsym:NRPREDEF */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V872*/ meltfptr[871])); /*internsym:CLASS_NREP_NIL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V874*/ meltfptr[873])); /*internsym:CLASS_NREP_QUASIDATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V880*/ meltfptr[879])); /*internsym:CLASS_NREP_BOUND_DATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V886*/ meltfptr[885])); /*internsym:NDATA_NAME */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V898*/ meltfptr[897])); /*internsym:NDATA_RANK */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V900*/ meltfptr[899])); /*internsym:NDATA_LOCBIND */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V902*/ meltfptr[901])); /*internsym:CLASS_NREP_DISCRIMINATED_DATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V904*/ meltfptr[903])); /*internsym:NDATA_DISCRX */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V912*/ meltfptr[911])); /*internsym:CLASS_NREP_DATAINSTANCE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V914*/ meltfptr[913])); /*internsym:NINST_OBJNUM */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V928*/ meltfptr[927])); /*internsym:NINST_PREDEF */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V930*/ meltfptr[929])); /*internsym:NINST_HASH */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V932*/ meltfptr[931])); /*internsym:NINST_SLOTS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V934*/ meltfptr[933])); /*internsym:CLASS_NREP_DATASTRING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V936*/ meltfptr[935])); /*internsym:NSTR_STRING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V944*/ meltfptr[943])); /*internsym:CLASS_NREP_DATABOXEDINTEGER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V946*/ meltfptr[945])); /*internsym:NBOXINT_NUM */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V954*/ meltfptr[953])); /*internsym:CLASS_NREP_DATATUPLE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V956*/ meltfptr[955])); /*internsym:NTUP_COMP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V964*/ meltfptr[963])); /*internsym:CLASS_NREP_DATASYMBOL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V966*/ meltfptr[965])); /*internsym:NDSY_NAMESTR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V974*/ meltfptr[973])); /*internsym:CLASS_NREP_DATAKEYWORD */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V976*/ meltfptr[975])); /*internsym:CLASS_NREP_DATAROUTINE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V982*/ meltfptr[981])); /*internsym:NDROU_PROC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V990*/ meltfptr[989])); /*internsym:CLASS_NREP_DATACLOSURE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V992*/ meltfptr[991])); /*internsym:NDCLO_PROC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1002*/ meltfptr[1001])); /*internsym:NDCLO_CLOSV */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1004*/ meltfptr[1003])); /*internsym:CLASS_NREP_IMPORTEDVAL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1006*/ meltfptr[1005])); /*internsym:NIMPORT_SYMB */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1016*/ meltfptr[1015])); /*internsym:NIMPORT_SYDATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1018*/ meltfptr[1017])); /*internsym:CLASS_NREP_LITERALVALUE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1020*/ meltfptr[1019])); /*internsym:NLITVAL_REGVAL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1028*/ meltfptr[1027])); /*internsym:CLASS_NREP_LITERALNAMEDVALUE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1030*/ meltfptr[1029])); /*internsym:NLITVAL_SYMBOL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1038*/ meltfptr[1037])); /*internsym:CLASS_NREP_SYMOCC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1040*/ meltfptr[1039])); /*internsym:NOCC_SYMB */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1052*/ meltfptr[1051])); /*internsym:NOCC_CTYP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1054*/ meltfptr[1053])); /*internsym:NOCC_BIND */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1056*/ meltfptr[1055])); /*internsym:CLASS_NREP_LOCSYMOCC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1058*/ meltfptr[1057])); /*internsym:CLASS_NREP_CLOSEDOCC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1064*/ meltfptr[1063])); /*internsym:NCLOC_PROCS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1072*/ meltfptr[1071])); /*internsym:CLASS_NREP_CONSTOCC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1074*/ meltfptr[1073])); /*internsym:CLASS_NREP_QUASICONSTANT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1080*/ meltfptr[1079])); /*internsym:NCONST_SVAL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1092*/ meltfptr[1091])); /*internsym:NCONST_PROC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1094*/ meltfptr[1093])); /*internsym:NCONST_DATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1096*/ meltfptr[1095])); /*internsym:CLASS_NREP_CONSTANT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1098*/ meltfptr[1097])); /*internsym:CLASS_NREP_DEFINED_CONSTANT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1104*/ meltfptr[1103])); /*internsym:NCONST_DEFBIND */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1112*/ meltfptr[1111])); /*internsym:CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1114*/ meltfptr[1113])); /*internsym:NQCMEC_COMMENT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1122*/ meltfptr[1121])); /*internsym:CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1124*/ meltfptr[1123])); /*internsym:CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1130*/ meltfptr[1129])); /*internsym:CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1136*/ meltfptr[1135])); /*internsym:CLASS_NREP_FIELDACC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1142*/ meltfptr[1141])); /*internsym:NACCF_OBJ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1152*/ meltfptr[1151])); /*internsym:NACCF_FLD */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1154*/ meltfptr[1153])); /*internsym:CLASS_NREP_MULTACC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1156*/ meltfptr[1155])); /*internsym:NACCM_MUL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1166*/ meltfptr[1165])); /*internsym:NACCM_IX */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1168*/ meltfptr[1167])); /*internsym:CLASS_NREP_STORE_PREDEFINED */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1170*/ meltfptr[1169])); /*internsym:NSTPD_PREDEF */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1180*/ meltfptr[1179])); /*internsym:NSTPD_VALUE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1182*/ meltfptr[1181])); /*internsym:CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1184*/ meltfptr[1183])); /*internsym:NUCMEB_EXPR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1194*/ meltfptr[1193])); /*internsym:NCUMEB_COMMENT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1196*/ meltfptr[1195])); /*internsym:CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1198*/ meltfptr[1197])); /*internsym:NCHRUMOD_COMMENT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1206*/ meltfptr[1205])); /*internsym:HAS_EXTRA_WARNINGS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1208*/ meltfptr[1207])); /*internsym:CLASS_NORMALIZATION_CONTEXT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1217*/ meltfptr[1216])); /*internsym:DISCR_INTEGER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1219*/ meltfptr[1218])); /*internsym:CLASS_ALARM_HANDLER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1222*/ meltfptr[1221])); /*internsym:CLASS_CHILD_PROCESS_HANDLER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1224*/ meltfptr[1223])); /*internsym:CLASS_CITERATOR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1226*/ meltfptr[1225])); /*internsym:CLASS_CLASS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1228*/ meltfptr[1227])); /*internsym:CLASS_CMATCHER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1230*/ meltfptr[1229])); /*internsym:CLASS_CTYPE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1232*/ meltfptr[1231])); /*internsym:CLASS_CTYPE_GTY */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1234*/ meltfptr[1233])); /*internsym:CLASS_CTYPE_PLAIN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1236*/ meltfptr[1235])); /*internsym:CLASS_DISCRIMINANT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1238*/ meltfptr[1237])); /*internsym:CLASS_ENVIRONMENT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1240*/ meltfptr[1239])); /*internsym:CLASS_FIELD */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1242*/ meltfptr[1241])); /*internsym:CLASS_FORMAL_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1244*/ meltfptr[1243])); /*internsym:CLASS_FUNMATCHER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1246*/ meltfptr[1245])); /*internsym:CLASS_GCC_GIMPLE_PASS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1248*/ meltfptr[1247])); /*internsym:CLASS_GCC_PASS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1250*/ meltfptr[1249])); /*internsym:CLASS_GCC_PRAGMA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1252*/ meltfptr[1251])); /*internsym:CLASS_GCC_RTL_PASS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1254*/ meltfptr[1253])); /*internsym:CLASS_GCC_SIMPLE_IPA_PASS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1256*/ meltfptr[1255])); /*internsym:CLASS_GCC_TRANSFORM_IPA_PASS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1258*/ meltfptr[1257])); /*internsym:CLASS_INPUT_CHANNEL_HANDLER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1260*/ meltfptr[1259])); /*internsym:CLASS_KEYWORD */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1262*/ meltfptr[1261])); /*internsym:CLASS_LOCATED */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1264*/ meltfptr[1263])); /*internsym:CLASS_MELT_MODE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1266*/ meltfptr[1265])); /*internsym:CLASS_NAMED */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1268*/ meltfptr[1267])); /*internsym:CLASS_PRIMITIVE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1270*/ meltfptr[1269])); /*internsym:CLASS_PROPED */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1272*/ meltfptr[1271])); /*internsym:CLASS_REFERENCE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1274*/ meltfptr[1273])); /*internsym:CLASS_SELECTOR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1276*/ meltfptr[1275])); /*internsym:CLASS_SEXPR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1278*/ meltfptr[1277])); /*internsym:CLASS_SEXPR_MACROSTRING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1280*/ meltfptr[1279])); /*internsym:CLASS_SYMBOL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1282*/ meltfptr[1281])); /*internsym:CLASS_SYSTEM_DATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1284*/ meltfptr[1283])); /*internsym:CTYPE_BASIC_BLOCK */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1286*/ meltfptr[1285])); /*internsym:CTYPE_BITMAP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1288*/ meltfptr[1287])); /*internsym:CTYPE_CSTRING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1290*/ meltfptr[1289])); /*internsym:CTYPE_EDGE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1292*/ meltfptr[1291])); /*internsym:CTYPE_GIMPLE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1294*/ meltfptr[1293])); /*internsym:CTYPE_GIMPLE_SEQ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1296*/ meltfptr[1295])); /*internsym:CTYPE_LONG */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1298*/ meltfptr[1297])); /*internsym:CTYPE_LOOP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1300*/ meltfptr[1299])); /*internsym:CTYPE_PPL_COEFFICIENT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1302*/ meltfptr[1301])); /*internsym:CTYPE_PPL_CONSTRAINT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1304*/ meltfptr[1303])); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_47 */ void meltmod__warmelt_normal__initialmeltchunk_48 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*internsym:CTYPE_PPL_CONSTRAINT_SYSTEM*/ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1306*/ meltfptr[1305])); /*internsym:CTYPE_PPL_GENERATOR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1308*/ meltfptr[1307])); /*internsym:CTYPE_PPL_GENERATOR_SYSTEM */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1310*/ meltfptr[1309])); /*internsym:CTYPE_PPL_LINEAR_EXPRESSION */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1312*/ meltfptr[1311])); /*internsym:CTYPE_PPL_POLYHEDRON */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1314*/ meltfptr[1313])); /*internsym:CTYPE_RTVEC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1316*/ meltfptr[1315])); /*internsym:CTYPE_RTX */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1318*/ meltfptr[1317])); /*internsym:CTYPE_TREE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1320*/ meltfptr[1319])); /*internsym:CTYPE_VALUE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1322*/ meltfptr[1321])); /*internsym:CTYPE_VOID */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1324*/ meltfptr[1323])); /*internsym:DISCR_ANY_RECEIVER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1326*/ meltfptr[1325])); /*internsym:DISCR_BASIC_BLOCK */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1328*/ meltfptr[1327])); /*internsym:DISCR_BITMAP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1330*/ meltfptr[1329])); /*internsym:DISCR_BUCKET_LONGS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1332*/ meltfptr[1331])); /*internsym:DISCR_CHARACTER_INTEGER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1334*/ meltfptr[1333])); /*internsym:DISCR_CLASS_SEQUENCE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1336*/ meltfptr[1335])); /*internsym:DISCR_CLOSURE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1338*/ meltfptr[1337])); /*internsym:DISCR_CONSTANT_INTEGER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1340*/ meltfptr[1339])); /*internsym:DISCR_EDGE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1342*/ meltfptr[1341])); /*internsym:DISCR_FIELD_SEQUENCE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1344*/ meltfptr[1343])); /*internsym:DISCR_FILE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1346*/ meltfptr[1345])); /*internsym:DISCR_GIMPLE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1348*/ meltfptr[1347])); /*internsym:DISCR_GIMPLE_SEQ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1350*/ meltfptr[1349])); /*internsym:DISCR_LIST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1352*/ meltfptr[1351])); /*internsym:DISCR_LOOP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1354*/ meltfptr[1353])); /*internsym:DISCR_MAP_BASIC_BLOCKS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1356*/ meltfptr[1355])); /*internsym:DISCR_MAP_BITMAPS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1358*/ meltfptr[1357])); /*internsym:DISCR_MAP_EDGES */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1360*/ meltfptr[1359])); /*internsym:DISCR_MAP_GIMPLES */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1362*/ meltfptr[1361])); /*internsym:DISCR_MAP_GIMPLE_SEQS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1364*/ meltfptr[1363])); /*internsym:DISCR_MAP_LOOPS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1366*/ meltfptr[1365])); /*internsym:DISCR_MAP_OBJECTS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1368*/ meltfptr[1367])); /*internsym:DISCR_MAP_RTVECS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1370*/ meltfptr[1369])); /*internsym:DISCR_MAP_RTXS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1372*/ meltfptr[1371])); /*internsym:DISCR_MAP_STRINGS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1374*/ meltfptr[1373])); /*internsym:DISCR_MAP_TREES */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1376*/ meltfptr[1375])); /*internsym:DISCR_METHOD_MAP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1378*/ meltfptr[1377])); /*internsym:DISCR_MIXED_BIGINT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1380*/ meltfptr[1379])); /*internsym:DISCR_MIXED_INTEGER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1382*/ meltfptr[1381])); /*internsym:DISCR_MIXED_LOCATION */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1384*/ meltfptr[1383])); /*internsym:DISCR_MULTIPLE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1386*/ meltfptr[1385])); /*internsym:DISCR_NAME_STRING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1388*/ meltfptr[1387])); /*internsym:DISCR_NULL_RECEIVER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1390*/ meltfptr[1389])); /*internsym:DISCR_PAIR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1392*/ meltfptr[1391])); /*internsym:DISCR_RAWFILE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1394*/ meltfptr[1393])); /*internsym:DISCR_REAL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1396*/ meltfptr[1395])); /*internsym:DISCR_ROUTINE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1398*/ meltfptr[1397])); /*internsym:DISCR_RTVEC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1400*/ meltfptr[1399])); /*internsym:DISCR_RTX */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1402*/ meltfptr[1401])); /*internsym:DISCR_STRBUF */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1404*/ meltfptr[1403])); /*internsym:DISCR_STRING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1406*/ meltfptr[1405])); /*internsym:DISCR_TREE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1408*/ meltfptr[1407])); /*internsym:DISCR_VERBATIM_STRING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1410*/ meltfptr[1409])); /*internsym:INITIAL_SYSTEM_DATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1412*/ meltfptr[1411])); /*internsym:TRUE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1414*/ meltfptr[1413])); /*internsym:LAST_GLOBPREDEF_INDEX */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1417*/ meltfptr[1416])); /*internsym:CLASS_LITERAL_VALUE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1424*/ meltfptr[1423])); /*internsym:LITV_VALUE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1436*/ meltfptr[1435])); /*internsym:LITV_RANK */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1438*/ meltfptr[1437])); /*internsym:LITV_LOC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1440*/ meltfptr[1439])); /*internsym:MELT_DEBUG_FUN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1444*/ meltfptr[1443])); /*internsym:CLASS_RUNNING_EXTENSION_MODULE_CONTEXT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1446*/ meltfptr[1445])); /*internsym:CLASS_MODULE_CONTEXT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1450*/ meltfptr[1449])); /*internsym:NORMAL_EXP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1454*/ meltfptr[1453])); /*internsym:RECV */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1456*/ meltfptr[1455])); /*internsym:ENV */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1459*/ meltfptr[1458])); /*internsym:NCX */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1462*/ meltfptr[1461])); /*internsym:PSLOC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1465*/ meltfptr[1464])); /*internsym:INSTALL_METHOD */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1473*/ meltfptr[1472])); /*internsym:CLASS_SOURCE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1483*/ meltfptr[1482])); /*internsym:CLASS_SOURCE_LAZY_MACRO_EXPANSION */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1487*/ meltfptr[1486])); /*internsym:GET_CTYPE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1489*/ meltfptr[1488])); /*internsym:COMPILE_OBJ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1493*/ meltfptr[1492])); /*internsym:MULTIPLE_MAP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1509*/ meltfptr[1508])); /*internsym:LIST_EVERY */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1511*/ meltfptr[1510])); /*internsym:CLASS_NORMAL_LET_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1516*/ meltfptr[1515])); /*internsym:LIST_TO_MULTIPLE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1518*/ meltfptr[1517])); /*internsym:MULTIPLE_EVERY */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1526*/ meltfptr[1525])); /*internsym:NORMALIZE_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1528*/ meltfptr[1527])); /*internsym:PROCS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1533*/ meltfptr[1532])); /*internsym:CLASS_LET_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1548*/ meltfptr[1547])); /*internsym:CLASS_FIXED_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1552*/ meltfptr[1551])); /*internsym:CLASS_DEFINED_VALUE_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1556*/ meltfptr[1555])); /*internsym:FIND_ENCLOSING_ENV */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1572*/ meltfptr[1571])); /*internsym:CLASS_VALUE_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1574*/ meltfptr[1573])); /*internsym:FIND_ENV */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1580*/ meltfptr[1579])); /*internsym:CLASS_CLASS_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1582*/ meltfptr[1581])); /*internsym:CLASS_SOURCE_PRIMITIVE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1588*/ meltfptr[1587])); /*internsym:CLONE_SYMBOL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1590*/ meltfptr[1589])); /*internsym:CLASS_SOURCE_CODECHUNK */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1595*/ meltfptr[1594])); /*internsym:CLASS_CLONED_SYMBOL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1597*/ meltfptr[1596])); /*internsym:CLASS_SOURCE_CMATCHEXPR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1603*/ meltfptr[1602])); /*internsym:CLASS_SOURCE_FUNMATCHEXPR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1607*/ meltfptr[1606])); /*internsym:FMATCH_APPLYF */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1609*/ meltfptr[1608])); /*internsym:LIST_APPEND2LIST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1611*/ meltfptr[1610])); /*internsym:CLASS_SOURCE_APPLY */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1617*/ meltfptr[1616])); /*internsym:_FUN_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1614*/ meltfptr[1613])); /*internsym:CLASS_SOURCE_MSEND */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1621*/ meltfptr[1620])); /*internsym:CLASS_SELECTOR_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1623*/ meltfptr[1622])); /*internsym:CLASS_SOURCE_DEFSELECTOR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1625*/ meltfptr[1624])); /*internsym:CLASS_SOURCE_RETURN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1633*/ meltfptr[1632])); /*internsym:RETURN_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1628*/ meltfptr[1627])); /*internsym:_RETINT_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1630*/ meltfptr[1629])); /*internsym:CLASS_SOURCE_IF */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1642*/ meltfptr[1641])); /*internsym:_IF_INTER_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1636*/ meltfptr[1635])); /*internsym:FRESH_ENV */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1644*/ meltfptr[1643])); /*internsym:PUT_ENV */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1646*/ meltfptr[1645])); /*internsym:_IF_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1639*/ meltfptr[1638])); /*internsym:CLASS_SOURCE_IFELSE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1656*/ meltfptr[1655])); /*internsym:_IFELSE_INTER_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1649*/ meltfptr[1648])); /*internsym:_IFELSE_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1653*/ meltfptr[1652])); /*internsym:CLASS_SOURCE_CPPIF */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1664*/ meltfptr[1663])); /*internsym:IFCPP_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1661*/ meltfptr[1660])); /*internsym:CLASS_SOURCE_OR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1672*/ meltfptr[1671])); /*internsym:MULTIPLE_BACKWARD_EVERY */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1674*/ meltfptr[1673])); /*internsym:OR_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1669*/ meltfptr[1668])); /*internsym:CLASS_SOURCE_PROGN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1680*/ meltfptr[1679])); /*internsym:PROGN_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1677*/ meltfptr[1676])); /*internsym:CLASS_SOURCE_LET */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1689*/ meltfptr[1688])); /*internsym:CLASS_SOURCE_LET_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1691*/ meltfptr[1690])); /*internsym:LET_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1686*/ meltfptr[1685])); /*internsym:CLASS_SOURCE_UNSAFE_GET_FIELD */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1696*/ meltfptr[1695])); /*internsym:CLASS_SOURCE_GET_FIELD */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1700*/ meltfptr[1699])); /*internsym:CLASS_SOURCE_UNSAFE_PUT_FIELDS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1709*/ meltfptr[1708])); /*internsym:UNSAFPUT_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1703*/ meltfptr[1702])); /*internsym:UNSAFPUT_INTER_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1705*/ meltfptr[1704])); /*internsym:CLASS_SOURCE_FIELDASSIGN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1711*/ meltfptr[1710])); /*internsym:CLASS_SOURCE_PUT_FIELDS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1720*/ meltfptr[1719])); #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_48 */ void meltmod__warmelt_normal__initialmeltchunk_49 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*internsym:PUTFLD_*/ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1715*/ meltfptr[1714])); /*internsym:PUTFLD_INTER_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1717*/ meltfptr[1716])); /*internsym:CLASS_SOURCE_SETQ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1726*/ meltfptr[1725])); /*internsym:SETQ_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1723*/ meltfptr[1722])); /*internsym:CLASS_SOURCE_INSTANCE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1736*/ meltfptr[1735])); /*internsym:INSTANCE_INTER_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1730*/ meltfptr[1729])); /*internsym:INST_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1733*/ meltfptr[1732])); /*internsym:CLASS_SOURCE_FOREVER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1745*/ meltfptr[1744])); /*internsym:CLASS_LABEL_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1747*/ meltfptr[1746])); /*internsym:FOREVER_INTER_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1740*/ meltfptr[1739])); /*internsym:LABIND_CLONSY */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1749*/ meltfptr[1748])); /*internsym:FOREVER_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1742*/ meltfptr[1741])); /*internsym:CLASS_SOURCE_EXIT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1755*/ meltfptr[1754])); /*internsym:EXIT_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1752*/ meltfptr[1751])); /*internsym:CLASS_SOURCE_AGAIN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1761*/ meltfptr[1760])); /*internsym:AGAIN_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1758*/ meltfptr[1757])); /*internsym:CLASS_SOURCE_IFVARIADIC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1769*/ meltfptr[1768])); /*internsym:DISCR_VARIADIC_FORMAL_SEQUENCE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1771*/ meltfptr[1770])); /*internsym:CONSUMVARIADIC_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1764*/ meltfptr[1763])); /*internsym:IFVARIADIC_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1766*/ meltfptr[1765])); /*internsym:CLASS_SOURCE_COMPILEWARNING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1775*/ meltfptr[1774])); /*internsym:_RETVAL_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1781*/ meltfptr[1780])); /*internsym:CLASS_SOURCE_DEFUN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1787*/ meltfptr[1786])); /*internsym:CLASS_FUNCTION_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1789*/ meltfptr[1788])); /*internsym:CLASS_SOURCE_LAMBDA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1796*/ meltfptr[1795])); /*internsym:LAMBDA_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1792*/ meltfptr[1791])); /*internsym:CLASS_SOURCE_MULTICALL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1807*/ meltfptr[1806])); /*internsym:LIST_ITERATE_TEST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1809*/ meltfptr[1808])); /*internsym:MULTI_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1804*/ meltfptr[1803])); /*internsym:CLASS_SOURCE_TUPLE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1817*/ meltfptr[1816])); /*internsym:TUPLREC_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1812*/ meltfptr[1811])); /*internsym:TUPLE_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1814*/ meltfptr[1813])); /*internsym:CLASS_SOURCE_LIST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1830*/ meltfptr[1829])); /*internsym:LISTREC_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1820*/ meltfptr[1819])); /*internsym:LIST_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1822*/ meltfptr[1821])); /*internsym:PREPARE_CONSTRUCTOR_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1832*/ meltfptr[1831])); /*internsym:SYMB */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1835*/ meltfptr[1834])); /*internsym:SLOC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1839*/ meltfptr[1838])); /*internsym:NORMAL_LETREC_CONSTRUCTIVE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1845*/ meltfptr[1844])); /*internsym:CEXPR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1847*/ meltfptr[1846])); /*internsym:CBIND */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1851*/ meltfptr[1850])); /*internsym:CLASS_SOURCE_ARGUMENTED_OPERATOR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1868*/ meltfptr[1867])); /*internsym:_PAIROFLIST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1873*/ meltfptr[1872])); /*internsym:CLASS_SOURCE_LETREC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1887*/ meltfptr[1886])); /*internsym:CLASS_SOURCE_LETREC_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1889*/ meltfptr[1888])); /*internsym:LETREC_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1884*/ meltfptr[1883])); /*internsym:NAMED_NAME */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1891*/ meltfptr[1890])); /*internsym:CLASS_SOURCE_QUOTE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1901*/ meltfptr[1900])); /*internsym:CLASS_SOURCE_COMMENT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1907*/ meltfptr[1906])); /*internsym:COMMENT_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1904*/ meltfptr[1903])); /*internsym:BINDER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1913*/ meltfptr[1912])); /*internsym:FBIND_TYPE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1915*/ meltfptr[1914])); /*internsym:CLASS_SOURCE_DEFPRIMITIVE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1924*/ meltfptr[1923])); /*internsym:PRIM_FORMALS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1926*/ meltfptr[1925])); /*internsym:PRIM_EXPANSION */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1928*/ meltfptr[1927])); /*internsym:PRIM_TYPE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1930*/ meltfptr[1929])); /*internsym:CLASS_PRIMITIVE_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1932*/ meltfptr[1931])); /*internsym:CLASS_SOURCE_DEFCITERATOR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1936*/ meltfptr[1935])); /*internsym:CITER_START_FORMALS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1938*/ meltfptr[1937])); /*internsym:CITER_STATE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1940*/ meltfptr[1939])); /*internsym:CITER_BODY_FORMALS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1942*/ meltfptr[1941])); /*internsym:CITER_EXPBEFORE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1944*/ meltfptr[1943])); /*internsym:CITER_EXPAFTER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1946*/ meltfptr[1945])); /*internsym:CLASS_CITERATOR_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1948*/ meltfptr[1947])); /*internsym:CLASS_SOURCE_CITERATION */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1959*/ meltfptr[1958])); /*internsym:MULTIPLE_EVERY_BOTH */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1961*/ meltfptr[1960])); /*internsym:CLASS_SOURCE_DEFCMATCHER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1965*/ meltfptr[1964])); /*internsym:CLASS_CMATCHER_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1967*/ meltfptr[1966])); /*internsym:AMATCH_IN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1969*/ meltfptr[1968])); /*internsym:AMATCH_MATCHBIND */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1971*/ meltfptr[1970])); /*internsym:AMATCH_OUT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1973*/ meltfptr[1972])); /*internsym:CMATCH_STATE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1975*/ meltfptr[1974])); /*internsym:CMATCH_EXPTEST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1977*/ meltfptr[1976])); /*internsym:CMATCH_EXPFILL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1979*/ meltfptr[1978])); /*internsym:CMATCH_EXPOPER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1981*/ meltfptr[1980])); /*internsym:CLASS_SOURCE_DEFUNMATCHER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1985*/ meltfptr[1984])); /*internsym:CLASS_SOURCE_DEFINITION_FORMAL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1987*/ meltfptr[1986])); /*internsym:CLASS_FUNMATCHER_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1989*/ meltfptr[1988])); /*internsym:FMATCH_MATCHF */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1991*/ meltfptr[1990])); /*internsym:FMATCH_DATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1993*/ meltfptr[1992])); /*internsym:CLASS_SOURCE_DEFCLASS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1999*/ meltfptr[1998])); /*internsym:MELTOBMAG_OBJECT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1996*/ meltfptr[1995])); /*internsym:CLASS_ANCESTORS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2001*/ meltfptr[2000])); /*internsym:CLASS_FIELDS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2003*/ meltfptr[2002])); /*internsym:CLASS_FIELD_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2005*/ meltfptr[2004])); /*internsym:FLD_OWNCLASS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2007*/ meltfptr[2006])); /*internsym:DISC_SUPER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2009*/ meltfptr[2008])); /*internsym:CLASS_SOURCE_DEFINSTANCE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2014*/ meltfptr[2013])); /*internsym:CLASS_INSTANCE_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2016*/ meltfptr[2015])); /*internsym:CLASS_SOURCE_DEFINE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2021*/ meltfptr[2020])); /*internsym:SDEFSEL_FORMALS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2026*/ meltfptr[2025])); /*internsym:_VALUEXPORTER_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2029*/ meltfptr[2028])); /*internsym:SYSDATA_VALUE_EXPORTER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2032*/ meltfptr[2031])); /*internsym:_EXPORTED_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2035*/ meltfptr[2034])); /*internsym:CLASS_SOURCE_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2038*/ meltfptr[2037])); /*internsym:CLASS_SOURCE_EXPORT_VALUES */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2042*/ meltfptr[2041])); /*internsym:CLASS_SOURCE_EXPORT_SYNONYM */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2046*/ meltfptr[2045])); /*internsym:CLASS_SOURCE_EXPORT_CLASS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2052*/ meltfptr[2051])); /*internsym:_MACROXPORTER_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2055*/ meltfptr[2054])); /*internsym:SYSDATA_MACRO_EXPORTER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2058*/ meltfptr[2057])); /*internsym:_PATMACROXPORTER_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2061*/ meltfptr[2060])); /*internsym:SYSDATA_PATMACRO_EXPORTER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2064*/ meltfptr[2063])); /*internsym:_EXPORTEDM_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2067*/ meltfptr[2066])); /*internsym:CLASS_SOURCE_EXPORT_MACRO */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2072*/ meltfptr[2071])); /*internsym:_EXPORTEDPAT_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2075*/ meltfptr[2074])); /*internsym:CLASS_SOURCE_EXPORT_PATMACRO */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2080*/ meltfptr[2079])); /*internsym:CLASS_SOURCE_PARENT_MODULE_ENVIRONMENT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2086*/ meltfptr[2085])); /*internsym:CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2094*/ meltfptr[2093])); /*internsym:CHECKRUNMODENVBOX_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2089*/ meltfptr[2088])); /*internsym:UPDATCURMODENVBOX_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2091*/ meltfptr[2090])); /*internsym:CLASS_SOURCE_FETCH_PREDEFINED */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2096*/ meltfptr[2095])); /*internsym:SYSDATA_CONT_FRESH_ENV */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2098*/ meltfptr[2097])); /*internsym:MAPOBJECT_EVERY */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2103*/ meltfptr[2102])); /*internsym:CLASS_SOURCE_STORE_PREDEFINED */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2110*/ meltfptr[2109])); /*internsym:_STOREPREDEF_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2107*/ meltfptr[2106])); /*internsym:CLASS_SOURCE_CHEADER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2114*/ meltfptr[2113])); /*internsym:CLASS_SOURCE_USE_PACKAGE_FROM_PKG_CONFIG */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2118*/ meltfptr[2117])); /*internsym:CHECK_CTYPE_NARGS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2120*/ meltfptr[2119])); /*internsym:CREATE_NORMCONTEXT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2122*/ meltfptr[2121])); /*internsym:CREATE_NORMAL_EXTENDING_CONTEXT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2124*/ meltfptr[2123])); /*internsym:NORMAL_PREDEF */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2126*/ meltfptr[2125])); /*internsym:NORMALIZE_TUPLE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2128*/ meltfptr[2127])); /*internsym:REGISTER_LITERAL_VALUE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2130*/ meltfptr[2129])); /*internsym:WRAP_NORMAL_LET1 */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2132*/ meltfptr[2131])); /*internsym:WRAP_NORMAL_LETSEQ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2134*/ meltfptr[2133])); /*internsym:CLASS_NREP_DATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2136*/ meltfptr[2135])); /*internsym:CLASS_NREP_CHECKINTERRUPT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2138*/ meltfptr[2137])); /**COMMENT: set retinit from boxloc **/ ; #undef meltfram__ } /*end of meltmod__warmelt_normal__initialmeltchunk_49 */ void meltmod__warmelt_normal__initialmeltchunk_50 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*_.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_normal__initialmeltchunk_50 */ void meltmod__warmelt_normal__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 */ -1730); if (!marking && melt_is_forwarding) { dbgprintf ("forward_or_mark_module_start_frame_warmelt_normal forwarding %d pointers in frame %p", 2250, (void *) meltframptr_); for (ix = 0; ix < 2250; ix++) MELT_FORWARDED (meltframptr_->mcfr_varptr[ix]); return; } /*end forwarding */ dbgprintf ("forward_or_mark_module_start_frame_warmelt_normal marking in frame %p", (void *) meltframptr_); for (ix = 0; ix < 2250; ix++) if (meltframptr_->mcfr_varptr[ix]) gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]); } /* end meltmod__warmelt_normal__forward_or_mark_module_start_frame */ /* exported 137 field offsets */ MELT_EXTERN const int meltfieldoff__LITV_LOC; const int meltfieldoff__LITV_LOC = 3; /* in CLASS_LITERAL_VALUE */ MELT_EXTERN const int meltfieldoff__LITV_RANK; const int meltfieldoff__LITV_RANK = 2; /* in CLASS_LITERAL_VALUE */ MELT_EXTERN const int meltfieldoff__LITV_VALUE; const int meltfieldoff__LITV_VALUE = 1; /* in CLASS_LITERAL_VALUE */ MELT_EXTERN const int meltfieldoff__NACCF_FLD; const int meltfieldoff__NACCF_FLD = 2; /* in CLASS_NREP_FIELDACC */ MELT_EXTERN const int meltfieldoff__NACCF_OBJ; const int meltfieldoff__NACCF_OBJ = 1; /* in CLASS_NREP_FIELDACC */ MELT_EXTERN const int meltfieldoff__NACCM_IX; const int meltfieldoff__NACCM_IX = 2; /* in CLASS_NREP_MULTACC */ MELT_EXTERN const int meltfieldoff__NACCM_MUL; const int meltfieldoff__NACCM_MUL = 1; /* in CLASS_NREP_MULTACC */ MELT_EXTERN const int meltfieldoff__NAGAIN_BIND; const int meltfieldoff__NAGAIN_BIND = 1; /* in CLASS_NREP_AGAIN */ MELT_EXTERN const int meltfieldoff__NAPP_FUN; const int meltfieldoff__NAPP_FUN = 3; /* in CLASS_NREP_APPLY */ MELT_EXTERN const int meltfieldoff__NBOXINT_NUM; const int meltfieldoff__NBOXINT_NUM = 5; /* in CLASS_NREP_DATABOXEDINTEGER */ MELT_EXTERN const int meltfieldoff__NCHRUMOD_COMMENT; const int meltfieldoff__NCHRUMOD_COMMENT = 1; /* in CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER */ MELT_EXTERN const int meltfieldoff__NCHUNK_EXPANSION; const int meltfieldoff__NCHUNK_EXPANSION = 2; /* in CLASS_NREP_CHUNK */ MELT_EXTERN const int meltfieldoff__NCHUNK_OPER; const int meltfieldoff__NCHUNK_OPER = 3; /* in CLASS_NREP_CHUNK */ MELT_EXTERN const int meltfieldoff__NCITER_BODBINDINGS; const int meltfieldoff__NCITER_BODBINDINGS = 7; /* in CLASS_NREP_CITERATION */ MELT_EXTERN const int meltfieldoff__NCITER_BODY; const int meltfieldoff__NCITER_BODY = 4; /* in CLASS_NREP_CITERATION */ MELT_EXTERN const int meltfieldoff__NCITER_CHUNKAFTER; const int meltfieldoff__NCITER_CHUNKAFTER = 3; /* in CLASS_NREP_CITERATION */ MELT_EXTERN const int meltfieldoff__NCITER_CHUNKBEFORE; const int meltfieldoff__NCITER_CHUNKBEFORE = 2; /* in CLASS_NREP_CITERATION */ MELT_EXTERN const int meltfieldoff__NCITER_CITERATOR; const int meltfieldoff__NCITER_CITERATOR = 1; /* in CLASS_NREP_CITERATION */ MELT_EXTERN const int meltfieldoff__NCITER_LOCBINDINGS; const int meltfieldoff__NCITER_LOCBINDINGS = 6; /* in CLASS_NREP_CITERATION */ MELT_EXTERN const int meltfieldoff__NCITER_STATOCC; const int meltfieldoff__NCITER_STATOCC = 5; /* in CLASS_NREP_CITERATION */ MELT_EXTERN const int meltfieldoff__NCLOC_PROCS; const int meltfieldoff__NCLOC_PROCS = 4; /* in CLASS_NREP_CLOSEDOCC */ MELT_EXTERN const int meltfieldoff__NCOMM_STRING; const int meltfieldoff__NCOMM_STRING = 1; /* in CLASS_NREP_COMMENT */ MELT_EXTERN const int meltfieldoff__NCONSB_DISCR; const int meltfieldoff__NCONSB_DISCR = 2; /* in CLASS_NORMAL_CONSTRUCTOR_BINDING */ MELT_EXTERN const int meltfieldoff__NCONSB_LOC; const int meltfieldoff__NCONSB_LOC = 1; /* in CLASS_NORMAL_CONSTRUCTOR_BINDING */ MELT_EXTERN const int meltfieldoff__NCONSB_NLETREC; const int meltfieldoff__NCONSB_NLETREC = 3; /* in CLASS_NORMAL_CONSTRUCTOR_BINDING */ MELT_EXTERN const int meltfieldoff__NCONST_DATA; const int meltfieldoff__NCONST_DATA = 3; /* in CLASS_NREP_QUASICONSTANT */ MELT_EXTERN const int meltfieldoff__NCONST_DEFBIND; const int meltfieldoff__NCONST_DEFBIND = 4; /* in CLASS_NREP_DEFINED_CONSTANT */ MELT_EXTERN const int meltfieldoff__NCONST_PROC; const int meltfieldoff__NCONST_PROC = 2; /* in CLASS_NREP_QUASICONSTANT */ MELT_EXTERN const int meltfieldoff__NCONST_SVAL; const int meltfieldoff__NCONST_SVAL = 1; /* in CLASS_NREP_QUASICONSTANT */ MELT_EXTERN const int meltfieldoff__NCONSVA_CTYPES; const int meltfieldoff__NCONSVA_CTYPES = 2; /* in CLASS_NREP_CONSUME_VARIADIC */ MELT_EXTERN const int meltfieldoff__NCONSVA_VARIADIC; const int meltfieldoff__NCONSVA_VARIADIC = 1; /* in CLASS_NREP_CONSUME_VARIADIC */ MELT_EXTERN const int meltfieldoff__NCUMEB_COMMENT; const int meltfieldoff__NCUMEB_COMMENT = 2; /* in CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ MELT_EXTERN const int meltfieldoff__NDATA_DISCRX; const int meltfieldoff__NDATA_DISCRX = 4; /* in CLASS_NREP_DISCRIMINATED_DATA */ MELT_EXTERN const int meltfieldoff__NDATA_LOCBIND; const int meltfieldoff__NDATA_LOCBIND = 3; /* in CLASS_NREP_BOUND_DATA */ MELT_EXTERN const int meltfieldoff__NDATA_NAME; const int meltfieldoff__NDATA_NAME = 1; /* in CLASS_NREP_BOUND_DATA */ MELT_EXTERN const int meltfieldoff__NDATA_RANK; const int meltfieldoff__NDATA_RANK = 2; /* in CLASS_NREP_BOUND_DATA */ MELT_EXTERN const int meltfieldoff__NDCLO_CLOSV; const int meltfieldoff__NDCLO_CLOSV = 6; /* in CLASS_NREP_DATACLOSURE */ MELT_EXTERN const int meltfieldoff__NDCLO_PROC; const int meltfieldoff__NDCLO_PROC = 5; /* in CLASS_NREP_DATACLOSURE */ MELT_EXTERN const int meltfieldoff__NDROU_PROC; const int meltfieldoff__NDROU_PROC = 5; /* in CLASS_NREP_DATAROUTINE */ MELT_EXTERN const int meltfieldoff__NDSY_NAMESTR; const int meltfieldoff__NDSY_NAMESTR = 9; /* in CLASS_NREP_DATASYMBOL */ MELT_EXTERN const int meltfieldoff__NEXIT_BIND; const int meltfieldoff__NEXIT_BIND = 1; /* in CLASS_NREP_EXIT */ MELT_EXTERN const int meltfieldoff__NEXIT_VAL; const int meltfieldoff__NEXIT_VAL = 2; /* in CLASS_NREP_EXIT */ MELT_EXTERN const int meltfieldoff__NEXPR_ARGS; const int meltfieldoff__NEXPR_ARGS = 2; /* in CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS */ MELT_EXTERN const int meltfieldoff__NEXPR_CTYP; const int meltfieldoff__NEXPR_CTYP = 1; /* in CLASS_NREP_TYPED_EXPRESSION */ MELT_EXTERN const int meltfieldoff__NFLA_FIELD; const int meltfieldoff__NFLA_FIELD = 1; /* in CLASS_NREP_FIELDASSIGN */ MELT_EXTERN const int meltfieldoff__NFLA_VAL; const int meltfieldoff__NFLA_VAL = 2; /* in CLASS_NREP_FIELDASSIGN */ MELT_EXTERN const int meltfieldoff__NFOREVER_BIND; const int meltfieldoff__NFOREVER_BIND = 1; /* in CLASS_NREP_FOREVER */ MELT_EXTERN const int meltfieldoff__NFOREVER_BODY; const int meltfieldoff__NFOREVER_BODY = 2; /* in CLASS_NREP_FOREVER */ MELT_EXTERN const int meltfieldoff__NFOREVER_RESULT; const int meltfieldoff__NFOREVER_RESULT = 3; /* in CLASS_NREP_FOREVER */ MELT_EXTERN const int meltfieldoff__NIFA_CLASS; const int meltfieldoff__NIFA_CLASS = 5; /* in CLASS_NREP_IFISA */ MELT_EXTERN const int meltfieldoff__NIFP_COND; const int meltfieldoff__NIFP_COND = 1; /* in CLASS_NREP_CPPIF */ MELT_EXTERN const int meltfieldoff__NIFP_CTYP; const int meltfieldoff__NIFP_CTYP = 4; /* in CLASS_NREP_CPPIF */ MELT_EXTERN const int meltfieldoff__NIFP_ELSE; const int meltfieldoff__NIFP_ELSE = 3; /* in CLASS_NREP_CPPIF */ MELT_EXTERN const int meltfieldoff__NIFP_THEN; const int meltfieldoff__NIFP_THEN = 2; /* in CLASS_NREP_CPPIF */ MELT_EXTERN const int meltfieldoff__NIFS_LEFT; const int meltfieldoff__NIFS_LEFT = 4; /* in CLASS_NREP_IFSAME */ MELT_EXTERN const int meltfieldoff__NIFS_RIGHT; const int meltfieldoff__NIFS_RIGHT = 5; /* in CLASS_NREP_IFSAME */ MELT_EXTERN const int meltfieldoff__NIFV_CTYPES; const int meltfieldoff__NIFV_CTYPES = 5; /* in CLASS_NREP_IFVARIADIC */ MELT_EXTERN const int meltfieldoff__NIFV_VARIADIC; const int meltfieldoff__NIFV_VARIADIC = 4; /* in CLASS_NREP_IFVARIADIC */ MELT_EXTERN const int meltfieldoff__NIF_ELSE; const int meltfieldoff__NIF_ELSE = 3; /* in CLASS_NREP_IFCOMMON */ MELT_EXTERN const int meltfieldoff__NIF_TEST; const int meltfieldoff__NIF_TEST = 4; /* in CLASS_NREP_IF */ MELT_EXTERN const int meltfieldoff__NIF_TESTVAL; const int meltfieldoff__NIF_TESTVAL = 4; /* in CLASS_NREP_IFTESTVALUE */ MELT_EXTERN const int meltfieldoff__NIF_THEN; const int meltfieldoff__NIF_THEN = 2; /* in CLASS_NREP_IFCOMMON */ MELT_EXTERN const int meltfieldoff__NIF_TUPSIZ; const int meltfieldoff__NIF_TUPSIZ = 5; /* in CLASS_NREP_IFTUPLESIZED */ MELT_EXTERN const int meltfieldoff__NIMPORT_SYDATA; const int meltfieldoff__NIMPORT_SYDATA = 2; /* in CLASS_NREP_IMPORTEDVAL */ MELT_EXTERN const int meltfieldoff__NIMPORT_SYMB; const int meltfieldoff__NIMPORT_SYMB = 1; /* in CLASS_NREP_IMPORTEDVAL */ MELT_EXTERN const int meltfieldoff__NINITEXTEND_MODENV; const int meltfieldoff__NINITEXTEND_MODENV = 4; /* in CLASS_NREP_INITEXTENDPROC */ MELT_EXTERN const int meltfieldoff__NINIT_DEFBINDS; const int meltfieldoff__NINIT_DEFBINDS = 3; /* in CLASS_NREP_INITPROC */ MELT_EXTERN const int meltfieldoff__NINIT_TOPL; const int meltfieldoff__NINIT_TOPL = 2; /* in CLASS_NREP_INITPROC */ MELT_EXTERN const int meltfieldoff__NINSTB_CLABIND; const int meltfieldoff__NINSTB_CLABIND = 5; /* in CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING */ MELT_EXTERN const int meltfieldoff__NINSTB_SLOTS; const int meltfieldoff__NINSTB_SLOTS = 4; /* in CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING */ MELT_EXTERN const int meltfieldoff__NINST_HASH; const int meltfieldoff__NINST_HASH = 7; /* in CLASS_NREP_DATAINSTANCE */ MELT_EXTERN const int meltfieldoff__NINST_OBJNUM; const int meltfieldoff__NINST_OBJNUM = 5; /* in CLASS_NREP_DATAINSTANCE */ MELT_EXTERN const int meltfieldoff__NINST_PREDEF; const int meltfieldoff__NINST_PREDEF = 6; /* in CLASS_NREP_DATAINSTANCE */ MELT_EXTERN const int meltfieldoff__NINST_SLOTS; const int meltfieldoff__NINST_SLOTS = 8; /* in CLASS_NREP_DATAINSTANCE */ MELT_EXTERN const int meltfieldoff__NLAMBDAB_CONSTROUT; const int meltfieldoff__NLAMBDAB_CONSTROUT = 5; /* in CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING */ MELT_EXTERN const int meltfieldoff__NLAMBDAB_DATAROUT; const int meltfieldoff__NLAMBDAB_DATAROUT = 6; /* in CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING */ MELT_EXTERN const int meltfieldoff__NLAMBDAB_NCLOSED; const int meltfieldoff__NLAMBDAB_NCLOSED = 4; /* in CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING */ MELT_EXTERN const int meltfieldoff__NLAMBDA_CLOSEDV; const int meltfieldoff__NLAMBDA_CLOSEDV = 3; /* in CLASS_NREP_LAMBDA */ MELT_EXTERN const int meltfieldoff__NLAMBDA_CONSTROUT; const int meltfieldoff__NLAMBDA_CONSTROUT = 2; /* in CLASS_NREP_LAMBDA */ MELT_EXTERN const int meltfieldoff__NLAMBDA_PROC; const int meltfieldoff__NLAMBDA_PROC = 1; /* in CLASS_NREP_LAMBDA */ MELT_EXTERN const int meltfieldoff__NLETREC_BODY_BINDINGS; const int meltfieldoff__NLETREC_BODY_BINDINGS = 4; /* in CLASS_NREP_LETREC */ MELT_EXTERN const int meltfieldoff__NLETREC_FILL_BINDINGS; const int meltfieldoff__NLETREC_FILL_BINDINGS = 3; /* in CLASS_NREP_LETREC */ MELT_EXTERN const int meltfieldoff__NLETREC_LOCSYMS; const int meltfieldoff__NLETREC_LOCSYMS = 5; /* in CLASS_NREP_LETREC */ MELT_EXTERN const int meltfieldoff__NLET_BINDINGS; const int meltfieldoff__NLET_BINDINGS = 1; /* in CLASS_NREP_LET */ MELT_EXTERN const int meltfieldoff__NLET_BODY; const int meltfieldoff__NLET_BODY = 2; /* in CLASS_NREP_LET */ MELT_EXTERN const int meltfieldoff__NLISTB_FIRST; const int meltfieldoff__NLISTB_FIRST = 4; /* in CLASS_NORMAL_CONSTRUCTED_LIST_BINDING */ MELT_EXTERN const int meltfieldoff__NLISTB_LAST; const int meltfieldoff__NLISTB_LAST = 5; /* in CLASS_NORMAL_CONSTRUCTED_LIST_BINDING */ MELT_EXTERN const int meltfieldoff__NLISTB_PAIRSB; const int meltfieldoff__NLISTB_PAIRSB = 6; /* in CLASS_NORMAL_CONSTRUCTED_LIST_BINDING */ MELT_EXTERN const int meltfieldoff__NLITVAL_REGVAL; const int meltfieldoff__NLITVAL_REGVAL = 1; /* in CLASS_NREP_LITERALVALUE */ MELT_EXTERN const int meltfieldoff__NLITVAL_SYMBOL; const int meltfieldoff__NLITVAL_SYMBOL = 2; /* in CLASS_NREP_LITERALNAMEDVALUE */ MELT_EXTERN const int meltfieldoff__NMINS_CLADATA; const int meltfieldoff__NMINS_CLADATA = 2; /* in CLASS_NREP_INSTANCE */ MELT_EXTERN const int meltfieldoff__NMINS_CLASS; const int meltfieldoff__NMINS_CLASS = 1; /* in CLASS_NREP_INSTANCE */ MELT_EXTERN const int meltfieldoff__NMINS_FIELDS; const int meltfieldoff__NMINS_FIELDS = 3; /* in CLASS_NREP_INSTANCE */ MELT_EXTERN const int meltfieldoff__NMULAPP_BINDINGS; const int meltfieldoff__NMULAPP_BINDINGS = 4; /* in CLASS_NREP_MULTIAPPLY */ MELT_EXTERN const int meltfieldoff__NMULAPP_BODY; const int meltfieldoff__NMULAPP_BODY = 5; /* in CLASS_NREP_MULTIAPPLY */ MELT_EXTERN const int meltfieldoff__NMULSEND_BINDINGS; const int meltfieldoff__NMULSEND_BINDINGS = 5; /* in CLASS_NREP_MULTIMSEND */ MELT_EXTERN const int meltfieldoff__NMULSEND_BODY; const int meltfieldoff__NMULSEND_BODY = 6; /* in CLASS_NREP_MULTIMSEND */ MELT_EXTERN const int meltfieldoff__NOCC_BIND; const int meltfieldoff__NOCC_BIND = 3; /* in CLASS_NREP_SYMOCC */ MELT_EXTERN const int meltfieldoff__NOCC_CTYP; const int meltfieldoff__NOCC_CTYP = 2; /* in CLASS_NREP_SYMOCC */ MELT_EXTERN const int meltfieldoff__NOCC_SYMB; const int meltfieldoff__NOCC_SYMB = 1; /* in CLASS_NREP_SYMOCC */ MELT_EXTERN const int meltfieldoff__NPAIRB_HEAD; const int meltfieldoff__NPAIRB_HEAD = 4; /* in CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING */ MELT_EXTERN const int meltfieldoff__NPAIRB_TAIL; const int meltfieldoff__NPAIRB_TAIL = 5; /* in CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING */ MELT_EXTERN const int meltfieldoff__NPROC_BODY; const int meltfieldoff__NPROC_BODY = 1; /* in CLASS_NREP_ANYPROC */ MELT_EXTERN const int meltfieldoff__NPROGN_LAST; const int meltfieldoff__NPROGN_LAST = 2; /* in CLASS_NREP_PROGN */ MELT_EXTERN const int meltfieldoff__NPROGN_SEQ; const int meltfieldoff__NPROGN_SEQ = 1; /* in CLASS_NREP_PROGN */ MELT_EXTERN const int meltfieldoff__NQCMEC_COMMENT; const int meltfieldoff__NQCMEC_COMMENT = 4; /* in CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ MELT_EXTERN const int meltfieldoff__NREP_LOC; const int meltfieldoff__NREP_LOC = 0; /* in CLASS_NREP */ MELT_EXTERN const int meltfieldoff__NRET_MAIN; const int meltfieldoff__NRET_MAIN = 1; /* in CLASS_NREP_RETURN */ MELT_EXTERN const int meltfieldoff__NRET_REST; const int meltfieldoff__NRET_REST = 2; /* in CLASS_NREP_RETURN */ MELT_EXTERN const int meltfieldoff__NRPREDEF; const int meltfieldoff__NRPREDEF = 1; /* in CLASS_NREP_PREDEF */ MELT_EXTERN const int meltfieldoff__NRPRO_ARGB; const int meltfieldoff__NRPRO_ARGB = 3; /* in CLASS_NREP_ROUTPROC */ MELT_EXTERN const int meltfieldoff__NRPRO_CLOSEDB; const int meltfieldoff__NRPRO_CLOSEDB = 4; /* in CLASS_NREP_ROUTPROC */ MELT_EXTERN const int meltfieldoff__NRPRO_CONST; const int meltfieldoff__NRPRO_CONST = 5; /* in CLASS_NREP_ROUTPROC */ MELT_EXTERN const int meltfieldoff__NRPRO_DATACLOS; const int meltfieldoff__NRPRO_DATACLOS = 7; /* in CLASS_NREP_ROUTPROC */ MELT_EXTERN const int meltfieldoff__NRPRO_DATAROUT; const int meltfieldoff__NRPRO_DATAROUT = 6; /* in CLASS_NREP_ROUTPROC */ MELT_EXTERN const int meltfieldoff__NRPRO_NAME; const int meltfieldoff__NRPRO_NAME = 2; /* in CLASS_NREP_ROUTPROC */ MELT_EXTERN const int meltfieldoff__NRPRO_THUNKLIST; const int meltfieldoff__NRPRO_THUNKLIST = 8; /* in CLASS_NREP_ROUTPROC */ MELT_EXTERN const int meltfieldoff__NRPRO_VARIADIC; const int meltfieldoff__NRPRO_VARIADIC = 9; /* in CLASS_NREP_ROUTPROC */ MELT_EXTERN const int meltfieldoff__NSEND_RECV; const int meltfieldoff__NSEND_RECV = 4; /* in CLASS_NREP_MSEND */ MELT_EXTERN const int meltfieldoff__NSEND_SEL; const int meltfieldoff__NSEND_SEL = 3; /* in CLASS_NREP_MSEND */ MELT_EXTERN const int meltfieldoff__NSTPD_PREDEF; const int meltfieldoff__NSTPD_PREDEF = 1; /* in CLASS_NREP_STORE_PREDEFINED */ MELT_EXTERN const int meltfieldoff__NSTPD_VALUE; const int meltfieldoff__NSTPD_VALUE = 2; /* in CLASS_NREP_STORE_PREDEFINED */ MELT_EXTERN const int meltfieldoff__NSTQ_EXP; const int meltfieldoff__NSTQ_EXP = 2; /* in CLASS_NREP_SETQ */ MELT_EXTERN const int meltfieldoff__NSTQ_VAR; const int meltfieldoff__NSTQ_VAR = 1; /* in CLASS_NREP_SETQ */ MELT_EXTERN const int meltfieldoff__NSTR_STRING; const int meltfieldoff__NSTR_STRING = 5; /* in CLASS_NREP_DATASTRING */ MELT_EXTERN const int meltfieldoff__NTUPB_COMP; const int meltfieldoff__NTUPB_COMP = 4; /* in CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING */ MELT_EXTERN const int meltfieldoff__NTUP_COMP; const int meltfieldoff__NTUP_COMP = 5; /* in CLASS_NREP_DATATUPLE */ MELT_EXTERN const int meltfieldoff__NUCMEB_EXPR; const int meltfieldoff__NUCMEB_EXPR = 1; /* in CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ MELT_EXTERN const int meltfieldoff__NUGET_FIELD; const int meltfieldoff__NUGET_FIELD = 2; /* in CLASS_NREP_UNSAFE_GET_FIELD */ MELT_EXTERN const int meltfieldoff__NUGET_OBJ; const int meltfieldoff__NUGET_OBJ = 1; /* in CLASS_NREP_UNSAFE_GET_FIELD */ MELT_EXTERN const int meltfieldoff__NUNTH_INDEX; const int meltfieldoff__NUNTH_INDEX = 2; /* in CLASS_NREP_UNSAFE_NTH_COMPONENT */ MELT_EXTERN const int meltfieldoff__NUNTH_TUPLE; const int meltfieldoff__NUNTH_TUPLE = 1; /* in CLASS_NREP_UNSAFE_NTH_COMPONENT */ MELT_EXTERN const int meltfieldoff__NUPUT_FIELDS; const int meltfieldoff__NUPUT_FIELDS = 2; /* in CLASS_NREP_UNSAFE_PUT_FIELDS */ MELT_EXTERN const int meltfieldoff__NUPUT_OBJ; const int meltfieldoff__NUPUT_OBJ = 1; /* in CLASS_NREP_UNSAFE_PUT_FIELDS */ MELT_EXTERN const int meltfieldoff__NVARG_CTYP; const int meltfieldoff__NVARG_CTYP = 2; /* in CLASS_NREP_VARIADIC_ARGUMENT */ MELT_EXTERN const int meltfieldoff__NVARG_OFFSET; const int meltfieldoff__NVARG_OFFSET = 3; /* in CLASS_NREP_VARIADIC_ARGUMENT */ MELT_EXTERN const int meltfieldoff__NVARG_VARIADIC; const int meltfieldoff__NVARG_VARIADIC = 1; /* in CLASS_NREP_VARIADIC_ARGUMENT */ /* exported 82 class lengths */ MELT_EXTERN const int meltclasslen__CLASS_LITERAL_VALUE; const int meltclasslen__CLASS_LITERAL_VALUE = 4; MELT_EXTERN const int meltclasslen__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING; const int meltclasslen__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING = 6; MELT_EXTERN const int meltclasslen__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING; const int meltclasslen__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING = 7; MELT_EXTERN const int meltclasslen__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING; const int meltclasslen__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING = 7; MELT_EXTERN const int meltclasslen__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING; const int meltclasslen__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING = 6; MELT_EXTERN const int meltclasslen__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING; const int meltclasslen__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING = 5; MELT_EXTERN const int meltclasslen__CLASS_NORMAL_CONSTRUCTOR_BINDING; const int meltclasslen__CLASS_NORMAL_CONSTRUCTOR_BINDING = 4; MELT_EXTERN const int meltclasslen__CLASS_NREP; const int meltclasslen__CLASS_NREP = 1; MELT_EXTERN const int meltclasslen__CLASS_NREP_AGAIN; const int meltclasslen__CLASS_NREP_AGAIN = 2; MELT_EXTERN const int meltclasslen__CLASS_NREP_ANYPROC; const int meltclasslen__CLASS_NREP_ANYPROC = 2; MELT_EXTERN const int meltclasslen__CLASS_NREP_APPLY; const int meltclasslen__CLASS_NREP_APPLY = 4; MELT_EXTERN const int meltclasslen__CLASS_NREP_BOUND_DATA; const int meltclasslen__CLASS_NREP_BOUND_DATA = 4; MELT_EXTERN const int meltclasslen__CLASS_NREP_CHECKSIGNAL; const int meltclasslen__CLASS_NREP_CHECKSIGNAL = 1; MELT_EXTERN const int meltclasslen__CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER; const int meltclasslen__CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER = 2; MELT_EXTERN const int meltclasslen__CLASS_NREP_CHUNK; const int meltclasslen__CLASS_NREP_CHUNK = 4; MELT_EXTERN const int meltclasslen__CLASS_NREP_CITERATION; const int meltclasslen__CLASS_NREP_CITERATION = 8; MELT_EXTERN const int meltclasslen__CLASS_NREP_CLOSEDOCC; const int meltclasslen__CLASS_NREP_CLOSEDOCC = 5; MELT_EXTERN const int meltclasslen__CLASS_NREP_COMMENT; const int meltclasslen__CLASS_NREP_COMMENT = 2; MELT_EXTERN const int meltclasslen__CLASS_NREP_CONSTANT; const int meltclasslen__CLASS_NREP_CONSTANT = 4; MELT_EXTERN const int meltclasslen__CLASS_NREP_CONSTOCC; const int meltclasslen__CLASS_NREP_CONSTOCC = 5; MELT_EXTERN const int meltclasslen__CLASS_NREP_CONSUME_VARIADIC; const int meltclasslen__CLASS_NREP_CONSUME_VARIADIC = 3; MELT_EXTERN const int meltclasslen__CLASS_NREP_CPPIF; const int meltclasslen__CLASS_NREP_CPPIF = 5; MELT_EXTERN const int meltclasslen__CLASS_NREP_DATABOXEDINTEGER; const int meltclasslen__CLASS_NREP_DATABOXEDINTEGER = 6; MELT_EXTERN const int meltclasslen__CLASS_NREP_DATACLOSURE; const int meltclasslen__CLASS_NREP_DATACLOSURE = 7; MELT_EXTERN const int meltclasslen__CLASS_NREP_DATAINSTANCE; const int meltclasslen__CLASS_NREP_DATAINSTANCE = 9; MELT_EXTERN const int meltclasslen__CLASS_NREP_DATAKEYWORD; const int meltclasslen__CLASS_NREP_DATAKEYWORD = 10; MELT_EXTERN const int meltclasslen__CLASS_NREP_DATAROUTINE; const int meltclasslen__CLASS_NREP_DATAROUTINE = 6; MELT_EXTERN const int meltclasslen__CLASS_NREP_DATASTRING; const int meltclasslen__CLASS_NREP_DATASTRING = 6; MELT_EXTERN const int meltclasslen__CLASS_NREP_DATASYMBOL; const int meltclasslen__CLASS_NREP_DATASYMBOL = 10; MELT_EXTERN const int meltclasslen__CLASS_NREP_DATATUPLE; const int meltclasslen__CLASS_NREP_DATATUPLE = 6; MELT_EXTERN const int meltclasslen__CLASS_NREP_DEFINED_CONSTANT; const int meltclasslen__CLASS_NREP_DEFINED_CONSTANT = 5; MELT_EXTERN const int meltclasslen__CLASS_NREP_DEFUNROUTPROC; const int meltclasslen__CLASS_NREP_DEFUNROUTPROC = 10; MELT_EXTERN const int meltclasslen__CLASS_NREP_DISCRIMINATED_DATA; const int meltclasslen__CLASS_NREP_DISCRIMINATED_DATA = 5; MELT_EXTERN const int meltclasslen__CLASS_NREP_EXIT; const int meltclasslen__CLASS_NREP_EXIT = 3; MELT_EXTERN const int meltclasslen__CLASS_NREP_EXPRESSION; const int meltclasslen__CLASS_NREP_EXPRESSION = 1; MELT_EXTERN const int meltclasslen__CLASS_NREP_FIELDACC; const int meltclasslen__CLASS_NREP_FIELDACC = 3; MELT_EXTERN const int meltclasslen__CLASS_NREP_FIELDASSIGN; const int meltclasslen__CLASS_NREP_FIELDASSIGN = 3; MELT_EXTERN const int meltclasslen__CLASS_NREP_FOREVER; const int meltclasslen__CLASS_NREP_FOREVER = 4; MELT_EXTERN const int meltclasslen__CLASS_NREP_IF; const int meltclasslen__CLASS_NREP_IF = 5; MELT_EXTERN const int meltclasslen__CLASS_NREP_IFCOMMON; const int meltclasslen__CLASS_NREP_IFCOMMON = 4; MELT_EXTERN const int meltclasslen__CLASS_NREP_IFISA; const int meltclasslen__CLASS_NREP_IFISA = 6; MELT_EXTERN const int meltclasslen__CLASS_NREP_IFSAME; const int meltclasslen__CLASS_NREP_IFSAME = 6; MELT_EXTERN const int meltclasslen__CLASS_NREP_IFTESTVALUE; const int meltclasslen__CLASS_NREP_IFTESTVALUE = 5; MELT_EXTERN const int meltclasslen__CLASS_NREP_IFTUPLESIZED; const int meltclasslen__CLASS_NREP_IFTUPLESIZED = 6; MELT_EXTERN const int meltclasslen__CLASS_NREP_IFVARIADIC; const int meltclasslen__CLASS_NREP_IFVARIADIC = 6; MELT_EXTERN const int meltclasslen__CLASS_NREP_IMPORTEDVAL; const int meltclasslen__CLASS_NREP_IMPORTEDVAL = 3; MELT_EXTERN const int meltclasslen__CLASS_NREP_INITEXTENDPROC; const int meltclasslen__CLASS_NREP_INITEXTENDPROC = 5; MELT_EXTERN const int meltclasslen__CLASS_NREP_INITPROC; const int meltclasslen__CLASS_NREP_INITPROC = 4; MELT_EXTERN const int meltclasslen__CLASS_NREP_INSTANCE; const int meltclasslen__CLASS_NREP_INSTANCE = 4; MELT_EXTERN const int meltclasslen__CLASS_NREP_LAMBDA; const int meltclasslen__CLASS_NREP_LAMBDA = 4; MELT_EXTERN const int meltclasslen__CLASS_NREP_LAMBDAROUTPROC; const int meltclasslen__CLASS_NREP_LAMBDAROUTPROC = 10; MELT_EXTERN const int meltclasslen__CLASS_NREP_LET; const int meltclasslen__CLASS_NREP_LET = 3; MELT_EXTERN const int meltclasslen__CLASS_NREP_LETREC; const int meltclasslen__CLASS_NREP_LETREC = 6; MELT_EXTERN const int meltclasslen__CLASS_NREP_LITERALNAMEDVALUE; const int meltclasslen__CLASS_NREP_LITERALNAMEDVALUE = 3; MELT_EXTERN const int meltclasslen__CLASS_NREP_LITERALVALUE; const int meltclasslen__CLASS_NREP_LITERALVALUE = 2; MELT_EXTERN const int meltclasslen__CLASS_NREP_LOCSYMOCC; const int meltclasslen__CLASS_NREP_LOCSYMOCC = 4; MELT_EXTERN const int meltclasslen__CLASS_NREP_MSEND; const int meltclasslen__CLASS_NREP_MSEND = 5; MELT_EXTERN const int meltclasslen__CLASS_NREP_MULTACC; const int meltclasslen__CLASS_NREP_MULTACC = 3; MELT_EXTERN const int meltclasslen__CLASS_NREP_MULTIAPPLY; const int meltclasslen__CLASS_NREP_MULTIAPPLY = 6; MELT_EXTERN const int meltclasslen__CLASS_NREP_MULTIMSEND; const int meltclasslen__CLASS_NREP_MULTIMSEND = 7; MELT_EXTERN const int meltclasslen__CLASS_NREP_NIL; const int meltclasslen__CLASS_NREP_NIL = 1; MELT_EXTERN const int meltclasslen__CLASS_NREP_PREDEF; const int meltclasslen__CLASS_NREP_PREDEF = 2; MELT_EXTERN const int meltclasslen__CLASS_NREP_PROGN; const int meltclasslen__CLASS_NREP_PROGN = 3; MELT_EXTERN const int meltclasslen__CLASS_NREP_QUASICONSTANT; const int meltclasslen__CLASS_NREP_QUASICONSTANT = 4; MELT_EXTERN const int meltclasslen__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER; const int meltclasslen__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER = 5; MELT_EXTERN const int meltclasslen__CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT; const int meltclasslen__CLASS_NREP_QUASICONST_PARENT_MODULE_ENVIRONMENT = 4; MELT_EXTERN const int meltclasslen__CLASS_NREP_QUASIDATA; const int meltclasslen__CLASS_NREP_QUASIDATA = 1; MELT_EXTERN const int meltclasslen__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER; const int meltclasslen__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER = 1; MELT_EXTERN const int meltclasslen__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT; const int meltclasslen__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT = 1; MELT_EXTERN const int meltclasslen__CLASS_NREP_RETURN; const int meltclasslen__CLASS_NREP_RETURN = 3; MELT_EXTERN const int meltclasslen__CLASS_NREP_ROUTPROC; const int meltclasslen__CLASS_NREP_ROUTPROC = 10; MELT_EXTERN const int meltclasslen__CLASS_NREP_SETQ; const int meltclasslen__CLASS_NREP_SETQ = 3; MELT_EXTERN const int meltclasslen__CLASS_NREP_SIMPLE; const int meltclasslen__CLASS_NREP_SIMPLE = 1; MELT_EXTERN const int meltclasslen__CLASS_NREP_STORE_PREDEFINED; const int meltclasslen__CLASS_NREP_STORE_PREDEFINED = 3; MELT_EXTERN const int meltclasslen__CLASS_NREP_SYMOCC; const int meltclasslen__CLASS_NREP_SYMOCC = 4; MELT_EXTERN const int meltclasslen__CLASS_NREP_TYPED_EXPRESSION; const int meltclasslen__CLASS_NREP_TYPED_EXPRESSION = 2; MELT_EXTERN const int meltclasslen__CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS; const int meltclasslen__CLASS_NREP_TYPED_EXPRESSION_WITH_ARGUMENTS = 3; MELT_EXTERN const int meltclasslen__CLASS_NREP_UNSAFE_GET_FIELD; const int meltclasslen__CLASS_NREP_UNSAFE_GET_FIELD = 3; MELT_EXTERN const int meltclasslen__CLASS_NREP_UNSAFE_NTH_COMPONENT; const int meltclasslen__CLASS_NREP_UNSAFE_NTH_COMPONENT = 3; MELT_EXTERN const int meltclasslen__CLASS_NREP_UNSAFE_PUT_FIELDS; const int meltclasslen__CLASS_NREP_UNSAFE_PUT_FIELDS = 3; MELT_EXTERN const int meltclasslen__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER; const int meltclasslen__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER = 3; MELT_EXTERN const int meltclasslen__CLASS_NREP_VARIADIC_ARGUMENT; const int meltclasslen__CLASS_NREP_VARIADIC_ARGUMENT = 4; /**** end of warmelt-normal ****/