/* GCC MELT GENERATED FILE warmelt-genobj.c - DO NOT EDIT */ /***+ warmelt-genobj 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-genobj declarations ****/ /*************************************************** *** Copyright 2008 - 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_genobj_MAKE_OBJLOCATEDEXP (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_MAKE_OBJCOMPUTE (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_MAKE_OBJEXPANDPUREVAL (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_COMPILOBJ_CATCHALL_NREP (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_PUTOBJDEST_CATCHALL_OBJCODE (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_PUTOBJDEST_CATCHALL_ANYDISCR (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_GETCTYPE_OBJVALUE (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_GECTYP_OBJNIL (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_GECTYP_OBJINITSTRING (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_DBGOUT_ROUTINEOBJ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_PUTOBJDEST_OBJDESTINSTR (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_PUTOBJDEST_OBJFINALRETURN (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_VARIADIC_IDSTR (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_VARIADIC_INDEX_IDSTR (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_VARIADIC_LENGTH_IDSTR (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_COMPILE2OBJ_PROCEDURE (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_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_genobj_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_genobj_APPEND_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_20_warmelt_genobj_APPEND_COMMENTCONST (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_COMPILE2OBJ_INITPROC (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_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_23_warmelt_genobj_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_24_warmelt_genobj_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_genobj_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_26_warmelt_genobj_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_27_warmelt_genobj_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_28_warmelt_genobj_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_29_warmelt_genobj_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_30_warmelt_genobj_COMPILE2OBJ_INITEXTENDPROC (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_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_32_warmelt_genobj_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_33_warmelt_genobj_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_34_warmelt_genobj_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_35_warmelt_genobj_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_36_warmelt_genobj_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_37_warmelt_genobj_GET_FREE_OBJLOCPTR (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_GET_FREE_OBJLOCLONG (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_GET_FREE_OBJLOCTYPED (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_DISPOSE_OBJLOC (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_DISPOSE_BND_OBJ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_COMPILOBJ_NREP_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_43_warmelt_genobj_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_44_warmelt_genobj_GETCTYPE_TYPEXPR (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_COMPILOBJ_NREP_NIL (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_COMPILOBJ_NREP_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_47_warmelt_genobj_COMPILOBJ_NREP_LOCSYMOCC (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_COMPILOBJ_NREP_CLOSEDOCC (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_COMPILOBJ_NREP_CONSTOCC (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_COMPILOBJ_NREP_IMPORTEDVAL (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_COMPILOBJ_NREP_LITERALVALUE (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_COMPILOBJ_NREP_DEFINEDCONSTANT (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_COMPILOBJ_NREP_QUASICONSTANT (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_COMPILOBJ_NREP_QUASICONST_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_55_warmelt_genobj_COMPILOBJ_NREP_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_56_warmelt_genobj_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_genobj_COMPILOBJ_NREP_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_58_warmelt_genobj_COMPILOBJ_NREP_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_59_warmelt_genobj_COMPILOBJ_DISCRANY (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_COMPILOBJ_NREP_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_61_warmelt_genobj_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_62_warmelt_genobj_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_63_warmelt_genobj_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_64_warmelt_genobj_FAIL_COMPILETRECFILL (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_COMPILETREC_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_66_warmelt_genobj_COMPILETREC_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_67_warmelt_genobj_COMPILETREC_PAIR (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_COMPILETREC_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_69_warmelt_genobj_COMPILETREC_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_70_warmelt_genobj_COMPILOBJ_NREP_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_71_warmelt_genobj_COMPILOBJ_NREP_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_72_warmelt_genobj_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_73_warmelt_genobj_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_74_warmelt_genobj_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_75_warmelt_genobj_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_76_warmelt_genobj_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_77_warmelt_genobj_COMPILOBJ_NREP_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_78_warmelt_genobj_COMPILOBJ_NREP_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_79_warmelt_genobj_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_80_warmelt_genobj_COMPILOBJ_NREP_MULTACC (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_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_82_warmelt_genobj_COMPILOBJ_NREP_FIELDACC (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_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_84_warmelt_genobj_COMPILOBJ_NREP_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_85_warmelt_genobj_COMPILOBJ_NREP_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_86_warmelt_genobj_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_87_warmelt_genobj_COMPILOBJ_NREP_CHECKSIGNAL (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_COMPILOBJ_NREP_UNSAFE_NTH_COMPONENT (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_COMPILOBJ_NREP_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_90_warmelt_genobj_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_91_warmelt_genobj_COMPILOBJ_NREP_MULTIAPPLY (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_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_93_warmelt_genobj_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_94_warmelt_genobj_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_95_warmelt_genobj_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_96_warmelt_genobj_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_97_warmelt_genobj_COMPILOBJ_NREP_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_98_warmelt_genobj_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_99_warmelt_genobj_COMPILOBJ_NREP_MULTIMSEND (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_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_101_warmelt_genobj_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_102_warmelt_genobj_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_103_warmelt_genobj_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_104_warmelt_genobj_COMPILOBJ_ANY_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_105_warmelt_genobj_COMPILOBJ_VALUE_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_106_warmelt_genobj_COMPILOBJ_FIXED_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_107_warmelt_genobj_COMPILOBJ_NORMAL_LET_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_108_warmelt_genobj_COMPILOBJ_CONSLAMBDABIND (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_COMPILOBJ_CONSTUPLEBIND (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_COMPILOBJ_CONSPAIRBIND (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_COMPILOBJ_CONSLISTBIND (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_COMPILOBJ_CONSINSTANCEBIND (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_PUTOBJDEST_OBJVALUE (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_114_warmelt_genobj_PUTOBJDEST_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_115_warmelt_genobj_PUTOBJDEST_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_116_warmelt_genobj_PUTOBJDEST_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_117_warmelt_genobj_PUTOBJDEST_OBJANYBLOCK (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_PUTOBJDEST_OBJMULTIBLOCK (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_PUTOBJDEST_OBJLOOP (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_PUTOBJDEST_OBJEXIT (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_COMPILOBJ_NREP_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_122_warmelt_genobj_COMPILOBJ_NREP_IFISA (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_COMPILOBJ_NREP_IFTUPLESIZED (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_124_warmelt_genobj_COMPILOBJ_NREP_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_125_warmelt_genobj_GETCTYPE_IFVARIADIC (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_126_warmelt_genobj_COMPILOBJ_NREP_VARIADIC_ARGUMENT (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_127_warmelt_genobj_COMPILOBJ_NREP_CONSUMEVARIADIC (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_PUTOBJDEST_OBJCOND (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_COMPILOBJ_NREP_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_130_warmelt_genobj_PUTOBJDEST_OBJCPPIF (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_COMPILOBJ_NREP_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_132_warmelt_genobj_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_133_warmelt_genobj_COMPILOBJ_NREP_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_134_warmelt_genobj_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_135_warmelt_genobj_COMPILOBJ_NREP_MAKEINST (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_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_137_warmelt_genobj_COMPILOBJ_ROUTPROC (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_COMPILOBJ_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_139_warmelt_genobj_COMPIL_DATA_AND_SLOTS_FILL (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_140_warmelt_genobj_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_141_warmelt_genobj_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_142_warmelt_genobj_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_143_warmelt_genobj_DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_144_warmelt_genobj_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_145_warmelt_genobj_COMPILOBJ_DATASYMBOL (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_COMPILOBJ_DATAINSTANCE (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_COMPILOBJ_DATATUPLE (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_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_149_warmelt_genobj_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_150_warmelt_genobj_COMPILOBJ_DATASTRING (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_COMPILOBJ_DATABOXEDINTEGER (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_COMPILOBJ_DATACLOSURE (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_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_154_warmelt_genobj_COMPILOBJ_DATAROUTINE (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_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_156_warmelt_genobj_COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_157_warmelt_genobj_COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_158_warmelt_genobj_COMPILOBJ_NREP_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_159_warmelt_genobj_COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_160_warmelt_genobj_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_161_warmelt_genobj_COMPILOBJ_NREP_CHECK_RUNNING_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_genobj_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_163_warmelt_genobj_COMPILTST_ANYTESTER (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_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_genobj_COMPILOBJ_NREP_MATCH (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_165_warmelt_genobj_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_166_warmelt_genobj_COMPILOBJ_NREP_ALTMATCH (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_167_warmelt_genobj_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_168_warmelt_genobj_COMPILOBJ_NREP_MATCHLABEL (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_169_warmelt_genobj_COMPILOBJ_NREP_MATCHFLAG (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_170_warmelt_genobj_COMPILOBJ_NREP_MATCHDATAINIT (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_171_warmelt_genobj_COMPILOBJ_NREP_MATCHEDATA (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_172_warmelt_genobj_COMPILOBJ_NREP_MATCHJUMP (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_173_warmelt_genobj_NORMTESTER_LABELINSTR (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_174_warmelt_genobj_NORMTESTER_GOTOINSTR (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_175_warmelt_genobj_ENDMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_176_warmelt_genobj_TESTMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_177_warmelt_genobj_NORMTESTER_FREE_OBJLOC_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_178_warmelt_genobj_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_179_warmelt_genobj_COMPILTST_NORMTESTER_ANY (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_180_warmelt_genobj_COMPILTST_NORMTESTER_MATCHER (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_181_warmelt_genobj_COMPILTST_NORMTESTER_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_182_warmelt_genobj_COMPILTST_NORMTESTER_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_183_warmelt_genobj_COMPILTST_NORMTESTER_SAME (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_184_warmelt_genobj_COMPILTST_NORMTESTER_SUCCESS (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_185_warmelt_genobj_COMPILTST_NORMTESTER_ORCLEAR (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_186_warmelt_genobj_COMPILTST_NORMTESTER_ORTRANSMIT (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_187_warmelt_genobj_COMPILTST_NORMTESTER_DISJUNCTION (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_188_warmelt_genobj_COMPILMATCHER_CMATCHER (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_189_warmelt_genobj_LAMBDA___58__ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_190_warmelt_genobj_LAMBDA___59__ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_191_warmelt_genobj_LAMBDA___60__ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_192_warmelt_genobj_LAMBDA___61__ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_193_warmelt_genobj_COMPILMATCHER_FUNMATCHER (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_194_warmelt_genobj_LAMBDA___62__ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_195_warmelt_genobj_LAMBDA___63__ (meltclosure_ptr_t meltclosp_, melt_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_genobj__melt_have_debug_enabled[]; #define melt_have_debug_string meltmodule_warmelt_genobj__melt_have_debug_enabled #else /*!MELT_HAVE_DEBUG */ MELT_EXTERN const char meltmodule_warmelt_genobj__melt_have_debug_disabled[]; #define melt_have_debug_string meltmodule_warmelt_genobj__melt_have_debug_disabled #endif /*!MELT_HAVE_DEBUG */ struct frame_melt_start_this_module_st; void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_0 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_1 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_2 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_3 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_4 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_5 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_6 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_7 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_8 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_9 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_10 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_11 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_12 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_13 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_14 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_15 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_16 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_17 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_18 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_19 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_20 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_21 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_22 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_23 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_24 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_25 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_26 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_27 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_28 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_29 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_30 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_31 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_32 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_33 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_34 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_35 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_36 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_37 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_38 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_39 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_40 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_41 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_42 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_43 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_44 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__initialmeltchunk_45 (struct frame_melt_start_this_module_st *, char *); void MELT_MODULE_VISIBILITY meltmod__warmelt_genobj__forward_or_mark_module_start_frame (struct melt_callframe_st *fp, int marking); #define meltmarking_melt_start_this_module meltmod__warmelt_genobj__forward_or_mark_module_start_frame /**** warmelt-genobj implementations ****/ melt_ptr_t MELT_MODULE_VISIBILITY meltrout_1_warmelt_genobj_MAKE_OBJLOCATEDEXP (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_) { /*variadic */ int variad_MAKE_OBJLOCATEDEXP_ix = 0, variad_MAKE_OBJLOCATEDEXP_len = melt_argdescr_length (meltxargdescr_); #define melt_variadic_length (0+variad_MAKE_OBJLOCATEDEXP_len) #define melt_variadic_index variad_MAKE_OBJLOCATEDEXP_ix long current_blocklevel_signals_meltrout_1_warmelt_genobj_MAKE_OBJLOCATEDEXP_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_genobj_MAKE_OBJLOCATEDEXP_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 41 melt_ptr_t mcfr_varptr[41]; #define MELTFRAM_NBVARNUM 18 long mcfr_varnum[18]; /*others*/ const char *loc_CSTRING__o0; long _spare_; } *meltframptr_ = 0, meltfram__; /*declfrastruct */ #define meltframe meltfram__ /*meltrout_1_warmelt_genobj_MAKE_OBJLOCATEDEXP is not initial declstructinit */ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC)) { /*mark for ggc */ int ix = 0; meltframptr_ = (struct frame_meltrout_1_warmelt_genobj_MAKE_OBJLOCATEDEXP_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 < 41; ix++) if (meltframptr_->mcfr_varptr[ix]) gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]); return NULL; } /*end markggc */ ; memset (&meltfram__, 0, sizeof (meltfram__)); /* declstructinit plain routine meltrout_1_warmelt_genobj_MAKE_OBJLOCATEDEXP nbval 41*/ meltfram__.mcfr_nbvar = 41 /*nbval */ ; meltfram__.mcfr_clos = meltclosp_; meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe; melt_topframe = (struct melt_callframe_st *) &meltfram__; melt_trace_start ("MAKE_OBJLOCATEDEXP", meltcallcount); /*getargs*/ /*getarg#0 */ MELT_LOCATION ("warmelt-genobj.melt:674:/ getarg"); /*_.LOC__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ /*^getarg */ if (meltxargdescr_[0] != MELTBPAR_PTR) { /*getargrest */ variad_MAKE_OBJLOCATEDEXP_ix = variad_MAKE_OBJLOCATEDEXP_len; goto lab_endgetargs; } variad_MAKE_OBJLOCATEDEXP_ix = 1; /*_.CTY__V3*/ meltfptr[2] = (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL; gcc_assert (melt_discr ((melt_ptr_t) ( /*_.CTY__V3*/ meltfptr[2])) != NULL); ; goto lab_endgetargs; lab_endgetargs:; /*body*/ /*^block*/ /*anyblock*/ { #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-genobj.melt:675:/ 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-genobj.melt:675:/ 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-genobj.melt:675:/ 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-genobj.melt"; /*^apply.arg */ argtab[2].meltbp_long = 675; /*^apply.arg */ argtab[3].meltbp_cstring = "make_objlocatedexp loc="; /*^apply.arg */ argtab[4].meltbp_aptr = (melt_ptr_t *) & /*_.LOC__V2*/ meltfptr[1]; /*^apply.arg */ argtab[5].meltbp_cstring = " cty="; /*^apply.arg */ argtab[6].meltbp_aptr = (melt_ptr_t *) & /*_.CTY__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-genobj.melt:675:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0; } ; } else { /*^cond.else */ /*_.IF___V5*/ meltfptr[4] = NULL;; } ; MELT_LOCATION ("warmelt-genobj.melt:675:/ quasiblock"); /*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];; /*^compute */ /*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:675:/ clear"); /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V5*/ meltfptr[4] = 0; /*^clear */ /*clear *//*_.PROGN___V7*/ meltfptr[5] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-genobj.melt:676:/ cppif.then"); /*^block */ /*anyblock */ { /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*_#NULL__L3*/ meltfnum[1] = (( /*_.LOC__V2*/ meltfptr[1]) == NULL);; MELT_LOCATION ("warmelt-genobj.melt:676:/ cond"); /*cond */ if ( /*_#NULL__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ /*_#OR___L4*/ meltfnum[0] = /*_#NULL__L3*/ meltfnum[1];; } else { MELT_LOCATION ("warmelt-genobj.melt:676:/ cond.else"); /*^block */ /*anyblock */ { /*_#IS_A__L5*/ meltfnum[4] = melt_is_instance_of ((melt_ptr_t) ( /*_.LOC__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!DISCR_MIXED_LOCATION */ meltfrout->tabval[2])));; MELT_LOCATION ("warmelt-genobj.melt:676:/ cond"); /*cond */ if ( /*_#IS_A__L5*/ meltfnum[4]) /*then */ { /*^cond.then */ /*_#OR___L6*/ meltfnum[5] = /*_#IS_A__L5*/ meltfnum[4];; } else { MELT_LOCATION ("warmelt-genobj.melt:676:/ cond.else"); /*^block */ /*anyblock */ { /*_#IS_A__L7*/ meltfnum[6] = melt_is_instance_of ((melt_ptr_t) ( /*_.LOC__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!DISCR_MIXED_INTEGER */ meltfrout->tabval[1])));; /*^compute */ /*_#OR___L6*/ meltfnum[5] = /*_#IS_A__L7*/ meltfnum[6];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:676:/ clear"); /*clear *//*_#IS_A__L7*/ meltfnum[6] = 0; } ; } ; /*_#OR___L4*/ meltfnum[0] = /*_#OR___L6*/ meltfnum[5];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:676:/ clear"); /*clear *//*_#IS_A__L5*/ meltfnum[4] = 0; /*^clear */ /*clear *//*_#OR___L6*/ meltfnum[5] = 0; } ; } ; /*^cond */ /*cond */ if ( /*_#OR___L4*/ meltfnum[0]) /*then */ { /*^cond.then */ /*_.IFELSE___V9*/ meltfptr[5] = ( /*nil */ NULL);; } else { MELT_LOCATION ("warmelt-genobj.melt:676:/ cond.else"); /*^block */ /*anyblock */ { { /*^locexp */ melt_assert_failed (("make_objlocatedexp check loc"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (676) ? (676) : __LINE__, __FUNCTION__); ; } ; /*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0; /*epilog */ } ; } ; /*^compute */ /*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:676:/ clear"); /*clear *//*_#NULL__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_#OR___L4*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V8*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-genobj.melt:679:/ cppif.then"); /*^block */ /*anyblock */ { /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*_#IS_A__L8*/ meltfnum[6] = melt_is_instance_of ((melt_ptr_t) ( /*_.CTY__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout-> tabval[3])));; MELT_LOCATION ("warmelt-genobj.melt:679:/ cond"); /*cond */ if ( /*_#IS_A__L8*/ meltfnum[6]) /*then */ { /*^cond.then */ /*_.IFELSE___V11*/ meltfptr[10] = ( /*nil */ NULL);; } else { MELT_LOCATION ("warmelt-genobj.melt:679:/ cond.else"); /*^block */ /*anyblock */ { { /*^locexp */ melt_assert_failed (("make_objlocatedexp check cty"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (679) ? (679) : __LINE__, __FUNCTION__); ; } ; /*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0; /*epilog */ } ; } ; /*^compute */ /*_.IFCPP___V10*/ meltfptr[5] = /*_.IFELSE___V11*/ meltfptr[10];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:679:/ clear"); /*clear *//*_#IS_A__L8*/ meltfnum[6] = 0; /*^clear */ /*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V10*/ meltfptr[5] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION ("warmelt-genobj.melt:680:/ quasiblock"); /*_.ARGLIST__V13*/ meltfptr[12] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[4]))));; MELT_LOCATION ("warmelt-genobj.melt:682:/ loop"); /*loop */ { labloop_ARGLOOP_1:; /*^loopbody */ /*^block */ /*anyblock */ { /*^checksignal */ MELT_CHECK_SIGNAL (); ; MELT_LOCATION ("warmelt-genobj.melt:684:/ cond"); /*cond */ if ( /*ifvariadic nomore */ variad_MAKE_OBJLOCATEDEXP_ix == variad_MAKE_OBJLOCATEDEXP_len) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { /*^compute */ /*consume variadic ! */ variad_MAKE_OBJLOCATEDEXP_ix += 0;; MELT_LOCATION ("warmelt-genobj.melt:685:/ quasiblock"); /*^compute */ /*_.ARGLOOP__V15*/ meltfptr[14] = NULL;; /*^exit */ /*exit */ { goto labexit_ARGLOOP_1; } ; /*epilog */ } ; } else { MELT_LOCATION ("warmelt-genobj.melt:684:/ cond.else"); /*^block */ /*anyblock */ { /*^cond */ /*cond */ if ( /*ifvariadic arg#1 */ variad_MAKE_OBJLOCATEDEXP_ix >= 0 && variad_MAKE_OBJLOCATEDEXP_ix + 1 <= variad_MAKE_OBJLOCATEDEXP_len && meltxargdescr_[variad_MAKE_OBJLOCATEDEXP_ix] == MELTBPAR_LONG) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { /*^compute */ /*_#L__L9*/ meltfnum[4] = /*variadic argument stuff */ meltxargtab_[variad_MAKE_OBJLOCATEDEXP_ix + 0].meltbp_long;; /*^compute */ /*consume variadic LONG ! */ variad_MAKE_OBJLOCATEDEXP_ix += 1;; MELT_LOCATION ("warmelt-genobj.melt:687:/ quasiblock"); /*_.BL__V16*/ meltfptr[15] = (meltgc_new_int ((meltobject_ptr_t) (( /*!DISCR_CONSTANT_INTEGER */ meltfrout-> tabval[5])), ( /*_#L__L9*/ meltfnum[4])));; { MELT_LOCATION ("warmelt-genobj.melt:689:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.ARGLIST__V13*/ meltfptr[12]), (melt_ptr_t) ( /*_.BL__V16*/ meltfptr[15])); } ; MELT_LOCATION ("warmelt-genobj.melt:687:/ clear"); /*clear *//*_.BL__V16*/ meltfptr[15] = 0; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:684:/ clear"); /*clear *//*_#L__L9*/ meltfnum[4] = 0; } ; } else { /*^cond.else */ /*^block */ /*anyblock */ { /*^cond */ /*cond */ if ( /*ifvariadic arg#1 */ variad_MAKE_OBJLOCATEDEXP_ix >= 0 && variad_MAKE_OBJLOCATEDEXP_ix + 1 <= variad_MAKE_OBJLOCATEDEXP_len && meltxargdescr_[variad_MAKE_OBJLOCATEDEXP_ix] == MELTBPAR_CSTRING) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { /*^compute */ /*_?*/ meltfram__.loc_CSTRING__o0 = /*variadic argument stuff */ meltxargtab_[variad_MAKE_OBJLOCATEDEXP_ix + 0].meltbp_cstring;; /*^compute */ /*consume variadic CSTRING ! */ variad_MAKE_OBJLOCATEDEXP_ix += 1;; MELT_LOCATION ("warmelt-genobj.melt:691:/ quasiblock"); /*_.BS__V17*/ meltfptr[15] = (meltgc_new_stringdup ((meltobject_ptr_t) (( /*!DISCR_VERBATIM_STRING */ meltfrout-> tabval[6])), ( /*_?*/ meltfram__.loc_CSTRING__o0)));; { MELT_LOCATION ("warmelt-genobj.melt:693:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.ARGLIST__V13*/ meltfptr[12]), (melt_ptr_t) ( /*_.BS__V17*/ meltfptr[15])); } ; MELT_LOCATION ("warmelt-genobj.melt:691:/ clear"); /*clear *//*_.BS__V17*/ meltfptr[15] = 0; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:684:/ clear"); /*clear *//*_?*/ meltfram__.loc_CSTRING__o0 = 0; } ; } else { /*^cond.else */ /*^block */ /*anyblock */ { /*^cond */ /*cond */ if ( /*ifvariadic arg#1 */ variad_MAKE_OBJLOCATEDEXP_ix >= 0 && variad_MAKE_OBJLOCATEDEXP_ix + 1 <= variad_MAKE_OBJLOCATEDEXP_len && meltxargdescr_[variad_MAKE_OBJLOCATEDEXP_ix] == MELTBPAR_PTR) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { /*^compute */ /*_.V__V18*/ meltfptr[15] = /*variadic argument value */ ((meltxargtab_ [variad_MAKE_OBJLOCATEDEXP_ix + 0]. meltbp_aptr) ? (* (meltxargtab_ [variad_MAKE_OBJLOCATEDEXP_ix + 0].meltbp_aptr)) : NULL);; /*^compute */ /*consume variadic Value ! */ variad_MAKE_OBJLOCATEDEXP_ix += 1;; MELT_LOCATION ("warmelt-genobj.melt:695:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_LIST__L10*/ meltfnum[5] = (melt_magic_discr ((melt_ptr_t) ( /*_.V__V18*/ meltfptr[15])) == MELTOBMAG_LIST);; MELT_LOCATION ("warmelt-genobj.melt:695:/ cond"); /*cond */ if ( /*_#IS_LIST__L10*/ meltfnum[5]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { MELT_LOCATION ("warmelt-genobj.melt:696:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[1]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.V__V18*/ meltfptr[15]; /*_.LIST_APPEND2LIST__V20*/ meltfptr[19] = melt_apply ((meltclosure_ptr_t) (( /*!LIST_APPEND2LIST */ meltfrout->tabval[7])), (melt_ptr_t) ( /*_.ARGLIST__V13*/ meltfptr[12]), (MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*_.IFELSE___V19*/ meltfptr[18] = /*_.LIST_APPEND2LIST__V20*/ meltfptr[19];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:695:/ clear"); /*clear *//*_.LIST_APPEND2LIST__V20*/ meltfptr[19] = 0; } ; } else { /*^cond.else */ /*^block */ /*anyblock */ { MELT_LOCATION ("warmelt-genobj.melt:697:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_MULTIPLE__L11*/ meltfnum[1] = (melt_magic_discr ((melt_ptr_t) ( /*_.V__V18*/ meltfptr[15])) == MELTOBMAG_MULTIPLE);; MELT_LOCATION ("warmelt-genobj.melt:697:/ cond"); /*cond */ if ( /*_#IS_MULTIPLE__L11*/ meltfnum[1]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { /*citerblock FOREACH_IN_MULTIPLE */ { /* start foreach_in_multiple meltcit1__EACHTUP */ long meltcit1__EACHTUP_ln = melt_multiple_length ((melt_ptr_t) /*_.V__V18*/ meltfptr[15]); for ( /*_#IX__L12*/ meltfnum[0] = 0; ( /*_#IX__L12*/ meltfnum[0] >= 0) && ( /*_#IX__L12*/ meltfnum[0] < meltcit1__EACHTUP_ln); /*_#IX__L12*/ meltfnum[0]++) { /*_.CURCOMP__V21*/ meltfptr[19] = melt_multiple_nth ((melt_ptr_t) ( /*_.V__V18*/ meltfptr[15]), /*_#IX__L12*/ meltfnum[0]); { MELT_LOCATION ("warmelt-genobj.melt:701:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.ARGLIST__V13*/ meltfptr[12]), (melt_ptr_t) ( /*_.CURCOMP__V21*/ meltfptr[19])); } ; if ( /*_#IX__L12*/ meltfnum[0] < 0) break; } /* end foreach_in_multiple meltcit1__EACHTUP */ /*citerepilog */ MELT_LOCATION ("warmelt-genobj.melt:698:/ clear"); /*clear *//*_.CURCOMP__V21*/ meltfptr[19] = 0; /*^clear */ /*clear *//*_#IX__L12*/ meltfnum[0] = 0; } /*endciterblock FOREACH_IN_MULTIPLE */ ; /*epilog */ } ; } else { MELT_LOCATION ("warmelt-genobj.melt:697:/ cond.else"); /*^block */ /*anyblock */ { { MELT_LOCATION ("warmelt-genobj.melt:703:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.ARGLIST__V13*/ meltfptr[12]), (melt_ptr_t) ( /*_.V__V18*/ meltfptr[15])); } ; MELT_LOCATION ("warmelt-genobj.melt:702:/ quasiblock"); /*epilog */ } ; } ; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:695:/ clear"); /*clear *//*_#IS_MULTIPLE__L11*/ meltfnum[1] = 0; } ; } ; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:684:/ clear"); /*clear *//*_.V__V18*/ meltfptr[15] = 0; /*^clear */ /*clear *//*_#IS_LIST__L10*/ meltfnum[5] = 0; /*^clear */ /*clear *//*_.IFELSE___V19*/ meltfptr[18] = 0; } ; } else { /*^cond.else */ /*^block */ /*anyblock */ { #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-genobj.melt:705:/ cppif.then"); /*^block */ /*anyblock */ { { /*^locexp */ /*melt_increment_dbgcounter */ #if MELT_HAVE_DEBUG melt_dbgcounter++; #endif ; } ; /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*_#MELT_NEED_DBG__L13*/ meltfnum[6] = /*MELT_NEED_DBG */ #if MELT_HAVE_DEBUG ( /*melt_need_dbg */ melt_need_debug ((int) 0)) #else 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; MELT_LOCATION ("warmelt-genobj.melt:705:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L13*/ meltfnum[6]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { /*_#THE_MELTCALLCOUNT__L14*/ meltfnum[4] = #ifdef meltcallcount meltcallcount /* the_meltcallcount */ #else 0L #endif /* meltcallcount the_meltcallcount */ ;; /*^compute */ /*_.VARIADIC_CTYPE__V24*/ meltfptr[23] = /*variadic_type_code */ #ifdef melt_variadic_index (((melt_variadic_index + 0) >= 0 && (melt_variadic_index + 0) < melt_variadic_length) ? melt_code_to_ctype (meltxargdescr_ [melt_variadic_index + 0] & MELT_ARGDESCR_MAX) : NULL) #else NULL /* no variadic_ctype outside of variadic functions */ #endif /*melt_variadic_index */ ;; MELT_LOCATION ("warmelt-genobj.melt:705:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[5]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L14*/ meltfnum[4]; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ argtab[2].meltbp_long = 705; /*^apply.arg */ argtab[3].meltbp_cstring = "make_objlocatedexp varargctype="; /*^apply.arg */ argtab[4].meltbp_aptr = (melt_ptr_t *) & /*_.VARIADIC_CTYPE__V24*/ meltfptr[23]; /*_.MELT_DEBUG_FUN__V25*/ meltfptr[24] = melt_apply ((meltclosure_ptr_t) (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[0])), (melt_ptr_t) (( /*nil */ NULL)), (MELTBPARSTR_LONG MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_CSTRING MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*_.IF___V23*/ meltfptr[18] = /*_.MELT_DEBUG_FUN__V25*/ meltfptr[24];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:705:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L14*/ meltfnum[4] = 0; /*^clear */ /*clear *//*_.VARIADIC_CTYPE__V24*/ meltfptr[23] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V25*/ meltfptr[24] = 0; } ; } else { /*^cond.else */ /*_.IF___V23*/ meltfptr[18] = NULL;; } ; MELT_LOCATION ("warmelt-genobj.melt:705:/ quasiblock"); /*_.PROGN___V26*/ meltfptr[23] = /*_.IF___V23*/ meltfptr[18];; /*^compute */ /*_.IFCPP___V22*/ meltfptr[15] = /*_.PROGN___V26*/ meltfptr[23];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:705:/ clear"); /*clear *//*_#MELT_NEED_DBG__L13*/ meltfnum[6] = 0; /*^clear */ /*clear *//*_.IF___V23*/ meltfptr[18] = 0; /*^clear */ /*clear *//*_.PROGN___V26*/ meltfptr[23] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V22*/ meltfptr[15] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-genobj.melt:706:/ cppif.then"); /*^block */ /*anyblock */ { /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*^cond */ /*cond */ if (( /*nil */ NULL)) /*then */ { /*^cond.then */ /*_.IFELSE___V28*/ meltfptr[18] = ( /*nil */ NULL);; } else { MELT_LOCATION ("warmelt-genobj.melt:706:/ cond.else"); /*^block */ /*anyblock */ { { /*^locexp */ melt_assert_failed (("unexpected variable argument for make_objlocatedexp"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (706) ? (706) : __LINE__, __FUNCTION__); ; } ; /*clear *//*_.IFELSE___V28*/ meltfptr[18] = 0; /*epilog */ } ; } ; /*^compute */ /*_.IFCPP___V27*/ meltfptr[24] = /*_.IFELSE___V28*/ meltfptr[18];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:706:/ clear"); /*clear *//*_.IFELSE___V28*/ meltfptr[18] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V27*/ meltfptr[24] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION ("warmelt-genobj.melt:684:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ /*^clear */ /*clear *//*_.IFCPP___V22*/ meltfptr[15] = 0; /*^clear */ /*clear *//*_.IFCPP___V27*/ meltfptr[24] = 0; } ; } ; /*epilog */ } ; } ; /*epilog */ } ; } ; /*epilog */ } ; } ; /*epilog */ } ; ; goto labloop_ARGLOOP_1; labexit_ARGLOOP_1:; MELT_LOCATION ("warmelt-genobj.melt:682:/ loopepilog"); /*loopepilog */ /*_.FOREVER___V14*/ meltfptr[13] = /*_.ARGLOOP__V15*/ meltfptr[14];; } ; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-genobj.melt:708:/ cppif.then"); /*^block */ /*anyblock */ { { /*^locexp */ /*melt_increment_dbgcounter */ #if MELT_HAVE_DEBUG melt_dbgcounter++; #endif ; } ; /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*_#MELT_NEED_DBG__L15*/ meltfnum[1] = /*MELT_NEED_DBG */ #if MELT_HAVE_DEBUG ( /*melt_need_dbg */ melt_need_debug ((int) 0)) #else 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; MELT_LOCATION ("warmelt-genobj.melt:708:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L15*/ meltfnum[1]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { /*_#THE_MELTCALLCOUNT__L16*/ meltfnum[5] = #ifdef meltcallcount meltcallcount /* the_meltcallcount */ #else 0L #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION ("warmelt-genobj.melt:708:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[5]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L16*/ meltfnum[5]; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ argtab[2].meltbp_long = 708; /*^apply.arg */ argtab[3].meltbp_cstring = "make_objlocatedexp arglist="; /*^apply.arg */ argtab[4].meltbp_aptr = (melt_ptr_t *) & /*_.ARGLIST__V13*/ meltfptr[12]; /*_.MELT_DEBUG_FUN__V31*/ meltfptr[15] = melt_apply ((meltclosure_ptr_t) (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[0])), (melt_ptr_t) (( /*nil */ NULL)), (MELTBPARSTR_LONG MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_CSTRING MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*_.IF___V30*/ meltfptr[18] = /*_.MELT_DEBUG_FUN__V31*/ meltfptr[15];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:708:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L16*/ meltfnum[5] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V31*/ meltfptr[15] = 0; } ; } else { /*^cond.else */ /*_.IF___V30*/ meltfptr[18] = NULL;; } ; MELT_LOCATION ("warmelt-genobj.melt:708:/ quasiblock"); /*_.PROGN___V32*/ meltfptr[24] = /*_.IF___V30*/ meltfptr[18];; /*^compute */ /*_.IFCPP___V29*/ meltfptr[23] = /*_.PROGN___V32*/ meltfptr[24];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:708:/ clear"); /*clear *//*_#MELT_NEED_DBG__L15*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V30*/ meltfptr[18] = 0; /*^clear */ /*clear *//*_.PROGN___V32*/ meltfptr[24] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V29*/ meltfptr[23] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION ("warmelt-genobj.melt:709:/ quasiblock"); MELT_LOCATION ("warmelt-genobj.melt:710:/ checksignal"); MELT_CHECK_SIGNAL (); ; MELT_LOCATION ("warmelt-genobj.melt:712:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[1]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & ( /*!DISCR_MULTIPLE */ meltfrout->tabval[10]); /*_.LIST_TO_MULTIPLE__V34*/ meltfptr[18] = melt_apply ((meltclosure_ptr_t) (( /*!LIST_TO_MULTIPLE */ meltfrout->tabval[9])), (melt_ptr_t) ( /*_.ARGLIST__V13*/ meltfptr[12]), (MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; MELT_LOCATION ("warmelt-genobj.melt:710:/ quasiblock"); /*^rawallocobj */ /*rawallocobj */ { melt_ptr_t newobj = 0; melt_raw_object_create (newobj, (melt_ptr_t) (( /*!CLASS_OBJLOCATEDEXPV */ meltfrout->tabval[8])), (3), "CLASS_OBJLOCATEDEXPV"); /*_.INST__V36*/ meltfptr[35] = newobj; }; ; /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj @OBV_TYPE", melt_magic_discr ((melt_ptr_t) ( /*_.INST__V36*/ meltfptr[35])) == MELTOBMAG_OBJECT); melt_putfield_object (( /*_.INST__V36*/ meltfptr[35]), (0), ( /*_.CTY__V3*/ meltfptr[2]), "OBV_TYPE"); ; /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj @OBX_CONT", melt_magic_discr ((melt_ptr_t) ( /*_.INST__V36*/ meltfptr[35])) == MELTOBMAG_OBJECT); melt_putfield_object (( /*_.INST__V36*/ meltfptr[35]), (1), ( /*_.LIST_TO_MULTIPLE__V34*/ meltfptr[18]), "OBX_CONT"); ; /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj @OBCX_LOC", melt_magic_discr ((melt_ptr_t) ( /*_.INST__V36*/ meltfptr[35])) == MELTOBMAG_OBJECT); melt_putfield_object (( /*_.INST__V36*/ meltfptr[35]), (2), ( /*_.LOC__V2*/ meltfptr[1]), "OBCX_LOC"); ; /*^touchobj */ melt_dbgtrace_written_object ( /*_.INST__V36*/ meltfptr[35], "newly made instance"); ; /*_.RES__V35*/ meltfptr[24] = /*_.INST__V36*/ meltfptr[35];; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-genobj.melt:715:/ cppif.then"); /*^block */ /*anyblock */ { { /*^locexp */ /*melt_increment_dbgcounter */ #if MELT_HAVE_DEBUG melt_dbgcounter++; #endif ; } ; /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*_#MELT_NEED_DBG__L17*/ 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-genobj.melt:715:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L17*/ meltfnum[4]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { /*_#THE_MELTCALLCOUNT__L18*/ meltfnum[6] = #ifdef meltcallcount meltcallcount /* the_meltcallcount */ #else 0L #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION ("warmelt-genobj.melt:715:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[5]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L18*/ meltfnum[6]; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ argtab[2].meltbp_long = 715; /*^apply.arg */ argtab[3].meltbp_cstring = "make_objlocatedexp res="; /*^apply.arg */ argtab[4].meltbp_aptr = (melt_ptr_t *) & /*_.RES__V35*/ meltfptr[24]; /*_.MELT_DEBUG_FUN__V39*/ meltfptr[38] = melt_apply ((meltclosure_ptr_t) (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[0])), (melt_ptr_t) (( /*nil */ NULL)), (MELTBPARSTR_LONG MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_CSTRING MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*_.IF___V38*/ meltfptr[37] = /*_.MELT_DEBUG_FUN__V39*/ meltfptr[38];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:715:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L18*/ meltfnum[6] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V39*/ meltfptr[38] = 0; } ; } else { /*^cond.else */ /*_.IF___V38*/ meltfptr[37] = NULL;; } ; MELT_LOCATION ("warmelt-genobj.melt:715:/ quasiblock"); /*_.PROGN___V40*/ meltfptr[38] = /*_.IF___V38*/ meltfptr[37];; /*^compute */ /*_.IFCPP___V37*/ meltfptr[36] = /*_.PROGN___V40*/ meltfptr[38];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:715:/ clear"); /*clear *//*_#MELT_NEED_DBG__L17*/ meltfnum[4] = 0; /*^clear */ /*clear *//*_.IF___V38*/ meltfptr[37] = 0; /*^clear */ /*clear *//*_.PROGN___V40*/ meltfptr[38] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V37*/ meltfptr[36] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION ("warmelt-genobj.melt:716:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V35*/ meltfptr[24];; { MELT_LOCATION ("warmelt-genobj.melt:716:/ 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___V33*/ meltfptr[15] = /*_.RETURN___V41*/ meltfptr[37];; MELT_LOCATION ("warmelt-genobj.melt:709:/ clear"); /*clear *//*_.LIST_TO_MULTIPLE__V34*/ meltfptr[18] = 0; /*^clear */ /*clear *//*_.RES__V35*/ meltfptr[24] = 0; /*^clear */ /*clear *//*_.IFCPP___V37*/ meltfptr[36] = 0; /*^clear */ /*clear *//*_.RETURN___V41*/ meltfptr[37] = 0; /*_.LET___V12*/ meltfptr[10] = /*_.LET___V33*/ meltfptr[15];; MELT_LOCATION ("warmelt-genobj.melt:680:/ clear"); /*clear *//*_.ARGLIST__V13*/ meltfptr[12] = 0; /*^clear */ /*clear *//*_.FOREVER___V14*/ meltfptr[13] = 0; /*^clear */ /*clear *//*_.IFCPP___V29*/ meltfptr[23] = 0; /*^clear */ /*clear *//*_.LET___V33*/ meltfptr[15] = 0; MELT_LOCATION ("warmelt-genobj.melt:674:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; { MELT_LOCATION ("warmelt-genobj.melt:674:/ 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 *//*_.IFCPP___V10*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_.LET___V12*/ meltfptr[10] = 0; } ; goto labend_rout; labend_rout: melt_trace_end ("MAKE_OBJLOCATEDEXP", meltcallcount); MELT_TRACE_EXIT_LOCATION (); melt_blocklevel_signals = current_blocklevel_signals_meltrout_1_warmelt_genobj_MAKE_OBJLOCATEDEXP_melt; melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev; return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]); #undef melt_variadic_length #undef melt_variadic_index #undef meltcallcount #undef meltfram__ #undef MELTFRAM_NBVARNUM #undef MELTFRAM_NBVARPTR } /*end meltrout_1_warmelt_genobj_MAKE_OBJLOCATEDEXP */ melt_ptr_t MELT_MODULE_VISIBILITY meltrout_2_warmelt_genobj_MAKE_OBJCOMPUTE (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un * meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un * meltxrestab_) { /*variadic */ int variad_MAKE_OBJCOMPUTE_ix = 0, variad_MAKE_OBJCOMPUTE_len = melt_argdescr_length (meltxargdescr_); #define melt_variadic_length (0+variad_MAKE_OBJCOMPUTE_len) #define melt_variadic_index variad_MAKE_OBJCOMPUTE_ix long current_blocklevel_signals_meltrout_2_warmelt_genobj_MAKE_OBJCOMPUTE_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_genobj_MAKE_OBJCOMPUTE_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 42 melt_ptr_t mcfr_varptr[42]; #define MELTFRAM_NBVARNUM 16 long mcfr_varnum[16]; /*others*/ const char *loc_CSTRING__o0; long _spare_; } *meltframptr_ = 0, meltfram__; /*declfrastruct */ #define meltframe meltfram__ /*meltrout_2_warmelt_genobj_MAKE_OBJCOMPUTE is not initial declstructinit */ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC)) { /*mark for ggc */ int ix = 0; meltframptr_ = (struct frame_meltrout_2_warmelt_genobj_MAKE_OBJCOMPUTE_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 < 42; ix++) if (meltframptr_->mcfr_varptr[ix]) gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]); return NULL; } /*end markggc */ ; memset (&meltfram__, 0, sizeof (meltfram__)); /* declstructinit plain routine meltrout_2_warmelt_genobj_MAKE_OBJCOMPUTE nbval 42*/ meltfram__.mcfr_nbvar = 42 /*nbval */ ; meltfram__.mcfr_clos = meltclosp_; meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe; melt_topframe = (struct melt_callframe_st *) &meltfram__; melt_trace_start ("MAKE_OBJCOMPUTE", meltcallcount); /*getargs*/ /*getarg#0 */ MELT_LOCATION ("warmelt-genobj.melt:720:/ getarg"); /*_.LOC__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ /*^getarg */ if (meltxargdescr_[0] != MELTBPAR_PTR) { /*getargrest */ variad_MAKE_OBJCOMPUTE_ix = variad_MAKE_OBJCOMPUTE_len; goto lab_endgetargs; } variad_MAKE_OBJCOMPUTE_ix = 1; /*_.CTYP__V3*/ meltfptr[2] = (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL; gcc_assert (melt_discr ((melt_ptr_t) ( /*_.CTYP__V3*/ meltfptr[2])) != NULL); ; goto lab_endgetargs; lab_endgetargs:; /*body*/ /*^block*/ /*anyblock*/ { #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-genobj.melt:721:/ 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-genobj.melt:721:/ 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-genobj.melt:721:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[5]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1]; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ argtab[2].meltbp_long = 721; /*^apply.arg */ argtab[3].meltbp_cstring = "make_objcompute loc="; /*^apply.arg */ argtab[4].meltbp_aptr = (melt_ptr_t *) & /*_.LOC__V2*/ meltfptr[1]; /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = melt_apply ((meltclosure_ptr_t) (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[0])), (melt_ptr_t) (( /*nil */ NULL)), (MELTBPARSTR_LONG MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_CSTRING MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:721:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0; } ; } else { /*^cond.else */ /*_.IF___V5*/ meltfptr[4] = NULL;; } ; MELT_LOCATION ("warmelt-genobj.melt:721:/ quasiblock"); /*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];; /*^compute */ /*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:721:/ clear"); /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V5*/ meltfptr[4] = 0; /*^clear */ /*clear *//*_.PROGN___V7*/ meltfptr[5] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-genobj.melt:722:/ cppif.then"); /*^block */ /*anyblock */ { /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*_#NULL__L3*/ meltfnum[1] = (( /*_.LOC__V2*/ meltfptr[1]) == NULL);; MELT_LOCATION ("warmelt-genobj.melt:722:/ cond"); /*cond */ if ( /*_#NULL__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ /*_#OR___L4*/ meltfnum[0] = /*_#NULL__L3*/ meltfnum[1];; } else { MELT_LOCATION ("warmelt-genobj.melt:722:/ cond.else"); /*^block */ /*anyblock */ { /*_#IS_A__L5*/ meltfnum[4] = melt_is_instance_of ((melt_ptr_t) ( /*_.LOC__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!DISCR_MIXED_LOCATION */ meltfrout->tabval[1])));; /*^compute */ /*_#OR___L4*/ meltfnum[0] = /*_#IS_A__L5*/ meltfnum[4];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:722:/ clear"); /*clear *//*_#IS_A__L5*/ meltfnum[4] = 0; } ; } ; /*^cond */ /*cond */ if ( /*_#OR___L4*/ meltfnum[0]) /*then */ { /*^cond.then */ /*_.IFELSE___V9*/ meltfptr[5] = ( /*nil */ NULL);; } else { MELT_LOCATION ("warmelt-genobj.melt:722:/ cond.else"); /*^block */ /*anyblock */ { { /*^locexp */ melt_assert_failed (("make_objcompute check loc"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (722) ? (722) : __LINE__, __FUNCTION__); ; } ; /*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0; /*epilog */ } ; } ; /*^compute */ /*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:722:/ clear"); /*clear *//*_#NULL__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_#OR___L4*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V8*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-genobj.melt:723:/ cppif.then"); /*^block */ /*anyblock */ { /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*_#IS_A__L6*/ meltfnum[4] = melt_is_instance_of ((melt_ptr_t) ( /*_.CTYP__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout-> tabval[2])));; MELT_LOCATION ("warmelt-genobj.melt:723:/ cond"); /*cond */ if ( /*_#IS_A__L6*/ meltfnum[4]) /*then */ { /*^cond.then */ /*_.IFELSE___V11*/ meltfptr[10] = ( /*nil */ NULL);; } else { MELT_LOCATION ("warmelt-genobj.melt:723:/ cond.else"); /*^block */ /*anyblock */ { { /*^locexp */ melt_assert_failed (("make_objcompute check ctyp"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (723) ? (723) : __LINE__, __FUNCTION__); ; } ; /*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0; /*epilog */ } ; } ; /*^compute */ /*_.IFCPP___V10*/ meltfptr[5] = /*_.IFELSE___V11*/ meltfptr[10];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:723:/ clear"); /*clear *//*_#IS_A__L6*/ meltfnum[4] = 0; /*^clear */ /*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V10*/ meltfptr[5] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION ("warmelt-genobj.melt:724:/ quasiblock"); /*_.ARGLIST__V13*/ meltfptr[12] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[3]))));; MELT_LOCATION ("warmelt-genobj.melt:726:/ loop"); /*loop */ { labloop_ARGLOOP_2:; /*^loopbody */ /*^block */ /*anyblock */ { /*^checksignal */ MELT_CHECK_SIGNAL (); ; MELT_LOCATION ("warmelt-genobj.melt:728:/ cond"); /*cond */ if ( /*ifvariadic nomore */ variad_MAKE_OBJCOMPUTE_ix == variad_MAKE_OBJCOMPUTE_len) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { /*^compute */ /*consume variadic ! */ variad_MAKE_OBJCOMPUTE_ix += 0;; MELT_LOCATION ("warmelt-genobj.melt:729:/ quasiblock"); /*^compute */ /*_.ARGLOOP__V15*/ meltfptr[14] = NULL;; /*^exit */ /*exit */ { goto labexit_ARGLOOP_2; } ; /*epilog */ } ; } else { MELT_LOCATION ("warmelt-genobj.melt:728:/ cond.else"); /*^block */ /*anyblock */ { /*^cond */ /*cond */ if ( /*ifvariadic arg#1 */ variad_MAKE_OBJCOMPUTE_ix >= 0 && variad_MAKE_OBJCOMPUTE_ix + 1 <= variad_MAKE_OBJCOMPUTE_len && meltxargdescr_[variad_MAKE_OBJCOMPUTE_ix] == MELTBPAR_LONG) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { /*^compute */ /*_#L__L7*/ meltfnum[1] = /*variadic argument stuff */ meltxargtab_[variad_MAKE_OBJCOMPUTE_ix + 0].meltbp_long;; /*^compute */ /*consume variadic LONG ! */ variad_MAKE_OBJCOMPUTE_ix += 1;; MELT_LOCATION ("warmelt-genobj.melt:731:/ quasiblock"); /*_.BL__V16*/ meltfptr[15] = (meltgc_new_int ((meltobject_ptr_t) (( /*!DISCR_CONSTANT_INTEGER */ meltfrout-> tabval[4])), ( /*_#L__L7*/ meltfnum[1])));; { MELT_LOCATION ("warmelt-genobj.melt:733:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.ARGLIST__V13*/ meltfptr[12]), (melt_ptr_t) ( /*_.BL__V16*/ meltfptr[15])); } ; MELT_LOCATION ("warmelt-genobj.melt:731:/ clear"); /*clear *//*_.BL__V16*/ meltfptr[15] = 0; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:728:/ clear"); /*clear *//*_#L__L7*/ meltfnum[1] = 0; } ; } else { /*^cond.else */ /*^block */ /*anyblock */ { /*^cond */ /*cond */ if ( /*ifvariadic arg#1 */ variad_MAKE_OBJCOMPUTE_ix >= 0 && variad_MAKE_OBJCOMPUTE_ix + 1 <= variad_MAKE_OBJCOMPUTE_len && meltxargdescr_[variad_MAKE_OBJCOMPUTE_ix] == MELTBPAR_CSTRING) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { /*^compute */ /*_?*/ meltfram__.loc_CSTRING__o0 = /*variadic argument stuff */ meltxargtab_[variad_MAKE_OBJCOMPUTE_ix + 0].meltbp_cstring;; /*^compute */ /*consume variadic CSTRING ! */ variad_MAKE_OBJCOMPUTE_ix += 1;; MELT_LOCATION ("warmelt-genobj.melt:735:/ quasiblock"); /*_.BS__V17*/ meltfptr[15] = (meltgc_new_stringdup ((meltobject_ptr_t) (( /*!DISCR_VERBATIM_STRING */ meltfrout-> tabval[5])), ( /*_?*/ meltfram__.loc_CSTRING__o0)));; { MELT_LOCATION ("warmelt-genobj.melt:737:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.ARGLIST__V13*/ meltfptr[12]), (melt_ptr_t) ( /*_.BS__V17*/ meltfptr[15])); } ; MELT_LOCATION ("warmelt-genobj.melt:735:/ clear"); /*clear *//*_.BS__V17*/ meltfptr[15] = 0; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:728:/ clear"); /*clear *//*_?*/ meltfram__.loc_CSTRING__o0 = 0; } ; } else { /*^cond.else */ /*^block */ /*anyblock */ { /*^cond */ /*cond */ if ( /*ifvariadic arg#1 */ variad_MAKE_OBJCOMPUTE_ix >= 0 && variad_MAKE_OBJCOMPUTE_ix + 1 <= variad_MAKE_OBJCOMPUTE_len && meltxargdescr_[variad_MAKE_OBJCOMPUTE_ix] == MELTBPAR_PTR) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { /*^compute */ /*_.V__V18*/ meltfptr[15] = /*variadic argument value */ ((meltxargtab_ [variad_MAKE_OBJCOMPUTE_ix + 0]. meltbp_aptr) ? (* (meltxargtab_ [variad_MAKE_OBJCOMPUTE_ix + 0].meltbp_aptr)) : NULL);; /*^compute */ /*consume variadic Value ! */ variad_MAKE_OBJCOMPUTE_ix += 1;; MELT_LOCATION ("warmelt-genobj.melt:739:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_LIST__L8*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.V__V18*/ meltfptr[15])) == MELTOBMAG_LIST);; MELT_LOCATION ("warmelt-genobj.melt:739:/ cond"); /*cond */ if ( /*_#IS_LIST__L8*/ meltfnum[0]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { MELT_LOCATION ("warmelt-genobj.melt:740:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[1]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.V__V18*/ meltfptr[15]; /*_.LIST_APPEND2LIST__V20*/ meltfptr[19] = melt_apply ((meltclosure_ptr_t) (( /*!LIST_APPEND2LIST */ meltfrout->tabval[6])), (melt_ptr_t) ( /*_.ARGLIST__V13*/ meltfptr[12]), (MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*_.IFELSE___V19*/ meltfptr[18] = /*_.LIST_APPEND2LIST__V20*/ meltfptr[19];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:739:/ clear"); /*clear *//*_.LIST_APPEND2LIST__V20*/ meltfptr[19] = 0; } ; } else { /*^cond.else */ /*^block */ /*anyblock */ { MELT_LOCATION ("warmelt-genobj.melt:741:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_MULTIPLE__L9*/ meltfnum[4] = (melt_magic_discr ((melt_ptr_t) ( /*_.V__V18*/ meltfptr[15])) == MELTOBMAG_MULTIPLE);; MELT_LOCATION ("warmelt-genobj.melt:741:/ cond"); /*cond */ if ( /*_#IS_MULTIPLE__L9*/ meltfnum[4]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { /*citerblock FOREACH_IN_MULTIPLE */ { /* start foreach_in_multiple meltcit1__EACHTUP */ long meltcit1__EACHTUP_ln = melt_multiple_length ((melt_ptr_t) /*_.V__V18*/ meltfptr[15]); for ( /*_#IX__L10*/ meltfnum[1] = 0; ( /*_#IX__L10*/ meltfnum[1] >= 0) && ( /*_#IX__L10*/ meltfnum[1] < meltcit1__EACHTUP_ln); /*_#IX__L10*/ meltfnum[1]++) { /*_.CURCOMP__V21*/ meltfptr[19] = melt_multiple_nth ((melt_ptr_t) ( /*_.V__V18*/ meltfptr[15]), /*_#IX__L10*/ meltfnum[1]); { MELT_LOCATION ("warmelt-genobj.melt:745:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.ARGLIST__V13*/ meltfptr[12]), (melt_ptr_t) ( /*_.CURCOMP__V21*/ meltfptr[19])); } ; if ( /*_#IX__L10*/ meltfnum[1] < 0) break; } /* end foreach_in_multiple meltcit1__EACHTUP */ /*citerepilog */ MELT_LOCATION ("warmelt-genobj.melt:742:/ clear"); /*clear *//*_.CURCOMP__V21*/ meltfptr[19] = 0; /*^clear */ /*clear *//*_#IX__L10*/ meltfnum[1] = 0; } /*endciterblock FOREACH_IN_MULTIPLE */ ; /*epilog */ } ; } else { MELT_LOCATION ("warmelt-genobj.melt:741:/ cond.else"); /*^block */ /*anyblock */ { { MELT_LOCATION ("warmelt-genobj.melt:747:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.ARGLIST__V13*/ meltfptr[12]), (melt_ptr_t) ( /*_.V__V18*/ meltfptr[15])); } ; MELT_LOCATION ("warmelt-genobj.melt:746:/ quasiblock"); /*epilog */ } ; } ; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:739:/ clear"); /*clear *//*_#IS_MULTIPLE__L9*/ meltfnum[4] = 0; } ; } ; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:728:/ clear"); /*clear *//*_.V__V18*/ meltfptr[15] = 0; /*^clear */ /*clear *//*_#IS_LIST__L8*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V19*/ meltfptr[18] = 0; } ; } else { /*^cond.else */ /*^block */ /*anyblock */ { #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-genobj.melt:749:/ cppif.then"); /*^block */ /*anyblock */ { { /*^locexp */ /*melt_increment_dbgcounter */ #if MELT_HAVE_DEBUG melt_dbgcounter++; #endif ; } ; /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*_#MELT_NEED_DBG__L11*/ 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-genobj.melt:749:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L11*/ meltfnum[4]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { /*_#THE_MELTCALLCOUNT__L12*/ meltfnum[0] = #ifdef meltcallcount meltcallcount /* the_meltcallcount */ #else 0L #endif /* meltcallcount the_meltcallcount */ ;; /*^compute */ /*_.VARIADIC_CTYPE__V24*/ meltfptr[23] = /*variadic_type_code */ #ifdef melt_variadic_index (((melt_variadic_index + 0) >= 0 && (melt_variadic_index + 0) < melt_variadic_length) ? melt_code_to_ctype (meltxargdescr_ [melt_variadic_index + 0] & MELT_ARGDESCR_MAX) : NULL) #else NULL /* no variadic_ctype outside of variadic functions */ #endif /*melt_variadic_index */ ;; MELT_LOCATION ("warmelt-genobj.melt:749:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[5]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L12*/ meltfnum[0]; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ argtab[2].meltbp_long = 749; /*^apply.arg */ argtab[3].meltbp_cstring = "make_objcompute varargctype="; /*^apply.arg */ argtab[4].meltbp_aptr = (melt_ptr_t *) & /*_.VARIADIC_CTYPE__V24*/ meltfptr[23]; /*_.MELT_DEBUG_FUN__V25*/ meltfptr[24] = melt_apply ((meltclosure_ptr_t) (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[0])), (melt_ptr_t) (( /*nil */ NULL)), (MELTBPARSTR_LONG MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_CSTRING MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*_.IF___V23*/ meltfptr[18] = /*_.MELT_DEBUG_FUN__V25*/ meltfptr[24];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:749:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L12*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.VARIADIC_CTYPE__V24*/ meltfptr[23] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V25*/ meltfptr[24] = 0; } ; } else { /*^cond.else */ /*_.IF___V23*/ meltfptr[18] = NULL;; } ; MELT_LOCATION ("warmelt-genobj.melt:749:/ quasiblock"); /*_.PROGN___V26*/ meltfptr[23] = /*_.IF___V23*/ meltfptr[18];; /*^compute */ /*_.IFCPP___V22*/ meltfptr[15] = /*_.PROGN___V26*/ meltfptr[23];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:749:/ clear"); /*clear *//*_#MELT_NEED_DBG__L11*/ meltfnum[4] = 0; /*^clear */ /*clear *//*_.IF___V23*/ meltfptr[18] = 0; /*^clear */ /*clear *//*_.PROGN___V26*/ meltfptr[23] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V22*/ meltfptr[15] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-genobj.melt:750:/ cppif.then"); /*^block */ /*anyblock */ { /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*^cond */ /*cond */ if (( /*nil */ NULL)) /*then */ { /*^cond.then */ /*_.IFELSE___V28*/ meltfptr[18] = ( /*nil */ NULL);; } else { MELT_LOCATION ("warmelt-genobj.melt:750:/ cond.else"); /*^block */ /*anyblock */ { { /*^locexp */ melt_assert_failed (("unexpected variable argument for make_objcompute"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (750) ? (750) : __LINE__, __FUNCTION__); ; } ; /*clear *//*_.IFELSE___V28*/ meltfptr[18] = 0; /*epilog */ } ; } ; /*^compute */ /*_.IFCPP___V27*/ meltfptr[24] = /*_.IFELSE___V28*/ meltfptr[18];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:750:/ clear"); /*clear *//*_.IFELSE___V28*/ meltfptr[18] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V27*/ meltfptr[24] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION ("warmelt-genobj.melt:728:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ /*^clear */ /*clear *//*_.IFCPP___V22*/ meltfptr[15] = 0; /*^clear */ /*clear *//*_.IFCPP___V27*/ meltfptr[24] = 0; } ; } ; /*epilog */ } ; } ; /*epilog */ } ; } ; /*epilog */ } ; } ; /*epilog */ } ; ; goto labloop_ARGLOOP_2; labexit_ARGLOOP_2:; MELT_LOCATION ("warmelt-genobj.melt:726:/ loopepilog"); /*loopepilog */ /*_.FOREVER___V14*/ meltfptr[13] = /*_.ARGLOOP__V15*/ meltfptr[14];; } ; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-genobj.melt:752:/ cppif.then"); /*^block */ /*anyblock */ { { /*^locexp */ /*melt_increment_dbgcounter */ #if MELT_HAVE_DEBUG melt_dbgcounter++; #endif ; } ; /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*_#MELT_NEED_DBG__L13*/ meltfnum[0] = /*MELT_NEED_DBG */ #if MELT_HAVE_DEBUG ( /*melt_need_dbg */ melt_need_debug ((int) 0)) #else 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; MELT_LOCATION ("warmelt-genobj.melt:752:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L13*/ meltfnum[0]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { /*_#THE_MELTCALLCOUNT__L14*/ meltfnum[4] = #ifdef meltcallcount meltcallcount /* the_meltcallcount */ #else 0L #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION ("warmelt-genobj.melt:752:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[5]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L14*/ meltfnum[4]; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ argtab[2].meltbp_long = 752; /*^apply.arg */ argtab[3].meltbp_cstring = "make_objcompute arglist="; /*^apply.arg */ argtab[4].meltbp_aptr = (melt_ptr_t *) & /*_.ARGLIST__V13*/ meltfptr[12]; /*_.MELT_DEBUG_FUN__V31*/ meltfptr[15] = melt_apply ((meltclosure_ptr_t) (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[0])), (melt_ptr_t) (( /*nil */ NULL)), (MELTBPARSTR_LONG MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_CSTRING MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*_.IF___V30*/ meltfptr[18] = /*_.MELT_DEBUG_FUN__V31*/ meltfptr[15];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:752:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L14*/ meltfnum[4] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V31*/ meltfptr[15] = 0; } ; } else { /*^cond.else */ /*_.IF___V30*/ meltfptr[18] = NULL;; } ; MELT_LOCATION ("warmelt-genobj.melt:752:/ quasiblock"); /*_.PROGN___V32*/ meltfptr[24] = /*_.IF___V30*/ meltfptr[18];; /*^compute */ /*_.IFCPP___V29*/ meltfptr[23] = /*_.PROGN___V32*/ meltfptr[24];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:752:/ clear"); /*clear *//*_#MELT_NEED_DBG__L13*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V30*/ meltfptr[18] = 0; /*^clear */ /*clear *//*_.PROGN___V32*/ meltfptr[24] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V29*/ meltfptr[23] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION ("warmelt-genobj.melt:753:/ quasiblock"); MELT_LOCATION ("warmelt-genobj.melt:754:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.MAKE_LIST__V34*/ meltfptr[18] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[3]))));; MELT_LOCATION ("warmelt-genobj.melt:756:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[1]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & ( /*!DISCR_MULTIPLE */ meltfrout->tabval[9]); /*_.LIST_TO_MULTIPLE__V35*/ meltfptr[24] = melt_apply ((meltclosure_ptr_t) (( /*!LIST_TO_MULTIPLE */ meltfrout->tabval[8])), (melt_ptr_t) ( /*_.ARGLIST__V13*/ meltfptr[12]), (MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; MELT_LOCATION ("warmelt-genobj.melt:754:/ quasiblock"); /*^rawallocobj */ /*rawallocobj */ { melt_ptr_t newobj = 0; melt_raw_object_create (newobj, (melt_ptr_t) (( /*!CLASS_OBJCOMPUTE */ meltfrout->tabval[7])), (4), "CLASS_OBJCOMPUTE"); /*_.INST__V37*/ meltfptr[36] = newobj; }; ; /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj @OBDI_DESTLIST", melt_magic_discr ((melt_ptr_t) ( /*_.INST__V37*/ meltfptr[36])) == MELTOBMAG_OBJECT); melt_putfield_object (( /*_.INST__V37*/ meltfptr[36]), (1), ( /*_.MAKE_LIST__V34*/ meltfptr[18]), "OBDI_DESTLIST"); ; /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj @OBCPT_EXPR", melt_magic_discr ((melt_ptr_t) ( /*_.INST__V37*/ meltfptr[36])) == MELTOBMAG_OBJECT); melt_putfield_object (( /*_.INST__V37*/ meltfptr[36]), (2), ( /*_.LIST_TO_MULTIPLE__V35*/ meltfptr[24]), "OBCPT_EXPR"); ; /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj @OBCPT_TYPE", melt_magic_discr ((melt_ptr_t) ( /*_.INST__V37*/ meltfptr[36])) == MELTOBMAG_OBJECT); melt_putfield_object (( /*_.INST__V37*/ meltfptr[36]), (3), ( /*_.CTYP__V3*/ meltfptr[2]), "OBCPT_TYPE"); ; /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj @OBI_LOC", melt_magic_discr ((melt_ptr_t) ( /*_.INST__V37*/ meltfptr[36])) == MELTOBMAG_OBJECT); melt_putfield_object (( /*_.INST__V37*/ meltfptr[36]), (0), ( /*_.LOC__V2*/ meltfptr[1]), "OBI_LOC"); ; /*^touchobj */ melt_dbgtrace_written_object ( /*_.INST__V37*/ meltfptr[36], "newly made instance"); ; /*_.RES__V36*/ meltfptr[35] = /*_.INST__V37*/ meltfptr[36];; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-genobj.melt:760:/ cppif.then"); /*^block */ /*anyblock */ { { /*^locexp */ /*melt_increment_dbgcounter */ #if MELT_HAVE_DEBUG melt_dbgcounter++; #endif ; } ; /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*_#MELT_NEED_DBG__L15*/ 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-genobj.melt:760:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L15*/ meltfnum[4]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { /*_#THE_MELTCALLCOUNT__L16*/ meltfnum[0] = #ifdef meltcallcount meltcallcount /* the_meltcallcount */ #else 0L #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION ("warmelt-genobj.melt:760:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[5]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L16*/ meltfnum[0]; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ argtab[2].meltbp_long = 760; /*^apply.arg */ argtab[3].meltbp_cstring = "make_objcompute res="; /*^apply.arg */ argtab[4].meltbp_aptr = (melt_ptr_t *) & /*_.RES__V36*/ meltfptr[35]; /*_.MELT_DEBUG_FUN__V40*/ meltfptr[39] = melt_apply ((meltclosure_ptr_t) (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[0])), (melt_ptr_t) (( /*nil */ NULL)), (MELTBPARSTR_LONG MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_CSTRING MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*_.IF___V39*/ meltfptr[38] = /*_.MELT_DEBUG_FUN__V40*/ meltfptr[39];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:760:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L16*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V40*/ meltfptr[39] = 0; } ; } else { /*^cond.else */ /*_.IF___V39*/ meltfptr[38] = NULL;; } ; MELT_LOCATION ("warmelt-genobj.melt:760:/ quasiblock"); /*_.PROGN___V41*/ meltfptr[39] = /*_.IF___V39*/ meltfptr[38];; /*^compute */ /*_.IFCPP___V38*/ meltfptr[37] = /*_.PROGN___V41*/ meltfptr[39];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:760:/ clear"); /*clear *//*_#MELT_NEED_DBG__L15*/ meltfnum[4] = 0; /*^clear */ /*clear *//*_.IF___V39*/ meltfptr[38] = 0; /*^clear */ /*clear *//*_.PROGN___V41*/ meltfptr[39] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V38*/ meltfptr[37] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION ("warmelt-genobj.melt:761:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V36*/ meltfptr[35];; { MELT_LOCATION ("warmelt-genobj.melt:761:/ 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___V33*/ meltfptr[15] = /*_.RETURN___V42*/ meltfptr[38];; MELT_LOCATION ("warmelt-genobj.melt:753:/ clear"); /*clear *//*_.MAKE_LIST__V34*/ meltfptr[18] = 0; /*^clear */ /*clear *//*_.LIST_TO_MULTIPLE__V35*/ meltfptr[24] = 0; /*^clear */ /*clear *//*_.RES__V36*/ meltfptr[35] = 0; /*^clear */ /*clear *//*_.IFCPP___V38*/ meltfptr[37] = 0; /*^clear */ /*clear *//*_.RETURN___V42*/ meltfptr[38] = 0; /*_.LET___V12*/ meltfptr[10] = /*_.LET___V33*/ meltfptr[15];; MELT_LOCATION ("warmelt-genobj.melt:724:/ clear"); /*clear *//*_.ARGLIST__V13*/ meltfptr[12] = 0; /*^clear */ /*clear *//*_.FOREVER___V14*/ meltfptr[13] = 0; /*^clear */ /*clear *//*_.IFCPP___V29*/ meltfptr[23] = 0; /*^clear */ /*clear *//*_.LET___V33*/ meltfptr[15] = 0; MELT_LOCATION ("warmelt-genobj.melt:720:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; { MELT_LOCATION ("warmelt-genobj.melt:720:/ 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 *//*_.IFCPP___V10*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_.LET___V12*/ meltfptr[10] = 0; } ; goto labend_rout; labend_rout: melt_trace_end ("MAKE_OBJCOMPUTE", meltcallcount); MELT_TRACE_EXIT_LOCATION (); melt_blocklevel_signals = current_blocklevel_signals_meltrout_2_warmelt_genobj_MAKE_OBJCOMPUTE_melt; melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev; return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]); #undef melt_variadic_length #undef melt_variadic_index #undef meltcallcount #undef meltfram__ #undef MELTFRAM_NBVARNUM #undef MELTFRAM_NBVARPTR } /*end meltrout_2_warmelt_genobj_MAKE_OBJCOMPUTE */ melt_ptr_t MELT_MODULE_VISIBILITY meltrout_3_warmelt_genobj_MAKE_OBJEXPANDPUREVAL (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un * meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un * meltxrestab_) { /*variadic */ int variad_MAKE_OBJEXPANDPUREVAL_ix = 0, variad_MAKE_OBJEXPANDPUREVAL_len = melt_argdescr_length (meltxargdescr_); #define melt_variadic_length (0+variad_MAKE_OBJEXPANDPUREVAL_len) #define melt_variadic_index variad_MAKE_OBJEXPANDPUREVAL_ix long current_blocklevel_signals_meltrout_3_warmelt_genobj_MAKE_OBJEXPANDPUREVAL_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_genobj_MAKE_OBJEXPANDPUREVAL_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 44 melt_ptr_t mcfr_varptr[44]; #define MELTFRAM_NBVARNUM 20 long mcfr_varnum[20]; /*others*/ const char *loc_CSTRING__o0; long _spare_; } *meltframptr_ = 0, meltfram__; /*declfrastruct */ #define meltframe meltfram__ /*meltrout_3_warmelt_genobj_MAKE_OBJEXPANDPUREVAL is not initial declstructinit */ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC)) { /*mark for ggc */ int ix = 0; meltframptr_ = (struct frame_meltrout_3_warmelt_genobj_MAKE_OBJEXPANDPUREVAL_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 < 44; 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_genobj_MAKE_OBJEXPANDPUREVAL nbval 44*/ meltfram__.mcfr_nbvar = 44 /*nbval */ ; meltfram__.mcfr_clos = meltclosp_; meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe; melt_topframe = (struct melt_callframe_st *) &meltfram__; melt_trace_start ("MAKE_OBJEXPANDPUREVAL", meltcallcount); /*getargs*/ /*getarg#0 */ MELT_LOCATION ("warmelt-genobj.melt:767:/ getarg"); /*_.LOC__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ /*^getarg */ if (meltxargdescr_[0] != MELTBPAR_PTR) { /*getargrest */ variad_MAKE_OBJEXPANDPUREVAL_ix = variad_MAKE_OBJEXPANDPUREVAL_len; goto lab_endgetargs; } variad_MAKE_OBJEXPANDPUREVAL_ix = 1; /*_.CTYP__V3*/ meltfptr[2] = (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL; gcc_assert (melt_discr ((melt_ptr_t) ( /*_.CTYP__V3*/ meltfptr[2])) != NULL); /*getarg#2 */ /*^getarg */ if (meltxargdescr_[1] != MELTBPAR_PTR) { /*getargrest */ variad_MAKE_OBJEXPANDPUREVAL_ix = variad_MAKE_OBJEXPANDPUREVAL_len; goto lab_endgetargs; } variad_MAKE_OBJEXPANDPUREVAL_ix = 2; /*_.COMM__V4*/ meltfptr[3] = (meltxargtab_[1].meltbp_aptr) ? (*(meltxargtab_[1].meltbp_aptr)) : NULL; gcc_assert (melt_discr ((melt_ptr_t) ( /*_.COMM__V4*/ meltfptr[3])) != NULL); ; goto lab_endgetargs; lab_endgetargs:; /*body*/ /*^block*/ /*anyblock*/ { #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-genobj.melt:768:/ 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-genobj.melt:768:/ 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-genobj.melt:768:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[9]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1]; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ argtab[2].meltbp_long = 768; /*^apply.arg */ argtab[3].meltbp_cstring = "make_objexpandpureval loc="; /*^apply.arg */ argtab[4].meltbp_aptr = (melt_ptr_t *) & /*_.LOC__V2*/ meltfptr[1]; /*^apply.arg */ argtab[5].meltbp_cstring = " ctyp="; /*^apply.arg */ argtab[6].meltbp_aptr = (melt_ptr_t *) & /*_.CTYP__V3*/ meltfptr[2]; /*^apply.arg */ argtab[7].meltbp_cstring = " comm="; /*^apply.arg */ argtab[8].meltbp_aptr = (melt_ptr_t *) & /*_.COMM__V4*/ meltfptr[3]; /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = melt_apply ((meltclosure_ptr_t) (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[0])), (melt_ptr_t) (( /*nil */ NULL)), (MELTBPARSTR_LONG MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_CSTRING MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:768:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0; } ; } else { /*^cond.else */ /*_.IF___V6*/ meltfptr[5] = NULL;; } ; MELT_LOCATION ("warmelt-genobj.melt:768:/ quasiblock"); /*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];; /*^compute */ /*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:768:/ clear"); /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V6*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_.PROGN___V8*/ meltfptr[6] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-genobj.melt:769:/ cppif.then"); /*^block */ /*anyblock */ { /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*_#NULL__L3*/ meltfnum[1] = (( /*_.LOC__V2*/ meltfptr[1]) == NULL);; MELT_LOCATION ("warmelt-genobj.melt:769:/ cond"); /*cond */ if ( /*_#NULL__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ /*_#OR___L4*/ meltfnum[0] = /*_#NULL__L3*/ meltfnum[1];; } else { MELT_LOCATION ("warmelt-genobj.melt:769:/ cond.else"); /*^block */ /*anyblock */ { /*_#IS_A__L5*/ meltfnum[4] = melt_is_instance_of ((melt_ptr_t) ( /*_.LOC__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!DISCR_MIXED_LOCATION */ meltfrout->tabval[1])));; /*^compute */ /*_#OR___L4*/ meltfnum[0] = /*_#IS_A__L5*/ meltfnum[4];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:769:/ clear"); /*clear *//*_#IS_A__L5*/ meltfnum[4] = 0; } ; } ; /*^cond */ /*cond */ if ( /*_#OR___L4*/ meltfnum[0]) /*then */ { /*^cond.then */ /*_.IFELSE___V10*/ meltfptr[6] = ( /*nil */ NULL);; } else { MELT_LOCATION ("warmelt-genobj.melt:769:/ cond.else"); /*^block */ /*anyblock */ { { /*^locexp */ melt_assert_failed (("make_objexpandpureval check loc"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (769) ? (769) : __LINE__, __FUNCTION__); ; } ; /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0; /*epilog */ } ; } ; /*^compute */ /*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:769:/ clear"); /*clear *//*_#NULL__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_#OR___L4*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V9*/ meltfptr[5] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-genobj.melt:770:/ cppif.then"); /*^block */ /*anyblock */ { /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*_#IS_A__L6*/ meltfnum[4] = melt_is_instance_of ((melt_ptr_t) ( /*_.CTYP__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout-> tabval[2])));; MELT_LOCATION ("warmelt-genobj.melt:770:/ cond"); /*cond */ if ( /*_#IS_A__L6*/ meltfnum[4]) /*then */ { /*^cond.then */ /*_.IFELSE___V12*/ meltfptr[11] = ( /*nil */ NULL);; } else { MELT_LOCATION ("warmelt-genobj.melt:770:/ cond.else"); /*^block */ /*anyblock */ { { /*^locexp */ melt_assert_failed (("make_objexpandpureval check ctyp"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (770) ? (770) : __LINE__, __FUNCTION__); ; } ; /*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0; /*epilog */ } ; } ; /*^compute */ /*_.IFCPP___V11*/ meltfptr[6] = /*_.IFELSE___V12*/ meltfptr[11];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:770:/ clear"); /*clear *//*_#IS_A__L6*/ meltfnum[4] = 0; /*^clear */ /*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V11*/ meltfptr[6] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-genobj.melt:771:/ cppif.then"); /*^block */ /*anyblock */ { /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*_#NULL__L7*/ meltfnum[1] = (( /*_.COMM__V4*/ meltfptr[3]) == NULL);; MELT_LOCATION ("warmelt-genobj.melt:771:/ cond"); /*cond */ if ( /*_#NULL__L7*/ meltfnum[1]) /*then */ { /*^cond.then */ /*_#OR___L8*/ meltfnum[0] = /*_#NULL__L7*/ meltfnum[1];; } else { MELT_LOCATION ("warmelt-genobj.melt:771:/ cond.else"); /*^block */ /*anyblock */ { /*_#IS_STRING__L9*/ meltfnum[4] = (melt_magic_discr ((melt_ptr_t) ( /*_.COMM__V4*/ meltfptr[3])) == MELTOBMAG_STRING);; /*^compute */ /*_#OR___L8*/ meltfnum[0] = /*_#IS_STRING__L9*/ meltfnum[4];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:771:/ clear"); /*clear *//*_#IS_STRING__L9*/ meltfnum[4] = 0; } ; } ; /*^cond */ /*cond */ if ( /*_#OR___L8*/ meltfnum[0]) /*then */ { /*^cond.then */ /*_.IFELSE___V14*/ meltfptr[13] = ( /*nil */ NULL);; } else { MELT_LOCATION ("warmelt-genobj.melt:771:/ cond.else"); /*^block */ /*anyblock */ { { /*^locexp */ melt_assert_failed (("make_objexpandpureval check comm"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (771) ? (771) : __LINE__, __FUNCTION__); ; } ; /*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0; /*epilog */ } ; } ; /*^compute */ /*_.IFCPP___V13*/ meltfptr[11] = /*_.IFELSE___V14*/ meltfptr[13];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:771:/ clear"); /*clear *//*_#NULL__L7*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_#OR___L8*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V13*/ meltfptr[11] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION ("warmelt-genobj.melt:772:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#__L10*/ meltfnum[4] = (( /*_.CTYP__V3*/ meltfptr[2]) == (( /*!CTYPE_VOID */ meltfrout->tabval[3])));; MELT_LOCATION ("warmelt-genobj.melt:772:/ cond"); /*cond */ if ( /*_#__L10*/ meltfnum[4]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { { MELT_LOCATION ("warmelt-genobj.melt:773:/ locexp"); melt_warning_str (0, (melt_ptr_t) ( /*_.LOC__V2*/ meltfptr[1]), ("bizarre :void ctype for pure expanded cvalue"), (melt_ptr_t) 0); } ; { MELT_LOCATION ("warmelt-genobj.melt:774:/ locexp"); #if MELT_HAVE_DEBUG if (melt_need_debug (0)) melt_dbgshortbacktrace (("make_objexpandpureval void"), (15)); #endif ; } ; MELT_LOCATION ("warmelt-genobj.melt:772:/ quasiblock"); /*epilog */ } ; } /*noelse */ ; MELT_LOCATION ("warmelt-genobj.melt:775:/ quasiblock"); /*_.ARGLIST__V16*/ meltfptr[15] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[4]))));; MELT_LOCATION ("warmelt-genobj.melt:777:/ loop"); /*loop */ { labloop_ARGLOOP_3:; /*^loopbody */ /*^block */ /*anyblock */ { /*^checksignal */ MELT_CHECK_SIGNAL (); ; MELT_LOCATION ("warmelt-genobj.melt:779:/ cond"); /*cond */ if ( /*ifvariadic nomore */ variad_MAKE_OBJEXPANDPUREVAL_ix == variad_MAKE_OBJEXPANDPUREVAL_len) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { /*^compute */ /*consume variadic ! */ variad_MAKE_OBJEXPANDPUREVAL_ix += 0;; MELT_LOCATION ("warmelt-genobj.melt:780:/ quasiblock"); /*^compute */ /*_.ARGLOOP__V18*/ meltfptr[17] = NULL;; /*^exit */ /*exit */ { goto labexit_ARGLOOP_3; } ; /*epilog */ } ; } else { MELT_LOCATION ("warmelt-genobj.melt:779:/ cond.else"); /*^block */ /*anyblock */ { /*^cond */ /*cond */ if ( /*ifvariadic arg#1 */ variad_MAKE_OBJEXPANDPUREVAL_ix >= 0 && variad_MAKE_OBJEXPANDPUREVAL_ix + 1 <= variad_MAKE_OBJEXPANDPUREVAL_len && meltxargdescr_[variad_MAKE_OBJEXPANDPUREVAL_ix] == MELTBPAR_LONG) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { /*^compute */ /*_#L__L11*/ meltfnum[1] = /*variadic argument stuff */ meltxargtab_[variad_MAKE_OBJEXPANDPUREVAL_ix + 0].meltbp_long;; /*^compute */ /*consume variadic LONG ! */ variad_MAKE_OBJEXPANDPUREVAL_ix += 1;; MELT_LOCATION ("warmelt-genobj.melt:782:/ quasiblock"); /*_.BL__V19*/ meltfptr[18] = (meltgc_new_int ((meltobject_ptr_t) (( /*!DISCR_CONSTANT_INTEGER */ meltfrout-> tabval[5])), ( /*_#L__L11*/ meltfnum[1])));; { MELT_LOCATION ("warmelt-genobj.melt:784:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.ARGLIST__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.BL__V19*/ meltfptr[18])); } ; MELT_LOCATION ("warmelt-genobj.melt:782:/ clear"); /*clear *//*_.BL__V19*/ meltfptr[18] = 0; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:779:/ clear"); /*clear *//*_#L__L11*/ meltfnum[1] = 0; } ; } else { /*^cond.else */ /*^block */ /*anyblock */ { /*^cond */ /*cond */ if ( /*ifvariadic arg#1 */ variad_MAKE_OBJEXPANDPUREVAL_ix >= 0 && variad_MAKE_OBJEXPANDPUREVAL_ix + 1 <= variad_MAKE_OBJEXPANDPUREVAL_len && meltxargdescr_[variad_MAKE_OBJEXPANDPUREVAL_ix] == MELTBPAR_CSTRING) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { /*^compute */ /*_?*/ meltfram__.loc_CSTRING__o0 = /*variadic argument stuff */ meltxargtab_[variad_MAKE_OBJEXPANDPUREVAL_ix + 0].meltbp_cstring;; /*^compute */ /*consume variadic CSTRING ! */ variad_MAKE_OBJEXPANDPUREVAL_ix += 1;; MELT_LOCATION ("warmelt-genobj.melt:786:/ quasiblock"); /*_.BS__V20*/ meltfptr[18] = (meltgc_new_stringdup ((meltobject_ptr_t) (( /*!DISCR_VERBATIM_STRING */ meltfrout-> tabval[6])), ( /*_?*/ meltfram__.loc_CSTRING__o0)));; { MELT_LOCATION ("warmelt-genobj.melt:788:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.ARGLIST__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.BS__V20*/ meltfptr[18])); } ; MELT_LOCATION ("warmelt-genobj.melt:786:/ clear"); /*clear *//*_.BS__V20*/ meltfptr[18] = 0; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:779:/ clear"); /*clear *//*_?*/ meltfram__.loc_CSTRING__o0 = 0; } ; } else { /*^cond.else */ /*^block */ /*anyblock */ { /*^cond */ /*cond */ if ( /*ifvariadic arg#1 */ variad_MAKE_OBJEXPANDPUREVAL_ix >= 0 && variad_MAKE_OBJEXPANDPUREVAL_ix + 1 <= variad_MAKE_OBJEXPANDPUREVAL_len && meltxargdescr_[variad_MAKE_OBJEXPANDPUREVAL_ix] == MELTBPAR_PTR) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { /*^compute */ /*_.V__V21*/ meltfptr[18] = /*variadic argument value */ ((meltxargtab_ [variad_MAKE_OBJEXPANDPUREVAL_ix + 0]. meltbp_aptr) ? (* (meltxargtab_ [variad_MAKE_OBJEXPANDPUREVAL_ix + 0].meltbp_aptr)) : NULL);; /*^compute */ /*consume variadic Value ! */ variad_MAKE_OBJEXPANDPUREVAL_ix += 1;; MELT_LOCATION ("warmelt-genobj.melt:790:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_LIST__L12*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.V__V21*/ meltfptr[18])) == MELTOBMAG_LIST);; MELT_LOCATION ("warmelt-genobj.melt:790:/ cond"); /*cond */ if ( /*_#IS_LIST__L12*/ meltfnum[0]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { MELT_LOCATION ("warmelt-genobj.melt:791:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[1]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.V__V21*/ meltfptr[18]; /*_.LIST_APPEND2LIST__V23*/ meltfptr[22] = melt_apply ((meltclosure_ptr_t) (( /*!LIST_APPEND2LIST */ meltfrout->tabval[7])), (melt_ptr_t) ( /*_.ARGLIST__V16*/ meltfptr[15]), (MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*_.IFELSE___V22*/ meltfptr[21] = /*_.LIST_APPEND2LIST__V23*/ meltfptr[22];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:790:/ clear"); /*clear *//*_.LIST_APPEND2LIST__V23*/ meltfptr[22] = 0; } ; } else { /*^cond.else */ /*^block */ /*anyblock */ { MELT_LOCATION ("warmelt-genobj.melt:792:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_MULTIPLE__L13*/ meltfnum[1] = (melt_magic_discr ((melt_ptr_t) ( /*_.V__V21*/ meltfptr[18])) == MELTOBMAG_MULTIPLE);; MELT_LOCATION ("warmelt-genobj.melt:792:/ cond"); /*cond */ if ( /*_#IS_MULTIPLE__L13*/ meltfnum[1]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { /*citerblock FOREACH_IN_MULTIPLE */ { /* start foreach_in_multiple meltcit1__EACHTUP */ long meltcit1__EACHTUP_ln = melt_multiple_length ((melt_ptr_t) /*_.V__V21*/ meltfptr[18]); for ( /*_#IX__L14*/ meltfnum[13] = 0; ( /*_#IX__L14*/ meltfnum[13] >= 0) && ( /*_#IX__L14*/ meltfnum[13] < meltcit1__EACHTUP_ln); /*_#IX__L14*/ meltfnum[13]++) { /*_.CURCOMP__V24*/ meltfptr[22] = melt_multiple_nth ((melt_ptr_t) ( /*_.V__V21*/ meltfptr[18]), /*_#IX__L14*/ meltfnum[13]); { MELT_LOCATION ("warmelt-genobj.melt:796:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.ARGLIST__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.CURCOMP__V24*/ meltfptr[22])); } ; if ( /*_#IX__L14*/ meltfnum[13] < 0) break; } /* end foreach_in_multiple meltcit1__EACHTUP */ /*citerepilog */ MELT_LOCATION ("warmelt-genobj.melt:793:/ clear"); /*clear *//*_.CURCOMP__V24*/ meltfptr[22] = 0; /*^clear */ /*clear *//*_#IX__L14*/ meltfnum[13] = 0; } /*endciterblock FOREACH_IN_MULTIPLE */ ; /*epilog */ } ; } else { MELT_LOCATION ("warmelt-genobj.melt:792:/ cond.else"); /*^block */ /*anyblock */ { { MELT_LOCATION ("warmelt-genobj.melt:798:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.ARGLIST__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.V__V21*/ meltfptr[18])); } ; MELT_LOCATION ("warmelt-genobj.melt:797:/ quasiblock"); /*epilog */ } ; } ; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:790:/ clear"); /*clear *//*_#IS_MULTIPLE__L13*/ meltfnum[1] = 0; } ; } ; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:779:/ clear"); /*clear *//*_.V__V21*/ meltfptr[18] = 0; /*^clear */ /*clear *//*_#IS_LIST__L12*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V22*/ meltfptr[21] = 0; } ; } else { /*^cond.else */ /*^block */ /*anyblock */ { #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-genobj.melt:800:/ cppif.then"); /*^block */ /*anyblock */ { { /*^locexp */ /*melt_increment_dbgcounter */ #if MELT_HAVE_DEBUG melt_dbgcounter++; #endif ; } ; /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*_#MELT_NEED_DBG__L15*/ meltfnum[1] = /*MELT_NEED_DBG */ #if MELT_HAVE_DEBUG ( /*melt_need_dbg */ melt_need_debug ((int) 0)) #else 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; MELT_LOCATION ("warmelt-genobj.melt:800:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L15*/ meltfnum[1]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { /*_#THE_MELTCALLCOUNT__L16*/ meltfnum[0] = #ifdef meltcallcount meltcallcount /* the_meltcallcount */ #else 0L #endif /* meltcallcount the_meltcallcount */ ;; /*^compute */ /*_.VARIADIC_CTYPE__V27*/ meltfptr[26] = /*variadic_type_code */ #ifdef melt_variadic_index (((melt_variadic_index + 0) >= 0 && (melt_variadic_index + 0) < melt_variadic_length) ? melt_code_to_ctype (meltxargdescr_ [melt_variadic_index + 0] & MELT_ARGDESCR_MAX) : NULL) #else NULL /* no variadic_ctype outside of variadic functions */ #endif /*melt_variadic_index */ ;; MELT_LOCATION ("warmelt-genobj.melt:800:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[5]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L16*/ meltfnum[0]; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ argtab[2].meltbp_long = 800; /*^apply.arg */ argtab[3].meltbp_cstring = "make_objexpandpureval varargctype="; /*^apply.arg */ argtab[4].meltbp_aptr = (melt_ptr_t *) & /*_.VARIADIC_CTYPE__V27*/ meltfptr[26]; /*_.MELT_DEBUG_FUN__V28*/ meltfptr[27] = melt_apply ((meltclosure_ptr_t) (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[0])), (melt_ptr_t) (( /*nil */ NULL)), (MELTBPARSTR_LONG MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_CSTRING MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*_.IF___V26*/ meltfptr[21] = /*_.MELT_DEBUG_FUN__V28*/ meltfptr[27];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:800:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L16*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.VARIADIC_CTYPE__V27*/ meltfptr[26] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V28*/ meltfptr[27] = 0; } ; } else { /*^cond.else */ /*_.IF___V26*/ meltfptr[21] = NULL;; } ; MELT_LOCATION ("warmelt-genobj.melt:800:/ quasiblock"); /*_.PROGN___V29*/ meltfptr[26] = /*_.IF___V26*/ meltfptr[21];; /*^compute */ /*_.IFCPP___V25*/ meltfptr[18] = /*_.PROGN___V29*/ meltfptr[26];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:800:/ clear"); /*clear *//*_#MELT_NEED_DBG__L15*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V26*/ meltfptr[21] = 0; /*^clear */ /*clear *//*_.PROGN___V29*/ meltfptr[26] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V25*/ meltfptr[18] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-genobj.melt:801:/ cppif.then"); /*^block */ /*anyblock */ { /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*^cond */ /*cond */ if (( /*nil */ NULL)) /*then */ { /*^cond.then */ /*_.IFELSE___V31*/ meltfptr[21] = ( /*nil */ NULL);; } else { MELT_LOCATION ("warmelt-genobj.melt:801:/ cond.else"); /*^block */ /*anyblock */ { { /*^locexp */ melt_assert_failed (("unexpected variable argument for make_objexpandpureval"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (801) ? (801) : __LINE__, __FUNCTION__); ; } ; /*clear *//*_.IFELSE___V31*/ meltfptr[21] = 0; /*epilog */ } ; } ; /*^compute */ /*_.IFCPP___V30*/ meltfptr[27] = /*_.IFELSE___V31*/ meltfptr[21];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:801:/ clear"); /*clear *//*_.IFELSE___V31*/ meltfptr[21] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V30*/ meltfptr[27] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION ("warmelt-genobj.melt:779:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ /*^clear */ /*clear *//*_.IFCPP___V25*/ meltfptr[18] = 0; /*^clear */ /*clear *//*_.IFCPP___V30*/ meltfptr[27] = 0; } ; } ; /*epilog */ } ; } ; /*epilog */ } ; } ; /*epilog */ } ; } ; /*epilog */ } ; ; goto labloop_ARGLOOP_3; labexit_ARGLOOP_3:; MELT_LOCATION ("warmelt-genobj.melt:777:/ loopepilog"); /*loopepilog */ /*_.FOREVER___V17*/ meltfptr[16] = /*_.ARGLOOP__V18*/ meltfptr[17];; } ; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-genobj.melt:803:/ cppif.then"); /*^block */ /*anyblock */ { { /*^locexp */ /*melt_increment_dbgcounter */ #if MELT_HAVE_DEBUG melt_dbgcounter++; #endif ; } ; /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*_#MELT_NEED_DBG__L17*/ meltfnum[0] = /*MELT_NEED_DBG */ #if MELT_HAVE_DEBUG ( /*melt_need_dbg */ melt_need_debug ((int) 0)) #else 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; MELT_LOCATION ("warmelt-genobj.melt:803:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L17*/ meltfnum[0]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { /*_#THE_MELTCALLCOUNT__L18*/ meltfnum[1] = #ifdef meltcallcount meltcallcount /* the_meltcallcount */ #else 0L #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION ("warmelt-genobj.melt:803:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[5]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L18*/ meltfnum[1]; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ argtab[2].meltbp_long = 803; /*^apply.arg */ argtab[3].meltbp_cstring = "make_objexpandpureval arglist="; /*^apply.arg */ argtab[4].meltbp_aptr = (melt_ptr_t *) & /*_.ARGLIST__V16*/ meltfptr[15]; /*_.MELT_DEBUG_FUN__V34*/ meltfptr[18] = melt_apply ((meltclosure_ptr_t) (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[0])), (melt_ptr_t) (( /*nil */ NULL)), (MELTBPARSTR_LONG MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_CSTRING MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*_.IF___V33*/ meltfptr[21] = /*_.MELT_DEBUG_FUN__V34*/ meltfptr[18];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:803:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L18*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V34*/ meltfptr[18] = 0; } ; } else { /*^cond.else */ /*_.IF___V33*/ meltfptr[21] = NULL;; } ; MELT_LOCATION ("warmelt-genobj.melt:803:/ quasiblock"); /*_.PROGN___V35*/ meltfptr[27] = /*_.IF___V33*/ meltfptr[21];; /*^compute */ /*_.IFCPP___V32*/ meltfptr[26] = /*_.PROGN___V35*/ meltfptr[27];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:803:/ clear"); /*clear *//*_#MELT_NEED_DBG__L17*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V33*/ meltfptr[21] = 0; /*^clear */ /*clear *//*_.PROGN___V35*/ meltfptr[27] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V32*/ meltfptr[26] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION ("warmelt-genobj.melt:804:/ quasiblock"); MELT_LOCATION ("warmelt-genobj.melt:805:/ checksignal"); MELT_CHECK_SIGNAL (); ; MELT_LOCATION ("warmelt-genobj.melt:809:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[1]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & ( /*!DISCR_MULTIPLE */ meltfrout->tabval[10]); /*_.LIST_TO_MULTIPLE__V37*/ meltfptr[21] = melt_apply ((meltclosure_ptr_t) (( /*!LIST_TO_MULTIPLE */ meltfrout->tabval[9])), (melt_ptr_t) ( /*_.ARGLIST__V16*/ meltfptr[15]), (MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; MELT_LOCATION ("warmelt-genobj.melt:805:/ quasiblock"); /*^rawallocobj */ /*rawallocobj */ { melt_ptr_t newobj = 0; melt_raw_object_create (newobj, (melt_ptr_t) (( /*!CLASS_OBJEXPANDPUREVAL */ meltfrout->tabval[8])), (4), "CLASS_OBJEXPANDPUREVAL"); /*_.INST__V39*/ meltfptr[38] = newobj; }; ; /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj @OBV_TYPE", melt_magic_discr ((melt_ptr_t) ( /*_.INST__V39*/ meltfptr[38])) == MELTOBMAG_OBJECT); melt_putfield_object (( /*_.INST__V39*/ meltfptr[38]), (0), ( /*_.CTYP__V3*/ meltfptr[2]), "OBV_TYPE"); ; /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj @OXPURVAL_LOC", melt_magic_discr ((melt_ptr_t) ( /*_.INST__V39*/ meltfptr[38])) == MELTOBMAG_OBJECT); melt_putfield_object (( /*_.INST__V39*/ meltfptr[38]), (1), ( /*_.LOC__V2*/ meltfptr[1]), "OXPURVAL_LOC"); ; /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj @OXPURVAL_COMM", melt_magic_discr ((melt_ptr_t) ( /*_.INST__V39*/ meltfptr[38])) == MELTOBMAG_OBJECT); melt_putfield_object (( /*_.INST__V39*/ meltfptr[38]), (2), ( /*_.COMM__V4*/ meltfptr[3]), "OXPURVAL_COMM"); ; /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj @OXPURVAL_CONT", melt_magic_discr ((melt_ptr_t) ( /*_.INST__V39*/ meltfptr[38])) == MELTOBMAG_OBJECT); melt_putfield_object (( /*_.INST__V39*/ meltfptr[38]), (3), ( /*_.LIST_TO_MULTIPLE__V37*/ meltfptr[21]), "OXPURVAL_CONT"); ; /*^touchobj */ melt_dbgtrace_written_object ( /*_.INST__V39*/ meltfptr[38], "newly made instance"); ; /*_.RES__V38*/ meltfptr[27] = /*_.INST__V39*/ meltfptr[38];; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-genobj.melt:811:/ cppif.then"); /*^block */ /*anyblock */ { { /*^locexp */ /*melt_increment_dbgcounter */ #if MELT_HAVE_DEBUG melt_dbgcounter++; #endif ; } ; /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*_#MELT_NEED_DBG__L19*/ meltfnum[1] = /*MELT_NEED_DBG */ #if MELT_HAVE_DEBUG ( /*melt_need_dbg */ melt_need_debug ((int) 0)) #else 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; MELT_LOCATION ("warmelt-genobj.melt:811:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L19*/ meltfnum[1]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { /*_#THE_MELTCALLCOUNT__L20*/ meltfnum[0] = #ifdef meltcallcount meltcallcount /* the_meltcallcount */ #else 0L #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION ("warmelt-genobj.melt:811:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[5]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L20*/ meltfnum[0]; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ argtab[2].meltbp_long = 811; /*^apply.arg */ argtab[3].meltbp_cstring = "make_objexpandpureval res="; /*^apply.arg */ argtab[4].meltbp_aptr = (melt_ptr_t *) & /*_.RES__V38*/ meltfptr[27]; /*_.MELT_DEBUG_FUN__V42*/ meltfptr[41] = 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___V41*/ meltfptr[40] = /*_.MELT_DEBUG_FUN__V42*/ meltfptr[41];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:811:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L20*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V42*/ meltfptr[41] = 0; } ; } else { /*^cond.else */ /*_.IF___V41*/ meltfptr[40] = NULL;; } ; MELT_LOCATION ("warmelt-genobj.melt:811:/ quasiblock"); /*_.PROGN___V43*/ meltfptr[41] = /*_.IF___V41*/ meltfptr[40];; /*^compute */ /*_.IFCPP___V40*/ meltfptr[39] = /*_.PROGN___V43*/ meltfptr[41];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:811:/ clear"); /*clear *//*_#MELT_NEED_DBG__L19*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V41*/ meltfptr[40] = 0; /*^clear */ /*clear *//*_.PROGN___V43*/ meltfptr[41] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V40*/ meltfptr[39] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION ("warmelt-genobj.melt:812:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V38*/ meltfptr[27];; { MELT_LOCATION ("warmelt-genobj.melt:812:/ 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___V36*/ meltfptr[18] = /*_.RETURN___V44*/ meltfptr[40];; MELT_LOCATION ("warmelt-genobj.melt:804:/ clear"); /*clear *//*_.LIST_TO_MULTIPLE__V37*/ meltfptr[21] = 0; /*^clear */ /*clear *//*_.RES__V38*/ meltfptr[27] = 0; /*^clear */ /*clear *//*_.IFCPP___V40*/ meltfptr[39] = 0; /*^clear */ /*clear *//*_.RETURN___V44*/ meltfptr[40] = 0; /*_.LET___V15*/ meltfptr[13] = /*_.LET___V36*/ meltfptr[18];; MELT_LOCATION ("warmelt-genobj.melt:775:/ clear"); /*clear *//*_.ARGLIST__V16*/ meltfptr[15] = 0; /*^clear */ /*clear *//*_.FOREVER___V17*/ meltfptr[16] = 0; /*^clear */ /*clear *//*_.IFCPP___V32*/ meltfptr[26] = 0; /*^clear */ /*clear *//*_.LET___V36*/ meltfptr[18] = 0; MELT_LOCATION ("warmelt-genobj.melt:767:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V15*/ meltfptr[13];; { MELT_LOCATION ("warmelt-genobj.melt:767:/ 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___V5*/ meltfptr[4] = 0; /*^clear */ /*clear *//*_.IFCPP___V9*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_.IFCPP___V11*/ meltfptr[6] = 0; /*^clear */ /*clear *//*_.IFCPP___V13*/ meltfptr[11] = 0; /*^clear */ /*clear *//*_#__L10*/ meltfnum[4] = 0; /*^clear */ /*clear *//*_.LET___V15*/ meltfptr[13] = 0; } ; goto labend_rout; labend_rout: melt_trace_end ("MAKE_OBJEXPANDPUREVAL", meltcallcount); MELT_TRACE_EXIT_LOCATION (); melt_blocklevel_signals = current_blocklevel_signals_meltrout_3_warmelt_genobj_MAKE_OBJEXPANDPUREVAL_melt; melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev; return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]); #undef melt_variadic_length #undef melt_variadic_index #undef meltcallcount #undef meltfram__ #undef MELTFRAM_NBVARNUM #undef MELTFRAM_NBVARPTR } /*end meltrout_3_warmelt_genobj_MAKE_OBJEXPANDPUREVAL */ melt_ptr_t MELT_MODULE_VISIBILITY meltrout_4_warmelt_genobj_COMPILOBJ_CATCHALL_NREP (meltclosure_ptr_t meltclosp_, 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_genobj_COMPILOBJ_CATCHALL_NREP_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_genobj_COMPILOBJ_CATCHALL_NREP_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 12 melt_ptr_t mcfr_varptr[12]; #define MELTFRAM_NBVARNUM 2 long mcfr_varnum[2]; /*others*/ long _spare_; } *meltframptr_ = 0, meltfram__; /*declfrastruct */ #define meltframe meltfram__ /*meltrout_4_warmelt_genobj_COMPILOBJ_CATCHALL_NREP is not initial declstructinit */ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC)) { /*mark for ggc */ int ix = 0; meltframptr_ = (struct frame_meltrout_4_warmelt_genobj_COMPILOBJ_CATCHALL_NREP_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 < 12; ix++) if (meltframptr_->mcfr_varptr[ix]) gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]); return NULL; } /*end markggc */ ; memset (&meltfram__, 0, sizeof (meltfram__)); /* declstructinit plain routine meltrout_4_warmelt_genobj_COMPILOBJ_CATCHALL_NREP nbval 12*/ meltfram__.mcfr_nbvar = 12 /*nbval */ ; meltfram__.mcfr_clos = meltclosp_; meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe; melt_topframe = (struct melt_callframe_st *) &meltfram__; melt_trace_start ("COMPILOBJ_CATCHALL_NREP", meltcallcount); /*getargs*/ /*getarg#0 */ MELT_LOCATION ("warmelt-genobj.melt:879:/ getarg"); /*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ /*^getarg */ if (meltxargdescr_[0] != MELTBPAR_PTR) goto lab_endgetargs; /*_.GCX__V3*/ meltfptr[2] = (meltxargtab_[0].meltbp_aptr) ? (*(meltxargtab_[0].meltbp_aptr)) : NULL; gcc_assert (melt_discr ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2])) != NULL); ; goto lab_endgetargs; lab_endgetargs:; /*body*/ /*^block*/ /*anyblock*/ { #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-genobj.melt:880:/ 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-genobj.melt:880:/ 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-genobj.melt:880:/ 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-genobj.melt"; /*^apply.arg */ argtab[2].meltbp_long = 880; /*^apply.arg */ argtab[3].meltbp_cstring = "class_nrep compile_obj recv="; /*^apply.arg */ argtab[4].meltbp_aptr = (melt_ptr_t *) & /*_.RECV__V2*/ meltfptr[1]; /*^apply.arg */ argtab[5].meltbp_cstring = " gcx="; /*^apply.arg */ argtab[6].meltbp_aptr = (melt_ptr_t *) & /*_.GCX__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-genobj.melt:880:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0; } ; } else { /*^cond.else */ /*_.IF___V5*/ meltfptr[4] = NULL;; } ; MELT_LOCATION ("warmelt-genobj.melt:880:/ quasiblock"); /*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];; /*^compute */ /*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:880:/ 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 */ ; MELT_LOCATION ("warmelt-genobj.melt:881:/ quasiblock"); /*_.DISCR__V9*/ meltfptr[5] = ((melt_ptr_t) (melt_discr ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]))));; MELT_LOCATION ("warmelt-genobj.melt:882:/ getslot"); { melt_ptr_t slot = NULL, obj = NULL; obj = (melt_ptr_t) ( /*_.DISCR__V9*/ meltfptr[5]) /*=obj*/ ; melt_object_get_field (slot, obj, 1, "NAMED_NAME"); /*_.DISCRNAME__V10*/ meltfptr[9] = slot; }; ; { MELT_LOCATION ("warmelt-genobj.melt:884:/ locexp"); error ("MELT ERROR MSG [#%ld]::: %s - %s", melt_dbgcounter, ("{Internal Error} COMPILE_OBJ sent to unexpected object of class"), melt_string_str ((melt_ptr_t) ( /*_.DISCRNAME__V10*/ meltfptr[9]))); } ; #if MELT_HAVE_DEBUG MELT_LOCATION ("warmelt-genobj.melt:885:/ cppif.then"); /*^block */ /*anyblock */ { /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*^cond */ /*cond */ if (( /*nil */ NULL)) /*then */ { /*^cond.then */ /*_.IFELSE___V12*/ meltfptr[11] = ( /*nil */ NULL);; } else { MELT_LOCATION ("warmelt-genobj.melt:885:/ cond.else"); /*^block */ /*anyblock */ { { /*^locexp */ melt_assert_failed (("@@compile_obj should be implemented in nrep-s subclasses"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (885) ? (885) : __LINE__, __FUNCTION__); ; } ; /*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0; /*epilog */ } ; } ; /*^compute */ /*_.IFCPP___V11*/ meltfptr[10] = /*_.IFELSE___V12*/ meltfptr[11];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:885:/ clear"); /*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ /*_.IFCPP___V11*/ meltfptr[10] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; /*^compute */ /*_.LET___V8*/ meltfptr[4] = /*_.IFCPP___V11*/ meltfptr[10];; MELT_LOCATION ("warmelt-genobj.melt:881:/ clear"); /*clear *//*_.DISCR__V9*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_.DISCRNAME__V10*/ meltfptr[9] = 0; /*^clear */ /*clear *//*_.IFCPP___V11*/ meltfptr[10] = 0; MELT_LOCATION ("warmelt-genobj.melt:879:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[4];; { MELT_LOCATION ("warmelt-genobj.melt:879:/ 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 *//*_.LET___V8*/ meltfptr[4] = 0; } ; goto labend_rout; labend_rout: melt_trace_end ("COMPILOBJ_CATCHALL_NREP", meltcallcount); MELT_TRACE_EXIT_LOCATION (); melt_blocklevel_signals = current_blocklevel_signals_meltrout_4_warmelt_genobj_COMPILOBJ_CATCHALL_NREP_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_genobj_COMPILOBJ_CATCHALL_NREP */ /*no syntax testing generated*/ typedef struct frame_melt_start_this_module_st { int mcfr_nbvar; #if MELT_HAVE_DEBUG const char *mcfr_flocs; #else /*!MELT_HAVE_DEBUG */ const char *mcfr_unusedflocs; #endif /*MELT_HAVE_DEBUG */ void (*mcfr_initforwmarkrout) (struct melt_callframe_st *, int); struct excepth_melt_st *mcfr_exh; struct melt_callframe_st *mcfr_prev; #undef MELTFRAM_NBVARPTR #undef MELTFRAM_NBVARNUM #define MELTFRAM_NBVARPTR 2142 melt_ptr_t mcfr_varptr[2142]; /*no varnum*/ #define MELTFRAM_NBVARNUM /*none*/0 /*others*/ long _spare_; } initial_frame_st; static void initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, char meltpredefinited[]) { #define meltfram__ (*iniframp__) struct cdata_st { struct MELT_OBJECT_STRUCT (3) dsym_1__CLASS_OBJVALUE; struct MELT_STRING_STRUCT (14) dstr_2__CLASS_OBJVALUE; struct MELT_OBJECT_STRUCT (3) dsym_3__CLASS_GENERATED_C_CODE; struct MELT_STRING_STRUCT (22) dstr_4__CLASS_GENERATED_; struct MELT_OBJECT_STRUCT (8) dobj_5__CLASS_OBJVALUE; struct MELT_STRING_STRUCT (14) dstr_6__CLASS_OBJVALUE; struct MELT_MULTIPLE_STRUCT (2) dtup_7__CLASS_OBJVALUE; struct MELT_MULTIPLE_STRUCT (1) dtup_8__CLASS_OBJVALUE; struct MELT_OBJECT_STRUCT (3) dsym_9__OBV_TYPE; struct MELT_STRING_STRUCT (8) dstr_10__OBV_TYPE; struct MELT_OBJECT_STRUCT (4) dobj_11__OBV_TYPE; struct MELT_STRING_STRUCT (8) dstr_12__OBV_TYPE; struct MELT_OBJECT_STRUCT (3) dsym_13__CLASS_OBJPUREVALUE; struct MELT_STRING_STRUCT (18) dstr_14__CLASS_OBJPUREVAL; struct MELT_OBJECT_STRUCT (8) dobj_15__CLASS_OBJPUREVALUE; struct MELT_STRING_STRUCT (18) dstr_16__CLASS_OBJPUREVAL; struct MELT_MULTIPLE_STRUCT (3) dtup_17__CLASS_OBJPUREVALUE; struct MELT_MULTIPLE_STRUCT (1) dtup_18__CLASS_OBJPUREVALUE; struct MELT_OBJECT_STRUCT (3) dsym_19__CLASS_OBJLOCV; struct MELT_STRING_STRUCT (13) dstr_20__CLASS_OBJLOCV; struct MELT_OBJECT_STRUCT (8) dobj_21__CLASS_OBJLOCV; struct MELT_STRING_STRUCT (13) dstr_22__CLASS_OBJLOCV; struct MELT_MULTIPLE_STRUCT (4) dtup_23__CLASS_OBJLOCV; struct MELT_MULTIPLE_STRUCT (4) dtup_24__CLASS_OBJLOCV; struct MELT_OBJECT_STRUCT (3) dsym_25__OBL_OFF; struct MELT_STRING_STRUCT (7) dstr_26__OBL_OFF; struct MELT_OBJECT_STRUCT (4) dobj_27__OBL_OFF; struct MELT_STRING_STRUCT (7) dstr_28__OBL_OFF; struct MELT_OBJECT_STRUCT (3) dsym_29__OBL_PROC; struct MELT_STRING_STRUCT (8) dstr_30__OBL_PROC; struct MELT_OBJECT_STRUCT (4) dobj_31__OBL_PROC; struct MELT_STRING_STRUCT (8) dstr_32__OBL_PROC; struct MELT_OBJECT_STRUCT (3) dsym_33__OBL_CNAME; struct MELT_STRING_STRUCT (9) dstr_34__OBL_CNAME; struct MELT_OBJECT_STRUCT (4) dobj_35__OBL_CNAME; struct MELT_STRING_STRUCT (9) dstr_36__OBL_CNAME; struct MELT_OBJECT_STRUCT (3) dsym_37__CLASS_OBJCLOCCV; struct MELT_STRING_STRUCT (15) dstr_38__CLASS_OBJCLOCCV; struct MELT_OBJECT_STRUCT (8) dobj_39__CLASS_OBJCLOCCV; struct MELT_STRING_STRUCT (15) dstr_40__CLASS_OBJCLOCCV; struct MELT_MULTIPLE_STRUCT (4) dtup_41__CLASS_OBJCLOCCV; struct MELT_MULTIPLE_STRUCT (4) dtup_42__CLASS_OBJCLOCCV; struct MELT_OBJECT_STRUCT (3) dsym_43__OBC_OFF; struct MELT_STRING_STRUCT (7) dstr_44__OBC_OFF; struct MELT_OBJECT_STRUCT (4) dobj_45__OBC_OFF; struct MELT_STRING_STRUCT (7) dstr_46__OBC_OFF; struct MELT_OBJECT_STRUCT (3) dsym_47__OBC_PROC; struct MELT_STRING_STRUCT (8) dstr_48__OBC_PROC; struct MELT_OBJECT_STRUCT (4) dobj_49__OBC_PROC; struct MELT_STRING_STRUCT (8) dstr_50__OBC_PROC; struct MELT_OBJECT_STRUCT (3) dsym_51__OBC_NAME; struct MELT_STRING_STRUCT (8) dstr_52__OBC_NAME; struct MELT_OBJECT_STRUCT (4) dobj_53__OBC_NAME; struct MELT_STRING_STRUCT (8) dstr_54__OBC_NAME; struct MELT_OBJECT_STRUCT (3) dsym_55__CLASS_OBJCONSTV; struct MELT_STRING_STRUCT (15) dstr_56__CLASS_OBJCONSTV; struct MELT_OBJECT_STRUCT (8) dobj_57__CLASS_OBJCONSTV; struct MELT_STRING_STRUCT (15) dstr_58__CLASS_OBJCONSTV; struct MELT_MULTIPLE_STRUCT (5) dtup_59__CLASS_OBJCONSTV; struct MELT_MULTIPLE_STRUCT (4) dtup_60__CLASS_OBJCONSTV; struct MELT_OBJECT_STRUCT (3) dsym_61__CLASS_OBJPREDEF; struct MELT_STRING_STRUCT (15) dstr_62__CLASS_OBJPREDEF; struct MELT_OBJECT_STRUCT (8) dobj_63__CLASS_OBJPREDEF; struct MELT_STRING_STRUCT (15) dstr_64__CLASS_OBJPREDEF; struct MELT_MULTIPLE_STRUCT (4) dtup_65__CLASS_OBJPREDEF; struct MELT_MULTIPLE_STRUCT (2) dtup_66__CLASS_OBJPREDEF; struct MELT_OBJECT_STRUCT (3) dsym_67__OBPREDEF; struct MELT_STRING_STRUCT (8) dstr_68__OBPREDEF; struct MELT_OBJECT_STRUCT (4) dobj_69__OBPREDEF; struct MELT_STRING_STRUCT (8) dstr_70__OBPREDEF; struct MELT_OBJECT_STRUCT (3) dsym_71__CLASS_OBJNIL; struct MELT_STRING_STRUCT (12) dstr_72__CLASS_OBJNIL; struct MELT_OBJECT_STRUCT (8) dobj_73__CLASS_OBJNIL; struct MELT_STRING_STRUCT (12) dstr_74__CLASS_OBJNIL; struct MELT_MULTIPLE_STRUCT (4) dtup_75__CLASS_OBJNIL; struct MELT_MULTIPLE_STRUCT (1) dtup_76__CLASS_OBJNIL; struct MELT_OBJECT_STRUCT (3) dsym_77__CLASS_OBJEXPANDPUREVAL; struct MELT_STRING_STRUCT (22) dstr_78__CLASS_OBJEXPANDP; struct MELT_OBJECT_STRUCT (8) dobj_79__CLASS_OBJEXPANDPUREVAL; struct MELT_STRING_STRUCT (22) dstr_80__CLASS_OBJEXPANDP; struct MELT_MULTIPLE_STRUCT (4) dtup_81__CLASS_OBJEXPANDPUREVAL; struct MELT_MULTIPLE_STRUCT (4) dtup_82__CLASS_OBJEXPANDPUREVAL; struct MELT_OBJECT_STRUCT (3) dsym_83__OXPURVAL_LOC; struct MELT_STRING_STRUCT (12) dstr_84__OXPURVAL_LOC; struct MELT_OBJECT_STRUCT (4) dobj_85__OXPURVAL_LOC; struct MELT_STRING_STRUCT (12) dstr_86__OXPURVAL_LOC; struct MELT_OBJECT_STRUCT (3) dsym_87__OXPURVAL_COMM; struct MELT_STRING_STRUCT (13) dstr_88__OXPURVAL_COMM; struct MELT_OBJECT_STRUCT (4) dobj_89__OXPURVAL_COMM; struct MELT_STRING_STRUCT (13) dstr_90__OXPURVAL_COMM; struct MELT_OBJECT_STRUCT (3) dsym_91__OXPURVAL_CONT; struct MELT_STRING_STRUCT (13) dstr_92__OXPURVAL_CONT; struct MELT_OBJECT_STRUCT (4) dobj_93__OXPURVAL_CONT; struct MELT_STRING_STRUCT (13) dstr_94__OXPURVAL_CONT; struct MELT_OBJECT_STRUCT (3) dsym_95__CLASS_OBJINITELEM; struct MELT_STRING_STRUCT (17) dstr_96__CLASS_OBJINITELE; struct MELT_OBJECT_STRUCT (8) dobj_97__CLASS_OBJINITELEM; struct MELT_STRING_STRUCT (17) dstr_98__CLASS_OBJINITELE; struct MELT_MULTIPLE_STRUCT (4) dtup_99__CLASS_OBJINITELEM; struct MELT_MULTIPLE_STRUCT (5) dtup_100__CLASS_OBJINITELEM; struct MELT_OBJECT_STRUCT (3) dsym_101__OIE_CNAME; struct MELT_STRING_STRUCT (9) dstr_102__OIE_CNAME; struct MELT_OBJECT_STRUCT (4) dobj_103__OIE_CNAME; struct MELT_STRING_STRUCT (9) dstr_104__OIE_CNAME; struct MELT_OBJECT_STRUCT (3) dsym_105__OIE_DATA; struct MELT_STRING_STRUCT (8) dstr_106__OIE_DATA; struct MELT_OBJECT_STRUCT (4) dobj_107__OIE_DATA; struct MELT_STRING_STRUCT (8) dstr_108__OIE_DATA; struct MELT_OBJECT_STRUCT (3) dsym_109__OIE_DISCR; struct MELT_STRING_STRUCT (9) dstr_110__OIE_DISCR; struct MELT_OBJECT_STRUCT (4) dobj_111__OIE_DISCR; struct MELT_STRING_STRUCT (9) dstr_112__OIE_DISCR; struct MELT_OBJECT_STRUCT (3) dsym_113__OIE_LOCVAR; struct MELT_STRING_STRUCT (10) dstr_114__OIE_LOCVAR; struct MELT_OBJECT_STRUCT (4) dobj_115__OIE_LOCVAR; struct MELT_STRING_STRUCT (10) dstr_116__OIE_LOCVAR; struct MELT_OBJECT_STRUCT (3) dsym_117__CLASS_OBJINITOBJECT; struct MELT_STRING_STRUCT (19) dstr_118__CLASS_OBJINITOBJ; struct MELT_OBJECT_STRUCT (8) dobj_119__CLASS_OBJINITOBJECT; struct MELT_STRING_STRUCT (19) dstr_120__CLASS_OBJINITOBJ; struct MELT_MULTIPLE_STRUCT (5) dtup_121__CLASS_OBJINITOBJECT; struct MELT_MULTIPLE_STRUCT (7) dtup_122__CLASS_OBJINITOBJECT; struct MELT_OBJECT_STRUCT (3) dsym_123__OIO_PREDEF; struct MELT_STRING_STRUCT (10) dstr_124__OIO_PREDEF; struct MELT_OBJECT_STRUCT (4) dobj_125__OIO_PREDEF; struct MELT_STRING_STRUCT (10) dstr_126__OIO_PREDEF; struct MELT_OBJECT_STRUCT (3) dsym_127__OIO_CLASS; struct MELT_STRING_STRUCT (9) dstr_128__OIO_CLASS; struct MELT_OBJECT_STRUCT (4) dobj_129__OIO_CLASS; struct MELT_STRING_STRUCT (9) dstr_130__OIO_CLASS; struct MELT_OBJECT_STRUCT (3) dsym_131__CLASS_OBJINITUNIQUEOBJECT; struct MELT_STRING_STRUCT (25) dstr_132__CLASS_OBJINITUNI; struct MELT_OBJECT_STRUCT (8) dobj_133__CLASS_OBJINITUNIQUEOBJECT; struct MELT_STRING_STRUCT (25) dstr_134__CLASS_OBJINITUNI; struct MELT_MULTIPLE_STRUCT (6) dtup_135__CLASS_OBJINITUNIQUEOBJECT; struct MELT_MULTIPLE_STRUCT (7) dtup_136__CLASS_OBJINITUNIQUEOBJECT; struct MELT_OBJECT_STRUCT (3) dsym_137__CLASS_OBJINITMULTIPLE; struct MELT_STRING_STRUCT (21) dstr_138__CLASS_OBJINITMUL; struct MELT_OBJECT_STRUCT (8) dobj_139__CLASS_OBJINITMULTIPLE; struct MELT_STRING_STRUCT (21) dstr_140__CLASS_OBJINITMUL; struct MELT_MULTIPLE_STRUCT (5) dtup_141__CLASS_OBJINITMULTIPLE; struct MELT_MULTIPLE_STRUCT (6) dtup_142__CLASS_OBJINITMULTIPLE; struct MELT_OBJECT_STRUCT (3) dsym_143__OIM_TUPVAL; struct MELT_STRING_STRUCT (10) dstr_144__OIM_TUPVAL; struct MELT_OBJECT_STRUCT (4) dobj_145__OIM_TUPVAL; struct MELT_STRING_STRUCT (10) dstr_146__OIM_TUPVAL; struct MELT_OBJECT_STRUCT (3) dsym_147__CLASS_OBJINITCLOSURE; struct MELT_STRING_STRUCT (20) dstr_148__CLASS_OBJINITCLO; struct MELT_OBJECT_STRUCT (8) dobj_149__CLASS_OBJINITCLOSURE; struct MELT_STRING_STRUCT (20) dstr_150__CLASS_OBJINITCLO; struct MELT_MULTIPLE_STRUCT (5) dtup_151__CLASS_OBJINITCLOSURE; struct MELT_MULTIPLE_STRUCT (6) dtup_152__CLASS_OBJINITCLOSURE; struct MELT_OBJECT_STRUCT (3) dsym_153__OICLO_ROUT; struct MELT_STRING_STRUCT (10) dstr_154__OICLO_ROUT; struct MELT_OBJECT_STRUCT (4) dobj_155__OICLO_ROUT; struct MELT_STRING_STRUCT (10) dstr_156__OICLO_ROUT; struct MELT_OBJECT_STRUCT (3) dsym_157__CLASS_OBJINITROUTINE; struct MELT_STRING_STRUCT (20) dstr_158__CLASS_OBJINITROU; struct MELT_OBJECT_STRUCT (8) dobj_159__CLASS_OBJINITROUTINE; struct MELT_STRING_STRUCT (20) dstr_160__CLASS_OBJINITROU; struct MELT_MULTIPLE_STRUCT (5) dtup_161__CLASS_OBJINITROUTINE; struct MELT_MULTIPLE_STRUCT (6) dtup_162__CLASS_OBJINITROUTINE; struct MELT_OBJECT_STRUCT (3) dsym_163__OIR_PROCROUTINE; struct MELT_STRING_STRUCT (15) dstr_164__OIR_PROCROUTINE; struct MELT_OBJECT_STRUCT (4) dobj_165__OIR_PROCROUTINE; struct MELT_STRING_STRUCT (15) dstr_166__OIR_PROCROUTINE; struct MELT_OBJECT_STRUCT (3) dsym_167__CLASS_OBJINITSTRING; struct MELT_STRING_STRUCT (19) dstr_168__CLASS_OBJINITSTR; struct MELT_OBJECT_STRUCT (8) dobj_169__CLASS_OBJINITSTRING; struct MELT_STRING_STRUCT (19) dstr_170__CLASS_OBJINITSTR; struct MELT_MULTIPLE_STRUCT (5) dtup_171__CLASS_OBJINITSTRING; struct MELT_MULTIPLE_STRUCT (5) dtup_172__CLASS_OBJINITSTRING; struct MELT_OBJECT_STRUCT (3) dsym_173__CLASS_OBJINITPAIR; struct MELT_STRING_STRUCT (17) dstr_174__CLASS_OBJINITPAI; struct MELT_OBJECT_STRUCT (8) dobj_175__CLASS_OBJINITPAIR; struct MELT_STRING_STRUCT (17) dstr_176__CLASS_OBJINITPAI; struct MELT_MULTIPLE_STRUCT (5) dtup_177__CLASS_OBJINITPAIR; struct MELT_MULTIPLE_STRUCT (5) dtup_178__CLASS_OBJINITPAIR; struct MELT_OBJECT_STRUCT (3) dsym_179__CLASS_OBJINITLIST; struct MELT_STRING_STRUCT (17) dstr_180__CLASS_OBJINITLIS; struct MELT_OBJECT_STRUCT (8) dobj_181__CLASS_OBJINITLIST; struct MELT_STRING_STRUCT (17) dstr_182__CLASS_OBJINITLIS; struct MELT_MULTIPLE_STRUCT (5) dtup_183__CLASS_OBJINITLIST; struct MELT_MULTIPLE_STRUCT (5) dtup_184__CLASS_OBJINITLIST; struct MELT_OBJECT_STRUCT (3) dsym_185__CLASS_OBJINITBOXINTEGER; struct MELT_STRING_STRUCT (23) dstr_186__CLASS_OBJINITBOX; struct MELT_OBJECT_STRUCT (8) dobj_187__CLASS_OBJINITBOXINTEGER; struct MELT_STRING_STRUCT (23) dstr_188__CLASS_OBJINITBOX; struct MELT_MULTIPLE_STRUCT (5) dtup_189__CLASS_OBJINITBOXINTEGER; struct MELT_MULTIPLE_STRUCT (5) dtup_190__CLASS_OBJINITBOXINTEGER; struct MELT_OBJECT_STRUCT (3) dsym_191__CLASS_OBJEXPV; struct MELT_STRING_STRUCT (13) dstr_192__CLASS_OBJEXPV; struct MELT_OBJECT_STRUCT (8) dobj_193__CLASS_OBJEXPV; struct MELT_STRING_STRUCT (13) dstr_194__CLASS_OBJEXPV; struct MELT_MULTIPLE_STRUCT (3) dtup_195__CLASS_OBJEXPV; struct MELT_MULTIPLE_STRUCT (2) dtup_196__CLASS_OBJEXPV; struct MELT_OBJECT_STRUCT (3) dsym_197__OBX_CONT; struct MELT_STRING_STRUCT (8) dstr_198__OBX_CONT; struct MELT_OBJECT_STRUCT (4) dobj_199__OBX_CONT; struct MELT_STRING_STRUCT (8) dstr_200__OBX_CONT; struct MELT_OBJECT_STRUCT (3) dsym_201__CLASS_OBJLOCATEDEXPV; struct MELT_STRING_STRUCT (20) dstr_202__CLASS_OBJLOCATED; struct MELT_OBJECT_STRUCT (8) dobj_203__CLASS_OBJLOCATEDEXPV; struct MELT_STRING_STRUCT (20) dstr_204__CLASS_OBJLOCATED; struct MELT_MULTIPLE_STRUCT (4) dtup_205__CLASS_OBJLOCATEDEXPV; struct MELT_MULTIPLE_STRUCT (3) dtup_206__CLASS_OBJLOCATEDEXPV; struct MELT_OBJECT_STRUCT (3) dsym_207__OBCX_LOC; struct MELT_STRING_STRUCT (8) dstr_208__OBCX_LOC; struct MELT_OBJECT_STRUCT (4) dobj_209__OBCX_LOC; struct MELT_STRING_STRUCT (8) dstr_210__OBCX_LOC; struct MELT_OBJECT_STRUCT (3) dsym_211__CLASS_OBJFLAG; struct MELT_STRING_STRUCT (13) dstr_212__CLASS_OBJFLAG; struct MELT_OBJECT_STRUCT (8) dobj_213__CLASS_OBJFLAG; struct MELT_STRING_STRUCT (13) dstr_214__CLASS_OBJFLAG; struct MELT_MULTIPLE_STRUCT (4) dtup_215__CLASS_OBJFLAG; struct MELT_MULTIPLE_STRUCT (4) dtup_216__CLASS_OBJFLAG; struct MELT_OBJECT_STRUCT (3) dsym_217__OBFLAG_MATCHFLAG; struct MELT_STRING_STRUCT (16) dstr_218__OBFLAG_MATCHFLAG; struct MELT_OBJECT_STRUCT (4) dobj_219__OBFLAG_MATCHFLAG; struct MELT_STRING_STRUCT (16) dstr_220__OBFLAG_MATCHFLAG; struct MELT_OBJECT_STRUCT (3) dsym_221__OBFLAG_NAME; struct MELT_STRING_STRUCT (11) dstr_222__OBFLAG_NAME; struct MELT_OBJECT_STRUCT (4) dobj_223__OBFLAG_NAME; struct MELT_STRING_STRUCT (11) dstr_224__OBFLAG_NAME; struct MELT_OBJECT_STRUCT (3) dsym_225__OBFLAG_RANK; struct MELT_STRING_STRUCT (11) dstr_226__OBFLAG_RANK; struct MELT_OBJECT_STRUCT (4) dobj_227__OBFLAG_RANK; struct MELT_STRING_STRUCT (11) dstr_228__OBFLAG_RANK; struct MELT_OBJECT_STRUCT (3) dsym_229__CLASS_OBJINSTR; struct MELT_STRING_STRUCT (14) dstr_230__CLASS_OBJINSTR; struct MELT_OBJECT_STRUCT (8) dobj_231__CLASS_OBJINSTR; struct MELT_STRING_STRUCT (14) dstr_232__CLASS_OBJINSTR; struct MELT_MULTIPLE_STRUCT (2) dtup_233__CLASS_OBJINSTR; struct MELT_MULTIPLE_STRUCT (1) dtup_234__CLASS_OBJINSTR; struct MELT_OBJECT_STRUCT (3) dsym_235__OBI_LOC; struct MELT_STRING_STRUCT (7) dstr_236__OBI_LOC; struct MELT_OBJECT_STRUCT (4) dobj_237__OBI_LOC; struct MELT_STRING_STRUCT (7) dstr_238__OBI_LOC; struct MELT_OBJECT_STRUCT (3) dsym_239__CLASS_OBJCOMMENTINSTR; struct MELT_STRING_STRUCT (21) dstr_240__CLASS_OBJCOMMENT; struct MELT_OBJECT_STRUCT (8) dobj_241__CLASS_OBJCOMMENTINSTR; struct MELT_STRING_STRUCT (21) dstr_242__CLASS_OBJCOMMENT; struct MELT_MULTIPLE_STRUCT (3) dtup_243__CLASS_OBJCOMMENTINSTR; struct MELT_MULTIPLE_STRUCT (2) dtup_244__CLASS_OBJCOMMENTINSTR; struct MELT_OBJECT_STRUCT (3) dsym_245__OBCI_COMMENT; struct MELT_STRING_STRUCT (12) dstr_246__OBCI_COMMENT; struct MELT_OBJECT_STRUCT (4) dobj_247__OBCI_COMMENT; struct MELT_STRING_STRUCT (12) dstr_248__OBCI_COMMENT; struct MELT_OBJECT_STRUCT (3) dsym_249__CLASS_OBJCHECKSIGNAL; struct MELT_STRING_STRUCT (20) dstr_250__CLASS_OBJCHECKSI; struct MELT_OBJECT_STRUCT (8) dobj_251__CLASS_OBJCHECKSIGNAL; struct MELT_STRING_STRUCT (20) dstr_252__CLASS_OBJCHECKSI; struct MELT_MULTIPLE_STRUCT (3) dtup_253__CLASS_OBJCHECKSIGNAL; struct MELT_MULTIPLE_STRUCT (1) dtup_254__CLASS_OBJCHECKSIGNAL; struct MELT_OBJECT_STRUCT (3) dsym_255__CLASS_OBJDESTINSTR; struct MELT_STRING_STRUCT (18) dstr_256__CLASS_OBJDESTINS; struct MELT_OBJECT_STRUCT (8) dobj_257__CLASS_OBJDESTINSTR; struct MELT_STRING_STRUCT (18) dstr_258__CLASS_OBJDESTINS; struct MELT_MULTIPLE_STRUCT (3) dtup_259__CLASS_OBJDESTINSTR; struct MELT_MULTIPLE_STRUCT (2) dtup_260__CLASS_OBJDESTINSTR; struct MELT_OBJECT_STRUCT (3) dsym_261__OBDI_DESTLIST; struct MELT_STRING_STRUCT (13) dstr_262__OBDI_DESTLIST; struct MELT_OBJECT_STRUCT (4) dobj_263__OBDI_DESTLIST; struct MELT_STRING_STRUCT (13) dstr_264__OBDI_DESTLIST; struct MELT_OBJECT_STRUCT (3) dsym_265__CLASS_OBJCOMPUTE; struct MELT_STRING_STRUCT (16) dstr_266__CLASS_OBJCOMPUTE; struct MELT_OBJECT_STRUCT (8) dobj_267__CLASS_OBJCOMPUTE; struct MELT_STRING_STRUCT (16) dstr_268__CLASS_OBJCOMPUTE; struct MELT_MULTIPLE_STRUCT (4) dtup_269__CLASS_OBJCOMPUTE; struct MELT_MULTIPLE_STRUCT (4) dtup_270__CLASS_OBJCOMPUTE; struct MELT_OBJECT_STRUCT (3) dsym_271__OBCPT_EXPR; struct MELT_STRING_STRUCT (10) dstr_272__OBCPT_EXPR; struct MELT_OBJECT_STRUCT (4) dobj_273__OBCPT_EXPR; struct MELT_STRING_STRUCT (10) dstr_274__OBCPT_EXPR; struct MELT_OBJECT_STRUCT (3) dsym_275__OBCPT_TYPE; struct MELT_STRING_STRUCT (10) dstr_276__OBCPT_TYPE; struct MELT_OBJECT_STRUCT (4) dobj_277__OBCPT_TYPE; struct MELT_STRING_STRUCT (10) dstr_278__OBCPT_TYPE; struct MELT_OBJECT_STRUCT (3) dsym_279__CLASS_OBJGETARG; struct MELT_STRING_STRUCT (15) dstr_280__CLASS_OBJGETARG; struct MELT_OBJECT_STRUCT (8) dobj_281__CLASS_OBJGETARG; struct MELT_STRING_STRUCT (15) dstr_282__CLASS_OBJGETARG; struct MELT_MULTIPLE_STRUCT (3) dtup_283__CLASS_OBJGETARG; struct MELT_MULTIPLE_STRUCT (3) dtup_284__CLASS_OBJGETARG; struct MELT_OBJECT_STRUCT (3) dsym_285__OBARG_OBLOC; struct MELT_STRING_STRUCT (11) dstr_286__OBARG_OBLOC; struct MELT_OBJECT_STRUCT (4) dobj_287__OBARG_OBLOC; struct MELT_STRING_STRUCT (11) dstr_288__OBARG_OBLOC; struct MELT_OBJECT_STRUCT (3) dsym_289__OBARG_BIND; struct MELT_STRING_STRUCT (10) dstr_290__OBARG_BIND; struct MELT_OBJECT_STRUCT (4) dobj_291__OBARG_BIND; struct MELT_STRING_STRUCT (10) dstr_292__OBARG_BIND; struct MELT_OBJECT_STRUCT (3) dsym_293__CLASS_OBJGETARGREST; struct MELT_STRING_STRUCT (19) dstr_294__CLASS_OBJGETARGR; struct MELT_OBJECT_STRUCT (8) dobj_295__CLASS_OBJGETARGREST; struct MELT_STRING_STRUCT (19) dstr_296__CLASS_OBJGETARGR; struct MELT_MULTIPLE_STRUCT (4) dtup_297__CLASS_OBJGETARGREST; struct MELT_MULTIPLE_STRUCT (4) dtup_298__CLASS_OBJGETARGREST; struct MELT_OBJECT_STRUCT (3) dsym_299__OBARG_REST; struct MELT_STRING_STRUCT (10) dstr_300__OBARG_REST; struct MELT_OBJECT_STRUCT (4) dobj_301__OBARG_REST; struct MELT_STRING_STRUCT (10) dstr_302__OBARG_REST; struct MELT_OBJECT_STRUCT (3) dsym_303__CLASS_OBJPUTXTRARESULT; struct MELT_STRING_STRUCT (22) dstr_304__CLASS_OBJPUTXTRA; struct MELT_OBJECT_STRUCT (8) dobj_305__CLASS_OBJPUTXTRARESULT; struct MELT_STRING_STRUCT (22) dstr_306__CLASS_OBJPUTXTRA; struct MELT_MULTIPLE_STRUCT (3) dtup_307__CLASS_OBJPUTXTRARESULT; struct MELT_MULTIPLE_STRUCT (3) dtup_308__CLASS_OBJPUTXTRARESULT; struct MELT_OBJECT_STRUCT (3) dsym_309__OBXRES_RANK; struct MELT_STRING_STRUCT (11) dstr_310__OBXRES_RANK; struct MELT_OBJECT_STRUCT (4) dobj_311__OBXRES_RANK; struct MELT_STRING_STRUCT (11) dstr_312__OBXRES_RANK; struct MELT_OBJECT_STRUCT (3) dsym_313__OBXRES_OBLOC; struct MELT_STRING_STRUCT (12) dstr_314__OBXRES_OBLOC; struct MELT_OBJECT_STRUCT (4) dobj_315__OBXRES_OBLOC; struct MELT_STRING_STRUCT (12) dstr_316__OBXRES_OBLOC; struct MELT_OBJECT_STRUCT (3) dsym_317__CLASS_OBJFINALRETURN; struct MELT_STRING_STRUCT (20) dstr_318__CLASS_OBJFINALRE; struct MELT_OBJECT_STRUCT (8) dobj_319__CLASS_OBJFINALRETURN; struct MELT_STRING_STRUCT (20) dstr_320__CLASS_OBJFINALRE; struct MELT_MULTIPLE_STRUCT (3) dtup_321__CLASS_OBJFINALRETURN; struct MELT_MULTIPLE_STRUCT (1) dtup_322__CLASS_OBJFINALRETURN; struct MELT_OBJECT_STRUCT (3) dsym_323__CLASS_OBJCLEAR; struct MELT_STRING_STRUCT (14) dstr_324__CLASS_OBJCLEAR; struct MELT_OBJECT_STRUCT (8) dobj_325__CLASS_OBJCLEAR; struct MELT_STRING_STRUCT (14) dstr_326__CLASS_OBJCLEAR; struct MELT_MULTIPLE_STRUCT (3) dtup_327__CLASS_OBJCLEAR; struct MELT_MULTIPLE_STRUCT (2) dtup_328__CLASS_OBJCLEAR; struct MELT_OBJECT_STRUCT (3) dsym_329__OCLR_VLOC; struct MELT_STRING_STRUCT (9) dstr_330__OCLR_VLOC; struct MELT_OBJECT_STRUCT (4) dobj_331__OCLR_VLOC; struct MELT_STRING_STRUCT (9) dstr_332__OCLR_VLOC; struct MELT_OBJECT_STRUCT (3) dsym_333__CLASS_OBJANYBLOCK; struct MELT_STRING_STRUCT (17) dstr_334__CLASS_OBJANYBLOC; struct MELT_OBJECT_STRUCT (8) dobj_335__CLASS_OBJANYBLOCK; struct MELT_STRING_STRUCT (17) dstr_336__CLASS_OBJANYBLOC; struct MELT_MULTIPLE_STRUCT (3) dtup_337__CLASS_OBJANYBLOCK; struct MELT_MULTIPLE_STRUCT (3) dtup_338__CLASS_OBJANYBLOCK; struct MELT_OBJECT_STRUCT (3) dsym_339__OBLO_BODYL; struct MELT_STRING_STRUCT (10) dstr_340__OBLO_BODYL; struct MELT_OBJECT_STRUCT (4) dobj_341__OBLO_BODYL; struct MELT_STRING_STRUCT (10) dstr_342__OBLO_BODYL; struct MELT_OBJECT_STRUCT (3) dsym_343__OBLO_EPIL; struct MELT_STRING_STRUCT (9) dstr_344__OBLO_EPIL; struct MELT_OBJECT_STRUCT (4) dobj_345__OBLO_EPIL; struct MELT_STRING_STRUCT (9) dstr_346__OBLO_EPIL; struct MELT_OBJECT_STRUCT (3) dsym_347__CLASS_OBJPLAINBLOCK; struct MELT_STRING_STRUCT (19) dstr_348__CLASS_OBJPLAINBL; struct MELT_OBJECT_STRUCT (8) dobj_349__CLASS_OBJPLAINBLOCK; struct MELT_STRING_STRUCT (19) dstr_350__CLASS_OBJPLAINBL; struct MELT_MULTIPLE_STRUCT (4) dtup_351__CLASS_OBJPLAINBLOCK; struct MELT_MULTIPLE_STRUCT (3) dtup_352__CLASS_OBJPLAINBLOCK; struct MELT_OBJECT_STRUCT (3) dsym_353__CLASS_OBJMULTIALLOCBLOCK; struct MELT_STRING_STRUCT (24) dstr_354__CLASS_OBJMULTIAL; struct MELT_OBJECT_STRUCT (8) dobj_355__CLASS_OBJMULTIALLOCBLOCK; struct MELT_STRING_STRUCT (24) dstr_356__CLASS_OBJMULTIAL; struct MELT_MULTIPLE_STRUCT (4) dtup_357__CLASS_OBJMULTIALLOCBLOCK; struct MELT_MULTIPLE_STRUCT (5) dtup_358__CLASS_OBJMULTIALLOCBLOCK; struct MELT_OBJECT_STRUCT (3) dsym_359__OMALBLO_ALLSTRUCT; struct MELT_STRING_STRUCT (17) dstr_360__OMALBLO_ALLSTRUC; struct MELT_OBJECT_STRUCT (4) dobj_361__OMALBLO_ALLSTRUCT; struct MELT_STRING_STRUCT (17) dstr_362__OMALBLO_ALLSTRUC; struct MELT_OBJECT_STRUCT (3) dsym_363__OMALBLO_NAME; struct MELT_STRING_STRUCT (12) dstr_364__OMALBLO_NAME; struct MELT_OBJECT_STRUCT (4) dobj_365__OMALBLO_NAME; struct MELT_STRING_STRUCT (12) dstr_366__OMALBLO_NAME; struct MELT_OBJECT_STRUCT (3) dsym_367__CLASS_OBJCOMMENTEDBLOCK; struct MELT_STRING_STRUCT (23) dstr_368__CLASS_OBJCOMMENT; struct MELT_OBJECT_STRUCT (8) dobj_369__CLASS_OBJCOMMENTEDBLOCK; struct MELT_STRING_STRUCT (23) dstr_370__CLASS_OBJCOMMENT; struct MELT_MULTIPLE_STRUCT (4) dtup_371__CLASS_OBJCOMMENTEDBLOCK; struct MELT_MULTIPLE_STRUCT (4) dtup_372__CLASS_OBJCOMMENTEDBLOCK; struct MELT_OBJECT_STRUCT (3) dsym_373__OCOMBLO_COMMENT; struct MELT_STRING_STRUCT (15) dstr_374__OCOMBLO_COMMENT; struct MELT_OBJECT_STRUCT (4) dobj_375__OCOMBLO_COMMENT; struct MELT_STRING_STRUCT (15) dstr_376__OCOMBLO_COMMENT; struct MELT_OBJECT_STRUCT (3) dsym_377__CLASS_OBJMULTIBLOCK; struct MELT_STRING_STRUCT (19) dstr_378__CLASS_OBJMULTIBL; struct MELT_OBJECT_STRUCT (8) dobj_379__CLASS_OBJMULTIBLOCK; struct MELT_STRING_STRUCT (19) dstr_380__CLASS_OBJMULTIBL; struct MELT_MULTIPLE_STRUCT (4) dtup_381__CLASS_OBJMULTIBLOCK; struct MELT_MULTIPLE_STRUCT (4) dtup_382__CLASS_OBJMULTIBLOCK; struct MELT_OBJECT_STRUCT (3) dsym_383__OMULBLO_SUBCOMP; struct MELT_STRING_STRUCT (15) dstr_384__OMULBLO_SUBCOMP; struct MELT_OBJECT_STRUCT (4) dobj_385__OMULBLO_SUBCOMP; struct MELT_STRING_STRUCT (15) dstr_386__OMULBLO_SUBCOMP; struct MELT_OBJECT_STRUCT (3) dsym_387__CLASS_OBJMATCHFLAGBLOCK; struct MELT_STRING_STRUCT (23) dstr_388__CLASS_OBJMATCHFL; struct MELT_OBJECT_STRUCT (8) dobj_389__CLASS_OBJMATCHFLAGBLOCK; struct MELT_STRING_STRUCT (23) dstr_390__CLASS_OBJMATCHFL; struct MELT_MULTIPLE_STRUCT (4) dtup_391__CLASS_OBJMATCHFLAGBLOCK; struct MELT_MULTIPLE_STRUCT (4) dtup_392__CLASS_OBJMATCHFLAGBLOCK; struct MELT_OBJECT_STRUCT (3) dsym_393__OMCHFLGBLO_FLAGS; struct MELT_STRING_STRUCT (16) dstr_394__OMCHFLGBLO_FLAGS; struct MELT_OBJECT_STRUCT (4) dobj_395__OMCHFLGBLO_FLAGS; struct MELT_STRING_STRUCT (16) dstr_396__OMCHFLGBLO_FLAGS; struct MELT_OBJECT_STRUCT (3) dsym_397__CLASS_OBJLABELINSTR; struct MELT_STRING_STRUCT (19) dstr_398__CLASS_OBJLABELIN; struct MELT_OBJECT_STRUCT (8) dobj_399__CLASS_OBJLABELINSTR; struct MELT_STRING_STRUCT (19) dstr_400__CLASS_OBJLABELIN; struct MELT_MULTIPLE_STRUCT (3) dtup_401__CLASS_OBJLABELINSTR; struct MELT_MULTIPLE_STRUCT (3) dtup_402__CLASS_OBJLABELINSTR; struct MELT_OBJECT_STRUCT (3) dsym_403__OBLAB_PREFIX; struct MELT_STRING_STRUCT (12) dstr_404__OBLAB_PREFIX; struct MELT_OBJECT_STRUCT (4) dobj_405__OBLAB_PREFIX; struct MELT_STRING_STRUCT (12) dstr_406__OBLAB_PREFIX; struct MELT_OBJECT_STRUCT (3) dsym_407__OBLAB_RANK; struct MELT_STRING_STRUCT (10) dstr_408__OBLAB_RANK; struct MELT_OBJECT_STRUCT (4) dobj_409__OBLAB_RANK; struct MELT_STRING_STRUCT (10) dstr_410__OBLAB_RANK; struct MELT_OBJECT_STRUCT (3) dsym_411__CLASS_OBJGOTOINSTR; struct MELT_STRING_STRUCT (18) dstr_412__CLASS_OBJGOTOINS; struct MELT_OBJECT_STRUCT (8) dobj_413__CLASS_OBJGOTOINSTR; struct MELT_STRING_STRUCT (18) dstr_414__CLASS_OBJGOTOINS; struct MELT_MULTIPLE_STRUCT (3) dtup_415__CLASS_OBJGOTOINSTR; struct MELT_MULTIPLE_STRUCT (3) dtup_416__CLASS_OBJGOTOINSTR; struct MELT_OBJECT_STRUCT (3) dsym_417__OBGOTO_PREFIX; struct MELT_STRING_STRUCT (13) dstr_418__OBGOTO_PREFIX; struct MELT_OBJECT_STRUCT (4) dobj_419__OBGOTO_PREFIX; struct MELT_STRING_STRUCT (13) dstr_420__OBGOTO_PREFIX; struct MELT_OBJECT_STRUCT (3) dsym_421__OBGOTO_RANK; struct MELT_STRING_STRUCT (11) dstr_422__OBGOTO_RANK; struct MELT_OBJECT_STRUCT (4) dobj_423__OBGOTO_RANK; struct MELT_STRING_STRUCT (11) dstr_424__OBGOTO_RANK; struct MELT_OBJECT_STRUCT (3) dsym_425__CLASS_OBJLOOP; struct MELT_STRING_STRUCT (13) dstr_426__CLASS_OBJLOOP; struct MELT_OBJECT_STRUCT (8) dobj_427__CLASS_OBJLOOP; struct MELT_STRING_STRUCT (13) dstr_428__CLASS_OBJLOOP; struct MELT_MULTIPLE_STRUCT (4) dtup_429__CLASS_OBJLOOP; struct MELT_MULTIPLE_STRUCT (5) dtup_430__CLASS_OBJLOOP; struct MELT_OBJECT_STRUCT (3) dsym_431__OBLOOP_LABEL; struct MELT_STRING_STRUCT (12) dstr_432__OBLOOP_LABEL; struct MELT_OBJECT_STRUCT (4) dobj_433__OBLOOP_LABEL; struct MELT_STRING_STRUCT (12) dstr_434__OBLOOP_LABEL; struct MELT_OBJECT_STRUCT (3) dsym_435__OBLOOP_RESV; struct MELT_STRING_STRUCT (11) dstr_436__OBLOOP_RESV; struct MELT_OBJECT_STRUCT (4) dobj_437__OBLOOP_RESV; struct MELT_STRING_STRUCT (11) dstr_438__OBLOOP_RESV; struct MELT_OBJECT_STRUCT (3) dsym_439__CLASS_OBJEXIT; struct MELT_STRING_STRUCT (13) dstr_440__CLASS_OBJEXIT; struct MELT_OBJECT_STRUCT (8) dobj_441__CLASS_OBJEXIT; struct MELT_STRING_STRUCT (13) dstr_442__CLASS_OBJEXIT; struct MELT_MULTIPLE_STRUCT (3) dtup_443__CLASS_OBJEXIT; struct MELT_MULTIPLE_STRUCT (2) dtup_444__CLASS_OBJEXIT; struct MELT_OBJECT_STRUCT (3) dsym_445__OBEXIT_LABEL; struct MELT_STRING_STRUCT (12) dstr_446__OBEXIT_LABEL; struct MELT_OBJECT_STRUCT (4) dobj_447__OBEXIT_LABEL; struct MELT_STRING_STRUCT (12) dstr_448__OBEXIT_LABEL; struct MELT_OBJECT_STRUCT (3) dsym_449__CLASS_OBJAGAIN; struct MELT_STRING_STRUCT (14) dstr_450__CLASS_OBJAGAIN; struct MELT_OBJECT_STRUCT (8) dobj_451__CLASS_OBJAGAIN; struct MELT_STRING_STRUCT (14) dstr_452__CLASS_OBJAGAIN; struct MELT_MULTIPLE_STRUCT (3) dtup_453__CLASS_OBJAGAIN; struct MELT_MULTIPLE_STRUCT (2) dtup_454__CLASS_OBJAGAIN; struct MELT_OBJECT_STRUCT (3) dsym_455__OBAGAIN_LABEL; struct MELT_STRING_STRUCT (13) dstr_456__OBAGAIN_LABEL; struct MELT_OBJECT_STRUCT (4) dobj_457__OBAGAIN_LABEL; struct MELT_STRING_STRUCT (13) dstr_458__OBAGAIN_LABEL; struct MELT_OBJECT_STRUCT (3) dsym_459__CLASS_OBJCITERBLOCK; struct MELT_STRING_STRUCT (19) dstr_460__CLASS_OBJCITERBL; struct MELT_OBJECT_STRUCT (8) dobj_461__CLASS_OBJCITERBLOCK; struct MELT_STRING_STRUCT (19) dstr_462__CLASS_OBJCITERBL; struct MELT_MULTIPLE_STRUCT (4) dtup_463__CLASS_OBJCITERBLOCK; struct MELT_MULTIPLE_STRUCT (6) dtup_464__CLASS_OBJCITERBLOCK; struct MELT_OBJECT_STRUCT (3) dsym_465__OBCITER_CITER; struct MELT_STRING_STRUCT (13) dstr_466__OBCITER_CITER; struct MELT_OBJECT_STRUCT (4) dobj_467__OBCITER_CITER; struct MELT_STRING_STRUCT (13) dstr_468__OBCITER_CITER; struct MELT_OBJECT_STRUCT (3) dsym_469__OBCITER_BEFORE; struct MELT_STRING_STRUCT (14) dstr_470__OBCITER_BEFORE; struct MELT_OBJECT_STRUCT (4) dobj_471__OBCITER_BEFORE; struct MELT_STRING_STRUCT (14) dstr_472__OBCITER_BEFORE; struct MELT_OBJECT_STRUCT (3) dsym_473__OBCITER_AFTER; struct MELT_STRING_STRUCT (13) dstr_474__OBCITER_AFTER; struct MELT_OBJECT_STRUCT (4) dobj_475__OBCITER_AFTER; struct MELT_STRING_STRUCT (13) dstr_476__OBCITER_AFTER; struct MELT_OBJECT_STRUCT (3) dsym_477__CLASS_OBJCOND; struct MELT_STRING_STRUCT (13) dstr_478__CLASS_OBJCOND; struct MELT_OBJECT_STRUCT (8) dobj_479__CLASS_OBJCOND; struct MELT_STRING_STRUCT (13) dstr_480__CLASS_OBJCOND; struct MELT_MULTIPLE_STRUCT (3) dtup_481__CLASS_OBJCOND; struct MELT_MULTIPLE_STRUCT (4) dtup_482__CLASS_OBJCOND; struct MELT_OBJECT_STRUCT (3) dsym_483__OBCOND_TEST; struct MELT_STRING_STRUCT (11) dstr_484__OBCOND_TEST; struct MELT_OBJECT_STRUCT (4) dobj_485__OBCOND_TEST; struct MELT_STRING_STRUCT (11) dstr_486__OBCOND_TEST; struct MELT_OBJECT_STRUCT (3) dsym_487__OBCOND_THEN; struct MELT_STRING_STRUCT (11) dstr_488__OBCOND_THEN; struct MELT_OBJECT_STRUCT (4) dobj_489__OBCOND_THEN; struct MELT_STRING_STRUCT (11) dstr_490__OBCOND_THEN; struct MELT_OBJECT_STRUCT (3) dsym_491__OBCOND_ELSE; struct MELT_STRING_STRUCT (11) dstr_492__OBCOND_ELSE; struct MELT_OBJECT_STRUCT (4) dobj_493__OBCOND_ELSE; struct MELT_STRING_STRUCT (11) dstr_494__OBCOND_ELSE; struct MELT_OBJECT_STRUCT (3) dsym_495__CLASS_OBJCPPIF; struct MELT_STRING_STRUCT (14) dstr_496__CLASS_OBJCPPIF; struct MELT_OBJECT_STRUCT (8) dobj_497__CLASS_OBJCPPIF; struct MELT_STRING_STRUCT (14) dstr_498__CLASS_OBJCPPIF; struct MELT_MULTIPLE_STRUCT (3) dtup_499__CLASS_OBJCPPIF; struct MELT_MULTIPLE_STRUCT (4) dtup_500__CLASS_OBJCPPIF; struct MELT_OBJECT_STRUCT (3) dsym_501__OBIFP_COND; struct MELT_STRING_STRUCT (10) dstr_502__OBIFP_COND; struct MELT_OBJECT_STRUCT (4) dobj_503__OBIFP_COND; struct MELT_STRING_STRUCT (10) dstr_504__OBIFP_COND; struct MELT_OBJECT_STRUCT (3) dsym_505__OBIFP_THEN; struct MELT_STRING_STRUCT (10) dstr_506__OBIFP_THEN; struct MELT_OBJECT_STRUCT (4) dobj_507__OBIFP_THEN; struct MELT_STRING_STRUCT (10) dstr_508__OBIFP_THEN; struct MELT_OBJECT_STRUCT (3) dsym_509__OBIFP_ELSE; struct MELT_STRING_STRUCT (10) dstr_510__OBIFP_ELSE; struct MELT_OBJECT_STRUCT (4) dobj_511__OBIFP_ELSE; struct MELT_STRING_STRUCT (10) dstr_512__OBIFP_ELSE; struct MELT_OBJECT_STRUCT (3) dsym_513__CLASS_OBJINTERNCOMMON; struct MELT_STRING_STRUCT (21) dstr_514__CLASS_OBJINTERNC; struct MELT_OBJECT_STRUCT (8) dobj_515__CLASS_OBJINTERNCOMMON; struct MELT_STRING_STRUCT (21) dstr_516__CLASS_OBJINTERNC; struct MELT_MULTIPLE_STRUCT (3) dtup_517__CLASS_OBJINTERNCOMMON; struct MELT_MULTIPLE_STRUCT (2) dtup_518__CLASS_OBJINTERNCOMMON; struct MELT_OBJECT_STRUCT (3) dsym_519__OBINTERN_IOBJ; struct MELT_STRING_STRUCT (13) dstr_520__OBINTERN_IOBJ; struct MELT_OBJECT_STRUCT (4) dobj_521__OBINTERN_IOBJ; struct MELT_STRING_STRUCT (13) dstr_522__OBINTERN_IOBJ; struct MELT_OBJECT_STRUCT (3) dsym_523__CLASS_OBJINTERNSYMBOL; struct MELT_STRING_STRUCT (21) dstr_524__CLASS_OBJINTERNS; struct MELT_OBJECT_STRUCT (8) dobj_525__CLASS_OBJINTERNSYMBOL; struct MELT_STRING_STRUCT (21) dstr_526__CLASS_OBJINTERNS; struct MELT_MULTIPLE_STRUCT (4) dtup_527__CLASS_OBJINTERNSYMBOL; struct MELT_MULTIPLE_STRUCT (2) dtup_528__CLASS_OBJINTERNSYMBOL; struct MELT_OBJECT_STRUCT (3) dsym_529__CLASS_OBJINTERNKEYWORD; struct MELT_STRING_STRUCT (22) dstr_530__CLASS_OBJINTERNK; struct MELT_OBJECT_STRUCT (8) dobj_531__CLASS_OBJINTERNKEYWORD; struct MELT_STRING_STRUCT (22) dstr_532__CLASS_OBJINTERNK; struct MELT_MULTIPLE_STRUCT (4) dtup_533__CLASS_OBJINTERNKEYWORD; struct MELT_MULTIPLE_STRUCT (2) dtup_534__CLASS_OBJINTERNKEYWORD; struct MELT_OBJECT_STRUCT (3) dsym_535__CLASS_OBJGETNAMEDCOMMON; struct MELT_STRING_STRUCT (23) dstr_536__CLASS_OBJGETNAME; struct MELT_OBJECT_STRUCT (8) dobj_537__CLASS_OBJGETNAMEDCOMMON; struct MELT_STRING_STRUCT (23) dstr_538__CLASS_OBJGETNAME; struct MELT_MULTIPLE_STRUCT (3) dtup_539__CLASS_OBJGETNAMEDCOMMON; struct MELT_MULTIPLE_STRUCT (2) dtup_540__CLASS_OBJGETNAMEDCOMMON; struct MELT_OBJECT_STRUCT (3) dsym_541__OBGNAMED_IOBJ; struct MELT_STRING_STRUCT (13) dstr_542__OBGNAMED_IOBJ; struct MELT_OBJECT_STRUCT (4) dobj_543__OBGNAMED_IOBJ; struct MELT_STRING_STRUCT (13) dstr_544__OBGNAMED_IOBJ; struct MELT_OBJECT_STRUCT (3) dsym_545__CLASS_OBJGETNAMEDSYMBOL; struct MELT_STRING_STRUCT (23) dstr_546__CLASS_OBJGETNAME; struct MELT_OBJECT_STRUCT (8) dobj_547__CLASS_OBJGETNAMEDSYMBOL; struct MELT_STRING_STRUCT (23) dstr_548__CLASS_OBJGETNAME; struct MELT_MULTIPLE_STRUCT (4) dtup_549__CLASS_OBJGETNAMEDSYMBOL; struct MELT_MULTIPLE_STRUCT (2) dtup_550__CLASS_OBJGETNAMEDSYMBOL; struct MELT_OBJECT_STRUCT (3) dsym_551__CLASS_OBJGETNAMEDKEYWORD; struct MELT_STRING_STRUCT (24) dstr_552__CLASS_OBJGETNAME; struct MELT_OBJECT_STRUCT (8) dobj_553__CLASS_OBJGETNAMEDKEYWORD; struct MELT_STRING_STRUCT (24) dstr_554__CLASS_OBJGETNAME; struct MELT_MULTIPLE_STRUCT (4) dtup_555__CLASS_OBJGETNAMEDKEYWORD; struct MELT_MULTIPLE_STRUCT (2) dtup_556__CLASS_OBJGETNAMEDKEYWORD; struct MELT_OBJECT_STRUCT (3) dsym_557__CLASS_OBJAPPLY; struct MELT_STRING_STRUCT (14) dstr_558__CLASS_OBJAPPLY; struct MELT_OBJECT_STRUCT (8) dobj_559__CLASS_OBJAPPLY; struct MELT_STRING_STRUCT (14) dstr_560__CLASS_OBJAPPLY; struct MELT_MULTIPLE_STRUCT (4) dtup_561__CLASS_OBJAPPLY; struct MELT_MULTIPLE_STRUCT (4) dtup_562__CLASS_OBJAPPLY; struct MELT_OBJECT_STRUCT (3) dsym_563__OBAPP_CLOS; struct MELT_STRING_STRUCT (10) dstr_564__OBAPP_CLOS; struct MELT_OBJECT_STRUCT (4) dobj_565__OBAPP_CLOS; struct MELT_STRING_STRUCT (10) dstr_566__OBAPP_CLOS; struct MELT_OBJECT_STRUCT (3) dsym_567__OBAPP_ARGS; struct MELT_STRING_STRUCT (10) dstr_568__OBAPP_ARGS; struct MELT_OBJECT_STRUCT (4) dobj_569__OBAPP_ARGS; struct MELT_STRING_STRUCT (10) dstr_570__OBAPP_ARGS; struct MELT_OBJECT_STRUCT (3) dsym_571__CLASS_OBJMULTIAPPLY; struct MELT_STRING_STRUCT (19) dstr_572__CLASS_OBJMULTIAP; struct MELT_OBJECT_STRUCT (8) dobj_573__CLASS_OBJMULTIAPPLY; struct MELT_STRING_STRUCT (19) dstr_574__CLASS_OBJMULTIAP; struct MELT_MULTIPLE_STRUCT (5) dtup_575__CLASS_OBJMULTIAPPLY; struct MELT_MULTIPLE_STRUCT (5) dtup_576__CLASS_OBJMULTIAPPLY; struct MELT_OBJECT_STRUCT (3) dsym_577__OBMULTAPP_XRES; struct MELT_STRING_STRUCT (14) dstr_578__OBMULTAPP_XRES; struct MELT_OBJECT_STRUCT (4) dobj_579__OBMULTAPP_XRES; struct MELT_STRING_STRUCT (14) dstr_580__OBMULTAPP_XRES; struct MELT_OBJECT_STRUCT (3) dsym_581__CLASS_OBJMSEND; struct MELT_STRING_STRUCT (14) dstr_582__CLASS_OBJMSEND; struct MELT_OBJECT_STRUCT (8) dobj_583__CLASS_OBJMSEND; struct MELT_STRING_STRUCT (14) dstr_584__CLASS_OBJMSEND; struct MELT_MULTIPLE_STRUCT (4) dtup_585__CLASS_OBJMSEND; struct MELT_MULTIPLE_STRUCT (5) dtup_586__CLASS_OBJMSEND; struct MELT_OBJECT_STRUCT (3) dsym_587__OBMSND_SEL; struct MELT_STRING_STRUCT (10) dstr_588__OBMSND_SEL; struct MELT_OBJECT_STRUCT (4) dobj_589__OBMSND_SEL; struct MELT_STRING_STRUCT (10) dstr_590__OBMSND_SEL; struct MELT_OBJECT_STRUCT (3) dsym_591__OBMSND_RECV; struct MELT_STRING_STRUCT (11) dstr_592__OBMSND_RECV; struct MELT_OBJECT_STRUCT (4) dobj_593__OBMSND_RECV; struct MELT_STRING_STRUCT (11) dstr_594__OBMSND_RECV; struct MELT_OBJECT_STRUCT (3) dsym_595__OBMSND_ARGS; struct MELT_STRING_STRUCT (11) dstr_596__OBMSND_ARGS; struct MELT_OBJECT_STRUCT (4) dobj_597__OBMSND_ARGS; struct MELT_STRING_STRUCT (11) dstr_598__OBMSND_ARGS; struct MELT_OBJECT_STRUCT (3) dsym_599__CLASS_OBJMULTIMSEND; struct MELT_STRING_STRUCT (19) dstr_600__CLASS_OBJMULTIMS; struct MELT_OBJECT_STRUCT (8) dobj_601__CLASS_OBJMULTIMSEND; struct MELT_STRING_STRUCT (19) dstr_602__CLASS_OBJMULTIMS; struct MELT_MULTIPLE_STRUCT (5) dtup_603__CLASS_OBJMULTIMSEND; struct MELT_MULTIPLE_STRUCT (6) dtup_604__CLASS_OBJMULTIMSEND; struct MELT_OBJECT_STRUCT (3) dsym_605__OBMULTSND_XRES; struct MELT_STRING_STRUCT (14) dstr_606__OBMULTSND_XRES; struct MELT_OBJECT_STRUCT (4) dobj_607__OBMULTSND_XRES; struct MELT_STRING_STRUCT (14) dstr_608__OBMULTSND_XRES; struct MELT_OBJECT_STRUCT (3) dsym_609__CLASS_OBJRAWALLOCOBJ; struct MELT_STRING_STRUCT (20) dstr_610__CLASS_OBJRAWALLO; struct MELT_OBJECT_STRUCT (8) dobj_611__CLASS_OBJRAWALLOCOBJ; struct MELT_STRING_STRUCT (20) dstr_612__CLASS_OBJRAWALLO; struct MELT_MULTIPLE_STRUCT (4) dtup_613__CLASS_OBJRAWALLOCOBJ; struct MELT_MULTIPLE_STRUCT (5) dtup_614__CLASS_OBJRAWALLOCOBJ; struct MELT_OBJECT_STRUCT (3) dsym_615__OBRALLOBJ_CLASS; struct MELT_STRING_STRUCT (15) dstr_616__OBRALLOBJ_CLASS; struct MELT_OBJECT_STRUCT (4) dobj_617__OBRALLOBJ_CLASS; struct MELT_STRING_STRUCT (15) dstr_618__OBRALLOBJ_CLASS; struct MELT_OBJECT_STRUCT (3) dsym_619__OBRALLOBJ_LEN; struct MELT_STRING_STRUCT (13) dstr_620__OBRALLOBJ_LEN; struct MELT_OBJECT_STRUCT (4) dobj_621__OBRALLOBJ_LEN; struct MELT_STRING_STRUCT (13) dstr_622__OBRALLOBJ_LEN; struct MELT_OBJECT_STRUCT (3) dsym_623__OBRALLOBJ_CLASSNAME; struct MELT_STRING_STRUCT (19) dstr_624__OBRALLOBJ_CLASSN; struct MELT_OBJECT_STRUCT (4) dobj_625__OBRALLOBJ_CLASSNAME; struct MELT_STRING_STRUCT (19) dstr_626__OBRALLOBJ_CLASSN; struct MELT_OBJECT_STRUCT (3) dsym_627__CLASS_OBJDBGTRACEWRITEOBJ; struct MELT_STRING_STRUCT (25) dstr_628__CLASS_OBJDBGTRAC; struct MELT_OBJECT_STRUCT (8) dobj_629__CLASS_OBJDBGTRACEWRITEOBJ; struct MELT_STRING_STRUCT (25) dstr_630__CLASS_OBJDBGTRAC; struct MELT_MULTIPLE_STRUCT (3) dtup_631__CLASS_OBJDBGTRACEWRITEOBJ; struct MELT_MULTIPLE_STRUCT (3) dtup_632__CLASS_OBJDBGTRACEWRITEOBJ; struct MELT_OBJECT_STRUCT (3) dsym_633__OBDTW_WRITTENOBJ; struct MELT_STRING_STRUCT (16) dstr_634__OBDTW_WRITTENOBJ; struct MELT_OBJECT_STRUCT (4) dobj_635__OBDTW_WRITTENOBJ; struct MELT_STRING_STRUCT (16) dstr_636__OBDTW_WRITTENOBJ; struct MELT_OBJECT_STRUCT (3) dsym_637__OBDTW_MESSAGE; struct MELT_STRING_STRUCT (13) dstr_638__OBDTW_MESSAGE; struct MELT_OBJECT_STRUCT (4) dobj_639__OBDTW_MESSAGE; struct MELT_STRING_STRUCT (13) dstr_640__OBDTW_MESSAGE; struct MELT_OBJECT_STRUCT (3) dsym_641__CLASS_OBJNEWCLOSURE; struct MELT_STRING_STRUCT (19) dstr_642__CLASS_OBJNEWCLOS; struct MELT_OBJECT_STRUCT (8) dobj_643__CLASS_OBJNEWCLOSURE; struct MELT_STRING_STRUCT (19) dstr_644__CLASS_OBJNEWCLOS; struct MELT_MULTIPLE_STRUCT (4) dtup_645__CLASS_OBJNEWCLOSURE; struct MELT_MULTIPLE_STRUCT (5) dtup_646__CLASS_OBJNEWCLOSURE; struct MELT_OBJECT_STRUCT (3) dsym_647__OBNCLO_DISCR; struct MELT_STRING_STRUCT (12) dstr_648__OBNCLO_DISCR; struct MELT_OBJECT_STRUCT (4) dobj_649__OBNCLO_DISCR; struct MELT_STRING_STRUCT (12) dstr_650__OBNCLO_DISCR; struct MELT_OBJECT_STRUCT (3) dsym_651__OBNCLO_ROUT; struct MELT_STRING_STRUCT (11) dstr_652__OBNCLO_ROUT; struct MELT_OBJECT_STRUCT (4) dobj_653__OBNCLO_ROUT; struct MELT_STRING_STRUCT (11) dstr_654__OBNCLO_ROUT; struct MELT_OBJECT_STRUCT (3) dsym_655__OBNCLO_LEN; struct MELT_STRING_STRUCT (10) dstr_656__OBNCLO_LEN; struct MELT_OBJECT_STRUCT (4) dobj_657__OBNCLO_LEN; struct MELT_STRING_STRUCT (10) dstr_658__OBNCLO_LEN; struct MELT_OBJECT_STRUCT (3) dsym_659__CLASS_OBJPUTUPLE; struct MELT_STRING_STRUCT (16) dstr_660__CLASS_OBJPUTUPLE; struct MELT_OBJECT_STRUCT (8) dobj_661__CLASS_OBJPUTUPLE; struct MELT_STRING_STRUCT (16) dstr_662__CLASS_OBJPUTUPLE; struct MELT_MULTIPLE_STRUCT (3) dtup_663__CLASS_OBJPUTUPLE; struct MELT_MULTIPLE_STRUCT (4) dtup_664__CLASS_OBJPUTUPLE; struct MELT_OBJECT_STRUCT (3) dsym_665__OPUTU_TUPLED; struct MELT_STRING_STRUCT (12) dstr_666__OPUTU_TUPLED; struct MELT_OBJECT_STRUCT (4) dobj_667__OPUTU_TUPLED; struct MELT_STRING_STRUCT (12) dstr_668__OPUTU_TUPLED; struct MELT_OBJECT_STRUCT (3) dsym_669__OPUTU_OFFSET; struct MELT_STRING_STRUCT (12) dstr_670__OPUTU_OFFSET; struct MELT_OBJECT_STRUCT (4) dobj_671__OPUTU_OFFSET; struct MELT_STRING_STRUCT (12) dstr_672__OPUTU_OFFSET; struct MELT_OBJECT_STRUCT (3) dsym_673__OPUTU_VALUE; struct MELT_STRING_STRUCT (11) dstr_674__OPUTU_VALUE; struct MELT_OBJECT_STRUCT (4) dobj_675__OPUTU_VALUE; struct MELT_STRING_STRUCT (11) dstr_676__OPUTU_VALUE; struct MELT_OBJECT_STRUCT (3) dsym_677__CLASS_OBJPUTPAIR; struct MELT_STRING_STRUCT (16) dstr_678__CLASS_OBJPUTPAIR; struct MELT_OBJECT_STRUCT (8) dobj_679__CLASS_OBJPUTPAIR; struct MELT_STRING_STRUCT (16) dstr_680__CLASS_OBJPUTPAIR; struct MELT_MULTIPLE_STRUCT (3) dtup_681__CLASS_OBJPUTPAIR; struct MELT_MULTIPLE_STRUCT (2) dtup_682__CLASS_OBJPUTPAIR; struct MELT_OBJECT_STRUCT (3) dsym_683__OPUTP_PAIR; struct MELT_STRING_STRUCT (10) dstr_684__OPUTP_PAIR; struct MELT_OBJECT_STRUCT (4) dobj_685__OPUTP_PAIR; struct MELT_STRING_STRUCT (10) dstr_686__OPUTP_PAIR; struct MELT_OBJECT_STRUCT (3) dsym_687__CLASS_OBJPUTPAIRHEAD; struct MELT_STRING_STRUCT (20) dstr_688__CLASS_OBJPUTPAIR; struct MELT_OBJECT_STRUCT (8) dobj_689__CLASS_OBJPUTPAIRHEAD; struct MELT_STRING_STRUCT (20) dstr_690__CLASS_OBJPUTPAIR; struct MELT_MULTIPLE_STRUCT (4) dtup_691__CLASS_OBJPUTPAIRHEAD; struct MELT_MULTIPLE_STRUCT (3) dtup_692__CLASS_OBJPUTPAIRHEAD; struct MELT_OBJECT_STRUCT (3) dsym_693__OPUTP_HEAD; struct MELT_STRING_STRUCT (10) dstr_694__OPUTP_HEAD; struct MELT_OBJECT_STRUCT (4) dobj_695__OPUTP_HEAD; struct MELT_STRING_STRUCT (10) dstr_696__OPUTP_HEAD; struct MELT_OBJECT_STRUCT (3) dsym_697__CLASS_OBJPUTPAIRTAIL; struct MELT_STRING_STRUCT (20) dstr_698__CLASS_OBJPUTPAIR; struct MELT_OBJECT_STRUCT (8) dobj_699__CLASS_OBJPUTPAIRTAIL; struct MELT_STRING_STRUCT (20) dstr_700__CLASS_OBJPUTPAIR; struct MELT_MULTIPLE_STRUCT (4) dtup_701__CLASS_OBJPUTPAIRTAIL; struct MELT_MULTIPLE_STRUCT (3) dtup_702__CLASS_OBJPUTPAIRTAIL; struct MELT_OBJECT_STRUCT (3) dsym_703__OPUTP_TAIL; struct MELT_STRING_STRUCT (10) dstr_704__OPUTP_TAIL; struct MELT_OBJECT_STRUCT (4) dobj_705__OPUTP_TAIL; struct MELT_STRING_STRUCT (10) dstr_706__OPUTP_TAIL; struct MELT_OBJECT_STRUCT (3) dsym_707__CLASS_OBJPUTLIST; struct MELT_STRING_STRUCT (16) dstr_708__CLASS_OBJPUTLIST; struct MELT_OBJECT_STRUCT (8) dobj_709__CLASS_OBJPUTLIST; struct MELT_STRING_STRUCT (16) dstr_710__CLASS_OBJPUTLIST; struct MELT_MULTIPLE_STRUCT (3) dtup_711__CLASS_OBJPUTLIST; struct MELT_MULTIPLE_STRUCT (4) dtup_712__CLASS_OBJPUTLIST; struct MELT_OBJECT_STRUCT (3) dsym_713__OPUTL_LIST; struct MELT_STRING_STRUCT (10) dstr_714__OPUTL_LIST; struct MELT_OBJECT_STRUCT (4) dobj_715__OPUTL_LIST; struct MELT_STRING_STRUCT (10) dstr_716__OPUTL_LIST; struct MELT_OBJECT_STRUCT (3) dsym_717__OPUTL_FIRST; struct MELT_STRING_STRUCT (11) dstr_718__OPUTL_FIRST; struct MELT_OBJECT_STRUCT (4) dobj_719__OPUTL_FIRST; struct MELT_STRING_STRUCT (11) dstr_720__OPUTL_FIRST; struct MELT_OBJECT_STRUCT (3) dsym_721__OPUTL_LAST; struct MELT_STRING_STRUCT (10) dstr_722__OPUTL_LAST; struct MELT_OBJECT_STRUCT (4) dobj_723__OPUTL_LAST; struct MELT_STRING_STRUCT (10) dstr_724__OPUTL_LAST; struct MELT_OBJECT_STRUCT (3) dsym_725__CLASS_OBJPUTSLOT; struct MELT_STRING_STRUCT (16) dstr_726__CLASS_OBJPUTSLOT; struct MELT_OBJECT_STRUCT (8) dobj_727__CLASS_OBJPUTSLOT; struct MELT_STRING_STRUCT (16) dstr_728__CLASS_OBJPUTSLOT; struct MELT_MULTIPLE_STRUCT (3) dtup_729__CLASS_OBJPUTSLOT; struct MELT_MULTIPLE_STRUCT (5) dtup_730__CLASS_OBJPUTSLOT; struct MELT_OBJECT_STRUCT (3) dsym_731__OSLOT_ODATA; struct MELT_STRING_STRUCT (11) dstr_732__OSLOT_ODATA; struct MELT_OBJECT_STRUCT (4) dobj_733__OSLOT_ODATA; struct MELT_STRING_STRUCT (11) dstr_734__OSLOT_ODATA; struct MELT_OBJECT_STRUCT (3) dsym_735__OSLOT_OFFSET; struct MELT_STRING_STRUCT (12) dstr_736__OSLOT_OFFSET; struct MELT_OBJECT_STRUCT (4) dobj_737__OSLOT_OFFSET; struct MELT_STRING_STRUCT (12) dstr_738__OSLOT_OFFSET; struct MELT_OBJECT_STRUCT (3) dsym_739__OSLOT_FIELD; struct MELT_STRING_STRUCT (11) dstr_740__OSLOT_FIELD; struct MELT_OBJECT_STRUCT (4) dobj_741__OSLOT_FIELD; struct MELT_STRING_STRUCT (11) dstr_742__OSLOT_FIELD; struct MELT_OBJECT_STRUCT (3) dsym_743__OSLOT_VALUE; struct MELT_STRING_STRUCT (11) dstr_744__OSLOT_VALUE; struct MELT_OBJECT_STRUCT (4) dobj_745__OSLOT_VALUE; struct MELT_STRING_STRUCT (11) dstr_746__OSLOT_VALUE; struct MELT_OBJECT_STRUCT (3) dsym_747__CLASS_OBJGETSLOT; struct MELT_STRING_STRUCT (16) dstr_748__CLASS_OBJGETSLOT; struct MELT_OBJECT_STRUCT (8) dobj_749__CLASS_OBJGETSLOT; struct MELT_STRING_STRUCT (16) dstr_750__CLASS_OBJGETSLOT; struct MELT_MULTIPLE_STRUCT (4) dtup_751__CLASS_OBJGETSLOT; struct MELT_MULTIPLE_STRUCT (4) dtup_752__CLASS_OBJGETSLOT; struct MELT_OBJECT_STRUCT (3) dsym_753__OGETSL_OBJ; struct MELT_STRING_STRUCT (10) dstr_754__OGETSL_OBJ; struct MELT_OBJECT_STRUCT (4) dobj_755__OGETSL_OBJ; struct MELT_STRING_STRUCT (10) dstr_756__OGETSL_OBJ; struct MELT_OBJECT_STRUCT (3) dsym_757__OGETSL_FIELD; struct MELT_STRING_STRUCT (12) dstr_758__OGETSL_FIELD; struct MELT_OBJECT_STRUCT (4) dobj_759__OGETSL_FIELD; struct MELT_STRING_STRUCT (12) dstr_760__OGETSL_FIELD; struct MELT_OBJECT_STRUCT (3) dsym_761__CLASS_OBJPUTCLOSUROUT; struct MELT_STRING_STRUCT (21) dstr_762__CLASS_OBJPUTCLOS; struct MELT_OBJECT_STRUCT (8) dobj_763__CLASS_OBJPUTCLOSUROUT; struct MELT_STRING_STRUCT (21) dstr_764__CLASS_OBJPUTCLOS; struct MELT_MULTIPLE_STRUCT (3) dtup_765__CLASS_OBJPUTCLOSUROUT; struct MELT_MULTIPLE_STRUCT (3) dtup_766__CLASS_OBJPUTCLOSUROUT; struct MELT_OBJECT_STRUCT (3) dsym_767__OPCLOR_CLOS; struct MELT_STRING_STRUCT (11) dstr_768__OPCLOR_CLOS; struct MELT_OBJECT_STRUCT (4) dobj_769__OPCLOR_CLOS; struct MELT_STRING_STRUCT (11) dstr_770__OPCLOR_CLOS; struct MELT_OBJECT_STRUCT (3) dsym_771__OPCLOR_ROUT; struct MELT_STRING_STRUCT (11) dstr_772__OPCLOR_ROUT; struct MELT_OBJECT_STRUCT (4) dobj_773__OPCLOR_ROUT; struct MELT_STRING_STRUCT (11) dstr_774__OPCLOR_ROUT; struct MELT_OBJECT_STRUCT (3) dsym_775__CLASS_OBJPUTCLOSEDV; struct MELT_STRING_STRUCT (19) dstr_776__CLASS_OBJPUTCLOS; struct MELT_OBJECT_STRUCT (8) dobj_777__CLASS_OBJPUTCLOSEDV; struct MELT_STRING_STRUCT (19) dstr_778__CLASS_OBJPUTCLOS; struct MELT_MULTIPLE_STRUCT (3) dtup_779__CLASS_OBJPUTCLOSEDV; struct MELT_MULTIPLE_STRUCT (4) dtup_780__CLASS_OBJPUTCLOSEDV; struct MELT_OBJECT_STRUCT (3) dsym_781__OPCLOV_CLOS; struct MELT_STRING_STRUCT (11) dstr_782__OPCLOV_CLOS; struct MELT_OBJECT_STRUCT (4) dobj_783__OPCLOV_CLOS; struct MELT_STRING_STRUCT (11) dstr_784__OPCLOV_CLOS; struct MELT_OBJECT_STRUCT (3) dsym_785__OPCLOV_OFF; struct MELT_STRING_STRUCT (10) dstr_786__OPCLOV_OFF; struct MELT_OBJECT_STRUCT (4) dobj_787__OPCLOV_OFF; struct MELT_STRING_STRUCT (10) dstr_788__OPCLOV_OFF; struct MELT_OBJECT_STRUCT (3) dsym_789__OPCLOV_CVAL; struct MELT_STRING_STRUCT (11) dstr_790__OPCLOV_CVAL; struct MELT_OBJECT_STRUCT (4) dobj_791__OPCLOV_CVAL; struct MELT_STRING_STRUCT (11) dstr_792__OPCLOV_CVAL; struct MELT_OBJECT_STRUCT (3) dsym_793__CLASS_OBJPUTCLOSEDNOTNULLV; struct MELT_STRING_STRUCT (26) dstr_794__CLASS_OBJPUTCLOS; struct MELT_OBJECT_STRUCT (8) dobj_795__CLASS_OBJPUTCLOSEDNOTNULLV; struct MELT_STRING_STRUCT (26) dstr_796__CLASS_OBJPUTCLOS; struct MELT_MULTIPLE_STRUCT (4) dtup_797__CLASS_OBJPUTCLOSEDNOTNULLV; struct MELT_MULTIPLE_STRUCT (4) dtup_798__CLASS_OBJPUTCLOSEDNOTNULLV; struct MELT_OBJECT_STRUCT (3) dsym_799__CLASS_OBJPUTROUTCONST; struct MELT_STRING_STRUCT (21) dstr_800__CLASS_OBJPUTROUT; struct MELT_OBJECT_STRUCT (8) dobj_801__CLASS_OBJPUTROUTCONST; struct MELT_STRING_STRUCT (21) dstr_802__CLASS_OBJPUTROUT; struct MELT_MULTIPLE_STRUCT (3) dtup_803__CLASS_OBJPUTROUTCONST; struct MELT_MULTIPLE_STRUCT (4) dtup_804__CLASS_OBJPUTROUTCONST; struct MELT_OBJECT_STRUCT (3) dsym_805__OPRCONST_ROUT; struct MELT_STRING_STRUCT (13) dstr_806__OPRCONST_ROUT; struct MELT_OBJECT_STRUCT (4) dobj_807__OPRCONST_ROUT; struct MELT_STRING_STRUCT (13) dstr_808__OPRCONST_ROUT; struct MELT_OBJECT_STRUCT (3) dsym_809__OPRCONST_OFF; struct MELT_STRING_STRUCT (12) dstr_810__OPRCONST_OFF; struct MELT_OBJECT_STRUCT (4) dobj_811__OPRCONST_OFF; struct MELT_STRING_STRUCT (12) dstr_812__OPRCONST_OFF; struct MELT_OBJECT_STRUCT (3) dsym_813__OPRCONST_CVAL; struct MELT_STRING_STRUCT (13) dstr_814__OPRCONST_CVAL; struct MELT_OBJECT_STRUCT (4) dobj_815__OPRCONST_CVAL; struct MELT_STRING_STRUCT (13) dstr_816__OPRCONST_CVAL; struct MELT_OBJECT_STRUCT (3) dsym_817__CLASS_OBJPUTROUTCONSTNOTNULL; struct MELT_STRING_STRUCT (28) dstr_818__CLASS_OBJPUTROUT; struct MELT_OBJECT_STRUCT (8) dobj_819__CLASS_OBJPUTROUTCONSTNOTNULL; struct MELT_STRING_STRUCT (28) dstr_820__CLASS_OBJPUTROUT; struct MELT_MULTIPLE_STRUCT (4) dtup_821__CLASS_OBJPUTROUTCONSTNOTNULL; struct MELT_MULTIPLE_STRUCT (4) dtup_822__CLASS_OBJPUTROUTCONSTNOTNULL; struct MELT_OBJECT_STRUCT (3) dsym_823__CLASS_OBJTOUCH; struct MELT_STRING_STRUCT (14) dstr_824__CLASS_OBJTOUCH; struct MELT_OBJECT_STRUCT (8) dobj_825__CLASS_OBJTOUCH; struct MELT_STRING_STRUCT (14) dstr_826__CLASS_OBJTOUCH; struct MELT_MULTIPLE_STRUCT (3) dtup_827__CLASS_OBJTOUCH; struct MELT_MULTIPLE_STRUCT (3) dtup_828__CLASS_OBJTOUCH; struct MELT_OBJECT_STRUCT (3) dsym_829__OTOUCH_VAL; struct MELT_STRING_STRUCT (10) dstr_830__OTOUCH_VAL; struct MELT_OBJECT_STRUCT (4) dobj_831__OTOUCH_VAL; struct MELT_STRING_STRUCT (10) dstr_832__OTOUCH_VAL; struct MELT_OBJECT_STRUCT (3) dsym_833__OTOUCH_COMMENT; struct MELT_STRING_STRUCT (14) dstr_834__OTOUCH_COMMENT; struct MELT_OBJECT_STRUCT (4) dobj_835__OTOUCH_COMMENT; struct MELT_STRING_STRUCT (14) dstr_836__OTOUCH_COMMENT; struct MELT_OBJECT_STRUCT (3) dsym_837__CLASS_OBJSETPREDEF; struct MELT_STRING_STRUCT (18) dstr_838__CLASS_OBJSETPRED; struct MELT_OBJECT_STRUCT (8) dobj_839__CLASS_OBJSETPREDEF; struct MELT_STRING_STRUCT (18) dstr_840__CLASS_OBJSETPRED; struct MELT_MULTIPLE_STRUCT (3) dtup_841__CLASS_OBJSETPREDEF; struct MELT_MULTIPLE_STRUCT (3) dtup_842__CLASS_OBJSETPREDEF; struct MELT_OBJECT_STRUCT (3) dsym_843__OSPR_OBJECT; struct MELT_STRING_STRUCT (11) dstr_844__OSPR_OBJECT; struct MELT_OBJECT_STRUCT (4) dobj_845__OSPR_OBJECT; struct MELT_STRING_STRUCT (11) dstr_846__OSPR_OBJECT; struct MELT_OBJECT_STRUCT (3) dsym_847__OSPR_PREDEF; struct MELT_STRING_STRUCT (11) dstr_848__OSPR_PREDEF; struct MELT_OBJECT_STRUCT (4) dobj_849__OSPR_PREDEF; struct MELT_STRING_STRUCT (11) dstr_850__OSPR_PREDEF; struct MELT_OBJECT_STRUCT (3) dsym_851__CLASS_ROUTINEOBJ; struct MELT_STRING_STRUCT (16) dstr_852__CLASS_ROUTINEOBJ; struct MELT_OBJECT_STRUCT (3) dsym_853__CLASS_NAMED; struct MELT_STRING_STRUCT (11) dstr_854__CLASS_NAMED; struct MELT_OBJECT_STRUCT (8) dobj_855__CLASS_ROUTINEOBJ; struct MELT_STRING_STRUCT (16) dstr_856__CLASS_ROUTINEOBJ; struct MELT_MULTIPLE_STRUCT (3) dtup_857__CLASS_ROUTINEOBJ; struct MELT_MULTIPLE_STRUCT (10) dtup_858__CLASS_ROUTINEOBJ; struct MELT_OBJECT_STRUCT (3) dsym_859__OBROUT_PROC; struct MELT_STRING_STRUCT (11) dstr_860__OBROUT_PROC; struct MELT_OBJECT_STRUCT (4) dobj_861__OBROUT_PROC; struct MELT_STRING_STRUCT (11) dstr_862__OBROUT_PROC; struct MELT_OBJECT_STRUCT (3) dsym_863__OBROUT_BODY; struct MELT_STRING_STRUCT (11) dstr_864__OBROUT_BODY; struct MELT_OBJECT_STRUCT (4) dobj_865__OBROUT_BODY; struct MELT_STRING_STRUCT (11) dstr_866__OBROUT_BODY; struct MELT_OBJECT_STRUCT (3) dsym_867__OBROUT_NBVAL; struct MELT_STRING_STRUCT (12) dstr_868__OBROUT_NBVAL; struct MELT_OBJECT_STRUCT (4) dobj_869__OBROUT_NBVAL; struct MELT_STRING_STRUCT (12) dstr_870__OBROUT_NBVAL; struct MELT_OBJECT_STRUCT (3) dsym_871__OBROUT_NBLONG; struct MELT_STRING_STRUCT (13) dstr_872__OBROUT_NBLONG; struct MELT_OBJECT_STRUCT (4) dobj_873__OBROUT_NBLONG; struct MELT_STRING_STRUCT (13) dstr_874__OBROUT_NBLONG; struct MELT_OBJECT_STRUCT (3) dsym_875__OBROUT_OTHERS; struct MELT_STRING_STRUCT (13) dstr_876__OBROUT_OTHERS; struct MELT_OBJECT_STRUCT (4) dobj_877__OBROUT_OTHERS; struct MELT_STRING_STRUCT (13) dstr_878__OBROUT_OTHERS; struct MELT_OBJECT_STRUCT (3) dsym_879__OBROUT_RETVAL; struct MELT_STRING_STRUCT (13) dstr_880__OBROUT_RETVAL; struct MELT_OBJECT_STRUCT (4) dobj_881__OBROUT_RETVAL; struct MELT_STRING_STRUCT (13) dstr_882__OBROUT_RETVAL; struct MELT_OBJECT_STRUCT (3) dsym_883__OBROUT_CNTCITER; struct MELT_STRING_STRUCT (15) dstr_884__OBROUT_CNTCITER; struct MELT_OBJECT_STRUCT (4) dobj_885__OBROUT_CNTCITER; struct MELT_STRING_STRUCT (15) dstr_886__OBROUT_CNTCITER; struct MELT_OBJECT_STRUCT (3) dsym_887__OBROUT_CNTLETREC; struct MELT_STRING_STRUCT (16) dstr_888__OBROUT_CNTLETREC; struct MELT_OBJECT_STRUCT (4) dobj_889__OBROUT_CNTLETREC; struct MELT_STRING_STRUCT (16) dstr_890__OBROUT_CNTLETREC; struct MELT_OBJECT_STRUCT (3) dsym_891__CLASS_PROCROUTINEOBJ; struct MELT_STRING_STRUCT (20) dstr_892__CLASS_PROCROUTIN; struct MELT_OBJECT_STRUCT (8) dobj_893__CLASS_PROCROUTINEOBJ; struct MELT_STRING_STRUCT (20) dstr_894__CLASS_PROCROUTIN; struct MELT_MULTIPLE_STRUCT (4) dtup_895__CLASS_PROCROUTINEOBJ; struct MELT_MULTIPLE_STRUCT (15) dtup_896__CLASS_PROCROUTINEOBJ; struct MELT_OBJECT_STRUCT (3) dsym_897__OPROUT_GETARGS; struct MELT_STRING_STRUCT (14) dstr_898__OPROUT_GETARGS; struct MELT_OBJECT_STRUCT (4) dobj_899__OPROUT_GETARGS; struct MELT_STRING_STRUCT (14) dstr_900__OPROUT_GETARGS; struct MELT_OBJECT_STRUCT (3) dsym_901__OPROUT_LOC; struct MELT_STRING_STRUCT (10) dstr_902__OPROUT_LOC; struct MELT_OBJECT_STRUCT (4) dobj_903__OPROUT_LOC; struct MELT_STRING_STRUCT (10) dstr_904__OPROUT_LOC; struct MELT_OBJECT_STRUCT (3) dsym_905__OPROUT_FUNAM; struct MELT_STRING_STRUCT (12) dstr_906__OPROUT_FUNAM; struct MELT_OBJECT_STRUCT (4) dobj_907__OPROUT_FUNAM; struct MELT_STRING_STRUCT (12) dstr_908__OPROUT_FUNAM; struct MELT_OBJECT_STRUCT (3) dsym_909__OPROUT_RESTNAM; struct MELT_STRING_STRUCT (14) dstr_910__OPROUT_RESTNAM; struct MELT_OBJECT_STRUCT (4) dobj_911__OPROUT_RESTNAM; struct MELT_STRING_STRUCT (14) dstr_912__OPROUT_RESTNAM; struct MELT_OBJECT_STRUCT (3) dsym_913__OPROUT_FILENUM; struct MELT_STRING_STRUCT (14) dstr_914__OPROUT_FILENUM; struct MELT_OBJECT_STRUCT (4) dobj_915__OPROUT_FILENUM; struct MELT_STRING_STRUCT (14) dstr_916__OPROUT_FILENUM; struct MELT_OBJECT_STRUCT (3) dsym_917__CLASS_INITIALROUTINEOBJ; struct MELT_STRING_STRUCT (23) dstr_918__CLASS_INITIALROU; struct MELT_OBJECT_STRUCT (8) dobj_919__CLASS_INITIALROUTINEOBJ; struct MELT_STRING_STRUCT (23) dstr_920__CLASS_INITIALROU; struct MELT_MULTIPLE_STRUCT (4) dtup_921__CLASS_INITIALROUTINEOBJ; struct MELT_MULTIPLE_STRUCT (13) dtup_922__CLASS_INITIALROUTINEOBJ; struct MELT_OBJECT_STRUCT (3) dsym_923__OIROUT_DATA; struct MELT_STRING_STRUCT (11) dstr_924__OIROUT_DATA; struct MELT_OBJECT_STRUCT (4) dobj_925__OIROUT_DATA; struct MELT_STRING_STRUCT (11) dstr_926__OIROUT_DATA; struct MELT_OBJECT_STRUCT (3) dsym_927__OIROUT_PROLOG; struct MELT_STRING_STRUCT (13) dstr_928__OIROUT_PROLOG; struct MELT_OBJECT_STRUCT (4) dobj_929__OIROUT_PROLOG; struct MELT_STRING_STRUCT (13) dstr_930__OIROUT_PROLOG; struct MELT_OBJECT_STRUCT (3) dsym_931__OIROUT_FILL; struct MELT_STRING_STRUCT (11) dstr_932__OIROUT_FILL; struct MELT_OBJECT_STRUCT (4) dobj_933__OIROUT_FILL; struct MELT_STRING_STRUCT (11) dstr_934__OIROUT_FILL; struct MELT_OBJECT_STRUCT (3) dsym_935__CLASS_INITIAL_MODULE_ROUTINEOBJ; struct MELT_STRING_STRUCT (31) dstr_936__CLASS_INITIAL_MO; struct MELT_OBJECT_STRUCT (8) dobj_937__CLASS_INITIAL_MODULE_ROUTINEOBJ; struct MELT_STRING_STRUCT (31) dstr_938__CLASS_INITIAL_MO; struct MELT_MULTIPLE_STRUCT (5) dtup_939__CLASS_INITIAL_MODULE_ROUTINEOBJ; struct MELT_MULTIPLE_STRUCT (14) dtup_940__CLASS_INITIAL_MODULE_ROUTINEOBJ; struct MELT_OBJECT_STRUCT (3) dsym_941__OIROUT_MODULENAME; struct MELT_STRING_STRUCT (17) dstr_942__OIROUT_MODULENAM; struct MELT_OBJECT_STRUCT (4) dobj_943__OIROUT_MODULENAME; struct MELT_STRING_STRUCT (17) dstr_944__OIROUT_MODULENAM; struct MELT_OBJECT_STRUCT (3) dsym_945__CLASS_INITIAL_EXTENSION_ROUTINEOBJ; struct MELT_STRING_STRUCT (34) dstr_946__CLASS_INITIAL_EX; struct MELT_OBJECT_STRUCT (8) dobj_947__CLASS_INITIAL_EXTENSION_ROUTINEOBJ; struct MELT_STRING_STRUCT (34) dstr_948__CLASS_INITIAL_EX; struct MELT_MULTIPLE_STRUCT (5) dtup_949__CLASS_INITIAL_EXTENSION_ROUTINEOBJ; struct MELT_MULTIPLE_STRUCT (14) dtup_950__CLASS_INITIAL_EXTENSION_ROUTINEOBJ; struct MELT_OBJECT_STRUCT (3) dsym_951__OIROUTX_EXTENDNAME; struct MELT_STRING_STRUCT (18) dstr_952__OIROUTX_EXTENDNA; struct MELT_OBJECT_STRUCT (4) dobj_953__OIROUTX_EXTENDNAME; struct MELT_STRING_STRUCT (18) dstr_954__OIROUTX_EXTENDNA; struct MELT_OBJECT_STRUCT (3) dsym_955__CLASS_OBJBLOCK; struct MELT_STRING_STRUCT (14) dstr_956__CLASS_OBJBLOCK; struct MELT_OBJECT_STRUCT (3) dsym_957__CLASS_OBJCHECKINTERRUPT; struct MELT_STRING_STRUCT (23) dstr_958__CLASS_OBJCHECKIN; struct MELT_ROUTINE_STRUCT (11) drout_959__MAKE_OBJLOCATEDEXP; struct MELT_CLOSURE_STRUCT (0) dclo_960__MAKE_OBJLOCATEDEXP; struct MELT_OBJECT_STRUCT (3) dsym_961__MELT_DEBUG_FUN; struct MELT_STRING_STRUCT (14) dstr_962__MELT_DEBUG_FUN; struct MELT_OBJECT_STRUCT (3) dsym_963__DISCR_MIXED_INTEGER; struct MELT_STRING_STRUCT (19) dstr_964__DISCR_MIXED_INTE; struct MELT_OBJECT_STRUCT (3) dsym_965__DISCR_MIXED_LOCATION; struct MELT_STRING_STRUCT (20) dstr_966__DISCR_MIXED_LOCA; struct MELT_OBJECT_STRUCT (3) dsym_967__CLASS_CTYPE; struct MELT_STRING_STRUCT (11) dstr_968__CLASS_CTYPE; struct MELT_OBJECT_STRUCT (3) dsym_969__DISCR_LIST; struct MELT_STRING_STRUCT (10) dstr_970__DISCR_LIST; struct MELT_OBJECT_STRUCT (3) dsym_971__DISCR_CONSTANT_INTEGER; struct MELT_STRING_STRUCT (22) dstr_972__DISCR_CONSTANT_I; struct MELT_OBJECT_STRUCT (3) dsym_973__DISCR_VERBATIM_STRING; struct MELT_STRING_STRUCT (21) dstr_974__DISCR_VERBATIM_S; struct MELT_OBJECT_STRUCT (3) dsym_975__LIST_APPEND2LIST; struct MELT_STRING_STRUCT (16) dstr_976__LIST_APPEND2LIST; struct MELT_OBJECT_STRUCT (3) dsym_977__LIST_TO_MULTIPLE; struct MELT_STRING_STRUCT (16) dstr_978__LIST_TO_MULTIPLE; struct MELT_OBJECT_STRUCT (3) dsym_979__DISCR_MULTIPLE; struct MELT_STRING_STRUCT (14) dstr_980__DISCR_MULTIPLE; struct MELT_ROUTINE_STRUCT (10) drout_981__MAKE_OBJCOMPUTE; struct MELT_CLOSURE_STRUCT (0) dclo_982__MAKE_OBJCOMPUTE; struct MELT_ROUTINE_STRUCT (11) drout_983__MAKE_OBJEXPANDPUREVAL; struct MELT_CLOSURE_STRUCT (0) dclo_984__MAKE_OBJEXPANDPUREVAL; struct MELT_OBJECT_STRUCT (3) dsym_985__CTYPE_VOID; struct MELT_STRING_STRUCT (10) dstr_986__CTYPE_VOID; struct MELT_OBJECT_STRUCT (3) dsym_987__OUTPUT_C_DECLINIT; struct MELT_STRING_STRUCT (17) dstr_988__OUTPUT_C_DECLINI; struct MELT_OBJECT_STRUCT (3) dsym_989__CLASS_SELECTOR; struct MELT_STRING_STRUCT (14) dstr_990__CLASS_SELECTOR; struct MELT_OBJECT_STRUCT (3) dsym_991__RECV; struct MELT_STRING_STRUCT (4) dstr_992__RECV; struct MELT_OBJECT_STRUCT (2) dobj_993; struct MELT_OBJECT_STRUCT (3) dsym_994__SBUF; struct MELT_STRING_STRUCT (4) dstr_995__SBUF; struct MELT_OBJECT_STRUCT (2) dobj_996; struct MELT_MULTIPLE_STRUCT (2) dtup_997__OUTPUT_C_DECLINIT; struct MELT_OBJECT_STRUCT (4) dobj_998__OUTPUT_C_DECLINIT; struct MELT_STRING_STRUCT (17) dstr_999__OUTPUT_C_DECLINI; struct MELT_OBJECT_STRUCT (3) dsym_1000__PUT_OBJDEST; struct MELT_STRING_STRUCT (11) dstr_1001__PUT_OBJDEST; struct MELT_OBJECT_STRUCT (4) dobj_1002__PUT_OBJDEST; struct MELT_STRING_STRUCT (11) dstr_1003__PUT_OBJDEST; struct MELT_OBJECT_STRUCT (3) dsym_1004__OUTPUT_C_CODE; struct MELT_STRING_STRUCT (13) dstr_1005__OUTPUT_C_CODE; struct MELT_OBJECT_STRUCT (2) dobj_1006; struct MELT_OBJECT_STRUCT (3) dsym_1007__DECLBUF; struct MELT_STRING_STRUCT (7) dstr_1008__DECLBUF; struct MELT_OBJECT_STRUCT (2) dobj_1009; struct MELT_OBJECT_STRUCT (3) dsym_1010__IMPLBUF; struct MELT_STRING_STRUCT (7) dstr_1011__IMPLBUF; struct MELT_OBJECT_STRUCT (2) dobj_1012; struct MELT_OBJECT_STRUCT (3) dsym_1013__DEPTH; struct MELT_STRING_STRUCT (5) dstr_1014__DEPTH; struct MELT_OBJECT_STRUCT (2) dobj_1015; struct MELT_MULTIPLE_STRUCT (4) dtup_1016__OUTPUT_C_CODE; struct MELT_OBJECT_STRUCT (4) dobj_1017__OUTPUT_C_CODE; struct MELT_STRING_STRUCT (13) dstr_1018__OUTPUT_C_CODE; struct MELT_OBJECT_STRUCT (3) dsym_1019__OUTPUT_C_INITIAL_FILL; struct MELT_STRING_STRUCT (21) dstr_1020__OUTPUT_C_INITIAL; struct MELT_OBJECT_STRUCT (2) dobj_1021; struct MELT_OBJECT_STRUCT (2) dobj_1022; struct MELT_OBJECT_STRUCT (3) dsym_1023__PTRSTR; struct MELT_STRING_STRUCT (6) dstr_1024__PTRSTR; struct MELT_OBJECT_STRUCT (2) dobj_1025; struct MELT_OBJECT_STRUCT (2) dobj_1026; struct MELT_MULTIPLE_STRUCT (4) dtup_1027__OUTPUT_C_INITIAL_FILL; struct MELT_OBJECT_STRUCT (4) dobj_1028__OUTPUT_C_INITIAL_FILL; struct MELT_STRING_STRUCT (21) dstr_1029__OUTPUT_C_INITIAL; struct MELT_OBJECT_STRUCT (3) dsym_1030__OUTPUT_C_INITIAL_PREDEF; struct MELT_STRING_STRUCT (23) dstr_1031__OUTPUT_C_INITIAL; struct MELT_OBJECT_STRUCT (2) dobj_1032; struct MELT_OBJECT_STRUCT (2) dobj_1033; struct MELT_OBJECT_STRUCT (3) dsym_1034__PRTRSTR; struct MELT_STRING_STRUCT (7) dstr_1035__PRTRSTR; struct MELT_OBJECT_STRUCT (2) dobj_1036; struct MELT_OBJECT_STRUCT (2) dobj_1037; struct MELT_MULTIPLE_STRUCT (4) dtup_1038__OUTPUT_C_INITIAL_PREDEF; struct MELT_OBJECT_STRUCT (4) dobj_1039__OUTPUT_C_INITIAL_PREDEF; struct MELT_STRING_STRUCT (23) dstr_1040__OUTPUT_C_INITIAL; struct MELT_OBJECT_STRUCT (3) dsym_1041__MAKE_OBJEXPANDPUREVAL; struct MELT_STRING_STRUCT (21) dstr_1042__MAKE_OBJEXPANDPU; struct MELT_ROUTINE_STRUCT (1) drout_1043__COMPILOBJ_CATCHALL_NREP; struct MELT_CLOSURE_STRUCT (0) dclo_1044__COMPILOBJ_CATCHALL_NREP; struct MELT_OBJECT_STRUCT (3) dsym_1045__INSTALL_METHOD; struct MELT_STRING_STRUCT (14) dstr_1046__INSTALL_METHOD; struct MELT_OBJECT_STRUCT (3) dsym_1047__CLASS_NREP; struct MELT_STRING_STRUCT (10) dstr_1048__CLASS_NREP; struct MELT_OBJECT_STRUCT (3) dsym_1049__COMPILE_OBJ; struct MELT_STRING_STRUCT (11) dstr_1050__COMPILE_OBJ; struct MELT_ROUTINE_STRUCT (1) drout_1051__PUTOBJDEST_CATCHALL_OBJCODE; struct MELT_CLOSURE_STRUCT (0) dclo_1052__PUTOBJDEST_CATCHALL_OBJCODE; struct MELT_ROUTINE_STRUCT (1) drout_1053__PUTOBJDEST_CATCHALL_ANYDISCR; struct MELT_CLOSURE_STRUCT (0) dclo_1054__PUTOBJDEST_CATCHALL_ANYDISCR; struct MELT_OBJECT_STRUCT (3) dsym_1055__DISCR_ANY_RECEIVER; struct MELT_STRING_STRUCT (18) dstr_1056__DISCR_ANY_RECEIV; struct MELT_ROUTINE_STRUCT (1) drout_1057__GETCTYPE_OBJVALUE; struct MELT_CLOSURE_STRUCT (0) dclo_1058__GETCTYPE_OBJVALUE; struct MELT_OBJECT_STRUCT (3) dsym_1059__GET_CTYPE; struct MELT_STRING_STRUCT (9) dstr_1060__GET_CTYPE; struct MELT_ROUTINE_STRUCT (1) drout_1061__GECTYP_OBJNIL; struct MELT_CLOSURE_STRUCT (0) dclo_1062__GECTYP_OBJNIL; struct MELT_OBJECT_STRUCT (3) dsym_1063__CTYPE_VALUE; struct MELT_STRING_STRUCT (11) dstr_1064__CTYPE_VALUE; struct MELT_ROUTINE_STRUCT (1) drout_1065__GECTYP_OBJINITSTRING; struct MELT_CLOSURE_STRUCT (0) dclo_1066__GECTYP_OBJINITSTRING; struct MELT_ROUTINE_STRUCT (1) drout_1067__DBGOUT_ROUTINEOBJ; struct MELT_CLOSURE_STRUCT (0) dclo_1068__DBGOUT_ROUTINEOBJ; struct MELT_OBJECT_STRUCT (3) dsym_1069__DBGOUT_NAMEDOBJECT_METHOD; struct MELT_STRING_STRUCT (25) dstr_1070__DBGOUT_NAMEDOBJE; struct MELT_OBJECT_STRUCT (3) dsym_1071__DBG_OUTPUT; struct MELT_STRING_STRUCT (10) dstr_1072__DBG_OUTPUT; struct MELT_ROUTINE_STRUCT (3) drout_1073__PUTOBJDEST_OBJDESTINSTR; struct MELT_CLOSURE_STRUCT (0) dclo_1074__PUTOBJDEST_OBJDESTINSTR; struct MELT_ROUTINE_STRUCT (1) drout_1075__PUTOBJDEST_OBJFINALRETURN; struct MELT_CLOSURE_STRUCT (0) dclo_1076__PUTOBJDEST_OBJFINALRETURN; struct MELT_ROUTINE_STRUCT (7) drout_1077__VARIADIC_IDSTR; struct MELT_CLOSURE_STRUCT (0) dclo_1078__VARIADIC_IDSTR; struct MELT_OBJECT_STRUCT (3) dsym_1079__AS_NULL; struct MELT_STRING_STRUCT (7) dstr_1080__AS_NULL; struct MELT_OBJECT_STRUCT (3) dsym_1081__CLASS_CLONED_SYMBOL; struct MELT_STRING_STRUCT (19) dstr_1082__CLASS_CLONED_SYM; struct MELT_OBJECT_STRUCT (3) dsym_1083__INTEGERBOX_OF; struct MELT_STRING_STRUCT (13) dstr_1084__INTEGERBOX_OF; struct MELT_OBJECT_STRUCT (3) dsym_1085__DISCR_STRBUF; struct MELT_STRING_STRUCT (12) dstr_1086__DISCR_STRBUF; struct MELT_OBJECT_STRUCT (3) dsym_1087__CLASS_SYMBOL; struct MELT_STRING_STRUCT (12) dstr_1088__CLASS_SYMBOL; struct MELT_ROUTINE_STRUCT (1) drout_1089__VARIADIC_INDEX_IDSTR; struct MELT_CLOSURE_STRUCT (0) dclo_1090__VARIADIC_INDEX_IDSTR; struct MELT_ROUTINE_STRUCT (1) drout_1091__VARIADIC_LENGTH_IDSTR; struct MELT_CLOSURE_STRUCT (0) dclo_1092__VARIADIC_LENGTH_IDSTR; struct MELT_ROUTINE_STRUCT (33) drout_1093__COMPILE2OBJ_PROCEDURE; struct MELT_CLOSURE_STRUCT (0) dclo_1094__COMPILE2OBJ_PROCEDURE; struct MELT_OBJECT_STRUCT (3) dsym_1095__CLASS_NREP_ROUTPROC; struct MELT_STRING_STRUCT (19) dstr_1096__CLASS_NREP_ROUTP; struct MELT_OBJECT_STRUCT (3) dsym_1097__CLASS_MODULE_CONTEXT; struct MELT_STRING_STRUCT (20) dstr_1098__CLASS_MODULE_CON; struct MELT_OBJECT_STRUCT (3) dsym_1099__CLASS_NREP_DEFUNROUTPROC; struct MELT_STRING_STRUCT (24) dstr_1100__CLASS_NREP_DEFUN; struct MELT_OBJECT_STRUCT (3) dsym_1101__DISCR_STRING; struct MELT_STRING_STRUCT (12) dstr_1102__DISCR_STRING; struct MELT_OBJECT_STRUCT (3) dsym_1103__DISCR_INTEGER; struct MELT_STRING_STRUCT (13) dstr_1104__DISCR_INTEGER; struct MELT_OBJECT_STRUCT (3) dsym_1105__DISCR_MAP_OBJECTS; struct MELT_STRING_STRUCT (17) dstr_1106__DISCR_MAP_OBJECT; struct MELT_OBJECT_STRUCT (3) dsym_1107__CLASS_C_GENERATION_CONTEXT; struct MELT_STRING_STRUCT (26) dstr_1108__CLASS_C_GENERATI; struct MELT_OBJECT_STRUCT (3) dsym_1109__RETVAL_; struct MELT_STRING_STRUCT (8) dstr_1110__RETVAL_; struct MELT_OBJECT_STRUCT (3) dsym_1111__MULTIPLE_MAP; struct MELT_STRING_STRUCT (12) dstr_1112__MULTIPLE_MAP; struct MELT_ROUTINE_STRUCT (9) drout_1113__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_1114__CLASS_FORMAL_BINDING; struct MELT_STRING_STRUCT (20) dstr_1115__CLASS_FORMAL_BIN; struct MELT_OBJECT_STRUCT (3) dsym_1116__CTYPE_LONG; struct MELT_STRING_STRUCT (10) dstr_1117__CTYPE_LONG; struct MELT_OBJECT_STRUCT (3) dsym_1118__LIST_EVERY; struct MELT_STRING_STRUCT (10) dstr_1119__LIST_EVERY; struct MELT_ROUTINE_STRUCT (1) drout_1120__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_1121__INITIALSYSTEMDATA_OBJPREDEF; struct MELT_STRING_STRUCT (27) dstr_1122__INITIALSYSTEMDAT; struct MELT_OBJECT_STRUCT (2) dobj_1123__INITIALSYSTEMDATA_OBJPREDEF; struct MELT_OBJECT_STRUCT (3) dsym_1124__INITIAL_SYSTEM_DATA; struct MELT_STRING_STRUCT (19) dstr_1125__INITIAL_SYSTEM_D; struct MELT_ROUTINE_STRUCT (1) drout_1126__APPEND_COMMENT; struct MELT_CLOSURE_STRUCT (0) dclo_1127__APPEND_COMMENT; struct MELT_ROUTINE_STRUCT (2) drout_1128__APPEND_COMMENTCONST; struct MELT_CLOSURE_STRUCT (0) dclo_1129__APPEND_COMMENTCONST; struct MELT_ROUTINE_STRUCT (74) drout_1130__COMPILE2OBJ_INITPROC; struct MELT_CLOSURE_STRUCT (0) dclo_1131__COMPILE2OBJ_INITPROC; struct MELT_OBJECT_STRUCT (3) dsym_1132__CLASS_NREP_INITPROC; struct MELT_STRING_STRUCT (19) dstr_1133__CLASS_NREP_INITP; struct MELT_STRING_STRUCT (22) dstr_1134__melt_start_this_; struct MELT_OBJECT_STRUCT (3) dsym_1135__CLASS_INITIAL_GENERATION_CONTEXT; struct MELT_STRING_STRUCT (32) dstr_1136__CLASS_INITIAL_GE; struct MELT_OBJECT_STRUCT (3) dsym_1137__LIST_MAP; struct MELT_STRING_STRUCT (8) dstr_1138__LIST_MAP; struct MELT_ROUTINE_STRUCT (1) drout_1139__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_1140__RETINIT_; struct MELT_STRING_STRUCT (9) dstr_1141__RETINIT_; struct MELT_OBJECT_STRUCT (3) dsym_1142__CONTENV_; struct MELT_STRING_STRUCT (9) dstr_1143__CONTENV_; struct MELT_OBJECT_STRUCT (3) dsym_1144__FRESHENV_; struct MELT_STRING_STRUCT (10) dstr_1145__FRESHENV_; struct MELT_OBJECT_STRUCT (3) dsym_1146__PREVENV_; struct MELT_STRING_STRUCT (9) dstr_1147__PREVENV_; struct MELT_OBJECT_STRUCT (3) dsym_1148__VALEXPORT_; struct MELT_STRING_STRUCT (11) dstr_1149__VALEXPORT_; struct MELT_OBJECT_STRUCT (3) dsym_1150__VALIMPORT_; struct MELT_STRING_STRUCT (11) dstr_1151__VALIMPORT_; struct MELT_OBJECT_STRUCT (3) dsym_1152__CLASS_ANY_BINDING; struct MELT_STRING_STRUCT (17) dstr_1153__CLASS_ANY_BINDIN; struct MELT_OBJECT_STRUCT (3) dsym_1154__CLASS_FIXED_BINDING; struct MELT_STRING_STRUCT (19) dstr_1155__CLASS_FIXED_BIND; struct MELT_OBJECT_STRUCT (3) dsym_1156__CLASS_NREP_SIMPLE; struct MELT_STRING_STRUCT (17) dstr_1157__CLASS_NREP_SIMPL; struct MELT_OBJECT_STRUCT (3) dsym_1158__SYSDATA_CONT_FRESH_ENV; struct MELT_STRING_STRUCT (22) dstr_1159__SYSDATA_CONT_FRE; struct MELT_ROUTINE_STRUCT (3) drout_1160__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_1161__CLASS_NREP_IMPORTEDVAL; struct MELT_STRING_STRUCT (22) dstr_1162__CLASS_NREP_IMPOR; struct MELT_ROUTINE_STRUCT (2) drout_1163__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_1164__CLASS_NREP_BOUND_DATA; struct MELT_STRING_STRUCT (21) dstr_1165__CLASS_NREP_BOUND; struct MELT_ROUTINE_STRUCT (2) drout_1166__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_1167__MULTIPLE_EVERY; struct MELT_STRING_STRUCT (14) dstr_1168__MULTIPLE_EVERY; struct MELT_ROUTINE_STRUCT (6) drout_1169__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_1170__CLASS_NREP_DATAKEYWORD; struct MELT_STRING_STRUCT (22) dstr_1171__CLASS_NREP_DATAK; struct MELT_OBJECT_STRUCT (3) dsym_1172__CLASS_NREP_DATASYMBOL; struct MELT_STRING_STRUCT (21) dstr_1173__CLASS_NREP_DATAS; struct MELT_OBJECT_STRUCT (3) dsym_1174__SYSDATA_VALUE_IMPORTER; struct MELT_STRING_STRUCT (22) dstr_1175__SYSDATA_VALUE_IM; struct MELT_ROUTINE_STRUCT (6) drout_1176__LAMBDA_; struct MELT_ROUTINE_STRUCT (0) drout_1177__LAMBDA_; struct MELT_ROUTINE_STRUCT (6) drout_1178__LAMBDA_; struct MELT_ROUTINE_STRUCT (69) drout_1179__COMPILE2OBJ_INITEXTENDPROC; struct MELT_CLOSURE_STRUCT (0) dclo_1180__COMPILE2OBJ_INITEXTENDPROC; struct MELT_OBJECT_STRUCT (3) dsym_1181__CLASS_NREP_INITEXTENDPROC; struct MELT_STRING_STRUCT (25) dstr_1182__CLASS_NREP_INITE; struct MELT_OBJECT_STRUCT (3) dsym_1183__CLASS_RUNNING_EXTENSION_MODULE_CONTEXT; struct MELT_STRING_STRUCT (38) dstr_1184__CLASS_RUNNING_EX; struct MELT_OBJECT_STRUCT (3) dsym_1185__CLASS_NREP_ANYPROC; struct MELT_STRING_STRUCT (18) dstr_1186__CLASS_NREP_ANYPR; struct MELT_STRING_STRUCT (24) dstr_1187__melt_start_run_e; struct MELT_OBJECT_STRUCT (3) dsym_1188__CLASS_EXTENSION_GENERATION_CONTEXT; struct MELT_STRING_STRUCT (34) dstr_1189__CLASS_EXTENSION_; struct MELT_ROUTINE_STRUCT (1) drout_1190__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_1191__RETRUNINIT_; struct MELT_STRING_STRUCT (12) dstr_1192__RETRUNINIT_; struct MELT_OBJECT_STRUCT (3) dsym_1193__OCURENVBOXLOC_; struct MELT_STRING_STRUCT (15) dstr_1194__OCURENVBOXLOC_; struct MELT_OBJECT_STRUCT (3) dsym_1195__OCURENVLOC_; struct MELT_STRING_STRUCT (12) dstr_1196__OCURENVLOC_; struct MELT_OBJECT_STRUCT (3) dsym_1197__PREVENVLOC_; struct MELT_STRING_STRUCT (12) dstr_1198__PREVENVLOC_; struct MELT_OBJECT_STRUCT (3) dsym_1199__OLITVALUETUPLOC_; struct MELT_STRING_STRUCT (17) dstr_1200__OLITVALUETUPLOC; struct MELT_ROUTINE_STRUCT (5) drout_1201__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_1202__CLASS_NREP_LITERALNAMEDVALUE; struct MELT_STRING_STRUCT (28) dstr_1203__CLASS_NREP_LITER; struct MELT_OBJECT_STRUCT (3) dsym_1204__CLASS_NREP_LITERALVALUE; struct MELT_STRING_STRUCT (23) dstr_1205__CLASS_NREP_LITER; struct MELT_OBJECT_STRUCT (3) dsym_1206__CLASS_LITERAL_VALUE; struct MELT_STRING_STRUCT (19) dstr_1207__CLASS_LITERAL_VA; struct MELT_OBJECT_STRUCT (3) dsym_1208__REFERENCED_VALUE; struct MELT_STRING_STRUCT (16) dstr_1209__REFERENCED_VALUE; struct MELT_OBJECT_STRUCT (3) dsym_1210__ENV_PREV; struct MELT_STRING_STRUCT (8) dstr_1211__ENV_PREV; struct MELT_ROUTINE_STRUCT (2) drout_1212__LAMBDA_; struct MELT_ROUTINE_STRUCT (2) drout_1213__LAMBDA_; struct MELT_ROUTINE_STRUCT (6) drout_1214__LAMBDA_; struct MELT_ROUTINE_STRUCT (8) drout_1215__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_1216__COMPILE2OBJ_INITPROC; struct MELT_STRING_STRUCT (20) dstr_1217__COMPILE2OBJ_INIT; struct MELT_OBJECT_STRUCT (3) dsym_1218__COMPILE2OBJ_INITEXTENDPROC; struct MELT_STRING_STRUCT (26) dstr_1219__COMPILE2OBJ_INIT; struct MELT_OBJECT_STRUCT (3) dsym_1220__COMPILE2OBJ_PROCEDURE; struct MELT_STRING_STRUCT (21) dstr_1221__COMPILE2OBJ_PROC; struct MELT_OBJECT_STRUCT (3) dsym_1222__VARIADIC_INDEX_IDSTR; struct MELT_STRING_STRUCT (20) dstr_1223__VARIADIC_INDEX_I; struct MELT_OBJECT_STRUCT (3) dsym_1224__VARIADIC_LENGTH_IDSTR; struct MELT_STRING_STRUCT (21) dstr_1225__VARIADIC_LENGTH_; struct MELT_ROUTINE_STRUCT (9) drout_1226__GET_FREE_OBJLOCPTR; struct MELT_CLOSURE_STRUCT (0) dclo_1227__GET_FREE_OBJLOCPTR; struct MELT_ROUTINE_STRUCT (9) drout_1228__GET_FREE_OBJLOCLONG; struct MELT_CLOSURE_STRUCT (0) dclo_1229__GET_FREE_OBJLOCLONG; struct MELT_ROUTINE_STRUCT (15) drout_1230__GET_FREE_OBJLOCTYPED; struct MELT_CLOSURE_STRUCT (0) dclo_1231__GET_FREE_OBJLOCTYPED; struct MELT_ROUTINE_STRUCT (8) drout_1232__DISPOSE_OBJLOC; struct MELT_CLOSURE_STRUCT (0) dclo_1233__DISPOSE_OBJLOC; struct MELT_ROUTINE_STRUCT (7) drout_1234__DISPOSE_BND_OBJ; struct MELT_CLOSURE_STRUCT (0) dclo_1235__DISPOSE_BND_OBJ; struct MELT_OBJECT_STRUCT (3) dsym_1236__CLASS_LET_BINDING; struct MELT_STRING_STRUCT (17) dstr_1237__CLASS_LET_BINDIN; struct MELT_ROUTINE_STRUCT (12) drout_1238__COMPILOBJ_NREP_CHUNK; struct MELT_CLOSURE_STRUCT (0) dclo_1239__COMPILOBJ_NREP_CHUNK; struct MELT_OBJECT_STRUCT (3) dsym_1240__CLASS_NREP_CHUNK; struct MELT_STRING_STRUCT (16) dstr_1241__CLASS_NREP_CHUNK; struct MELT_ROUTINE_STRUCT (3) drout_1242__LAMBDA_; struct MELT_ROUTINE_STRUCT (1) drout_1243__GETCTYPE_TYPEXPR; struct MELT_CLOSURE_STRUCT (0) dclo_1244__GETCTYPE_TYPEXPR; struct MELT_OBJECT_STRUCT (3) dsym_1245__CLASS_NREP_TYPED_EXPRESSION; struct MELT_STRING_STRUCT (27) dstr_1246__CLASS_NREP_TYPED; struct MELT_ROUTINE_STRUCT (4) drout_1247__COMPILOBJ_NREP_NIL; struct MELT_CLOSURE_STRUCT (0) dclo_1248__COMPILOBJ_NREP_NIL; struct MELT_OBJECT_STRUCT (3) dsym_1249__CLASS_NREP_NIL; struct MELT_STRING_STRUCT (14) dstr_1250__CLASS_NREP_NIL; struct MELT_ROUTINE_STRUCT (7) drout_1251__COMPILOBJ_NREP_COMMENT; struct MELT_CLOSURE_STRUCT (0) dclo_1252__COMPILOBJ_NREP_COMMENT; struct MELT_OBJECT_STRUCT (3) dsym_1253__CLASS_NREP_COMMENT; struct MELT_STRING_STRUCT (18) dstr_1254__CLASS_NREP_COMME; struct MELT_ROUTINE_STRUCT (5) drout_1255__COMPILOBJ_NREP_LOCSYMOCC; struct MELT_CLOSURE_STRUCT (0) dclo_1256__COMPILOBJ_NREP_LOCSYMOCC; struct MELT_OBJECT_STRUCT (3) dsym_1257__CLASS_NREP_LOCSYMOCC; struct MELT_STRING_STRUCT (20) dstr_1258__CLASS_NREP_LOCSY; struct MELT_ROUTINE_STRUCT (7) drout_1259__COMPILOBJ_NREP_CLOSEDOCC; struct MELT_CLOSURE_STRUCT (0) dclo_1260__COMPILOBJ_NREP_CLOSEDOCC; struct MELT_OBJECT_STRUCT (3) dsym_1261__CLASS_NREP_CLOSEDOCC; struct MELT_STRING_STRUCT (20) dstr_1262__CLASS_NREP_CLOSE; struct MELT_ROUTINE_STRUCT (7) drout_1263__COMPILOBJ_NREP_CONSTOCC; struct MELT_CLOSURE_STRUCT (0) dclo_1264__COMPILOBJ_NREP_CONSTOCC; struct MELT_OBJECT_STRUCT (3) dsym_1265__CLASS_NREP_CONSTOCC; struct MELT_STRING_STRUCT (19) dstr_1266__CLASS_NREP_CONST; struct MELT_ROUTINE_STRUCT (5) drout_1267__COMPILOBJ_NREP_IMPORTEDVAL; struct MELT_CLOSURE_STRUCT (0) dclo_1268__COMPILOBJ_NREP_IMPORTEDVAL; struct MELT_ROUTINE_STRUCT (9) drout_1269__COMPILOBJ_NREP_LITERALVALUE; struct MELT_CLOSURE_STRUCT (0) dclo_1270__COMPILOBJ_NREP_LITERALVALUE; struct MELT_OBJECT_STRUCT (3) dsym_1271__STRING4OUT; struct MELT_STRING_STRUCT (10) dstr_1272__STRING4OUT; struct MELT_ROUTINE_STRUCT (3) drout_1273__COMPILOBJ_NREP_DEFINEDCONSTANT; struct MELT_CLOSURE_STRUCT (0) dclo_1274__COMPILOBJ_NREP_DEFINEDCONSTANT; struct MELT_OBJECT_STRUCT (3) dsym_1275__CLASS_NREP_DEFINED_CONSTANT; struct MELT_STRING_STRUCT (27) dstr_1276__CLASS_NREP_DEFIN; struct MELT_ROUTINE_STRUCT (11) drout_1277__COMPILOBJ_NREP_QUASICONSTANT; struct MELT_CLOSURE_STRUCT (0) dclo_1278__COMPILOBJ_NREP_QUASICONSTANT; struct MELT_OBJECT_STRUCT (3) dsym_1279__CLASS_NREP_QUASICONSTANT; struct MELT_STRING_STRUCT (24) dstr_1280__CLASS_NREP_QUASI; struct MELT_ROUTINE_STRUCT (7) drout_1281__COMPILOBJ_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER; struct MELT_CLOSURE_STRUCT (0) dclo_1282__COMPILOBJ_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER; struct MELT_OBJECT_STRUCT (3) dsym_1283__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER; struct MELT_STRING_STRUCT (58) dstr_1284__CLASS_NREP_QUASI; struct MELT_ROUTINE_STRUCT (12) drout_1285__COMPILOBJ_NREP_FOREVER; struct MELT_CLOSURE_STRUCT (0) dclo_1286__COMPILOBJ_NREP_FOREVER; struct MELT_OBJECT_STRUCT (3) dsym_1287__CLASS_NREP_FOREVER; struct MELT_STRING_STRUCT (18) dstr_1288__CLASS_NREP_FOREV; struct MELT_OBJECT_STRUCT (3) dsym_1289__CLASS_LABEL_BINDING; struct MELT_STRING_STRUCT (19) dstr_1290__CLASS_LABEL_BIND; struct MELT_ROUTINE_STRUCT (1) drout_1291__LAMBDA_; struct MELT_ROUTINE_STRUCT (10) drout_1292__COMPILOBJ_NREP_EXIT; struct MELT_CLOSURE_STRUCT (0) dclo_1293__COMPILOBJ_NREP_EXIT; struct MELT_OBJECT_STRUCT (3) dsym_1294__CLASS_NREP_EXIT; struct MELT_STRING_STRUCT (15) dstr_1295__CLASS_NREP_EXIT; struct MELT_ROUTINE_STRUCT (5) drout_1296__COMPILOBJ_NREP_AGAIN; struct MELT_CLOSURE_STRUCT (0) dclo_1297__COMPILOBJ_NREP_AGAIN; struct MELT_OBJECT_STRUCT (3) dsym_1298__CLASS_NREP_AGAIN; struct MELT_STRING_STRUCT (16) dstr_1299__CLASS_NREP_AGAIN; struct MELT_ROUTINE_STRUCT (1) drout_1300__COMPILOBJ_DISCRANY; struct MELT_CLOSURE_STRUCT (0) dclo_1301__COMPILOBJ_DISCRANY; struct MELT_ROUTINE_STRUCT (20) drout_1302__COMPILOBJ_NREP_LET; struct MELT_CLOSURE_STRUCT (0) dclo_1303__COMPILOBJ_NREP_LET; struct MELT_OBJECT_STRUCT (3) dsym_1304__CLASS_NREP_LET; struct MELT_STRING_STRUCT (14) dstr_1305__CLASS_NREP_LET; struct MELT_ROUTINE_STRUCT (7) drout_1306__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_1307__CLASS_NORMAL_LET_BINDING; struct MELT_STRING_STRUCT (24) dstr_1308__CLASS_NORMAL_LET; struct MELT_OBJECT_STRUCT (3) dsym_1309__CLASS_SEXPR; struct MELT_STRING_STRUCT (11) dstr_1310__CLASS_SEXPR; struct MELT_ROUTINE_STRUCT (2) drout_1311__LAMBDA_; struct MELT_ROUTINE_STRUCT (2) drout_1312__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_1313__COMPILE_LETREC_FILL; struct MELT_STRING_STRUCT (19) dstr_1314__COMPILE_LETREC_F; struct MELT_OBJECT_STRUCT (2) dobj_1315; struct MELT_OBJECT_STRUCT (3) dsym_1316__OBVA; struct MELT_STRING_STRUCT (4) dstr_1317__OBVA; struct MELT_OBJECT_STRUCT (2) dobj_1318; struct MELT_OBJECT_STRUCT (3) dsym_1319__OBODL; struct MELT_STRING_STRUCT (5) dstr_1320__OBODL; struct MELT_OBJECT_STRUCT (2) dobj_1321; struct MELT_OBJECT_STRUCT (3) dsym_1322__GCX; struct MELT_STRING_STRUCT (3) dstr_1323__GCX; struct MELT_OBJECT_STRUCT (2) dobj_1324; struct MELT_OBJECT_STRUCT (3) dsym_1325__SLOC; struct MELT_STRING_STRUCT (4) dstr_1326__SLOC; struct MELT_OBJECT_STRUCT (2) dobj_1327; struct MELT_MULTIPLE_STRUCT (5) dtup_1328__COMPILE_LETREC_FILL; struct MELT_OBJECT_STRUCT (4) dobj_1329__COMPILE_LETREC_FILL; struct MELT_STRING_STRUCT (19) dstr_1330__COMPILE_LETREC_F; struct MELT_ROUTINE_STRUCT (2) drout_1331__FAIL_COMPILETRECFILL; struct MELT_CLOSURE_STRUCT (0) dclo_1332__FAIL_COMPILETRECFILL; struct MELT_ROUTINE_STRUCT (11) drout_1333__COMPILETREC_LAMBDA; struct MELT_CLOSURE_STRUCT (0) dclo_1334__COMPILETREC_LAMBDA; struct MELT_OBJECT_STRUCT (3) dsym_1335__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING; struct MELT_STRING_STRUCT (39) dstr_1336__CLASS_NORMAL_CON; struct MELT_OBJECT_STRUCT (3) dsym_1337__CLASS_NORMAL_CONSTRUCTOR_BINDING; struct MELT_STRING_STRUCT (32) dstr_1338__CLASS_NORMAL_CON; struct MELT_ROUTINE_STRUCT (10) drout_1339__COMPILETREC_TUPLE; struct MELT_CLOSURE_STRUCT (0) dclo_1340__COMPILETREC_TUPLE; struct MELT_OBJECT_STRUCT (3) dsym_1341__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING; struct MELT_STRING_STRUCT (38) dstr_1342__CLASS_NORMAL_CON; struct MELT_ROUTINE_STRUCT (10) drout_1343__COMPILETREC_PAIR; struct MELT_CLOSURE_STRUCT (0) dclo_1344__COMPILETREC_PAIR; struct MELT_OBJECT_STRUCT (3) dsym_1345__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING; struct MELT_STRING_STRUCT (37) dstr_1346__CLASS_NORMAL_CON; struct MELT_ROUTINE_STRUCT (9) drout_1347__COMPILETREC_LIST; struct MELT_CLOSURE_STRUCT (0) dclo_1348__COMPILETREC_LIST; struct MELT_OBJECT_STRUCT (3) dsym_1349__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING; struct MELT_STRING_STRUCT (37) dstr_1350__CLASS_NORMAL_CON; struct MELT_ROUTINE_STRUCT (13) drout_1351__COMPILETREC_INSTANCE; struct MELT_CLOSURE_STRUCT (0) dclo_1352__COMPILETREC_INSTANCE; struct MELT_OBJECT_STRUCT (3) dsym_1353__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING; struct MELT_STRING_STRUCT (41) dstr_1354__CLASS_NORMAL_CON; struct MELT_OBJECT_STRUCT (3) dsym_1355__CLASS_VALUE_BINDING; struct MELT_STRING_STRUCT (19) dstr_1356__CLASS_VALUE_BIND; struct MELT_OBJECT_STRUCT (3) dsym_1357__CLASS_CLASS_BINDING; struct MELT_STRING_STRUCT (19) dstr_1358__CLASS_CLASS_BIND; struct MELT_OBJECT_STRUCT (3) dsym_1359__CLASS_CLASS; struct MELT_STRING_STRUCT (11) dstr_1360__CLASS_CLASS; struct MELT_ROUTINE_STRUCT (23) drout_1361__COMPILOBJ_NREP_LETREC; struct MELT_CLOSURE_STRUCT (0) dclo_1362__COMPILOBJ_NREP_LETREC; struct MELT_OBJECT_STRUCT (3) dsym_1363__CLASS_NREP_LETREC; struct MELT_STRING_STRUCT (17) dstr_1364__CLASS_NREP_LETRE; struct MELT_OBJECT_STRUCT (3) dsym_1365__CLASS_NREP_SYMOCC; struct MELT_STRING_STRUCT (17) dstr_1366__CLASS_NREP_SYMOC; struct MELT_ROUTINE_STRUCT (33) drout_1367__COMPILOBJ_NREP_CITERATION; struct MELT_CLOSURE_STRUCT (0) dclo_1368__COMPILOBJ_NREP_CITERATION; struct MELT_OBJECT_STRUCT (3) dsym_1369__CLASS_NREP_CITERATION; struct MELT_STRING_STRUCT (21) dstr_1370__CLASS_NREP_CITER; struct MELT_OBJECT_STRUCT (3) dsym_1371__CLASS_CITERATOR; struct MELT_STRING_STRUCT (15) dstr_1372__CLASS_CITERATOR; struct MELT_ROUTINE_STRUCT (5) drout_1373__LAMBDA_; struct MELT_ROUTINE_STRUCT (1) drout_1374__LAMBDA_; struct MELT_ROUTINE_STRUCT (1) drout_1375__LAMBDA_; struct MELT_ROUTINE_STRUCT (6) drout_1376__LAMBDA_; struct MELT_ROUTINE_STRUCT (1) drout_1377__LAMBDA_; struct MELT_ROUTINE_STRUCT (6) drout_1378__COMPILOBJ_NREP_SETQ; struct MELT_CLOSURE_STRUCT (0) dclo_1379__COMPILOBJ_NREP_SETQ; struct MELT_OBJECT_STRUCT (3) dsym_1380__CLASS_NREP_SETQ; struct MELT_STRING_STRUCT (15) dstr_1381__CLASS_NREP_SETQ; struct MELT_ROUTINE_STRUCT (9) drout_1382__COMPILOBJ_NREP_PROGN; struct MELT_CLOSURE_STRUCT (0) dclo_1383__COMPILOBJ_NREP_PROGN; struct MELT_OBJECT_STRUCT (3) dsym_1384__CLASS_NREP_PROGN; struct MELT_STRING_STRUCT (16) dstr_1385__CLASS_NREP_PROGN; struct MELT_ROUTINE_STRUCT (1) drout_1386__LAMBDA_; struct MELT_ROUTINE_STRUCT (10) drout_1387__COMPILOBJ_NREP_MULTACC; struct MELT_CLOSURE_STRUCT (0) dclo_1388__COMPILOBJ_NREP_MULTACC; struct MELT_OBJECT_STRUCT (3) dsym_1389__CLASS_NREP_MULTACC; struct MELT_STRING_STRUCT (18) dstr_1390__CLASS_NREP_MULTA; struct MELT_ROUTINE_STRUCT (4) drout_1391__LAMBDA_; struct MELT_ROUTINE_STRUCT (14) drout_1392__COMPILOBJ_NREP_FIELDACC; struct MELT_CLOSURE_STRUCT (0) dclo_1393__COMPILOBJ_NREP_FIELDACC; struct MELT_OBJECT_STRUCT (3) dsym_1394__CLASS_NREP_FIELDACC; struct MELT_STRING_STRUCT (19) dstr_1395__CLASS_NREP_FIELD; struct MELT_ROUTINE_STRUCT (4) drout_1396__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_1397__CLASS_FIELD; struct MELT_STRING_STRUCT (11) dstr_1398__CLASS_FIELD; struct MELT_OBJECT_STRUCT (3) dsym_1399__CLASS_NREP_DATAINSTANCE; struct MELT_STRING_STRUCT (23) dstr_1400__CLASS_NREP_DATAI; struct MELT_ROUTINE_STRUCT (6) drout_1401__COMPILOBJ_NREP_UNSAFE_GET_FIELD; struct MELT_CLOSURE_STRUCT (0) dclo_1402__COMPILOBJ_NREP_UNSAFE_GET_FIELD; struct MELT_OBJECT_STRUCT (3) dsym_1403__CLASS_NREP_UNSAFE_GET_FIELD; struct MELT_STRING_STRUCT (27) dstr_1404__CLASS_NREP_UNSAF; struct MELT_ROUTINE_STRUCT (17) drout_1405__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS; struct MELT_CLOSURE_STRUCT (0) dclo_1406__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS; struct MELT_OBJECT_STRUCT (3) dsym_1407__CLASS_NREP_UNSAFE_PUT_FIELDS; struct MELT_STRING_STRUCT (28) dstr_1408__CLASS_NREP_UNSAF; struct MELT_ROUTINE_STRUCT (6) drout_1409__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_1410__CLASS_NREP_FIELDASSIGN; struct MELT_STRING_STRUCT (22) dstr_1411__CLASS_NREP_FIELD; struct MELT_STRING_STRUCT (10) dstr_1412__put_fields; struct MELT_ROUTINE_STRUCT (3) drout_1413__COMPILOBJ_NREP_CHECKSIGNAL; struct MELT_CLOSURE_STRUCT (0) dclo_1414__COMPILOBJ_NREP_CHECKSIGNAL; struct MELT_OBJECT_STRUCT (3) dsym_1415__CLASS_NREP_CHECKSIGNAL; struct MELT_STRING_STRUCT (22) dstr_1416__CLASS_NREP_CHECK; struct MELT_ROUTINE_STRUCT (6) drout_1417__COMPILOBJ_NREP_UNSAFE_NTH_COMPONENT; struct MELT_CLOSURE_STRUCT (0) dclo_1418__COMPILOBJ_NREP_UNSAFE_NTH_COMPONENT; struct MELT_OBJECT_STRUCT (3) dsym_1419__CLASS_NREP_UNSAFE_NTH_COMPONENT; struct MELT_STRING_STRUCT (31) dstr_1420__CLASS_NREP_UNSAF; struct MELT_ROUTINE_STRUCT (10) drout_1421__COMPILOBJ_NREP_APPLY; struct MELT_CLOSURE_STRUCT (0) dclo_1422__COMPILOBJ_NREP_APPLY; struct MELT_OBJECT_STRUCT (3) dsym_1423__CLASS_NREP_APPLY; struct MELT_STRING_STRUCT (16) dstr_1424__CLASS_NREP_APPLY; struct MELT_ROUTINE_STRUCT (2) drout_1425__LAMBDA_; struct MELT_ROUTINE_STRUCT (23) drout_1426__COMPILOBJ_NREP_MULTIAPPLY; struct MELT_CLOSURE_STRUCT (0) dclo_1427__COMPILOBJ_NREP_MULTIAPPLY; struct MELT_OBJECT_STRUCT (3) dsym_1428__CLASS_NREP_MULTIAPPLY; struct MELT_STRING_STRUCT (21) dstr_1429__CLASS_NREP_MULTI; struct MELT_ROUTINE_STRUCT (3) drout_1430__LAMBDA_; struct MELT_ROUTINE_STRUCT (1) drout_1431__LAMBDA_; struct MELT_ROUTINE_STRUCT (2) drout_1432__LAMBDA_; struct MELT_ROUTINE_STRUCT (1) drout_1433__LAMBDA_; struct MELT_ROUTINE_STRUCT (1) drout_1434__LAMBDA_; struct MELT_ROUTINE_STRUCT (10) drout_1435__COMPILOBJ_NREP_MSEND; struct MELT_CLOSURE_STRUCT (0) dclo_1436__COMPILOBJ_NREP_MSEND; struct MELT_OBJECT_STRUCT (3) dsym_1437__CLASS_NREP_MSEND; struct MELT_STRING_STRUCT (16) dstr_1438__CLASS_NREP_MSEND; struct MELT_ROUTINE_STRUCT (2) drout_1439__LAMBDA_; struct MELT_ROUTINE_STRUCT (22) drout_1440__COMPILOBJ_NREP_MULTIMSEND; struct MELT_CLOSURE_STRUCT (0) dclo_1441__COMPILOBJ_NREP_MULTIMSEND; struct MELT_OBJECT_STRUCT (3) dsym_1442__CLASS_NREP_MULTIMSEND; struct MELT_STRING_STRUCT (21) dstr_1443__CLASS_NREP_MULTI; struct MELT_ROUTINE_STRUCT (3) drout_1444__LAMBDA_; struct MELT_ROUTINE_STRUCT (1) drout_1445__LAMBDA_; struct MELT_ROUTINE_STRUCT (1) drout_1446__LAMBDA_; struct MELT_ROUTINE_STRUCT (1) drout_1447__LAMBDA_; struct MELT_ROUTINE_STRUCT (3) drout_1448__COMPILOBJ_ANY_BINDING; struct MELT_CLOSURE_STRUCT (0) dclo_1449__COMPILOBJ_ANY_BINDING; struct MELT_ROUTINE_STRUCT (5) drout_1450__COMPILOBJ_VALUE_BINDING; struct MELT_CLOSURE_STRUCT (0) dclo_1451__COMPILOBJ_VALUE_BINDING; struct MELT_ROUTINE_STRUCT (4) drout_1452__COMPILOBJ_FIXED_BINDING; struct MELT_CLOSURE_STRUCT (0) dclo_1453__COMPILOBJ_FIXED_BINDING; struct MELT_ROUTINE_STRUCT (4) drout_1454__COMPILOBJ_NORMAL_LET_BINDING; struct MELT_CLOSURE_STRUCT (0) dclo_1455__COMPILOBJ_NORMAL_LET_BINDING; struct MELT_ROUTINE_STRUCT (10) drout_1456__COMPILOBJ_CONSLAMBDABIND; struct MELT_CLOSURE_STRUCT (0) dclo_1457__COMPILOBJ_CONSLAMBDABIND; struct MELT_ROUTINE_STRUCT (11) drout_1458__COMPILOBJ_CONSTUPLEBIND; struct MELT_CLOSURE_STRUCT (0) dclo_1459__COMPILOBJ_CONSTUPLEBIND; struct MELT_ROUTINE_STRUCT (10) drout_1460__COMPILOBJ_CONSPAIRBIND; struct MELT_CLOSURE_STRUCT (0) dclo_1461__COMPILOBJ_CONSPAIRBIND; struct MELT_ROUTINE_STRUCT (9) drout_1462__COMPILOBJ_CONSLISTBIND; struct MELT_CLOSURE_STRUCT (0) dclo_1463__COMPILOBJ_CONSLISTBIND; struct MELT_ROUTINE_STRUCT (12) drout_1464__COMPILOBJ_CONSINSTANCEBIND; struct MELT_CLOSURE_STRUCT (0) dclo_1465__COMPILOBJ_CONSINSTANCEBIND; struct MELT_ROUTINE_STRUCT (9) drout_1466__PUTOBJDEST_OBJVALUE; struct MELT_CLOSURE_STRUCT (0) dclo_1467__PUTOBJDEST_OBJVALUE; struct MELT_ROUTINE_STRUCT (7) drout_1468__PUTOBJDEST_INTEGER; struct MELT_CLOSURE_STRUCT (0) dclo_1469__PUTOBJDEST_INTEGER; struct MELT_ROUTINE_STRUCT (5) drout_1470__PUTOBJDEST_STRING; struct MELT_CLOSURE_STRUCT (0) dclo_1471__PUTOBJDEST_STRING; struct MELT_OBJECT_STRUCT (3) dsym_1472__CTYPE_CSTRING; struct MELT_STRING_STRUCT (13) dstr_1473__CTYPE_CSTRING; struct MELT_ROUTINE_STRUCT (6) drout_1474__PUTOBJDEST_NULL; struct MELT_CLOSURE_STRUCT (0) dclo_1475__PUTOBJDEST_NULL; struct MELT_OBJECT_STRUCT (3) dsym_1476__DISCR_NULL_RECEIVER; struct MELT_STRING_STRUCT (19) dstr_1477__DISCR_NULL_RECEI; struct MELT_ROUTINE_STRUCT (3) drout_1478__PUTOBJDEST_OBJANYBLOCK; struct MELT_CLOSURE_STRUCT (0) dclo_1479__PUTOBJDEST_OBJANYBLOCK; struct MELT_ROUTINE_STRUCT (3) drout_1480__PUTOBJDEST_OBJMULTIBLOCK; struct MELT_CLOSURE_STRUCT (0) dclo_1481__PUTOBJDEST_OBJMULTIBLOCK; struct MELT_ROUTINE_STRUCT (7) drout_1482__PUTOBJDEST_OBJLOOP; struct MELT_CLOSURE_STRUCT (0) dclo_1483__PUTOBJDEST_OBJLOOP; struct MELT_ROUTINE_STRUCT (2) drout_1484__PUTOBJDEST_OBJEXIT; struct MELT_CLOSURE_STRUCT (0) dclo_1485__PUTOBJDEST_OBJEXIT; struct MELT_ROUTINE_STRUCT (7) drout_1486__COMPILOBJ_NREP_IF; struct MELT_CLOSURE_STRUCT (0) dclo_1487__COMPILOBJ_NREP_IF; struct MELT_OBJECT_STRUCT (3) dsym_1488__CLASS_NREP_IF; struct MELT_STRING_STRUCT (13) dstr_1489__CLASS_NREP_IF; struct MELT_ROUTINE_STRUCT (10) drout_1490__COMPILOBJ_NREP_IFISA; struct MELT_CLOSURE_STRUCT (0) dclo_1491__COMPILOBJ_NREP_IFISA; struct MELT_OBJECT_STRUCT (3) dsym_1492__CLASS_NREP_IFISA; struct MELT_STRING_STRUCT (16) dstr_1493__CLASS_NREP_IFISA; struct MELT_OBJECT_STRUCT (3) dsym_1494__CLASS_NREP_IFTESTVALUE; struct MELT_STRING_STRUCT (22) dstr_1495__CLASS_NREP_IFTES; struct MELT_ROUTINE_STRUCT (8) drout_1496__COMPILOBJ_NREP_IFTUPLESIZED; struct MELT_CLOSURE_STRUCT (0) dclo_1497__COMPILOBJ_NREP_IFTUPLESIZED; struct MELT_OBJECT_STRUCT (3) dsym_1498__CLASS_NREP_IFTUPLESIZED; struct MELT_STRING_STRUCT (23) dstr_1499__CLASS_NREP_IFTUP; struct MELT_ROUTINE_STRUCT (14) drout_1500__COMPILOBJ_NREP_IFVARIADIC; struct MELT_CLOSURE_STRUCT (0) dclo_1501__COMPILOBJ_NREP_IFVARIADIC; struct MELT_OBJECT_STRUCT (3) dsym_1502__CLASS_NREP_IFVARIADIC; struct MELT_STRING_STRUCT (21) dstr_1503__CLASS_NREP_IFVAR; struct MELT_ROUTINE_STRUCT (2) drout_1504__GETCTYPE_IFVARIADIC; struct MELT_CLOSURE_STRUCT (0) dclo_1505__GETCTYPE_IFVARIADIC; struct MELT_ROUTINE_STRUCT (9) drout_1506__COMPILOBJ_NREP_VARIADIC_ARGUMENT; struct MELT_CLOSURE_STRUCT (0) dclo_1507__COMPILOBJ_NREP_VARIADIC_ARGUMENT; struct MELT_OBJECT_STRUCT (3) dsym_1508__CLASS_NREP_VARIADIC_ARGUMENT; struct MELT_STRING_STRUCT (28) dstr_1509__CLASS_NREP_VARIA; struct MELT_ROUTINE_STRUCT (14) drout_1510__COMPILOBJ_NREP_CONSUMEVARIADIC; struct MELT_CLOSURE_STRUCT (0) dclo_1511__COMPILOBJ_NREP_CONSUMEVARIADIC; struct MELT_OBJECT_STRUCT (3) dsym_1512__CLASS_NREP_CONSUME_VARIADIC; struct MELT_STRING_STRUCT (27) dstr_1513__CLASS_NREP_CONSU; struct MELT_ROUTINE_STRUCT (3) drout_1514__PUTOBJDEST_OBJCOND; struct MELT_CLOSURE_STRUCT (0) dclo_1515__PUTOBJDEST_OBJCOND; struct MELT_ROUTINE_STRUCT (5) drout_1516__COMPILOBJ_NREP_CPPIF; struct MELT_CLOSURE_STRUCT (0) dclo_1517__COMPILOBJ_NREP_CPPIF; struct MELT_OBJECT_STRUCT (3) dsym_1518__CLASS_NREP_CPPIF; struct MELT_STRING_STRUCT (16) dstr_1519__CLASS_NREP_CPPIF; struct MELT_ROUTINE_STRUCT (3) drout_1520__PUTOBJDEST_OBJCPPIF; struct MELT_CLOSURE_STRUCT (0) dclo_1521__PUTOBJDEST_OBJCPPIF; struct MELT_ROUTINE_STRUCT (14) drout_1522__COMPILOBJ_NREP_RETURN; struct MELT_CLOSURE_STRUCT (0) dclo_1523__COMPILOBJ_NREP_RETURN; struct MELT_OBJECT_STRUCT (3) dsym_1524__CLASS_NREP_RETURN; struct MELT_STRING_STRUCT (17) dstr_1525__CLASS_NREP_RETUR; struct MELT_ROUTINE_STRUCT (1) drout_1526__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_1527__DISCRCLOSURE_OBJPREDEF; struct MELT_STRING_STRUCT (22) dstr_1528__DISCRCLOSURE_OBJ; struct MELT_OBJECT_STRUCT (2) dobj_1529__DISCRCLOSURE_OBJPREDEF; struct MELT_OBJECT_STRUCT (3) dsym_1530__DISCR_CLOSURE; struct MELT_STRING_STRUCT (13) dstr_1531__DISCR_CLOSURE; struct MELT_ROUTINE_STRUCT (16) drout_1532__COMPILOBJ_NREP_LAMBDA; struct MELT_CLOSURE_STRUCT (0) dclo_1533__COMPILOBJ_NREP_LAMBDA; struct MELT_OBJECT_STRUCT (3) dsym_1534__CLASS_NREP_LAMBDA; struct MELT_STRING_STRUCT (17) dstr_1535__CLASS_NREP_LAMBD; struct MELT_ROUTINE_STRUCT (3) drout_1536__LAMBDA_; struct MELT_ROUTINE_STRUCT (21) drout_1537__COMPILOBJ_NREP_MAKEINST; struct MELT_CLOSURE_STRUCT (0) dclo_1538__COMPILOBJ_NREP_MAKEINST; struct MELT_OBJECT_STRUCT (3) dsym_1539__CLASS_NREP_INSTANCE; struct MELT_STRING_STRUCT (19) dstr_1540__CLASS_NREP_INSTA; struct MELT_OBJECT_STRUCT (3) dsym_1541__INST; struct MELT_STRING_STRUCT (4) dstr_1542__INST; struct MELT_ROUTINE_STRUCT (6) drout_1543__LAMBDA_; struct MELT_STRING_STRUCT (19) dstr_1544__newly_made_insta; struct MELT_ROUTINE_STRUCT (3) drout_1545__COMPILOBJ_ROUTPROC; struct MELT_CLOSURE_STRUCT (0) dclo_1546__COMPILOBJ_ROUTPROC; struct MELT_ROUTINE_STRUCT (3) drout_1547__COMPILOBJ_PREDEF; struct MELT_CLOSURE_STRUCT (0) dclo_1548__COMPILOBJ_PREDEF; struct MELT_OBJECT_STRUCT (3) dsym_1549__CLASS_NREP_PREDEF; struct MELT_STRING_STRUCT (17) dstr_1550__CLASS_NREP_PREDE; struct MELT_ROUTINE_STRUCT (34) drout_1551__COMPIL_DATA_AND_SLOTS_FILL; struct MELT_CLOSURE_STRUCT (0) dclo_1552__COMPIL_DATA_AND_SLOTS_FILL; struct MELT_OBJECT_STRUCT (3) dsym_1553__VALDATA_; struct MELT_STRING_STRUCT (9) dstr_1554__VALDATA_; struct MELT_OBJECT_STRUCT (3) dsym_1555__VALUEDATA_; struct MELT_STRING_STRUCT (11) dstr_1556__VALUEDATA_; struct MELT_STRING_STRUCT (17) dstr_1557__fill_predef_slot; struct MELT_ROUTINE_STRUCT (4) drout_1558__LAMBDA_; struct MELT_ROUTINE_STRUCT (4) drout_1559__LAMBDA_; struct MELT_STRING_STRUCT (19) dstr_1560__new_static_insta; struct MELT_ROUTINE_STRUCT (1) drout_1561__LAMBDA_; struct MELT_ROUTINE_STRUCT (5) drout_1562__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL; struct MELT_CLOSURE_STRUCT (0) dclo_1563__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL; struct MELT_ROUTINE_STRUCT (1) drout_1564__LAMBDA_; struct MELT_ROUTINE_STRUCT (10) drout_1565__COMPILOBJ_DATASYMBOL; struct MELT_CLOSURE_STRUCT (0) dclo_1566__COMPILOBJ_DATASYMBOL; struct MELT_ROUTINE_STRUCT (10) drout_1567__COMPILOBJ_DATAINSTANCE; struct MELT_CLOSURE_STRUCT (0) dclo_1568__COMPILOBJ_DATAINSTANCE; struct MELT_ROUTINE_STRUCT (20) drout_1569__COMPILOBJ_DATATUPLE; struct MELT_CLOSURE_STRUCT (0) dclo_1570__COMPILOBJ_DATATUPLE; struct MELT_OBJECT_STRUCT (3) dsym_1571__CLASS_NREP_DATATUPLE; struct MELT_STRING_STRUCT (20) dstr_1572__CLASS_NREP_DATAT; struct MELT_ROUTINE_STRUCT (1) drout_1573__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_1574__VALTUP_; struct MELT_STRING_STRUCT (8) dstr_1575__VALTUP_; struct MELT_OBJECT_STRUCT (3) dsym_1576__INITUP_; struct MELT_STRING_STRUCT (8) dstr_1577__INITUP_; struct MELT_ROUTINE_STRUCT (2) drout_1578__LAMBDA_; struct MELT_ROUTINE_STRUCT (10) drout_1579__COMPILOBJ_DATASTRING; struct MELT_CLOSURE_STRUCT (0) dclo_1580__COMPILOBJ_DATASTRING; struct MELT_OBJECT_STRUCT (3) dsym_1581__CLASS_NREP_DATASTRING; struct MELT_STRING_STRUCT (21) dstr_1582__CLASS_NREP_DATAS; struct MELT_OBJECT_STRUCT (3) dsym_1583__VALSTR_; struct MELT_STRING_STRUCT (8) dstr_1584__VALSTR_; struct MELT_ROUTINE_STRUCT (10) drout_1585__COMPILOBJ_DATABOXEDINTEGER; struct MELT_CLOSURE_STRUCT (0) dclo_1586__COMPILOBJ_DATABOXEDINTEGER; struct MELT_OBJECT_STRUCT (3) dsym_1587__CLASS_NREP_DATABOXEDINTEGER; struct MELT_STRING_STRUCT (27) dstr_1588__CLASS_NREP_DATAB; struct MELT_OBJECT_STRUCT (3) dsym_1589__VALBXINT_; struct MELT_STRING_STRUCT (10) dstr_1590__VALBXINT_; struct MELT_ROUTINE_STRUCT (23) drout_1591__COMPILOBJ_DATACLOSURE; struct MELT_CLOSURE_STRUCT (0) dclo_1592__COMPILOBJ_DATACLOSURE; struct MELT_OBJECT_STRUCT (3) dsym_1593__CLASS_NREP_DATACLOSURE; struct MELT_STRING_STRUCT (22) dstr_1594__CLASS_NREP_DATAC; struct MELT_OBJECT_STRUCT (3) dsym_1595__VALCLO_; struct MELT_STRING_STRUCT (8) dstr_1596__VALCLO_; struct MELT_OBJECT_STRUCT (3) dsym_1597__DATACLOSURE_; struct MELT_STRING_STRUCT (13) dstr_1598__DATACLOSURE_; struct MELT_OBJECT_STRUCT (3) dsym_1599__CLASS_NREP_DATAROUTINE; struct MELT_STRING_STRUCT (22) dstr_1600__CLASS_NREP_DATAR; struct MELT_ROUTINE_STRUCT (3) drout_1601__LAMBDA_; struct MELT_ROUTINE_STRUCT (26) drout_1602__COMPILOBJ_DATAROUTINE; struct MELT_CLOSURE_STRUCT (0) dclo_1603__COMPILOBJ_DATAROUTINE; struct MELT_OBJECT_STRUCT (3) dsym_1604__VALROUT_; struct MELT_STRING_STRUCT (9) dstr_1605__VALROUT_; struct MELT_OBJECT_STRUCT (3) dsym_1606__IROUTVAL_; struct MELT_STRING_STRUCT (10) dstr_1607__IROUTVAL_; struct MELT_ROUTINE_STRUCT (8) drout_1608__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_1609__CLASS_NREP_QUASIDATA; struct MELT_STRING_STRUCT (20) dstr_1610__CLASS_NREP_QUASI; struct MELT_ROUTINE_STRUCT (2) drout_1611__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER; struct MELT_CLOSURE_STRUCT (0) dclo_1612__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER; struct MELT_OBJECT_STRUCT (3) dsym_1613__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER; struct MELT_STRING_STRUCT (57) dstr_1614__CLASS_NREP_QUASI; struct MELT_ROUTINE_STRUCT (2) drout_1615__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT; struct MELT_CLOSURE_STRUCT (0) dclo_1616__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT; struct MELT_OBJECT_STRUCT (3) dsym_1617__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT; struct MELT_STRING_STRUCT (46) dstr_1618__CLASS_NREP_QUASI; struct MELT_ROUTINE_STRUCT (9) drout_1619__COMPILOBJ_NREP_STORE_PREDEFINED; struct MELT_CLOSURE_STRUCT (0) dclo_1620__COMPILOBJ_NREP_STORE_PREDEFINED; struct MELT_OBJECT_STRUCT (3) dsym_1621__CLASS_NREP_STORE_PREDEFINED; struct MELT_STRING_STRUCT (27) dstr_1622__CLASS_NREP_STORE; struct MELT_ROUTINE_STRUCT (19) drout_1623__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER; struct MELT_CLOSURE_STRUCT (0) dclo_1624__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER; struct MELT_OBJECT_STRUCT (3) dsym_1625__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER; struct MELT_STRING_STRUCT (54) dstr_1626__CLASS_NREP_UPDAT; struct MELT_ROUTINE_STRUCT (7) drout_1627__LAMBDA_; struct MELT_STRING_STRUCT (23) dstr_1628__compobj_upd_mod_; struct MELT_ROUTINE_STRUCT (26) drout_1629__COMPILOBJ_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER; struct MELT_CLOSURE_STRUCT (0) dclo_1630__COMPILOBJ_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER; struct MELT_OBJECT_STRUCT (3) dsym_1631__CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER; struct MELT_STRING_STRUCT (53) dstr_1632__CLASS_NREP_CHECK; struct MELT_OBJECT_STRUCT (3) dsym_1633__CURMODENV_; struct MELT_STRING_STRUCT (11) dstr_1634__CURMODENV_; struct MELT_OBJECT_STRUCT (3) dsym_1635__ADD2OUT; struct MELT_STRING_STRUCT (7) dstr_1636__ADD2OUT; struct MELT_ROUTINE_STRUCT (5) drout_1637__LAMBDA_; struct MELT_STRING_STRUCT (25) dstr_1638__updat_cur_runnin; struct MELT_OBJECT_STRUCT (3) dsym_1639__COMPILE_MATCHER; struct MELT_STRING_STRUCT (15) dstr_1640__COMPILE_MATCHER; struct MELT_OBJECT_STRUCT (4) dobj_1641__COMPILE_MATCHER; struct MELT_STRING_STRUCT (15) dstr_1642__COMPILE_MATCHER; struct MELT_OBJECT_STRUCT (3) dsym_1643__CLASS_MATCHCOMPILCONTEXT; struct MELT_STRING_STRUCT (24) dstr_1644__CLASS_MATCHCOMPI; struct MELT_OBJECT_STRUCT (3) dsym_1645__CLASS_PROPED; struct MELT_STRING_STRUCT (12) dstr_1646__CLASS_PROPED; struct MELT_OBJECT_STRUCT (8) dobj_1647__CLASS_MATCHCOMPILCONTEXT; struct MELT_STRING_STRUCT (24) dstr_1648__CLASS_MATCHCOMPI; struct MELT_MULTIPLE_STRUCT (2) dtup_1649__CLASS_MATCHCOMPILCONTEXT; struct MELT_MULTIPLE_STRUCT (8) dtup_1650__CLASS_MATCHCOMPILCONTEXT; struct MELT_OBJECT_STRUCT (3) dsym_1651__MCX_LOC; struct MELT_STRING_STRUCT (7) dstr_1652__MCX_LOC; struct MELT_OBJECT_STRUCT (4) dobj_1653__MCX_LOC; struct MELT_STRING_STRUCT (7) dstr_1654__MCX_LOC; struct MELT_OBJECT_STRUCT (3) dsym_1655__MCX_NORMTESTER; struct MELT_STRING_STRUCT (14) dstr_1656__MCX_NORMTESTER; struct MELT_OBJECT_STRUCT (4) dobj_1657__MCX_NORMTESTER; struct MELT_STRING_STRUCT (14) dstr_1658__MCX_NORMTESTER; struct MELT_OBJECT_STRUCT (3) dsym_1659__MCX_GOTOTHEN; struct MELT_STRING_STRUCT (12) dstr_1660__MCX_GOTOTHEN; struct MELT_OBJECT_STRUCT (4) dobj_1661__MCX_GOTOTHEN; struct MELT_STRING_STRUCT (12) dstr_1662__MCX_GOTOTHEN; struct MELT_OBJECT_STRUCT (3) dsym_1663__MCX_GOTOELSE; struct MELT_STRING_STRUCT (12) dstr_1664__MCX_GOTOELSE; struct MELT_OBJECT_STRUCT (4) dobj_1665__MCX_GOTOELSE; struct MELT_STRING_STRUCT (12) dstr_1666__MCX_GOTOELSE; struct MELT_OBJECT_STRUCT (3) dsym_1667__MCX_OLIST; struct MELT_STRING_STRUCT (9) dstr_1668__MCX_OLIST; struct MELT_OBJECT_STRUCT (4) dobj_1669__MCX_OLIST; struct MELT_STRING_STRUCT (9) dstr_1670__MCX_OLIST; struct MELT_OBJECT_STRUCT (3) dsym_1671__MCX_SUFFIX; struct MELT_STRING_STRUCT (10) dstr_1672__MCX_SUFFIX; struct MELT_OBJECT_STRUCT (4) dobj_1673__MCX_SUFFIX; struct MELT_STRING_STRUCT (10) dstr_1674__MCX_SUFFIX; struct MELT_OBJECT_STRUCT (3) dsym_1675__MCX_STATECOUNTER; struct MELT_STRING_STRUCT (16) dstr_1676__MCX_STATECOUNTER; struct MELT_OBJECT_STRUCT (4) dobj_1677__MCX_STATECOUNTER; struct MELT_STRING_STRUCT (16) dstr_1678__MCX_STATECOUNTER; struct MELT_OBJECT_STRUCT (3) dsym_1679__COMPILE_TESTER; struct MELT_STRING_STRUCT (14) dstr_1680__COMPILE_TESTER; struct MELT_OBJECT_STRUCT (2) dobj_1681; struct MELT_OBJECT_STRUCT (2) dobj_1682; struct MELT_OBJECT_STRUCT (3) dsym_1683__TCX; struct MELT_STRING_STRUCT (3) dstr_1684__TCX; struct MELT_OBJECT_STRUCT (2) dobj_1685; struct MELT_MULTIPLE_STRUCT (3) dtup_1686__COMPILE_TESTER; struct MELT_OBJECT_STRUCT (4) dobj_1687__COMPILE_TESTER; struct MELT_STRING_STRUCT (14) dstr_1688__COMPILE_TESTER; struct MELT_OBJECT_STRUCT (3) dsym_1689__CLASS_TESTERCOMPILCONTEXT; struct MELT_STRING_STRUCT (25) dstr_1690__CLASS_TESTERCOMP; struct MELT_OBJECT_STRUCT (8) dobj_1691__CLASS_TESTERCOMPILCONTEXT; struct MELT_STRING_STRUCT (25) dstr_1692__CLASS_TESTERCOMP; struct MELT_MULTIPLE_STRUCT (2) dtup_1693__CLASS_TESTERCOMPILCONTEXT; struct MELT_MULTIPLE_STRUCT (4) dtup_1694__CLASS_TESTERCOMPILCONTEXT; struct MELT_OBJECT_STRUCT (3) dsym_1695__TCX_NRMATCH; struct MELT_STRING_STRUCT (11) dstr_1696__TCX_NRMATCH; struct MELT_OBJECT_STRUCT (4) dobj_1697__TCX_NRMATCH; struct MELT_STRING_STRUCT (11) dstr_1698__TCX_NRMATCH; struct MELT_OBJECT_STRUCT (3) dsym_1699__TCX_FREELIST; struct MELT_STRING_STRUCT (12) dstr_1700__TCX_FREELIST; struct MELT_OBJECT_STRUCT (4) dobj_1701__TCX_FREELIST; struct MELT_STRING_STRUCT (12) dstr_1702__TCX_FREELIST; struct MELT_OBJECT_STRUCT (3) dsym_1703__TCX_NEXTEST; struct MELT_STRING_STRUCT (11) dstr_1704__TCX_NEXTEST; struct MELT_OBJECT_STRUCT (4) dobj_1705__TCX_NEXTEST; struct MELT_STRING_STRUCT (11) dstr_1706__TCX_NEXTEST; struct MELT_ROUTINE_STRUCT (4) drout_1707__COMPILTST_ANYTESTER; struct MELT_CLOSURE_STRUCT (0) dclo_1708__COMPILTST_ANYTESTER; struct MELT_OBJECT_STRUCT (3) dsym_1709__CLASS_NORMTESTER_ANY; struct MELT_STRING_STRUCT (20) dstr_1710__CLASS_NORMTESTER; struct MELT_ROUTINE_STRUCT (26) drout_1711__COMPILOBJ_NREP_MATCH; struct MELT_CLOSURE_STRUCT (0) dclo_1712__COMPILOBJ_NREP_MATCH; struct MELT_OBJECT_STRUCT (3) dsym_1713__CLASS_NREP_MATCH; struct MELT_STRING_STRUCT (16) dstr_1714__CLASS_NREP_MATCH; struct MELT_OBJECT_STRUCT (3) dsym_1715__CLASS_NORMTESTER_ANYTESTER; struct MELT_STRING_STRUCT (26) dstr_1716__CLASS_NORMTESTER; struct MELT_OBJECT_STRUCT (3) dsym_1717__CLASS_NORMTESTER_SUCCESS; struct MELT_STRING_STRUCT (24) dstr_1718__CLASS_NORMTESTER; struct MELT_OBJECT_STRUCT (3) dsym_1719__MAPOBJECT_EVERY; struct MELT_STRING_STRUCT (15) dstr_1720__MAPOBJECT_EVERY; struct MELT_ROUTINE_STRUCT (1) drout_1721__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_1722__LIST_FIND; struct MELT_STRING_STRUCT (9) dstr_1723__LIST_FIND; struct MELT_OBJECT_STRUCT (3) dsym_1724__CLASS_ALTERNATE_MATCH_NREP_DATA; struct MELT_STRING_STRUCT (31) dstr_1725__CLASS_ALTERNATE_; struct MELT_OBJECT_STRUCT (3) dsym_1726__CLASS_ROOT; struct MELT_STRING_STRUCT (10) dstr_1727__CLASS_ROOT; struct MELT_OBJECT_STRUCT (8) dobj_1728__CLASS_ALTERNATE_MATCH_NREP_DATA; struct MELT_STRING_STRUCT (31) dstr_1729__CLASS_ALTERNATE_; struct MELT_MULTIPLE_STRUCT (1) dtup_1730__CLASS_ALTERNATE_MATCH_NREP_DATA; struct MELT_MULTIPLE_STRUCT (4) dtup_1731__CLASS_ALTERNATE_MATCH_NREP_DATA; struct MELT_OBJECT_STRUCT (3) dsym_1732__ALTMATCHN_PREV; struct MELT_STRING_STRUCT (14) dstr_1733__ALTMATCHN_PREV; struct MELT_OBJECT_STRUCT (4) dobj_1734__ALTMATCHN_PREV; struct MELT_STRING_STRUCT (14) dstr_1735__ALTMATCHN_PREV; struct MELT_OBJECT_STRUCT (3) dsym_1736__ALTMATCHN_NREP; struct MELT_STRING_STRUCT (14) dstr_1737__ALTMATCHN_NREP; struct MELT_OBJECT_STRUCT (4) dobj_1738__ALTMATCHN_NREP; struct MELT_STRING_STRUCT (14) dstr_1739__ALTMATCHN_NREP; struct MELT_OBJECT_STRUCT (3) dsym_1740__ALTMATCHN_FLAGMAP; struct MELT_STRING_STRUCT (17) dstr_1741__ALTMATCHN_FLAGMA; struct MELT_OBJECT_STRUCT (4) dobj_1742__ALTMATCHN_FLAGMAP; struct MELT_STRING_STRUCT (17) dstr_1743__ALTMATCHN_FLAGMA; struct MELT_OBJECT_STRUCT (3) dsym_1744__ALTMATCHN_DATAMAP; struct MELT_STRING_STRUCT (17) dstr_1745__ALTMATCHN_DATAMA; struct MELT_OBJECT_STRUCT (4) dobj_1746__ALTMATCHN_DATAMAP; struct MELT_STRING_STRUCT (17) dstr_1747__ALTMATCHN_DATAMA; struct MELT_ROUTINE_STRUCT (16) drout_1748__COMPILOBJ_NREP_ALTMATCH; struct MELT_CLOSURE_STRUCT (0) dclo_1749__COMPILOBJ_NREP_ALTMATCH; struct MELT_OBJECT_STRUCT (3) dsym_1750__CLASS_NREP_ALTMATCH; struct MELT_STRING_STRUCT (19) dstr_1751__CLASS_NREP_ALTMA; struct MELT_ROUTINE_STRUCT (2) drout_1752__LAMBDA_; struct MELT_ROUTINE_STRUCT (7) drout_1753__COMPILOBJ_NREP_MATCHLABEL; struct MELT_CLOSURE_STRUCT (0) dclo_1754__COMPILOBJ_NREP_MATCHLABEL; struct MELT_OBJECT_STRUCT (3) dsym_1755__CLASS_NREP_MATCH_LABEL; struct MELT_STRING_STRUCT (22) dstr_1756__CLASS_NREP_MATCH; struct MELT_OBJECT_STRUCT (3) dsym_1757__CLASS_MATCH_STEP_WITH_DATA; struct MELT_STRING_STRUCT (26) dstr_1758__CLASS_MATCH_STEP; struct MELT_ROUTINE_STRUCT (7) drout_1759__COMPILOBJ_NREP_MATCHFLAG; struct MELT_CLOSURE_STRUCT (0) dclo_1760__COMPILOBJ_NREP_MATCHFLAG; struct MELT_OBJECT_STRUCT (3) dsym_1761__CLASS_NREP_MATCH_FLAG; struct MELT_STRING_STRUCT (21) dstr_1762__CLASS_NREP_MATCH; struct MELT_OBJECT_STRUCT (3) dsym_1763__CLASS_MATCH_FLAG; struct MELT_STRING_STRUCT (16) dstr_1764__CLASS_MATCH_FLAG; struct MELT_ROUTINE_STRUCT (11) drout_1765__COMPILOBJ_NREP_MATCHDATAINIT; struct MELT_CLOSURE_STRUCT (0) dclo_1766__COMPILOBJ_NREP_MATCHDATAINIT; struct MELT_OBJECT_STRUCT (3) dsym_1767__CLASS_NREP_MATCH_DATA_INITIALIZER; struct MELT_STRING_STRUCT (33) dstr_1768__CLASS_NREP_MATCH; struct MELT_OBJECT_STRUCT (3) dsym_1769__CLASS_NREP_MATCH_DATA_ACTION; struct MELT_STRING_STRUCT (28) dstr_1770__CLASS_NREP_MATCH; struct MELT_OBJECT_STRUCT (3) dsym_1771__CLASS_NREP_MATCHED_DATA; struct MELT_STRING_STRUCT (23) dstr_1772__CLASS_NREP_MATCH; struct MELT_OBJECT_STRUCT (3) dsym_1773__CLONE_SYMBOL; struct MELT_STRING_STRUCT (12) dstr_1774__CLONE_SYMBOL; struct MELT_OBJECT_STRUCT (3) dsym_1775__MATCHDATA; struct MELT_STRING_STRUCT (9) dstr_1776__MATCHDATA; struct MELT_OBJECT_STRUCT (3) dsym_1777__CLASS_MATCHED_DATA; struct MELT_STRING_STRUCT (18) dstr_1778__CLASS_MATCHED_DA; struct MELT_ROUTINE_STRUCT (5) drout_1779__COMPILOBJ_NREP_MATCHEDATA; struct MELT_CLOSURE_STRUCT (0) dclo_1780__COMPILOBJ_NREP_MATCHEDATA; struct MELT_ROUTINE_STRUCT (5) drout_1781__COMPILOBJ_NREP_MATCHJUMP; struct MELT_CLOSURE_STRUCT (0) dclo_1782__COMPILOBJ_NREP_MATCHJUMP; struct MELT_OBJECT_STRUCT (3) dsym_1783__CLASS_NREP_MATCH_JUMP; struct MELT_STRING_STRUCT (21) dstr_1784__CLASS_NREP_MATCH; struct MELT_ROUTINE_STRUCT (5) drout_1785__NORMTESTER_LABELINSTR; struct MELT_CLOSURE_STRUCT (0) dclo_1786__NORMTESTER_LABELINSTR; struct MELT_ROUTINE_STRUCT (5) drout_1787__NORMTESTER_GOTOINSTR; struct MELT_CLOSURE_STRUCT (0) dclo_1788__NORMTESTER_GOTOINSTR; struct MELT_ROUTINE_STRUCT (6) drout_1789__ENDMATCH_GOTOINSTR; struct MELT_CLOSURE_STRUCT (0) dclo_1790__ENDMATCH_GOTOINSTR; struct MELT_ROUTINE_STRUCT (7) drout_1791__TESTMATCH_GOTOINSTR; struct MELT_CLOSURE_STRUCT (0) dclo_1792__TESTMATCH_GOTOINSTR; struct MELT_ROUTINE_STRUCT (10) drout_1793__NORMTESTER_FREE_OBJLOC_LIST; struct MELT_CLOSURE_STRUCT (0) dclo_1794__NORMTESTER_FREE_OBJLOC_LIST; struct MELT_ROUTINE_STRUCT (3) drout_1795__LAMBDA_; struct MELT_ROUTINE_STRUCT (3) drout_1796__COMPILTST_NORMTESTER_ANY; struct MELT_CLOSURE_STRUCT (0) dclo_1797__COMPILTST_NORMTESTER_ANY; struct MELT_ROUTINE_STRUCT (14) drout_1798__COMPILTST_NORMTESTER_MATCHER; struct MELT_CLOSURE_STRUCT (0) dclo_1799__COMPILTST_NORMTESTER_MATCHER; struct MELT_OBJECT_STRUCT (3) dsym_1800__CLASS_NORMTESTER_MATCHER; struct MELT_STRING_STRUCT (24) dstr_1801__CLASS_NORMTESTER; struct MELT_ROUTINE_STRUCT (19) drout_1802__COMPILTST_NORMTESTER_INSTANCE; struct MELT_CLOSURE_STRUCT (0) dclo_1803__COMPILTST_NORMTESTER_INSTANCE; struct MELT_OBJECT_STRUCT (3) dsym_1804__CLASS_NORMTESTER_INSTANCE; struct MELT_STRING_STRUCT (25) dstr_1805__CLASS_NORMTESTER; struct MELT_ROUTINE_STRUCT (20) drout_1806__COMPILTST_NORMTESTER_TUPLE; struct MELT_CLOSURE_STRUCT (0) dclo_1807__COMPILTST_NORMTESTER_TUPLE; struct MELT_OBJECT_STRUCT (3) dsym_1808__CLASS_NORMTESTER_TUPLE; struct MELT_STRING_STRUCT (22) dstr_1809__CLASS_NORMTESTER; struct MELT_ROUTINE_STRUCT (15) drout_1810__COMPILTST_NORMTESTER_SAME; struct MELT_CLOSURE_STRUCT (0) dclo_1811__COMPILTST_NORMTESTER_SAME; struct MELT_OBJECT_STRUCT (3) dsym_1812__CLASS_NORMTESTER_SAME; struct MELT_STRING_STRUCT (21) dstr_1813__CLASS_NORMTESTER; struct MELT_ROUTINE_STRUCT (6) drout_1814__COMPILTST_NORMTESTER_SUCCESS; struct MELT_CLOSURE_STRUCT (0) dclo_1815__COMPILTST_NORMTESTER_SUCCESS; struct MELT_ROUTINE_STRUCT (9) drout_1816__COMPILTST_NORMTESTER_ORCLEAR; struct MELT_CLOSURE_STRUCT (0) dclo_1817__COMPILTST_NORMTESTER_ORCLEAR; struct MELT_OBJECT_STRUCT (3) dsym_1818__CLASS_NORMTESTER_OR_CLEAR; struct MELT_STRING_STRUCT (25) dstr_1819__CLASS_NORMTESTER; struct MELT_ROUTINE_STRUCT (10) drout_1820__COMPILTST_NORMTESTER_ORTRANSMIT; struct MELT_CLOSURE_STRUCT (0) dclo_1821__COMPILTST_NORMTESTER_ORTRANSMIT; struct MELT_OBJECT_STRUCT (3) dsym_1822__CLASS_NORMTESTER_OR_TRANSMIT; struct MELT_STRING_STRUCT (28) dstr_1823__CLASS_NORMTESTER; struct MELT_ROUTINE_STRUCT (9) drout_1824__COMPILTST_NORMTESTER_DISJUNCTION; struct MELT_CLOSURE_STRUCT (0) dclo_1825__COMPILTST_NORMTESTER_DISJUNCTION; struct MELT_OBJECT_STRUCT (3) dsym_1826__CLASS_NORMTESTER_DISJUNCTION; struct MELT_STRING_STRUCT (28) dstr_1827__CLASS_NORMTESTER; struct MELT_ROUTINE_STRUCT (37) drout_1828__COMPILMATCHER_CMATCHER; struct MELT_CLOSURE_STRUCT (0) dclo_1829__COMPILMATCHER_CMATCHER; struct MELT_OBJECT_STRUCT (3) dsym_1830__CLASS_CMATCHER; struct MELT_STRING_STRUCT (14) dstr_1831__CLASS_CMATCHER; struct MELT_OBJECT_STRUCT (3) dsym_1832__MULTIPLE_EVERY_BOTH; struct MELT_STRING_STRUCT (19) dstr_1833__MULTIPLE_EVERY_B; struct MELT_ROUTINE_STRUCT (4) drout_1834__LAMBDA_; struct MELT_ROUTINE_STRUCT (4) drout_1835__LAMBDA_; struct MELT_ROUTINE_STRUCT (6) drout_1836__LAMBDA_; struct MELT_ROUTINE_STRUCT (4) drout_1837__LAMBDA_; struct MELT_ROUTINE_STRUCT (23) drout_1838__COMPILMATCHER_FUNMATCHER; struct MELT_CLOSURE_STRUCT (0) dclo_1839__COMPILMATCHER_FUNMATCHER; struct MELT_OBJECT_STRUCT (3) dsym_1840__CLASS_FUNMATCHER; struct MELT_STRING_STRUCT (16) dstr_1841__CLASS_FUNMATCHER; struct MELT_ROUTINE_STRUCT (1) drout_1842__LAMBDA_; struct MELT_ROUTINE_STRUCT (1) drout_1843__LAMBDA_; struct MELT_OBJECT_STRUCT (3) dsym_1844__CLOSFUNMATCH; struct MELT_STRING_STRUCT (13) dstr_1845__CLOSFUNMATCH; struct MELT_OBJECT_STRUCT (3) dsym_1846__FMATCH_MATCHF; struct MELT_STRING_STRUCT (13) dstr_1847__FMATCH_MATCHF; long spare_; } *cdat = NULL; dbgprintf ("start initialize_module_meltdata_warmelt_genobj iniframp__=%p", (void *) iniframp__); (void) meltpredefinited; /* avoid warning if non-used. */ melt_assertmsg ("check module initial frame", iniframp__->mcfr_nbvar == /*minihash */ -2830); cdat = (struct cdata_st *) meltgc_allocate (sizeof (*cdat), 0); melt_prohibit_garbcoll = TRUE; /*initial routine predef */ /*initial routine fill */ /*iniobj dsym_1__CLASS_OBJVALUE*/ /*uniqueobj*/ if (! /*_.VALDATA___V170*/ meltfptr[169]) /*_.VALDATA___V170*/ meltfptr[169] = (melt_ptr_t) & cdat->dsym_1__CLASS_OBJVALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1__CLASS_OBJVALUE", melt_magic_discr ((melt_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_OBJVALUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1__CLASS_OBJVALUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1__CLASS_OBJVALUE.obj_hash = 1057853242; cdat->dsym_1__CLASS_OBJVALUE.obj_len = 3; /*inistring dstr_2__CLASS_OBJVALUE*/ /*_.VALSTR___V171*/ meltfptr[170] = (melt_ptr_t) & cdat->dstr_2__CLASS_OBJVALUE; cdat->dstr_2__CLASS_OBJVALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_2__CLASS_OBJVALUE.val, "CLASS_OBJVALUE", sizeof (cdat->dstr_2__CLASS_OBJVALUE.val) - 1); cdat->dstr_2__CLASS_OBJVALUE.val[14] = (char) 0; cdat->dstr_2__CLASS_OBJVALUE.slen = 14; /*iniobj dsym_3__CLASS_GENERATED_C_CODE*/ /*uniqueobj*/ if (! /*_.VALDATA___V172*/ meltfptr[171]) /*_.VALDATA___V172*/ meltfptr[171] = (melt_ptr_t) & cdat->dsym_3__CLASS_GENERATED_C_CODE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_3__CLASS_GENERATED_C_CODE", melt_magic_discr ((melt_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_GENERATED_C_CODE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_3__CLASS_GENERATED_C_CODE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_3__CLASS_GENERATED_C_CODE.obj_hash = 860736875; cdat->dsym_3__CLASS_GENERATED_C_CODE.obj_len = 3; /*inistring dstr_4__CLASS_GENERATED_*/ /*_.VALSTR___V173*/ meltfptr[172] = (melt_ptr_t) & cdat->dstr_4__CLASS_GENERATED_; cdat->dstr_4__CLASS_GENERATED_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_4__CLASS_GENERATED_.val, "CLASS_GENERATED_C_CODE", sizeof (cdat->dstr_4__CLASS_GENERATED_.val) - 1); cdat->dstr_4__CLASS_GENERATED_.val[22] = (char) 0; cdat->dstr_4__CLASS_GENERATED_.slen = 22; MELT_LOCATION ("warmelt-genobj.melt:37:/ iniobj"); /*iniobj dobj_5__CLASS_OBJVALUE*/ /*_.VALDATA___V174*/ meltfptr[173] = (melt_ptr_t) & cdat->dobj_5__CLASS_OBJVALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_5__CLASS_OBJVALUE", 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_OBJVALUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_5__CLASS_OBJVALUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_5__CLASS_OBJVALUE.obj_num = MELTOBMAG_OBJECT; cdat->dobj_5__CLASS_OBJVALUE.obj_hash = 488435089; cdat->dobj_5__CLASS_OBJVALUE.obj_len = 8; /*inistring dstr_6__CLASS_OBJVALUE*/ /*_.VALSTR___V175*/ meltfptr[174] = (melt_ptr_t) & cdat->dstr_6__CLASS_OBJVALUE; cdat->dstr_6__CLASS_OBJVALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_6__CLASS_OBJVALUE.val, "CLASS_OBJVALUE", sizeof (cdat->dstr_6__CLASS_OBJVALUE.val) - 1); cdat->dstr_6__CLASS_OBJVALUE.val[14] = (char) 0; cdat->dstr_6__CLASS_OBJVALUE.slen = 14; /*inimult dtup_7__CLASS_OBJVALUE */ /*_.VALTUP___V176*/ meltfptr[175] = (melt_ptr_t) & cdat->dtup_7__CLASS_OBJVALUE; cdat->dtup_7__CLASS_OBJVALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_7__CLASS_OBJVALUE.nbval = 2; /*inimult dtup_8__CLASS_OBJVALUE */ /*_.VALTUP___V179*/ meltfptr[178] = (melt_ptr_t) & cdat->dtup_8__CLASS_OBJVALUE; cdat->dtup_8__CLASS_OBJVALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_8__CLASS_OBJVALUE.nbval = 1; /*iniobj dsym_9__OBV_TYPE*/ /*uniqueobj*/ if (! /*_.VALDATA___V180*/ meltfptr[179]) /*_.VALDATA___V180*/ meltfptr[179] = (melt_ptr_t) & cdat->dsym_9__OBV_TYPE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_9__OBV_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_9__OBV_TYPE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_9__OBV_TYPE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_9__OBV_TYPE.obj_hash = 139676463; cdat->dsym_9__OBV_TYPE.obj_len = 3; /*inistring dstr_10__OBV_TYPE*/ /*_.VALSTR___V181*/ meltfptr[180] = (melt_ptr_t) & cdat->dstr_10__OBV_TYPE; cdat->dstr_10__OBV_TYPE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_10__OBV_TYPE.val, "OBV_TYPE", sizeof (cdat->dstr_10__OBV_TYPE.val) - 1); cdat->dstr_10__OBV_TYPE.val[8] = (char) 0; cdat->dstr_10__OBV_TYPE.slen = 8; /*^iniobj */ /*iniobj dobj_11__OBV_TYPE*/ /*_.VALDATA___V177*/ meltfptr[176] = (melt_ptr_t) & cdat->dobj_11__OBV_TYPE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_11__OBV_TYPE", melt_magic_discr ((melt_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__OBV_TYPE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_11__OBV_TYPE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_11__OBV_TYPE.obj_num = 0; cdat->dobj_11__OBV_TYPE.obj_hash = 608709901; cdat->dobj_11__OBV_TYPE.obj_len = 4; /*inistring dstr_12__OBV_TYPE*/ /*_.VALSTR___V178*/ meltfptr[177] = (melt_ptr_t) & cdat->dstr_12__OBV_TYPE; cdat->dstr_12__OBV_TYPE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_12__OBV_TYPE.val, "OBV_TYPE", sizeof (cdat->dstr_12__OBV_TYPE.val) - 1); cdat->dstr_12__OBV_TYPE.val[8] = (char) 0; cdat->dstr_12__OBV_TYPE.slen = 8; /*iniobj dsym_13__CLASS_OBJPUREVALUE*/ /*uniqueobj*/ if (! /*_.VALDATA___V182*/ meltfptr[181]) /*_.VALDATA___V182*/ meltfptr[181] = (melt_ptr_t) & cdat->dsym_13__CLASS_OBJPUREVALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_13__CLASS_OBJPUREVALUE", melt_magic_discr ((melt_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_OBJPUREVALUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_13__CLASS_OBJPUREVALUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_13__CLASS_OBJPUREVALUE.obj_hash = 439671425; cdat->dsym_13__CLASS_OBJPUREVALUE.obj_len = 3; /*inistring dstr_14__CLASS_OBJPUREVAL*/ /*_.VALSTR___V183*/ meltfptr[182] = (melt_ptr_t) & cdat->dstr_14__CLASS_OBJPUREVAL; cdat->dstr_14__CLASS_OBJPUREVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_14__CLASS_OBJPUREVAL.val, "CLASS_OBJPUREVALUE", sizeof (cdat->dstr_14__CLASS_OBJPUREVAL.val) - 1); cdat->dstr_14__CLASS_OBJPUREVAL.val[18] = (char) 0; cdat->dstr_14__CLASS_OBJPUREVAL.slen = 18; MELT_LOCATION ("warmelt-genobj.melt:44:/ iniobj"); /*iniobj dobj_15__CLASS_OBJPUREVALUE*/ /*_.VALDATA___V184*/ meltfptr[183] = (melt_ptr_t) & cdat->dobj_15__CLASS_OBJPUREVALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_15__CLASS_OBJPUREVALUE", 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_OBJPUREVALUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_15__CLASS_OBJPUREVALUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_15__CLASS_OBJPUREVALUE.obj_num = MELTOBMAG_OBJECT; cdat->dobj_15__CLASS_OBJPUREVALUE.obj_hash = 914418087; cdat->dobj_15__CLASS_OBJPUREVALUE.obj_len = 8; /*inistring dstr_16__CLASS_OBJPUREVAL*/ /*_.VALSTR___V185*/ meltfptr[184] = (melt_ptr_t) & cdat->dstr_16__CLASS_OBJPUREVAL; cdat->dstr_16__CLASS_OBJPUREVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_16__CLASS_OBJPUREVAL.val, "CLASS_OBJPUREVALUE", sizeof (cdat->dstr_16__CLASS_OBJPUREVAL.val) - 1); cdat->dstr_16__CLASS_OBJPUREVAL.val[18] = (char) 0; cdat->dstr_16__CLASS_OBJPUREVAL.slen = 18; /*inimult dtup_17__CLASS_OBJPUREVALUE */ /*_.VALTUP___V186*/ meltfptr[185] = (melt_ptr_t) & cdat->dtup_17__CLASS_OBJPUREVALUE; cdat->dtup_17__CLASS_OBJPUREVALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_17__CLASS_OBJPUREVALUE.nbval = 3; /*inimult dtup_18__CLASS_OBJPUREVALUE */ /*_.VALTUP___V187*/ meltfptr[186] = (melt_ptr_t) & cdat->dtup_18__CLASS_OBJPUREVALUE; cdat->dtup_18__CLASS_OBJPUREVALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_18__CLASS_OBJPUREVALUE.nbval = 1; /*iniobj dsym_19__CLASS_OBJLOCV*/ /*uniqueobj*/ if (! /*_.VALDATA___V188*/ meltfptr[187]) /*_.VALDATA___V188*/ meltfptr[187] = (melt_ptr_t) & cdat->dsym_19__CLASS_OBJLOCV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_19__CLASS_OBJLOCV", melt_magic_discr ((melt_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_OBJLOCV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_19__CLASS_OBJLOCV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_19__CLASS_OBJLOCV.obj_hash = 259875989; cdat->dsym_19__CLASS_OBJLOCV.obj_len = 3; /*inistring dstr_20__CLASS_OBJLOCV*/ /*_.VALSTR___V189*/ meltfptr[188] = (melt_ptr_t) & cdat->dstr_20__CLASS_OBJLOCV; cdat->dstr_20__CLASS_OBJLOCV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_20__CLASS_OBJLOCV.val, "CLASS_OBJLOCV", sizeof (cdat->dstr_20__CLASS_OBJLOCV.val) - 1); cdat->dstr_20__CLASS_OBJLOCV.val[13] = (char) 0; cdat->dstr_20__CLASS_OBJLOCV.slen = 13; MELT_LOCATION ("warmelt-genobj.melt:50:/ iniobj"); /*iniobj dobj_21__CLASS_OBJLOCV*/ /*_.VALDATA___V190*/ meltfptr[189] = (melt_ptr_t) & cdat->dobj_21__CLASS_OBJLOCV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_21__CLASS_OBJLOCV", 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_OBJLOCV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_21__CLASS_OBJLOCV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_21__CLASS_OBJLOCV.obj_num = MELTOBMAG_OBJECT; cdat->dobj_21__CLASS_OBJLOCV.obj_hash = 970683257; cdat->dobj_21__CLASS_OBJLOCV.obj_len = 8; /*inistring dstr_22__CLASS_OBJLOCV*/ /*_.VALSTR___V191*/ meltfptr[190] = (melt_ptr_t) & cdat->dstr_22__CLASS_OBJLOCV; cdat->dstr_22__CLASS_OBJLOCV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_22__CLASS_OBJLOCV.val, "CLASS_OBJLOCV", sizeof (cdat->dstr_22__CLASS_OBJLOCV.val) - 1); cdat->dstr_22__CLASS_OBJLOCV.val[13] = (char) 0; cdat->dstr_22__CLASS_OBJLOCV.slen = 13; /*inimult dtup_23__CLASS_OBJLOCV */ /*_.VALTUP___V192*/ meltfptr[191] = (melt_ptr_t) & cdat->dtup_23__CLASS_OBJLOCV; cdat->dtup_23__CLASS_OBJLOCV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_23__CLASS_OBJLOCV.nbval = 4; /*inimult dtup_24__CLASS_OBJLOCV */ /*_.VALTUP___V199*/ meltfptr[198] = (melt_ptr_t) & cdat->dtup_24__CLASS_OBJLOCV; cdat->dtup_24__CLASS_OBJLOCV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_24__CLASS_OBJLOCV.nbval = 4; /*iniobj dsym_25__OBL_OFF*/ /*uniqueobj*/ if (! /*_.VALDATA___V200*/ meltfptr[199]) /*_.VALDATA___V200*/ meltfptr[199] = (melt_ptr_t) & cdat->dsym_25__OBL_OFF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_25__OBL_OFF", melt_magic_discr ((melt_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__OBL_OFF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_25__OBL_OFF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_25__OBL_OFF.obj_hash = 452398508; cdat->dsym_25__OBL_OFF.obj_len = 3; /*inistring dstr_26__OBL_OFF*/ /*_.VALSTR___V201*/ meltfptr[200] = (melt_ptr_t) & cdat->dstr_26__OBL_OFF; cdat->dstr_26__OBL_OFF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_26__OBL_OFF.val, "OBL_OFF", sizeof (cdat->dstr_26__OBL_OFF.val) - 1); cdat->dstr_26__OBL_OFF.val[7] = (char) 0; cdat->dstr_26__OBL_OFF.slen = 7; /*^iniobj */ /*iniobj dobj_27__OBL_OFF*/ /*_.VALDATA___V193*/ meltfptr[192] = (melt_ptr_t) & cdat->dobj_27__OBL_OFF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_27__OBL_OFF", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_27__OBL_OFF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_27__OBL_OFF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_27__OBL_OFF.obj_num = 1; cdat->dobj_27__OBL_OFF.obj_hash = 327311989; cdat->dobj_27__OBL_OFF.obj_len = 4; /*inistring dstr_28__OBL_OFF*/ /*_.VALSTR___V194*/ meltfptr[193] = (melt_ptr_t) & cdat->dstr_28__OBL_OFF; cdat->dstr_28__OBL_OFF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_28__OBL_OFF.val, "OBL_OFF", sizeof (cdat->dstr_28__OBL_OFF.val) - 1); cdat->dstr_28__OBL_OFF.val[7] = (char) 0; cdat->dstr_28__OBL_OFF.slen = 7; /*iniobj dsym_29__OBL_PROC*/ /*uniqueobj*/ if (! /*_.VALDATA___V202*/ meltfptr[201]) /*_.VALDATA___V202*/ meltfptr[201] = (melt_ptr_t) & cdat->dsym_29__OBL_PROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_29__OBL_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_29__OBL_PROC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_29__OBL_PROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_29__OBL_PROC.obj_hash = 397032469; cdat->dsym_29__OBL_PROC.obj_len = 3; /*inistring dstr_30__OBL_PROC*/ /*_.VALSTR___V203*/ meltfptr[202] = (melt_ptr_t) & cdat->dstr_30__OBL_PROC; cdat->dstr_30__OBL_PROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_30__OBL_PROC.val, "OBL_PROC", sizeof (cdat->dstr_30__OBL_PROC.val) - 1); cdat->dstr_30__OBL_PROC.val[8] = (char) 0; cdat->dstr_30__OBL_PROC.slen = 8; /*^iniobj */ /*iniobj dobj_31__OBL_PROC*/ /*_.VALDATA___V195*/ meltfptr[194] = (melt_ptr_t) & cdat->dobj_31__OBL_PROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_31__OBL_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_31__OBL_PROC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_31__OBL_PROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_31__OBL_PROC.obj_num = 2; cdat->dobj_31__OBL_PROC.obj_hash = 370914115; cdat->dobj_31__OBL_PROC.obj_len = 4; /*inistring dstr_32__OBL_PROC*/ /*_.VALSTR___V196*/ meltfptr[195] = (melt_ptr_t) & cdat->dstr_32__OBL_PROC; cdat->dstr_32__OBL_PROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_32__OBL_PROC.val, "OBL_PROC", sizeof (cdat->dstr_32__OBL_PROC.val) - 1); cdat->dstr_32__OBL_PROC.val[8] = (char) 0; cdat->dstr_32__OBL_PROC.slen = 8; /*iniobj dsym_33__OBL_CNAME*/ /*uniqueobj*/ if (! /*_.VALDATA___V204*/ meltfptr[203]) /*_.VALDATA___V204*/ meltfptr[203] = (melt_ptr_t) & cdat->dsym_33__OBL_CNAME; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_33__OBL_CNAME", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_33__OBL_CNAME", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_33__OBL_CNAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_33__OBL_CNAME.obj_hash = 1037789480; cdat->dsym_33__OBL_CNAME.obj_len = 3; /*inistring dstr_34__OBL_CNAME*/ /*_.VALSTR___V205*/ meltfptr[204] = (melt_ptr_t) & cdat->dstr_34__OBL_CNAME; cdat->dstr_34__OBL_CNAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_34__OBL_CNAME.val, "OBL_CNAME", sizeof (cdat->dstr_34__OBL_CNAME.val) - 1); cdat->dstr_34__OBL_CNAME.val[9] = (char) 0; cdat->dstr_34__OBL_CNAME.slen = 9; /*^iniobj */ /*iniobj dobj_35__OBL_CNAME*/ /*_.VALDATA___V197*/ meltfptr[196] = (melt_ptr_t) & cdat->dobj_35__OBL_CNAME; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_35__OBL_CNAME", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_35__OBL_CNAME", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_35__OBL_CNAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_35__OBL_CNAME.obj_num = 3; cdat->dobj_35__OBL_CNAME.obj_hash = 1025109673; cdat->dobj_35__OBL_CNAME.obj_len = 4; /*inistring dstr_36__OBL_CNAME*/ /*_.VALSTR___V198*/ meltfptr[197] = (melt_ptr_t) & cdat->dstr_36__OBL_CNAME; cdat->dstr_36__OBL_CNAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_36__OBL_CNAME.val, "OBL_CNAME", sizeof (cdat->dstr_36__OBL_CNAME.val) - 1); cdat->dstr_36__OBL_CNAME.val[9] = (char) 0; cdat->dstr_36__OBL_CNAME.slen = 9; /*iniobj dsym_37__CLASS_OBJCLOCCV*/ /*uniqueobj*/ if (! /*_.VALDATA___V206*/ meltfptr[205]) /*_.VALDATA___V206*/ meltfptr[205] = (melt_ptr_t) & cdat->dsym_37__CLASS_OBJCLOCCV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_37__CLASS_OBJCLOCCV", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_37__CLASS_OBJCLOCCV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_37__CLASS_OBJCLOCCV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_37__CLASS_OBJCLOCCV.obj_hash = 195863179; cdat->dsym_37__CLASS_OBJCLOCCV.obj_len = 3; /*inistring dstr_38__CLASS_OBJCLOCCV*/ /*_.VALSTR___V207*/ meltfptr[206] = (melt_ptr_t) & cdat->dstr_38__CLASS_OBJCLOCCV; cdat->dstr_38__CLASS_OBJCLOCCV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_38__CLASS_OBJCLOCCV.val, "CLASS_OBJCLOCCV", sizeof (cdat->dstr_38__CLASS_OBJCLOCCV.val) - 1); cdat->dstr_38__CLASS_OBJCLOCCV.val[15] = (char) 0; cdat->dstr_38__CLASS_OBJCLOCCV.slen = 15; MELT_LOCATION ("warmelt-genobj.melt:59:/ iniobj"); /*iniobj dobj_39__CLASS_OBJCLOCCV*/ /*_.VALDATA___V208*/ meltfptr[207] = (melt_ptr_t) & cdat->dobj_39__CLASS_OBJCLOCCV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_39__CLASS_OBJCLOCCV", 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_39__CLASS_OBJCLOCCV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_39__CLASS_OBJCLOCCV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_39__CLASS_OBJCLOCCV.obj_num = MELTOBMAG_OBJECT; cdat->dobj_39__CLASS_OBJCLOCCV.obj_hash = 474988376; cdat->dobj_39__CLASS_OBJCLOCCV.obj_len = 8; /*inistring dstr_40__CLASS_OBJCLOCCV*/ /*_.VALSTR___V209*/ meltfptr[208] = (melt_ptr_t) & cdat->dstr_40__CLASS_OBJCLOCCV; cdat->dstr_40__CLASS_OBJCLOCCV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_40__CLASS_OBJCLOCCV.val, "CLASS_OBJCLOCCV", sizeof (cdat->dstr_40__CLASS_OBJCLOCCV.val) - 1); cdat->dstr_40__CLASS_OBJCLOCCV.val[15] = (char) 0; cdat->dstr_40__CLASS_OBJCLOCCV.slen = 15; /*inimult dtup_41__CLASS_OBJCLOCCV */ /*_.VALTUP___V210*/ meltfptr[209] = (melt_ptr_t) & cdat->dtup_41__CLASS_OBJCLOCCV; cdat->dtup_41__CLASS_OBJCLOCCV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_41__CLASS_OBJCLOCCV.nbval = 4; /*inimult dtup_42__CLASS_OBJCLOCCV */ /*_.VALTUP___V217*/ meltfptr[216] = (melt_ptr_t) & cdat->dtup_42__CLASS_OBJCLOCCV; cdat->dtup_42__CLASS_OBJCLOCCV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_42__CLASS_OBJCLOCCV.nbval = 4; /*iniobj dsym_43__OBC_OFF*/ /*uniqueobj*/ if (! /*_.VALDATA___V218*/ meltfptr[217]) /*_.VALDATA___V218*/ meltfptr[217] = (melt_ptr_t) & cdat->dsym_43__OBC_OFF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_43__OBC_OFF", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_43__OBC_OFF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_43__OBC_OFF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_43__OBC_OFF.obj_hash = 258307413; cdat->dsym_43__OBC_OFF.obj_len = 3; /*inistring dstr_44__OBC_OFF*/ /*_.VALSTR___V219*/ meltfptr[218] = (melt_ptr_t) & cdat->dstr_44__OBC_OFF; cdat->dstr_44__OBC_OFF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_44__OBC_OFF.val, "OBC_OFF", sizeof (cdat->dstr_44__OBC_OFF.val) - 1); cdat->dstr_44__OBC_OFF.val[7] = (char) 0; cdat->dstr_44__OBC_OFF.slen = 7; /*^iniobj */ /*iniobj dobj_45__OBC_OFF*/ /*_.VALDATA___V211*/ meltfptr[210] = (melt_ptr_t) & cdat->dobj_45__OBC_OFF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_45__OBC_OFF", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_45__OBC_OFF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_45__OBC_OFF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_45__OBC_OFF.obj_num = 1; cdat->dobj_45__OBC_OFF.obj_hash = 325505911; cdat->dobj_45__OBC_OFF.obj_len = 4; /*inistring dstr_46__OBC_OFF*/ /*_.VALSTR___V212*/ meltfptr[211] = (melt_ptr_t) & cdat->dstr_46__OBC_OFF; cdat->dstr_46__OBC_OFF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_46__OBC_OFF.val, "OBC_OFF", sizeof (cdat->dstr_46__OBC_OFF.val) - 1); cdat->dstr_46__OBC_OFF.val[7] = (char) 0; cdat->dstr_46__OBC_OFF.slen = 7; /*iniobj dsym_47__OBC_PROC*/ /*uniqueobj*/ if (! /*_.VALDATA___V220*/ meltfptr[219]) /*_.VALDATA___V220*/ meltfptr[219] = (melt_ptr_t) & cdat->dsym_47__OBC_PROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_47__OBC_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_47__OBC_PROC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_47__OBC_PROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_47__OBC_PROC.obj_hash = 835315740; cdat->dsym_47__OBC_PROC.obj_len = 3; /*inistring dstr_48__OBC_PROC*/ /*_.VALSTR___V221*/ meltfptr[220] = (melt_ptr_t) & cdat->dstr_48__OBC_PROC; cdat->dstr_48__OBC_PROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_48__OBC_PROC.val, "OBC_PROC", sizeof (cdat->dstr_48__OBC_PROC.val) - 1); cdat->dstr_48__OBC_PROC.val[8] = (char) 0; cdat->dstr_48__OBC_PROC.slen = 8; /*^iniobj */ /*iniobj dobj_49__OBC_PROC*/ /*_.VALDATA___V213*/ meltfptr[212] = (melt_ptr_t) & cdat->dobj_49__OBC_PROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_49__OBC_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_49__OBC_PROC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_49__OBC_PROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_49__OBC_PROC.obj_num = 2; cdat->dobj_49__OBC_PROC.obj_hash = 577226469; cdat->dobj_49__OBC_PROC.obj_len = 4; /*inistring dstr_50__OBC_PROC*/ /*_.VALSTR___V214*/ meltfptr[213] = (melt_ptr_t) & cdat->dstr_50__OBC_PROC; cdat->dstr_50__OBC_PROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_50__OBC_PROC.val, "OBC_PROC", sizeof (cdat->dstr_50__OBC_PROC.val) - 1); cdat->dstr_50__OBC_PROC.val[8] = (char) 0; cdat->dstr_50__OBC_PROC.slen = 8; /*iniobj dsym_51__OBC_NAME*/ /*uniqueobj*/ if (! /*_.VALDATA___V222*/ meltfptr[221]) /*_.VALDATA___V222*/ meltfptr[221] = (melt_ptr_t) & cdat->dsym_51__OBC_NAME; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_51__OBC_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_51__OBC_NAME", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_51__OBC_NAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_51__OBC_NAME.obj_hash = 376794807; cdat->dsym_51__OBC_NAME.obj_len = 3; /*inistring dstr_52__OBC_NAME*/ /*_.VALSTR___V223*/ meltfptr[222] = (melt_ptr_t) & cdat->dstr_52__OBC_NAME; cdat->dstr_52__OBC_NAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_52__OBC_NAME.val, "OBC_NAME", sizeof (cdat->dstr_52__OBC_NAME.val) - 1); cdat->dstr_52__OBC_NAME.val[8] = (char) 0; cdat->dstr_52__OBC_NAME.slen = 8; /*^iniobj */ /*iniobj dobj_53__OBC_NAME*/ /*_.VALDATA___V215*/ meltfptr[214] = (melt_ptr_t) & cdat->dobj_53__OBC_NAME; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_53__OBC_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_53__OBC_NAME", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_53__OBC_NAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_53__OBC_NAME.obj_num = 3; cdat->dobj_53__OBC_NAME.obj_hash = 35090996; cdat->dobj_53__OBC_NAME.obj_len = 4; /*inistring dstr_54__OBC_NAME*/ /*_.VALSTR___V216*/ meltfptr[215] = (melt_ptr_t) & cdat->dstr_54__OBC_NAME; cdat->dstr_54__OBC_NAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_54__OBC_NAME.val, "OBC_NAME", sizeof (cdat->dstr_54__OBC_NAME.val) - 1); cdat->dstr_54__OBC_NAME.val[8] = (char) 0; cdat->dstr_54__OBC_NAME.slen = 8; /*iniobj dsym_55__CLASS_OBJCONSTV*/ /*uniqueobj*/ if (! /*_.VALDATA___V224*/ meltfptr[223]) /*_.VALDATA___V224*/ meltfptr[223] = (melt_ptr_t) & cdat->dsym_55__CLASS_OBJCONSTV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_55__CLASS_OBJCONSTV", melt_magic_discr ((melt_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_OBJCONSTV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_55__CLASS_OBJCONSTV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_55__CLASS_OBJCONSTV.obj_hash = 125371776; cdat->dsym_55__CLASS_OBJCONSTV.obj_len = 3; /*inistring dstr_56__CLASS_OBJCONSTV*/ /*_.VALSTR___V225*/ meltfptr[224] = (melt_ptr_t) & cdat->dstr_56__CLASS_OBJCONSTV; cdat->dstr_56__CLASS_OBJCONSTV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_56__CLASS_OBJCONSTV.val, "CLASS_OBJCONSTV", sizeof (cdat->dstr_56__CLASS_OBJCONSTV.val) - 1); cdat->dstr_56__CLASS_OBJCONSTV.val[15] = (char) 0; cdat->dstr_56__CLASS_OBJCONSTV.slen = 15; MELT_LOCATION ("warmelt-genobj.melt:68:/ iniobj"); /*iniobj dobj_57__CLASS_OBJCONSTV*/ /*_.VALDATA___V226*/ meltfptr[225] = (melt_ptr_t) & cdat->dobj_57__CLASS_OBJCONSTV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_57__CLASS_OBJCONSTV", 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_OBJCONSTV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_57__CLASS_OBJCONSTV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_57__CLASS_OBJCONSTV.obj_num = MELTOBMAG_OBJECT; cdat->dobj_57__CLASS_OBJCONSTV.obj_hash = 362228473; cdat->dobj_57__CLASS_OBJCONSTV.obj_len = 8; /*inistring dstr_58__CLASS_OBJCONSTV*/ /*_.VALSTR___V227*/ meltfptr[226] = (melt_ptr_t) & cdat->dstr_58__CLASS_OBJCONSTV; cdat->dstr_58__CLASS_OBJCONSTV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_58__CLASS_OBJCONSTV.val, "CLASS_OBJCONSTV", sizeof (cdat->dstr_58__CLASS_OBJCONSTV.val) - 1); cdat->dstr_58__CLASS_OBJCONSTV.val[15] = (char) 0; cdat->dstr_58__CLASS_OBJCONSTV.slen = 15; /*inimult dtup_59__CLASS_OBJCONSTV */ /*_.VALTUP___V228*/ meltfptr[227] = (melt_ptr_t) & cdat->dtup_59__CLASS_OBJCONSTV; cdat->dtup_59__CLASS_OBJCONSTV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_59__CLASS_OBJCONSTV.nbval = 5; /*inimult dtup_60__CLASS_OBJCONSTV */ /*_.VALTUP___V229*/ meltfptr[228] = (melt_ptr_t) & cdat->dtup_60__CLASS_OBJCONSTV; cdat->dtup_60__CLASS_OBJCONSTV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_60__CLASS_OBJCONSTV.nbval = 4; /*iniobj dsym_61__CLASS_OBJPREDEF*/ /*uniqueobj*/ if (! /*_.VALDATA___V230*/ meltfptr[229]) /*_.VALDATA___V230*/ meltfptr[229] = (melt_ptr_t) & cdat->dsym_61__CLASS_OBJPREDEF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_61__CLASS_OBJPREDEF", melt_magic_discr ((melt_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__CLASS_OBJPREDEF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_61__CLASS_OBJPREDEF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_61__CLASS_OBJPREDEF.obj_hash = 416230155; cdat->dsym_61__CLASS_OBJPREDEF.obj_len = 3; /*inistring dstr_62__CLASS_OBJPREDEF*/ /*_.VALSTR___V231*/ meltfptr[230] = (melt_ptr_t) & cdat->dstr_62__CLASS_OBJPREDEF; cdat->dstr_62__CLASS_OBJPREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_62__CLASS_OBJPREDEF.val, "CLASS_OBJPREDEF", sizeof (cdat->dstr_62__CLASS_OBJPREDEF.val) - 1); cdat->dstr_62__CLASS_OBJPREDEF.val[15] = (char) 0; cdat->dstr_62__CLASS_OBJPREDEF.slen = 15; MELT_LOCATION ("warmelt-genobj.melt:74:/ iniobj"); /*iniobj dobj_63__CLASS_OBJPREDEF*/ /*_.VALDATA___V232*/ meltfptr[231] = (melt_ptr_t) & cdat->dobj_63__CLASS_OBJPREDEF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_63__CLASS_OBJPREDEF", 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_63__CLASS_OBJPREDEF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_63__CLASS_OBJPREDEF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_63__CLASS_OBJPREDEF.obj_num = MELTOBMAG_OBJECT; cdat->dobj_63__CLASS_OBJPREDEF.obj_hash = 1034914466; cdat->dobj_63__CLASS_OBJPREDEF.obj_len = 8; /*inistring dstr_64__CLASS_OBJPREDEF*/ /*_.VALSTR___V233*/ meltfptr[232] = (melt_ptr_t) & cdat->dstr_64__CLASS_OBJPREDEF; cdat->dstr_64__CLASS_OBJPREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_64__CLASS_OBJPREDEF.val, "CLASS_OBJPREDEF", sizeof (cdat->dstr_64__CLASS_OBJPREDEF.val) - 1); cdat->dstr_64__CLASS_OBJPREDEF.val[15] = (char) 0; cdat->dstr_64__CLASS_OBJPREDEF.slen = 15; /*inimult dtup_65__CLASS_OBJPREDEF */ /*_.VALTUP___V234*/ meltfptr[233] = (melt_ptr_t) & cdat->dtup_65__CLASS_OBJPREDEF; cdat->dtup_65__CLASS_OBJPREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_65__CLASS_OBJPREDEF.nbval = 4; /*inimult dtup_66__CLASS_OBJPREDEF */ /*_.VALTUP___V237*/ meltfptr[236] = (melt_ptr_t) & cdat->dtup_66__CLASS_OBJPREDEF; cdat->dtup_66__CLASS_OBJPREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_66__CLASS_OBJPREDEF.nbval = 2; /*iniobj dsym_67__OBPREDEF*/ /*uniqueobj*/ if (! /*_.VALDATA___V238*/ meltfptr[237]) /*_.VALDATA___V238*/ meltfptr[237] = (melt_ptr_t) & cdat->dsym_67__OBPREDEF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_67__OBPREDEF", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_67__OBPREDEF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_67__OBPREDEF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_67__OBPREDEF.obj_hash = 465714734; cdat->dsym_67__OBPREDEF.obj_len = 3; /*inistring dstr_68__OBPREDEF*/ /*_.VALSTR___V239*/ meltfptr[238] = (melt_ptr_t) & cdat->dstr_68__OBPREDEF; cdat->dstr_68__OBPREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_68__OBPREDEF.val, "OBPREDEF", sizeof (cdat->dstr_68__OBPREDEF.val) - 1); cdat->dstr_68__OBPREDEF.val[8] = (char) 0; cdat->dstr_68__OBPREDEF.slen = 8; /*^iniobj */ /*iniobj dobj_69__OBPREDEF*/ /*_.VALDATA___V235*/ meltfptr[234] = (melt_ptr_t) & cdat->dobj_69__OBPREDEF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_69__OBPREDEF", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_69__OBPREDEF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_69__OBPREDEF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_69__OBPREDEF.obj_num = 1; cdat->dobj_69__OBPREDEF.obj_hash = 344767974; cdat->dobj_69__OBPREDEF.obj_len = 4; /*inistring dstr_70__OBPREDEF*/ /*_.VALSTR___V236*/ meltfptr[235] = (melt_ptr_t) & cdat->dstr_70__OBPREDEF; cdat->dstr_70__OBPREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_70__OBPREDEF.val, "OBPREDEF", sizeof (cdat->dstr_70__OBPREDEF.val) - 1); cdat->dstr_70__OBPREDEF.val[8] = (char) 0; cdat->dstr_70__OBPREDEF.slen = 8; /*iniobj dsym_71__CLASS_OBJNIL*/ /*uniqueobj*/ if (! /*_.VALDATA___V240*/ meltfptr[239]) /*_.VALDATA___V240*/ meltfptr[239] = (melt_ptr_t) & cdat->dsym_71__CLASS_OBJNIL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_71__CLASS_OBJNIL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_71__CLASS_OBJNIL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_71__CLASS_OBJNIL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_71__CLASS_OBJNIL.obj_hash = 621637507; cdat->dsym_71__CLASS_OBJNIL.obj_len = 3; /*inistring dstr_72__CLASS_OBJNIL*/ /*_.VALSTR___V241*/ meltfptr[240] = (melt_ptr_t) & cdat->dstr_72__CLASS_OBJNIL; cdat->dstr_72__CLASS_OBJNIL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_72__CLASS_OBJNIL.val, "CLASS_OBJNIL", sizeof (cdat->dstr_72__CLASS_OBJNIL.val) - 1); cdat->dstr_72__CLASS_OBJNIL.val[12] = (char) 0; cdat->dstr_72__CLASS_OBJNIL.slen = 12; MELT_LOCATION ("warmelt-genobj.melt:80:/ iniobj"); /*iniobj dobj_73__CLASS_OBJNIL*/ /*_.VALDATA___V242*/ meltfptr[241] = (melt_ptr_t) & cdat->dobj_73__CLASS_OBJNIL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_73__CLASS_OBJNIL", 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_73__CLASS_OBJNIL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_73__CLASS_OBJNIL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_73__CLASS_OBJNIL.obj_num = MELTOBMAG_OBJECT; cdat->dobj_73__CLASS_OBJNIL.obj_hash = 165455718; cdat->dobj_73__CLASS_OBJNIL.obj_len = 8; /*inistring dstr_74__CLASS_OBJNIL*/ /*_.VALSTR___V243*/ meltfptr[242] = (melt_ptr_t) & cdat->dstr_74__CLASS_OBJNIL; cdat->dstr_74__CLASS_OBJNIL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_74__CLASS_OBJNIL.val, "CLASS_OBJNIL", sizeof (cdat->dstr_74__CLASS_OBJNIL.val) - 1); cdat->dstr_74__CLASS_OBJNIL.val[12] = (char) 0; cdat->dstr_74__CLASS_OBJNIL.slen = 12; /*inimult dtup_75__CLASS_OBJNIL */ /*_.VALTUP___V244*/ meltfptr[243] = (melt_ptr_t) & cdat->dtup_75__CLASS_OBJNIL; cdat->dtup_75__CLASS_OBJNIL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_75__CLASS_OBJNIL.nbval = 4; /*inimult dtup_76__CLASS_OBJNIL */ /*_.VALTUP___V245*/ meltfptr[244] = (melt_ptr_t) & cdat->dtup_76__CLASS_OBJNIL; cdat->dtup_76__CLASS_OBJNIL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_76__CLASS_OBJNIL.nbval = 1; /*iniobj dsym_77__CLASS_OBJEXPANDPUREVAL*/ /*uniqueobj*/ if (! /*_.VALDATA___V246*/ meltfptr[245]) /*_.VALDATA___V246*/ meltfptr[245] = (melt_ptr_t) & cdat->dsym_77__CLASS_OBJEXPANDPUREVAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_77__CLASS_OBJEXPANDPUREVAL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_77__CLASS_OBJEXPANDPUREVAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_77__CLASS_OBJEXPANDPUREVAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_77__CLASS_OBJEXPANDPUREVAL.obj_hash = 243006452; cdat->dsym_77__CLASS_OBJEXPANDPUREVAL.obj_len = 3; /*inistring dstr_78__CLASS_OBJEXPANDP*/ /*_.VALSTR___V247*/ meltfptr[246] = (melt_ptr_t) & cdat->dstr_78__CLASS_OBJEXPANDP; cdat->dstr_78__CLASS_OBJEXPANDP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_78__CLASS_OBJEXPANDP.val, "CLASS_OBJEXPANDPUREVAL", sizeof (cdat->dstr_78__CLASS_OBJEXPANDP.val) - 1); cdat->dstr_78__CLASS_OBJEXPANDP.val[22] = (char) 0; cdat->dstr_78__CLASS_OBJEXPANDP.slen = 22; MELT_LOCATION ("warmelt-genobj.melt:85:/ iniobj"); /*iniobj dobj_79__CLASS_OBJEXPANDPUREVAL*/ /*_.VALDATA___V248*/ meltfptr[247] = (melt_ptr_t) & cdat->dobj_79__CLASS_OBJEXPANDPUREVAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_79__CLASS_OBJEXPANDPUREVAL", 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_79__CLASS_OBJEXPANDPUREVAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_79__CLASS_OBJEXPANDPUREVAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_79__CLASS_OBJEXPANDPUREVAL.obj_num = MELTOBMAG_OBJECT; cdat->dobj_79__CLASS_OBJEXPANDPUREVAL.obj_hash = 575447722; cdat->dobj_79__CLASS_OBJEXPANDPUREVAL.obj_len = 8; /*inistring dstr_80__CLASS_OBJEXPANDP*/ /*_.VALSTR___V249*/ meltfptr[248] = (melt_ptr_t) & cdat->dstr_80__CLASS_OBJEXPANDP; cdat->dstr_80__CLASS_OBJEXPANDP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_80__CLASS_OBJEXPANDP.val, "CLASS_OBJEXPANDPUREVAL", sizeof (cdat->dstr_80__CLASS_OBJEXPANDP.val) - 1); cdat->dstr_80__CLASS_OBJEXPANDP.val[22] = (char) 0; cdat->dstr_80__CLASS_OBJEXPANDP.slen = 22; /*inimult dtup_81__CLASS_OBJEXPANDPUREVAL */ /*_.VALTUP___V250*/ meltfptr[249] = (melt_ptr_t) & cdat->dtup_81__CLASS_OBJEXPANDPUREVAL; cdat->dtup_81__CLASS_OBJEXPANDPUREVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_81__CLASS_OBJEXPANDPUREVAL.nbval = 4; /*inimult dtup_82__CLASS_OBJEXPANDPUREVAL */ /*_.VALTUP___V257*/ meltfptr[256] = (melt_ptr_t) & cdat->dtup_82__CLASS_OBJEXPANDPUREVAL; cdat->dtup_82__CLASS_OBJEXPANDPUREVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_82__CLASS_OBJEXPANDPUREVAL.nbval = 4; /*iniobj dsym_83__OXPURVAL_LOC*/ /*uniqueobj*/ if (! /*_.VALDATA___V258*/ meltfptr[257]) /*_.VALDATA___V258*/ meltfptr[257] = (melt_ptr_t) & cdat->dsym_83__OXPURVAL_LOC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_83__OXPURVAL_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_83__OXPURVAL_LOC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_83__OXPURVAL_LOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_83__OXPURVAL_LOC.obj_hash = 938998935; cdat->dsym_83__OXPURVAL_LOC.obj_len = 3; /*inistring dstr_84__OXPURVAL_LOC*/ /*_.VALSTR___V259*/ meltfptr[258] = (melt_ptr_t) & cdat->dstr_84__OXPURVAL_LOC; cdat->dstr_84__OXPURVAL_LOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_84__OXPURVAL_LOC.val, "OXPURVAL_LOC", sizeof (cdat->dstr_84__OXPURVAL_LOC.val) - 1); cdat->dstr_84__OXPURVAL_LOC.val[12] = (char) 0; cdat->dstr_84__OXPURVAL_LOC.slen = 12; /*^iniobj */ /*iniobj dobj_85__OXPURVAL_LOC*/ /*_.VALDATA___V251*/ meltfptr[250] = (melt_ptr_t) & cdat->dobj_85__OXPURVAL_LOC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_85__OXPURVAL_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_85__OXPURVAL_LOC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_85__OXPURVAL_LOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_85__OXPURVAL_LOC.obj_num = 1; cdat->dobj_85__OXPURVAL_LOC.obj_hash = 188098809; cdat->dobj_85__OXPURVAL_LOC.obj_len = 4; /*inistring dstr_86__OXPURVAL_LOC*/ /*_.VALSTR___V252*/ meltfptr[251] = (melt_ptr_t) & cdat->dstr_86__OXPURVAL_LOC; cdat->dstr_86__OXPURVAL_LOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_86__OXPURVAL_LOC.val, "OXPURVAL_LOC", sizeof (cdat->dstr_86__OXPURVAL_LOC.val) - 1); cdat->dstr_86__OXPURVAL_LOC.val[12] = (char) 0; cdat->dstr_86__OXPURVAL_LOC.slen = 12; /*iniobj dsym_87__OXPURVAL_COMM*/ /*uniqueobj*/ if (! /*_.VALDATA___V260*/ meltfptr[259]) /*_.VALDATA___V260*/ meltfptr[259] = (melt_ptr_t) & cdat->dsym_87__OXPURVAL_COMM; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_87__OXPURVAL_COMM", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_87__OXPURVAL_COMM", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_87__OXPURVAL_COMM.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_87__OXPURVAL_COMM.obj_hash = 876511038; cdat->dsym_87__OXPURVAL_COMM.obj_len = 3; /*inistring dstr_88__OXPURVAL_COMM*/ /*_.VALSTR___V261*/ meltfptr[260] = (melt_ptr_t) & cdat->dstr_88__OXPURVAL_COMM; cdat->dstr_88__OXPURVAL_COMM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_88__OXPURVAL_COMM.val, "OXPURVAL_COMM", sizeof (cdat->dstr_88__OXPURVAL_COMM.val) - 1); cdat->dstr_88__OXPURVAL_COMM.val[13] = (char) 0; cdat->dstr_88__OXPURVAL_COMM.slen = 13; /*^iniobj */ /*iniobj dobj_89__OXPURVAL_COMM*/ /*_.VALDATA___V253*/ meltfptr[252] = (melt_ptr_t) & cdat->dobj_89__OXPURVAL_COMM; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_89__OXPURVAL_COMM", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_89__OXPURVAL_COMM", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_89__OXPURVAL_COMM.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_89__OXPURVAL_COMM.obj_num = 2; cdat->dobj_89__OXPURVAL_COMM.obj_hash = 549973568; cdat->dobj_89__OXPURVAL_COMM.obj_len = 4; /*inistring dstr_90__OXPURVAL_COMM*/ /*_.VALSTR___V254*/ meltfptr[253] = (melt_ptr_t) & cdat->dstr_90__OXPURVAL_COMM; cdat->dstr_90__OXPURVAL_COMM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_90__OXPURVAL_COMM.val, "OXPURVAL_COMM", sizeof (cdat->dstr_90__OXPURVAL_COMM.val) - 1); cdat->dstr_90__OXPURVAL_COMM.val[13] = (char) 0; cdat->dstr_90__OXPURVAL_COMM.slen = 13; /*iniobj dsym_91__OXPURVAL_CONT*/ /*uniqueobj*/ if (! /*_.VALDATA___V262*/ meltfptr[261]) /*_.VALDATA___V262*/ meltfptr[261] = (melt_ptr_t) & cdat->dsym_91__OXPURVAL_CONT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_91__OXPURVAL_CONT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_91__OXPURVAL_CONT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_91__OXPURVAL_CONT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_91__OXPURVAL_CONT.obj_hash = 151964891; cdat->dsym_91__OXPURVAL_CONT.obj_len = 3; /*inistring dstr_92__OXPURVAL_CONT*/ /*_.VALSTR___V263*/ meltfptr[262] = (melt_ptr_t) & cdat->dstr_92__OXPURVAL_CONT; cdat->dstr_92__OXPURVAL_CONT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_92__OXPURVAL_CONT.val, "OXPURVAL_CONT", sizeof (cdat->dstr_92__OXPURVAL_CONT.val) - 1); cdat->dstr_92__OXPURVAL_CONT.val[13] = (char) 0; cdat->dstr_92__OXPURVAL_CONT.slen = 13; /*^iniobj */ /*iniobj dobj_93__OXPURVAL_CONT*/ /*_.VALDATA___V255*/ meltfptr[254] = (melt_ptr_t) & cdat->dobj_93__OXPURVAL_CONT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_93__OXPURVAL_CONT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_93__OXPURVAL_CONT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_93__OXPURVAL_CONT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_93__OXPURVAL_CONT.obj_num = 3; cdat->dobj_93__OXPURVAL_CONT.obj_hash = 533672904; cdat->dobj_93__OXPURVAL_CONT.obj_len = 4; /*inistring dstr_94__OXPURVAL_CONT*/ /*_.VALSTR___V256*/ meltfptr[255] = (melt_ptr_t) & cdat->dstr_94__OXPURVAL_CONT; cdat->dstr_94__OXPURVAL_CONT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_94__OXPURVAL_CONT.val, "OXPURVAL_CONT", sizeof (cdat->dstr_94__OXPURVAL_CONT.val) - 1); cdat->dstr_94__OXPURVAL_CONT.val[13] = (char) 0; cdat->dstr_94__OXPURVAL_CONT.slen = 13; /*iniobj dsym_95__CLASS_OBJINITELEM*/ /*uniqueobj*/ if (! /*_.VALDATA___V264*/ meltfptr[263]) /*_.VALDATA___V264*/ meltfptr[263] = (melt_ptr_t) & cdat->dsym_95__CLASS_OBJINITELEM; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_95__CLASS_OBJINITELEM", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_95__CLASS_OBJINITELEM", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_95__CLASS_OBJINITELEM.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_95__CLASS_OBJINITELEM.obj_hash = 129631203; cdat->dsym_95__CLASS_OBJINITELEM.obj_len = 3; /*inistring dstr_96__CLASS_OBJINITELE*/ /*_.VALSTR___V265*/ meltfptr[264] = (melt_ptr_t) & cdat->dstr_96__CLASS_OBJINITELE; cdat->dstr_96__CLASS_OBJINITELE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_96__CLASS_OBJINITELE.val, "CLASS_OBJINITELEM", sizeof (cdat->dstr_96__CLASS_OBJINITELE.val) - 1); cdat->dstr_96__CLASS_OBJINITELE.val[17] = (char) 0; cdat->dstr_96__CLASS_OBJINITELE.slen = 17; MELT_LOCATION ("warmelt-genobj.melt:93:/ iniobj"); /*iniobj dobj_97__CLASS_OBJINITELEM*/ /*_.VALDATA___V266*/ meltfptr[265] = (melt_ptr_t) & cdat->dobj_97__CLASS_OBJINITELEM; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_97__CLASS_OBJINITELEM", 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_97__CLASS_OBJINITELEM", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_97__CLASS_OBJINITELEM.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_97__CLASS_OBJINITELEM.obj_num = MELTOBMAG_OBJECT; cdat->dobj_97__CLASS_OBJINITELEM.obj_hash = 491286486; cdat->dobj_97__CLASS_OBJINITELEM.obj_len = 8; /*inistring dstr_98__CLASS_OBJINITELE*/ /*_.VALSTR___V267*/ meltfptr[266] = (melt_ptr_t) & cdat->dstr_98__CLASS_OBJINITELE; cdat->dstr_98__CLASS_OBJINITELE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_98__CLASS_OBJINITELE.val, "CLASS_OBJINITELEM", sizeof (cdat->dstr_98__CLASS_OBJINITELE.val) - 1); cdat->dstr_98__CLASS_OBJINITELE.val[17] = (char) 0; cdat->dstr_98__CLASS_OBJINITELE.slen = 17; /*inimult dtup_99__CLASS_OBJINITELEM */ /*_.VALTUP___V268*/ meltfptr[267] = (melt_ptr_t) & cdat->dtup_99__CLASS_OBJINITELEM; cdat->dtup_99__CLASS_OBJINITELEM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_99__CLASS_OBJINITELEM.nbval = 4; /*inimult dtup_100__CLASS_OBJINITELEM */ /*_.VALTUP___V277*/ meltfptr[276] = (melt_ptr_t) & cdat->dtup_100__CLASS_OBJINITELEM; cdat->dtup_100__CLASS_OBJINITELEM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_100__CLASS_OBJINITELEM.nbval = 5; /*iniobj dsym_101__OIE_CNAME*/ /*uniqueobj*/ if (! /*_.VALDATA___V278*/ meltfptr[277]) /*_.VALDATA___V278*/ meltfptr[277] = (melt_ptr_t) & cdat->dsym_101__OIE_CNAME; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_101__OIE_CNAME", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_101__OIE_CNAME", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_101__OIE_CNAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_101__OIE_CNAME.obj_hash = 681239945; cdat->dsym_101__OIE_CNAME.obj_len = 3; /*inistring dstr_102__OIE_CNAME*/ /*_.VALSTR___V279*/ meltfptr[278] = (melt_ptr_t) & cdat->dstr_102__OIE_CNAME; cdat->dstr_102__OIE_CNAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_102__OIE_CNAME.val, "OIE_CNAME", sizeof (cdat->dstr_102__OIE_CNAME.val) - 1); cdat->dstr_102__OIE_CNAME.val[9] = (char) 0; cdat->dstr_102__OIE_CNAME.slen = 9; /*^iniobj */ /*iniobj dobj_103__OIE_CNAME*/ /*_.VALDATA___V269*/ meltfptr[268] = (melt_ptr_t) & cdat->dobj_103__OIE_CNAME; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_103__OIE_CNAME", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_103__OIE_CNAME", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_103__OIE_CNAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_103__OIE_CNAME.obj_num = 1; cdat->dobj_103__OIE_CNAME.obj_hash = 107585325; cdat->dobj_103__OIE_CNAME.obj_len = 4; /*inistring dstr_104__OIE_CNAME*/ /*_.VALSTR___V270*/ meltfptr[269] = (melt_ptr_t) & cdat->dstr_104__OIE_CNAME; cdat->dstr_104__OIE_CNAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_104__OIE_CNAME.val, "OIE_CNAME", sizeof (cdat->dstr_104__OIE_CNAME.val) - 1); cdat->dstr_104__OIE_CNAME.val[9] = (char) 0; cdat->dstr_104__OIE_CNAME.slen = 9; /*iniobj dsym_105__OIE_DATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V280*/ meltfptr[279]) /*_.VALDATA___V280*/ meltfptr[279] = (melt_ptr_t) & cdat->dsym_105__OIE_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_105__OIE_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_105__OIE_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_105__OIE_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_105__OIE_DATA.obj_hash = 660720415; cdat->dsym_105__OIE_DATA.obj_len = 3; /*inistring dstr_106__OIE_DATA*/ /*_.VALSTR___V281*/ meltfptr[280] = (melt_ptr_t) & cdat->dstr_106__OIE_DATA; cdat->dstr_106__OIE_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_106__OIE_DATA.val, "OIE_DATA", sizeof (cdat->dstr_106__OIE_DATA.val) - 1); cdat->dstr_106__OIE_DATA.val[8] = (char) 0; cdat->dstr_106__OIE_DATA.slen = 8; /*^iniobj */ /*iniobj dobj_107__OIE_DATA*/ /*_.VALDATA___V271*/ meltfptr[270] = (melt_ptr_t) & cdat->dobj_107__OIE_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_107__OIE_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_107__OIE_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_107__OIE_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_107__OIE_DATA.obj_num = 2; cdat->dobj_107__OIE_DATA.obj_hash = 295302237; cdat->dobj_107__OIE_DATA.obj_len = 4; /*inistring dstr_108__OIE_DATA*/ /*_.VALSTR___V272*/ meltfptr[271] = (melt_ptr_t) & cdat->dstr_108__OIE_DATA; cdat->dstr_108__OIE_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_108__OIE_DATA.val, "OIE_DATA", sizeof (cdat->dstr_108__OIE_DATA.val) - 1); cdat->dstr_108__OIE_DATA.val[8] = (char) 0; cdat->dstr_108__OIE_DATA.slen = 8; /*iniobj dsym_109__OIE_DISCR*/ /*uniqueobj*/ if (! /*_.VALDATA___V282*/ meltfptr[281]) /*_.VALDATA___V282*/ meltfptr[281] = (melt_ptr_t) & cdat->dsym_109__OIE_DISCR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_109__OIE_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_109__OIE_DISCR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_109__OIE_DISCR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_109__OIE_DISCR.obj_hash = 281892028; cdat->dsym_109__OIE_DISCR.obj_len = 3; /*inistring dstr_110__OIE_DISCR*/ /*_.VALSTR___V283*/ meltfptr[282] = (melt_ptr_t) & cdat->dstr_110__OIE_DISCR; cdat->dstr_110__OIE_DISCR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_110__OIE_DISCR.val, "OIE_DISCR", sizeof (cdat->dstr_110__OIE_DISCR.val) - 1); cdat->dstr_110__OIE_DISCR.val[9] = (char) 0; cdat->dstr_110__OIE_DISCR.slen = 9; /*^iniobj */ /*iniobj dobj_111__OIE_DISCR*/ /*_.VALDATA___V273*/ meltfptr[272] = (melt_ptr_t) & cdat->dobj_111__OIE_DISCR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_111__OIE_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_111__OIE_DISCR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_111__OIE_DISCR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_111__OIE_DISCR.obj_num = 3; cdat->dobj_111__OIE_DISCR.obj_hash = 630619262; cdat->dobj_111__OIE_DISCR.obj_len = 4; /*inistring dstr_112__OIE_DISCR*/ /*_.VALSTR___V274*/ meltfptr[273] = (melt_ptr_t) & cdat->dstr_112__OIE_DISCR; cdat->dstr_112__OIE_DISCR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_112__OIE_DISCR.val, "OIE_DISCR", sizeof (cdat->dstr_112__OIE_DISCR.val) - 1); cdat->dstr_112__OIE_DISCR.val[9] = (char) 0; cdat->dstr_112__OIE_DISCR.slen = 9; /*iniobj dsym_113__OIE_LOCVAR*/ /*uniqueobj*/ if (! /*_.VALDATA___V284*/ meltfptr[283]) /*_.VALDATA___V284*/ meltfptr[283] = (melt_ptr_t) & cdat->dsym_113__OIE_LOCVAR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_113__OIE_LOCVAR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_113__OIE_LOCVAR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_113__OIE_LOCVAR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_113__OIE_LOCVAR.obj_hash = 500660715; cdat->dsym_113__OIE_LOCVAR.obj_len = 3; /*inistring dstr_114__OIE_LOCVAR*/ /*_.VALSTR___V285*/ meltfptr[284] = (melt_ptr_t) & cdat->dstr_114__OIE_LOCVAR; cdat->dstr_114__OIE_LOCVAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_114__OIE_LOCVAR.val, "OIE_LOCVAR", sizeof (cdat->dstr_114__OIE_LOCVAR.val) - 1); cdat->dstr_114__OIE_LOCVAR.val[10] = (char) 0; cdat->dstr_114__OIE_LOCVAR.slen = 10; /*^iniobj */ /*iniobj dobj_115__OIE_LOCVAR*/ /*_.VALDATA___V275*/ meltfptr[274] = (melt_ptr_t) & cdat->dobj_115__OIE_LOCVAR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_115__OIE_LOCVAR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_115__OIE_LOCVAR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_115__OIE_LOCVAR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_115__OIE_LOCVAR.obj_num = 4; cdat->dobj_115__OIE_LOCVAR.obj_hash = 721043932; cdat->dobj_115__OIE_LOCVAR.obj_len = 4; /*inistring dstr_116__OIE_LOCVAR*/ /*_.VALSTR___V276*/ meltfptr[275] = (melt_ptr_t) & cdat->dstr_116__OIE_LOCVAR; cdat->dstr_116__OIE_LOCVAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_116__OIE_LOCVAR.val, "OIE_LOCVAR", sizeof (cdat->dstr_116__OIE_LOCVAR.val) - 1); cdat->dstr_116__OIE_LOCVAR.val[10] = (char) 0; cdat->dstr_116__OIE_LOCVAR.slen = 10; /*iniobj dsym_117__CLASS_OBJINITOBJECT*/ /*uniqueobj*/ if (! /*_.VALDATA___V286*/ meltfptr[285]) /*_.VALDATA___V286*/ meltfptr[285] = (melt_ptr_t) & cdat->dsym_117__CLASS_OBJINITOBJECT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_117__CLASS_OBJINITOBJECT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_117__CLASS_OBJINITOBJECT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_117__CLASS_OBJINITOBJECT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_117__CLASS_OBJINITOBJECT.obj_hash = 532827978; cdat->dsym_117__CLASS_OBJINITOBJECT.obj_len = 3; /*inistring dstr_118__CLASS_OBJINITOBJ*/ /*_.VALSTR___V287*/ meltfptr[286] = (melt_ptr_t) & cdat->dstr_118__CLASS_OBJINITOBJ; cdat->dstr_118__CLASS_OBJINITOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_118__CLASS_OBJINITOBJ.val, "CLASS_OBJINITOBJECT", sizeof (cdat->dstr_118__CLASS_OBJINITOBJ. val) - 1); cdat->dstr_118__CLASS_OBJINITOBJ.val[19] = (char) 0; cdat->dstr_118__CLASS_OBJINITOBJ.slen = 19; MELT_LOCATION ("warmelt-genobj.melt:103:/ iniobj"); /*iniobj dobj_119__CLASS_OBJINITOBJECT*/ /*_.VALDATA___V288*/ meltfptr[287] = (melt_ptr_t) & cdat->dobj_119__CLASS_OBJINITOBJECT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_119__CLASS_OBJINITOBJECT", 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_119__CLASS_OBJINITOBJECT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_119__CLASS_OBJINITOBJECT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_119__CLASS_OBJINITOBJECT.obj_num = MELTOBMAG_OBJECT; cdat->dobj_119__CLASS_OBJINITOBJECT.obj_hash = 91516094; cdat->dobj_119__CLASS_OBJINITOBJECT.obj_len = 8; /*inistring dstr_120__CLASS_OBJINITOBJ*/ /*_.VALSTR___V289*/ meltfptr[288] = (melt_ptr_t) & cdat->dstr_120__CLASS_OBJINITOBJ; cdat->dstr_120__CLASS_OBJINITOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_120__CLASS_OBJINITOBJ.val, "CLASS_OBJINITOBJECT", sizeof (cdat->dstr_120__CLASS_OBJINITOBJ. val) - 1); cdat->dstr_120__CLASS_OBJINITOBJ.val[19] = (char) 0; cdat->dstr_120__CLASS_OBJINITOBJ.slen = 19; /*inimult dtup_121__CLASS_OBJINITOBJECT */ /*_.VALTUP___V290*/ meltfptr[289] = (melt_ptr_t) & cdat->dtup_121__CLASS_OBJINITOBJECT; cdat->dtup_121__CLASS_OBJINITOBJECT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_121__CLASS_OBJINITOBJECT.nbval = 5; /*inimult dtup_122__CLASS_OBJINITOBJECT */ /*_.VALTUP___V295*/ meltfptr[294] = (melt_ptr_t) & cdat->dtup_122__CLASS_OBJINITOBJECT; cdat->dtup_122__CLASS_OBJINITOBJECT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_122__CLASS_OBJINITOBJECT.nbval = 7; /*iniobj dsym_123__OIO_PREDEF*/ /*uniqueobj*/ if (! /*_.VALDATA___V296*/ meltfptr[295]) /*_.VALDATA___V296*/ meltfptr[295] = (melt_ptr_t) & cdat->dsym_123__OIO_PREDEF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_123__OIO_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_123__OIO_PREDEF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_123__OIO_PREDEF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_123__OIO_PREDEF.obj_hash = 818392308; cdat->dsym_123__OIO_PREDEF.obj_len = 3; /*inistring dstr_124__OIO_PREDEF*/ /*_.VALSTR___V297*/ meltfptr[296] = (melt_ptr_t) & cdat->dstr_124__OIO_PREDEF; cdat->dstr_124__OIO_PREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_124__OIO_PREDEF.val, "OIO_PREDEF", sizeof (cdat->dstr_124__OIO_PREDEF.val) - 1); cdat->dstr_124__OIO_PREDEF.val[10] = (char) 0; cdat->dstr_124__OIO_PREDEF.slen = 10; /*^iniobj */ /*iniobj dobj_125__OIO_PREDEF*/ /*_.VALDATA___V291*/ meltfptr[290] = (melt_ptr_t) & cdat->dobj_125__OIO_PREDEF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_125__OIO_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_125__OIO_PREDEF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_125__OIO_PREDEF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_125__OIO_PREDEF.obj_num = 5; cdat->dobj_125__OIO_PREDEF.obj_hash = 566283687; cdat->dobj_125__OIO_PREDEF.obj_len = 4; /*inistring dstr_126__OIO_PREDEF*/ /*_.VALSTR___V292*/ meltfptr[291] = (melt_ptr_t) & cdat->dstr_126__OIO_PREDEF; cdat->dstr_126__OIO_PREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_126__OIO_PREDEF.val, "OIO_PREDEF", sizeof (cdat->dstr_126__OIO_PREDEF.val) - 1); cdat->dstr_126__OIO_PREDEF.val[10] = (char) 0; cdat->dstr_126__OIO_PREDEF.slen = 10; /*iniobj dsym_127__OIO_CLASS*/ /*uniqueobj*/ if (! /*_.VALDATA___V298*/ meltfptr[297]) /*_.VALDATA___V298*/ meltfptr[297] = (melt_ptr_t) & cdat->dsym_127__OIO_CLASS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_127__OIO_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_127__OIO_CLASS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_127__OIO_CLASS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_127__OIO_CLASS.obj_hash = 407719080; cdat->dsym_127__OIO_CLASS.obj_len = 3; /*inistring dstr_128__OIO_CLASS*/ /*_.VALSTR___V299*/ meltfptr[298] = (melt_ptr_t) & cdat->dstr_128__OIO_CLASS; cdat->dstr_128__OIO_CLASS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_128__OIO_CLASS.val, "OIO_CLASS", sizeof (cdat->dstr_128__OIO_CLASS.val) - 1); cdat->dstr_128__OIO_CLASS.val[9] = (char) 0; cdat->dstr_128__OIO_CLASS.slen = 9; /*^iniobj */ /*iniobj dobj_129__OIO_CLASS*/ /*_.VALDATA___V293*/ meltfptr[292] = (melt_ptr_t) & cdat->dobj_129__OIO_CLASS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_129__OIO_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_129__OIO_CLASS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_129__OIO_CLASS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_129__OIO_CLASS.obj_num = 6; cdat->dobj_129__OIO_CLASS.obj_hash = 21443501; cdat->dobj_129__OIO_CLASS.obj_len = 4; /*inistring dstr_130__OIO_CLASS*/ /*_.VALSTR___V294*/ meltfptr[293] = (melt_ptr_t) & cdat->dstr_130__OIO_CLASS; cdat->dstr_130__OIO_CLASS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_130__OIO_CLASS.val, "OIO_CLASS", sizeof (cdat->dstr_130__OIO_CLASS.val) - 1); cdat->dstr_130__OIO_CLASS.val[9] = (char) 0; cdat->dstr_130__OIO_CLASS.slen = 9; /*iniobj dsym_131__CLASS_OBJINITUNIQUEOBJECT*/ /*uniqueobj*/ if (! /*_.VALDATA___V300*/ meltfptr[299]) /*_.VALDATA___V300*/ meltfptr[299] = (melt_ptr_t) & cdat->dsym_131__CLASS_OBJINITUNIQUEOBJECT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_131__CLASS_OBJINITUNIQUEOBJECT", melt_magic_discr ((melt_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__CLASS_OBJINITUNIQUEOBJECT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_131__CLASS_OBJINITUNIQUEOBJECT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_131__CLASS_OBJINITUNIQUEOBJECT.obj_hash = 549769452; cdat->dsym_131__CLASS_OBJINITUNIQUEOBJECT.obj_len = 3; /*inistring dstr_132__CLASS_OBJINITUNI*/ /*_.VALSTR___V301*/ meltfptr[300] = (melt_ptr_t) & cdat->dstr_132__CLASS_OBJINITUNI; cdat->dstr_132__CLASS_OBJINITUNI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_132__CLASS_OBJINITUNI.val, "CLASS_OBJINITUNIQUEOBJECT", sizeof (cdat->dstr_132__CLASS_OBJINITUNI. val) - 1); cdat->dstr_132__CLASS_OBJINITUNI.val[25] = (char) 0; cdat->dstr_132__CLASS_OBJINITUNI.slen = 25; MELT_LOCATION ("warmelt-genobj.melt:112:/ iniobj"); /*iniobj dobj_133__CLASS_OBJINITUNIQUEOBJECT*/ /*_.VALDATA___V302*/ meltfptr[301] = (melt_ptr_t) & cdat->dobj_133__CLASS_OBJINITUNIQUEOBJECT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_133__CLASS_OBJINITUNIQUEOBJECT", 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_133__CLASS_OBJINITUNIQUEOBJECT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_133__CLASS_OBJINITUNIQUEOBJECT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_133__CLASS_OBJINITUNIQUEOBJECT.obj_num = MELTOBMAG_OBJECT; cdat->dobj_133__CLASS_OBJINITUNIQUEOBJECT.obj_hash = 791972503; cdat->dobj_133__CLASS_OBJINITUNIQUEOBJECT.obj_len = 8; /*inistring dstr_134__CLASS_OBJINITUNI*/ /*_.VALSTR___V303*/ meltfptr[302] = (melt_ptr_t) & cdat->dstr_134__CLASS_OBJINITUNI; cdat->dstr_134__CLASS_OBJINITUNI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_134__CLASS_OBJINITUNI.val, "CLASS_OBJINITUNIQUEOBJECT", sizeof (cdat->dstr_134__CLASS_OBJINITUNI. val) - 1); cdat->dstr_134__CLASS_OBJINITUNI.val[25] = (char) 0; cdat->dstr_134__CLASS_OBJINITUNI.slen = 25; /*inimult dtup_135__CLASS_OBJINITUNIQUEOBJECT */ /*_.VALTUP___V304*/ meltfptr[303] = (melt_ptr_t) & cdat->dtup_135__CLASS_OBJINITUNIQUEOBJECT; cdat->dtup_135__CLASS_OBJINITUNIQUEOBJECT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_135__CLASS_OBJINITUNIQUEOBJECT.nbval = 6; /*inimult dtup_136__CLASS_OBJINITUNIQUEOBJECT */ /*_.VALTUP___V305*/ meltfptr[304] = (melt_ptr_t) & cdat->dtup_136__CLASS_OBJINITUNIQUEOBJECT; cdat->dtup_136__CLASS_OBJINITUNIQUEOBJECT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_136__CLASS_OBJINITUNIQUEOBJECT.nbval = 7; /*iniobj dsym_137__CLASS_OBJINITMULTIPLE*/ /*uniqueobj*/ if (! /*_.VALDATA___V306*/ meltfptr[305]) /*_.VALDATA___V306*/ meltfptr[305] = (melt_ptr_t) & cdat->dsym_137__CLASS_OBJINITMULTIPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_137__CLASS_OBJINITMULTIPLE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_137__CLASS_OBJINITMULTIPLE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_137__CLASS_OBJINITMULTIPLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_137__CLASS_OBJINITMULTIPLE.obj_hash = 864635026; cdat->dsym_137__CLASS_OBJINITMULTIPLE.obj_len = 3; /*inistring dstr_138__CLASS_OBJINITMUL*/ /*_.VALSTR___V307*/ meltfptr[306] = (melt_ptr_t) & cdat->dstr_138__CLASS_OBJINITMUL; cdat->dstr_138__CLASS_OBJINITMUL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_138__CLASS_OBJINITMUL.val, "CLASS_OBJINITMULTIPLE", sizeof (cdat->dstr_138__CLASS_OBJINITMUL. val) - 1); cdat->dstr_138__CLASS_OBJINITMUL.val[21] = (char) 0; cdat->dstr_138__CLASS_OBJINITMUL.slen = 21; MELT_LOCATION ("warmelt-genobj.melt:119:/ iniobj"); /*iniobj dobj_139__CLASS_OBJINITMULTIPLE*/ /*_.VALDATA___V308*/ meltfptr[307] = (melt_ptr_t) & cdat->dobj_139__CLASS_OBJINITMULTIPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_139__CLASS_OBJINITMULTIPLE", 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_139__CLASS_OBJINITMULTIPLE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_139__CLASS_OBJINITMULTIPLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_139__CLASS_OBJINITMULTIPLE.obj_num = MELTOBMAG_OBJECT; cdat->dobj_139__CLASS_OBJINITMULTIPLE.obj_hash = 183994512; cdat->dobj_139__CLASS_OBJINITMULTIPLE.obj_len = 8; /*inistring dstr_140__CLASS_OBJINITMUL*/ /*_.VALSTR___V309*/ meltfptr[308] = (melt_ptr_t) & cdat->dstr_140__CLASS_OBJINITMUL; cdat->dstr_140__CLASS_OBJINITMUL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_140__CLASS_OBJINITMUL.val, "CLASS_OBJINITMULTIPLE", sizeof (cdat->dstr_140__CLASS_OBJINITMUL. val) - 1); cdat->dstr_140__CLASS_OBJINITMUL.val[21] = (char) 0; cdat->dstr_140__CLASS_OBJINITMUL.slen = 21; /*inimult dtup_141__CLASS_OBJINITMULTIPLE */ /*_.VALTUP___V310*/ meltfptr[309] = (melt_ptr_t) & cdat->dtup_141__CLASS_OBJINITMULTIPLE; cdat->dtup_141__CLASS_OBJINITMULTIPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_141__CLASS_OBJINITMULTIPLE.nbval = 5; /*inimult dtup_142__CLASS_OBJINITMULTIPLE */ /*_.VALTUP___V313*/ meltfptr[312] = (melt_ptr_t) & cdat->dtup_142__CLASS_OBJINITMULTIPLE; cdat->dtup_142__CLASS_OBJINITMULTIPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_142__CLASS_OBJINITMULTIPLE.nbval = 6; /*iniobj dsym_143__OIM_TUPVAL*/ /*uniqueobj*/ if (! /*_.VALDATA___V314*/ meltfptr[313]) /*_.VALDATA___V314*/ meltfptr[313] = (melt_ptr_t) & cdat->dsym_143__OIM_TUPVAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_143__OIM_TUPVAL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_143__OIM_TUPVAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_143__OIM_TUPVAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_143__OIM_TUPVAL.obj_hash = 975810084; cdat->dsym_143__OIM_TUPVAL.obj_len = 3; /*inistring dstr_144__OIM_TUPVAL*/ /*_.VALSTR___V315*/ meltfptr[314] = (melt_ptr_t) & cdat->dstr_144__OIM_TUPVAL; cdat->dstr_144__OIM_TUPVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_144__OIM_TUPVAL.val, "OIM_TUPVAL", sizeof (cdat->dstr_144__OIM_TUPVAL.val) - 1); cdat->dstr_144__OIM_TUPVAL.val[10] = (char) 0; cdat->dstr_144__OIM_TUPVAL.slen = 10; /*^iniobj */ /*iniobj dobj_145__OIM_TUPVAL*/ /*_.VALDATA___V311*/ meltfptr[310] = (melt_ptr_t) & cdat->dobj_145__OIM_TUPVAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_145__OIM_TUPVAL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_145__OIM_TUPVAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_145__OIM_TUPVAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_145__OIM_TUPVAL.obj_num = 5; cdat->dobj_145__OIM_TUPVAL.obj_hash = 252936330; cdat->dobj_145__OIM_TUPVAL.obj_len = 4; /*inistring dstr_146__OIM_TUPVAL*/ /*_.VALSTR___V312*/ meltfptr[311] = (melt_ptr_t) & cdat->dstr_146__OIM_TUPVAL; cdat->dstr_146__OIM_TUPVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_146__OIM_TUPVAL.val, "OIM_TUPVAL", sizeof (cdat->dstr_146__OIM_TUPVAL.val) - 1); cdat->dstr_146__OIM_TUPVAL.val[10] = (char) 0; cdat->dstr_146__OIM_TUPVAL.slen = 10; /*iniobj dsym_147__CLASS_OBJINITCLOSURE*/ /*uniqueobj*/ if (! /*_.VALDATA___V316*/ meltfptr[315]) /*_.VALDATA___V316*/ meltfptr[315] = (melt_ptr_t) & cdat->dsym_147__CLASS_OBJINITCLOSURE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_147__CLASS_OBJINITCLOSURE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_147__CLASS_OBJINITCLOSURE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_147__CLASS_OBJINITCLOSURE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_147__CLASS_OBJINITCLOSURE.obj_hash = 952363892; cdat->dsym_147__CLASS_OBJINITCLOSURE.obj_len = 3; /*inistring dstr_148__CLASS_OBJINITCLO*/ /*_.VALSTR___V317*/ meltfptr[316] = (melt_ptr_t) & cdat->dstr_148__CLASS_OBJINITCLO; cdat->dstr_148__CLASS_OBJINITCLO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_148__CLASS_OBJINITCLO.val, "CLASS_OBJINITCLOSURE", sizeof (cdat->dstr_148__CLASS_OBJINITCLO. val) - 1); cdat->dstr_148__CLASS_OBJINITCLO.val[20] = (char) 0; cdat->dstr_148__CLASS_OBJINITCLO.slen = 20; MELT_LOCATION ("warmelt-genobj.melt:128:/ iniobj"); /*iniobj dobj_149__CLASS_OBJINITCLOSURE*/ /*_.VALDATA___V318*/ meltfptr[317] = (melt_ptr_t) & cdat->dobj_149__CLASS_OBJINITCLOSURE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_149__CLASS_OBJINITCLOSURE", 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_149__CLASS_OBJINITCLOSURE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_149__CLASS_OBJINITCLOSURE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_149__CLASS_OBJINITCLOSURE.obj_num = MELTOBMAG_OBJECT; cdat->dobj_149__CLASS_OBJINITCLOSURE.obj_hash = 132869634; cdat->dobj_149__CLASS_OBJINITCLOSURE.obj_len = 8; /*inistring dstr_150__CLASS_OBJINITCLO*/ /*_.VALSTR___V319*/ meltfptr[318] = (melt_ptr_t) & cdat->dstr_150__CLASS_OBJINITCLO; cdat->dstr_150__CLASS_OBJINITCLO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_150__CLASS_OBJINITCLO.val, "CLASS_OBJINITCLOSURE", sizeof (cdat->dstr_150__CLASS_OBJINITCLO. val) - 1); cdat->dstr_150__CLASS_OBJINITCLO.val[20] = (char) 0; cdat->dstr_150__CLASS_OBJINITCLO.slen = 20; /*inimult dtup_151__CLASS_OBJINITCLOSURE */ /*_.VALTUP___V320*/ meltfptr[319] = (melt_ptr_t) & cdat->dtup_151__CLASS_OBJINITCLOSURE; cdat->dtup_151__CLASS_OBJINITCLOSURE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_151__CLASS_OBJINITCLOSURE.nbval = 5; /*inimult dtup_152__CLASS_OBJINITCLOSURE */ /*_.VALTUP___V323*/ meltfptr[322] = (melt_ptr_t) & cdat->dtup_152__CLASS_OBJINITCLOSURE; cdat->dtup_152__CLASS_OBJINITCLOSURE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_152__CLASS_OBJINITCLOSURE.nbval = 6; /*iniobj dsym_153__OICLO_ROUT*/ /*uniqueobj*/ if (! /*_.VALDATA___V324*/ meltfptr[323]) /*_.VALDATA___V324*/ meltfptr[323] = (melt_ptr_t) & cdat->dsym_153__OICLO_ROUT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_153__OICLO_ROUT", melt_magic_discr ((melt_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__OICLO_ROUT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_153__OICLO_ROUT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_153__OICLO_ROUT.obj_hash = 794386613; cdat->dsym_153__OICLO_ROUT.obj_len = 3; /*inistring dstr_154__OICLO_ROUT*/ /*_.VALSTR___V325*/ meltfptr[324] = (melt_ptr_t) & cdat->dstr_154__OICLO_ROUT; cdat->dstr_154__OICLO_ROUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_154__OICLO_ROUT.val, "OICLO_ROUT", sizeof (cdat->dstr_154__OICLO_ROUT.val) - 1); cdat->dstr_154__OICLO_ROUT.val[10] = (char) 0; cdat->dstr_154__OICLO_ROUT.slen = 10; /*^iniobj */ /*iniobj dobj_155__OICLO_ROUT*/ /*_.VALDATA___V321*/ meltfptr[320] = (melt_ptr_t) & cdat->dobj_155__OICLO_ROUT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_155__OICLO_ROUT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_155__OICLO_ROUT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_155__OICLO_ROUT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_155__OICLO_ROUT.obj_num = 5; cdat->dobj_155__OICLO_ROUT.obj_hash = 829355738; cdat->dobj_155__OICLO_ROUT.obj_len = 4; /*inistring dstr_156__OICLO_ROUT*/ /*_.VALSTR___V322*/ meltfptr[321] = (melt_ptr_t) & cdat->dstr_156__OICLO_ROUT; cdat->dstr_156__OICLO_ROUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_156__OICLO_ROUT.val, "OICLO_ROUT", sizeof (cdat->dstr_156__OICLO_ROUT.val) - 1); cdat->dstr_156__OICLO_ROUT.val[10] = (char) 0; cdat->dstr_156__OICLO_ROUT.slen = 10; /*iniobj dsym_157__CLASS_OBJINITROUTINE*/ /*uniqueobj*/ if (! /*_.VALDATA___V326*/ meltfptr[325]) /*_.VALDATA___V326*/ meltfptr[325] = (melt_ptr_t) & cdat->dsym_157__CLASS_OBJINITROUTINE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_157__CLASS_OBJINITROUTINE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_157__CLASS_OBJINITROUTINE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_157__CLASS_OBJINITROUTINE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_157__CLASS_OBJINITROUTINE.obj_hash = 527007550; cdat->dsym_157__CLASS_OBJINITROUTINE.obj_len = 3; /*inistring dstr_158__CLASS_OBJINITROU*/ /*_.VALSTR___V327*/ meltfptr[326] = (melt_ptr_t) & cdat->dstr_158__CLASS_OBJINITROU; cdat->dstr_158__CLASS_OBJINITROU.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_158__CLASS_OBJINITROU.val, "CLASS_OBJINITROUTINE", sizeof (cdat->dstr_158__CLASS_OBJINITROU. val) - 1); cdat->dstr_158__CLASS_OBJINITROU.val[20] = (char) 0; cdat->dstr_158__CLASS_OBJINITROU.slen = 20; MELT_LOCATION ("warmelt-genobj.melt:136:/ iniobj"); /*iniobj dobj_159__CLASS_OBJINITROUTINE*/ /*_.VALDATA___V328*/ meltfptr[327] = (melt_ptr_t) & cdat->dobj_159__CLASS_OBJINITROUTINE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_159__CLASS_OBJINITROUTINE", 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_159__CLASS_OBJINITROUTINE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_159__CLASS_OBJINITROUTINE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_159__CLASS_OBJINITROUTINE.obj_num = MELTOBMAG_OBJECT; cdat->dobj_159__CLASS_OBJINITROUTINE.obj_hash = 440361699; cdat->dobj_159__CLASS_OBJINITROUTINE.obj_len = 8; /*inistring dstr_160__CLASS_OBJINITROU*/ /*_.VALSTR___V329*/ meltfptr[328] = (melt_ptr_t) & cdat->dstr_160__CLASS_OBJINITROU; cdat->dstr_160__CLASS_OBJINITROU.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_160__CLASS_OBJINITROU.val, "CLASS_OBJINITROUTINE", sizeof (cdat->dstr_160__CLASS_OBJINITROU. val) - 1); cdat->dstr_160__CLASS_OBJINITROU.val[20] = (char) 0; cdat->dstr_160__CLASS_OBJINITROU.slen = 20; /*inimult dtup_161__CLASS_OBJINITROUTINE */ /*_.VALTUP___V330*/ meltfptr[329] = (melt_ptr_t) & cdat->dtup_161__CLASS_OBJINITROUTINE; cdat->dtup_161__CLASS_OBJINITROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_161__CLASS_OBJINITROUTINE.nbval = 5; /*inimult dtup_162__CLASS_OBJINITROUTINE */ /*_.VALTUP___V333*/ meltfptr[332] = (melt_ptr_t) & cdat->dtup_162__CLASS_OBJINITROUTINE; cdat->dtup_162__CLASS_OBJINITROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_162__CLASS_OBJINITROUTINE.nbval = 6; /*iniobj dsym_163__OIR_PROCROUTINE*/ /*uniqueobj*/ if (! /*_.VALDATA___V334*/ meltfptr[333]) /*_.VALDATA___V334*/ meltfptr[333] = (melt_ptr_t) & cdat->dsym_163__OIR_PROCROUTINE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_163__OIR_PROCROUTINE", melt_magic_discr ((melt_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__OIR_PROCROUTINE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_163__OIR_PROCROUTINE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_163__OIR_PROCROUTINE.obj_hash = 508339861; cdat->dsym_163__OIR_PROCROUTINE.obj_len = 3; /*inistring dstr_164__OIR_PROCROUTINE*/ /*_.VALSTR___V335*/ meltfptr[334] = (melt_ptr_t) & cdat->dstr_164__OIR_PROCROUTINE; cdat->dstr_164__OIR_PROCROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_164__OIR_PROCROUTINE.val, "OIR_PROCROUTINE", sizeof (cdat->dstr_164__OIR_PROCROUTINE.val) - 1); cdat->dstr_164__OIR_PROCROUTINE.val[15] = (char) 0; cdat->dstr_164__OIR_PROCROUTINE.slen = 15; /*^iniobj */ /*iniobj dobj_165__OIR_PROCROUTINE*/ /*_.VALDATA___V331*/ meltfptr[330] = (melt_ptr_t) & cdat->dobj_165__OIR_PROCROUTINE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_165__OIR_PROCROUTINE", melt_magic_discr ((melt_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__OIR_PROCROUTINE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_165__OIR_PROCROUTINE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_165__OIR_PROCROUTINE.obj_num = 5; cdat->dobj_165__OIR_PROCROUTINE.obj_hash = 251657934; cdat->dobj_165__OIR_PROCROUTINE.obj_len = 4; /*inistring dstr_166__OIR_PROCROUTINE*/ /*_.VALSTR___V332*/ meltfptr[331] = (melt_ptr_t) & cdat->dstr_166__OIR_PROCROUTINE; cdat->dstr_166__OIR_PROCROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_166__OIR_PROCROUTINE.val, "OIR_PROCROUTINE", sizeof (cdat->dstr_166__OIR_PROCROUTINE.val) - 1); cdat->dstr_166__OIR_PROCROUTINE.val[15] = (char) 0; cdat->dstr_166__OIR_PROCROUTINE.slen = 15; /*iniobj dsym_167__CLASS_OBJINITSTRING*/ /*uniqueobj*/ if (! /*_.VALDATA___V336*/ meltfptr[335]) /*_.VALDATA___V336*/ meltfptr[335] = (melt_ptr_t) & cdat->dsym_167__CLASS_OBJINITSTRING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_167__CLASS_OBJINITSTRING", melt_magic_discr ((melt_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_OBJINITSTRING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_167__CLASS_OBJINITSTRING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_167__CLASS_OBJINITSTRING.obj_hash = 1067075981; cdat->dsym_167__CLASS_OBJINITSTRING.obj_len = 3; /*inistring dstr_168__CLASS_OBJINITSTR*/ /*_.VALSTR___V337*/ meltfptr[336] = (melt_ptr_t) & cdat->dstr_168__CLASS_OBJINITSTR; cdat->dstr_168__CLASS_OBJINITSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_168__CLASS_OBJINITSTR.val, "CLASS_OBJINITSTRING", sizeof (cdat->dstr_168__CLASS_OBJINITSTR. val) - 1); cdat->dstr_168__CLASS_OBJINITSTR.val[19] = (char) 0; cdat->dstr_168__CLASS_OBJINITSTR.slen = 19; MELT_LOCATION ("warmelt-genobj.melt:143:/ iniobj"); /*iniobj dobj_169__CLASS_OBJINITSTRING*/ /*_.VALDATA___V338*/ meltfptr[337] = (melt_ptr_t) & cdat->dobj_169__CLASS_OBJINITSTRING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_169__CLASS_OBJINITSTRING", 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_OBJINITSTRING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_169__CLASS_OBJINITSTRING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_169__CLASS_OBJINITSTRING.obj_num = MELTOBMAG_OBJECT; cdat->dobj_169__CLASS_OBJINITSTRING.obj_hash = 705069425; cdat->dobj_169__CLASS_OBJINITSTRING.obj_len = 8; /*inistring dstr_170__CLASS_OBJINITSTR*/ /*_.VALSTR___V339*/ meltfptr[338] = (melt_ptr_t) & cdat->dstr_170__CLASS_OBJINITSTR; cdat->dstr_170__CLASS_OBJINITSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_170__CLASS_OBJINITSTR.val, "CLASS_OBJINITSTRING", sizeof (cdat->dstr_170__CLASS_OBJINITSTR. val) - 1); cdat->dstr_170__CLASS_OBJINITSTR.val[19] = (char) 0; cdat->dstr_170__CLASS_OBJINITSTR.slen = 19; /*inimult dtup_171__CLASS_OBJINITSTRING */ /*_.VALTUP___V340*/ meltfptr[339] = (melt_ptr_t) & cdat->dtup_171__CLASS_OBJINITSTRING; cdat->dtup_171__CLASS_OBJINITSTRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_171__CLASS_OBJINITSTRING.nbval = 5; /*inimult dtup_172__CLASS_OBJINITSTRING */ /*_.VALTUP___V341*/ meltfptr[340] = (melt_ptr_t) & cdat->dtup_172__CLASS_OBJINITSTRING; cdat->dtup_172__CLASS_OBJINITSTRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_172__CLASS_OBJINITSTRING.nbval = 5; /*iniobj dsym_173__CLASS_OBJINITPAIR*/ /*uniqueobj*/ if (! /*_.VALDATA___V342*/ meltfptr[341]) /*_.VALDATA___V342*/ meltfptr[341] = (melt_ptr_t) & cdat->dsym_173__CLASS_OBJINITPAIR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_173__CLASS_OBJINITPAIR", melt_magic_discr ((melt_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__CLASS_OBJINITPAIR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_173__CLASS_OBJINITPAIR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_173__CLASS_OBJINITPAIR.obj_hash = 1032590021; cdat->dsym_173__CLASS_OBJINITPAIR.obj_len = 3; /*inistring dstr_174__CLASS_OBJINITPAI*/ /*_.VALSTR___V343*/ meltfptr[342] = (melt_ptr_t) & cdat->dstr_174__CLASS_OBJINITPAI; cdat->dstr_174__CLASS_OBJINITPAI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_174__CLASS_OBJINITPAI.val, "CLASS_OBJINITPAIR", sizeof (cdat->dstr_174__CLASS_OBJINITPAI. val) - 1); cdat->dstr_174__CLASS_OBJINITPAI.val[17] = (char) 0; cdat->dstr_174__CLASS_OBJINITPAI.slen = 17; MELT_LOCATION ("warmelt-genobj.melt:149:/ iniobj"); /*iniobj dobj_175__CLASS_OBJINITPAIR*/ /*_.VALDATA___V344*/ meltfptr[343] = (melt_ptr_t) & cdat->dobj_175__CLASS_OBJINITPAIR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_175__CLASS_OBJINITPAIR", 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_175__CLASS_OBJINITPAIR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_175__CLASS_OBJINITPAIR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_175__CLASS_OBJINITPAIR.obj_num = MELTOBMAG_OBJECT; cdat->dobj_175__CLASS_OBJINITPAIR.obj_hash = 379558871; cdat->dobj_175__CLASS_OBJINITPAIR.obj_len = 8; /*inistring dstr_176__CLASS_OBJINITPAI*/ /*_.VALSTR___V345*/ meltfptr[344] = (melt_ptr_t) & cdat->dstr_176__CLASS_OBJINITPAI; cdat->dstr_176__CLASS_OBJINITPAI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_176__CLASS_OBJINITPAI.val, "CLASS_OBJINITPAIR", sizeof (cdat->dstr_176__CLASS_OBJINITPAI. val) - 1); cdat->dstr_176__CLASS_OBJINITPAI.val[17] = (char) 0; cdat->dstr_176__CLASS_OBJINITPAI.slen = 17; /*inimult dtup_177__CLASS_OBJINITPAIR */ /*_.VALTUP___V346*/ meltfptr[345] = (melt_ptr_t) & cdat->dtup_177__CLASS_OBJINITPAIR; cdat->dtup_177__CLASS_OBJINITPAIR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_177__CLASS_OBJINITPAIR.nbval = 5; /*inimult dtup_178__CLASS_OBJINITPAIR */ /*_.VALTUP___V347*/ meltfptr[346] = (melt_ptr_t) & cdat->dtup_178__CLASS_OBJINITPAIR; cdat->dtup_178__CLASS_OBJINITPAIR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_178__CLASS_OBJINITPAIR.nbval = 5; /*iniobj dsym_179__CLASS_OBJINITLIST*/ /*uniqueobj*/ if (! /*_.VALDATA___V348*/ meltfptr[347]) /*_.VALDATA___V348*/ meltfptr[347] = (melt_ptr_t) & cdat->dsym_179__CLASS_OBJINITLIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_179__CLASS_OBJINITLIST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_179__CLASS_OBJINITLIST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_179__CLASS_OBJINITLIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_179__CLASS_OBJINITLIST.obj_hash = 679574260; cdat->dsym_179__CLASS_OBJINITLIST.obj_len = 3; /*inistring dstr_180__CLASS_OBJINITLIS*/ /*_.VALSTR___V349*/ meltfptr[348] = (melt_ptr_t) & cdat->dstr_180__CLASS_OBJINITLIS; cdat->dstr_180__CLASS_OBJINITLIS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_180__CLASS_OBJINITLIS.val, "CLASS_OBJINITLIST", sizeof (cdat->dstr_180__CLASS_OBJINITLIS. val) - 1); cdat->dstr_180__CLASS_OBJINITLIS.val[17] = (char) 0; cdat->dstr_180__CLASS_OBJINITLIS.slen = 17; MELT_LOCATION ("warmelt-genobj.melt:154:/ iniobj"); /*iniobj dobj_181__CLASS_OBJINITLIST*/ /*_.VALDATA___V350*/ meltfptr[349] = (melt_ptr_t) & cdat->dobj_181__CLASS_OBJINITLIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_181__CLASS_OBJINITLIST", 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_181__CLASS_OBJINITLIST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_181__CLASS_OBJINITLIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_181__CLASS_OBJINITLIST.obj_num = MELTOBMAG_OBJECT; cdat->dobj_181__CLASS_OBJINITLIST.obj_hash = 345883356; cdat->dobj_181__CLASS_OBJINITLIST.obj_len = 8; /*inistring dstr_182__CLASS_OBJINITLIS*/ /*_.VALSTR___V351*/ meltfptr[350] = (melt_ptr_t) & cdat->dstr_182__CLASS_OBJINITLIS; cdat->dstr_182__CLASS_OBJINITLIS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_182__CLASS_OBJINITLIS.val, "CLASS_OBJINITLIST", sizeof (cdat->dstr_182__CLASS_OBJINITLIS. val) - 1); cdat->dstr_182__CLASS_OBJINITLIS.val[17] = (char) 0; cdat->dstr_182__CLASS_OBJINITLIS.slen = 17; /*inimult dtup_183__CLASS_OBJINITLIST */ /*_.VALTUP___V352*/ meltfptr[351] = (melt_ptr_t) & cdat->dtup_183__CLASS_OBJINITLIST; cdat->dtup_183__CLASS_OBJINITLIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_183__CLASS_OBJINITLIST.nbval = 5; /*inimult dtup_184__CLASS_OBJINITLIST */ /*_.VALTUP___V353*/ meltfptr[352] = (melt_ptr_t) & cdat->dtup_184__CLASS_OBJINITLIST; cdat->dtup_184__CLASS_OBJINITLIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_184__CLASS_OBJINITLIST.nbval = 5; /*iniobj dsym_185__CLASS_OBJINITBOXINTEGER*/ /*uniqueobj*/ if (! /*_.VALDATA___V354*/ meltfptr[353]) /*_.VALDATA___V354*/ meltfptr[353] = (melt_ptr_t) & cdat->dsym_185__CLASS_OBJINITBOXINTEGER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_185__CLASS_OBJINITBOXINTEGER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_185__CLASS_OBJINITBOXINTEGER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_185__CLASS_OBJINITBOXINTEGER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_185__CLASS_OBJINITBOXINTEGER.obj_hash = 221951388; cdat->dsym_185__CLASS_OBJINITBOXINTEGER.obj_len = 3; /*inistring dstr_186__CLASS_OBJINITBOX*/ /*_.VALSTR___V355*/ meltfptr[354] = (melt_ptr_t) & cdat->dstr_186__CLASS_OBJINITBOX; cdat->dstr_186__CLASS_OBJINITBOX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_186__CLASS_OBJINITBOX.val, "CLASS_OBJINITBOXINTEGER", sizeof (cdat->dstr_186__CLASS_OBJINITBOX. val) - 1); cdat->dstr_186__CLASS_OBJINITBOX.val[23] = (char) 0; cdat->dstr_186__CLASS_OBJINITBOX.slen = 23; MELT_LOCATION ("warmelt-genobj.melt:160:/ iniobj"); /*iniobj dobj_187__CLASS_OBJINITBOXINTEGER*/ /*_.VALDATA___V356*/ meltfptr[355] = (melt_ptr_t) & cdat->dobj_187__CLASS_OBJINITBOXINTEGER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_187__CLASS_OBJINITBOXINTEGER", 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_187__CLASS_OBJINITBOXINTEGER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_187__CLASS_OBJINITBOXINTEGER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_187__CLASS_OBJINITBOXINTEGER.obj_num = MELTOBMAG_OBJECT; cdat->dobj_187__CLASS_OBJINITBOXINTEGER.obj_hash = 306818271; cdat->dobj_187__CLASS_OBJINITBOXINTEGER.obj_len = 8; /*inistring dstr_188__CLASS_OBJINITBOX*/ /*_.VALSTR___V357*/ meltfptr[356] = (melt_ptr_t) & cdat->dstr_188__CLASS_OBJINITBOX; cdat->dstr_188__CLASS_OBJINITBOX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_188__CLASS_OBJINITBOX.val, "CLASS_OBJINITBOXINTEGER", sizeof (cdat->dstr_188__CLASS_OBJINITBOX. val) - 1); cdat->dstr_188__CLASS_OBJINITBOX.val[23] = (char) 0; cdat->dstr_188__CLASS_OBJINITBOX.slen = 23; /*inimult dtup_189__CLASS_OBJINITBOXINTEGER */ /*_.VALTUP___V358*/ meltfptr[357] = (melt_ptr_t) & cdat->dtup_189__CLASS_OBJINITBOXINTEGER; cdat->dtup_189__CLASS_OBJINITBOXINTEGER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_189__CLASS_OBJINITBOXINTEGER.nbval = 5; /*inimult dtup_190__CLASS_OBJINITBOXINTEGER */ /*_.VALTUP___V359*/ meltfptr[358] = (melt_ptr_t) & cdat->dtup_190__CLASS_OBJINITBOXINTEGER; cdat->dtup_190__CLASS_OBJINITBOXINTEGER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_190__CLASS_OBJINITBOXINTEGER.nbval = 5; /*iniobj dsym_191__CLASS_OBJEXPV*/ /*uniqueobj*/ if (! /*_.VALDATA___V360*/ meltfptr[359]) /*_.VALDATA___V360*/ meltfptr[359] = (melt_ptr_t) & cdat->dsym_191__CLASS_OBJEXPV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_191__CLASS_OBJEXPV", melt_magic_discr ((melt_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_OBJEXPV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_191__CLASS_OBJEXPV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_191__CLASS_OBJEXPV.obj_hash = 134484056; cdat->dsym_191__CLASS_OBJEXPV.obj_len = 3; /*inistring dstr_192__CLASS_OBJEXPV*/ /*_.VALSTR___V361*/ meltfptr[360] = (melt_ptr_t) & cdat->dstr_192__CLASS_OBJEXPV; cdat->dstr_192__CLASS_OBJEXPV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_192__CLASS_OBJEXPV.val, "CLASS_OBJEXPV", sizeof (cdat->dstr_192__CLASS_OBJEXPV.val) - 1); cdat->dstr_192__CLASS_OBJEXPV.val[13] = (char) 0; cdat->dstr_192__CLASS_OBJEXPV.slen = 13; MELT_LOCATION ("warmelt-genobj.melt:167:/ iniobj"); /*iniobj dobj_193__CLASS_OBJEXPV*/ /*_.VALDATA___V362*/ meltfptr[361] = (melt_ptr_t) & cdat->dobj_193__CLASS_OBJEXPV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_193__CLASS_OBJEXPV", 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_OBJEXPV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_193__CLASS_OBJEXPV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_193__CLASS_OBJEXPV.obj_num = MELTOBMAG_OBJECT; cdat->dobj_193__CLASS_OBJEXPV.obj_hash = 17596942; cdat->dobj_193__CLASS_OBJEXPV.obj_len = 8; /*inistring dstr_194__CLASS_OBJEXPV*/ /*_.VALSTR___V363*/ meltfptr[362] = (melt_ptr_t) & cdat->dstr_194__CLASS_OBJEXPV; cdat->dstr_194__CLASS_OBJEXPV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_194__CLASS_OBJEXPV.val, "CLASS_OBJEXPV", sizeof (cdat->dstr_194__CLASS_OBJEXPV.val) - 1); cdat->dstr_194__CLASS_OBJEXPV.val[13] = (char) 0; cdat->dstr_194__CLASS_OBJEXPV.slen = 13; /*inimult dtup_195__CLASS_OBJEXPV */ /*_.VALTUP___V364*/ meltfptr[363] = (melt_ptr_t) & cdat->dtup_195__CLASS_OBJEXPV; cdat->dtup_195__CLASS_OBJEXPV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_195__CLASS_OBJEXPV.nbval = 3; /*inimult dtup_196__CLASS_OBJEXPV */ /*_.VALTUP___V367*/ meltfptr[366] = (melt_ptr_t) & cdat->dtup_196__CLASS_OBJEXPV; cdat->dtup_196__CLASS_OBJEXPV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_196__CLASS_OBJEXPV.nbval = 2; /*iniobj dsym_197__OBX_CONT*/ /*uniqueobj*/ if (! /*_.VALDATA___V368*/ meltfptr[367]) /*_.VALDATA___V368*/ meltfptr[367] = (melt_ptr_t) & cdat->dsym_197__OBX_CONT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_197__OBX_CONT", melt_magic_discr ((melt_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__OBX_CONT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_197__OBX_CONT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_197__OBX_CONT.obj_hash = 1046796445; cdat->dsym_197__OBX_CONT.obj_len = 3; /*inistring dstr_198__OBX_CONT*/ /*_.VALSTR___V369*/ meltfptr[368] = (melt_ptr_t) & cdat->dstr_198__OBX_CONT; cdat->dstr_198__OBX_CONT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_198__OBX_CONT.val, "OBX_CONT", sizeof (cdat->dstr_198__OBX_CONT.val) - 1); cdat->dstr_198__OBX_CONT.val[8] = (char) 0; cdat->dstr_198__OBX_CONT.slen = 8; /*^iniobj */ /*iniobj dobj_199__OBX_CONT*/ /*_.VALDATA___V365*/ meltfptr[364] = (melt_ptr_t) & cdat->dobj_199__OBX_CONT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_199__OBX_CONT", melt_magic_discr ((melt_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__OBX_CONT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_199__OBX_CONT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_199__OBX_CONT.obj_num = 1; cdat->dobj_199__OBX_CONT.obj_hash = 158423099; cdat->dobj_199__OBX_CONT.obj_len = 4; /*inistring dstr_200__OBX_CONT*/ /*_.VALSTR___V366*/ meltfptr[365] = (melt_ptr_t) & cdat->dstr_200__OBX_CONT; cdat->dstr_200__OBX_CONT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_200__OBX_CONT.val, "OBX_CONT", sizeof (cdat->dstr_200__OBX_CONT.val) - 1); cdat->dstr_200__OBX_CONT.val[8] = (char) 0; cdat->dstr_200__OBX_CONT.slen = 8; /*iniobj dsym_201__CLASS_OBJLOCATEDEXPV*/ /*uniqueobj*/ if (! /*_.VALDATA___V370*/ meltfptr[369]) /*_.VALDATA___V370*/ meltfptr[369] = (melt_ptr_t) & cdat->dsym_201__CLASS_OBJLOCATEDEXPV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_201__CLASS_OBJLOCATEDEXPV", melt_magic_discr ((melt_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_OBJLOCATEDEXPV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_201__CLASS_OBJLOCATEDEXPV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_201__CLASS_OBJLOCATEDEXPV.obj_hash = 564704332; cdat->dsym_201__CLASS_OBJLOCATEDEXPV.obj_len = 3; /*inistring dstr_202__CLASS_OBJLOCATED*/ /*_.VALSTR___V371*/ meltfptr[370] = (melt_ptr_t) & cdat->dstr_202__CLASS_OBJLOCATED; cdat->dstr_202__CLASS_OBJLOCATED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_202__CLASS_OBJLOCATED.val, "CLASS_OBJLOCATEDEXPV", sizeof (cdat->dstr_202__CLASS_OBJLOCATED. val) - 1); cdat->dstr_202__CLASS_OBJLOCATED.val[20] = (char) 0; cdat->dstr_202__CLASS_OBJLOCATED.slen = 20; MELT_LOCATION ("warmelt-genobj.melt:173:/ iniobj"); /*iniobj dobj_203__CLASS_OBJLOCATEDEXPV*/ /*_.VALDATA___V372*/ meltfptr[371] = (melt_ptr_t) & cdat->dobj_203__CLASS_OBJLOCATEDEXPV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_203__CLASS_OBJLOCATEDEXPV", 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_OBJLOCATEDEXPV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_203__CLASS_OBJLOCATEDEXPV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_203__CLASS_OBJLOCATEDEXPV.obj_num = MELTOBMAG_OBJECT; cdat->dobj_203__CLASS_OBJLOCATEDEXPV.obj_hash = 639025109; cdat->dobj_203__CLASS_OBJLOCATEDEXPV.obj_len = 8; /*inistring dstr_204__CLASS_OBJLOCATED*/ /*_.VALSTR___V373*/ meltfptr[372] = (melt_ptr_t) & cdat->dstr_204__CLASS_OBJLOCATED; cdat->dstr_204__CLASS_OBJLOCATED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_204__CLASS_OBJLOCATED.val, "CLASS_OBJLOCATEDEXPV", sizeof (cdat->dstr_204__CLASS_OBJLOCATED. val) - 1); cdat->dstr_204__CLASS_OBJLOCATED.val[20] = (char) 0; cdat->dstr_204__CLASS_OBJLOCATED.slen = 20; /*inimult dtup_205__CLASS_OBJLOCATEDEXPV */ /*_.VALTUP___V374*/ meltfptr[373] = (melt_ptr_t) & cdat->dtup_205__CLASS_OBJLOCATEDEXPV; cdat->dtup_205__CLASS_OBJLOCATEDEXPV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_205__CLASS_OBJLOCATEDEXPV.nbval = 4; /*inimult dtup_206__CLASS_OBJLOCATEDEXPV */ /*_.VALTUP___V377*/ meltfptr[376] = (melt_ptr_t) & cdat->dtup_206__CLASS_OBJLOCATEDEXPV; cdat->dtup_206__CLASS_OBJLOCATEDEXPV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_206__CLASS_OBJLOCATEDEXPV.nbval = 3; /*iniobj dsym_207__OBCX_LOC*/ /*uniqueobj*/ if (! /*_.VALDATA___V378*/ meltfptr[377]) /*_.VALDATA___V378*/ meltfptr[377] = (melt_ptr_t) & cdat->dsym_207__OBCX_LOC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_207__OBCX_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_207__OBCX_LOC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_207__OBCX_LOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_207__OBCX_LOC.obj_hash = 685813382; cdat->dsym_207__OBCX_LOC.obj_len = 3; /*inistring dstr_208__OBCX_LOC*/ /*_.VALSTR___V379*/ meltfptr[378] = (melt_ptr_t) & cdat->dstr_208__OBCX_LOC; cdat->dstr_208__OBCX_LOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_208__OBCX_LOC.val, "OBCX_LOC", sizeof (cdat->dstr_208__OBCX_LOC.val) - 1); cdat->dstr_208__OBCX_LOC.val[8] = (char) 0; cdat->dstr_208__OBCX_LOC.slen = 8; /*^iniobj */ /*iniobj dobj_209__OBCX_LOC*/ /*_.VALDATA___V375*/ meltfptr[374] = (melt_ptr_t) & cdat->dobj_209__OBCX_LOC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_209__OBCX_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_209__OBCX_LOC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_209__OBCX_LOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_209__OBCX_LOC.obj_num = 2; cdat->dobj_209__OBCX_LOC.obj_hash = 266467341; cdat->dobj_209__OBCX_LOC.obj_len = 4; /*inistring dstr_210__OBCX_LOC*/ /*_.VALSTR___V376*/ meltfptr[375] = (melt_ptr_t) & cdat->dstr_210__OBCX_LOC; cdat->dstr_210__OBCX_LOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_210__OBCX_LOC.val, "OBCX_LOC", sizeof (cdat->dstr_210__OBCX_LOC.val) - 1); cdat->dstr_210__OBCX_LOC.val[8] = (char) 0; cdat->dstr_210__OBCX_LOC.slen = 8; /*iniobj dsym_211__CLASS_OBJFLAG*/ /*uniqueobj*/ if (! /*_.VALDATA___V380*/ meltfptr[379]) /*_.VALDATA___V380*/ meltfptr[379] = (melt_ptr_t) & cdat->dsym_211__CLASS_OBJFLAG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_211__CLASS_OBJFLAG", melt_magic_discr ((melt_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_OBJFLAG", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_211__CLASS_OBJFLAG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_211__CLASS_OBJFLAG.obj_hash = 994586081; cdat->dsym_211__CLASS_OBJFLAG.obj_len = 3; /*inistring dstr_212__CLASS_OBJFLAG*/ /*_.VALSTR___V381*/ meltfptr[380] = (melt_ptr_t) & cdat->dstr_212__CLASS_OBJFLAG; cdat->dstr_212__CLASS_OBJFLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_212__CLASS_OBJFLAG.val, "CLASS_OBJFLAG", sizeof (cdat->dstr_212__CLASS_OBJFLAG.val) - 1); cdat->dstr_212__CLASS_OBJFLAG.val[13] = (char) 0; cdat->dstr_212__CLASS_OBJFLAG.slen = 13; MELT_LOCATION ("warmelt-genobj.melt:179:/ iniobj"); /*iniobj dobj_213__CLASS_OBJFLAG*/ /*_.VALDATA___V382*/ meltfptr[381] = (melt_ptr_t) & cdat->dobj_213__CLASS_OBJFLAG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_213__CLASS_OBJFLAG", 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_OBJFLAG", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_213__CLASS_OBJFLAG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_213__CLASS_OBJFLAG.obj_num = MELTOBMAG_OBJECT; cdat->dobj_213__CLASS_OBJFLAG.obj_hash = 474161736; cdat->dobj_213__CLASS_OBJFLAG.obj_len = 8; /*inistring dstr_214__CLASS_OBJFLAG*/ /*_.VALSTR___V383*/ meltfptr[382] = (melt_ptr_t) & cdat->dstr_214__CLASS_OBJFLAG; cdat->dstr_214__CLASS_OBJFLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_214__CLASS_OBJFLAG.val, "CLASS_OBJFLAG", sizeof (cdat->dstr_214__CLASS_OBJFLAG.val) - 1); cdat->dstr_214__CLASS_OBJFLAG.val[13] = (char) 0; cdat->dstr_214__CLASS_OBJFLAG.slen = 13; /*inimult dtup_215__CLASS_OBJFLAG */ /*_.VALTUP___V384*/ meltfptr[383] = (melt_ptr_t) & cdat->dtup_215__CLASS_OBJFLAG; cdat->dtup_215__CLASS_OBJFLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_215__CLASS_OBJFLAG.nbval = 4; /*inimult dtup_216__CLASS_OBJFLAG */ /*_.VALTUP___V391*/ meltfptr[390] = (melt_ptr_t) & cdat->dtup_216__CLASS_OBJFLAG; cdat->dtup_216__CLASS_OBJFLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_216__CLASS_OBJFLAG.nbval = 4; /*iniobj dsym_217__OBFLAG_MATCHFLAG*/ /*uniqueobj*/ if (! /*_.VALDATA___V392*/ meltfptr[391]) /*_.VALDATA___V392*/ meltfptr[391] = (melt_ptr_t) & cdat->dsym_217__OBFLAG_MATCHFLAG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_217__OBFLAG_MATCHFLAG", melt_magic_discr ((melt_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__OBFLAG_MATCHFLAG", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_217__OBFLAG_MATCHFLAG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_217__OBFLAG_MATCHFLAG.obj_hash = 647008665; cdat->dsym_217__OBFLAG_MATCHFLAG.obj_len = 3; /*inistring dstr_218__OBFLAG_MATCHFLAG*/ /*_.VALSTR___V393*/ meltfptr[392] = (melt_ptr_t) & cdat->dstr_218__OBFLAG_MATCHFLAG; cdat->dstr_218__OBFLAG_MATCHFLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_218__OBFLAG_MATCHFLAG.val, "OBFLAG_MATCHFLAG", sizeof (cdat->dstr_218__OBFLAG_MATCHFLAG. val) - 1); cdat->dstr_218__OBFLAG_MATCHFLAG.val[16] = (char) 0; cdat->dstr_218__OBFLAG_MATCHFLAG.slen = 16; /*^iniobj */ /*iniobj dobj_219__OBFLAG_MATCHFLAG*/ /*_.VALDATA___V385*/ meltfptr[384] = (melt_ptr_t) & cdat->dobj_219__OBFLAG_MATCHFLAG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_219__OBFLAG_MATCHFLAG", melt_magic_discr ((melt_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__OBFLAG_MATCHFLAG", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_219__OBFLAG_MATCHFLAG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_219__OBFLAG_MATCHFLAG.obj_num = 1; cdat->dobj_219__OBFLAG_MATCHFLAG.obj_hash = 678420020; cdat->dobj_219__OBFLAG_MATCHFLAG.obj_len = 4; /*inistring dstr_220__OBFLAG_MATCHFLAG*/ /*_.VALSTR___V386*/ meltfptr[385] = (melt_ptr_t) & cdat->dstr_220__OBFLAG_MATCHFLAG; cdat->dstr_220__OBFLAG_MATCHFLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_220__OBFLAG_MATCHFLAG.val, "OBFLAG_MATCHFLAG", sizeof (cdat->dstr_220__OBFLAG_MATCHFLAG. val) - 1); cdat->dstr_220__OBFLAG_MATCHFLAG.val[16] = (char) 0; cdat->dstr_220__OBFLAG_MATCHFLAG.slen = 16; /*iniobj dsym_221__OBFLAG_NAME*/ /*uniqueobj*/ if (! /*_.VALDATA___V394*/ meltfptr[393]) /*_.VALDATA___V394*/ meltfptr[393] = (melt_ptr_t) & cdat->dsym_221__OBFLAG_NAME; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_221__OBFLAG_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_221__OBFLAG_NAME", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_221__OBFLAG_NAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_221__OBFLAG_NAME.obj_hash = 613467083; cdat->dsym_221__OBFLAG_NAME.obj_len = 3; /*inistring dstr_222__OBFLAG_NAME*/ /*_.VALSTR___V395*/ meltfptr[394] = (melt_ptr_t) & cdat->dstr_222__OBFLAG_NAME; cdat->dstr_222__OBFLAG_NAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_222__OBFLAG_NAME.val, "OBFLAG_NAME", sizeof (cdat->dstr_222__OBFLAG_NAME.val) - 1); cdat->dstr_222__OBFLAG_NAME.val[11] = (char) 0; cdat->dstr_222__OBFLAG_NAME.slen = 11; /*^iniobj */ /*iniobj dobj_223__OBFLAG_NAME*/ /*_.VALDATA___V387*/ meltfptr[386] = (melt_ptr_t) & cdat->dobj_223__OBFLAG_NAME; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_223__OBFLAG_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_223__OBFLAG_NAME", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_223__OBFLAG_NAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_223__OBFLAG_NAME.obj_num = 2; cdat->dobj_223__OBFLAG_NAME.obj_hash = 214641632; cdat->dobj_223__OBFLAG_NAME.obj_len = 4; /*inistring dstr_224__OBFLAG_NAME*/ /*_.VALSTR___V388*/ meltfptr[387] = (melt_ptr_t) & cdat->dstr_224__OBFLAG_NAME; cdat->dstr_224__OBFLAG_NAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_224__OBFLAG_NAME.val, "OBFLAG_NAME", sizeof (cdat->dstr_224__OBFLAG_NAME.val) - 1); cdat->dstr_224__OBFLAG_NAME.val[11] = (char) 0; cdat->dstr_224__OBFLAG_NAME.slen = 11; /*iniobj dsym_225__OBFLAG_RANK*/ /*uniqueobj*/ if (! /*_.VALDATA___V396*/ meltfptr[395]) /*_.VALDATA___V396*/ meltfptr[395] = (melt_ptr_t) & cdat->dsym_225__OBFLAG_RANK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_225__OBFLAG_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_225__OBFLAG_RANK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_225__OBFLAG_RANK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_225__OBFLAG_RANK.obj_hash = 988140040; cdat->dsym_225__OBFLAG_RANK.obj_len = 3; /*inistring dstr_226__OBFLAG_RANK*/ /*_.VALSTR___V397*/ meltfptr[396] = (melt_ptr_t) & cdat->dstr_226__OBFLAG_RANK; cdat->dstr_226__OBFLAG_RANK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_226__OBFLAG_RANK.val, "OBFLAG_RANK", sizeof (cdat->dstr_226__OBFLAG_RANK.val) - 1); cdat->dstr_226__OBFLAG_RANK.val[11] = (char) 0; cdat->dstr_226__OBFLAG_RANK.slen = 11; /*^iniobj */ /*iniobj dobj_227__OBFLAG_RANK*/ /*_.VALDATA___V389*/ meltfptr[388] = (melt_ptr_t) & cdat->dobj_227__OBFLAG_RANK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_227__OBFLAG_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_227__OBFLAG_RANK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_227__OBFLAG_RANK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_227__OBFLAG_RANK.obj_num = 3; cdat->dobj_227__OBFLAG_RANK.obj_hash = 361555690; cdat->dobj_227__OBFLAG_RANK.obj_len = 4; /*inistring dstr_228__OBFLAG_RANK*/ /*_.VALSTR___V390*/ meltfptr[389] = (melt_ptr_t) & cdat->dstr_228__OBFLAG_RANK; cdat->dstr_228__OBFLAG_RANK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_228__OBFLAG_RANK.val, "OBFLAG_RANK", sizeof (cdat->dstr_228__OBFLAG_RANK.val) - 1); cdat->dstr_228__OBFLAG_RANK.val[11] = (char) 0; cdat->dstr_228__OBFLAG_RANK.slen = 11; /*iniobj dsym_229__CLASS_OBJINSTR*/ /*uniqueobj*/ if (! /*_.VALDATA___V398*/ meltfptr[397]) /*_.VALDATA___V398*/ meltfptr[397] = (melt_ptr_t) & cdat->dsym_229__CLASS_OBJINSTR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_229__CLASS_OBJINSTR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_229__CLASS_OBJINSTR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_229__CLASS_OBJINSTR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_229__CLASS_OBJINSTR.obj_hash = 310627895; cdat->dsym_229__CLASS_OBJINSTR.obj_len = 3; /*inistring dstr_230__CLASS_OBJINSTR*/ /*_.VALSTR___V399*/ meltfptr[398] = (melt_ptr_t) & cdat->dstr_230__CLASS_OBJINSTR; cdat->dstr_230__CLASS_OBJINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_230__CLASS_OBJINSTR.val, "CLASS_OBJINSTR", sizeof (cdat->dstr_230__CLASS_OBJINSTR.val) - 1); cdat->dstr_230__CLASS_OBJINSTR.val[14] = (char) 0; cdat->dstr_230__CLASS_OBJINSTR.slen = 14; MELT_LOCATION ("warmelt-genobj.melt:187:/ iniobj"); /*iniobj dobj_231__CLASS_OBJINSTR*/ /*_.VALDATA___V400*/ meltfptr[399] = (melt_ptr_t) & cdat->dobj_231__CLASS_OBJINSTR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_231__CLASS_OBJINSTR", 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_231__CLASS_OBJINSTR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_231__CLASS_OBJINSTR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_231__CLASS_OBJINSTR.obj_num = MELTOBMAG_OBJECT; cdat->dobj_231__CLASS_OBJINSTR.obj_hash = 421206908; cdat->dobj_231__CLASS_OBJINSTR.obj_len = 8; /*inistring dstr_232__CLASS_OBJINSTR*/ /*_.VALSTR___V401*/ meltfptr[400] = (melt_ptr_t) & cdat->dstr_232__CLASS_OBJINSTR; cdat->dstr_232__CLASS_OBJINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_232__CLASS_OBJINSTR.val, "CLASS_OBJINSTR", sizeof (cdat->dstr_232__CLASS_OBJINSTR.val) - 1); cdat->dstr_232__CLASS_OBJINSTR.val[14] = (char) 0; cdat->dstr_232__CLASS_OBJINSTR.slen = 14; /*inimult dtup_233__CLASS_OBJINSTR */ /*_.VALTUP___V402*/ meltfptr[401] = (melt_ptr_t) & cdat->dtup_233__CLASS_OBJINSTR; cdat->dtup_233__CLASS_OBJINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_233__CLASS_OBJINSTR.nbval = 2; /*inimult dtup_234__CLASS_OBJINSTR */ /*_.VALTUP___V405*/ meltfptr[404] = (melt_ptr_t) & cdat->dtup_234__CLASS_OBJINSTR; cdat->dtup_234__CLASS_OBJINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_234__CLASS_OBJINSTR.nbval = 1; /*iniobj dsym_235__OBI_LOC*/ /*uniqueobj*/ if (! /*_.VALDATA___V406*/ meltfptr[405]) /*_.VALDATA___V406*/ meltfptr[405] = (melt_ptr_t) & cdat->dsym_235__OBI_LOC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_235__OBI_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_235__OBI_LOC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_235__OBI_LOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_235__OBI_LOC.obj_hash = 551041921; cdat->dsym_235__OBI_LOC.obj_len = 3; /*inistring dstr_236__OBI_LOC*/ /*_.VALSTR___V407*/ meltfptr[406] = (melt_ptr_t) & cdat->dstr_236__OBI_LOC; cdat->dstr_236__OBI_LOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_236__OBI_LOC.val, "OBI_LOC", sizeof (cdat->dstr_236__OBI_LOC.val) - 1); cdat->dstr_236__OBI_LOC.val[7] = (char) 0; cdat->dstr_236__OBI_LOC.slen = 7; /*^iniobj */ /*iniobj dobj_237__OBI_LOC*/ /*_.VALDATA___V403*/ meltfptr[402] = (melt_ptr_t) & cdat->dobj_237__OBI_LOC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_237__OBI_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_237__OBI_LOC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_237__OBI_LOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_237__OBI_LOC.obj_num = 0; cdat->dobj_237__OBI_LOC.obj_hash = 62026828; cdat->dobj_237__OBI_LOC.obj_len = 4; /*inistring dstr_238__OBI_LOC*/ /*_.VALSTR___V404*/ meltfptr[403] = (melt_ptr_t) & cdat->dstr_238__OBI_LOC; cdat->dstr_238__OBI_LOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_238__OBI_LOC.val, "OBI_LOC", sizeof (cdat->dstr_238__OBI_LOC.val) - 1); cdat->dstr_238__OBI_LOC.val[7] = (char) 0; cdat->dstr_238__OBI_LOC.slen = 7; /*iniobj dsym_239__CLASS_OBJCOMMENTINSTR*/ /*uniqueobj*/ if (! /*_.VALDATA___V408*/ meltfptr[407]) /*_.VALDATA___V408*/ meltfptr[407] = (melt_ptr_t) & cdat->dsym_239__CLASS_OBJCOMMENTINSTR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_239__CLASS_OBJCOMMENTINSTR", melt_magic_discr ((melt_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_OBJCOMMENTINSTR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_239__CLASS_OBJCOMMENTINSTR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_239__CLASS_OBJCOMMENTINSTR.obj_hash = 564818642; cdat->dsym_239__CLASS_OBJCOMMENTINSTR.obj_len = 3; /*inistring dstr_240__CLASS_OBJCOMMENT*/ /*_.VALSTR___V409*/ meltfptr[408] = (melt_ptr_t) & cdat->dstr_240__CLASS_OBJCOMMENT; cdat->dstr_240__CLASS_OBJCOMMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_240__CLASS_OBJCOMMENT.val, "CLASS_OBJCOMMENTINSTR", sizeof (cdat->dstr_240__CLASS_OBJCOMMENT. val) - 1); cdat->dstr_240__CLASS_OBJCOMMENT.val[21] = (char) 0; cdat->dstr_240__CLASS_OBJCOMMENT.slen = 21; MELT_LOCATION ("warmelt-genobj.melt:192:/ iniobj"); /*iniobj dobj_241__CLASS_OBJCOMMENTINSTR*/ /*_.VALDATA___V410*/ meltfptr[409] = (melt_ptr_t) & cdat->dobj_241__CLASS_OBJCOMMENTINSTR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_241__CLASS_OBJCOMMENTINSTR", 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_OBJCOMMENTINSTR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_241__CLASS_OBJCOMMENTINSTR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_241__CLASS_OBJCOMMENTINSTR.obj_num = MELTOBMAG_OBJECT; cdat->dobj_241__CLASS_OBJCOMMENTINSTR.obj_hash = 860379698; cdat->dobj_241__CLASS_OBJCOMMENTINSTR.obj_len = 8; /*inistring dstr_242__CLASS_OBJCOMMENT*/ /*_.VALSTR___V411*/ meltfptr[410] = (melt_ptr_t) & cdat->dstr_242__CLASS_OBJCOMMENT; cdat->dstr_242__CLASS_OBJCOMMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_242__CLASS_OBJCOMMENT.val, "CLASS_OBJCOMMENTINSTR", sizeof (cdat->dstr_242__CLASS_OBJCOMMENT. val) - 1); cdat->dstr_242__CLASS_OBJCOMMENT.val[21] = (char) 0; cdat->dstr_242__CLASS_OBJCOMMENT.slen = 21; /*inimult dtup_243__CLASS_OBJCOMMENTINSTR */ /*_.VALTUP___V412*/ meltfptr[411] = (melt_ptr_t) & cdat->dtup_243__CLASS_OBJCOMMENTINSTR; cdat->dtup_243__CLASS_OBJCOMMENTINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_243__CLASS_OBJCOMMENTINSTR.nbval = 3; /*inimult dtup_244__CLASS_OBJCOMMENTINSTR */ /*_.VALTUP___V415*/ meltfptr[414] = (melt_ptr_t) & cdat->dtup_244__CLASS_OBJCOMMENTINSTR; cdat->dtup_244__CLASS_OBJCOMMENTINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_244__CLASS_OBJCOMMENTINSTR.nbval = 2; /*iniobj dsym_245__OBCI_COMMENT*/ /*uniqueobj*/ if (! /*_.VALDATA___V416*/ meltfptr[415]) /*_.VALDATA___V416*/ meltfptr[415] = (melt_ptr_t) & cdat->dsym_245__OBCI_COMMENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_245__OBCI_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_245__OBCI_COMMENT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_245__OBCI_COMMENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_245__OBCI_COMMENT.obj_hash = 761330428; cdat->dsym_245__OBCI_COMMENT.obj_len = 3; /*inistring dstr_246__OBCI_COMMENT*/ /*_.VALSTR___V417*/ meltfptr[416] = (melt_ptr_t) & cdat->dstr_246__OBCI_COMMENT; cdat->dstr_246__OBCI_COMMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_246__OBCI_COMMENT.val, "OBCI_COMMENT", sizeof (cdat->dstr_246__OBCI_COMMENT.val) - 1); cdat->dstr_246__OBCI_COMMENT.val[12] = (char) 0; cdat->dstr_246__OBCI_COMMENT.slen = 12; /*^iniobj */ /*iniobj dobj_247__OBCI_COMMENT*/ /*_.VALDATA___V413*/ meltfptr[412] = (melt_ptr_t) & cdat->dobj_247__OBCI_COMMENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_247__OBCI_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_247__OBCI_COMMENT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_247__OBCI_COMMENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_247__OBCI_COMMENT.obj_num = 1; cdat->dobj_247__OBCI_COMMENT.obj_hash = 628857896; cdat->dobj_247__OBCI_COMMENT.obj_len = 4; /*inistring dstr_248__OBCI_COMMENT*/ /*_.VALSTR___V414*/ meltfptr[413] = (melt_ptr_t) & cdat->dstr_248__OBCI_COMMENT; cdat->dstr_248__OBCI_COMMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_248__OBCI_COMMENT.val, "OBCI_COMMENT", sizeof (cdat->dstr_248__OBCI_COMMENT.val) - 1); cdat->dstr_248__OBCI_COMMENT.val[12] = (char) 0; cdat->dstr_248__OBCI_COMMENT.slen = 12; /*iniobj dsym_249__CLASS_OBJCHECKSIGNAL*/ /*uniqueobj*/ if (! /*_.VALDATA___V418*/ meltfptr[417]) /*_.VALDATA___V418*/ meltfptr[417] = (melt_ptr_t) & cdat->dsym_249__CLASS_OBJCHECKSIGNAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_249__CLASS_OBJCHECKSIGNAL", melt_magic_discr ((melt_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__CLASS_OBJCHECKSIGNAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_249__CLASS_OBJCHECKSIGNAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_249__CLASS_OBJCHECKSIGNAL.obj_hash = 215068855; cdat->dsym_249__CLASS_OBJCHECKSIGNAL.obj_len = 3; /*inistring dstr_250__CLASS_OBJCHECKSI*/ /*_.VALSTR___V419*/ meltfptr[418] = (melt_ptr_t) & cdat->dstr_250__CLASS_OBJCHECKSI; cdat->dstr_250__CLASS_OBJCHECKSI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_250__CLASS_OBJCHECKSI.val, "CLASS_OBJCHECKSIGNAL", sizeof (cdat->dstr_250__CLASS_OBJCHECKSI. val) - 1); cdat->dstr_250__CLASS_OBJCHECKSI.val[20] = (char) 0; cdat->dstr_250__CLASS_OBJCHECKSI.slen = 20; MELT_LOCATION ("warmelt-genobj.melt:197:/ iniobj"); /*iniobj dobj_251__CLASS_OBJCHECKSIGNAL*/ /*_.VALDATA___V420*/ meltfptr[419] = (melt_ptr_t) & cdat->dobj_251__CLASS_OBJCHECKSIGNAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_251__CLASS_OBJCHECKSIGNAL", 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_251__CLASS_OBJCHECKSIGNAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_251__CLASS_OBJCHECKSIGNAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_251__CLASS_OBJCHECKSIGNAL.obj_num = MELTOBMAG_OBJECT; cdat->dobj_251__CLASS_OBJCHECKSIGNAL.obj_hash = 873370618; cdat->dobj_251__CLASS_OBJCHECKSIGNAL.obj_len = 8; /*inistring dstr_252__CLASS_OBJCHECKSI*/ /*_.VALSTR___V421*/ meltfptr[420] = (melt_ptr_t) & cdat->dstr_252__CLASS_OBJCHECKSI; cdat->dstr_252__CLASS_OBJCHECKSI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_252__CLASS_OBJCHECKSI.val, "CLASS_OBJCHECKSIGNAL", sizeof (cdat->dstr_252__CLASS_OBJCHECKSI. val) - 1); cdat->dstr_252__CLASS_OBJCHECKSI.val[20] = (char) 0; cdat->dstr_252__CLASS_OBJCHECKSI.slen = 20; /*inimult dtup_253__CLASS_OBJCHECKSIGNAL */ /*_.VALTUP___V422*/ meltfptr[421] = (melt_ptr_t) & cdat->dtup_253__CLASS_OBJCHECKSIGNAL; cdat->dtup_253__CLASS_OBJCHECKSIGNAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_253__CLASS_OBJCHECKSIGNAL.nbval = 3; /*inimult dtup_254__CLASS_OBJCHECKSIGNAL */ /*_.VALTUP___V423*/ meltfptr[422] = (melt_ptr_t) & cdat->dtup_254__CLASS_OBJCHECKSIGNAL; cdat->dtup_254__CLASS_OBJCHECKSIGNAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_254__CLASS_OBJCHECKSIGNAL.nbval = 1; /*iniobj dsym_255__CLASS_OBJDESTINSTR*/ /*uniqueobj*/ if (! /*_.VALDATA___V424*/ meltfptr[423]) /*_.VALDATA___V424*/ meltfptr[423] = (melt_ptr_t) & cdat->dsym_255__CLASS_OBJDESTINSTR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_255__CLASS_OBJDESTINSTR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_255__CLASS_OBJDESTINSTR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_255__CLASS_OBJDESTINSTR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_255__CLASS_OBJDESTINSTR.obj_hash = 395205738; cdat->dsym_255__CLASS_OBJDESTINSTR.obj_len = 3; /*inistring dstr_256__CLASS_OBJDESTINS*/ /*_.VALSTR___V425*/ meltfptr[424] = (melt_ptr_t) & cdat->dstr_256__CLASS_OBJDESTINS; cdat->dstr_256__CLASS_OBJDESTINS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_256__CLASS_OBJDESTINS.val, "CLASS_OBJDESTINSTR", sizeof (cdat->dstr_256__CLASS_OBJDESTINS. val) - 1); cdat->dstr_256__CLASS_OBJDESTINS.val[18] = (char) 0; cdat->dstr_256__CLASS_OBJDESTINS.slen = 18; MELT_LOCATION ("warmelt-genobj.melt:203:/ iniobj"); /*iniobj dobj_257__CLASS_OBJDESTINSTR*/ /*_.VALDATA___V426*/ meltfptr[425] = (melt_ptr_t) & cdat->dobj_257__CLASS_OBJDESTINSTR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_257__CLASS_OBJDESTINSTR", 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_257__CLASS_OBJDESTINSTR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_257__CLASS_OBJDESTINSTR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_257__CLASS_OBJDESTINSTR.obj_num = MELTOBMAG_OBJECT; cdat->dobj_257__CLASS_OBJDESTINSTR.obj_hash = 570319529; cdat->dobj_257__CLASS_OBJDESTINSTR.obj_len = 8; /*inistring dstr_258__CLASS_OBJDESTINS*/ /*_.VALSTR___V427*/ meltfptr[426] = (melt_ptr_t) & cdat->dstr_258__CLASS_OBJDESTINS; cdat->dstr_258__CLASS_OBJDESTINS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_258__CLASS_OBJDESTINS.val, "CLASS_OBJDESTINSTR", sizeof (cdat->dstr_258__CLASS_OBJDESTINS. val) - 1); cdat->dstr_258__CLASS_OBJDESTINS.val[18] = (char) 0; cdat->dstr_258__CLASS_OBJDESTINS.slen = 18; /*inimult dtup_259__CLASS_OBJDESTINSTR */ /*_.VALTUP___V428*/ meltfptr[427] = (melt_ptr_t) & cdat->dtup_259__CLASS_OBJDESTINSTR; cdat->dtup_259__CLASS_OBJDESTINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_259__CLASS_OBJDESTINSTR.nbval = 3; /*inimult dtup_260__CLASS_OBJDESTINSTR */ /*_.VALTUP___V431*/ meltfptr[430] = (melt_ptr_t) & cdat->dtup_260__CLASS_OBJDESTINSTR; cdat->dtup_260__CLASS_OBJDESTINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_260__CLASS_OBJDESTINSTR.nbval = 2; /*iniobj dsym_261__OBDI_DESTLIST*/ /*uniqueobj*/ if (! /*_.VALDATA___V432*/ meltfptr[431]) /*_.VALDATA___V432*/ meltfptr[431] = (melt_ptr_t) & cdat->dsym_261__OBDI_DESTLIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_261__OBDI_DESTLIST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_261__OBDI_DESTLIST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_261__OBDI_DESTLIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_261__OBDI_DESTLIST.obj_hash = 180038599; cdat->dsym_261__OBDI_DESTLIST.obj_len = 3; /*inistring dstr_262__OBDI_DESTLIST*/ /*_.VALSTR___V433*/ meltfptr[432] = (melt_ptr_t) & cdat->dstr_262__OBDI_DESTLIST; cdat->dstr_262__OBDI_DESTLIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_262__OBDI_DESTLIST.val, "OBDI_DESTLIST", sizeof (cdat->dstr_262__OBDI_DESTLIST.val) - 1); cdat->dstr_262__OBDI_DESTLIST.val[13] = (char) 0; cdat->dstr_262__OBDI_DESTLIST.slen = 13; /*^iniobj */ /*iniobj dobj_263__OBDI_DESTLIST*/ /*_.VALDATA___V429*/ meltfptr[428] = (melt_ptr_t) & cdat->dobj_263__OBDI_DESTLIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_263__OBDI_DESTLIST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_263__OBDI_DESTLIST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_263__OBDI_DESTLIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_263__OBDI_DESTLIST.obj_num = 1; cdat->dobj_263__OBDI_DESTLIST.obj_hash = 262100156; cdat->dobj_263__OBDI_DESTLIST.obj_len = 4; /*inistring dstr_264__OBDI_DESTLIST*/ /*_.VALSTR___V430*/ meltfptr[429] = (melt_ptr_t) & cdat->dstr_264__OBDI_DESTLIST; cdat->dstr_264__OBDI_DESTLIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_264__OBDI_DESTLIST.val, "OBDI_DESTLIST", sizeof (cdat->dstr_264__OBDI_DESTLIST.val) - 1); cdat->dstr_264__OBDI_DESTLIST.val[13] = (char) 0; cdat->dstr_264__OBDI_DESTLIST.slen = 13; /*iniobj dsym_265__CLASS_OBJCOMPUTE*/ /*uniqueobj*/ if (! /*_.VALDATA___V434*/ meltfptr[433]) /*_.VALDATA___V434*/ meltfptr[433] = (melt_ptr_t) & cdat->dsym_265__CLASS_OBJCOMPUTE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_265__CLASS_OBJCOMPUTE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_265__CLASS_OBJCOMPUTE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_265__CLASS_OBJCOMPUTE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_265__CLASS_OBJCOMPUTE.obj_hash = 943434547; cdat->dsym_265__CLASS_OBJCOMPUTE.obj_len = 3; /*inistring dstr_266__CLASS_OBJCOMPUTE*/ /*_.VALSTR___V435*/ meltfptr[434] = (melt_ptr_t) & cdat->dstr_266__CLASS_OBJCOMPUTE; cdat->dstr_266__CLASS_OBJCOMPUTE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_266__CLASS_OBJCOMPUTE.val, "CLASS_OBJCOMPUTE", sizeof (cdat->dstr_266__CLASS_OBJCOMPUTE. val) - 1); cdat->dstr_266__CLASS_OBJCOMPUTE.val[16] = (char) 0; cdat->dstr_266__CLASS_OBJCOMPUTE.slen = 16; MELT_LOCATION ("warmelt-genobj.melt:209:/ iniobj"); /*iniobj dobj_267__CLASS_OBJCOMPUTE*/ /*_.VALDATA___V436*/ meltfptr[435] = (melt_ptr_t) & cdat->dobj_267__CLASS_OBJCOMPUTE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_267__CLASS_OBJCOMPUTE", 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_267__CLASS_OBJCOMPUTE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_267__CLASS_OBJCOMPUTE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_267__CLASS_OBJCOMPUTE.obj_num = MELTOBMAG_OBJECT; cdat->dobj_267__CLASS_OBJCOMPUTE.obj_hash = 695961141; cdat->dobj_267__CLASS_OBJCOMPUTE.obj_len = 8; /*inistring dstr_268__CLASS_OBJCOMPUTE*/ /*_.VALSTR___V437*/ meltfptr[436] = (melt_ptr_t) & cdat->dstr_268__CLASS_OBJCOMPUTE; cdat->dstr_268__CLASS_OBJCOMPUTE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_268__CLASS_OBJCOMPUTE.val, "CLASS_OBJCOMPUTE", sizeof (cdat->dstr_268__CLASS_OBJCOMPUTE. val) - 1); cdat->dstr_268__CLASS_OBJCOMPUTE.val[16] = (char) 0; cdat->dstr_268__CLASS_OBJCOMPUTE.slen = 16; /*inimult dtup_269__CLASS_OBJCOMPUTE */ /*_.VALTUP___V438*/ meltfptr[437] = (melt_ptr_t) & cdat->dtup_269__CLASS_OBJCOMPUTE; cdat->dtup_269__CLASS_OBJCOMPUTE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_269__CLASS_OBJCOMPUTE.nbval = 4; /*inimult dtup_270__CLASS_OBJCOMPUTE */ /*_.VALTUP___V443*/ meltfptr[442] = (melt_ptr_t) & cdat->dtup_270__CLASS_OBJCOMPUTE; cdat->dtup_270__CLASS_OBJCOMPUTE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_270__CLASS_OBJCOMPUTE.nbval = 4; /*iniobj dsym_271__OBCPT_EXPR*/ /*uniqueobj*/ if (! /*_.VALDATA___V444*/ meltfptr[443]) /*_.VALDATA___V444*/ meltfptr[443] = (melt_ptr_t) & cdat->dsym_271__OBCPT_EXPR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_271__OBCPT_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_271__OBCPT_EXPR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_271__OBCPT_EXPR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_271__OBCPT_EXPR.obj_hash = 913600920; cdat->dsym_271__OBCPT_EXPR.obj_len = 3; /*inistring dstr_272__OBCPT_EXPR*/ /*_.VALSTR___V445*/ meltfptr[444] = (melt_ptr_t) & cdat->dstr_272__OBCPT_EXPR; cdat->dstr_272__OBCPT_EXPR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_272__OBCPT_EXPR.val, "OBCPT_EXPR", sizeof (cdat->dstr_272__OBCPT_EXPR.val) - 1); cdat->dstr_272__OBCPT_EXPR.val[10] = (char) 0; cdat->dstr_272__OBCPT_EXPR.slen = 10; /*^iniobj */ /*iniobj dobj_273__OBCPT_EXPR*/ /*_.VALDATA___V439*/ meltfptr[438] = (melt_ptr_t) & cdat->dobj_273__OBCPT_EXPR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_273__OBCPT_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_273__OBCPT_EXPR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_273__OBCPT_EXPR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_273__OBCPT_EXPR.obj_num = 2; cdat->dobj_273__OBCPT_EXPR.obj_hash = 949104631; cdat->dobj_273__OBCPT_EXPR.obj_len = 4; /*inistring dstr_274__OBCPT_EXPR*/ /*_.VALSTR___V440*/ meltfptr[439] = (melt_ptr_t) & cdat->dstr_274__OBCPT_EXPR; cdat->dstr_274__OBCPT_EXPR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_274__OBCPT_EXPR.val, "OBCPT_EXPR", sizeof (cdat->dstr_274__OBCPT_EXPR.val) - 1); cdat->dstr_274__OBCPT_EXPR.val[10] = (char) 0; cdat->dstr_274__OBCPT_EXPR.slen = 10; /*iniobj dsym_275__OBCPT_TYPE*/ /*uniqueobj*/ if (! /*_.VALDATA___V446*/ meltfptr[445]) /*_.VALDATA___V446*/ meltfptr[445] = (melt_ptr_t) & cdat->dsym_275__OBCPT_TYPE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_275__OBCPT_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_275__OBCPT_TYPE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_275__OBCPT_TYPE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_275__OBCPT_TYPE.obj_hash = 613467083; cdat->dsym_275__OBCPT_TYPE.obj_len = 3; /*inistring dstr_276__OBCPT_TYPE*/ /*_.VALSTR___V447*/ meltfptr[446] = (melt_ptr_t) & cdat->dstr_276__OBCPT_TYPE; cdat->dstr_276__OBCPT_TYPE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_276__OBCPT_TYPE.val, "OBCPT_TYPE", sizeof (cdat->dstr_276__OBCPT_TYPE.val) - 1); cdat->dstr_276__OBCPT_TYPE.val[10] = (char) 0; cdat->dstr_276__OBCPT_TYPE.slen = 10; /*^iniobj */ /*iniobj dobj_277__OBCPT_TYPE*/ /*_.VALDATA___V441*/ meltfptr[440] = (melt_ptr_t) & cdat->dobj_277__OBCPT_TYPE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_277__OBCPT_TYPE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_277__OBCPT_TYPE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_277__OBCPT_TYPE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_277__OBCPT_TYPE.obj_num = 3; cdat->dobj_277__OBCPT_TYPE.obj_hash = 322516156; cdat->dobj_277__OBCPT_TYPE.obj_len = 4; /*inistring dstr_278__OBCPT_TYPE*/ /*_.VALSTR___V442*/ meltfptr[441] = (melt_ptr_t) & cdat->dstr_278__OBCPT_TYPE; cdat->dstr_278__OBCPT_TYPE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_278__OBCPT_TYPE.val, "OBCPT_TYPE", sizeof (cdat->dstr_278__OBCPT_TYPE.val) - 1); cdat->dstr_278__OBCPT_TYPE.val[10] = (char) 0; cdat->dstr_278__OBCPT_TYPE.slen = 10; /*iniobj dsym_279__CLASS_OBJGETARG*/ /*uniqueobj*/ if (! /*_.VALDATA___V448*/ meltfptr[447]) /*_.VALDATA___V448*/ meltfptr[447] = (melt_ptr_t) & cdat->dsym_279__CLASS_OBJGETARG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_279__CLASS_OBJGETARG", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_279__CLASS_OBJGETARG", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_279__CLASS_OBJGETARG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_279__CLASS_OBJGETARG.obj_hash = 596373581; cdat->dsym_279__CLASS_OBJGETARG.obj_len = 3; /*inistring dstr_280__CLASS_OBJGETARG*/ /*_.VALSTR___V449*/ meltfptr[448] = (melt_ptr_t) & cdat->dstr_280__CLASS_OBJGETARG; cdat->dstr_280__CLASS_OBJGETARG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_280__CLASS_OBJGETARG.val, "CLASS_OBJGETARG", sizeof (cdat->dstr_280__CLASS_OBJGETARG.val) - 1); cdat->dstr_280__CLASS_OBJGETARG.val[15] = (char) 0; cdat->dstr_280__CLASS_OBJGETARG.slen = 15; MELT_LOCATION ("warmelt-genobj.melt:216:/ iniobj"); /*iniobj dobj_281__CLASS_OBJGETARG*/ /*_.VALDATA___V450*/ meltfptr[449] = (melt_ptr_t) & cdat->dobj_281__CLASS_OBJGETARG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_281__CLASS_OBJGETARG", 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_281__CLASS_OBJGETARG", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_281__CLASS_OBJGETARG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_281__CLASS_OBJGETARG.obj_num = MELTOBMAG_OBJECT; cdat->dobj_281__CLASS_OBJGETARG.obj_hash = 48520172; cdat->dobj_281__CLASS_OBJGETARG.obj_len = 8; /*inistring dstr_282__CLASS_OBJGETARG*/ /*_.VALSTR___V451*/ meltfptr[450] = (melt_ptr_t) & cdat->dstr_282__CLASS_OBJGETARG; cdat->dstr_282__CLASS_OBJGETARG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_282__CLASS_OBJGETARG.val, "CLASS_OBJGETARG", sizeof (cdat->dstr_282__CLASS_OBJGETARG.val) - 1); cdat->dstr_282__CLASS_OBJGETARG.val[15] = (char) 0; cdat->dstr_282__CLASS_OBJGETARG.slen = 15; /*inimult dtup_283__CLASS_OBJGETARG */ /*_.VALTUP___V452*/ meltfptr[451] = (melt_ptr_t) & cdat->dtup_283__CLASS_OBJGETARG; cdat->dtup_283__CLASS_OBJGETARG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_283__CLASS_OBJGETARG.nbval = 3; /*inimult dtup_284__CLASS_OBJGETARG */ /*_.VALTUP___V457*/ meltfptr[456] = (melt_ptr_t) & cdat->dtup_284__CLASS_OBJGETARG; cdat->dtup_284__CLASS_OBJGETARG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_284__CLASS_OBJGETARG.nbval = 3; /*iniobj dsym_285__OBARG_OBLOC*/ /*uniqueobj*/ if (! /*_.VALDATA___V458*/ meltfptr[457]) /*_.VALDATA___V458*/ meltfptr[457] = (melt_ptr_t) & cdat->dsym_285__OBARG_OBLOC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_285__OBARG_OBLOC", melt_magic_discr ((melt_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__OBARG_OBLOC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_285__OBARG_OBLOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_285__OBARG_OBLOC.obj_hash = 699379031; cdat->dsym_285__OBARG_OBLOC.obj_len = 3; /*inistring dstr_286__OBARG_OBLOC*/ /*_.VALSTR___V459*/ meltfptr[458] = (melt_ptr_t) & cdat->dstr_286__OBARG_OBLOC; cdat->dstr_286__OBARG_OBLOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_286__OBARG_OBLOC.val, "OBARG_OBLOC", sizeof (cdat->dstr_286__OBARG_OBLOC.val) - 1); cdat->dstr_286__OBARG_OBLOC.val[11] = (char) 0; cdat->dstr_286__OBARG_OBLOC.slen = 11; /*^iniobj */ /*iniobj dobj_287__OBARG_OBLOC*/ /*_.VALDATA___V453*/ meltfptr[452] = (melt_ptr_t) & cdat->dobj_287__OBARG_OBLOC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_287__OBARG_OBLOC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_287__OBARG_OBLOC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_287__OBARG_OBLOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_287__OBARG_OBLOC.obj_num = 1; cdat->dobj_287__OBARG_OBLOC.obj_hash = 613768745; cdat->dobj_287__OBARG_OBLOC.obj_len = 4; /*inistring dstr_288__OBARG_OBLOC*/ /*_.VALSTR___V454*/ meltfptr[453] = (melt_ptr_t) & cdat->dstr_288__OBARG_OBLOC; cdat->dstr_288__OBARG_OBLOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_288__OBARG_OBLOC.val, "OBARG_OBLOC", sizeof (cdat->dstr_288__OBARG_OBLOC.val) - 1); cdat->dstr_288__OBARG_OBLOC.val[11] = (char) 0; cdat->dstr_288__OBARG_OBLOC.slen = 11; /*iniobj dsym_289__OBARG_BIND*/ /*uniqueobj*/ if (! /*_.VALDATA___V460*/ meltfptr[459]) /*_.VALDATA___V460*/ meltfptr[459] = (melt_ptr_t) & cdat->dsym_289__OBARG_BIND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_289__OBARG_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_289__OBARG_BIND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_289__OBARG_BIND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_289__OBARG_BIND.obj_hash = 537792589; cdat->dsym_289__OBARG_BIND.obj_len = 3; /*inistring dstr_290__OBARG_BIND*/ /*_.VALSTR___V461*/ meltfptr[460] = (melt_ptr_t) & cdat->dstr_290__OBARG_BIND; cdat->dstr_290__OBARG_BIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_290__OBARG_BIND.val, "OBARG_BIND", sizeof (cdat->dstr_290__OBARG_BIND.val) - 1); cdat->dstr_290__OBARG_BIND.val[10] = (char) 0; cdat->dstr_290__OBARG_BIND.slen = 10; /*^iniobj */ /*iniobj dobj_291__OBARG_BIND*/ /*_.VALDATA___V455*/ meltfptr[454] = (melt_ptr_t) & cdat->dobj_291__OBARG_BIND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_291__OBARG_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_291__OBARG_BIND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_291__OBARG_BIND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_291__OBARG_BIND.obj_num = 2; cdat->dobj_291__OBARG_BIND.obj_hash = 523008696; cdat->dobj_291__OBARG_BIND.obj_len = 4; /*inistring dstr_292__OBARG_BIND*/ /*_.VALSTR___V456*/ meltfptr[455] = (melt_ptr_t) & cdat->dstr_292__OBARG_BIND; cdat->dstr_292__OBARG_BIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_292__OBARG_BIND.val, "OBARG_BIND", sizeof (cdat->dstr_292__OBARG_BIND.val) - 1); cdat->dstr_292__OBARG_BIND.val[10] = (char) 0; cdat->dstr_292__OBARG_BIND.slen = 10; /*iniobj dsym_293__CLASS_OBJGETARGREST*/ /*uniqueobj*/ if (! /*_.VALDATA___V462*/ meltfptr[461]) /*_.VALDATA___V462*/ meltfptr[461] = (melt_ptr_t) & cdat->dsym_293__CLASS_OBJGETARGREST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_293__CLASS_OBJGETARGREST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_293__CLASS_OBJGETARGREST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_293__CLASS_OBJGETARGREST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_293__CLASS_OBJGETARGREST.obj_hash = 558628622; cdat->dsym_293__CLASS_OBJGETARGREST.obj_len = 3; /*inistring dstr_294__CLASS_OBJGETARGR*/ /*_.VALSTR___V463*/ meltfptr[462] = (melt_ptr_t) & cdat->dstr_294__CLASS_OBJGETARGR; cdat->dstr_294__CLASS_OBJGETARGR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_294__CLASS_OBJGETARGR.val, "CLASS_OBJGETARGREST", sizeof (cdat->dstr_294__CLASS_OBJGETARGR. val) - 1); cdat->dstr_294__CLASS_OBJGETARGR.val[19] = (char) 0; cdat->dstr_294__CLASS_OBJGETARGR.slen = 19; MELT_LOCATION ("warmelt-genobj.melt:223:/ iniobj"); /*iniobj dobj_295__CLASS_OBJGETARGREST*/ /*_.VALDATA___V464*/ meltfptr[463] = (melt_ptr_t) & cdat->dobj_295__CLASS_OBJGETARGREST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_295__CLASS_OBJGETARGREST", 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_295__CLASS_OBJGETARGREST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_295__CLASS_OBJGETARGREST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_295__CLASS_OBJGETARGREST.obj_num = MELTOBMAG_OBJECT; cdat->dobj_295__CLASS_OBJGETARGREST.obj_hash = 713318997; cdat->dobj_295__CLASS_OBJGETARGREST.obj_len = 8; /*inistring dstr_296__CLASS_OBJGETARGR*/ /*_.VALSTR___V465*/ meltfptr[464] = (melt_ptr_t) & cdat->dstr_296__CLASS_OBJGETARGR; cdat->dstr_296__CLASS_OBJGETARGR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_296__CLASS_OBJGETARGR.val, "CLASS_OBJGETARGREST", sizeof (cdat->dstr_296__CLASS_OBJGETARGR. val) - 1); cdat->dstr_296__CLASS_OBJGETARGR.val[19] = (char) 0; cdat->dstr_296__CLASS_OBJGETARGR.slen = 19; /*inimult dtup_297__CLASS_OBJGETARGREST */ /*_.VALTUP___V466*/ meltfptr[465] = (melt_ptr_t) & cdat->dtup_297__CLASS_OBJGETARGREST; cdat->dtup_297__CLASS_OBJGETARGREST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_297__CLASS_OBJGETARGREST.nbval = 4; /*inimult dtup_298__CLASS_OBJGETARGREST */ /*_.VALTUP___V469*/ meltfptr[468] = (melt_ptr_t) & cdat->dtup_298__CLASS_OBJGETARGREST; cdat->dtup_298__CLASS_OBJGETARGREST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_298__CLASS_OBJGETARGREST.nbval = 4; /*iniobj dsym_299__OBARG_REST*/ /*uniqueobj*/ if (! /*_.VALDATA___V470*/ meltfptr[469]) /*_.VALDATA___V470*/ meltfptr[469] = (melt_ptr_t) & cdat->dsym_299__OBARG_REST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_299__OBARG_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_299__OBARG_REST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_299__OBARG_REST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_299__OBARG_REST.obj_hash = 839139807; cdat->dsym_299__OBARG_REST.obj_len = 3; /*inistring dstr_300__OBARG_REST*/ /*_.VALSTR___V471*/ meltfptr[470] = (melt_ptr_t) & cdat->dstr_300__OBARG_REST; cdat->dstr_300__OBARG_REST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_300__OBARG_REST.val, "OBARG_REST", sizeof (cdat->dstr_300__OBARG_REST.val) - 1); cdat->dstr_300__OBARG_REST.val[10] = (char) 0; cdat->dstr_300__OBARG_REST.slen = 10; /*^iniobj */ /*iniobj dobj_301__OBARG_REST*/ /*_.VALDATA___V467*/ meltfptr[466] = (melt_ptr_t) & cdat->dobj_301__OBARG_REST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_301__OBARG_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_301__OBARG_REST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_301__OBARG_REST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_301__OBARG_REST.obj_num = 3; cdat->dobj_301__OBARG_REST.obj_hash = 310255847; cdat->dobj_301__OBARG_REST.obj_len = 4; /*inistring dstr_302__OBARG_REST*/ /*_.VALSTR___V468*/ meltfptr[467] = (melt_ptr_t) & cdat->dstr_302__OBARG_REST; cdat->dstr_302__OBARG_REST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_302__OBARG_REST.val, "OBARG_REST", sizeof (cdat->dstr_302__OBARG_REST.val) - 1); cdat->dstr_302__OBARG_REST.val[10] = (char) 0; cdat->dstr_302__OBARG_REST.slen = 10; /*iniobj dsym_303__CLASS_OBJPUTXTRARESULT*/ /*uniqueobj*/ if (! /*_.VALDATA___V472*/ meltfptr[471]) /*_.VALDATA___V472*/ meltfptr[471] = (melt_ptr_t) & cdat->dsym_303__CLASS_OBJPUTXTRARESULT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_303__CLASS_OBJPUTXTRARESULT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_303__CLASS_OBJPUTXTRARESULT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_303__CLASS_OBJPUTXTRARESULT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_303__CLASS_OBJPUTXTRARESULT.obj_hash = 66172370; cdat->dsym_303__CLASS_OBJPUTXTRARESULT.obj_len = 3; /*inistring dstr_304__CLASS_OBJPUTXTRA*/ /*_.VALSTR___V473*/ meltfptr[472] = (melt_ptr_t) & cdat->dstr_304__CLASS_OBJPUTXTRA; cdat->dstr_304__CLASS_OBJPUTXTRA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_304__CLASS_OBJPUTXTRA.val, "CLASS_OBJPUTXTRARESULT", sizeof (cdat->dstr_304__CLASS_OBJPUTXTRA. val) - 1); cdat->dstr_304__CLASS_OBJPUTXTRA.val[22] = (char) 0; cdat->dstr_304__CLASS_OBJPUTXTRA.slen = 22; MELT_LOCATION ("warmelt-genobj.melt:230:/ iniobj"); /*iniobj dobj_305__CLASS_OBJPUTXTRARESULT*/ /*_.VALDATA___V474*/ meltfptr[473] = (melt_ptr_t) & cdat->dobj_305__CLASS_OBJPUTXTRARESULT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_305__CLASS_OBJPUTXTRARESULT", 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_305__CLASS_OBJPUTXTRARESULT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_305__CLASS_OBJPUTXTRARESULT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_305__CLASS_OBJPUTXTRARESULT.obj_num = MELTOBMAG_OBJECT; cdat->dobj_305__CLASS_OBJPUTXTRARESULT.obj_hash = 961821749; cdat->dobj_305__CLASS_OBJPUTXTRARESULT.obj_len = 8; /*inistring dstr_306__CLASS_OBJPUTXTRA*/ /*_.VALSTR___V475*/ meltfptr[474] = (melt_ptr_t) & cdat->dstr_306__CLASS_OBJPUTXTRA; cdat->dstr_306__CLASS_OBJPUTXTRA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_306__CLASS_OBJPUTXTRA.val, "CLASS_OBJPUTXTRARESULT", sizeof (cdat->dstr_306__CLASS_OBJPUTXTRA. val) - 1); cdat->dstr_306__CLASS_OBJPUTXTRA.val[22] = (char) 0; cdat->dstr_306__CLASS_OBJPUTXTRA.slen = 22; /*inimult dtup_307__CLASS_OBJPUTXTRARESULT */ /*_.VALTUP___V476*/ meltfptr[475] = (melt_ptr_t) & cdat->dtup_307__CLASS_OBJPUTXTRARESULT; cdat->dtup_307__CLASS_OBJPUTXTRARESULT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_307__CLASS_OBJPUTXTRARESULT.nbval = 3; /*inimult dtup_308__CLASS_OBJPUTXTRARESULT */ /*_.VALTUP___V481*/ meltfptr[480] = (melt_ptr_t) & cdat->dtup_308__CLASS_OBJPUTXTRARESULT; cdat->dtup_308__CLASS_OBJPUTXTRARESULT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_308__CLASS_OBJPUTXTRARESULT.nbval = 3; /*iniobj dsym_309__OBXRES_RANK*/ /*uniqueobj*/ if (! /*_.VALDATA___V482*/ meltfptr[481]) /*_.VALDATA___V482*/ meltfptr[481] = (melt_ptr_t) & cdat->dsym_309__OBXRES_RANK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_309__OBXRES_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_309__OBXRES_RANK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_309__OBXRES_RANK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_309__OBXRES_RANK.obj_hash = 1046282203; cdat->dsym_309__OBXRES_RANK.obj_len = 3; /*inistring dstr_310__OBXRES_RANK*/ /*_.VALSTR___V483*/ meltfptr[482] = (melt_ptr_t) & cdat->dstr_310__OBXRES_RANK; cdat->dstr_310__OBXRES_RANK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_310__OBXRES_RANK.val, "OBXRES_RANK", sizeof (cdat->dstr_310__OBXRES_RANK.val) - 1); cdat->dstr_310__OBXRES_RANK.val[11] = (char) 0; cdat->dstr_310__OBXRES_RANK.slen = 11; /*^iniobj */ /*iniobj dobj_311__OBXRES_RANK*/ /*_.VALDATA___V477*/ meltfptr[476] = (melt_ptr_t) & cdat->dobj_311__OBXRES_RANK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_311__OBXRES_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_311__OBXRES_RANK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_311__OBXRES_RANK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_311__OBXRES_RANK.obj_num = 1; cdat->dobj_311__OBXRES_RANK.obj_hash = 913144558; cdat->dobj_311__OBXRES_RANK.obj_len = 4; /*inistring dstr_312__OBXRES_RANK*/ /*_.VALSTR___V478*/ meltfptr[477] = (melt_ptr_t) & cdat->dstr_312__OBXRES_RANK; cdat->dstr_312__OBXRES_RANK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_312__OBXRES_RANK.val, "OBXRES_RANK", sizeof (cdat->dstr_312__OBXRES_RANK.val) - 1); cdat->dstr_312__OBXRES_RANK.val[11] = (char) 0; cdat->dstr_312__OBXRES_RANK.slen = 11; /*iniobj dsym_313__OBXRES_OBLOC*/ /*uniqueobj*/ if (! /*_.VALDATA___V484*/ meltfptr[483]) /*_.VALDATA___V484*/ meltfptr[483] = (melt_ptr_t) & cdat->dsym_313__OBXRES_OBLOC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_313__OBXRES_OBLOC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_313__OBXRES_OBLOC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_313__OBXRES_OBLOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_313__OBXRES_OBLOC.obj_hash = 1017197592; cdat->dsym_313__OBXRES_OBLOC.obj_len = 3; /*inistring dstr_314__OBXRES_OBLOC*/ /*_.VALSTR___V485*/ meltfptr[484] = (melt_ptr_t) & cdat->dstr_314__OBXRES_OBLOC; cdat->dstr_314__OBXRES_OBLOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_314__OBXRES_OBLOC.val, "OBXRES_OBLOC", sizeof (cdat->dstr_314__OBXRES_OBLOC.val) - 1); cdat->dstr_314__OBXRES_OBLOC.val[12] = (char) 0; cdat->dstr_314__OBXRES_OBLOC.slen = 12; /*^iniobj */ /*iniobj dobj_315__OBXRES_OBLOC*/ /*_.VALDATA___V479*/ meltfptr[478] = (melt_ptr_t) & cdat->dobj_315__OBXRES_OBLOC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_315__OBXRES_OBLOC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_315__OBXRES_OBLOC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_315__OBXRES_OBLOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_315__OBXRES_OBLOC.obj_num = 2; cdat->dobj_315__OBXRES_OBLOC.obj_hash = 475510816; cdat->dobj_315__OBXRES_OBLOC.obj_len = 4; /*inistring dstr_316__OBXRES_OBLOC*/ /*_.VALSTR___V480*/ meltfptr[479] = (melt_ptr_t) & cdat->dstr_316__OBXRES_OBLOC; cdat->dstr_316__OBXRES_OBLOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_316__OBXRES_OBLOC.val, "OBXRES_OBLOC", sizeof (cdat->dstr_316__OBXRES_OBLOC.val) - 1); cdat->dstr_316__OBXRES_OBLOC.val[12] = (char) 0; cdat->dstr_316__OBXRES_OBLOC.slen = 12; /*iniobj dsym_317__CLASS_OBJFINALRETURN*/ /*uniqueobj*/ if (! /*_.VALDATA___V486*/ meltfptr[485]) /*_.VALDATA___V486*/ meltfptr[485] = (melt_ptr_t) & cdat->dsym_317__CLASS_OBJFINALRETURN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_317__CLASS_OBJFINALRETURN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_317__CLASS_OBJFINALRETURN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_317__CLASS_OBJFINALRETURN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_317__CLASS_OBJFINALRETURN.obj_hash = 650464089; cdat->dsym_317__CLASS_OBJFINALRETURN.obj_len = 3; /*inistring dstr_318__CLASS_OBJFINALRE*/ /*_.VALSTR___V487*/ meltfptr[486] = (melt_ptr_t) & cdat->dstr_318__CLASS_OBJFINALRE; cdat->dstr_318__CLASS_OBJFINALRE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_318__CLASS_OBJFINALRE.val, "CLASS_OBJFINALRETURN", sizeof (cdat->dstr_318__CLASS_OBJFINALRE. val) - 1); cdat->dstr_318__CLASS_OBJFINALRE.val[20] = (char) 0; cdat->dstr_318__CLASS_OBJFINALRE.slen = 20; MELT_LOCATION ("warmelt-genobj.melt:237:/ iniobj"); /*iniobj dobj_319__CLASS_OBJFINALRETURN*/ /*_.VALDATA___V488*/ meltfptr[487] = (melt_ptr_t) & cdat->dobj_319__CLASS_OBJFINALRETURN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_319__CLASS_OBJFINALRETURN", 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_319__CLASS_OBJFINALRETURN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_319__CLASS_OBJFINALRETURN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_319__CLASS_OBJFINALRETURN.obj_num = MELTOBMAG_OBJECT; cdat->dobj_319__CLASS_OBJFINALRETURN.obj_hash = 777239654; cdat->dobj_319__CLASS_OBJFINALRETURN.obj_len = 8; /*inistring dstr_320__CLASS_OBJFINALRE*/ /*_.VALSTR___V489*/ meltfptr[488] = (melt_ptr_t) & cdat->dstr_320__CLASS_OBJFINALRE; cdat->dstr_320__CLASS_OBJFINALRE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_320__CLASS_OBJFINALRE.val, "CLASS_OBJFINALRETURN", sizeof (cdat->dstr_320__CLASS_OBJFINALRE. val) - 1); cdat->dstr_320__CLASS_OBJFINALRE.val[20] = (char) 0; cdat->dstr_320__CLASS_OBJFINALRE.slen = 20; /*inimult dtup_321__CLASS_OBJFINALRETURN */ /*_.VALTUP___V490*/ meltfptr[489] = (melt_ptr_t) & cdat->dtup_321__CLASS_OBJFINALRETURN; cdat->dtup_321__CLASS_OBJFINALRETURN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_321__CLASS_OBJFINALRETURN.nbval = 3; /*inimult dtup_322__CLASS_OBJFINALRETURN */ /*_.VALTUP___V491*/ meltfptr[490] = (melt_ptr_t) & cdat->dtup_322__CLASS_OBJFINALRETURN; cdat->dtup_322__CLASS_OBJFINALRETURN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_322__CLASS_OBJFINALRETURN.nbval = 1; /*iniobj dsym_323__CLASS_OBJCLEAR*/ /*uniqueobj*/ if (! /*_.VALDATA___V492*/ meltfptr[491]) /*_.VALDATA___V492*/ meltfptr[491] = (melt_ptr_t) & cdat->dsym_323__CLASS_OBJCLEAR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_323__CLASS_OBJCLEAR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_323__CLASS_OBJCLEAR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_323__CLASS_OBJCLEAR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_323__CLASS_OBJCLEAR.obj_hash = 1071635108; cdat->dsym_323__CLASS_OBJCLEAR.obj_len = 3; /*inistring dstr_324__CLASS_OBJCLEAR*/ /*_.VALSTR___V493*/ meltfptr[492] = (melt_ptr_t) & cdat->dstr_324__CLASS_OBJCLEAR; cdat->dstr_324__CLASS_OBJCLEAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_324__CLASS_OBJCLEAR.val, "CLASS_OBJCLEAR", sizeof (cdat->dstr_324__CLASS_OBJCLEAR.val) - 1); cdat->dstr_324__CLASS_OBJCLEAR.val[14] = (char) 0; cdat->dstr_324__CLASS_OBJCLEAR.slen = 14; MELT_LOCATION ("warmelt-genobj.melt:243:/ iniobj"); /*iniobj dobj_325__CLASS_OBJCLEAR*/ /*_.VALDATA___V494*/ meltfptr[493] = (melt_ptr_t) & cdat->dobj_325__CLASS_OBJCLEAR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_325__CLASS_OBJCLEAR", 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_325__CLASS_OBJCLEAR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_325__CLASS_OBJCLEAR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_325__CLASS_OBJCLEAR.obj_num = MELTOBMAG_OBJECT; cdat->dobj_325__CLASS_OBJCLEAR.obj_hash = 681894956; cdat->dobj_325__CLASS_OBJCLEAR.obj_len = 8; /*inistring dstr_326__CLASS_OBJCLEAR*/ /*_.VALSTR___V495*/ meltfptr[494] = (melt_ptr_t) & cdat->dstr_326__CLASS_OBJCLEAR; cdat->dstr_326__CLASS_OBJCLEAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_326__CLASS_OBJCLEAR.val, "CLASS_OBJCLEAR", sizeof (cdat->dstr_326__CLASS_OBJCLEAR.val) - 1); cdat->dstr_326__CLASS_OBJCLEAR.val[14] = (char) 0; cdat->dstr_326__CLASS_OBJCLEAR.slen = 14; /*inimult dtup_327__CLASS_OBJCLEAR */ /*_.VALTUP___V496*/ meltfptr[495] = (melt_ptr_t) & cdat->dtup_327__CLASS_OBJCLEAR; cdat->dtup_327__CLASS_OBJCLEAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_327__CLASS_OBJCLEAR.nbval = 3; /*inimult dtup_328__CLASS_OBJCLEAR */ /*_.VALTUP___V499*/ meltfptr[498] = (melt_ptr_t) & cdat->dtup_328__CLASS_OBJCLEAR; cdat->dtup_328__CLASS_OBJCLEAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_328__CLASS_OBJCLEAR.nbval = 2; /*iniobj dsym_329__OCLR_VLOC*/ /*uniqueobj*/ if (! /*_.VALDATA___V500*/ meltfptr[499]) /*_.VALDATA___V500*/ meltfptr[499] = (melt_ptr_t) & cdat->dsym_329__OCLR_VLOC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_329__OCLR_VLOC", melt_magic_discr ((melt_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__OCLR_VLOC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_329__OCLR_VLOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_329__OCLR_VLOC.obj_hash = 73469244; cdat->dsym_329__OCLR_VLOC.obj_len = 3; /*inistring dstr_330__OCLR_VLOC*/ /*_.VALSTR___V501*/ meltfptr[500] = (melt_ptr_t) & cdat->dstr_330__OCLR_VLOC; cdat->dstr_330__OCLR_VLOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_330__OCLR_VLOC.val, "OCLR_VLOC", sizeof (cdat->dstr_330__OCLR_VLOC.val) - 1); cdat->dstr_330__OCLR_VLOC.val[9] = (char) 0; cdat->dstr_330__OCLR_VLOC.slen = 9; /*^iniobj */ /*iniobj dobj_331__OCLR_VLOC*/ /*_.VALDATA___V497*/ meltfptr[496] = (melt_ptr_t) & cdat->dobj_331__OCLR_VLOC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_331__OCLR_VLOC", melt_magic_discr ((melt_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__OCLR_VLOC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_331__OCLR_VLOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_331__OCLR_VLOC.obj_num = 1; cdat->dobj_331__OCLR_VLOC.obj_hash = 279434585; cdat->dobj_331__OCLR_VLOC.obj_len = 4; /*inistring dstr_332__OCLR_VLOC*/ /*_.VALSTR___V498*/ meltfptr[497] = (melt_ptr_t) & cdat->dstr_332__OCLR_VLOC; cdat->dstr_332__OCLR_VLOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_332__OCLR_VLOC.val, "OCLR_VLOC", sizeof (cdat->dstr_332__OCLR_VLOC.val) - 1); cdat->dstr_332__OCLR_VLOC.val[9] = (char) 0; cdat->dstr_332__OCLR_VLOC.slen = 9; /*iniobj dsym_333__CLASS_OBJANYBLOCK*/ /*uniqueobj*/ if (! /*_.VALDATA___V502*/ meltfptr[501]) /*_.VALDATA___V502*/ meltfptr[501] = (melt_ptr_t) & cdat->dsym_333__CLASS_OBJANYBLOCK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_333__CLASS_OBJANYBLOCK", melt_magic_discr ((melt_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_OBJANYBLOCK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_333__CLASS_OBJANYBLOCK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_333__CLASS_OBJANYBLOCK.obj_hash = 872465590; cdat->dsym_333__CLASS_OBJANYBLOCK.obj_len = 3; /*inistring dstr_334__CLASS_OBJANYBLOC*/ /*_.VALSTR___V503*/ meltfptr[502] = (melt_ptr_t) & cdat->dstr_334__CLASS_OBJANYBLOC; cdat->dstr_334__CLASS_OBJANYBLOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_334__CLASS_OBJANYBLOC.val, "CLASS_OBJANYBLOCK", sizeof (cdat->dstr_334__CLASS_OBJANYBLOC. val) - 1); cdat->dstr_334__CLASS_OBJANYBLOC.val[17] = (char) 0; cdat->dstr_334__CLASS_OBJANYBLOC.slen = 17; MELT_LOCATION ("warmelt-genobj.melt:251:/ iniobj"); /*iniobj dobj_335__CLASS_OBJANYBLOCK*/ /*_.VALDATA___V504*/ meltfptr[503] = (melt_ptr_t) & cdat->dobj_335__CLASS_OBJANYBLOCK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_335__CLASS_OBJANYBLOCK", 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_OBJANYBLOCK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_335__CLASS_OBJANYBLOCK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_335__CLASS_OBJANYBLOCK.obj_num = MELTOBMAG_OBJECT; cdat->dobj_335__CLASS_OBJANYBLOCK.obj_hash = 546111754; cdat->dobj_335__CLASS_OBJANYBLOCK.obj_len = 8; /*inistring dstr_336__CLASS_OBJANYBLOC*/ /*_.VALSTR___V505*/ meltfptr[504] = (melt_ptr_t) & cdat->dstr_336__CLASS_OBJANYBLOC; cdat->dstr_336__CLASS_OBJANYBLOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_336__CLASS_OBJANYBLOC.val, "CLASS_OBJANYBLOCK", sizeof (cdat->dstr_336__CLASS_OBJANYBLOC. val) - 1); cdat->dstr_336__CLASS_OBJANYBLOC.val[17] = (char) 0; cdat->dstr_336__CLASS_OBJANYBLOC.slen = 17; /*inimult dtup_337__CLASS_OBJANYBLOCK */ /*_.VALTUP___V506*/ meltfptr[505] = (melt_ptr_t) & cdat->dtup_337__CLASS_OBJANYBLOCK; cdat->dtup_337__CLASS_OBJANYBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_337__CLASS_OBJANYBLOCK.nbval = 3; /*inimult dtup_338__CLASS_OBJANYBLOCK */ /*_.VALTUP___V511*/ meltfptr[510] = (melt_ptr_t) & cdat->dtup_338__CLASS_OBJANYBLOCK; cdat->dtup_338__CLASS_OBJANYBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_338__CLASS_OBJANYBLOCK.nbval = 3; /*iniobj dsym_339__OBLO_BODYL*/ /*uniqueobj*/ if (! /*_.VALDATA___V512*/ meltfptr[511]) /*_.VALDATA___V512*/ meltfptr[511] = (melt_ptr_t) & cdat->dsym_339__OBLO_BODYL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_339__OBLO_BODYL", melt_magic_discr ((melt_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__OBLO_BODYL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_339__OBLO_BODYL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_339__OBLO_BODYL.obj_hash = 670858523; cdat->dsym_339__OBLO_BODYL.obj_len = 3; /*inistring dstr_340__OBLO_BODYL*/ /*_.VALSTR___V513*/ meltfptr[512] = (melt_ptr_t) & cdat->dstr_340__OBLO_BODYL; cdat->dstr_340__OBLO_BODYL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_340__OBLO_BODYL.val, "OBLO_BODYL", sizeof (cdat->dstr_340__OBLO_BODYL.val) - 1); cdat->dstr_340__OBLO_BODYL.val[10] = (char) 0; cdat->dstr_340__OBLO_BODYL.slen = 10; /*^iniobj */ /*iniobj dobj_341__OBLO_BODYL*/ /*_.VALDATA___V507*/ meltfptr[506] = (melt_ptr_t) & cdat->dobj_341__OBLO_BODYL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_341__OBLO_BODYL", melt_magic_discr ((melt_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__OBLO_BODYL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_341__OBLO_BODYL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_341__OBLO_BODYL.obj_num = 1; cdat->dobj_341__OBLO_BODYL.obj_hash = 842449010; cdat->dobj_341__OBLO_BODYL.obj_len = 4; /*inistring dstr_342__OBLO_BODYL*/ /*_.VALSTR___V508*/ meltfptr[507] = (melt_ptr_t) & cdat->dstr_342__OBLO_BODYL; cdat->dstr_342__OBLO_BODYL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_342__OBLO_BODYL.val, "OBLO_BODYL", sizeof (cdat->dstr_342__OBLO_BODYL.val) - 1); cdat->dstr_342__OBLO_BODYL.val[10] = (char) 0; cdat->dstr_342__OBLO_BODYL.slen = 10; /*iniobj dsym_343__OBLO_EPIL*/ /*uniqueobj*/ if (! /*_.VALDATA___V514*/ meltfptr[513]) /*_.VALDATA___V514*/ meltfptr[513] = (melt_ptr_t) & cdat->dsym_343__OBLO_EPIL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_343__OBLO_EPIL", melt_magic_discr ((melt_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__OBLO_EPIL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_343__OBLO_EPIL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_343__OBLO_EPIL.obj_hash = 1173969; cdat->dsym_343__OBLO_EPIL.obj_len = 3; /*inistring dstr_344__OBLO_EPIL*/ /*_.VALSTR___V515*/ meltfptr[514] = (melt_ptr_t) & cdat->dstr_344__OBLO_EPIL; cdat->dstr_344__OBLO_EPIL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_344__OBLO_EPIL.val, "OBLO_EPIL", sizeof (cdat->dstr_344__OBLO_EPIL.val) - 1); cdat->dstr_344__OBLO_EPIL.val[9] = (char) 0; cdat->dstr_344__OBLO_EPIL.slen = 9; /*^iniobj */ /*iniobj dobj_345__OBLO_EPIL*/ /*_.VALDATA___V509*/ meltfptr[508] = (melt_ptr_t) & cdat->dobj_345__OBLO_EPIL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_345__OBLO_EPIL", melt_magic_discr ((melt_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__OBLO_EPIL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_345__OBLO_EPIL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_345__OBLO_EPIL.obj_num = 2; cdat->dobj_345__OBLO_EPIL.obj_hash = 350525904; cdat->dobj_345__OBLO_EPIL.obj_len = 4; /*inistring dstr_346__OBLO_EPIL*/ /*_.VALSTR___V510*/ meltfptr[509] = (melt_ptr_t) & cdat->dstr_346__OBLO_EPIL; cdat->dstr_346__OBLO_EPIL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_346__OBLO_EPIL.val, "OBLO_EPIL", sizeof (cdat->dstr_346__OBLO_EPIL.val) - 1); cdat->dstr_346__OBLO_EPIL.val[9] = (char) 0; cdat->dstr_346__OBLO_EPIL.slen = 9; /*iniobj dsym_347__CLASS_OBJPLAINBLOCK*/ /*uniqueobj*/ if (! /*_.VALDATA___V516*/ meltfptr[515]) /*_.VALDATA___V516*/ meltfptr[515] = (melt_ptr_t) & cdat->dsym_347__CLASS_OBJPLAINBLOCK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_347__CLASS_OBJPLAINBLOCK", melt_magic_discr ((melt_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_OBJPLAINBLOCK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_347__CLASS_OBJPLAINBLOCK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_347__CLASS_OBJPLAINBLOCK.obj_hash = 984803675; cdat->dsym_347__CLASS_OBJPLAINBLOCK.obj_len = 3; /*inistring dstr_348__CLASS_OBJPLAINBL*/ /*_.VALSTR___V517*/ meltfptr[516] = (melt_ptr_t) & cdat->dstr_348__CLASS_OBJPLAINBL; cdat->dstr_348__CLASS_OBJPLAINBL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_348__CLASS_OBJPLAINBL.val, "CLASS_OBJPLAINBLOCK", sizeof (cdat->dstr_348__CLASS_OBJPLAINBL. val) - 1); cdat->dstr_348__CLASS_OBJPLAINBL.val[19] = (char) 0; cdat->dstr_348__CLASS_OBJPLAINBL.slen = 19; MELT_LOCATION ("warmelt-genobj.melt:257:/ iniobj"); /*iniobj dobj_349__CLASS_OBJPLAINBLOCK*/ /*_.VALDATA___V518*/ meltfptr[517] = (melt_ptr_t) & cdat->dobj_349__CLASS_OBJPLAINBLOCK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_349__CLASS_OBJPLAINBLOCK", 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_OBJPLAINBLOCK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_349__CLASS_OBJPLAINBLOCK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_349__CLASS_OBJPLAINBLOCK.obj_num = MELTOBMAG_OBJECT; cdat->dobj_349__CLASS_OBJPLAINBLOCK.obj_hash = 1044405469; cdat->dobj_349__CLASS_OBJPLAINBLOCK.obj_len = 8; /*inistring dstr_350__CLASS_OBJPLAINBL*/ /*_.VALSTR___V519*/ meltfptr[518] = (melt_ptr_t) & cdat->dstr_350__CLASS_OBJPLAINBL; cdat->dstr_350__CLASS_OBJPLAINBL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_350__CLASS_OBJPLAINBL.val, "CLASS_OBJPLAINBLOCK", sizeof (cdat->dstr_350__CLASS_OBJPLAINBL. val) - 1); cdat->dstr_350__CLASS_OBJPLAINBL.val[19] = (char) 0; cdat->dstr_350__CLASS_OBJPLAINBL.slen = 19; /*inimult dtup_351__CLASS_OBJPLAINBLOCK */ /*_.VALTUP___V520*/ meltfptr[519] = (melt_ptr_t) & cdat->dtup_351__CLASS_OBJPLAINBLOCK; cdat->dtup_351__CLASS_OBJPLAINBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_351__CLASS_OBJPLAINBLOCK.nbval = 4; /*inimult dtup_352__CLASS_OBJPLAINBLOCK */ /*_.VALTUP___V521*/ meltfptr[520] = (melt_ptr_t) & cdat->dtup_352__CLASS_OBJPLAINBLOCK; cdat->dtup_352__CLASS_OBJPLAINBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_352__CLASS_OBJPLAINBLOCK.nbval = 3; /*iniobj dsym_353__CLASS_OBJMULTIALLOCBLOCK*/ /*uniqueobj*/ if (! /*_.VALDATA___V522*/ meltfptr[521]) /*_.VALDATA___V522*/ meltfptr[521] = (melt_ptr_t) & cdat->dsym_353__CLASS_OBJMULTIALLOCBLOCK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_353__CLASS_OBJMULTIALLOCBLOCK", melt_magic_discr ((melt_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__CLASS_OBJMULTIALLOCBLOCK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_353__CLASS_OBJMULTIALLOCBLOCK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_353__CLASS_OBJMULTIALLOCBLOCK.obj_hash = 839199968; cdat->dsym_353__CLASS_OBJMULTIALLOCBLOCK.obj_len = 3; /*inistring dstr_354__CLASS_OBJMULTIAL*/ /*_.VALSTR___V523*/ meltfptr[522] = (melt_ptr_t) & cdat->dstr_354__CLASS_OBJMULTIAL; cdat->dstr_354__CLASS_OBJMULTIAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_354__CLASS_OBJMULTIAL.val, "CLASS_OBJMULTIALLOCBLOCK", sizeof (cdat->dstr_354__CLASS_OBJMULTIAL. val) - 1); cdat->dstr_354__CLASS_OBJMULTIAL.val[24] = (char) 0; cdat->dstr_354__CLASS_OBJMULTIAL.slen = 24; MELT_LOCATION ("warmelt-genobj.melt:263:/ iniobj"); /*iniobj dobj_355__CLASS_OBJMULTIALLOCBLOCK*/ /*_.VALDATA___V524*/ meltfptr[523] = (melt_ptr_t) & cdat->dobj_355__CLASS_OBJMULTIALLOCBLOCK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_355__CLASS_OBJMULTIALLOCBLOCK", 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_355__CLASS_OBJMULTIALLOCBLOCK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_355__CLASS_OBJMULTIALLOCBLOCK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_355__CLASS_OBJMULTIALLOCBLOCK.obj_num = MELTOBMAG_OBJECT; cdat->dobj_355__CLASS_OBJMULTIALLOCBLOCK.obj_hash = 676685698; cdat->dobj_355__CLASS_OBJMULTIALLOCBLOCK.obj_len = 8; /*inistring dstr_356__CLASS_OBJMULTIAL*/ /*_.VALSTR___V525*/ meltfptr[524] = (melt_ptr_t) & cdat->dstr_356__CLASS_OBJMULTIAL; cdat->dstr_356__CLASS_OBJMULTIAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_356__CLASS_OBJMULTIAL.val, "CLASS_OBJMULTIALLOCBLOCK", sizeof (cdat->dstr_356__CLASS_OBJMULTIAL. val) - 1); cdat->dstr_356__CLASS_OBJMULTIAL.val[24] = (char) 0; cdat->dstr_356__CLASS_OBJMULTIAL.slen = 24; /*inimult dtup_357__CLASS_OBJMULTIALLOCBLOCK */ /*_.VALTUP___V526*/ meltfptr[525] = (melt_ptr_t) & cdat->dtup_357__CLASS_OBJMULTIALLOCBLOCK; cdat->dtup_357__CLASS_OBJMULTIALLOCBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_357__CLASS_OBJMULTIALLOCBLOCK.nbval = 4; /*inimult dtup_358__CLASS_OBJMULTIALLOCBLOCK */ /*_.VALTUP___V531*/ meltfptr[530] = (melt_ptr_t) & cdat->dtup_358__CLASS_OBJMULTIALLOCBLOCK; cdat->dtup_358__CLASS_OBJMULTIALLOCBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_358__CLASS_OBJMULTIALLOCBLOCK.nbval = 5; /*iniobj dsym_359__OMALBLO_ALLSTRUCT*/ /*uniqueobj*/ if (! /*_.VALDATA___V532*/ meltfptr[531]) /*_.VALDATA___V532*/ meltfptr[531] = (melt_ptr_t) & cdat->dsym_359__OMALBLO_ALLSTRUCT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_359__OMALBLO_ALLSTRUCT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_359__OMALBLO_ALLSTRUCT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_359__OMALBLO_ALLSTRUCT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_359__OMALBLO_ALLSTRUCT.obj_hash = 884002347; cdat->dsym_359__OMALBLO_ALLSTRUCT.obj_len = 3; /*inistring dstr_360__OMALBLO_ALLSTRUC*/ /*_.VALSTR___V533*/ meltfptr[532] = (melt_ptr_t) & cdat->dstr_360__OMALBLO_ALLSTRUC; cdat->dstr_360__OMALBLO_ALLSTRUC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_360__OMALBLO_ALLSTRUC.val, "OMALBLO_ALLSTRUCT", sizeof (cdat->dstr_360__OMALBLO_ALLSTRUC. val) - 1); cdat->dstr_360__OMALBLO_ALLSTRUC.val[17] = (char) 0; cdat->dstr_360__OMALBLO_ALLSTRUC.slen = 17; /*^iniobj */ /*iniobj dobj_361__OMALBLO_ALLSTRUCT*/ /*_.VALDATA___V527*/ meltfptr[526] = (melt_ptr_t) & cdat->dobj_361__OMALBLO_ALLSTRUCT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_361__OMALBLO_ALLSTRUCT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_361__OMALBLO_ALLSTRUCT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_361__OMALBLO_ALLSTRUCT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_361__OMALBLO_ALLSTRUCT.obj_num = 3; cdat->dobj_361__OMALBLO_ALLSTRUCT.obj_hash = 380048581; cdat->dobj_361__OMALBLO_ALLSTRUCT.obj_len = 4; /*inistring dstr_362__OMALBLO_ALLSTRUC*/ /*_.VALSTR___V528*/ meltfptr[527] = (melt_ptr_t) & cdat->dstr_362__OMALBLO_ALLSTRUC; cdat->dstr_362__OMALBLO_ALLSTRUC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_362__OMALBLO_ALLSTRUC.val, "OMALBLO_ALLSTRUCT", sizeof (cdat->dstr_362__OMALBLO_ALLSTRUC. val) - 1); cdat->dstr_362__OMALBLO_ALLSTRUC.val[17] = (char) 0; cdat->dstr_362__OMALBLO_ALLSTRUC.slen = 17; /*iniobj dsym_363__OMALBLO_NAME*/ /*uniqueobj*/ if (! /*_.VALDATA___V534*/ meltfptr[533]) /*_.VALDATA___V534*/ meltfptr[533] = (melt_ptr_t) & cdat->dsym_363__OMALBLO_NAME; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_363__OMALBLO_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_363__OMALBLO_NAME", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_363__OMALBLO_NAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_363__OMALBLO_NAME.obj_hash = 109026771; cdat->dsym_363__OMALBLO_NAME.obj_len = 3; /*inistring dstr_364__OMALBLO_NAME*/ /*_.VALSTR___V535*/ meltfptr[534] = (melt_ptr_t) & cdat->dstr_364__OMALBLO_NAME; cdat->dstr_364__OMALBLO_NAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_364__OMALBLO_NAME.val, "OMALBLO_NAME", sizeof (cdat->dstr_364__OMALBLO_NAME.val) - 1); cdat->dstr_364__OMALBLO_NAME.val[12] = (char) 0; cdat->dstr_364__OMALBLO_NAME.slen = 12; /*^iniobj */ /*iniobj dobj_365__OMALBLO_NAME*/ /*_.VALDATA___V529*/ meltfptr[528] = (melt_ptr_t) & cdat->dobj_365__OMALBLO_NAME; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_365__OMALBLO_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_365__OMALBLO_NAME", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_365__OMALBLO_NAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_365__OMALBLO_NAME.obj_num = 4; cdat->dobj_365__OMALBLO_NAME.obj_hash = 655744148; cdat->dobj_365__OMALBLO_NAME.obj_len = 4; /*inistring dstr_366__OMALBLO_NAME*/ /*_.VALSTR___V530*/ meltfptr[529] = (melt_ptr_t) & cdat->dstr_366__OMALBLO_NAME; cdat->dstr_366__OMALBLO_NAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_366__OMALBLO_NAME.val, "OMALBLO_NAME", sizeof (cdat->dstr_366__OMALBLO_NAME.val) - 1); cdat->dstr_366__OMALBLO_NAME.val[12] = (char) 0; cdat->dstr_366__OMALBLO_NAME.slen = 12; /*iniobj dsym_367__CLASS_OBJCOMMENTEDBLOCK*/ /*uniqueobj*/ if (! /*_.VALDATA___V536*/ meltfptr[535]) /*_.VALDATA___V536*/ meltfptr[535] = (melt_ptr_t) & cdat->dsym_367__CLASS_OBJCOMMENTEDBLOCK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_367__CLASS_OBJCOMMENTEDBLOCK", melt_magic_discr ((melt_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__CLASS_OBJCOMMENTEDBLOCK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_367__CLASS_OBJCOMMENTEDBLOCK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_367__CLASS_OBJCOMMENTEDBLOCK.obj_hash = 94800260; cdat->dsym_367__CLASS_OBJCOMMENTEDBLOCK.obj_len = 3; /*inistring dstr_368__CLASS_OBJCOMMENT*/ /*_.VALSTR___V537*/ meltfptr[536] = (melt_ptr_t) & cdat->dstr_368__CLASS_OBJCOMMENT; cdat->dstr_368__CLASS_OBJCOMMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_368__CLASS_OBJCOMMENT.val, "CLASS_OBJCOMMENTEDBLOCK", sizeof (cdat->dstr_368__CLASS_OBJCOMMENT. val) - 1); cdat->dstr_368__CLASS_OBJCOMMENT.val[23] = (char) 0; cdat->dstr_368__CLASS_OBJCOMMENT.slen = 23; MELT_LOCATION ("warmelt-genobj.melt:271:/ iniobj"); /*iniobj dobj_369__CLASS_OBJCOMMENTEDBLOCK*/ /*_.VALDATA___V538*/ meltfptr[537] = (melt_ptr_t) & cdat->dobj_369__CLASS_OBJCOMMENTEDBLOCK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_369__CLASS_OBJCOMMENTEDBLOCK", 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_369__CLASS_OBJCOMMENTEDBLOCK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_369__CLASS_OBJCOMMENTEDBLOCK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_369__CLASS_OBJCOMMENTEDBLOCK.obj_num = MELTOBMAG_OBJECT; cdat->dobj_369__CLASS_OBJCOMMENTEDBLOCK.obj_hash = 1036132194; cdat->dobj_369__CLASS_OBJCOMMENTEDBLOCK.obj_len = 8; /*inistring dstr_370__CLASS_OBJCOMMENT*/ /*_.VALSTR___V539*/ meltfptr[538] = (melt_ptr_t) & cdat->dstr_370__CLASS_OBJCOMMENT; cdat->dstr_370__CLASS_OBJCOMMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_370__CLASS_OBJCOMMENT.val, "CLASS_OBJCOMMENTEDBLOCK", sizeof (cdat->dstr_370__CLASS_OBJCOMMENT. val) - 1); cdat->dstr_370__CLASS_OBJCOMMENT.val[23] = (char) 0; cdat->dstr_370__CLASS_OBJCOMMENT.slen = 23; /*inimult dtup_371__CLASS_OBJCOMMENTEDBLOCK */ /*_.VALTUP___V540*/ meltfptr[539] = (melt_ptr_t) & cdat->dtup_371__CLASS_OBJCOMMENTEDBLOCK; cdat->dtup_371__CLASS_OBJCOMMENTEDBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_371__CLASS_OBJCOMMENTEDBLOCK.nbval = 4; /*inimult dtup_372__CLASS_OBJCOMMENTEDBLOCK */ /*_.VALTUP___V543*/ meltfptr[542] = (melt_ptr_t) & cdat->dtup_372__CLASS_OBJCOMMENTEDBLOCK; cdat->dtup_372__CLASS_OBJCOMMENTEDBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_372__CLASS_OBJCOMMENTEDBLOCK.nbval = 4; /*iniobj dsym_373__OCOMBLO_COMMENT*/ /*uniqueobj*/ if (! /*_.VALDATA___V544*/ meltfptr[543]) /*_.VALDATA___V544*/ meltfptr[543] = (melt_ptr_t) & cdat->dsym_373__OCOMBLO_COMMENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_373__OCOMBLO_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_373__OCOMBLO_COMMENT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_373__OCOMBLO_COMMENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_373__OCOMBLO_COMMENT.obj_hash = 712376266; cdat->dsym_373__OCOMBLO_COMMENT.obj_len = 3; /*inistring dstr_374__OCOMBLO_COMMENT*/ /*_.VALSTR___V545*/ meltfptr[544] = (melt_ptr_t) & cdat->dstr_374__OCOMBLO_COMMENT; cdat->dstr_374__OCOMBLO_COMMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_374__OCOMBLO_COMMENT.val, "OCOMBLO_COMMENT", sizeof (cdat->dstr_374__OCOMBLO_COMMENT.val) - 1); cdat->dstr_374__OCOMBLO_COMMENT.val[15] = (char) 0; cdat->dstr_374__OCOMBLO_COMMENT.slen = 15; /*^iniobj */ /*iniobj dobj_375__OCOMBLO_COMMENT*/ /*_.VALDATA___V541*/ meltfptr[540] = (melt_ptr_t) & cdat->dobj_375__OCOMBLO_COMMENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_375__OCOMBLO_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_375__OCOMBLO_COMMENT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_375__OCOMBLO_COMMENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_375__OCOMBLO_COMMENT.obj_num = 3; cdat->dobj_375__OCOMBLO_COMMENT.obj_hash = 532446916; cdat->dobj_375__OCOMBLO_COMMENT.obj_len = 4; /*inistring dstr_376__OCOMBLO_COMMENT*/ /*_.VALSTR___V542*/ meltfptr[541] = (melt_ptr_t) & cdat->dstr_376__OCOMBLO_COMMENT; cdat->dstr_376__OCOMBLO_COMMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_376__OCOMBLO_COMMENT.val, "OCOMBLO_COMMENT", sizeof (cdat->dstr_376__OCOMBLO_COMMENT.val) - 1); cdat->dstr_376__OCOMBLO_COMMENT.val[15] = (char) 0; cdat->dstr_376__OCOMBLO_COMMENT.slen = 15; /*iniobj dsym_377__CLASS_OBJMULTIBLOCK*/ /*uniqueobj*/ if (! /*_.VALDATA___V546*/ meltfptr[545]) /*_.VALDATA___V546*/ meltfptr[545] = (melt_ptr_t) & cdat->dsym_377__CLASS_OBJMULTIBLOCK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_377__CLASS_OBJMULTIBLOCK", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_377__CLASS_OBJMULTIBLOCK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_377__CLASS_OBJMULTIBLOCK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_377__CLASS_OBJMULTIBLOCK.obj_hash = 792736107; cdat->dsym_377__CLASS_OBJMULTIBLOCK.obj_len = 3; /*inistring dstr_378__CLASS_OBJMULTIBL*/ /*_.VALSTR___V547*/ meltfptr[546] = (melt_ptr_t) & cdat->dstr_378__CLASS_OBJMULTIBL; cdat->dstr_378__CLASS_OBJMULTIBL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_378__CLASS_OBJMULTIBL.val, "CLASS_OBJMULTIBLOCK", sizeof (cdat->dstr_378__CLASS_OBJMULTIBL. val) - 1); cdat->dstr_378__CLASS_OBJMULTIBL.val[19] = (char) 0; cdat->dstr_378__CLASS_OBJMULTIBL.slen = 19; MELT_LOCATION ("warmelt-genobj.melt:279:/ iniobj"); /*iniobj dobj_379__CLASS_OBJMULTIBLOCK*/ /*_.VALDATA___V548*/ meltfptr[547] = (melt_ptr_t) & cdat->dobj_379__CLASS_OBJMULTIBLOCK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_379__CLASS_OBJMULTIBLOCK", 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_379__CLASS_OBJMULTIBLOCK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_379__CLASS_OBJMULTIBLOCK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_379__CLASS_OBJMULTIBLOCK.obj_num = MELTOBMAG_OBJECT; cdat->dobj_379__CLASS_OBJMULTIBLOCK.obj_hash = 579740260; cdat->dobj_379__CLASS_OBJMULTIBLOCK.obj_len = 8; /*inistring dstr_380__CLASS_OBJMULTIBL*/ /*_.VALSTR___V549*/ meltfptr[548] = (melt_ptr_t) & cdat->dstr_380__CLASS_OBJMULTIBL; cdat->dstr_380__CLASS_OBJMULTIBL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_380__CLASS_OBJMULTIBL.val, "CLASS_OBJMULTIBLOCK", sizeof (cdat->dstr_380__CLASS_OBJMULTIBL. val) - 1); cdat->dstr_380__CLASS_OBJMULTIBL.val[19] = (char) 0; cdat->dstr_380__CLASS_OBJMULTIBL.slen = 19; /*inimult dtup_381__CLASS_OBJMULTIBLOCK */ /*_.VALTUP___V550*/ meltfptr[549] = (melt_ptr_t) & cdat->dtup_381__CLASS_OBJMULTIBLOCK; cdat->dtup_381__CLASS_OBJMULTIBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_381__CLASS_OBJMULTIBLOCK.nbval = 4; /*inimult dtup_382__CLASS_OBJMULTIBLOCK */ /*_.VALTUP___V553*/ meltfptr[552] = (melt_ptr_t) & cdat->dtup_382__CLASS_OBJMULTIBLOCK; cdat->dtup_382__CLASS_OBJMULTIBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_382__CLASS_OBJMULTIBLOCK.nbval = 4; /*iniobj dsym_383__OMULBLO_SUBCOMP*/ /*uniqueobj*/ if (! /*_.VALDATA___V554*/ meltfptr[553]) /*_.VALDATA___V554*/ meltfptr[553] = (melt_ptr_t) & cdat->dsym_383__OMULBLO_SUBCOMP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_383__OMULBLO_SUBCOMP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_383__OMULBLO_SUBCOMP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_383__OMULBLO_SUBCOMP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_383__OMULBLO_SUBCOMP.obj_hash = 959451844; cdat->dsym_383__OMULBLO_SUBCOMP.obj_len = 3; /*inistring dstr_384__OMULBLO_SUBCOMP*/ /*_.VALSTR___V555*/ meltfptr[554] = (melt_ptr_t) & cdat->dstr_384__OMULBLO_SUBCOMP; cdat->dstr_384__OMULBLO_SUBCOMP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_384__OMULBLO_SUBCOMP.val, "OMULBLO_SUBCOMP", sizeof (cdat->dstr_384__OMULBLO_SUBCOMP.val) - 1); cdat->dstr_384__OMULBLO_SUBCOMP.val[15] = (char) 0; cdat->dstr_384__OMULBLO_SUBCOMP.slen = 15; /*^iniobj */ /*iniobj dobj_385__OMULBLO_SUBCOMP*/ /*_.VALDATA___V551*/ meltfptr[550] = (melt_ptr_t) & cdat->dobj_385__OMULBLO_SUBCOMP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_385__OMULBLO_SUBCOMP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_385__OMULBLO_SUBCOMP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_385__OMULBLO_SUBCOMP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_385__OMULBLO_SUBCOMP.obj_num = 3; cdat->dobj_385__OMULBLO_SUBCOMP.obj_hash = 1059959310; cdat->dobj_385__OMULBLO_SUBCOMP.obj_len = 4; /*inistring dstr_386__OMULBLO_SUBCOMP*/ /*_.VALSTR___V552*/ meltfptr[551] = (melt_ptr_t) & cdat->dstr_386__OMULBLO_SUBCOMP; cdat->dstr_386__OMULBLO_SUBCOMP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_386__OMULBLO_SUBCOMP.val, "OMULBLO_SUBCOMP", sizeof (cdat->dstr_386__OMULBLO_SUBCOMP.val) - 1); cdat->dstr_386__OMULBLO_SUBCOMP.val[15] = (char) 0; cdat->dstr_386__OMULBLO_SUBCOMP.slen = 15; /*iniobj dsym_387__CLASS_OBJMATCHFLAGBLOCK*/ /*uniqueobj*/ if (! /*_.VALDATA___V556*/ meltfptr[555]) /*_.VALDATA___V556*/ meltfptr[555] = (melt_ptr_t) & cdat->dsym_387__CLASS_OBJMATCHFLAGBLOCK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_387__CLASS_OBJMATCHFLAGBLOCK", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_387__CLASS_OBJMATCHFLAGBLOCK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_387__CLASS_OBJMATCHFLAGBLOCK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_387__CLASS_OBJMATCHFLAGBLOCK.obj_hash = 561303579; cdat->dsym_387__CLASS_OBJMATCHFLAGBLOCK.obj_len = 3; /*inistring dstr_388__CLASS_OBJMATCHFL*/ /*_.VALSTR___V557*/ meltfptr[556] = (melt_ptr_t) & cdat->dstr_388__CLASS_OBJMATCHFL; cdat->dstr_388__CLASS_OBJMATCHFL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_388__CLASS_OBJMATCHFL.val, "CLASS_OBJMATCHFLAGBLOCK", sizeof (cdat->dstr_388__CLASS_OBJMATCHFL. val) - 1); cdat->dstr_388__CLASS_OBJMATCHFL.val[23] = (char) 0; cdat->dstr_388__CLASS_OBJMATCHFL.slen = 23; MELT_LOCATION ("warmelt-genobj.melt:287:/ iniobj"); /*iniobj dobj_389__CLASS_OBJMATCHFLAGBLOCK*/ /*_.VALDATA___V558*/ meltfptr[557] = (melt_ptr_t) & cdat->dobj_389__CLASS_OBJMATCHFLAGBLOCK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_389__CLASS_OBJMATCHFLAGBLOCK", 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_389__CLASS_OBJMATCHFLAGBLOCK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_389__CLASS_OBJMATCHFLAGBLOCK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_389__CLASS_OBJMATCHFLAGBLOCK.obj_num = MELTOBMAG_OBJECT; cdat->dobj_389__CLASS_OBJMATCHFLAGBLOCK.obj_hash = 485491872; cdat->dobj_389__CLASS_OBJMATCHFLAGBLOCK.obj_len = 8; /*inistring dstr_390__CLASS_OBJMATCHFL*/ /*_.VALSTR___V559*/ meltfptr[558] = (melt_ptr_t) & cdat->dstr_390__CLASS_OBJMATCHFL; cdat->dstr_390__CLASS_OBJMATCHFL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_390__CLASS_OBJMATCHFL.val, "CLASS_OBJMATCHFLAGBLOCK", sizeof (cdat->dstr_390__CLASS_OBJMATCHFL. val) - 1); cdat->dstr_390__CLASS_OBJMATCHFL.val[23] = (char) 0; cdat->dstr_390__CLASS_OBJMATCHFL.slen = 23; /*inimult dtup_391__CLASS_OBJMATCHFLAGBLOCK */ /*_.VALTUP___V560*/ meltfptr[559] = (melt_ptr_t) & cdat->dtup_391__CLASS_OBJMATCHFLAGBLOCK; cdat->dtup_391__CLASS_OBJMATCHFLAGBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_391__CLASS_OBJMATCHFLAGBLOCK.nbval = 4; /*inimult dtup_392__CLASS_OBJMATCHFLAGBLOCK */ /*_.VALTUP___V563*/ meltfptr[562] = (melt_ptr_t) & cdat->dtup_392__CLASS_OBJMATCHFLAGBLOCK; cdat->dtup_392__CLASS_OBJMATCHFLAGBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_392__CLASS_OBJMATCHFLAGBLOCK.nbval = 4; /*iniobj dsym_393__OMCHFLGBLO_FLAGS*/ /*uniqueobj*/ if (! /*_.VALDATA___V564*/ meltfptr[563]) /*_.VALDATA___V564*/ meltfptr[563] = (melt_ptr_t) & cdat->dsym_393__OMCHFLGBLO_FLAGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_393__OMCHFLGBLO_FLAGS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_393__OMCHFLGBLO_FLAGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_393__OMCHFLGBLO_FLAGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_393__OMCHFLGBLO_FLAGS.obj_hash = 848783613; cdat->dsym_393__OMCHFLGBLO_FLAGS.obj_len = 3; /*inistring dstr_394__OMCHFLGBLO_FLAGS*/ /*_.VALSTR___V565*/ meltfptr[564] = (melt_ptr_t) & cdat->dstr_394__OMCHFLGBLO_FLAGS; cdat->dstr_394__OMCHFLGBLO_FLAGS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_394__OMCHFLGBLO_FLAGS.val, "OMCHFLGBLO_FLAGS", sizeof (cdat->dstr_394__OMCHFLGBLO_FLAGS. val) - 1); cdat->dstr_394__OMCHFLGBLO_FLAGS.val[16] = (char) 0; cdat->dstr_394__OMCHFLGBLO_FLAGS.slen = 16; /*^iniobj */ /*iniobj dobj_395__OMCHFLGBLO_FLAGS*/ /*_.VALDATA___V561*/ meltfptr[560] = (melt_ptr_t) & cdat->dobj_395__OMCHFLGBLO_FLAGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_395__OMCHFLGBLO_FLAGS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_395__OMCHFLGBLO_FLAGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_395__OMCHFLGBLO_FLAGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_395__OMCHFLGBLO_FLAGS.obj_num = 3; cdat->dobj_395__OMCHFLGBLO_FLAGS.obj_hash = 1028468221; cdat->dobj_395__OMCHFLGBLO_FLAGS.obj_len = 4; /*inistring dstr_396__OMCHFLGBLO_FLAGS*/ /*_.VALSTR___V562*/ meltfptr[561] = (melt_ptr_t) & cdat->dstr_396__OMCHFLGBLO_FLAGS; cdat->dstr_396__OMCHFLGBLO_FLAGS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_396__OMCHFLGBLO_FLAGS.val, "OMCHFLGBLO_FLAGS", sizeof (cdat->dstr_396__OMCHFLGBLO_FLAGS. val) - 1); cdat->dstr_396__OMCHFLGBLO_FLAGS.val[16] = (char) 0; cdat->dstr_396__OMCHFLGBLO_FLAGS.slen = 16; /*iniobj dsym_397__CLASS_OBJLABELINSTR*/ /*uniqueobj*/ if (! /*_.VALDATA___V566*/ meltfptr[565]) /*_.VALDATA___V566*/ meltfptr[565] = (melt_ptr_t) & cdat->dsym_397__CLASS_OBJLABELINSTR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_397__CLASS_OBJLABELINSTR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_397__CLASS_OBJLABELINSTR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_397__CLASS_OBJLABELINSTR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_397__CLASS_OBJLABELINSTR.obj_hash = 573008884; cdat->dsym_397__CLASS_OBJLABELINSTR.obj_len = 3; /*inistring dstr_398__CLASS_OBJLABELIN*/ /*_.VALSTR___V567*/ meltfptr[566] = (melt_ptr_t) & cdat->dstr_398__CLASS_OBJLABELIN; cdat->dstr_398__CLASS_OBJLABELIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_398__CLASS_OBJLABELIN.val, "CLASS_OBJLABELINSTR", sizeof (cdat->dstr_398__CLASS_OBJLABELIN. val) - 1); cdat->dstr_398__CLASS_OBJLABELIN.val[19] = (char) 0; cdat->dstr_398__CLASS_OBJLABELIN.slen = 19; MELT_LOCATION ("warmelt-genobj.melt:293:/ iniobj"); /*iniobj dobj_399__CLASS_OBJLABELINSTR*/ /*_.VALDATA___V568*/ meltfptr[567] = (melt_ptr_t) & cdat->dobj_399__CLASS_OBJLABELINSTR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_399__CLASS_OBJLABELINSTR", 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_399__CLASS_OBJLABELINSTR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_399__CLASS_OBJLABELINSTR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_399__CLASS_OBJLABELINSTR.obj_num = MELTOBMAG_OBJECT; cdat->dobj_399__CLASS_OBJLABELINSTR.obj_hash = 436925964; cdat->dobj_399__CLASS_OBJLABELINSTR.obj_len = 8; /*inistring dstr_400__CLASS_OBJLABELIN*/ /*_.VALSTR___V569*/ meltfptr[568] = (melt_ptr_t) & cdat->dstr_400__CLASS_OBJLABELIN; cdat->dstr_400__CLASS_OBJLABELIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_400__CLASS_OBJLABELIN.val, "CLASS_OBJLABELINSTR", sizeof (cdat->dstr_400__CLASS_OBJLABELIN. val) - 1); cdat->dstr_400__CLASS_OBJLABELIN.val[19] = (char) 0; cdat->dstr_400__CLASS_OBJLABELIN.slen = 19; /*inimult dtup_401__CLASS_OBJLABELINSTR */ /*_.VALTUP___V570*/ meltfptr[569] = (melt_ptr_t) & cdat->dtup_401__CLASS_OBJLABELINSTR; cdat->dtup_401__CLASS_OBJLABELINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_401__CLASS_OBJLABELINSTR.nbval = 3; /*inimult dtup_402__CLASS_OBJLABELINSTR */ /*_.VALTUP___V575*/ meltfptr[574] = (melt_ptr_t) & cdat->dtup_402__CLASS_OBJLABELINSTR; cdat->dtup_402__CLASS_OBJLABELINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_402__CLASS_OBJLABELINSTR.nbval = 3; /*iniobj dsym_403__OBLAB_PREFIX*/ /*uniqueobj*/ if (! /*_.VALDATA___V576*/ meltfptr[575]) /*_.VALDATA___V576*/ meltfptr[575] = (melt_ptr_t) & cdat->dsym_403__OBLAB_PREFIX; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_403__OBLAB_PREFIX", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_403__OBLAB_PREFIX", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_403__OBLAB_PREFIX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_403__OBLAB_PREFIX.obj_hash = 840012268; cdat->dsym_403__OBLAB_PREFIX.obj_len = 3; /*inistring dstr_404__OBLAB_PREFIX*/ /*_.VALSTR___V577*/ meltfptr[576] = (melt_ptr_t) & cdat->dstr_404__OBLAB_PREFIX; cdat->dstr_404__OBLAB_PREFIX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_404__OBLAB_PREFIX.val, "OBLAB_PREFIX", sizeof (cdat->dstr_404__OBLAB_PREFIX.val) - 1); cdat->dstr_404__OBLAB_PREFIX.val[12] = (char) 0; cdat->dstr_404__OBLAB_PREFIX.slen = 12; /*^iniobj */ /*iniobj dobj_405__OBLAB_PREFIX*/ /*_.VALDATA___V571*/ meltfptr[570] = (melt_ptr_t) & cdat->dobj_405__OBLAB_PREFIX; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_405__OBLAB_PREFIX", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_405__OBLAB_PREFIX", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_405__OBLAB_PREFIX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_405__OBLAB_PREFIX.obj_num = 1; cdat->dobj_405__OBLAB_PREFIX.obj_hash = 593516466; cdat->dobj_405__OBLAB_PREFIX.obj_len = 4; /*inistring dstr_406__OBLAB_PREFIX*/ /*_.VALSTR___V572*/ meltfptr[571] = (melt_ptr_t) & cdat->dstr_406__OBLAB_PREFIX; cdat->dstr_406__OBLAB_PREFIX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_406__OBLAB_PREFIX.val, "OBLAB_PREFIX", sizeof (cdat->dstr_406__OBLAB_PREFIX.val) - 1); cdat->dstr_406__OBLAB_PREFIX.val[12] = (char) 0; cdat->dstr_406__OBLAB_PREFIX.slen = 12; /*iniobj dsym_407__OBLAB_RANK*/ /*uniqueobj*/ if (! /*_.VALDATA___V578*/ meltfptr[577]) /*_.VALDATA___V578*/ meltfptr[577] = (melt_ptr_t) & cdat->dsym_407__OBLAB_RANK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_407__OBLAB_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_407__OBLAB_RANK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_407__OBLAB_RANK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_407__OBLAB_RANK.obj_hash = 496762826; cdat->dsym_407__OBLAB_RANK.obj_len = 3; /*inistring dstr_408__OBLAB_RANK*/ /*_.VALSTR___V579*/ meltfptr[578] = (melt_ptr_t) & cdat->dstr_408__OBLAB_RANK; cdat->dstr_408__OBLAB_RANK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_408__OBLAB_RANK.val, "OBLAB_RANK", sizeof (cdat->dstr_408__OBLAB_RANK.val) - 1); cdat->dstr_408__OBLAB_RANK.val[10] = (char) 0; cdat->dstr_408__OBLAB_RANK.slen = 10; /*^iniobj */ /*iniobj dobj_409__OBLAB_RANK*/ /*_.VALDATA___V573*/ meltfptr[572] = (melt_ptr_t) & cdat->dobj_409__OBLAB_RANK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_409__OBLAB_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_409__OBLAB_RANK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_409__OBLAB_RANK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_409__OBLAB_RANK.obj_num = 2; cdat->dobj_409__OBLAB_RANK.obj_hash = 1018733189; cdat->dobj_409__OBLAB_RANK.obj_len = 4; /*inistring dstr_410__OBLAB_RANK*/ /*_.VALSTR___V574*/ meltfptr[573] = (melt_ptr_t) & cdat->dstr_410__OBLAB_RANK; cdat->dstr_410__OBLAB_RANK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_410__OBLAB_RANK.val, "OBLAB_RANK", sizeof (cdat->dstr_410__OBLAB_RANK.val) - 1); cdat->dstr_410__OBLAB_RANK.val[10] = (char) 0; cdat->dstr_410__OBLAB_RANK.slen = 10; /*iniobj dsym_411__CLASS_OBJGOTOINSTR*/ /*uniqueobj*/ if (! /*_.VALDATA___V580*/ meltfptr[579]) /*_.VALDATA___V580*/ meltfptr[579] = (melt_ptr_t) & cdat->dsym_411__CLASS_OBJGOTOINSTR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_411__CLASS_OBJGOTOINSTR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_411__CLASS_OBJGOTOINSTR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_411__CLASS_OBJGOTOINSTR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_411__CLASS_OBJGOTOINSTR.obj_hash = 100586655; cdat->dsym_411__CLASS_OBJGOTOINSTR.obj_len = 3; /*inistring dstr_412__CLASS_OBJGOTOINS*/ /*_.VALSTR___V581*/ meltfptr[580] = (melt_ptr_t) & cdat->dstr_412__CLASS_OBJGOTOINS; cdat->dstr_412__CLASS_OBJGOTOINS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_412__CLASS_OBJGOTOINS.val, "CLASS_OBJGOTOINSTR", sizeof (cdat->dstr_412__CLASS_OBJGOTOINS. val) - 1); cdat->dstr_412__CLASS_OBJGOTOINS.val[18] = (char) 0; cdat->dstr_412__CLASS_OBJGOTOINS.slen = 18; MELT_LOCATION ("warmelt-genobj.melt:300:/ iniobj"); /*iniobj dobj_413__CLASS_OBJGOTOINSTR*/ /*_.VALDATA___V582*/ meltfptr[581] = (melt_ptr_t) & cdat->dobj_413__CLASS_OBJGOTOINSTR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_413__CLASS_OBJGOTOINSTR", 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_413__CLASS_OBJGOTOINSTR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_413__CLASS_OBJGOTOINSTR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_413__CLASS_OBJGOTOINSTR.obj_num = MELTOBMAG_OBJECT; cdat->dobj_413__CLASS_OBJGOTOINSTR.obj_hash = 162138576; cdat->dobj_413__CLASS_OBJGOTOINSTR.obj_len = 8; /*inistring dstr_414__CLASS_OBJGOTOINS*/ /*_.VALSTR___V583*/ meltfptr[582] = (melt_ptr_t) & cdat->dstr_414__CLASS_OBJGOTOINS; cdat->dstr_414__CLASS_OBJGOTOINS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_414__CLASS_OBJGOTOINS.val, "CLASS_OBJGOTOINSTR", sizeof (cdat->dstr_414__CLASS_OBJGOTOINS. val) - 1); cdat->dstr_414__CLASS_OBJGOTOINS.val[18] = (char) 0; cdat->dstr_414__CLASS_OBJGOTOINS.slen = 18; /*inimult dtup_415__CLASS_OBJGOTOINSTR */ /*_.VALTUP___V584*/ meltfptr[583] = (melt_ptr_t) & cdat->dtup_415__CLASS_OBJGOTOINSTR; cdat->dtup_415__CLASS_OBJGOTOINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_415__CLASS_OBJGOTOINSTR.nbval = 3; /*inimult dtup_416__CLASS_OBJGOTOINSTR */ /*_.VALTUP___V589*/ meltfptr[588] = (melt_ptr_t) & cdat->dtup_416__CLASS_OBJGOTOINSTR; cdat->dtup_416__CLASS_OBJGOTOINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_416__CLASS_OBJGOTOINSTR.nbval = 3; /*iniobj dsym_417__OBGOTO_PREFIX*/ /*uniqueobj*/ if (! /*_.VALDATA___V590*/ meltfptr[589]) /*_.VALDATA___V590*/ meltfptr[589] = (melt_ptr_t) & cdat->dsym_417__OBGOTO_PREFIX; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_417__OBGOTO_PREFIX", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_417__OBGOTO_PREFIX", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_417__OBGOTO_PREFIX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_417__OBGOTO_PREFIX.obj_hash = 25959994; cdat->dsym_417__OBGOTO_PREFIX.obj_len = 3; /*inistring dstr_418__OBGOTO_PREFIX*/ /*_.VALSTR___V591*/ meltfptr[590] = (melt_ptr_t) & cdat->dstr_418__OBGOTO_PREFIX; cdat->dstr_418__OBGOTO_PREFIX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_418__OBGOTO_PREFIX.val, "OBGOTO_PREFIX", sizeof (cdat->dstr_418__OBGOTO_PREFIX.val) - 1); cdat->dstr_418__OBGOTO_PREFIX.val[13] = (char) 0; cdat->dstr_418__OBGOTO_PREFIX.slen = 13; /*^iniobj */ /*iniobj dobj_419__OBGOTO_PREFIX*/ /*_.VALDATA___V585*/ meltfptr[584] = (melt_ptr_t) & cdat->dobj_419__OBGOTO_PREFIX; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_419__OBGOTO_PREFIX", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_419__OBGOTO_PREFIX", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_419__OBGOTO_PREFIX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_419__OBGOTO_PREFIX.obj_num = 1; cdat->dobj_419__OBGOTO_PREFIX.obj_hash = 780445858; cdat->dobj_419__OBGOTO_PREFIX.obj_len = 4; /*inistring dstr_420__OBGOTO_PREFIX*/ /*_.VALSTR___V586*/ meltfptr[585] = (melt_ptr_t) & cdat->dstr_420__OBGOTO_PREFIX; cdat->dstr_420__OBGOTO_PREFIX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_420__OBGOTO_PREFIX.val, "OBGOTO_PREFIX", sizeof (cdat->dstr_420__OBGOTO_PREFIX.val) - 1); cdat->dstr_420__OBGOTO_PREFIX.val[13] = (char) 0; cdat->dstr_420__OBGOTO_PREFIX.slen = 13; /*iniobj dsym_421__OBGOTO_RANK*/ /*uniqueobj*/ if (! /*_.VALDATA___V592*/ meltfptr[591]) /*_.VALDATA___V592*/ meltfptr[591] = (melt_ptr_t) & cdat->dsym_421__OBGOTO_RANK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_421__OBGOTO_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_421__OBGOTO_RANK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_421__OBGOTO_RANK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_421__OBGOTO_RANK.obj_hash = 264149341; cdat->dsym_421__OBGOTO_RANK.obj_len = 3; /*inistring dstr_422__OBGOTO_RANK*/ /*_.VALSTR___V593*/ meltfptr[592] = (melt_ptr_t) & cdat->dstr_422__OBGOTO_RANK; cdat->dstr_422__OBGOTO_RANK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_422__OBGOTO_RANK.val, "OBGOTO_RANK", sizeof (cdat->dstr_422__OBGOTO_RANK.val) - 1); cdat->dstr_422__OBGOTO_RANK.val[11] = (char) 0; cdat->dstr_422__OBGOTO_RANK.slen = 11; /*^iniobj */ /*iniobj dobj_423__OBGOTO_RANK*/ /*_.VALDATA___V587*/ meltfptr[586] = (melt_ptr_t) & cdat->dobj_423__OBGOTO_RANK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_423__OBGOTO_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_423__OBGOTO_RANK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_423__OBGOTO_RANK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_423__OBGOTO_RANK.obj_num = 2; cdat->dobj_423__OBGOTO_RANK.obj_hash = 811624894; cdat->dobj_423__OBGOTO_RANK.obj_len = 4; /*inistring dstr_424__OBGOTO_RANK*/ /*_.VALSTR___V588*/ meltfptr[587] = (melt_ptr_t) & cdat->dstr_424__OBGOTO_RANK; cdat->dstr_424__OBGOTO_RANK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_424__OBGOTO_RANK.val, "OBGOTO_RANK", sizeof (cdat->dstr_424__OBGOTO_RANK.val) - 1); cdat->dstr_424__OBGOTO_RANK.val[11] = (char) 0; cdat->dstr_424__OBGOTO_RANK.slen = 11; /*iniobj dsym_425__CLASS_OBJLOOP*/ /*uniqueobj*/ if (! /*_.VALDATA___V594*/ meltfptr[593]) /*_.VALDATA___V594*/ meltfptr[593] = (melt_ptr_t) & cdat->dsym_425__CLASS_OBJLOOP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_425__CLASS_OBJLOOP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_425__CLASS_OBJLOOP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_425__CLASS_OBJLOOP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_425__CLASS_OBJLOOP.obj_hash = 763853388; cdat->dsym_425__CLASS_OBJLOOP.obj_len = 3; /*inistring dstr_426__CLASS_OBJLOOP*/ /*_.VALSTR___V595*/ meltfptr[594] = (melt_ptr_t) & cdat->dstr_426__CLASS_OBJLOOP; cdat->dstr_426__CLASS_OBJLOOP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_426__CLASS_OBJLOOP.val, "CLASS_OBJLOOP", sizeof (cdat->dstr_426__CLASS_OBJLOOP.val) - 1); cdat->dstr_426__CLASS_OBJLOOP.val[13] = (char) 0; cdat->dstr_426__CLASS_OBJLOOP.slen = 13; MELT_LOCATION ("warmelt-genobj.melt:307:/ iniobj"); /*iniobj dobj_427__CLASS_OBJLOOP*/ /*_.VALDATA___V596*/ meltfptr[595] = (melt_ptr_t) & cdat->dobj_427__CLASS_OBJLOOP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_427__CLASS_OBJLOOP", 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_427__CLASS_OBJLOOP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_427__CLASS_OBJLOOP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_427__CLASS_OBJLOOP.obj_num = MELTOBMAG_OBJECT; cdat->dobj_427__CLASS_OBJLOOP.obj_hash = 734194805; cdat->dobj_427__CLASS_OBJLOOP.obj_len = 8; /*inistring dstr_428__CLASS_OBJLOOP*/ /*_.VALSTR___V597*/ meltfptr[596] = (melt_ptr_t) & cdat->dstr_428__CLASS_OBJLOOP; cdat->dstr_428__CLASS_OBJLOOP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_428__CLASS_OBJLOOP.val, "CLASS_OBJLOOP", sizeof (cdat->dstr_428__CLASS_OBJLOOP.val) - 1); cdat->dstr_428__CLASS_OBJLOOP.val[13] = (char) 0; cdat->dstr_428__CLASS_OBJLOOP.slen = 13; /*inimult dtup_429__CLASS_OBJLOOP */ /*_.VALTUP___V598*/ meltfptr[597] = (melt_ptr_t) & cdat->dtup_429__CLASS_OBJLOOP; cdat->dtup_429__CLASS_OBJLOOP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_429__CLASS_OBJLOOP.nbval = 4; /*inimult dtup_430__CLASS_OBJLOOP */ /*_.VALTUP___V603*/ meltfptr[602] = (melt_ptr_t) & cdat->dtup_430__CLASS_OBJLOOP; cdat->dtup_430__CLASS_OBJLOOP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_430__CLASS_OBJLOOP.nbval = 5; /*iniobj dsym_431__OBLOOP_LABEL*/ /*uniqueobj*/ if (! /*_.VALDATA___V604*/ meltfptr[603]) /*_.VALDATA___V604*/ meltfptr[603] = (melt_ptr_t) & cdat->dsym_431__OBLOOP_LABEL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_431__OBLOOP_LABEL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_431__OBLOOP_LABEL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_431__OBLOOP_LABEL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_431__OBLOOP_LABEL.obj_hash = 684962223; cdat->dsym_431__OBLOOP_LABEL.obj_len = 3; /*inistring dstr_432__OBLOOP_LABEL*/ /*_.VALSTR___V605*/ meltfptr[604] = (melt_ptr_t) & cdat->dstr_432__OBLOOP_LABEL; cdat->dstr_432__OBLOOP_LABEL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_432__OBLOOP_LABEL.val, "OBLOOP_LABEL", sizeof (cdat->dstr_432__OBLOOP_LABEL.val) - 1); cdat->dstr_432__OBLOOP_LABEL.val[12] = (char) 0; cdat->dstr_432__OBLOOP_LABEL.slen = 12; /*^iniobj */ /*iniobj dobj_433__OBLOOP_LABEL*/ /*_.VALDATA___V599*/ meltfptr[598] = (melt_ptr_t) & cdat->dobj_433__OBLOOP_LABEL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_433__OBLOOP_LABEL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_433__OBLOOP_LABEL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_433__OBLOOP_LABEL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_433__OBLOOP_LABEL.obj_num = 3; cdat->dobj_433__OBLOOP_LABEL.obj_hash = 921334544; cdat->dobj_433__OBLOOP_LABEL.obj_len = 4; /*inistring dstr_434__OBLOOP_LABEL*/ /*_.VALSTR___V600*/ meltfptr[599] = (melt_ptr_t) & cdat->dstr_434__OBLOOP_LABEL; cdat->dstr_434__OBLOOP_LABEL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_434__OBLOOP_LABEL.val, "OBLOOP_LABEL", sizeof (cdat->dstr_434__OBLOOP_LABEL.val) - 1); cdat->dstr_434__OBLOOP_LABEL.val[12] = (char) 0; cdat->dstr_434__OBLOOP_LABEL.slen = 12; /*iniobj dsym_435__OBLOOP_RESV*/ /*uniqueobj*/ if (! /*_.VALDATA___V606*/ meltfptr[605]) /*_.VALDATA___V606*/ meltfptr[605] = (melt_ptr_t) & cdat->dsym_435__OBLOOP_RESV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_435__OBLOOP_RESV", melt_magic_discr ((melt_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__OBLOOP_RESV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_435__OBLOOP_RESV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_435__OBLOOP_RESV.obj_hash = 70873018; cdat->dsym_435__OBLOOP_RESV.obj_len = 3; /*inistring dstr_436__OBLOOP_RESV*/ /*_.VALSTR___V607*/ meltfptr[606] = (melt_ptr_t) & cdat->dstr_436__OBLOOP_RESV; cdat->dstr_436__OBLOOP_RESV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_436__OBLOOP_RESV.val, "OBLOOP_RESV", sizeof (cdat->dstr_436__OBLOOP_RESV.val) - 1); cdat->dstr_436__OBLOOP_RESV.val[11] = (char) 0; cdat->dstr_436__OBLOOP_RESV.slen = 11; /*^iniobj */ /*iniobj dobj_437__OBLOOP_RESV*/ /*_.VALDATA___V601*/ meltfptr[600] = (melt_ptr_t) & cdat->dobj_437__OBLOOP_RESV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_437__OBLOOP_RESV", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_437__OBLOOP_RESV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_437__OBLOOP_RESV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_437__OBLOOP_RESV.obj_num = 4; cdat->dobj_437__OBLOOP_RESV.obj_hash = 878306546; cdat->dobj_437__OBLOOP_RESV.obj_len = 4; /*inistring dstr_438__OBLOOP_RESV*/ /*_.VALSTR___V602*/ meltfptr[601] = (melt_ptr_t) & cdat->dstr_438__OBLOOP_RESV; cdat->dstr_438__OBLOOP_RESV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_438__OBLOOP_RESV.val, "OBLOOP_RESV", sizeof (cdat->dstr_438__OBLOOP_RESV.val) - 1); cdat->dstr_438__OBLOOP_RESV.val[11] = (char) 0; cdat->dstr_438__OBLOOP_RESV.slen = 11; /*iniobj dsym_439__CLASS_OBJEXIT*/ /*uniqueobj*/ if (! /*_.VALDATA___V608*/ meltfptr[607]) /*_.VALDATA___V608*/ meltfptr[607] = (melt_ptr_t) & cdat->dsym_439__CLASS_OBJEXIT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_439__CLASS_OBJEXIT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_439__CLASS_OBJEXIT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_439__CLASS_OBJEXIT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_439__CLASS_OBJEXIT.obj_hash = 635210442; cdat->dsym_439__CLASS_OBJEXIT.obj_len = 3; /*inistring dstr_440__CLASS_OBJEXIT*/ /*_.VALSTR___V609*/ meltfptr[608] = (melt_ptr_t) & cdat->dstr_440__CLASS_OBJEXIT; cdat->dstr_440__CLASS_OBJEXIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_440__CLASS_OBJEXIT.val, "CLASS_OBJEXIT", sizeof (cdat->dstr_440__CLASS_OBJEXIT.val) - 1); cdat->dstr_440__CLASS_OBJEXIT.val[13] = (char) 0; cdat->dstr_440__CLASS_OBJEXIT.slen = 13; MELT_LOCATION ("warmelt-genobj.melt:314:/ iniobj"); /*iniobj dobj_441__CLASS_OBJEXIT*/ /*_.VALDATA___V610*/ meltfptr[609] = (melt_ptr_t) & cdat->dobj_441__CLASS_OBJEXIT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_441__CLASS_OBJEXIT", 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_441__CLASS_OBJEXIT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_441__CLASS_OBJEXIT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_441__CLASS_OBJEXIT.obj_num = MELTOBMAG_OBJECT; cdat->dobj_441__CLASS_OBJEXIT.obj_hash = 254178290; cdat->dobj_441__CLASS_OBJEXIT.obj_len = 8; /*inistring dstr_442__CLASS_OBJEXIT*/ /*_.VALSTR___V611*/ meltfptr[610] = (melt_ptr_t) & cdat->dstr_442__CLASS_OBJEXIT; cdat->dstr_442__CLASS_OBJEXIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_442__CLASS_OBJEXIT.val, "CLASS_OBJEXIT", sizeof (cdat->dstr_442__CLASS_OBJEXIT.val) - 1); cdat->dstr_442__CLASS_OBJEXIT.val[13] = (char) 0; cdat->dstr_442__CLASS_OBJEXIT.slen = 13; /*inimult dtup_443__CLASS_OBJEXIT */ /*_.VALTUP___V612*/ meltfptr[611] = (melt_ptr_t) & cdat->dtup_443__CLASS_OBJEXIT; cdat->dtup_443__CLASS_OBJEXIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_443__CLASS_OBJEXIT.nbval = 3; /*inimult dtup_444__CLASS_OBJEXIT */ /*_.VALTUP___V615*/ meltfptr[614] = (melt_ptr_t) & cdat->dtup_444__CLASS_OBJEXIT; cdat->dtup_444__CLASS_OBJEXIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_444__CLASS_OBJEXIT.nbval = 2; /*iniobj dsym_445__OBEXIT_LABEL*/ /*uniqueobj*/ if (! /*_.VALDATA___V616*/ meltfptr[615]) /*_.VALDATA___V616*/ meltfptr[615] = (melt_ptr_t) & cdat->dsym_445__OBEXIT_LABEL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_445__OBEXIT_LABEL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_445__OBEXIT_LABEL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_445__OBEXIT_LABEL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_445__OBEXIT_LABEL.obj_hash = 737884684; cdat->dsym_445__OBEXIT_LABEL.obj_len = 3; /*inistring dstr_446__OBEXIT_LABEL*/ /*_.VALSTR___V617*/ meltfptr[616] = (melt_ptr_t) & cdat->dstr_446__OBEXIT_LABEL; cdat->dstr_446__OBEXIT_LABEL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_446__OBEXIT_LABEL.val, "OBEXIT_LABEL", sizeof (cdat->dstr_446__OBEXIT_LABEL.val) - 1); cdat->dstr_446__OBEXIT_LABEL.val[12] = (char) 0; cdat->dstr_446__OBEXIT_LABEL.slen = 12; /*^iniobj */ /*iniobj dobj_447__OBEXIT_LABEL*/ /*_.VALDATA___V613*/ meltfptr[612] = (melt_ptr_t) & cdat->dobj_447__OBEXIT_LABEL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_447__OBEXIT_LABEL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_447__OBEXIT_LABEL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_447__OBEXIT_LABEL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_447__OBEXIT_LABEL.obj_num = 1; cdat->dobj_447__OBEXIT_LABEL.obj_hash = 427994256; cdat->dobj_447__OBEXIT_LABEL.obj_len = 4; /*inistring dstr_448__OBEXIT_LABEL*/ /*_.VALSTR___V614*/ meltfptr[613] = (melt_ptr_t) & cdat->dstr_448__OBEXIT_LABEL; cdat->dstr_448__OBEXIT_LABEL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_448__OBEXIT_LABEL.val, "OBEXIT_LABEL", sizeof (cdat->dstr_448__OBEXIT_LABEL.val) - 1); cdat->dstr_448__OBEXIT_LABEL.val[12] = (char) 0; cdat->dstr_448__OBEXIT_LABEL.slen = 12; /*iniobj dsym_449__CLASS_OBJAGAIN*/ /*uniqueobj*/ if (! /*_.VALDATA___V618*/ meltfptr[617]) /*_.VALDATA___V618*/ meltfptr[617] = (melt_ptr_t) & cdat->dsym_449__CLASS_OBJAGAIN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_449__CLASS_OBJAGAIN", melt_magic_discr ((melt_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__CLASS_OBJAGAIN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_449__CLASS_OBJAGAIN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_449__CLASS_OBJAGAIN.obj_hash = 540256863; cdat->dsym_449__CLASS_OBJAGAIN.obj_len = 3; /*inistring dstr_450__CLASS_OBJAGAIN*/ /*_.VALSTR___V619*/ meltfptr[618] = (melt_ptr_t) & cdat->dstr_450__CLASS_OBJAGAIN; cdat->dstr_450__CLASS_OBJAGAIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_450__CLASS_OBJAGAIN.val, "CLASS_OBJAGAIN", sizeof (cdat->dstr_450__CLASS_OBJAGAIN.val) - 1); cdat->dstr_450__CLASS_OBJAGAIN.val[14] = (char) 0; cdat->dstr_450__CLASS_OBJAGAIN.slen = 14; MELT_LOCATION ("warmelt-genobj.melt:320:/ iniobj"); /*iniobj dobj_451__CLASS_OBJAGAIN*/ /*_.VALDATA___V620*/ meltfptr[619] = (melt_ptr_t) & cdat->dobj_451__CLASS_OBJAGAIN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_451__CLASS_OBJAGAIN", 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_451__CLASS_OBJAGAIN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_451__CLASS_OBJAGAIN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_451__CLASS_OBJAGAIN.obj_num = MELTOBMAG_OBJECT; cdat->dobj_451__CLASS_OBJAGAIN.obj_hash = 182649680; cdat->dobj_451__CLASS_OBJAGAIN.obj_len = 8; /*inistring dstr_452__CLASS_OBJAGAIN*/ /*_.VALSTR___V621*/ meltfptr[620] = (melt_ptr_t) & cdat->dstr_452__CLASS_OBJAGAIN; cdat->dstr_452__CLASS_OBJAGAIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_452__CLASS_OBJAGAIN.val, "CLASS_OBJAGAIN", sizeof (cdat->dstr_452__CLASS_OBJAGAIN.val) - 1); cdat->dstr_452__CLASS_OBJAGAIN.val[14] = (char) 0; cdat->dstr_452__CLASS_OBJAGAIN.slen = 14; /*inimult dtup_453__CLASS_OBJAGAIN */ /*_.VALTUP___V622*/ meltfptr[621] = (melt_ptr_t) & cdat->dtup_453__CLASS_OBJAGAIN; cdat->dtup_453__CLASS_OBJAGAIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_453__CLASS_OBJAGAIN.nbval = 3; /*inimult dtup_454__CLASS_OBJAGAIN */ /*_.VALTUP___V625*/ meltfptr[624] = (melt_ptr_t) & cdat->dtup_454__CLASS_OBJAGAIN; cdat->dtup_454__CLASS_OBJAGAIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_454__CLASS_OBJAGAIN.nbval = 2; /*iniobj dsym_455__OBAGAIN_LABEL*/ /*uniqueobj*/ if (! /*_.VALDATA___V626*/ meltfptr[625]) /*_.VALDATA___V626*/ meltfptr[625] = (melt_ptr_t) & cdat->dsym_455__OBAGAIN_LABEL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_455__OBAGAIN_LABEL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_455__OBAGAIN_LABEL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_455__OBAGAIN_LABEL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_455__OBAGAIN_LABEL.obj_hash = 125931725; cdat->dsym_455__OBAGAIN_LABEL.obj_len = 3; /*inistring dstr_456__OBAGAIN_LABEL*/ /*_.VALSTR___V627*/ meltfptr[626] = (melt_ptr_t) & cdat->dstr_456__OBAGAIN_LABEL; cdat->dstr_456__OBAGAIN_LABEL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_456__OBAGAIN_LABEL.val, "OBAGAIN_LABEL", sizeof (cdat->dstr_456__OBAGAIN_LABEL.val) - 1); cdat->dstr_456__OBAGAIN_LABEL.val[13] = (char) 0; cdat->dstr_456__OBAGAIN_LABEL.slen = 13; /*^iniobj */ /*iniobj dobj_457__OBAGAIN_LABEL*/ /*_.VALDATA___V623*/ meltfptr[622] = (melt_ptr_t) & cdat->dobj_457__OBAGAIN_LABEL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_457__OBAGAIN_LABEL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_457__OBAGAIN_LABEL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_457__OBAGAIN_LABEL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_457__OBAGAIN_LABEL.obj_num = 1; cdat->dobj_457__OBAGAIN_LABEL.obj_hash = 5831175; cdat->dobj_457__OBAGAIN_LABEL.obj_len = 4; /*inistring dstr_458__OBAGAIN_LABEL*/ /*_.VALSTR___V624*/ meltfptr[623] = (melt_ptr_t) & cdat->dstr_458__OBAGAIN_LABEL; cdat->dstr_458__OBAGAIN_LABEL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_458__OBAGAIN_LABEL.val, "OBAGAIN_LABEL", sizeof (cdat->dstr_458__OBAGAIN_LABEL.val) - 1); cdat->dstr_458__OBAGAIN_LABEL.val[13] = (char) 0; cdat->dstr_458__OBAGAIN_LABEL.slen = 13; /*iniobj dsym_459__CLASS_OBJCITERBLOCK*/ /*uniqueobj*/ if (! /*_.VALDATA___V628*/ meltfptr[627]) /*_.VALDATA___V628*/ meltfptr[627] = (melt_ptr_t) & cdat->dsym_459__CLASS_OBJCITERBLOCK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_459__CLASS_OBJCITERBLOCK", melt_magic_discr ((melt_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__CLASS_OBJCITERBLOCK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_459__CLASS_OBJCITERBLOCK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_459__CLASS_OBJCITERBLOCK.obj_hash = 897861098; cdat->dsym_459__CLASS_OBJCITERBLOCK.obj_len = 3; /*inistring dstr_460__CLASS_OBJCITERBL*/ /*_.VALSTR___V629*/ meltfptr[628] = (melt_ptr_t) & cdat->dstr_460__CLASS_OBJCITERBL; cdat->dstr_460__CLASS_OBJCITERBL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_460__CLASS_OBJCITERBL.val, "CLASS_OBJCITERBLOCK", sizeof (cdat->dstr_460__CLASS_OBJCITERBL. val) - 1); cdat->dstr_460__CLASS_OBJCITERBL.val[19] = (char) 0; cdat->dstr_460__CLASS_OBJCITERBL.slen = 19; MELT_LOCATION ("warmelt-genobj.melt:327:/ iniobj"); /*iniobj dobj_461__CLASS_OBJCITERBLOCK*/ /*_.VALDATA___V630*/ meltfptr[629] = (melt_ptr_t) & cdat->dobj_461__CLASS_OBJCITERBLOCK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_461__CLASS_OBJCITERBLOCK", 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_461__CLASS_OBJCITERBLOCK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_461__CLASS_OBJCITERBLOCK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_461__CLASS_OBJCITERBLOCK.obj_num = MELTOBMAG_OBJECT; cdat->dobj_461__CLASS_OBJCITERBLOCK.obj_hash = 996913744; cdat->dobj_461__CLASS_OBJCITERBLOCK.obj_len = 8; /*inistring dstr_462__CLASS_OBJCITERBL*/ /*_.VALSTR___V631*/ meltfptr[630] = (melt_ptr_t) & cdat->dstr_462__CLASS_OBJCITERBL; cdat->dstr_462__CLASS_OBJCITERBL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_462__CLASS_OBJCITERBL.val, "CLASS_OBJCITERBLOCK", sizeof (cdat->dstr_462__CLASS_OBJCITERBL. val) - 1); cdat->dstr_462__CLASS_OBJCITERBL.val[19] = (char) 0; cdat->dstr_462__CLASS_OBJCITERBL.slen = 19; /*inimult dtup_463__CLASS_OBJCITERBLOCK */ /*_.VALTUP___V632*/ meltfptr[631] = (melt_ptr_t) & cdat->dtup_463__CLASS_OBJCITERBLOCK; cdat->dtup_463__CLASS_OBJCITERBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_463__CLASS_OBJCITERBLOCK.nbval = 4; /*inimult dtup_464__CLASS_OBJCITERBLOCK */ /*_.VALTUP___V639*/ meltfptr[638] = (melt_ptr_t) & cdat->dtup_464__CLASS_OBJCITERBLOCK; cdat->dtup_464__CLASS_OBJCITERBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_464__CLASS_OBJCITERBLOCK.nbval = 6; /*iniobj dsym_465__OBCITER_CITER*/ /*uniqueobj*/ if (! /*_.VALDATA___V640*/ meltfptr[639]) /*_.VALDATA___V640*/ meltfptr[639] = (melt_ptr_t) & cdat->dsym_465__OBCITER_CITER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_465__OBCITER_CITER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_465__OBCITER_CITER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_465__OBCITER_CITER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_465__OBCITER_CITER.obj_hash = 69011792; cdat->dsym_465__OBCITER_CITER.obj_len = 3; /*inistring dstr_466__OBCITER_CITER*/ /*_.VALSTR___V641*/ meltfptr[640] = (melt_ptr_t) & cdat->dstr_466__OBCITER_CITER; cdat->dstr_466__OBCITER_CITER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_466__OBCITER_CITER.val, "OBCITER_CITER", sizeof (cdat->dstr_466__OBCITER_CITER.val) - 1); cdat->dstr_466__OBCITER_CITER.val[13] = (char) 0; cdat->dstr_466__OBCITER_CITER.slen = 13; /*^iniobj */ /*iniobj dobj_467__OBCITER_CITER*/ /*_.VALDATA___V633*/ meltfptr[632] = (melt_ptr_t) & cdat->dobj_467__OBCITER_CITER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_467__OBCITER_CITER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_467__OBCITER_CITER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_467__OBCITER_CITER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_467__OBCITER_CITER.obj_num = 3; cdat->dobj_467__OBCITER_CITER.obj_hash = 140537329; cdat->dobj_467__OBCITER_CITER.obj_len = 4; /*inistring dstr_468__OBCITER_CITER*/ /*_.VALSTR___V634*/ meltfptr[633] = (melt_ptr_t) & cdat->dstr_468__OBCITER_CITER; cdat->dstr_468__OBCITER_CITER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_468__OBCITER_CITER.val, "OBCITER_CITER", sizeof (cdat->dstr_468__OBCITER_CITER.val) - 1); cdat->dstr_468__OBCITER_CITER.val[13] = (char) 0; cdat->dstr_468__OBCITER_CITER.slen = 13; /*iniobj dsym_469__OBCITER_BEFORE*/ /*uniqueobj*/ if (! /*_.VALDATA___V642*/ meltfptr[641]) /*_.VALDATA___V642*/ meltfptr[641] = (melt_ptr_t) & cdat->dsym_469__OBCITER_BEFORE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_469__OBCITER_BEFORE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_469__OBCITER_BEFORE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_469__OBCITER_BEFORE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_469__OBCITER_BEFORE.obj_hash = 297072; cdat->dsym_469__OBCITER_BEFORE.obj_len = 3; /*inistring dstr_470__OBCITER_BEFORE*/ /*_.VALSTR___V643*/ meltfptr[642] = (melt_ptr_t) & cdat->dstr_470__OBCITER_BEFORE; cdat->dstr_470__OBCITER_BEFORE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_470__OBCITER_BEFORE.val, "OBCITER_BEFORE", sizeof (cdat->dstr_470__OBCITER_BEFORE.val) - 1); cdat->dstr_470__OBCITER_BEFORE.val[14] = (char) 0; cdat->dstr_470__OBCITER_BEFORE.slen = 14; /*^iniobj */ /*iniobj dobj_471__OBCITER_BEFORE*/ /*_.VALDATA___V635*/ meltfptr[634] = (melt_ptr_t) & cdat->dobj_471__OBCITER_BEFORE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_471__OBCITER_BEFORE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_471__OBCITER_BEFORE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_471__OBCITER_BEFORE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_471__OBCITER_BEFORE.obj_num = 4; cdat->dobj_471__OBCITER_BEFORE.obj_hash = 15333776; cdat->dobj_471__OBCITER_BEFORE.obj_len = 4; /*inistring dstr_472__OBCITER_BEFORE*/ /*_.VALSTR___V636*/ meltfptr[635] = (melt_ptr_t) & cdat->dstr_472__OBCITER_BEFORE; cdat->dstr_472__OBCITER_BEFORE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_472__OBCITER_BEFORE.val, "OBCITER_BEFORE", sizeof (cdat->dstr_472__OBCITER_BEFORE.val) - 1); cdat->dstr_472__OBCITER_BEFORE.val[14] = (char) 0; cdat->dstr_472__OBCITER_BEFORE.slen = 14; /*iniobj dsym_473__OBCITER_AFTER*/ /*uniqueobj*/ if (! /*_.VALDATA___V644*/ meltfptr[643]) /*_.VALDATA___V644*/ meltfptr[643] = (melt_ptr_t) & cdat->dsym_473__OBCITER_AFTER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_473__OBCITER_AFTER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_473__OBCITER_AFTER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_473__OBCITER_AFTER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_473__OBCITER_AFTER.obj_hash = 376122538; cdat->dsym_473__OBCITER_AFTER.obj_len = 3; /*inistring dstr_474__OBCITER_AFTER*/ /*_.VALSTR___V645*/ meltfptr[644] = (melt_ptr_t) & cdat->dstr_474__OBCITER_AFTER; cdat->dstr_474__OBCITER_AFTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_474__OBCITER_AFTER.val, "OBCITER_AFTER", sizeof (cdat->dstr_474__OBCITER_AFTER.val) - 1); cdat->dstr_474__OBCITER_AFTER.val[13] = (char) 0; cdat->dstr_474__OBCITER_AFTER.slen = 13; /*^iniobj */ /*iniobj dobj_475__OBCITER_AFTER*/ /*_.VALDATA___V637*/ meltfptr[636] = (melt_ptr_t) & cdat->dobj_475__OBCITER_AFTER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_475__OBCITER_AFTER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_475__OBCITER_AFTER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_475__OBCITER_AFTER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_475__OBCITER_AFTER.obj_num = 5; cdat->dobj_475__OBCITER_AFTER.obj_hash = 249688152; cdat->dobj_475__OBCITER_AFTER.obj_len = 4; /*inistring dstr_476__OBCITER_AFTER*/ /*_.VALSTR___V638*/ meltfptr[637] = (melt_ptr_t) & cdat->dstr_476__OBCITER_AFTER; cdat->dstr_476__OBCITER_AFTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_476__OBCITER_AFTER.val, "OBCITER_AFTER", sizeof (cdat->dstr_476__OBCITER_AFTER.val) - 1); cdat->dstr_476__OBCITER_AFTER.val[13] = (char) 0; cdat->dstr_476__OBCITER_AFTER.slen = 13; /*iniobj dsym_477__CLASS_OBJCOND*/ /*uniqueobj*/ if (! /*_.VALDATA___V646*/ meltfptr[645]) /*_.VALDATA___V646*/ meltfptr[645] = (melt_ptr_t) & cdat->dsym_477__CLASS_OBJCOND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_477__CLASS_OBJCOND", melt_magic_discr ((melt_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__CLASS_OBJCOND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_477__CLASS_OBJCOND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_477__CLASS_OBJCOND.obj_hash = 545823211; cdat->dsym_477__CLASS_OBJCOND.obj_len = 3; /*inistring dstr_478__CLASS_OBJCOND*/ /*_.VALSTR___V647*/ meltfptr[646] = (melt_ptr_t) & cdat->dstr_478__CLASS_OBJCOND; cdat->dstr_478__CLASS_OBJCOND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_478__CLASS_OBJCOND.val, "CLASS_OBJCOND", sizeof (cdat->dstr_478__CLASS_OBJCOND.val) - 1); cdat->dstr_478__CLASS_OBJCOND.val[13] = (char) 0; cdat->dstr_478__CLASS_OBJCOND.slen = 13; MELT_LOCATION ("warmelt-genobj.melt:335:/ iniobj"); /*iniobj dobj_479__CLASS_OBJCOND*/ /*_.VALDATA___V648*/ meltfptr[647] = (melt_ptr_t) & cdat->dobj_479__CLASS_OBJCOND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_479__CLASS_OBJCOND", 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_479__CLASS_OBJCOND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_479__CLASS_OBJCOND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_479__CLASS_OBJCOND.obj_num = MELTOBMAG_OBJECT; cdat->dobj_479__CLASS_OBJCOND.obj_hash = 820701075; cdat->dobj_479__CLASS_OBJCOND.obj_len = 8; /*inistring dstr_480__CLASS_OBJCOND*/ /*_.VALSTR___V649*/ meltfptr[648] = (melt_ptr_t) & cdat->dstr_480__CLASS_OBJCOND; cdat->dstr_480__CLASS_OBJCOND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_480__CLASS_OBJCOND.val, "CLASS_OBJCOND", sizeof (cdat->dstr_480__CLASS_OBJCOND.val) - 1); cdat->dstr_480__CLASS_OBJCOND.val[13] = (char) 0; cdat->dstr_480__CLASS_OBJCOND.slen = 13; /*inimult dtup_481__CLASS_OBJCOND */ /*_.VALTUP___V650*/ meltfptr[649] = (melt_ptr_t) & cdat->dtup_481__CLASS_OBJCOND; cdat->dtup_481__CLASS_OBJCOND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_481__CLASS_OBJCOND.nbval = 3; /*inimult dtup_482__CLASS_OBJCOND */ /*_.VALTUP___V657*/ meltfptr[656] = (melt_ptr_t) & cdat->dtup_482__CLASS_OBJCOND; cdat->dtup_482__CLASS_OBJCOND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_482__CLASS_OBJCOND.nbval = 4; /*iniobj dsym_483__OBCOND_TEST*/ /*uniqueobj*/ if (! /*_.VALDATA___V658*/ meltfptr[657]) /*_.VALDATA___V658*/ meltfptr[657] = (melt_ptr_t) & cdat->dsym_483__OBCOND_TEST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_483__OBCOND_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_483__OBCOND_TEST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_483__OBCOND_TEST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_483__OBCOND_TEST.obj_hash = 1013458796; cdat->dsym_483__OBCOND_TEST.obj_len = 3; /*inistring dstr_484__OBCOND_TEST*/ /*_.VALSTR___V659*/ meltfptr[658] = (melt_ptr_t) & cdat->dstr_484__OBCOND_TEST; cdat->dstr_484__OBCOND_TEST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_484__OBCOND_TEST.val, "OBCOND_TEST", sizeof (cdat->dstr_484__OBCOND_TEST.val) - 1); cdat->dstr_484__OBCOND_TEST.val[11] = (char) 0; cdat->dstr_484__OBCOND_TEST.slen = 11; /*^iniobj */ /*iniobj dobj_485__OBCOND_TEST*/ /*_.VALDATA___V651*/ meltfptr[650] = (melt_ptr_t) & cdat->dobj_485__OBCOND_TEST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_485__OBCOND_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_485__OBCOND_TEST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_485__OBCOND_TEST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_485__OBCOND_TEST.obj_num = 1; cdat->dobj_485__OBCOND_TEST.obj_hash = 5057561; cdat->dobj_485__OBCOND_TEST.obj_len = 4; /*inistring dstr_486__OBCOND_TEST*/ /*_.VALSTR___V652*/ meltfptr[651] = (melt_ptr_t) & cdat->dstr_486__OBCOND_TEST; cdat->dstr_486__OBCOND_TEST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_486__OBCOND_TEST.val, "OBCOND_TEST", sizeof (cdat->dstr_486__OBCOND_TEST.val) - 1); cdat->dstr_486__OBCOND_TEST.val[11] = (char) 0; cdat->dstr_486__OBCOND_TEST.slen = 11; /*iniobj dsym_487__OBCOND_THEN*/ /*uniqueobj*/ if (! /*_.VALDATA___V660*/ meltfptr[659]) /*_.VALDATA___V660*/ meltfptr[659] = (melt_ptr_t) & cdat->dsym_487__OBCOND_THEN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_487__OBCOND_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_487__OBCOND_THEN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_487__OBCOND_THEN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_487__OBCOND_THEN.obj_hash = 735778030; cdat->dsym_487__OBCOND_THEN.obj_len = 3; /*inistring dstr_488__OBCOND_THEN*/ /*_.VALSTR___V661*/ meltfptr[660] = (melt_ptr_t) & cdat->dstr_488__OBCOND_THEN; cdat->dstr_488__OBCOND_THEN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_488__OBCOND_THEN.val, "OBCOND_THEN", sizeof (cdat->dstr_488__OBCOND_THEN.val) - 1); cdat->dstr_488__OBCOND_THEN.val[11] = (char) 0; cdat->dstr_488__OBCOND_THEN.slen = 11; /*^iniobj */ /*iniobj dobj_489__OBCOND_THEN*/ /*_.VALDATA___V653*/ meltfptr[652] = (melt_ptr_t) & cdat->dobj_489__OBCOND_THEN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_489__OBCOND_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_489__OBCOND_THEN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_489__OBCOND_THEN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_489__OBCOND_THEN.obj_num = 2; cdat->dobj_489__OBCOND_THEN.obj_hash = 53611646; cdat->dobj_489__OBCOND_THEN.obj_len = 4; /*inistring dstr_490__OBCOND_THEN*/ /*_.VALSTR___V654*/ meltfptr[653] = (melt_ptr_t) & cdat->dstr_490__OBCOND_THEN; cdat->dstr_490__OBCOND_THEN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_490__OBCOND_THEN.val, "OBCOND_THEN", sizeof (cdat->dstr_490__OBCOND_THEN.val) - 1); cdat->dstr_490__OBCOND_THEN.val[11] = (char) 0; cdat->dstr_490__OBCOND_THEN.slen = 11; /*iniobj dsym_491__OBCOND_ELSE*/ /*uniqueobj*/ if (! /*_.VALDATA___V662*/ meltfptr[661]) /*_.VALDATA___V662*/ meltfptr[661] = (melt_ptr_t) & cdat->dsym_491__OBCOND_ELSE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_491__OBCOND_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_491__OBCOND_ELSE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_491__OBCOND_ELSE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_491__OBCOND_ELSE.obj_hash = 130863960; cdat->dsym_491__OBCOND_ELSE.obj_len = 3; /*inistring dstr_492__OBCOND_ELSE*/ /*_.VALSTR___V663*/ meltfptr[662] = (melt_ptr_t) & cdat->dstr_492__OBCOND_ELSE; cdat->dstr_492__OBCOND_ELSE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_492__OBCOND_ELSE.val, "OBCOND_ELSE", sizeof (cdat->dstr_492__OBCOND_ELSE.val) - 1); cdat->dstr_492__OBCOND_ELSE.val[11] = (char) 0; cdat->dstr_492__OBCOND_ELSE.slen = 11; /*^iniobj */ /*iniobj dobj_493__OBCOND_ELSE*/ /*_.VALDATA___V655*/ meltfptr[654] = (melt_ptr_t) & cdat->dobj_493__OBCOND_ELSE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_493__OBCOND_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_493__OBCOND_ELSE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_493__OBCOND_ELSE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_493__OBCOND_ELSE.obj_num = 3; cdat->dobj_493__OBCOND_ELSE.obj_hash = 321648560; cdat->dobj_493__OBCOND_ELSE.obj_len = 4; /*inistring dstr_494__OBCOND_ELSE*/ /*_.VALSTR___V656*/ meltfptr[655] = (melt_ptr_t) & cdat->dstr_494__OBCOND_ELSE; cdat->dstr_494__OBCOND_ELSE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_494__OBCOND_ELSE.val, "OBCOND_ELSE", sizeof (cdat->dstr_494__OBCOND_ELSE.val) - 1); cdat->dstr_494__OBCOND_ELSE.val[11] = (char) 0; cdat->dstr_494__OBCOND_ELSE.slen = 11; /*iniobj dsym_495__CLASS_OBJCPPIF*/ /*uniqueobj*/ if (! /*_.VALDATA___V664*/ meltfptr[663]) /*_.VALDATA___V664*/ meltfptr[663] = (melt_ptr_t) & cdat->dsym_495__CLASS_OBJCPPIF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_495__CLASS_OBJCPPIF", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_495__CLASS_OBJCPPIF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_495__CLASS_OBJCPPIF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_495__CLASS_OBJCPPIF.obj_hash = 418843843; cdat->dsym_495__CLASS_OBJCPPIF.obj_len = 3; /*inistring dstr_496__CLASS_OBJCPPIF*/ /*_.VALSTR___V665*/ meltfptr[664] = (melt_ptr_t) & cdat->dstr_496__CLASS_OBJCPPIF; cdat->dstr_496__CLASS_OBJCPPIF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_496__CLASS_OBJCPPIF.val, "CLASS_OBJCPPIF", sizeof (cdat->dstr_496__CLASS_OBJCPPIF.val) - 1); cdat->dstr_496__CLASS_OBJCPPIF.val[14] = (char) 0; cdat->dstr_496__CLASS_OBJCPPIF.slen = 14; MELT_LOCATION ("warmelt-genobj.melt:343:/ iniobj"); /*iniobj dobj_497__CLASS_OBJCPPIF*/ /*_.VALDATA___V666*/ meltfptr[665] = (melt_ptr_t) & cdat->dobj_497__CLASS_OBJCPPIF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_497__CLASS_OBJCPPIF", 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_497__CLASS_OBJCPPIF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_497__CLASS_OBJCPPIF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_497__CLASS_OBJCPPIF.obj_num = MELTOBMAG_OBJECT; cdat->dobj_497__CLASS_OBJCPPIF.obj_hash = 392690958; cdat->dobj_497__CLASS_OBJCPPIF.obj_len = 8; /*inistring dstr_498__CLASS_OBJCPPIF*/ /*_.VALSTR___V667*/ meltfptr[666] = (melt_ptr_t) & cdat->dstr_498__CLASS_OBJCPPIF; cdat->dstr_498__CLASS_OBJCPPIF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_498__CLASS_OBJCPPIF.val, "CLASS_OBJCPPIF", sizeof (cdat->dstr_498__CLASS_OBJCPPIF.val) - 1); cdat->dstr_498__CLASS_OBJCPPIF.val[14] = (char) 0; cdat->dstr_498__CLASS_OBJCPPIF.slen = 14; /*inimult dtup_499__CLASS_OBJCPPIF */ /*_.VALTUP___V668*/ meltfptr[667] = (melt_ptr_t) & cdat->dtup_499__CLASS_OBJCPPIF; cdat->dtup_499__CLASS_OBJCPPIF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_499__CLASS_OBJCPPIF.nbval = 3; /*inimult dtup_500__CLASS_OBJCPPIF */ /*_.VALTUP___V675*/ meltfptr[674] = (melt_ptr_t) & cdat->dtup_500__CLASS_OBJCPPIF; cdat->dtup_500__CLASS_OBJCPPIF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_500__CLASS_OBJCPPIF.nbval = 4; /*iniobj dsym_501__OBIFP_COND*/ /*uniqueobj*/ if (! /*_.VALDATA___V676*/ meltfptr[675]) /*_.VALDATA___V676*/ meltfptr[675] = (melt_ptr_t) & cdat->dsym_501__OBIFP_COND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_501__OBIFP_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_501__OBIFP_COND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_501__OBIFP_COND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_501__OBIFP_COND.obj_hash = 366560212; cdat->dsym_501__OBIFP_COND.obj_len = 3; /*inistring dstr_502__OBIFP_COND*/ /*_.VALSTR___V677*/ meltfptr[676] = (melt_ptr_t) & cdat->dstr_502__OBIFP_COND; cdat->dstr_502__OBIFP_COND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_502__OBIFP_COND.val, "OBIFP_COND", sizeof (cdat->dstr_502__OBIFP_COND.val) - 1); cdat->dstr_502__OBIFP_COND.val[10] = (char) 0; cdat->dstr_502__OBIFP_COND.slen = 10; /*^iniobj */ /*iniobj dobj_503__OBIFP_COND*/ /*_.VALDATA___V669*/ meltfptr[668] = (melt_ptr_t) & cdat->dobj_503__OBIFP_COND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_503__OBIFP_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_503__OBIFP_COND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_503__OBIFP_COND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_503__OBIFP_COND.obj_num = 1; cdat->dobj_503__OBIFP_COND.obj_hash = 847525355; cdat->dobj_503__OBIFP_COND.obj_len = 4; /*inistring dstr_504__OBIFP_COND*/ /*_.VALSTR___V670*/ meltfptr[669] = (melt_ptr_t) & cdat->dstr_504__OBIFP_COND; cdat->dstr_504__OBIFP_COND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_504__OBIFP_COND.val, "OBIFP_COND", sizeof (cdat->dstr_504__OBIFP_COND.val) - 1); cdat->dstr_504__OBIFP_COND.val[10] = (char) 0; cdat->dstr_504__OBIFP_COND.slen = 10; /*iniobj dsym_505__OBIFP_THEN*/ /*uniqueobj*/ if (! /*_.VALDATA___V678*/ meltfptr[677]) /*_.VALDATA___V678*/ meltfptr[677] = (melt_ptr_t) & cdat->dsym_505__OBIFP_THEN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_505__OBIFP_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_505__OBIFP_THEN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_505__OBIFP_THEN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_505__OBIFP_THEN.obj_hash = 596133818; cdat->dsym_505__OBIFP_THEN.obj_len = 3; /*inistring dstr_506__OBIFP_THEN*/ /*_.VALSTR___V679*/ meltfptr[678] = (melt_ptr_t) & cdat->dstr_506__OBIFP_THEN; cdat->dstr_506__OBIFP_THEN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_506__OBIFP_THEN.val, "OBIFP_THEN", sizeof (cdat->dstr_506__OBIFP_THEN.val) - 1); cdat->dstr_506__OBIFP_THEN.val[10] = (char) 0; cdat->dstr_506__OBIFP_THEN.slen = 10; /*^iniobj */ /*iniobj dobj_507__OBIFP_THEN*/ /*_.VALDATA___V671*/ meltfptr[670] = (melt_ptr_t) & cdat->dobj_507__OBIFP_THEN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_507__OBIFP_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_507__OBIFP_THEN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_507__OBIFP_THEN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_507__OBIFP_THEN.obj_num = 2; cdat->dobj_507__OBIFP_THEN.obj_hash = 1044481633; cdat->dobj_507__OBIFP_THEN.obj_len = 4; /*inistring dstr_508__OBIFP_THEN*/ /*_.VALSTR___V672*/ meltfptr[671] = (melt_ptr_t) & cdat->dstr_508__OBIFP_THEN; cdat->dstr_508__OBIFP_THEN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_508__OBIFP_THEN.val, "OBIFP_THEN", sizeof (cdat->dstr_508__OBIFP_THEN.val) - 1); cdat->dstr_508__OBIFP_THEN.val[10] = (char) 0; cdat->dstr_508__OBIFP_THEN.slen = 10; /*iniobj dsym_509__OBIFP_ELSE*/ /*uniqueobj*/ if (! /*_.VALDATA___V680*/ meltfptr[679]) /*_.VALDATA___V680*/ meltfptr[679] = (melt_ptr_t) & cdat->dsym_509__OBIFP_ELSE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_509__OBIFP_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_509__OBIFP_ELSE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_509__OBIFP_ELSE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_509__OBIFP_ELSE.obj_hash = 967265882; cdat->dsym_509__OBIFP_ELSE.obj_len = 3; /*inistring dstr_510__OBIFP_ELSE*/ /*_.VALSTR___V681*/ meltfptr[680] = (melt_ptr_t) & cdat->dstr_510__OBIFP_ELSE; cdat->dstr_510__OBIFP_ELSE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_510__OBIFP_ELSE.val, "OBIFP_ELSE", sizeof (cdat->dstr_510__OBIFP_ELSE.val) - 1); cdat->dstr_510__OBIFP_ELSE.val[10] = (char) 0; cdat->dstr_510__OBIFP_ELSE.slen = 10; /*^iniobj */ /*iniobj dobj_511__OBIFP_ELSE*/ /*_.VALDATA___V673*/ meltfptr[672] = (melt_ptr_t) & cdat->dobj_511__OBIFP_ELSE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_511__OBIFP_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_511__OBIFP_ELSE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_511__OBIFP_ELSE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_511__OBIFP_ELSE.obj_num = 3; cdat->dobj_511__OBIFP_ELSE.obj_hash = 173244208; cdat->dobj_511__OBIFP_ELSE.obj_len = 4; /*inistring dstr_512__OBIFP_ELSE*/ /*_.VALSTR___V674*/ meltfptr[673] = (melt_ptr_t) & cdat->dstr_512__OBIFP_ELSE; cdat->dstr_512__OBIFP_ELSE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_512__OBIFP_ELSE.val, "OBIFP_ELSE", sizeof (cdat->dstr_512__OBIFP_ELSE.val) - 1); cdat->dstr_512__OBIFP_ELSE.val[10] = (char) 0; cdat->dstr_512__OBIFP_ELSE.slen = 10; /*iniobj dsym_513__CLASS_OBJINTERNCOMMON*/ /*uniqueobj*/ if (! /*_.VALDATA___V682*/ meltfptr[681]) /*_.VALDATA___V682*/ meltfptr[681] = (melt_ptr_t) & cdat->dsym_513__CLASS_OBJINTERNCOMMON; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_513__CLASS_OBJINTERNCOMMON", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_513__CLASS_OBJINTERNCOMMON", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_513__CLASS_OBJINTERNCOMMON.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_513__CLASS_OBJINTERNCOMMON.obj_hash = 712376266; cdat->dsym_513__CLASS_OBJINTERNCOMMON.obj_len = 3; /*inistring dstr_514__CLASS_OBJINTERNC*/ /*_.VALSTR___V683*/ meltfptr[682] = (melt_ptr_t) & cdat->dstr_514__CLASS_OBJINTERNC; cdat->dstr_514__CLASS_OBJINTERNC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_514__CLASS_OBJINTERNC.val, "CLASS_OBJINTERNCOMMON", sizeof (cdat->dstr_514__CLASS_OBJINTERNC. val) - 1); cdat->dstr_514__CLASS_OBJINTERNC.val[21] = (char) 0; cdat->dstr_514__CLASS_OBJINTERNC.slen = 21; MELT_LOCATION ("warmelt-genobj.melt:352:/ iniobj"); /*iniobj dobj_515__CLASS_OBJINTERNCOMMON*/ /*_.VALDATA___V684*/ meltfptr[683] = (melt_ptr_t) & cdat->dobj_515__CLASS_OBJINTERNCOMMON; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_515__CLASS_OBJINTERNCOMMON", 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_515__CLASS_OBJINTERNCOMMON", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_515__CLASS_OBJINTERNCOMMON.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_515__CLASS_OBJINTERNCOMMON.obj_num = MELTOBMAG_OBJECT; cdat->dobj_515__CLASS_OBJINTERNCOMMON.obj_hash = 238273129; cdat->dobj_515__CLASS_OBJINTERNCOMMON.obj_len = 8; /*inistring dstr_516__CLASS_OBJINTERNC*/ /*_.VALSTR___V685*/ meltfptr[684] = (melt_ptr_t) & cdat->dstr_516__CLASS_OBJINTERNC; cdat->dstr_516__CLASS_OBJINTERNC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_516__CLASS_OBJINTERNC.val, "CLASS_OBJINTERNCOMMON", sizeof (cdat->dstr_516__CLASS_OBJINTERNC. val) - 1); cdat->dstr_516__CLASS_OBJINTERNC.val[21] = (char) 0; cdat->dstr_516__CLASS_OBJINTERNC.slen = 21; /*inimult dtup_517__CLASS_OBJINTERNCOMMON */ /*_.VALTUP___V686*/ meltfptr[685] = (melt_ptr_t) & cdat->dtup_517__CLASS_OBJINTERNCOMMON; cdat->dtup_517__CLASS_OBJINTERNCOMMON.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_517__CLASS_OBJINTERNCOMMON.nbval = 3; /*inimult dtup_518__CLASS_OBJINTERNCOMMON */ /*_.VALTUP___V689*/ meltfptr[688] = (melt_ptr_t) & cdat->dtup_518__CLASS_OBJINTERNCOMMON; cdat->dtup_518__CLASS_OBJINTERNCOMMON.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_518__CLASS_OBJINTERNCOMMON.nbval = 2; /*iniobj dsym_519__OBINTERN_IOBJ*/ /*uniqueobj*/ if (! /*_.VALDATA___V690*/ meltfptr[689]) /*_.VALDATA___V690*/ meltfptr[689] = (melt_ptr_t) & cdat->dsym_519__OBINTERN_IOBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_519__OBINTERN_IOBJ", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_519__OBINTERN_IOBJ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_519__OBINTERN_IOBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_519__OBINTERN_IOBJ.obj_hash = 257736327; cdat->dsym_519__OBINTERN_IOBJ.obj_len = 3; /*inistring dstr_520__OBINTERN_IOBJ*/ /*_.VALSTR___V691*/ meltfptr[690] = (melt_ptr_t) & cdat->dstr_520__OBINTERN_IOBJ; cdat->dstr_520__OBINTERN_IOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_520__OBINTERN_IOBJ.val, "OBINTERN_IOBJ", sizeof (cdat->dstr_520__OBINTERN_IOBJ.val) - 1); cdat->dstr_520__OBINTERN_IOBJ.val[13] = (char) 0; cdat->dstr_520__OBINTERN_IOBJ.slen = 13; /*^iniobj */ /*iniobj dobj_521__OBINTERN_IOBJ*/ /*_.VALDATA___V687*/ meltfptr[686] = (melt_ptr_t) & cdat->dobj_521__OBINTERN_IOBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_521__OBINTERN_IOBJ", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_521__OBINTERN_IOBJ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_521__OBINTERN_IOBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_521__OBINTERN_IOBJ.obj_num = 1; cdat->dobj_521__OBINTERN_IOBJ.obj_hash = 66065077; cdat->dobj_521__OBINTERN_IOBJ.obj_len = 4; /*inistring dstr_522__OBINTERN_IOBJ*/ /*_.VALSTR___V688*/ meltfptr[687] = (melt_ptr_t) & cdat->dstr_522__OBINTERN_IOBJ; cdat->dstr_522__OBINTERN_IOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_522__OBINTERN_IOBJ.val, "OBINTERN_IOBJ", sizeof (cdat->dstr_522__OBINTERN_IOBJ.val) - 1); cdat->dstr_522__OBINTERN_IOBJ.val[13] = (char) 0; cdat->dstr_522__OBINTERN_IOBJ.slen = 13; /*iniobj dsym_523__CLASS_OBJINTERNSYMBOL*/ /*uniqueobj*/ if (! /*_.VALDATA___V692*/ meltfptr[691]) /*_.VALDATA___V692*/ meltfptr[691] = (melt_ptr_t) & cdat->dsym_523__CLASS_OBJINTERNSYMBOL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_523__CLASS_OBJINTERNSYMBOL", melt_magic_discr ((melt_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__CLASS_OBJINTERNSYMBOL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_523__CLASS_OBJINTERNSYMBOL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_523__CLASS_OBJINTERNSYMBOL.obj_hash = 881953204; cdat->dsym_523__CLASS_OBJINTERNSYMBOL.obj_len = 3; /*inistring dstr_524__CLASS_OBJINTERNS*/ /*_.VALSTR___V693*/ meltfptr[692] = (melt_ptr_t) & cdat->dstr_524__CLASS_OBJINTERNS; cdat->dstr_524__CLASS_OBJINTERNS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_524__CLASS_OBJINTERNS.val, "CLASS_OBJINTERNSYMBOL", sizeof (cdat->dstr_524__CLASS_OBJINTERNS. val) - 1); cdat->dstr_524__CLASS_OBJINTERNS.val[21] = (char) 0; cdat->dstr_524__CLASS_OBJINTERNS.slen = 21; MELT_LOCATION ("warmelt-genobj.melt:358:/ iniobj"); /*iniobj dobj_525__CLASS_OBJINTERNSYMBOL*/ /*_.VALDATA___V694*/ meltfptr[693] = (melt_ptr_t) & cdat->dobj_525__CLASS_OBJINTERNSYMBOL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_525__CLASS_OBJINTERNSYMBOL", 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_525__CLASS_OBJINTERNSYMBOL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_525__CLASS_OBJINTERNSYMBOL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_525__CLASS_OBJINTERNSYMBOL.obj_num = MELTOBMAG_OBJECT; cdat->dobj_525__CLASS_OBJINTERNSYMBOL.obj_hash = 615831148; cdat->dobj_525__CLASS_OBJINTERNSYMBOL.obj_len = 8; /*inistring dstr_526__CLASS_OBJINTERNS*/ /*_.VALSTR___V695*/ meltfptr[694] = (melt_ptr_t) & cdat->dstr_526__CLASS_OBJINTERNS; cdat->dstr_526__CLASS_OBJINTERNS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_526__CLASS_OBJINTERNS.val, "CLASS_OBJINTERNSYMBOL", sizeof (cdat->dstr_526__CLASS_OBJINTERNS. val) - 1); cdat->dstr_526__CLASS_OBJINTERNS.val[21] = (char) 0; cdat->dstr_526__CLASS_OBJINTERNS.slen = 21; /*inimult dtup_527__CLASS_OBJINTERNSYMBOL */ /*_.VALTUP___V696*/ meltfptr[695] = (melt_ptr_t) & cdat->dtup_527__CLASS_OBJINTERNSYMBOL; cdat->dtup_527__CLASS_OBJINTERNSYMBOL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_527__CLASS_OBJINTERNSYMBOL.nbval = 4; /*inimult dtup_528__CLASS_OBJINTERNSYMBOL */ /*_.VALTUP___V697*/ meltfptr[696] = (melt_ptr_t) & cdat->dtup_528__CLASS_OBJINTERNSYMBOL; cdat->dtup_528__CLASS_OBJINTERNSYMBOL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_528__CLASS_OBJINTERNSYMBOL.nbval = 2; /*iniobj dsym_529__CLASS_OBJINTERNKEYWORD*/ /*uniqueobj*/ if (! /*_.VALDATA___V698*/ meltfptr[697]) /*_.VALDATA___V698*/ meltfptr[697] = (melt_ptr_t) & cdat->dsym_529__CLASS_OBJINTERNKEYWORD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_529__CLASS_OBJINTERNKEYWORD", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_529__CLASS_OBJINTERNKEYWORD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_529__CLASS_OBJINTERNKEYWORD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_529__CLASS_OBJINTERNKEYWORD.obj_hash = 606725080; cdat->dsym_529__CLASS_OBJINTERNKEYWORD.obj_len = 3; /*inistring dstr_530__CLASS_OBJINTERNK*/ /*_.VALSTR___V699*/ meltfptr[698] = (melt_ptr_t) & cdat->dstr_530__CLASS_OBJINTERNK; cdat->dstr_530__CLASS_OBJINTERNK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_530__CLASS_OBJINTERNK.val, "CLASS_OBJINTERNKEYWORD", sizeof (cdat->dstr_530__CLASS_OBJINTERNK. val) - 1); cdat->dstr_530__CLASS_OBJINTERNK.val[22] = (char) 0; cdat->dstr_530__CLASS_OBJINTERNK.slen = 22; MELT_LOCATION ("warmelt-genobj.melt:363:/ iniobj"); /*iniobj dobj_531__CLASS_OBJINTERNKEYWORD*/ /*_.VALDATA___V700*/ meltfptr[699] = (melt_ptr_t) & cdat->dobj_531__CLASS_OBJINTERNKEYWORD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_531__CLASS_OBJINTERNKEYWORD", 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_531__CLASS_OBJINTERNKEYWORD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_531__CLASS_OBJINTERNKEYWORD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_531__CLASS_OBJINTERNKEYWORD.obj_num = MELTOBMAG_OBJECT; cdat->dobj_531__CLASS_OBJINTERNKEYWORD.obj_hash = 986971239; cdat->dobj_531__CLASS_OBJINTERNKEYWORD.obj_len = 8; /*inistring dstr_532__CLASS_OBJINTERNK*/ /*_.VALSTR___V701*/ meltfptr[700] = (melt_ptr_t) & cdat->dstr_532__CLASS_OBJINTERNK; cdat->dstr_532__CLASS_OBJINTERNK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_532__CLASS_OBJINTERNK.val, "CLASS_OBJINTERNKEYWORD", sizeof (cdat->dstr_532__CLASS_OBJINTERNK. val) - 1); cdat->dstr_532__CLASS_OBJINTERNK.val[22] = (char) 0; cdat->dstr_532__CLASS_OBJINTERNK.slen = 22; /*inimult dtup_533__CLASS_OBJINTERNKEYWORD */ /*_.VALTUP___V702*/ meltfptr[701] = (melt_ptr_t) & cdat->dtup_533__CLASS_OBJINTERNKEYWORD; cdat->dtup_533__CLASS_OBJINTERNKEYWORD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_533__CLASS_OBJINTERNKEYWORD.nbval = 4; /*inimult dtup_534__CLASS_OBJINTERNKEYWORD */ /*_.VALTUP___V703*/ meltfptr[702] = (melt_ptr_t) & cdat->dtup_534__CLASS_OBJINTERNKEYWORD; cdat->dtup_534__CLASS_OBJINTERNKEYWORD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_534__CLASS_OBJINTERNKEYWORD.nbval = 2; /*iniobj dsym_535__CLASS_OBJGETNAMEDCOMMON*/ /*uniqueobj*/ if (! /*_.VALDATA___V704*/ meltfptr[703]) /*_.VALDATA___V704*/ meltfptr[703] = (melt_ptr_t) & cdat->dsym_535__CLASS_OBJGETNAMEDCOMMON; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_535__CLASS_OBJGETNAMEDCOMMON", melt_magic_discr ((melt_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_OBJGETNAMEDCOMMON", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_535__CLASS_OBJGETNAMEDCOMMON.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_535__CLASS_OBJGETNAMEDCOMMON.obj_hash = 116002660; cdat->dsym_535__CLASS_OBJGETNAMEDCOMMON.obj_len = 3; /*inistring dstr_536__CLASS_OBJGETNAME*/ /*_.VALSTR___V705*/ meltfptr[704] = (melt_ptr_t) & cdat->dstr_536__CLASS_OBJGETNAME; cdat->dstr_536__CLASS_OBJGETNAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_536__CLASS_OBJGETNAME.val, "CLASS_OBJGETNAMEDCOMMON", sizeof (cdat->dstr_536__CLASS_OBJGETNAME. val) - 1); cdat->dstr_536__CLASS_OBJGETNAME.val[23] = (char) 0; cdat->dstr_536__CLASS_OBJGETNAME.slen = 23; MELT_LOCATION ("warmelt-genobj.melt:369:/ iniobj"); /*iniobj dobj_537__CLASS_OBJGETNAMEDCOMMON*/ /*_.VALDATA___V706*/ meltfptr[705] = (melt_ptr_t) & cdat->dobj_537__CLASS_OBJGETNAMEDCOMMON; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_537__CLASS_OBJGETNAMEDCOMMON", 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_OBJGETNAMEDCOMMON", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_537__CLASS_OBJGETNAMEDCOMMON.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_537__CLASS_OBJGETNAMEDCOMMON.obj_num = MELTOBMAG_OBJECT; cdat->dobj_537__CLASS_OBJGETNAMEDCOMMON.obj_hash = 745959061; cdat->dobj_537__CLASS_OBJGETNAMEDCOMMON.obj_len = 8; /*inistring dstr_538__CLASS_OBJGETNAME*/ /*_.VALSTR___V707*/ meltfptr[706] = (melt_ptr_t) & cdat->dstr_538__CLASS_OBJGETNAME; cdat->dstr_538__CLASS_OBJGETNAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_538__CLASS_OBJGETNAME.val, "CLASS_OBJGETNAMEDCOMMON", sizeof (cdat->dstr_538__CLASS_OBJGETNAME. val) - 1); cdat->dstr_538__CLASS_OBJGETNAME.val[23] = (char) 0; cdat->dstr_538__CLASS_OBJGETNAME.slen = 23; /*inimult dtup_539__CLASS_OBJGETNAMEDCOMMON */ /*_.VALTUP___V708*/ meltfptr[707] = (melt_ptr_t) & cdat->dtup_539__CLASS_OBJGETNAMEDCOMMON; cdat->dtup_539__CLASS_OBJGETNAMEDCOMMON.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_539__CLASS_OBJGETNAMEDCOMMON.nbval = 3; /*inimult dtup_540__CLASS_OBJGETNAMEDCOMMON */ /*_.VALTUP___V711*/ meltfptr[710] = (melt_ptr_t) & cdat->dtup_540__CLASS_OBJGETNAMEDCOMMON; cdat->dtup_540__CLASS_OBJGETNAMEDCOMMON.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_540__CLASS_OBJGETNAMEDCOMMON.nbval = 2; /*iniobj dsym_541__OBGNAMED_IOBJ*/ /*uniqueobj*/ if (! /*_.VALDATA___V712*/ meltfptr[711]) /*_.VALDATA___V712*/ meltfptr[711] = (melt_ptr_t) & cdat->dsym_541__OBGNAMED_IOBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_541__OBGNAMED_IOBJ", melt_magic_discr ((melt_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__OBGNAMED_IOBJ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_541__OBGNAMED_IOBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_541__OBGNAMED_IOBJ.obj_hash = 477166523; cdat->dsym_541__OBGNAMED_IOBJ.obj_len = 3; /*inistring dstr_542__OBGNAMED_IOBJ*/ /*_.VALSTR___V713*/ meltfptr[712] = (melt_ptr_t) & cdat->dstr_542__OBGNAMED_IOBJ; cdat->dstr_542__OBGNAMED_IOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_542__OBGNAMED_IOBJ.val, "OBGNAMED_IOBJ", sizeof (cdat->dstr_542__OBGNAMED_IOBJ.val) - 1); cdat->dstr_542__OBGNAMED_IOBJ.val[13] = (char) 0; cdat->dstr_542__OBGNAMED_IOBJ.slen = 13; /*^iniobj */ /*iniobj dobj_543__OBGNAMED_IOBJ*/ /*_.VALDATA___V709*/ meltfptr[708] = (melt_ptr_t) & cdat->dobj_543__OBGNAMED_IOBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_543__OBGNAMED_IOBJ", melt_magic_discr ((melt_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__OBGNAMED_IOBJ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_543__OBGNAMED_IOBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_543__OBGNAMED_IOBJ.obj_num = 1; cdat->dobj_543__OBGNAMED_IOBJ.obj_hash = 649418693; cdat->dobj_543__OBGNAMED_IOBJ.obj_len = 4; /*inistring dstr_544__OBGNAMED_IOBJ*/ /*_.VALSTR___V710*/ meltfptr[709] = (melt_ptr_t) & cdat->dstr_544__OBGNAMED_IOBJ; cdat->dstr_544__OBGNAMED_IOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_544__OBGNAMED_IOBJ.val, "OBGNAMED_IOBJ", sizeof (cdat->dstr_544__OBGNAMED_IOBJ.val) - 1); cdat->dstr_544__OBGNAMED_IOBJ.val[13] = (char) 0; cdat->dstr_544__OBGNAMED_IOBJ.slen = 13; /*iniobj dsym_545__CLASS_OBJGETNAMEDSYMBOL*/ /*uniqueobj*/ if (! /*_.VALDATA___V714*/ meltfptr[713]) /*_.VALDATA___V714*/ meltfptr[713] = (melt_ptr_t) & cdat->dsym_545__CLASS_OBJGETNAMEDSYMBOL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_545__CLASS_OBJGETNAMEDSYMBOL", melt_magic_discr ((melt_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_OBJGETNAMEDSYMBOL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_545__CLASS_OBJGETNAMEDSYMBOL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_545__CLASS_OBJGETNAMEDSYMBOL.obj_hash = 552748717; cdat->dsym_545__CLASS_OBJGETNAMEDSYMBOL.obj_len = 3; /*inistring dstr_546__CLASS_OBJGETNAME*/ /*_.VALSTR___V715*/ meltfptr[714] = (melt_ptr_t) & cdat->dstr_546__CLASS_OBJGETNAME; cdat->dstr_546__CLASS_OBJGETNAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_546__CLASS_OBJGETNAME.val, "CLASS_OBJGETNAMEDSYMBOL", sizeof (cdat->dstr_546__CLASS_OBJGETNAME. val) - 1); cdat->dstr_546__CLASS_OBJGETNAME.val[23] = (char) 0; cdat->dstr_546__CLASS_OBJGETNAME.slen = 23; MELT_LOCATION ("warmelt-genobj.melt:375:/ iniobj"); /*iniobj dobj_547__CLASS_OBJGETNAMEDSYMBOL*/ /*_.VALDATA___V716*/ meltfptr[715] = (melt_ptr_t) & cdat->dobj_547__CLASS_OBJGETNAMEDSYMBOL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_547__CLASS_OBJGETNAMEDSYMBOL", 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_OBJGETNAMEDSYMBOL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_547__CLASS_OBJGETNAMEDSYMBOL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_547__CLASS_OBJGETNAMEDSYMBOL.obj_num = MELTOBMAG_OBJECT; cdat->dobj_547__CLASS_OBJGETNAMEDSYMBOL.obj_hash = 512269901; cdat->dobj_547__CLASS_OBJGETNAMEDSYMBOL.obj_len = 8; /*inistring dstr_548__CLASS_OBJGETNAME*/ /*_.VALSTR___V717*/ meltfptr[716] = (melt_ptr_t) & cdat->dstr_548__CLASS_OBJGETNAME; cdat->dstr_548__CLASS_OBJGETNAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_548__CLASS_OBJGETNAME.val, "CLASS_OBJGETNAMEDSYMBOL", sizeof (cdat->dstr_548__CLASS_OBJGETNAME. val) - 1); cdat->dstr_548__CLASS_OBJGETNAME.val[23] = (char) 0; cdat->dstr_548__CLASS_OBJGETNAME.slen = 23; /*inimult dtup_549__CLASS_OBJGETNAMEDSYMBOL */ /*_.VALTUP___V718*/ meltfptr[717] = (melt_ptr_t) & cdat->dtup_549__CLASS_OBJGETNAMEDSYMBOL; cdat->dtup_549__CLASS_OBJGETNAMEDSYMBOL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_549__CLASS_OBJGETNAMEDSYMBOL.nbval = 4; /*inimult dtup_550__CLASS_OBJGETNAMEDSYMBOL */ /*_.VALTUP___V719*/ meltfptr[718] = (melt_ptr_t) & cdat->dtup_550__CLASS_OBJGETNAMEDSYMBOL; cdat->dtup_550__CLASS_OBJGETNAMEDSYMBOL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_550__CLASS_OBJGETNAMEDSYMBOL.nbval = 2; /*iniobj dsym_551__CLASS_OBJGETNAMEDKEYWORD*/ /*uniqueobj*/ if (! /*_.VALDATA___V720*/ meltfptr[719]) /*_.VALDATA___V720*/ meltfptr[719] = (melt_ptr_t) & cdat->dsym_551__CLASS_OBJGETNAMEDKEYWORD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_551__CLASS_OBJGETNAMEDKEYWORD", melt_magic_discr ((melt_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__CLASS_OBJGETNAMEDKEYWORD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_551__CLASS_OBJGETNAMEDKEYWORD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_551__CLASS_OBJGETNAMEDKEYWORD.obj_hash = 877025959; cdat->dsym_551__CLASS_OBJGETNAMEDKEYWORD.obj_len = 3; /*inistring dstr_552__CLASS_OBJGETNAME*/ /*_.VALSTR___V721*/ meltfptr[720] = (melt_ptr_t) & cdat->dstr_552__CLASS_OBJGETNAME; cdat->dstr_552__CLASS_OBJGETNAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_552__CLASS_OBJGETNAME.val, "CLASS_OBJGETNAMEDKEYWORD", sizeof (cdat->dstr_552__CLASS_OBJGETNAME. val) - 1); cdat->dstr_552__CLASS_OBJGETNAME.val[24] = (char) 0; cdat->dstr_552__CLASS_OBJGETNAME.slen = 24; MELT_LOCATION ("warmelt-genobj.melt:380:/ iniobj"); /*iniobj dobj_553__CLASS_OBJGETNAMEDKEYWORD*/ /*_.VALDATA___V722*/ meltfptr[721] = (melt_ptr_t) & cdat->dobj_553__CLASS_OBJGETNAMEDKEYWORD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_553__CLASS_OBJGETNAMEDKEYWORD", 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_553__CLASS_OBJGETNAMEDKEYWORD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_553__CLASS_OBJGETNAMEDKEYWORD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_553__CLASS_OBJGETNAMEDKEYWORD.obj_num = MELTOBMAG_OBJECT; cdat->dobj_553__CLASS_OBJGETNAMEDKEYWORD.obj_hash = 209934608; cdat->dobj_553__CLASS_OBJGETNAMEDKEYWORD.obj_len = 8; /*inistring dstr_554__CLASS_OBJGETNAME*/ /*_.VALSTR___V723*/ meltfptr[722] = (melt_ptr_t) & cdat->dstr_554__CLASS_OBJGETNAME; cdat->dstr_554__CLASS_OBJGETNAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_554__CLASS_OBJGETNAME.val, "CLASS_OBJGETNAMEDKEYWORD", sizeof (cdat->dstr_554__CLASS_OBJGETNAME. val) - 1); cdat->dstr_554__CLASS_OBJGETNAME.val[24] = (char) 0; cdat->dstr_554__CLASS_OBJGETNAME.slen = 24; /*inimult dtup_555__CLASS_OBJGETNAMEDKEYWORD */ /*_.VALTUP___V724*/ meltfptr[723] = (melt_ptr_t) & cdat->dtup_555__CLASS_OBJGETNAMEDKEYWORD; cdat->dtup_555__CLASS_OBJGETNAMEDKEYWORD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_555__CLASS_OBJGETNAMEDKEYWORD.nbval = 4; /*inimult dtup_556__CLASS_OBJGETNAMEDKEYWORD */ /*_.VALTUP___V725*/ meltfptr[724] = (melt_ptr_t) & cdat->dtup_556__CLASS_OBJGETNAMEDKEYWORD; cdat->dtup_556__CLASS_OBJGETNAMEDKEYWORD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_556__CLASS_OBJGETNAMEDKEYWORD.nbval = 2; /*iniobj dsym_557__CLASS_OBJAPPLY*/ /*uniqueobj*/ if (! /*_.VALDATA___V726*/ meltfptr[725]) /*_.VALDATA___V726*/ meltfptr[725] = (melt_ptr_t) & cdat->dsym_557__CLASS_OBJAPPLY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_557__CLASS_OBJAPPLY", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_557__CLASS_OBJAPPLY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_557__CLASS_OBJAPPLY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_557__CLASS_OBJAPPLY.obj_hash = 734111989; cdat->dsym_557__CLASS_OBJAPPLY.obj_len = 3; /*inistring dstr_558__CLASS_OBJAPPLY*/ /*_.VALSTR___V727*/ meltfptr[726] = (melt_ptr_t) & cdat->dstr_558__CLASS_OBJAPPLY; cdat->dstr_558__CLASS_OBJAPPLY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_558__CLASS_OBJAPPLY.val, "CLASS_OBJAPPLY", sizeof (cdat->dstr_558__CLASS_OBJAPPLY.val) - 1); cdat->dstr_558__CLASS_OBJAPPLY.val[14] = (char) 0; cdat->dstr_558__CLASS_OBJAPPLY.slen = 14; MELT_LOCATION ("warmelt-genobj.melt:386:/ iniobj"); /*iniobj dobj_559__CLASS_OBJAPPLY*/ /*_.VALDATA___V728*/ meltfptr[727] = (melt_ptr_t) & cdat->dobj_559__CLASS_OBJAPPLY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_559__CLASS_OBJAPPLY", 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_559__CLASS_OBJAPPLY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_559__CLASS_OBJAPPLY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_559__CLASS_OBJAPPLY.obj_num = MELTOBMAG_OBJECT; cdat->dobj_559__CLASS_OBJAPPLY.obj_hash = 51650966; cdat->dobj_559__CLASS_OBJAPPLY.obj_len = 8; /*inistring dstr_560__CLASS_OBJAPPLY*/ /*_.VALSTR___V729*/ meltfptr[728] = (melt_ptr_t) & cdat->dstr_560__CLASS_OBJAPPLY; cdat->dstr_560__CLASS_OBJAPPLY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_560__CLASS_OBJAPPLY.val, "CLASS_OBJAPPLY", sizeof (cdat->dstr_560__CLASS_OBJAPPLY.val) - 1); cdat->dstr_560__CLASS_OBJAPPLY.val[14] = (char) 0; cdat->dstr_560__CLASS_OBJAPPLY.slen = 14; /*inimult dtup_561__CLASS_OBJAPPLY */ /*_.VALTUP___V730*/ meltfptr[729] = (melt_ptr_t) & cdat->dtup_561__CLASS_OBJAPPLY; cdat->dtup_561__CLASS_OBJAPPLY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_561__CLASS_OBJAPPLY.nbval = 4; /*inimult dtup_562__CLASS_OBJAPPLY */ /*_.VALTUP___V735*/ meltfptr[734] = (melt_ptr_t) & cdat->dtup_562__CLASS_OBJAPPLY; cdat->dtup_562__CLASS_OBJAPPLY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_562__CLASS_OBJAPPLY.nbval = 4; /*iniobj dsym_563__OBAPP_CLOS*/ /*uniqueobj*/ if (! /*_.VALDATA___V736*/ meltfptr[735]) /*_.VALDATA___V736*/ meltfptr[735] = (melt_ptr_t) & cdat->dsym_563__OBAPP_CLOS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_563__OBAPP_CLOS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_563__OBAPP_CLOS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_563__OBAPP_CLOS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_563__OBAPP_CLOS.obj_hash = 213258240; cdat->dsym_563__OBAPP_CLOS.obj_len = 3; /*inistring dstr_564__OBAPP_CLOS*/ /*_.VALSTR___V737*/ meltfptr[736] = (melt_ptr_t) & cdat->dstr_564__OBAPP_CLOS; cdat->dstr_564__OBAPP_CLOS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_564__OBAPP_CLOS.val, "OBAPP_CLOS", sizeof (cdat->dstr_564__OBAPP_CLOS.val) - 1); cdat->dstr_564__OBAPP_CLOS.val[10] = (char) 0; cdat->dstr_564__OBAPP_CLOS.slen = 10; /*^iniobj */ /*iniobj dobj_565__OBAPP_CLOS*/ /*_.VALDATA___V731*/ meltfptr[730] = (melt_ptr_t) & cdat->dobj_565__OBAPP_CLOS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_565__OBAPP_CLOS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_565__OBAPP_CLOS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_565__OBAPP_CLOS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_565__OBAPP_CLOS.obj_num = 2; cdat->dobj_565__OBAPP_CLOS.obj_hash = 594264595; cdat->dobj_565__OBAPP_CLOS.obj_len = 4; /*inistring dstr_566__OBAPP_CLOS*/ /*_.VALSTR___V732*/ meltfptr[731] = (melt_ptr_t) & cdat->dstr_566__OBAPP_CLOS; cdat->dstr_566__OBAPP_CLOS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_566__OBAPP_CLOS.val, "OBAPP_CLOS", sizeof (cdat->dstr_566__OBAPP_CLOS.val) - 1); cdat->dstr_566__OBAPP_CLOS.val[10] = (char) 0; cdat->dstr_566__OBAPP_CLOS.slen = 10; /*iniobj dsym_567__OBAPP_ARGS*/ /*uniqueobj*/ if (! /*_.VALDATA___V738*/ meltfptr[737]) /*_.VALDATA___V738*/ meltfptr[737] = (melt_ptr_t) & cdat->dsym_567__OBAPP_ARGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_567__OBAPP_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_567__OBAPP_ARGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_567__OBAPP_ARGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_567__OBAPP_ARGS.obj_hash = 542637104; cdat->dsym_567__OBAPP_ARGS.obj_len = 3; /*inistring dstr_568__OBAPP_ARGS*/ /*_.VALSTR___V739*/ meltfptr[738] = (melt_ptr_t) & cdat->dstr_568__OBAPP_ARGS; cdat->dstr_568__OBAPP_ARGS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_568__OBAPP_ARGS.val, "OBAPP_ARGS", sizeof (cdat->dstr_568__OBAPP_ARGS.val) - 1); cdat->dstr_568__OBAPP_ARGS.val[10] = (char) 0; cdat->dstr_568__OBAPP_ARGS.slen = 10; /*^iniobj */ /*iniobj dobj_569__OBAPP_ARGS*/ /*_.VALDATA___V733*/ meltfptr[732] = (melt_ptr_t) & cdat->dobj_569__OBAPP_ARGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_569__OBAPP_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_569__OBAPP_ARGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_569__OBAPP_ARGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_569__OBAPP_ARGS.obj_num = 3; cdat->dobj_569__OBAPP_ARGS.obj_hash = 194335999; cdat->dobj_569__OBAPP_ARGS.obj_len = 4; /*inistring dstr_570__OBAPP_ARGS*/ /*_.VALSTR___V734*/ meltfptr[733] = (melt_ptr_t) & cdat->dstr_570__OBAPP_ARGS; cdat->dstr_570__OBAPP_ARGS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_570__OBAPP_ARGS.val, "OBAPP_ARGS", sizeof (cdat->dstr_570__OBAPP_ARGS.val) - 1); cdat->dstr_570__OBAPP_ARGS.val[10] = (char) 0; cdat->dstr_570__OBAPP_ARGS.slen = 10; /*iniobj dsym_571__CLASS_OBJMULTIAPPLY*/ /*uniqueobj*/ if (! /*_.VALDATA___V740*/ meltfptr[739]) /*_.VALDATA___V740*/ meltfptr[739] = (melt_ptr_t) & cdat->dsym_571__CLASS_OBJMULTIAPPLY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_571__CLASS_OBJMULTIAPPLY", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_571__CLASS_OBJMULTIAPPLY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_571__CLASS_OBJMULTIAPPLY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_571__CLASS_OBJMULTIAPPLY.obj_hash = 718205837; cdat->dsym_571__CLASS_OBJMULTIAPPLY.obj_len = 3; /*inistring dstr_572__CLASS_OBJMULTIAP*/ /*_.VALSTR___V741*/ meltfptr[740] = (melt_ptr_t) & cdat->dstr_572__CLASS_OBJMULTIAP; cdat->dstr_572__CLASS_OBJMULTIAP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_572__CLASS_OBJMULTIAP.val, "CLASS_OBJMULTIAPPLY", sizeof (cdat->dstr_572__CLASS_OBJMULTIAP. val) - 1); cdat->dstr_572__CLASS_OBJMULTIAP.val[19] = (char) 0; cdat->dstr_572__CLASS_OBJMULTIAP.slen = 19; MELT_LOCATION ("warmelt-genobj.melt:393:/ iniobj"); /*iniobj dobj_573__CLASS_OBJMULTIAPPLY*/ /*_.VALDATA___V742*/ meltfptr[741] = (melt_ptr_t) & cdat->dobj_573__CLASS_OBJMULTIAPPLY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_573__CLASS_OBJMULTIAPPLY", 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_573__CLASS_OBJMULTIAPPLY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_573__CLASS_OBJMULTIAPPLY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_573__CLASS_OBJMULTIAPPLY.obj_num = MELTOBMAG_OBJECT; cdat->dobj_573__CLASS_OBJMULTIAPPLY.obj_hash = 956504673; cdat->dobj_573__CLASS_OBJMULTIAPPLY.obj_len = 8; /*inistring dstr_574__CLASS_OBJMULTIAP*/ /*_.VALSTR___V743*/ meltfptr[742] = (melt_ptr_t) & cdat->dstr_574__CLASS_OBJMULTIAP; cdat->dstr_574__CLASS_OBJMULTIAP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_574__CLASS_OBJMULTIAP.val, "CLASS_OBJMULTIAPPLY", sizeof (cdat->dstr_574__CLASS_OBJMULTIAP. val) - 1); cdat->dstr_574__CLASS_OBJMULTIAP.val[19] = (char) 0; cdat->dstr_574__CLASS_OBJMULTIAP.slen = 19; /*inimult dtup_575__CLASS_OBJMULTIAPPLY */ /*_.VALTUP___V744*/ meltfptr[743] = (melt_ptr_t) & cdat->dtup_575__CLASS_OBJMULTIAPPLY; cdat->dtup_575__CLASS_OBJMULTIAPPLY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_575__CLASS_OBJMULTIAPPLY.nbval = 5; /*inimult dtup_576__CLASS_OBJMULTIAPPLY */ /*_.VALTUP___V747*/ meltfptr[746] = (melt_ptr_t) & cdat->dtup_576__CLASS_OBJMULTIAPPLY; cdat->dtup_576__CLASS_OBJMULTIAPPLY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_576__CLASS_OBJMULTIAPPLY.nbval = 5; /*iniobj dsym_577__OBMULTAPP_XRES*/ /*uniqueobj*/ if (! /*_.VALDATA___V748*/ meltfptr[747]) /*_.VALDATA___V748*/ meltfptr[747] = (melt_ptr_t) & cdat->dsym_577__OBMULTAPP_XRES; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_577__OBMULTAPP_XRES", melt_magic_discr ((melt_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__OBMULTAPP_XRES", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_577__OBMULTAPP_XRES.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_577__OBMULTAPP_XRES.obj_hash = 526257932; cdat->dsym_577__OBMULTAPP_XRES.obj_len = 3; /*inistring dstr_578__OBMULTAPP_XRES*/ /*_.VALSTR___V749*/ meltfptr[748] = (melt_ptr_t) & cdat->dstr_578__OBMULTAPP_XRES; cdat->dstr_578__OBMULTAPP_XRES.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_578__OBMULTAPP_XRES.val, "OBMULTAPP_XRES", sizeof (cdat->dstr_578__OBMULTAPP_XRES.val) - 1); cdat->dstr_578__OBMULTAPP_XRES.val[14] = (char) 0; cdat->dstr_578__OBMULTAPP_XRES.slen = 14; /*^iniobj */ /*iniobj dobj_579__OBMULTAPP_XRES*/ /*_.VALDATA___V745*/ meltfptr[744] = (melt_ptr_t) & cdat->dobj_579__OBMULTAPP_XRES; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_579__OBMULTAPP_XRES", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_579__OBMULTAPP_XRES", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_579__OBMULTAPP_XRES.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_579__OBMULTAPP_XRES.obj_num = 4; cdat->dobj_579__OBMULTAPP_XRES.obj_hash = 309398295; cdat->dobj_579__OBMULTAPP_XRES.obj_len = 4; /*inistring dstr_580__OBMULTAPP_XRES*/ /*_.VALSTR___V746*/ meltfptr[745] = (melt_ptr_t) & cdat->dstr_580__OBMULTAPP_XRES; cdat->dstr_580__OBMULTAPP_XRES.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_580__OBMULTAPP_XRES.val, "OBMULTAPP_XRES", sizeof (cdat->dstr_580__OBMULTAPP_XRES.val) - 1); cdat->dstr_580__OBMULTAPP_XRES.val[14] = (char) 0; cdat->dstr_580__OBMULTAPP_XRES.slen = 14; /*iniobj dsym_581__CLASS_OBJMSEND*/ /*uniqueobj*/ if (! /*_.VALDATA___V750*/ meltfptr[749]) /*_.VALDATA___V750*/ meltfptr[749] = (melt_ptr_t) & cdat->dsym_581__CLASS_OBJMSEND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_581__CLASS_OBJMSEND", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_581__CLASS_OBJMSEND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_581__CLASS_OBJMSEND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_581__CLASS_OBJMSEND.obj_hash = 664056168; cdat->dsym_581__CLASS_OBJMSEND.obj_len = 3; /*inistring dstr_582__CLASS_OBJMSEND*/ /*_.VALSTR___V751*/ meltfptr[750] = (melt_ptr_t) & cdat->dstr_582__CLASS_OBJMSEND; cdat->dstr_582__CLASS_OBJMSEND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_582__CLASS_OBJMSEND.val, "CLASS_OBJMSEND", sizeof (cdat->dstr_582__CLASS_OBJMSEND.val) - 1); cdat->dstr_582__CLASS_OBJMSEND.val[14] = (char) 0; cdat->dstr_582__CLASS_OBJMSEND.slen = 14; MELT_LOCATION ("warmelt-genobj.melt:399:/ iniobj"); /*iniobj dobj_583__CLASS_OBJMSEND*/ /*_.VALDATA___V752*/ meltfptr[751] = (melt_ptr_t) & cdat->dobj_583__CLASS_OBJMSEND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_583__CLASS_OBJMSEND", 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_583__CLASS_OBJMSEND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_583__CLASS_OBJMSEND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_583__CLASS_OBJMSEND.obj_num = MELTOBMAG_OBJECT; cdat->dobj_583__CLASS_OBJMSEND.obj_hash = 332934152; cdat->dobj_583__CLASS_OBJMSEND.obj_len = 8; /*inistring dstr_584__CLASS_OBJMSEND*/ /*_.VALSTR___V753*/ meltfptr[752] = (melt_ptr_t) & cdat->dstr_584__CLASS_OBJMSEND; cdat->dstr_584__CLASS_OBJMSEND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_584__CLASS_OBJMSEND.val, "CLASS_OBJMSEND", sizeof (cdat->dstr_584__CLASS_OBJMSEND.val) - 1); cdat->dstr_584__CLASS_OBJMSEND.val[14] = (char) 0; cdat->dstr_584__CLASS_OBJMSEND.slen = 14; /*inimult dtup_585__CLASS_OBJMSEND */ /*_.VALTUP___V754*/ meltfptr[753] = (melt_ptr_t) & cdat->dtup_585__CLASS_OBJMSEND; cdat->dtup_585__CLASS_OBJMSEND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_585__CLASS_OBJMSEND.nbval = 4; /*inimult dtup_586__CLASS_OBJMSEND */ /*_.VALTUP___V761*/ meltfptr[760] = (melt_ptr_t) & cdat->dtup_586__CLASS_OBJMSEND; cdat->dtup_586__CLASS_OBJMSEND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_586__CLASS_OBJMSEND.nbval = 5; /*iniobj dsym_587__OBMSND_SEL*/ /*uniqueobj*/ if (! /*_.VALDATA___V762*/ meltfptr[761]) /*_.VALDATA___V762*/ meltfptr[761] = (melt_ptr_t) & cdat->dsym_587__OBMSND_SEL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_587__OBMSND_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_587__OBMSND_SEL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_587__OBMSND_SEL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_587__OBMSND_SEL.obj_hash = 594478819; cdat->dsym_587__OBMSND_SEL.obj_len = 3; /*inistring dstr_588__OBMSND_SEL*/ /*_.VALSTR___V763*/ meltfptr[762] = (melt_ptr_t) & cdat->dstr_588__OBMSND_SEL; cdat->dstr_588__OBMSND_SEL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_588__OBMSND_SEL.val, "OBMSND_SEL", sizeof (cdat->dstr_588__OBMSND_SEL.val) - 1); cdat->dstr_588__OBMSND_SEL.val[10] = (char) 0; cdat->dstr_588__OBMSND_SEL.slen = 10; /*^iniobj */ /*iniobj dobj_589__OBMSND_SEL*/ /*_.VALDATA___V755*/ meltfptr[754] = (melt_ptr_t) & cdat->dobj_589__OBMSND_SEL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_589__OBMSND_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_589__OBMSND_SEL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_589__OBMSND_SEL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_589__OBMSND_SEL.obj_num = 2; cdat->dobj_589__OBMSND_SEL.obj_hash = 927869337; cdat->dobj_589__OBMSND_SEL.obj_len = 4; /*inistring dstr_590__OBMSND_SEL*/ /*_.VALSTR___V756*/ meltfptr[755] = (melt_ptr_t) & cdat->dstr_590__OBMSND_SEL; cdat->dstr_590__OBMSND_SEL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_590__OBMSND_SEL.val, "OBMSND_SEL", sizeof (cdat->dstr_590__OBMSND_SEL.val) - 1); cdat->dstr_590__OBMSND_SEL.val[10] = (char) 0; cdat->dstr_590__OBMSND_SEL.slen = 10; /*iniobj dsym_591__OBMSND_RECV*/ /*uniqueobj*/ if (! /*_.VALDATA___V764*/ meltfptr[763]) /*_.VALDATA___V764*/ meltfptr[763] = (melt_ptr_t) & cdat->dsym_591__OBMSND_RECV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_591__OBMSND_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_591__OBMSND_RECV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_591__OBMSND_RECV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_591__OBMSND_RECV.obj_hash = 763738999; cdat->dsym_591__OBMSND_RECV.obj_len = 3; /*inistring dstr_592__OBMSND_RECV*/ /*_.VALSTR___V765*/ meltfptr[764] = (melt_ptr_t) & cdat->dstr_592__OBMSND_RECV; cdat->dstr_592__OBMSND_RECV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_592__OBMSND_RECV.val, "OBMSND_RECV", sizeof (cdat->dstr_592__OBMSND_RECV.val) - 1); cdat->dstr_592__OBMSND_RECV.val[11] = (char) 0; cdat->dstr_592__OBMSND_RECV.slen = 11; /*^iniobj */ /*iniobj dobj_593__OBMSND_RECV*/ /*_.VALDATA___V757*/ meltfptr[756] = (melt_ptr_t) & cdat->dobj_593__OBMSND_RECV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_593__OBMSND_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_593__OBMSND_RECV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_593__OBMSND_RECV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_593__OBMSND_RECV.obj_num = 3; cdat->dobj_593__OBMSND_RECV.obj_hash = 508397136; cdat->dobj_593__OBMSND_RECV.obj_len = 4; /*inistring dstr_594__OBMSND_RECV*/ /*_.VALSTR___V758*/ meltfptr[757] = (melt_ptr_t) & cdat->dstr_594__OBMSND_RECV; cdat->dstr_594__OBMSND_RECV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_594__OBMSND_RECV.val, "OBMSND_RECV", sizeof (cdat->dstr_594__OBMSND_RECV.val) - 1); cdat->dstr_594__OBMSND_RECV.val[11] = (char) 0; cdat->dstr_594__OBMSND_RECV.slen = 11; /*iniobj dsym_595__OBMSND_ARGS*/ /*uniqueobj*/ if (! /*_.VALDATA___V766*/ meltfptr[765]) /*_.VALDATA___V766*/ meltfptr[765] = (melt_ptr_t) & cdat->dsym_595__OBMSND_ARGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_595__OBMSND_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_595__OBMSND_ARGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_595__OBMSND_ARGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_595__OBMSND_ARGS.obj_hash = 816679069; cdat->dsym_595__OBMSND_ARGS.obj_len = 3; /*inistring dstr_596__OBMSND_ARGS*/ /*_.VALSTR___V767*/ meltfptr[766] = (melt_ptr_t) & cdat->dstr_596__OBMSND_ARGS; cdat->dstr_596__OBMSND_ARGS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_596__OBMSND_ARGS.val, "OBMSND_ARGS", sizeof (cdat->dstr_596__OBMSND_ARGS.val) - 1); cdat->dstr_596__OBMSND_ARGS.val[11] = (char) 0; cdat->dstr_596__OBMSND_ARGS.slen = 11; /*^iniobj */ /*iniobj dobj_597__OBMSND_ARGS*/ /*_.VALDATA___V759*/ meltfptr[758] = (melt_ptr_t) & cdat->dobj_597__OBMSND_ARGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_597__OBMSND_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_597__OBMSND_ARGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_597__OBMSND_ARGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_597__OBMSND_ARGS.obj_num = 4; cdat->dobj_597__OBMSND_ARGS.obj_hash = 637286562; cdat->dobj_597__OBMSND_ARGS.obj_len = 4; /*inistring dstr_598__OBMSND_ARGS*/ /*_.VALSTR___V760*/ meltfptr[759] = (melt_ptr_t) & cdat->dstr_598__OBMSND_ARGS; cdat->dstr_598__OBMSND_ARGS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_598__OBMSND_ARGS.val, "OBMSND_ARGS", sizeof (cdat->dstr_598__OBMSND_ARGS.val) - 1); cdat->dstr_598__OBMSND_ARGS.val[11] = (char) 0; cdat->dstr_598__OBMSND_ARGS.slen = 11; /*iniobj dsym_599__CLASS_OBJMULTIMSEND*/ /*uniqueobj*/ if (! /*_.VALDATA___V768*/ meltfptr[767]) /*_.VALDATA___V768*/ meltfptr[767] = (melt_ptr_t) & cdat->dsym_599__CLASS_OBJMULTIMSEND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_599__CLASS_OBJMULTIMSEND", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_599__CLASS_OBJMULTIMSEND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_599__CLASS_OBJMULTIMSEND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_599__CLASS_OBJMULTIMSEND.obj_hash = 441055573; cdat->dsym_599__CLASS_OBJMULTIMSEND.obj_len = 3; /*inistring dstr_600__CLASS_OBJMULTIMS*/ /*_.VALSTR___V769*/ meltfptr[768] = (melt_ptr_t) & cdat->dstr_600__CLASS_OBJMULTIMS; cdat->dstr_600__CLASS_OBJMULTIMS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_600__CLASS_OBJMULTIMS.val, "CLASS_OBJMULTIMSEND", sizeof (cdat->dstr_600__CLASS_OBJMULTIMS. val) - 1); cdat->dstr_600__CLASS_OBJMULTIMS.val[19] = (char) 0; cdat->dstr_600__CLASS_OBJMULTIMS.slen = 19; MELT_LOCATION ("warmelt-genobj.melt:407:/ iniobj"); /*iniobj dobj_601__CLASS_OBJMULTIMSEND*/ /*_.VALDATA___V770*/ meltfptr[769] = (melt_ptr_t) & cdat->dobj_601__CLASS_OBJMULTIMSEND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_601__CLASS_OBJMULTIMSEND", 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_601__CLASS_OBJMULTIMSEND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_601__CLASS_OBJMULTIMSEND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_601__CLASS_OBJMULTIMSEND.obj_num = MELTOBMAG_OBJECT; cdat->dobj_601__CLASS_OBJMULTIMSEND.obj_hash = 465823925; cdat->dobj_601__CLASS_OBJMULTIMSEND.obj_len = 8; /*inistring dstr_602__CLASS_OBJMULTIMS*/ /*_.VALSTR___V771*/ meltfptr[770] = (melt_ptr_t) & cdat->dstr_602__CLASS_OBJMULTIMS; cdat->dstr_602__CLASS_OBJMULTIMS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_602__CLASS_OBJMULTIMS.val, "CLASS_OBJMULTIMSEND", sizeof (cdat->dstr_602__CLASS_OBJMULTIMS. val) - 1); cdat->dstr_602__CLASS_OBJMULTIMS.val[19] = (char) 0; cdat->dstr_602__CLASS_OBJMULTIMS.slen = 19; /*inimult dtup_603__CLASS_OBJMULTIMSEND */ /*_.VALTUP___V772*/ meltfptr[771] = (melt_ptr_t) & cdat->dtup_603__CLASS_OBJMULTIMSEND; cdat->dtup_603__CLASS_OBJMULTIMSEND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_603__CLASS_OBJMULTIMSEND.nbval = 5; /*inimult dtup_604__CLASS_OBJMULTIMSEND */ /*_.VALTUP___V775*/ meltfptr[774] = (melt_ptr_t) & cdat->dtup_604__CLASS_OBJMULTIMSEND; cdat->dtup_604__CLASS_OBJMULTIMSEND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_604__CLASS_OBJMULTIMSEND.nbval = 6; /*iniobj dsym_605__OBMULTSND_XRES*/ /*uniqueobj*/ if (! /*_.VALDATA___V776*/ meltfptr[775]) /*_.VALDATA___V776*/ meltfptr[775] = (melt_ptr_t) & cdat->dsym_605__OBMULTSND_XRES; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_605__OBMULTSND_XRES", melt_magic_discr ((melt_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__OBMULTSND_XRES", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_605__OBMULTSND_XRES.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_605__OBMULTSND_XRES.obj_hash = 677859903; cdat->dsym_605__OBMULTSND_XRES.obj_len = 3; /*inistring dstr_606__OBMULTSND_XRES*/ /*_.VALSTR___V777*/ meltfptr[776] = (melt_ptr_t) & cdat->dstr_606__OBMULTSND_XRES; cdat->dstr_606__OBMULTSND_XRES.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_606__OBMULTSND_XRES.val, "OBMULTSND_XRES", sizeof (cdat->dstr_606__OBMULTSND_XRES.val) - 1); cdat->dstr_606__OBMULTSND_XRES.val[14] = (char) 0; cdat->dstr_606__OBMULTSND_XRES.slen = 14; /*^iniobj */ /*iniobj dobj_607__OBMULTSND_XRES*/ /*_.VALDATA___V773*/ meltfptr[772] = (melt_ptr_t) & cdat->dobj_607__OBMULTSND_XRES; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_607__OBMULTSND_XRES", melt_magic_discr ((melt_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__OBMULTSND_XRES", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_607__OBMULTSND_XRES.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_607__OBMULTSND_XRES.obj_num = 5; cdat->dobj_607__OBMULTSND_XRES.obj_hash = 619060847; cdat->dobj_607__OBMULTSND_XRES.obj_len = 4; /*inistring dstr_608__OBMULTSND_XRES*/ /*_.VALSTR___V774*/ meltfptr[773] = (melt_ptr_t) & cdat->dstr_608__OBMULTSND_XRES; cdat->dstr_608__OBMULTSND_XRES.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_608__OBMULTSND_XRES.val, "OBMULTSND_XRES", sizeof (cdat->dstr_608__OBMULTSND_XRES.val) - 1); cdat->dstr_608__OBMULTSND_XRES.val[14] = (char) 0; cdat->dstr_608__OBMULTSND_XRES.slen = 14; /*iniobj dsym_609__CLASS_OBJRAWALLOCOBJ*/ /*uniqueobj*/ if (! /*_.VALDATA___V778*/ meltfptr[777]) /*_.VALDATA___V778*/ meltfptr[777] = (melt_ptr_t) & cdat->dsym_609__CLASS_OBJRAWALLOCOBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_609__CLASS_OBJRAWALLOCOBJ", melt_magic_discr ((melt_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_OBJRAWALLOCOBJ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_609__CLASS_OBJRAWALLOCOBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_609__CLASS_OBJRAWALLOCOBJ.obj_hash = 795830730; cdat->dsym_609__CLASS_OBJRAWALLOCOBJ.obj_len = 3; /*inistring dstr_610__CLASS_OBJRAWALLO*/ /*_.VALSTR___V779*/ meltfptr[778] = (melt_ptr_t) & cdat->dstr_610__CLASS_OBJRAWALLO; cdat->dstr_610__CLASS_OBJRAWALLO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_610__CLASS_OBJRAWALLO.val, "CLASS_OBJRAWALLOCOBJ", sizeof (cdat->dstr_610__CLASS_OBJRAWALLO. val) - 1); cdat->dstr_610__CLASS_OBJRAWALLO.val[20] = (char) 0; cdat->dstr_610__CLASS_OBJRAWALLO.slen = 20; MELT_LOCATION ("warmelt-genobj.melt:413:/ iniobj"); /*iniobj dobj_611__CLASS_OBJRAWALLOCOBJ*/ /*_.VALDATA___V780*/ meltfptr[779] = (melt_ptr_t) & cdat->dobj_611__CLASS_OBJRAWALLOCOBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_611__CLASS_OBJRAWALLOCOBJ", 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_OBJRAWALLOCOBJ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_611__CLASS_OBJRAWALLOCOBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_611__CLASS_OBJRAWALLOCOBJ.obj_num = MELTOBMAG_OBJECT; cdat->dobj_611__CLASS_OBJRAWALLOCOBJ.obj_hash = 236215202; cdat->dobj_611__CLASS_OBJRAWALLOCOBJ.obj_len = 8; /*inistring dstr_612__CLASS_OBJRAWALLO*/ /*_.VALSTR___V781*/ meltfptr[780] = (melt_ptr_t) & cdat->dstr_612__CLASS_OBJRAWALLO; cdat->dstr_612__CLASS_OBJRAWALLO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_612__CLASS_OBJRAWALLO.val, "CLASS_OBJRAWALLOCOBJ", sizeof (cdat->dstr_612__CLASS_OBJRAWALLO. val) - 1); cdat->dstr_612__CLASS_OBJRAWALLO.val[20] = (char) 0; cdat->dstr_612__CLASS_OBJRAWALLO.slen = 20; /*inimult dtup_613__CLASS_OBJRAWALLOCOBJ */ /*_.VALTUP___V782*/ meltfptr[781] = (melt_ptr_t) & cdat->dtup_613__CLASS_OBJRAWALLOCOBJ; cdat->dtup_613__CLASS_OBJRAWALLOCOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_613__CLASS_OBJRAWALLOCOBJ.nbval = 4; /*inimult dtup_614__CLASS_OBJRAWALLOCOBJ */ /*_.VALTUP___V789*/ meltfptr[788] = (melt_ptr_t) & cdat->dtup_614__CLASS_OBJRAWALLOCOBJ; cdat->dtup_614__CLASS_OBJRAWALLOCOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_614__CLASS_OBJRAWALLOCOBJ.nbval = 5; /*iniobj dsym_615__OBRALLOBJ_CLASS*/ /*uniqueobj*/ if (! /*_.VALDATA___V790*/ meltfptr[789]) /*_.VALDATA___V790*/ meltfptr[789] = (melt_ptr_t) & cdat->dsym_615__OBRALLOBJ_CLASS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_615__OBRALLOBJ_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_615__OBRALLOBJ_CLASS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_615__OBRALLOBJ_CLASS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_615__OBRALLOBJ_CLASS.obj_hash = 979210452; cdat->dsym_615__OBRALLOBJ_CLASS.obj_len = 3; /*inistring dstr_616__OBRALLOBJ_CLASS*/ /*_.VALSTR___V791*/ meltfptr[790] = (melt_ptr_t) & cdat->dstr_616__OBRALLOBJ_CLASS; cdat->dstr_616__OBRALLOBJ_CLASS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_616__OBRALLOBJ_CLASS.val, "OBRALLOBJ_CLASS", sizeof (cdat->dstr_616__OBRALLOBJ_CLASS.val) - 1); cdat->dstr_616__OBRALLOBJ_CLASS.val[15] = (char) 0; cdat->dstr_616__OBRALLOBJ_CLASS.slen = 15; /*^iniobj */ /*iniobj dobj_617__OBRALLOBJ_CLASS*/ /*_.VALDATA___V783*/ meltfptr[782] = (melt_ptr_t) & cdat->dobj_617__OBRALLOBJ_CLASS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_617__OBRALLOBJ_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_617__OBRALLOBJ_CLASS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_617__OBRALLOBJ_CLASS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_617__OBRALLOBJ_CLASS.obj_num = 2; cdat->dobj_617__OBRALLOBJ_CLASS.obj_hash = 893998789; cdat->dobj_617__OBRALLOBJ_CLASS.obj_len = 4; /*inistring dstr_618__OBRALLOBJ_CLASS*/ /*_.VALSTR___V784*/ meltfptr[783] = (melt_ptr_t) & cdat->dstr_618__OBRALLOBJ_CLASS; cdat->dstr_618__OBRALLOBJ_CLASS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_618__OBRALLOBJ_CLASS.val, "OBRALLOBJ_CLASS", sizeof (cdat->dstr_618__OBRALLOBJ_CLASS.val) - 1); cdat->dstr_618__OBRALLOBJ_CLASS.val[15] = (char) 0; cdat->dstr_618__OBRALLOBJ_CLASS.slen = 15; /*iniobj dsym_619__OBRALLOBJ_LEN*/ /*uniqueobj*/ if (! /*_.VALDATA___V792*/ meltfptr[791]) /*_.VALDATA___V792*/ meltfptr[791] = (melt_ptr_t) & cdat->dsym_619__OBRALLOBJ_LEN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_619__OBRALLOBJ_LEN", melt_magic_discr ((melt_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__OBRALLOBJ_LEN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_619__OBRALLOBJ_LEN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_619__OBRALLOBJ_LEN.obj_hash = 11225066; cdat->dsym_619__OBRALLOBJ_LEN.obj_len = 3; /*inistring dstr_620__OBRALLOBJ_LEN*/ /*_.VALSTR___V793*/ meltfptr[792] = (melt_ptr_t) & cdat->dstr_620__OBRALLOBJ_LEN; cdat->dstr_620__OBRALLOBJ_LEN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_620__OBRALLOBJ_LEN.val, "OBRALLOBJ_LEN", sizeof (cdat->dstr_620__OBRALLOBJ_LEN.val) - 1); cdat->dstr_620__OBRALLOBJ_LEN.val[13] = (char) 0; cdat->dstr_620__OBRALLOBJ_LEN.slen = 13; /*^iniobj */ /*iniobj dobj_621__OBRALLOBJ_LEN*/ /*_.VALDATA___V785*/ meltfptr[784] = (melt_ptr_t) & cdat->dobj_621__OBRALLOBJ_LEN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_621__OBRALLOBJ_LEN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_621__OBRALLOBJ_LEN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_621__OBRALLOBJ_LEN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_621__OBRALLOBJ_LEN.obj_num = 3; cdat->dobj_621__OBRALLOBJ_LEN.obj_hash = 422938304; cdat->dobj_621__OBRALLOBJ_LEN.obj_len = 4; /*inistring dstr_622__OBRALLOBJ_LEN*/ /*_.VALSTR___V786*/ meltfptr[785] = (melt_ptr_t) & cdat->dstr_622__OBRALLOBJ_LEN; cdat->dstr_622__OBRALLOBJ_LEN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_622__OBRALLOBJ_LEN.val, "OBRALLOBJ_LEN", sizeof (cdat->dstr_622__OBRALLOBJ_LEN.val) - 1); cdat->dstr_622__OBRALLOBJ_LEN.val[13] = (char) 0; cdat->dstr_622__OBRALLOBJ_LEN.slen = 13; /*iniobj dsym_623__OBRALLOBJ_CLASSNAME*/ /*uniqueobj*/ if (! /*_.VALDATA___V794*/ meltfptr[793]) /*_.VALDATA___V794*/ meltfptr[793] = (melt_ptr_t) & cdat->dsym_623__OBRALLOBJ_CLASSNAME; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_623__OBRALLOBJ_CLASSNAME", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_623__OBRALLOBJ_CLASSNAME", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_623__OBRALLOBJ_CLASSNAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_623__OBRALLOBJ_CLASSNAME.obj_hash = 98016100; cdat->dsym_623__OBRALLOBJ_CLASSNAME.obj_len = 3; /*inistring dstr_624__OBRALLOBJ_CLASSN*/ /*_.VALSTR___V795*/ meltfptr[794] = (melt_ptr_t) & cdat->dstr_624__OBRALLOBJ_CLASSN; cdat->dstr_624__OBRALLOBJ_CLASSN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_624__OBRALLOBJ_CLASSN.val, "OBRALLOBJ_CLASSNAME", sizeof (cdat->dstr_624__OBRALLOBJ_CLASSN. val) - 1); cdat->dstr_624__OBRALLOBJ_CLASSN.val[19] = (char) 0; cdat->dstr_624__OBRALLOBJ_CLASSN.slen = 19; /*^iniobj */ /*iniobj dobj_625__OBRALLOBJ_CLASSNAME*/ /*_.VALDATA___V787*/ meltfptr[786] = (melt_ptr_t) & cdat->dobj_625__OBRALLOBJ_CLASSNAME; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_625__OBRALLOBJ_CLASSNAME", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_625__OBRALLOBJ_CLASSNAME", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_625__OBRALLOBJ_CLASSNAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_625__OBRALLOBJ_CLASSNAME.obj_num = 4; cdat->dobj_625__OBRALLOBJ_CLASSNAME.obj_hash = 574384385; cdat->dobj_625__OBRALLOBJ_CLASSNAME.obj_len = 4; /*inistring dstr_626__OBRALLOBJ_CLASSN*/ /*_.VALSTR___V788*/ meltfptr[787] = (melt_ptr_t) & cdat->dstr_626__OBRALLOBJ_CLASSN; cdat->dstr_626__OBRALLOBJ_CLASSN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_626__OBRALLOBJ_CLASSN.val, "OBRALLOBJ_CLASSNAME", sizeof (cdat->dstr_626__OBRALLOBJ_CLASSN. val) - 1); cdat->dstr_626__OBRALLOBJ_CLASSN.val[19] = (char) 0; cdat->dstr_626__OBRALLOBJ_CLASSN.slen = 19; /*iniobj dsym_627__CLASS_OBJDBGTRACEWRITEOBJ*/ /*uniqueobj*/ if (! /*_.VALDATA___V796*/ meltfptr[795]) /*_.VALDATA___V796*/ meltfptr[795] = (melt_ptr_t) & cdat->dsym_627__CLASS_OBJDBGTRACEWRITEOBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_627__CLASS_OBJDBGTRACEWRITEOBJ", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_627__CLASS_OBJDBGTRACEWRITEOBJ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_627__CLASS_OBJDBGTRACEWRITEOBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_627__CLASS_OBJDBGTRACEWRITEOBJ.obj_hash = 822920976; cdat->dsym_627__CLASS_OBJDBGTRACEWRITEOBJ.obj_len = 3; /*inistring dstr_628__CLASS_OBJDBGTRAC*/ /*_.VALSTR___V797*/ meltfptr[796] = (melt_ptr_t) & cdat->dstr_628__CLASS_OBJDBGTRAC; cdat->dstr_628__CLASS_OBJDBGTRAC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_628__CLASS_OBJDBGTRAC.val, "CLASS_OBJDBGTRACEWRITEOBJ", sizeof (cdat->dstr_628__CLASS_OBJDBGTRAC. val) - 1); cdat->dstr_628__CLASS_OBJDBGTRAC.val[25] = (char) 0; cdat->dstr_628__CLASS_OBJDBGTRAC.slen = 25; MELT_LOCATION ("warmelt-genobj.melt:424:/ iniobj"); /*iniobj dobj_629__CLASS_OBJDBGTRACEWRITEOBJ*/ /*_.VALDATA___V798*/ meltfptr[797] = (melt_ptr_t) & cdat->dobj_629__CLASS_OBJDBGTRACEWRITEOBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_629__CLASS_OBJDBGTRACEWRITEOBJ", 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_629__CLASS_OBJDBGTRACEWRITEOBJ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_629__CLASS_OBJDBGTRACEWRITEOBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_629__CLASS_OBJDBGTRACEWRITEOBJ.obj_num = MELTOBMAG_OBJECT; cdat->dobj_629__CLASS_OBJDBGTRACEWRITEOBJ.obj_hash = 590923327; cdat->dobj_629__CLASS_OBJDBGTRACEWRITEOBJ.obj_len = 8; /*inistring dstr_630__CLASS_OBJDBGTRAC*/ /*_.VALSTR___V799*/ meltfptr[798] = (melt_ptr_t) & cdat->dstr_630__CLASS_OBJDBGTRAC; cdat->dstr_630__CLASS_OBJDBGTRAC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_630__CLASS_OBJDBGTRAC.val, "CLASS_OBJDBGTRACEWRITEOBJ", sizeof (cdat->dstr_630__CLASS_OBJDBGTRAC. val) - 1); cdat->dstr_630__CLASS_OBJDBGTRAC.val[25] = (char) 0; cdat->dstr_630__CLASS_OBJDBGTRAC.slen = 25; /*inimult dtup_631__CLASS_OBJDBGTRACEWRITEOBJ */ /*_.VALTUP___V800*/ meltfptr[799] = (melt_ptr_t) & cdat->dtup_631__CLASS_OBJDBGTRACEWRITEOBJ; cdat->dtup_631__CLASS_OBJDBGTRACEWRITEOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_631__CLASS_OBJDBGTRACEWRITEOBJ.nbval = 3; /*inimult dtup_632__CLASS_OBJDBGTRACEWRITEOBJ */ /*_.VALTUP___V805*/ meltfptr[804] = (melt_ptr_t) & cdat->dtup_632__CLASS_OBJDBGTRACEWRITEOBJ; cdat->dtup_632__CLASS_OBJDBGTRACEWRITEOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_632__CLASS_OBJDBGTRACEWRITEOBJ.nbval = 3; /*iniobj dsym_633__OBDTW_WRITTENOBJ*/ /*uniqueobj*/ if (! /*_.VALDATA___V806*/ meltfptr[805]) /*_.VALDATA___V806*/ meltfptr[805] = (melt_ptr_t) & cdat->dsym_633__OBDTW_WRITTENOBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_633__OBDTW_WRITTENOBJ", melt_magic_discr ((melt_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__OBDTW_WRITTENOBJ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_633__OBDTW_WRITTENOBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_633__OBDTW_WRITTENOBJ.obj_hash = 633872183; cdat->dsym_633__OBDTW_WRITTENOBJ.obj_len = 3; /*inistring dstr_634__OBDTW_WRITTENOBJ*/ /*_.VALSTR___V807*/ meltfptr[806] = (melt_ptr_t) & cdat->dstr_634__OBDTW_WRITTENOBJ; cdat->dstr_634__OBDTW_WRITTENOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_634__OBDTW_WRITTENOBJ.val, "OBDTW_WRITTENOBJ", sizeof (cdat->dstr_634__OBDTW_WRITTENOBJ. val) - 1); cdat->dstr_634__OBDTW_WRITTENOBJ.val[16] = (char) 0; cdat->dstr_634__OBDTW_WRITTENOBJ.slen = 16; /*^iniobj */ /*iniobj dobj_635__OBDTW_WRITTENOBJ*/ /*_.VALDATA___V801*/ meltfptr[800] = (melt_ptr_t) & cdat->dobj_635__OBDTW_WRITTENOBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_635__OBDTW_WRITTENOBJ", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_635__OBDTW_WRITTENOBJ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_635__OBDTW_WRITTENOBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_635__OBDTW_WRITTENOBJ.obj_num = 1; cdat->dobj_635__OBDTW_WRITTENOBJ.obj_hash = 509768911; cdat->dobj_635__OBDTW_WRITTENOBJ.obj_len = 4; /*inistring dstr_636__OBDTW_WRITTENOBJ*/ /*_.VALSTR___V802*/ meltfptr[801] = (melt_ptr_t) & cdat->dstr_636__OBDTW_WRITTENOBJ; cdat->dstr_636__OBDTW_WRITTENOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_636__OBDTW_WRITTENOBJ.val, "OBDTW_WRITTENOBJ", sizeof (cdat->dstr_636__OBDTW_WRITTENOBJ. val) - 1); cdat->dstr_636__OBDTW_WRITTENOBJ.val[16] = (char) 0; cdat->dstr_636__OBDTW_WRITTENOBJ.slen = 16; /*iniobj dsym_637__OBDTW_MESSAGE*/ /*uniqueobj*/ if (! /*_.VALDATA___V808*/ meltfptr[807]) /*_.VALDATA___V808*/ meltfptr[807] = (melt_ptr_t) & cdat->dsym_637__OBDTW_MESSAGE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_637__OBDTW_MESSAGE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_637__OBDTW_MESSAGE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_637__OBDTW_MESSAGE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_637__OBDTW_MESSAGE.obj_hash = 554849538; cdat->dsym_637__OBDTW_MESSAGE.obj_len = 3; /*inistring dstr_638__OBDTW_MESSAGE*/ /*_.VALSTR___V809*/ meltfptr[808] = (melt_ptr_t) & cdat->dstr_638__OBDTW_MESSAGE; cdat->dstr_638__OBDTW_MESSAGE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_638__OBDTW_MESSAGE.val, "OBDTW_MESSAGE", sizeof (cdat->dstr_638__OBDTW_MESSAGE.val) - 1); cdat->dstr_638__OBDTW_MESSAGE.val[13] = (char) 0; cdat->dstr_638__OBDTW_MESSAGE.slen = 13; /*^iniobj */ /*iniobj dobj_639__OBDTW_MESSAGE*/ /*_.VALDATA___V803*/ meltfptr[802] = (melt_ptr_t) & cdat->dobj_639__OBDTW_MESSAGE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_639__OBDTW_MESSAGE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_639__OBDTW_MESSAGE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_639__OBDTW_MESSAGE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_639__OBDTW_MESSAGE.obj_num = 2; cdat->dobj_639__OBDTW_MESSAGE.obj_hash = 391015160; cdat->dobj_639__OBDTW_MESSAGE.obj_len = 4; /*inistring dstr_640__OBDTW_MESSAGE*/ /*_.VALSTR___V804*/ meltfptr[803] = (melt_ptr_t) & cdat->dstr_640__OBDTW_MESSAGE; cdat->dstr_640__OBDTW_MESSAGE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_640__OBDTW_MESSAGE.val, "OBDTW_MESSAGE", sizeof (cdat->dstr_640__OBDTW_MESSAGE.val) - 1); cdat->dstr_640__OBDTW_MESSAGE.val[13] = (char) 0; cdat->dstr_640__OBDTW_MESSAGE.slen = 13; /*iniobj dsym_641__CLASS_OBJNEWCLOSURE*/ /*uniqueobj*/ if (! /*_.VALDATA___V810*/ meltfptr[809]) /*_.VALDATA___V810*/ meltfptr[809] = (melt_ptr_t) & cdat->dsym_641__CLASS_OBJNEWCLOSURE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_641__CLASS_OBJNEWCLOSURE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_641__CLASS_OBJNEWCLOSURE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_641__CLASS_OBJNEWCLOSURE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_641__CLASS_OBJNEWCLOSURE.obj_hash = 699586028; cdat->dsym_641__CLASS_OBJNEWCLOSURE.obj_len = 3; /*inistring dstr_642__CLASS_OBJNEWCLOS*/ /*_.VALSTR___V811*/ meltfptr[810] = (melt_ptr_t) & cdat->dstr_642__CLASS_OBJNEWCLOS; cdat->dstr_642__CLASS_OBJNEWCLOS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_642__CLASS_OBJNEWCLOS.val, "CLASS_OBJNEWCLOSURE", sizeof (cdat->dstr_642__CLASS_OBJNEWCLOS. val) - 1); cdat->dstr_642__CLASS_OBJNEWCLOS.val[19] = (char) 0; cdat->dstr_642__CLASS_OBJNEWCLOS.slen = 19; MELT_LOCATION ("warmelt-genobj.melt:432:/ iniobj"); /*iniobj dobj_643__CLASS_OBJNEWCLOSURE*/ /*_.VALDATA___V812*/ meltfptr[811] = (melt_ptr_t) & cdat->dobj_643__CLASS_OBJNEWCLOSURE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_643__CLASS_OBJNEWCLOSURE", 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_643__CLASS_OBJNEWCLOSURE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_643__CLASS_OBJNEWCLOSURE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_643__CLASS_OBJNEWCLOSURE.obj_num = MELTOBMAG_OBJECT; cdat->dobj_643__CLASS_OBJNEWCLOSURE.obj_hash = 664705484; cdat->dobj_643__CLASS_OBJNEWCLOSURE.obj_len = 8; /*inistring dstr_644__CLASS_OBJNEWCLOS*/ /*_.VALSTR___V813*/ meltfptr[812] = (melt_ptr_t) & cdat->dstr_644__CLASS_OBJNEWCLOS; cdat->dstr_644__CLASS_OBJNEWCLOS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_644__CLASS_OBJNEWCLOS.val, "CLASS_OBJNEWCLOSURE", sizeof (cdat->dstr_644__CLASS_OBJNEWCLOS. val) - 1); cdat->dstr_644__CLASS_OBJNEWCLOS.val[19] = (char) 0; cdat->dstr_644__CLASS_OBJNEWCLOS.slen = 19; /*inimult dtup_645__CLASS_OBJNEWCLOSURE */ /*_.VALTUP___V814*/ meltfptr[813] = (melt_ptr_t) & cdat->dtup_645__CLASS_OBJNEWCLOSURE; cdat->dtup_645__CLASS_OBJNEWCLOSURE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_645__CLASS_OBJNEWCLOSURE.nbval = 4; /*inimult dtup_646__CLASS_OBJNEWCLOSURE */ /*_.VALTUP___V821*/ meltfptr[820] = (melt_ptr_t) & cdat->dtup_646__CLASS_OBJNEWCLOSURE; cdat->dtup_646__CLASS_OBJNEWCLOSURE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_646__CLASS_OBJNEWCLOSURE.nbval = 5; /*iniobj dsym_647__OBNCLO_DISCR*/ /*uniqueobj*/ if (! /*_.VALDATA___V822*/ meltfptr[821]) /*_.VALDATA___V822*/ meltfptr[821] = (melt_ptr_t) & cdat->dsym_647__OBNCLO_DISCR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_647__OBNCLO_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_647__OBNCLO_DISCR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_647__OBNCLO_DISCR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_647__OBNCLO_DISCR.obj_hash = 388790245; cdat->dsym_647__OBNCLO_DISCR.obj_len = 3; /*inistring dstr_648__OBNCLO_DISCR*/ /*_.VALSTR___V823*/ meltfptr[822] = (melt_ptr_t) & cdat->dstr_648__OBNCLO_DISCR; cdat->dstr_648__OBNCLO_DISCR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_648__OBNCLO_DISCR.val, "OBNCLO_DISCR", sizeof (cdat->dstr_648__OBNCLO_DISCR.val) - 1); cdat->dstr_648__OBNCLO_DISCR.val[12] = (char) 0; cdat->dstr_648__OBNCLO_DISCR.slen = 12; /*^iniobj */ /*iniobj dobj_649__OBNCLO_DISCR*/ /*_.VALDATA___V815*/ meltfptr[814] = (melt_ptr_t) & cdat->dobj_649__OBNCLO_DISCR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_649__OBNCLO_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_649__OBNCLO_DISCR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_649__OBNCLO_DISCR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_649__OBNCLO_DISCR.obj_num = 2; cdat->dobj_649__OBNCLO_DISCR.obj_hash = 99136645; cdat->dobj_649__OBNCLO_DISCR.obj_len = 4; /*inistring dstr_650__OBNCLO_DISCR*/ /*_.VALSTR___V816*/ meltfptr[815] = (melt_ptr_t) & cdat->dstr_650__OBNCLO_DISCR; cdat->dstr_650__OBNCLO_DISCR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_650__OBNCLO_DISCR.val, "OBNCLO_DISCR", sizeof (cdat->dstr_650__OBNCLO_DISCR.val) - 1); cdat->dstr_650__OBNCLO_DISCR.val[12] = (char) 0; cdat->dstr_650__OBNCLO_DISCR.slen = 12; /*iniobj dsym_651__OBNCLO_ROUT*/ /*uniqueobj*/ if (! /*_.VALDATA___V824*/ meltfptr[823]) /*_.VALDATA___V824*/ meltfptr[823] = (melt_ptr_t) & cdat->dsym_651__OBNCLO_ROUT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_651__OBNCLO_ROUT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_651__OBNCLO_ROUT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_651__OBNCLO_ROUT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_651__OBNCLO_ROUT.obj_hash = 513939265; cdat->dsym_651__OBNCLO_ROUT.obj_len = 3; /*inistring dstr_652__OBNCLO_ROUT*/ /*_.VALSTR___V825*/ meltfptr[824] = (melt_ptr_t) & cdat->dstr_652__OBNCLO_ROUT; cdat->dstr_652__OBNCLO_ROUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_652__OBNCLO_ROUT.val, "OBNCLO_ROUT", sizeof (cdat->dstr_652__OBNCLO_ROUT.val) - 1); cdat->dstr_652__OBNCLO_ROUT.val[11] = (char) 0; cdat->dstr_652__OBNCLO_ROUT.slen = 11; /*^iniobj */ /*iniobj dobj_653__OBNCLO_ROUT*/ /*_.VALDATA___V817*/ meltfptr[816] = (melt_ptr_t) & cdat->dobj_653__OBNCLO_ROUT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_653__OBNCLO_ROUT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_653__OBNCLO_ROUT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_653__OBNCLO_ROUT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_653__OBNCLO_ROUT.obj_num = 3; cdat->dobj_653__OBNCLO_ROUT.obj_hash = 374386064; cdat->dobj_653__OBNCLO_ROUT.obj_len = 4; /*inistring dstr_654__OBNCLO_ROUT*/ /*_.VALSTR___V818*/ meltfptr[817] = (melt_ptr_t) & cdat->dstr_654__OBNCLO_ROUT; cdat->dstr_654__OBNCLO_ROUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_654__OBNCLO_ROUT.val, "OBNCLO_ROUT", sizeof (cdat->dstr_654__OBNCLO_ROUT.val) - 1); cdat->dstr_654__OBNCLO_ROUT.val[11] = (char) 0; cdat->dstr_654__OBNCLO_ROUT.slen = 11; /*iniobj dsym_655__OBNCLO_LEN*/ /*uniqueobj*/ if (! /*_.VALDATA___V826*/ meltfptr[825]) /*_.VALDATA___V826*/ meltfptr[825] = (melt_ptr_t) & cdat->dsym_655__OBNCLO_LEN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_655__OBNCLO_LEN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_655__OBNCLO_LEN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_655__OBNCLO_LEN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_655__OBNCLO_LEN.obj_hash = 488324648; cdat->dsym_655__OBNCLO_LEN.obj_len = 3; /*inistring dstr_656__OBNCLO_LEN*/ /*_.VALSTR___V827*/ meltfptr[826] = (melt_ptr_t) & cdat->dstr_656__OBNCLO_LEN; cdat->dstr_656__OBNCLO_LEN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_656__OBNCLO_LEN.val, "OBNCLO_LEN", sizeof (cdat->dstr_656__OBNCLO_LEN.val) - 1); cdat->dstr_656__OBNCLO_LEN.val[10] = (char) 0; cdat->dstr_656__OBNCLO_LEN.slen = 10; /*^iniobj */ /*iniobj dobj_657__OBNCLO_LEN*/ /*_.VALDATA___V819*/ meltfptr[818] = (melt_ptr_t) & cdat->dobj_657__OBNCLO_LEN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_657__OBNCLO_LEN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_657__OBNCLO_LEN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_657__OBNCLO_LEN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_657__OBNCLO_LEN.obj_num = 4; cdat->dobj_657__OBNCLO_LEN.obj_hash = 908746419; cdat->dobj_657__OBNCLO_LEN.obj_len = 4; /*inistring dstr_658__OBNCLO_LEN*/ /*_.VALSTR___V820*/ meltfptr[819] = (melt_ptr_t) & cdat->dstr_658__OBNCLO_LEN; cdat->dstr_658__OBNCLO_LEN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_658__OBNCLO_LEN.val, "OBNCLO_LEN", sizeof (cdat->dstr_658__OBNCLO_LEN.val) - 1); cdat->dstr_658__OBNCLO_LEN.val[10] = (char) 0; cdat->dstr_658__OBNCLO_LEN.slen = 10; /*iniobj dsym_659__CLASS_OBJPUTUPLE*/ /*uniqueobj*/ if (! /*_.VALDATA___V828*/ meltfptr[827]) /*_.VALDATA___V828*/ meltfptr[827] = (melt_ptr_t) & cdat->dsym_659__CLASS_OBJPUTUPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_659__CLASS_OBJPUTUPLE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_659__CLASS_OBJPUTUPLE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_659__CLASS_OBJPUTUPLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_659__CLASS_OBJPUTUPLE.obj_hash = 419131762; cdat->dsym_659__CLASS_OBJPUTUPLE.obj_len = 3; /*inistring dstr_660__CLASS_OBJPUTUPLE*/ /*_.VALSTR___V829*/ meltfptr[828] = (melt_ptr_t) & cdat->dstr_660__CLASS_OBJPUTUPLE; cdat->dstr_660__CLASS_OBJPUTUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_660__CLASS_OBJPUTUPLE.val, "CLASS_OBJPUTUPLE", sizeof (cdat->dstr_660__CLASS_OBJPUTUPLE. val) - 1); cdat->dstr_660__CLASS_OBJPUTUPLE.val[16] = (char) 0; cdat->dstr_660__CLASS_OBJPUTUPLE.slen = 16; MELT_LOCATION ("warmelt-genobj.melt:440:/ iniobj"); /*iniobj dobj_661__CLASS_OBJPUTUPLE*/ /*_.VALDATA___V830*/ meltfptr[829] = (melt_ptr_t) & cdat->dobj_661__CLASS_OBJPUTUPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_661__CLASS_OBJPUTUPLE", 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_661__CLASS_OBJPUTUPLE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_661__CLASS_OBJPUTUPLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_661__CLASS_OBJPUTUPLE.obj_num = MELTOBMAG_OBJECT; cdat->dobj_661__CLASS_OBJPUTUPLE.obj_hash = 823332073; cdat->dobj_661__CLASS_OBJPUTUPLE.obj_len = 8; /*inistring dstr_662__CLASS_OBJPUTUPLE*/ /*_.VALSTR___V831*/ meltfptr[830] = (melt_ptr_t) & cdat->dstr_662__CLASS_OBJPUTUPLE; cdat->dstr_662__CLASS_OBJPUTUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_662__CLASS_OBJPUTUPLE.val, "CLASS_OBJPUTUPLE", sizeof (cdat->dstr_662__CLASS_OBJPUTUPLE. val) - 1); cdat->dstr_662__CLASS_OBJPUTUPLE.val[16] = (char) 0; cdat->dstr_662__CLASS_OBJPUTUPLE.slen = 16; /*inimult dtup_663__CLASS_OBJPUTUPLE */ /*_.VALTUP___V832*/ meltfptr[831] = (melt_ptr_t) & cdat->dtup_663__CLASS_OBJPUTUPLE; cdat->dtup_663__CLASS_OBJPUTUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_663__CLASS_OBJPUTUPLE.nbval = 3; /*inimult dtup_664__CLASS_OBJPUTUPLE */ /*_.VALTUP___V839*/ meltfptr[838] = (melt_ptr_t) & cdat->dtup_664__CLASS_OBJPUTUPLE; cdat->dtup_664__CLASS_OBJPUTUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_664__CLASS_OBJPUTUPLE.nbval = 4; /*iniobj dsym_665__OPUTU_TUPLED*/ /*uniqueobj*/ if (! /*_.VALDATA___V840*/ meltfptr[839]) /*_.VALDATA___V840*/ meltfptr[839] = (melt_ptr_t) & cdat->dsym_665__OPUTU_TUPLED; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_665__OPUTU_TUPLED", melt_magic_discr ((melt_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__OPUTU_TUPLED", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_665__OPUTU_TUPLED.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_665__OPUTU_TUPLED.obj_hash = 1004801678; cdat->dsym_665__OPUTU_TUPLED.obj_len = 3; /*inistring dstr_666__OPUTU_TUPLED*/ /*_.VALSTR___V841*/ meltfptr[840] = (melt_ptr_t) & cdat->dstr_666__OPUTU_TUPLED; cdat->dstr_666__OPUTU_TUPLED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_666__OPUTU_TUPLED.val, "OPUTU_TUPLED", sizeof (cdat->dstr_666__OPUTU_TUPLED.val) - 1); cdat->dstr_666__OPUTU_TUPLED.val[12] = (char) 0; cdat->dstr_666__OPUTU_TUPLED.slen = 12; /*^iniobj */ /*iniobj dobj_667__OPUTU_TUPLED*/ /*_.VALDATA___V833*/ meltfptr[832] = (melt_ptr_t) & cdat->dobj_667__OPUTU_TUPLED; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_667__OPUTU_TUPLED", melt_magic_discr ((melt_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__OPUTU_TUPLED", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_667__OPUTU_TUPLED.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_667__OPUTU_TUPLED.obj_num = 1; cdat->dobj_667__OPUTU_TUPLED.obj_hash = 198317932; cdat->dobj_667__OPUTU_TUPLED.obj_len = 4; /*inistring dstr_668__OPUTU_TUPLED*/ /*_.VALSTR___V834*/ meltfptr[833] = (melt_ptr_t) & cdat->dstr_668__OPUTU_TUPLED; cdat->dstr_668__OPUTU_TUPLED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_668__OPUTU_TUPLED.val, "OPUTU_TUPLED", sizeof (cdat->dstr_668__OPUTU_TUPLED.val) - 1); cdat->dstr_668__OPUTU_TUPLED.val[12] = (char) 0; cdat->dstr_668__OPUTU_TUPLED.slen = 12; /*iniobj dsym_669__OPUTU_OFFSET*/ /*uniqueobj*/ if (! /*_.VALDATA___V842*/ meltfptr[841]) /*_.VALDATA___V842*/ meltfptr[841] = (melt_ptr_t) & cdat->dsym_669__OPUTU_OFFSET; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_669__OPUTU_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_669__OPUTU_OFFSET", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_669__OPUTU_OFFSET.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_669__OPUTU_OFFSET.obj_hash = 213297802; cdat->dsym_669__OPUTU_OFFSET.obj_len = 3; /*inistring dstr_670__OPUTU_OFFSET*/ /*_.VALSTR___V843*/ meltfptr[842] = (melt_ptr_t) & cdat->dstr_670__OPUTU_OFFSET; cdat->dstr_670__OPUTU_OFFSET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_670__OPUTU_OFFSET.val, "OPUTU_OFFSET", sizeof (cdat->dstr_670__OPUTU_OFFSET.val) - 1); cdat->dstr_670__OPUTU_OFFSET.val[12] = (char) 0; cdat->dstr_670__OPUTU_OFFSET.slen = 12; /*^iniobj */ /*iniobj dobj_671__OPUTU_OFFSET*/ /*_.VALDATA___V835*/ meltfptr[834] = (melt_ptr_t) & cdat->dobj_671__OPUTU_OFFSET; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_671__OPUTU_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_671__OPUTU_OFFSET", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_671__OPUTU_OFFSET.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_671__OPUTU_OFFSET.obj_num = 2; cdat->dobj_671__OPUTU_OFFSET.obj_hash = 972938920; cdat->dobj_671__OPUTU_OFFSET.obj_len = 4; /*inistring dstr_672__OPUTU_OFFSET*/ /*_.VALSTR___V836*/ meltfptr[835] = (melt_ptr_t) & cdat->dstr_672__OPUTU_OFFSET; cdat->dstr_672__OPUTU_OFFSET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_672__OPUTU_OFFSET.val, "OPUTU_OFFSET", sizeof (cdat->dstr_672__OPUTU_OFFSET.val) - 1); cdat->dstr_672__OPUTU_OFFSET.val[12] = (char) 0; cdat->dstr_672__OPUTU_OFFSET.slen = 12; /*iniobj dsym_673__OPUTU_VALUE*/ /*uniqueobj*/ if (! /*_.VALDATA___V844*/ meltfptr[843]) /*_.VALDATA___V844*/ meltfptr[843] = (melt_ptr_t) & cdat->dsym_673__OPUTU_VALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_673__OPUTU_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_673__OPUTU_VALUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_673__OPUTU_VALUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_673__OPUTU_VALUE.obj_hash = 106335513; cdat->dsym_673__OPUTU_VALUE.obj_len = 3; /*inistring dstr_674__OPUTU_VALUE*/ /*_.VALSTR___V845*/ meltfptr[844] = (melt_ptr_t) & cdat->dstr_674__OPUTU_VALUE; cdat->dstr_674__OPUTU_VALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_674__OPUTU_VALUE.val, "OPUTU_VALUE", sizeof (cdat->dstr_674__OPUTU_VALUE.val) - 1); cdat->dstr_674__OPUTU_VALUE.val[11] = (char) 0; cdat->dstr_674__OPUTU_VALUE.slen = 11; /*^iniobj */ /*iniobj dobj_675__OPUTU_VALUE*/ /*_.VALDATA___V837*/ meltfptr[836] = (melt_ptr_t) & cdat->dobj_675__OPUTU_VALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_675__OPUTU_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_675__OPUTU_VALUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_675__OPUTU_VALUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_675__OPUTU_VALUE.obj_num = 3; cdat->dobj_675__OPUTU_VALUE.obj_hash = 777902682; cdat->dobj_675__OPUTU_VALUE.obj_len = 4; /*inistring dstr_676__OPUTU_VALUE*/ /*_.VALSTR___V838*/ meltfptr[837] = (melt_ptr_t) & cdat->dstr_676__OPUTU_VALUE; cdat->dstr_676__OPUTU_VALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_676__OPUTU_VALUE.val, "OPUTU_VALUE", sizeof (cdat->dstr_676__OPUTU_VALUE.val) - 1); cdat->dstr_676__OPUTU_VALUE.val[11] = (char) 0; cdat->dstr_676__OPUTU_VALUE.slen = 11; /*iniobj dsym_677__CLASS_OBJPUTPAIR*/ /*uniqueobj*/ if (! /*_.VALDATA___V846*/ meltfptr[845]) /*_.VALDATA___V846*/ meltfptr[845] = (melt_ptr_t) & cdat->dsym_677__CLASS_OBJPUTPAIR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_677__CLASS_OBJPUTPAIR", melt_magic_discr ((melt_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__CLASS_OBJPUTPAIR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_677__CLASS_OBJPUTPAIR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_677__CLASS_OBJPUTPAIR.obj_hash = 28800659; cdat->dsym_677__CLASS_OBJPUTPAIR.obj_len = 3; /*inistring dstr_678__CLASS_OBJPUTPAIR*/ /*_.VALSTR___V847*/ meltfptr[846] = (melt_ptr_t) & cdat->dstr_678__CLASS_OBJPUTPAIR; cdat->dstr_678__CLASS_OBJPUTPAIR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_678__CLASS_OBJPUTPAIR.val, "CLASS_OBJPUTPAIR", sizeof (cdat->dstr_678__CLASS_OBJPUTPAIR. val) - 1); cdat->dstr_678__CLASS_OBJPUTPAIR.val[16] = (char) 0; cdat->dstr_678__CLASS_OBJPUTPAIR.slen = 16; MELT_LOCATION ("warmelt-genobj.melt:449:/ iniobj"); /*iniobj dobj_679__CLASS_OBJPUTPAIR*/ /*_.VALDATA___V848*/ meltfptr[847] = (melt_ptr_t) & cdat->dobj_679__CLASS_OBJPUTPAIR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_679__CLASS_OBJPUTPAIR", 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_679__CLASS_OBJPUTPAIR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_679__CLASS_OBJPUTPAIR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_679__CLASS_OBJPUTPAIR.obj_num = MELTOBMAG_OBJECT; cdat->dobj_679__CLASS_OBJPUTPAIR.obj_hash = 163492841; cdat->dobj_679__CLASS_OBJPUTPAIR.obj_len = 8; /*inistring dstr_680__CLASS_OBJPUTPAIR*/ /*_.VALSTR___V849*/ meltfptr[848] = (melt_ptr_t) & cdat->dstr_680__CLASS_OBJPUTPAIR; cdat->dstr_680__CLASS_OBJPUTPAIR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_680__CLASS_OBJPUTPAIR.val, "CLASS_OBJPUTPAIR", sizeof (cdat->dstr_680__CLASS_OBJPUTPAIR. val) - 1); cdat->dstr_680__CLASS_OBJPUTPAIR.val[16] = (char) 0; cdat->dstr_680__CLASS_OBJPUTPAIR.slen = 16; /*inimult dtup_681__CLASS_OBJPUTPAIR */ /*_.VALTUP___V850*/ meltfptr[849] = (melt_ptr_t) & cdat->dtup_681__CLASS_OBJPUTPAIR; cdat->dtup_681__CLASS_OBJPUTPAIR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_681__CLASS_OBJPUTPAIR.nbval = 3; /*inimult dtup_682__CLASS_OBJPUTPAIR */ /*_.VALTUP___V853*/ meltfptr[852] = (melt_ptr_t) & cdat->dtup_682__CLASS_OBJPUTPAIR; cdat->dtup_682__CLASS_OBJPUTPAIR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_682__CLASS_OBJPUTPAIR.nbval = 2; /*iniobj dsym_683__OPUTP_PAIR*/ /*uniqueobj*/ if (! /*_.VALDATA___V854*/ meltfptr[853]) /*_.VALDATA___V854*/ meltfptr[853] = (melt_ptr_t) & cdat->dsym_683__OPUTP_PAIR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_683__OPUTP_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_683__OPUTP_PAIR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_683__OPUTP_PAIR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_683__OPUTP_PAIR.obj_hash = 627363782; cdat->dsym_683__OPUTP_PAIR.obj_len = 3; /*inistring dstr_684__OPUTP_PAIR*/ /*_.VALSTR___V855*/ meltfptr[854] = (melt_ptr_t) & cdat->dstr_684__OPUTP_PAIR; cdat->dstr_684__OPUTP_PAIR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_684__OPUTP_PAIR.val, "OPUTP_PAIR", sizeof (cdat->dstr_684__OPUTP_PAIR.val) - 1); cdat->dstr_684__OPUTP_PAIR.val[10] = (char) 0; cdat->dstr_684__OPUTP_PAIR.slen = 10; /*^iniobj */ /*iniobj dobj_685__OPUTP_PAIR*/ /*_.VALDATA___V851*/ meltfptr[850] = (melt_ptr_t) & cdat->dobj_685__OPUTP_PAIR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_685__OPUTP_PAIR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_685__OPUTP_PAIR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_685__OPUTP_PAIR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_685__OPUTP_PAIR.obj_num = 1; cdat->dobj_685__OPUTP_PAIR.obj_hash = 9913053; cdat->dobj_685__OPUTP_PAIR.obj_len = 4; /*inistring dstr_686__OPUTP_PAIR*/ /*_.VALSTR___V852*/ meltfptr[851] = (melt_ptr_t) & cdat->dstr_686__OPUTP_PAIR; cdat->dstr_686__OPUTP_PAIR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_686__OPUTP_PAIR.val, "OPUTP_PAIR", sizeof (cdat->dstr_686__OPUTP_PAIR.val) - 1); cdat->dstr_686__OPUTP_PAIR.val[10] = (char) 0; cdat->dstr_686__OPUTP_PAIR.slen = 10; /*iniobj dsym_687__CLASS_OBJPUTPAIRHEAD*/ /*uniqueobj*/ if (! /*_.VALDATA___V856*/ meltfptr[855]) /*_.VALDATA___V856*/ meltfptr[855] = (melt_ptr_t) & cdat->dsym_687__CLASS_OBJPUTPAIRHEAD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_687__CLASS_OBJPUTPAIRHEAD", melt_magic_discr ((melt_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_OBJPUTPAIRHEAD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_687__CLASS_OBJPUTPAIRHEAD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_687__CLASS_OBJPUTPAIRHEAD.obj_hash = 844112648; cdat->dsym_687__CLASS_OBJPUTPAIRHEAD.obj_len = 3; /*inistring dstr_688__CLASS_OBJPUTPAIR*/ /*_.VALSTR___V857*/ meltfptr[856] = (melt_ptr_t) & cdat->dstr_688__CLASS_OBJPUTPAIR; cdat->dstr_688__CLASS_OBJPUTPAIR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_688__CLASS_OBJPUTPAIR.val, "CLASS_OBJPUTPAIRHEAD", sizeof (cdat->dstr_688__CLASS_OBJPUTPAIR. val) - 1); cdat->dstr_688__CLASS_OBJPUTPAIR.val[20] = (char) 0; cdat->dstr_688__CLASS_OBJPUTPAIR.slen = 20; MELT_LOCATION ("warmelt-genobj.melt:454:/ iniobj"); /*iniobj dobj_689__CLASS_OBJPUTPAIRHEAD*/ /*_.VALDATA___V858*/ meltfptr[857] = (melt_ptr_t) & cdat->dobj_689__CLASS_OBJPUTPAIRHEAD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_689__CLASS_OBJPUTPAIRHEAD", 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_OBJPUTPAIRHEAD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_689__CLASS_OBJPUTPAIRHEAD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_689__CLASS_OBJPUTPAIRHEAD.obj_num = MELTOBMAG_OBJECT; cdat->dobj_689__CLASS_OBJPUTPAIRHEAD.obj_hash = 917071010; cdat->dobj_689__CLASS_OBJPUTPAIRHEAD.obj_len = 8; /*inistring dstr_690__CLASS_OBJPUTPAIR*/ /*_.VALSTR___V859*/ meltfptr[858] = (melt_ptr_t) & cdat->dstr_690__CLASS_OBJPUTPAIR; cdat->dstr_690__CLASS_OBJPUTPAIR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_690__CLASS_OBJPUTPAIR.val, "CLASS_OBJPUTPAIRHEAD", sizeof (cdat->dstr_690__CLASS_OBJPUTPAIR. val) - 1); cdat->dstr_690__CLASS_OBJPUTPAIR.val[20] = (char) 0; cdat->dstr_690__CLASS_OBJPUTPAIR.slen = 20; /*inimult dtup_691__CLASS_OBJPUTPAIRHEAD */ /*_.VALTUP___V860*/ meltfptr[859] = (melt_ptr_t) & cdat->dtup_691__CLASS_OBJPUTPAIRHEAD; cdat->dtup_691__CLASS_OBJPUTPAIRHEAD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_691__CLASS_OBJPUTPAIRHEAD.nbval = 4; /*inimult dtup_692__CLASS_OBJPUTPAIRHEAD */ /*_.VALTUP___V863*/ meltfptr[862] = (melt_ptr_t) & cdat->dtup_692__CLASS_OBJPUTPAIRHEAD; cdat->dtup_692__CLASS_OBJPUTPAIRHEAD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_692__CLASS_OBJPUTPAIRHEAD.nbval = 3; /*iniobj dsym_693__OPUTP_HEAD*/ /*uniqueobj*/ if (! /*_.VALDATA___V864*/ meltfptr[863]) /*_.VALDATA___V864*/ meltfptr[863] = (melt_ptr_t) & cdat->dsym_693__OPUTP_HEAD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_693__OPUTP_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_693__OPUTP_HEAD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_693__OPUTP_HEAD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_693__OPUTP_HEAD.obj_hash = 707520413; cdat->dsym_693__OPUTP_HEAD.obj_len = 3; /*inistring dstr_694__OPUTP_HEAD*/ /*_.VALSTR___V865*/ meltfptr[864] = (melt_ptr_t) & cdat->dstr_694__OPUTP_HEAD; cdat->dstr_694__OPUTP_HEAD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_694__OPUTP_HEAD.val, "OPUTP_HEAD", sizeof (cdat->dstr_694__OPUTP_HEAD.val) - 1); cdat->dstr_694__OPUTP_HEAD.val[10] = (char) 0; cdat->dstr_694__OPUTP_HEAD.slen = 10; /*^iniobj */ /*iniobj dobj_695__OPUTP_HEAD*/ /*_.VALDATA___V861*/ meltfptr[860] = (melt_ptr_t) & cdat->dobj_695__OPUTP_HEAD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_695__OPUTP_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_695__OPUTP_HEAD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_695__OPUTP_HEAD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_695__OPUTP_HEAD.obj_num = 2; cdat->dobj_695__OPUTP_HEAD.obj_hash = 409905930; cdat->dobj_695__OPUTP_HEAD.obj_len = 4; /*inistring dstr_696__OPUTP_HEAD*/ /*_.VALSTR___V862*/ meltfptr[861] = (melt_ptr_t) & cdat->dstr_696__OPUTP_HEAD; cdat->dstr_696__OPUTP_HEAD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_696__OPUTP_HEAD.val, "OPUTP_HEAD", sizeof (cdat->dstr_696__OPUTP_HEAD.val) - 1); cdat->dstr_696__OPUTP_HEAD.val[10] = (char) 0; cdat->dstr_696__OPUTP_HEAD.slen = 10; /*iniobj dsym_697__CLASS_OBJPUTPAIRTAIL*/ /*uniqueobj*/ if (! /*_.VALDATA___V866*/ meltfptr[865]) /*_.VALDATA___V866*/ meltfptr[865] = (melt_ptr_t) & cdat->dsym_697__CLASS_OBJPUTPAIRTAIL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_697__CLASS_OBJPUTPAIRTAIL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_697__CLASS_OBJPUTPAIRTAIL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_697__CLASS_OBJPUTPAIRTAIL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_697__CLASS_OBJPUTPAIRTAIL.obj_hash = 11812974; cdat->dsym_697__CLASS_OBJPUTPAIRTAIL.obj_len = 3; /*inistring dstr_698__CLASS_OBJPUTPAIR*/ /*_.VALSTR___V867*/ meltfptr[866] = (melt_ptr_t) & cdat->dstr_698__CLASS_OBJPUTPAIR; cdat->dstr_698__CLASS_OBJPUTPAIR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_698__CLASS_OBJPUTPAIR.val, "CLASS_OBJPUTPAIRTAIL", sizeof (cdat->dstr_698__CLASS_OBJPUTPAIR. val) - 1); cdat->dstr_698__CLASS_OBJPUTPAIR.val[20] = (char) 0; cdat->dstr_698__CLASS_OBJPUTPAIR.slen = 20; MELT_LOCATION ("warmelt-genobj.melt:459:/ iniobj"); /*iniobj dobj_699__CLASS_OBJPUTPAIRTAIL*/ /*_.VALDATA___V868*/ meltfptr[867] = (melt_ptr_t) & cdat->dobj_699__CLASS_OBJPUTPAIRTAIL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_699__CLASS_OBJPUTPAIRTAIL", 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_699__CLASS_OBJPUTPAIRTAIL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_699__CLASS_OBJPUTPAIRTAIL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_699__CLASS_OBJPUTPAIRTAIL.obj_num = MELTOBMAG_OBJECT; cdat->dobj_699__CLASS_OBJPUTPAIRTAIL.obj_hash = 154273851; cdat->dobj_699__CLASS_OBJPUTPAIRTAIL.obj_len = 8; /*inistring dstr_700__CLASS_OBJPUTPAIR*/ /*_.VALSTR___V869*/ meltfptr[868] = (melt_ptr_t) & cdat->dstr_700__CLASS_OBJPUTPAIR; cdat->dstr_700__CLASS_OBJPUTPAIR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_700__CLASS_OBJPUTPAIR.val, "CLASS_OBJPUTPAIRTAIL", sizeof (cdat->dstr_700__CLASS_OBJPUTPAIR. val) - 1); cdat->dstr_700__CLASS_OBJPUTPAIR.val[20] = (char) 0; cdat->dstr_700__CLASS_OBJPUTPAIR.slen = 20; /*inimult dtup_701__CLASS_OBJPUTPAIRTAIL */ /*_.VALTUP___V870*/ meltfptr[869] = (melt_ptr_t) & cdat->dtup_701__CLASS_OBJPUTPAIRTAIL; cdat->dtup_701__CLASS_OBJPUTPAIRTAIL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_701__CLASS_OBJPUTPAIRTAIL.nbval = 4; /*inimult dtup_702__CLASS_OBJPUTPAIRTAIL */ /*_.VALTUP___V873*/ meltfptr[872] = (melt_ptr_t) & cdat->dtup_702__CLASS_OBJPUTPAIRTAIL; cdat->dtup_702__CLASS_OBJPUTPAIRTAIL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_702__CLASS_OBJPUTPAIRTAIL.nbval = 3; /*iniobj dsym_703__OPUTP_TAIL*/ /*uniqueobj*/ if (! /*_.VALDATA___V874*/ meltfptr[873]) /*_.VALDATA___V874*/ meltfptr[873] = (melt_ptr_t) & cdat->dsym_703__OPUTP_TAIL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_703__OPUTP_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_703__OPUTP_TAIL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_703__OPUTP_TAIL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_703__OPUTP_TAIL.obj_hash = 601575289; cdat->dsym_703__OPUTP_TAIL.obj_len = 3; /*inistring dstr_704__OPUTP_TAIL*/ /*_.VALSTR___V875*/ meltfptr[874] = (melt_ptr_t) & cdat->dstr_704__OPUTP_TAIL; cdat->dstr_704__OPUTP_TAIL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_704__OPUTP_TAIL.val, "OPUTP_TAIL", sizeof (cdat->dstr_704__OPUTP_TAIL.val) - 1); cdat->dstr_704__OPUTP_TAIL.val[10] = (char) 0; cdat->dstr_704__OPUTP_TAIL.slen = 10; /*^iniobj */ /*iniobj dobj_705__OPUTP_TAIL*/ /*_.VALDATA___V871*/ meltfptr[870] = (melt_ptr_t) & cdat->dobj_705__OPUTP_TAIL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_705__OPUTP_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_705__OPUTP_TAIL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_705__OPUTP_TAIL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_705__OPUTP_TAIL.obj_num = 2; cdat->dobj_705__OPUTP_TAIL.obj_hash = 118227945; cdat->dobj_705__OPUTP_TAIL.obj_len = 4; /*inistring dstr_706__OPUTP_TAIL*/ /*_.VALSTR___V872*/ meltfptr[871] = (melt_ptr_t) & cdat->dstr_706__OPUTP_TAIL; cdat->dstr_706__OPUTP_TAIL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_706__OPUTP_TAIL.val, "OPUTP_TAIL", sizeof (cdat->dstr_706__OPUTP_TAIL.val) - 1); cdat->dstr_706__OPUTP_TAIL.val[10] = (char) 0; cdat->dstr_706__OPUTP_TAIL.slen = 10; /*iniobj dsym_707__CLASS_OBJPUTLIST*/ /*uniqueobj*/ if (! /*_.VALDATA___V876*/ meltfptr[875]) /*_.VALDATA___V876*/ meltfptr[875] = (melt_ptr_t) & cdat->dsym_707__CLASS_OBJPUTLIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_707__CLASS_OBJPUTLIST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_707__CLASS_OBJPUTLIST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_707__CLASS_OBJPUTLIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_707__CLASS_OBJPUTLIST.obj_hash = 581868612; cdat->dsym_707__CLASS_OBJPUTLIST.obj_len = 3; /*inistring dstr_708__CLASS_OBJPUTLIST*/ /*_.VALSTR___V877*/ meltfptr[876] = (melt_ptr_t) & cdat->dstr_708__CLASS_OBJPUTLIST; cdat->dstr_708__CLASS_OBJPUTLIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_708__CLASS_OBJPUTLIST.val, "CLASS_OBJPUTLIST", sizeof (cdat->dstr_708__CLASS_OBJPUTLIST. val) - 1); cdat->dstr_708__CLASS_OBJPUTLIST.val[16] = (char) 0; cdat->dstr_708__CLASS_OBJPUTLIST.slen = 16; MELT_LOCATION ("warmelt-genobj.melt:465:/ iniobj"); /*iniobj dobj_709__CLASS_OBJPUTLIST*/ /*_.VALDATA___V878*/ meltfptr[877] = (melt_ptr_t) & cdat->dobj_709__CLASS_OBJPUTLIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_709__CLASS_OBJPUTLIST", 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_709__CLASS_OBJPUTLIST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_709__CLASS_OBJPUTLIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_709__CLASS_OBJPUTLIST.obj_num = MELTOBMAG_OBJECT; cdat->dobj_709__CLASS_OBJPUTLIST.obj_hash = 510590685; cdat->dobj_709__CLASS_OBJPUTLIST.obj_len = 8; /*inistring dstr_710__CLASS_OBJPUTLIST*/ /*_.VALSTR___V879*/ meltfptr[878] = (melt_ptr_t) & cdat->dstr_710__CLASS_OBJPUTLIST; cdat->dstr_710__CLASS_OBJPUTLIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_710__CLASS_OBJPUTLIST.val, "CLASS_OBJPUTLIST", sizeof (cdat->dstr_710__CLASS_OBJPUTLIST. val) - 1); cdat->dstr_710__CLASS_OBJPUTLIST.val[16] = (char) 0; cdat->dstr_710__CLASS_OBJPUTLIST.slen = 16; /*inimult dtup_711__CLASS_OBJPUTLIST */ /*_.VALTUP___V880*/ meltfptr[879] = (melt_ptr_t) & cdat->dtup_711__CLASS_OBJPUTLIST; cdat->dtup_711__CLASS_OBJPUTLIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_711__CLASS_OBJPUTLIST.nbval = 3; /*inimult dtup_712__CLASS_OBJPUTLIST */ /*_.VALTUP___V887*/ meltfptr[886] = (melt_ptr_t) & cdat->dtup_712__CLASS_OBJPUTLIST; cdat->dtup_712__CLASS_OBJPUTLIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_712__CLASS_OBJPUTLIST.nbval = 4; /*iniobj dsym_713__OPUTL_LIST*/ /*uniqueobj*/ if (! /*_.VALDATA___V888*/ meltfptr[887]) /*_.VALDATA___V888*/ meltfptr[887] = (melt_ptr_t) & cdat->dsym_713__OPUTL_LIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_713__OPUTL_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_713__OPUTL_LIST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_713__OPUTL_LIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_713__OPUTL_LIST.obj_hash = 1018490225; cdat->dsym_713__OPUTL_LIST.obj_len = 3; /*inistring dstr_714__OPUTL_LIST*/ /*_.VALSTR___V889*/ meltfptr[888] = (melt_ptr_t) & cdat->dstr_714__OPUTL_LIST; cdat->dstr_714__OPUTL_LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_714__OPUTL_LIST.val, "OPUTL_LIST", sizeof (cdat->dstr_714__OPUTL_LIST.val) - 1); cdat->dstr_714__OPUTL_LIST.val[10] = (char) 0; cdat->dstr_714__OPUTL_LIST.slen = 10; /*^iniobj */ /*iniobj dobj_715__OPUTL_LIST*/ /*_.VALDATA___V881*/ meltfptr[880] = (melt_ptr_t) & cdat->dobj_715__OPUTL_LIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_715__OPUTL_LIST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_715__OPUTL_LIST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_715__OPUTL_LIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_715__OPUTL_LIST.obj_num = 1; cdat->dobj_715__OPUTL_LIST.obj_hash = 609460037; cdat->dobj_715__OPUTL_LIST.obj_len = 4; /*inistring dstr_716__OPUTL_LIST*/ /*_.VALSTR___V882*/ meltfptr[881] = (melt_ptr_t) & cdat->dstr_716__OPUTL_LIST; cdat->dstr_716__OPUTL_LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_716__OPUTL_LIST.val, "OPUTL_LIST", sizeof (cdat->dstr_716__OPUTL_LIST.val) - 1); cdat->dstr_716__OPUTL_LIST.val[10] = (char) 0; cdat->dstr_716__OPUTL_LIST.slen = 10; /*iniobj dsym_717__OPUTL_FIRST*/ /*uniqueobj*/ if (! /*_.VALDATA___V890*/ meltfptr[889]) /*_.VALDATA___V890*/ meltfptr[889] = (melt_ptr_t) & cdat->dsym_717__OPUTL_FIRST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_717__OPUTL_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_717__OPUTL_FIRST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_717__OPUTL_FIRST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_717__OPUTL_FIRST.obj_hash = 784463490; cdat->dsym_717__OPUTL_FIRST.obj_len = 3; /*inistring dstr_718__OPUTL_FIRST*/ /*_.VALSTR___V891*/ meltfptr[890] = (melt_ptr_t) & cdat->dstr_718__OPUTL_FIRST; cdat->dstr_718__OPUTL_FIRST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_718__OPUTL_FIRST.val, "OPUTL_FIRST", sizeof (cdat->dstr_718__OPUTL_FIRST.val) - 1); cdat->dstr_718__OPUTL_FIRST.val[11] = (char) 0; cdat->dstr_718__OPUTL_FIRST.slen = 11; /*^iniobj */ /*iniobj dobj_719__OPUTL_FIRST*/ /*_.VALDATA___V883*/ meltfptr[882] = (melt_ptr_t) & cdat->dobj_719__OPUTL_FIRST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_719__OPUTL_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_719__OPUTL_FIRST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_719__OPUTL_FIRST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_719__OPUTL_FIRST.obj_num = 2; cdat->dobj_719__OPUTL_FIRST.obj_hash = 774797336; cdat->dobj_719__OPUTL_FIRST.obj_len = 4; /*inistring dstr_720__OPUTL_FIRST*/ /*_.VALSTR___V884*/ meltfptr[883] = (melt_ptr_t) & cdat->dstr_720__OPUTL_FIRST; cdat->dstr_720__OPUTL_FIRST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_720__OPUTL_FIRST.val, "OPUTL_FIRST", sizeof (cdat->dstr_720__OPUTL_FIRST.val) - 1); cdat->dstr_720__OPUTL_FIRST.val[11] = (char) 0; cdat->dstr_720__OPUTL_FIRST.slen = 11; /*iniobj dsym_721__OPUTL_LAST*/ /*uniqueobj*/ if (! /*_.VALDATA___V892*/ meltfptr[891]) /*_.VALDATA___V892*/ meltfptr[891] = (melt_ptr_t) & cdat->dsym_721__OPUTL_LAST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_721__OPUTL_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_721__OPUTL_LAST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_721__OPUTL_LAST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_721__OPUTL_LAST.obj_hash = 419301444; cdat->dsym_721__OPUTL_LAST.obj_len = 3; /*inistring dstr_722__OPUTL_LAST*/ /*_.VALSTR___V893*/ meltfptr[892] = (melt_ptr_t) & cdat->dstr_722__OPUTL_LAST; cdat->dstr_722__OPUTL_LAST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_722__OPUTL_LAST.val, "OPUTL_LAST", sizeof (cdat->dstr_722__OPUTL_LAST.val) - 1); cdat->dstr_722__OPUTL_LAST.val[10] = (char) 0; cdat->dstr_722__OPUTL_LAST.slen = 10; /*^iniobj */ /*iniobj dobj_723__OPUTL_LAST*/ /*_.VALDATA___V885*/ meltfptr[884] = (melt_ptr_t) & cdat->dobj_723__OPUTL_LAST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_723__OPUTL_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_723__OPUTL_LAST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_723__OPUTL_LAST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_723__OPUTL_LAST.obj_num = 3; cdat->dobj_723__OPUTL_LAST.obj_hash = 952686995; cdat->dobj_723__OPUTL_LAST.obj_len = 4; /*inistring dstr_724__OPUTL_LAST*/ /*_.VALSTR___V886*/ meltfptr[885] = (melt_ptr_t) & cdat->dstr_724__OPUTL_LAST; cdat->dstr_724__OPUTL_LAST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_724__OPUTL_LAST.val, "OPUTL_LAST", sizeof (cdat->dstr_724__OPUTL_LAST.val) - 1); cdat->dstr_724__OPUTL_LAST.val[10] = (char) 0; cdat->dstr_724__OPUTL_LAST.slen = 10; /*iniobj dsym_725__CLASS_OBJPUTSLOT*/ /*uniqueobj*/ if (! /*_.VALDATA___V894*/ meltfptr[893]) /*_.VALDATA___V894*/ meltfptr[893] = (melt_ptr_t) & cdat->dsym_725__CLASS_OBJPUTSLOT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_725__CLASS_OBJPUTSLOT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_725__CLASS_OBJPUTSLOT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_725__CLASS_OBJPUTSLOT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_725__CLASS_OBJPUTSLOT.obj_hash = 382942903; cdat->dsym_725__CLASS_OBJPUTSLOT.obj_len = 3; /*inistring dstr_726__CLASS_OBJPUTSLOT*/ /*_.VALSTR___V895*/ meltfptr[894] = (melt_ptr_t) & cdat->dstr_726__CLASS_OBJPUTSLOT; cdat->dstr_726__CLASS_OBJPUTSLOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_726__CLASS_OBJPUTSLOT.val, "CLASS_OBJPUTSLOT", sizeof (cdat->dstr_726__CLASS_OBJPUTSLOT. val) - 1); cdat->dstr_726__CLASS_OBJPUTSLOT.val[16] = (char) 0; cdat->dstr_726__CLASS_OBJPUTSLOT.slen = 16; MELT_LOCATION ("warmelt-genobj.melt:473:/ iniobj"); /*iniobj dobj_727__CLASS_OBJPUTSLOT*/ /*_.VALDATA___V896*/ meltfptr[895] = (melt_ptr_t) & cdat->dobj_727__CLASS_OBJPUTSLOT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_727__CLASS_OBJPUTSLOT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_727__CLASS_OBJPUTSLOT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_727__CLASS_OBJPUTSLOT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_727__CLASS_OBJPUTSLOT.obj_num = MELTOBMAG_OBJECT; cdat->dobj_727__CLASS_OBJPUTSLOT.obj_hash = 500055228; cdat->dobj_727__CLASS_OBJPUTSLOT.obj_len = 8; /*inistring dstr_728__CLASS_OBJPUTSLOT*/ /*_.VALSTR___V897*/ meltfptr[896] = (melt_ptr_t) & cdat->dstr_728__CLASS_OBJPUTSLOT; cdat->dstr_728__CLASS_OBJPUTSLOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_728__CLASS_OBJPUTSLOT.val, "CLASS_OBJPUTSLOT", sizeof (cdat->dstr_728__CLASS_OBJPUTSLOT. val) - 1); cdat->dstr_728__CLASS_OBJPUTSLOT.val[16] = (char) 0; cdat->dstr_728__CLASS_OBJPUTSLOT.slen = 16; /*inimult dtup_729__CLASS_OBJPUTSLOT */ /*_.VALTUP___V898*/ meltfptr[897] = (melt_ptr_t) & cdat->dtup_729__CLASS_OBJPUTSLOT; cdat->dtup_729__CLASS_OBJPUTSLOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_729__CLASS_OBJPUTSLOT.nbval = 3; /*inimult dtup_730__CLASS_OBJPUTSLOT */ /*_.VALTUP___V907*/ meltfptr[906] = (melt_ptr_t) & cdat->dtup_730__CLASS_OBJPUTSLOT; cdat->dtup_730__CLASS_OBJPUTSLOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_730__CLASS_OBJPUTSLOT.nbval = 5; /*iniobj dsym_731__OSLOT_ODATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V908*/ meltfptr[907]) /*_.VALDATA___V908*/ meltfptr[907] = (melt_ptr_t) & cdat->dsym_731__OSLOT_ODATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_731__OSLOT_ODATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_731__OSLOT_ODATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_731__OSLOT_ODATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_731__OSLOT_ODATA.obj_hash = 583613196; cdat->dsym_731__OSLOT_ODATA.obj_len = 3; /*inistring dstr_732__OSLOT_ODATA*/ /*_.VALSTR___V909*/ meltfptr[908] = (melt_ptr_t) & cdat->dstr_732__OSLOT_ODATA; cdat->dstr_732__OSLOT_ODATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_732__OSLOT_ODATA.val, "OSLOT_ODATA", sizeof (cdat->dstr_732__OSLOT_ODATA.val) - 1); cdat->dstr_732__OSLOT_ODATA.val[11] = (char) 0; cdat->dstr_732__OSLOT_ODATA.slen = 11; /*^iniobj */ /*iniobj dobj_733__OSLOT_ODATA*/ /*_.VALDATA___V899*/ meltfptr[898] = (melt_ptr_t) & cdat->dobj_733__OSLOT_ODATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_733__OSLOT_ODATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_733__OSLOT_ODATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_733__OSLOT_ODATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_733__OSLOT_ODATA.obj_num = 1; cdat->dobj_733__OSLOT_ODATA.obj_hash = 1033976041; cdat->dobj_733__OSLOT_ODATA.obj_len = 4; /*inistring dstr_734__OSLOT_ODATA*/ /*_.VALSTR___V900*/ meltfptr[899] = (melt_ptr_t) & cdat->dstr_734__OSLOT_ODATA; cdat->dstr_734__OSLOT_ODATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_734__OSLOT_ODATA.val, "OSLOT_ODATA", sizeof (cdat->dstr_734__OSLOT_ODATA.val) - 1); cdat->dstr_734__OSLOT_ODATA.val[11] = (char) 0; cdat->dstr_734__OSLOT_ODATA.slen = 11; /*iniobj dsym_735__OSLOT_OFFSET*/ /*uniqueobj*/ if (! /*_.VALDATA___V910*/ meltfptr[909]) /*_.VALDATA___V910*/ meltfptr[909] = (melt_ptr_t) & cdat->dsym_735__OSLOT_OFFSET; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_735__OSLOT_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_735__OSLOT_OFFSET", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_735__OSLOT_OFFSET.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_735__OSLOT_OFFSET.obj_hash = 210542424; cdat->dsym_735__OSLOT_OFFSET.obj_len = 3; /*inistring dstr_736__OSLOT_OFFSET*/ /*_.VALSTR___V911*/ meltfptr[910] = (melt_ptr_t) & cdat->dstr_736__OSLOT_OFFSET; cdat->dstr_736__OSLOT_OFFSET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_736__OSLOT_OFFSET.val, "OSLOT_OFFSET", sizeof (cdat->dstr_736__OSLOT_OFFSET.val) - 1); cdat->dstr_736__OSLOT_OFFSET.val[12] = (char) 0; cdat->dstr_736__OSLOT_OFFSET.slen = 12; /*^iniobj */ /*iniobj dobj_737__OSLOT_OFFSET*/ /*_.VALDATA___V901*/ meltfptr[900] = (melt_ptr_t) & cdat->dobj_737__OSLOT_OFFSET; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_737__OSLOT_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_737__OSLOT_OFFSET", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_737__OSLOT_OFFSET.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_737__OSLOT_OFFSET.obj_num = 2; cdat->dobj_737__OSLOT_OFFSET.obj_hash = 371759698; cdat->dobj_737__OSLOT_OFFSET.obj_len = 4; /*inistring dstr_738__OSLOT_OFFSET*/ /*_.VALSTR___V902*/ meltfptr[901] = (melt_ptr_t) & cdat->dstr_738__OSLOT_OFFSET; cdat->dstr_738__OSLOT_OFFSET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_738__OSLOT_OFFSET.val, "OSLOT_OFFSET", sizeof (cdat->dstr_738__OSLOT_OFFSET.val) - 1); cdat->dstr_738__OSLOT_OFFSET.val[12] = (char) 0; cdat->dstr_738__OSLOT_OFFSET.slen = 12; /*iniobj dsym_739__OSLOT_FIELD*/ /*uniqueobj*/ if (! /*_.VALDATA___V912*/ meltfptr[911]) /*_.VALDATA___V912*/ meltfptr[911] = (melt_ptr_t) & cdat->dsym_739__OSLOT_FIELD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_739__OSLOT_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_739__OSLOT_FIELD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_739__OSLOT_FIELD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_739__OSLOT_FIELD.obj_hash = 59532467; cdat->dsym_739__OSLOT_FIELD.obj_len = 3; /*inistring dstr_740__OSLOT_FIELD*/ /*_.VALSTR___V913*/ meltfptr[912] = (melt_ptr_t) & cdat->dstr_740__OSLOT_FIELD; cdat->dstr_740__OSLOT_FIELD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_740__OSLOT_FIELD.val, "OSLOT_FIELD", sizeof (cdat->dstr_740__OSLOT_FIELD.val) - 1); cdat->dstr_740__OSLOT_FIELD.val[11] = (char) 0; cdat->dstr_740__OSLOT_FIELD.slen = 11; /*^iniobj */ /*iniobj dobj_741__OSLOT_FIELD*/ /*_.VALDATA___V903*/ meltfptr[902] = (melt_ptr_t) & cdat->dobj_741__OSLOT_FIELD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_741__OSLOT_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_741__OSLOT_FIELD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_741__OSLOT_FIELD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_741__OSLOT_FIELD.obj_num = 3; cdat->dobj_741__OSLOT_FIELD.obj_hash = 825492798; cdat->dobj_741__OSLOT_FIELD.obj_len = 4; /*inistring dstr_742__OSLOT_FIELD*/ /*_.VALSTR___V904*/ meltfptr[903] = (melt_ptr_t) & cdat->dstr_742__OSLOT_FIELD; cdat->dstr_742__OSLOT_FIELD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_742__OSLOT_FIELD.val, "OSLOT_FIELD", sizeof (cdat->dstr_742__OSLOT_FIELD.val) - 1); cdat->dstr_742__OSLOT_FIELD.val[11] = (char) 0; cdat->dstr_742__OSLOT_FIELD.slen = 11; /*iniobj dsym_743__OSLOT_VALUE*/ /*uniqueobj*/ if (! /*_.VALDATA___V914*/ meltfptr[913]) /*_.VALDATA___V914*/ meltfptr[913] = (melt_ptr_t) & cdat->dsym_743__OSLOT_VALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_743__OSLOT_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_743__OSLOT_VALUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_743__OSLOT_VALUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_743__OSLOT_VALUE.obj_hash = 544636827; cdat->dsym_743__OSLOT_VALUE.obj_len = 3; /*inistring dstr_744__OSLOT_VALUE*/ /*_.VALSTR___V915*/ meltfptr[914] = (melt_ptr_t) & cdat->dstr_744__OSLOT_VALUE; cdat->dstr_744__OSLOT_VALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_744__OSLOT_VALUE.val, "OSLOT_VALUE", sizeof (cdat->dstr_744__OSLOT_VALUE.val) - 1); cdat->dstr_744__OSLOT_VALUE.val[11] = (char) 0; cdat->dstr_744__OSLOT_VALUE.slen = 11; /*^iniobj */ /*iniobj dobj_745__OSLOT_VALUE*/ /*_.VALDATA___V905*/ meltfptr[904] = (melt_ptr_t) & cdat->dobj_745__OSLOT_VALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_745__OSLOT_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_745__OSLOT_VALUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_745__OSLOT_VALUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_745__OSLOT_VALUE.obj_num = 4; cdat->dobj_745__OSLOT_VALUE.obj_hash = 582707132; cdat->dobj_745__OSLOT_VALUE.obj_len = 4; /*inistring dstr_746__OSLOT_VALUE*/ /*_.VALSTR___V906*/ meltfptr[905] = (melt_ptr_t) & cdat->dstr_746__OSLOT_VALUE; cdat->dstr_746__OSLOT_VALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_746__OSLOT_VALUE.val, "OSLOT_VALUE", sizeof (cdat->dstr_746__OSLOT_VALUE.val) - 1); cdat->dstr_746__OSLOT_VALUE.val[11] = (char) 0; cdat->dstr_746__OSLOT_VALUE.slen = 11; /*iniobj dsym_747__CLASS_OBJGETSLOT*/ /*uniqueobj*/ if (! /*_.VALDATA___V916*/ meltfptr[915]) /*_.VALDATA___V916*/ meltfptr[915] = (melt_ptr_t) & cdat->dsym_747__CLASS_OBJGETSLOT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_747__CLASS_OBJGETSLOT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_747__CLASS_OBJGETSLOT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_747__CLASS_OBJGETSLOT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_747__CLASS_OBJGETSLOT.obj_hash = 1004612742; cdat->dsym_747__CLASS_OBJGETSLOT.obj_len = 3; /*inistring dstr_748__CLASS_OBJGETSLOT*/ /*_.VALSTR___V917*/ meltfptr[916] = (melt_ptr_t) & cdat->dstr_748__CLASS_OBJGETSLOT; cdat->dstr_748__CLASS_OBJGETSLOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_748__CLASS_OBJGETSLOT.val, "CLASS_OBJGETSLOT", sizeof (cdat->dstr_748__CLASS_OBJGETSLOT. val) - 1); cdat->dstr_748__CLASS_OBJGETSLOT.val[16] = (char) 0; cdat->dstr_748__CLASS_OBJGETSLOT.slen = 16; MELT_LOCATION ("warmelt-genobj.melt:483:/ iniobj"); /*iniobj dobj_749__CLASS_OBJGETSLOT*/ /*_.VALDATA___V918*/ meltfptr[917] = (melt_ptr_t) & cdat->dobj_749__CLASS_OBJGETSLOT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_749__CLASS_OBJGETSLOT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_749__CLASS_OBJGETSLOT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_749__CLASS_OBJGETSLOT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_749__CLASS_OBJGETSLOT.obj_num = MELTOBMAG_OBJECT; cdat->dobj_749__CLASS_OBJGETSLOT.obj_hash = 436313036; cdat->dobj_749__CLASS_OBJGETSLOT.obj_len = 8; /*inistring dstr_750__CLASS_OBJGETSLOT*/ /*_.VALSTR___V919*/ meltfptr[918] = (melt_ptr_t) & cdat->dstr_750__CLASS_OBJGETSLOT; cdat->dstr_750__CLASS_OBJGETSLOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_750__CLASS_OBJGETSLOT.val, "CLASS_OBJGETSLOT", sizeof (cdat->dstr_750__CLASS_OBJGETSLOT. val) - 1); cdat->dstr_750__CLASS_OBJGETSLOT.val[16] = (char) 0; cdat->dstr_750__CLASS_OBJGETSLOT.slen = 16; /*inimult dtup_751__CLASS_OBJGETSLOT */ /*_.VALTUP___V920*/ meltfptr[919] = (melt_ptr_t) & cdat->dtup_751__CLASS_OBJGETSLOT; cdat->dtup_751__CLASS_OBJGETSLOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_751__CLASS_OBJGETSLOT.nbval = 4; /*inimult dtup_752__CLASS_OBJGETSLOT */ /*_.VALTUP___V925*/ meltfptr[924] = (melt_ptr_t) & cdat->dtup_752__CLASS_OBJGETSLOT; cdat->dtup_752__CLASS_OBJGETSLOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_752__CLASS_OBJGETSLOT.nbval = 4; /*iniobj dsym_753__OGETSL_OBJ*/ /*uniqueobj*/ if (! /*_.VALDATA___V926*/ meltfptr[925]) /*_.VALDATA___V926*/ meltfptr[925] = (melt_ptr_t) & cdat->dsym_753__OGETSL_OBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_753__OGETSL_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_753__OGETSL_OBJ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_753__OGETSL_OBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_753__OGETSL_OBJ.obj_hash = 312793848; cdat->dsym_753__OGETSL_OBJ.obj_len = 3; /*inistring dstr_754__OGETSL_OBJ*/ /*_.VALSTR___V927*/ meltfptr[926] = (melt_ptr_t) & cdat->dstr_754__OGETSL_OBJ; cdat->dstr_754__OGETSL_OBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_754__OGETSL_OBJ.val, "OGETSL_OBJ", sizeof (cdat->dstr_754__OGETSL_OBJ.val) - 1); cdat->dstr_754__OGETSL_OBJ.val[10] = (char) 0; cdat->dstr_754__OGETSL_OBJ.slen = 10; /*^iniobj */ /*iniobj dobj_755__OGETSL_OBJ*/ /*_.VALDATA___V921*/ meltfptr[920] = (melt_ptr_t) & cdat->dobj_755__OGETSL_OBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_755__OGETSL_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_755__OGETSL_OBJ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_755__OGETSL_OBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_755__OGETSL_OBJ.obj_num = 2; cdat->dobj_755__OGETSL_OBJ.obj_hash = 709939284; cdat->dobj_755__OGETSL_OBJ.obj_len = 4; /*inistring dstr_756__OGETSL_OBJ*/ /*_.VALSTR___V922*/ meltfptr[921] = (melt_ptr_t) & cdat->dstr_756__OGETSL_OBJ; cdat->dstr_756__OGETSL_OBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_756__OGETSL_OBJ.val, "OGETSL_OBJ", sizeof (cdat->dstr_756__OGETSL_OBJ.val) - 1); cdat->dstr_756__OGETSL_OBJ.val[10] = (char) 0; cdat->dstr_756__OGETSL_OBJ.slen = 10; /*iniobj dsym_757__OGETSL_FIELD*/ /*uniqueobj*/ if (! /*_.VALDATA___V928*/ meltfptr[927]) /*_.VALDATA___V928*/ meltfptr[927] = (melt_ptr_t) & cdat->dsym_757__OGETSL_FIELD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_757__OGETSL_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_757__OGETSL_FIELD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_757__OGETSL_FIELD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_757__OGETSL_FIELD.obj_hash = 148796144; cdat->dsym_757__OGETSL_FIELD.obj_len = 3; /*inistring dstr_758__OGETSL_FIELD*/ /*_.VALSTR___V929*/ meltfptr[928] = (melt_ptr_t) & cdat->dstr_758__OGETSL_FIELD; cdat->dstr_758__OGETSL_FIELD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_758__OGETSL_FIELD.val, "OGETSL_FIELD", sizeof (cdat->dstr_758__OGETSL_FIELD.val) - 1); cdat->dstr_758__OGETSL_FIELD.val[12] = (char) 0; cdat->dstr_758__OGETSL_FIELD.slen = 12; /*^iniobj */ /*iniobj dobj_759__OGETSL_FIELD*/ /*_.VALDATA___V923*/ meltfptr[922] = (melt_ptr_t) & cdat->dobj_759__OGETSL_FIELD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_759__OGETSL_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_759__OGETSL_FIELD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_759__OGETSL_FIELD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_759__OGETSL_FIELD.obj_num = 3; cdat->dobj_759__OGETSL_FIELD.obj_hash = 367383645; cdat->dobj_759__OGETSL_FIELD.obj_len = 4; /*inistring dstr_760__OGETSL_FIELD*/ /*_.VALSTR___V924*/ meltfptr[923] = (melt_ptr_t) & cdat->dstr_760__OGETSL_FIELD; cdat->dstr_760__OGETSL_FIELD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_760__OGETSL_FIELD.val, "OGETSL_FIELD", sizeof (cdat->dstr_760__OGETSL_FIELD.val) - 1); cdat->dstr_760__OGETSL_FIELD.val[12] = (char) 0; cdat->dstr_760__OGETSL_FIELD.slen = 12; /*iniobj dsym_761__CLASS_OBJPUTCLOSUROUT*/ /*uniqueobj*/ if (! /*_.VALDATA___V930*/ meltfptr[929]) /*_.VALDATA___V930*/ meltfptr[929] = (melt_ptr_t) & cdat->dsym_761__CLASS_OBJPUTCLOSUROUT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_761__CLASS_OBJPUTCLOSUROUT", melt_magic_discr ((melt_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__CLASS_OBJPUTCLOSUROUT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_761__CLASS_OBJPUTCLOSUROUT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_761__CLASS_OBJPUTCLOSUROUT.obj_hash = 331144291; cdat->dsym_761__CLASS_OBJPUTCLOSUROUT.obj_len = 3; /*inistring dstr_762__CLASS_OBJPUTCLOS*/ /*_.VALSTR___V931*/ meltfptr[930] = (melt_ptr_t) & cdat->dstr_762__CLASS_OBJPUTCLOS; cdat->dstr_762__CLASS_OBJPUTCLOS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_762__CLASS_OBJPUTCLOS.val, "CLASS_OBJPUTCLOSUROUT", sizeof (cdat->dstr_762__CLASS_OBJPUTCLOS. val) - 1); cdat->dstr_762__CLASS_OBJPUTCLOS.val[21] = (char) 0; cdat->dstr_762__CLASS_OBJPUTCLOS.slen = 21; MELT_LOCATION ("warmelt-genobj.melt:490:/ iniobj"); /*iniobj dobj_763__CLASS_OBJPUTCLOSUROUT*/ /*_.VALDATA___V932*/ meltfptr[931] = (melt_ptr_t) & cdat->dobj_763__CLASS_OBJPUTCLOSUROUT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_763__CLASS_OBJPUTCLOSUROUT", 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_763__CLASS_OBJPUTCLOSUROUT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_763__CLASS_OBJPUTCLOSUROUT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_763__CLASS_OBJPUTCLOSUROUT.obj_num = MELTOBMAG_OBJECT; cdat->dobj_763__CLASS_OBJPUTCLOSUROUT.obj_hash = 254447989; cdat->dobj_763__CLASS_OBJPUTCLOSUROUT.obj_len = 8; /*inistring dstr_764__CLASS_OBJPUTCLOS*/ /*_.VALSTR___V933*/ meltfptr[932] = (melt_ptr_t) & cdat->dstr_764__CLASS_OBJPUTCLOS; cdat->dstr_764__CLASS_OBJPUTCLOS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_764__CLASS_OBJPUTCLOS.val, "CLASS_OBJPUTCLOSUROUT", sizeof (cdat->dstr_764__CLASS_OBJPUTCLOS. val) - 1); cdat->dstr_764__CLASS_OBJPUTCLOS.val[21] = (char) 0; cdat->dstr_764__CLASS_OBJPUTCLOS.slen = 21; /*inimult dtup_765__CLASS_OBJPUTCLOSUROUT */ /*_.VALTUP___V934*/ meltfptr[933] = (melt_ptr_t) & cdat->dtup_765__CLASS_OBJPUTCLOSUROUT; cdat->dtup_765__CLASS_OBJPUTCLOSUROUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_765__CLASS_OBJPUTCLOSUROUT.nbval = 3; /*inimult dtup_766__CLASS_OBJPUTCLOSUROUT */ /*_.VALTUP___V939*/ meltfptr[938] = (melt_ptr_t) & cdat->dtup_766__CLASS_OBJPUTCLOSUROUT; cdat->dtup_766__CLASS_OBJPUTCLOSUROUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_766__CLASS_OBJPUTCLOSUROUT.nbval = 3; /*iniobj dsym_767__OPCLOR_CLOS*/ /*uniqueobj*/ if (! /*_.VALDATA___V940*/ meltfptr[939]) /*_.VALDATA___V940*/ meltfptr[939] = (melt_ptr_t) & cdat->dsym_767__OPCLOR_CLOS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_767__OPCLOR_CLOS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_767__OPCLOR_CLOS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_767__OPCLOR_CLOS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_767__OPCLOR_CLOS.obj_hash = 100988035; cdat->dsym_767__OPCLOR_CLOS.obj_len = 3; /*inistring dstr_768__OPCLOR_CLOS*/ /*_.VALSTR___V941*/ meltfptr[940] = (melt_ptr_t) & cdat->dstr_768__OPCLOR_CLOS; cdat->dstr_768__OPCLOR_CLOS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_768__OPCLOR_CLOS.val, "OPCLOR_CLOS", sizeof (cdat->dstr_768__OPCLOR_CLOS.val) - 1); cdat->dstr_768__OPCLOR_CLOS.val[11] = (char) 0; cdat->dstr_768__OPCLOR_CLOS.slen = 11; /*^iniobj */ /*iniobj dobj_769__OPCLOR_CLOS*/ /*_.VALDATA___V935*/ meltfptr[934] = (melt_ptr_t) & cdat->dobj_769__OPCLOR_CLOS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_769__OPCLOR_CLOS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_769__OPCLOR_CLOS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_769__OPCLOR_CLOS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_769__OPCLOR_CLOS.obj_num = 1; cdat->dobj_769__OPCLOR_CLOS.obj_hash = 852946037; cdat->dobj_769__OPCLOR_CLOS.obj_len = 4; /*inistring dstr_770__OPCLOR_CLOS*/ /*_.VALSTR___V936*/ meltfptr[935] = (melt_ptr_t) & cdat->dstr_770__OPCLOR_CLOS; cdat->dstr_770__OPCLOR_CLOS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_770__OPCLOR_CLOS.val, "OPCLOR_CLOS", sizeof (cdat->dstr_770__OPCLOR_CLOS.val) - 1); cdat->dstr_770__OPCLOR_CLOS.val[11] = (char) 0; cdat->dstr_770__OPCLOR_CLOS.slen = 11; /*iniobj dsym_771__OPCLOR_ROUT*/ /*uniqueobj*/ if (! /*_.VALDATA___V942*/ meltfptr[941]) /*_.VALDATA___V942*/ meltfptr[941] = (melt_ptr_t) & cdat->dsym_771__OPCLOR_ROUT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_771__OPCLOR_ROUT", melt_magic_discr ((melt_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__OPCLOR_ROUT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_771__OPCLOR_ROUT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_771__OPCLOR_ROUT.obj_hash = 726732435; cdat->dsym_771__OPCLOR_ROUT.obj_len = 3; /*inistring dstr_772__OPCLOR_ROUT*/ /*_.VALSTR___V943*/ meltfptr[942] = (melt_ptr_t) & cdat->dstr_772__OPCLOR_ROUT; cdat->dstr_772__OPCLOR_ROUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_772__OPCLOR_ROUT.val, "OPCLOR_ROUT", sizeof (cdat->dstr_772__OPCLOR_ROUT.val) - 1); cdat->dstr_772__OPCLOR_ROUT.val[11] = (char) 0; cdat->dstr_772__OPCLOR_ROUT.slen = 11; /*^iniobj */ /*iniobj dobj_773__OPCLOR_ROUT*/ /*_.VALDATA___V937*/ meltfptr[936] = (melt_ptr_t) & cdat->dobj_773__OPCLOR_ROUT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_773__OPCLOR_ROUT", melt_magic_discr ((melt_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__OPCLOR_ROUT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_773__OPCLOR_ROUT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_773__OPCLOR_ROUT.obj_num = 2; cdat->dobj_773__OPCLOR_ROUT.obj_hash = 967513097; cdat->dobj_773__OPCLOR_ROUT.obj_len = 4; /*inistring dstr_774__OPCLOR_ROUT*/ /*_.VALSTR___V938*/ meltfptr[937] = (melt_ptr_t) & cdat->dstr_774__OPCLOR_ROUT; cdat->dstr_774__OPCLOR_ROUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_774__OPCLOR_ROUT.val, "OPCLOR_ROUT", sizeof (cdat->dstr_774__OPCLOR_ROUT.val) - 1); cdat->dstr_774__OPCLOR_ROUT.val[11] = (char) 0; cdat->dstr_774__OPCLOR_ROUT.slen = 11; /*iniobj dsym_775__CLASS_OBJPUTCLOSEDV*/ /*uniqueobj*/ if (! /*_.VALDATA___V944*/ meltfptr[943]) /*_.VALDATA___V944*/ meltfptr[943] = (melt_ptr_t) & cdat->dsym_775__CLASS_OBJPUTCLOSEDV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_775__CLASS_OBJPUTCLOSEDV", melt_magic_discr ((melt_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_OBJPUTCLOSEDV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_775__CLASS_OBJPUTCLOSEDV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_775__CLASS_OBJPUTCLOSEDV.obj_hash = 870174829; cdat->dsym_775__CLASS_OBJPUTCLOSEDV.obj_len = 3; /*inistring dstr_776__CLASS_OBJPUTCLOS*/ /*_.VALSTR___V945*/ meltfptr[944] = (melt_ptr_t) & cdat->dstr_776__CLASS_OBJPUTCLOS; cdat->dstr_776__CLASS_OBJPUTCLOS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_776__CLASS_OBJPUTCLOS.val, "CLASS_OBJPUTCLOSEDV", sizeof (cdat->dstr_776__CLASS_OBJPUTCLOS. val) - 1); cdat->dstr_776__CLASS_OBJPUTCLOS.val[19] = (char) 0; cdat->dstr_776__CLASS_OBJPUTCLOS.slen = 19; MELT_LOCATION ("warmelt-genobj.melt:497:/ iniobj"); /*iniobj dobj_777__CLASS_OBJPUTCLOSEDV*/ /*_.VALDATA___V946*/ meltfptr[945] = (melt_ptr_t) & cdat->dobj_777__CLASS_OBJPUTCLOSEDV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_777__CLASS_OBJPUTCLOSEDV", 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_OBJPUTCLOSEDV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_777__CLASS_OBJPUTCLOSEDV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_777__CLASS_OBJPUTCLOSEDV.obj_num = MELTOBMAG_OBJECT; cdat->dobj_777__CLASS_OBJPUTCLOSEDV.obj_hash = 323210282; cdat->dobj_777__CLASS_OBJPUTCLOSEDV.obj_len = 8; /*inistring dstr_778__CLASS_OBJPUTCLOS*/ /*_.VALSTR___V947*/ meltfptr[946] = (melt_ptr_t) & cdat->dstr_778__CLASS_OBJPUTCLOS; cdat->dstr_778__CLASS_OBJPUTCLOS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_778__CLASS_OBJPUTCLOS.val, "CLASS_OBJPUTCLOSEDV", sizeof (cdat->dstr_778__CLASS_OBJPUTCLOS. val) - 1); cdat->dstr_778__CLASS_OBJPUTCLOS.val[19] = (char) 0; cdat->dstr_778__CLASS_OBJPUTCLOS.slen = 19; /*inimult dtup_779__CLASS_OBJPUTCLOSEDV */ /*_.VALTUP___V948*/ meltfptr[947] = (melt_ptr_t) & cdat->dtup_779__CLASS_OBJPUTCLOSEDV; cdat->dtup_779__CLASS_OBJPUTCLOSEDV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_779__CLASS_OBJPUTCLOSEDV.nbval = 3; /*inimult dtup_780__CLASS_OBJPUTCLOSEDV */ /*_.VALTUP___V955*/ meltfptr[954] = (melt_ptr_t) & cdat->dtup_780__CLASS_OBJPUTCLOSEDV; cdat->dtup_780__CLASS_OBJPUTCLOSEDV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_780__CLASS_OBJPUTCLOSEDV.nbval = 4; /*iniobj dsym_781__OPCLOV_CLOS*/ /*uniqueobj*/ if (! /*_.VALDATA___V956*/ meltfptr[955]) /*_.VALDATA___V956*/ meltfptr[955] = (melt_ptr_t) & cdat->dsym_781__OPCLOV_CLOS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_781__OPCLOV_CLOS", melt_magic_discr ((melt_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__OPCLOV_CLOS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_781__OPCLOV_CLOS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_781__OPCLOV_CLOS.obj_hash = 814017682; cdat->dsym_781__OPCLOV_CLOS.obj_len = 3; /*inistring dstr_782__OPCLOV_CLOS*/ /*_.VALSTR___V957*/ meltfptr[956] = (melt_ptr_t) & cdat->dstr_782__OPCLOV_CLOS; cdat->dstr_782__OPCLOV_CLOS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_782__OPCLOV_CLOS.val, "OPCLOV_CLOS", sizeof (cdat->dstr_782__OPCLOV_CLOS.val) - 1); cdat->dstr_782__OPCLOV_CLOS.val[11] = (char) 0; cdat->dstr_782__OPCLOV_CLOS.slen = 11; /*^iniobj */ /*iniobj dobj_783__OPCLOV_CLOS*/ /*_.VALDATA___V949*/ meltfptr[948] = (melt_ptr_t) & cdat->dobj_783__OPCLOV_CLOS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_783__OPCLOV_CLOS", melt_magic_discr ((melt_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__OPCLOV_CLOS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_783__OPCLOV_CLOS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_783__OPCLOV_CLOS.obj_num = 1; cdat->dobj_783__OPCLOV_CLOS.obj_hash = 196837766; cdat->dobj_783__OPCLOV_CLOS.obj_len = 4; /*inistring dstr_784__OPCLOV_CLOS*/ /*_.VALSTR___V950*/ meltfptr[949] = (melt_ptr_t) & cdat->dstr_784__OPCLOV_CLOS; cdat->dstr_784__OPCLOV_CLOS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_784__OPCLOV_CLOS.val, "OPCLOV_CLOS", sizeof (cdat->dstr_784__OPCLOV_CLOS.val) - 1); cdat->dstr_784__OPCLOV_CLOS.val[11] = (char) 0; cdat->dstr_784__OPCLOV_CLOS.slen = 11; /*iniobj dsym_785__OPCLOV_OFF*/ /*uniqueobj*/ if (! /*_.VALDATA___V958*/ meltfptr[957]) /*_.VALDATA___V958*/ meltfptr[957] = (melt_ptr_t) & cdat->dsym_785__OPCLOV_OFF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_785__OPCLOV_OFF", melt_magic_discr ((melt_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__OPCLOV_OFF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_785__OPCLOV_OFF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_785__OPCLOV_OFF.obj_hash = 914704130; cdat->dsym_785__OPCLOV_OFF.obj_len = 3; /*inistring dstr_786__OPCLOV_OFF*/ /*_.VALSTR___V959*/ meltfptr[958] = (melt_ptr_t) & cdat->dstr_786__OPCLOV_OFF; cdat->dstr_786__OPCLOV_OFF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_786__OPCLOV_OFF.val, "OPCLOV_OFF", sizeof (cdat->dstr_786__OPCLOV_OFF.val) - 1); cdat->dstr_786__OPCLOV_OFF.val[10] = (char) 0; cdat->dstr_786__OPCLOV_OFF.slen = 10; /*^iniobj */ /*iniobj dobj_787__OPCLOV_OFF*/ /*_.VALDATA___V951*/ meltfptr[950] = (melt_ptr_t) & cdat->dobj_787__OPCLOV_OFF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_787__OPCLOV_OFF", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_787__OPCLOV_OFF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_787__OPCLOV_OFF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_787__OPCLOV_OFF.obj_num = 2; cdat->dobj_787__OPCLOV_OFF.obj_hash = 201614082; cdat->dobj_787__OPCLOV_OFF.obj_len = 4; /*inistring dstr_788__OPCLOV_OFF*/ /*_.VALSTR___V952*/ meltfptr[951] = (melt_ptr_t) & cdat->dstr_788__OPCLOV_OFF; cdat->dstr_788__OPCLOV_OFF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_788__OPCLOV_OFF.val, "OPCLOV_OFF", sizeof (cdat->dstr_788__OPCLOV_OFF.val) - 1); cdat->dstr_788__OPCLOV_OFF.val[10] = (char) 0; cdat->dstr_788__OPCLOV_OFF.slen = 10; /*iniobj dsym_789__OPCLOV_CVAL*/ /*uniqueobj*/ if (! /*_.VALDATA___V960*/ meltfptr[959]) /*_.VALDATA___V960*/ meltfptr[959] = (melt_ptr_t) & cdat->dsym_789__OPCLOV_CVAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_789__OPCLOV_CVAL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_789__OPCLOV_CVAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_789__OPCLOV_CVAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_789__OPCLOV_CVAL.obj_hash = 453088809; cdat->dsym_789__OPCLOV_CVAL.obj_len = 3; /*inistring dstr_790__OPCLOV_CVAL*/ /*_.VALSTR___V961*/ meltfptr[960] = (melt_ptr_t) & cdat->dstr_790__OPCLOV_CVAL; cdat->dstr_790__OPCLOV_CVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_790__OPCLOV_CVAL.val, "OPCLOV_CVAL", sizeof (cdat->dstr_790__OPCLOV_CVAL.val) - 1); cdat->dstr_790__OPCLOV_CVAL.val[11] = (char) 0; cdat->dstr_790__OPCLOV_CVAL.slen = 11; /*^iniobj */ /*iniobj dobj_791__OPCLOV_CVAL*/ /*_.VALDATA___V953*/ meltfptr[952] = (melt_ptr_t) & cdat->dobj_791__OPCLOV_CVAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_791__OPCLOV_CVAL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_791__OPCLOV_CVAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_791__OPCLOV_CVAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_791__OPCLOV_CVAL.obj_num = 3; cdat->dobj_791__OPCLOV_CVAL.obj_hash = 777449716; cdat->dobj_791__OPCLOV_CVAL.obj_len = 4; /*inistring dstr_792__OPCLOV_CVAL*/ /*_.VALSTR___V954*/ meltfptr[953] = (melt_ptr_t) & cdat->dstr_792__OPCLOV_CVAL; cdat->dstr_792__OPCLOV_CVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_792__OPCLOV_CVAL.val, "OPCLOV_CVAL", sizeof (cdat->dstr_792__OPCLOV_CVAL.val) - 1); cdat->dstr_792__OPCLOV_CVAL.val[11] = (char) 0; cdat->dstr_792__OPCLOV_CVAL.slen = 11; /*iniobj dsym_793__CLASS_OBJPUTCLOSEDNOTNULLV*/ /*uniqueobj*/ if (! /*_.VALDATA___V962*/ meltfptr[961]) /*_.VALDATA___V962*/ meltfptr[961] = (melt_ptr_t) & cdat->dsym_793__CLASS_OBJPUTCLOSEDNOTNULLV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_793__CLASS_OBJPUTCLOSEDNOTNULLV", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_793__CLASS_OBJPUTCLOSEDNOTNULLV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_793__CLASS_OBJPUTCLOSEDNOTNULLV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_793__CLASS_OBJPUTCLOSEDNOTNULLV.obj_hash = 674443590; cdat->dsym_793__CLASS_OBJPUTCLOSEDNOTNULLV.obj_len = 3; /*inistring dstr_794__CLASS_OBJPUTCLOS*/ /*_.VALSTR___V963*/ meltfptr[962] = (melt_ptr_t) & cdat->dstr_794__CLASS_OBJPUTCLOS; cdat->dstr_794__CLASS_OBJPUTCLOS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_794__CLASS_OBJPUTCLOS.val, "CLASS_OBJPUTCLOSEDNOTNULLV", sizeof (cdat->dstr_794__CLASS_OBJPUTCLOS. val) - 1); cdat->dstr_794__CLASS_OBJPUTCLOS.val[26] = (char) 0; cdat->dstr_794__CLASS_OBJPUTCLOS.slen = 26; MELT_LOCATION ("warmelt-genobj.melt:505:/ iniobj"); /*iniobj dobj_795__CLASS_OBJPUTCLOSEDNOTNULLV*/ /*_.VALDATA___V964*/ meltfptr[963] = (melt_ptr_t) & cdat->dobj_795__CLASS_OBJPUTCLOSEDNOTNULLV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_795__CLASS_OBJPUTCLOSEDNOTNULLV", 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_795__CLASS_OBJPUTCLOSEDNOTNULLV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_795__CLASS_OBJPUTCLOSEDNOTNULLV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_795__CLASS_OBJPUTCLOSEDNOTNULLV.obj_num = MELTOBMAG_OBJECT; cdat->dobj_795__CLASS_OBJPUTCLOSEDNOTNULLV.obj_hash = 764193570; cdat->dobj_795__CLASS_OBJPUTCLOSEDNOTNULLV.obj_len = 8; /*inistring dstr_796__CLASS_OBJPUTCLOS*/ /*_.VALSTR___V965*/ meltfptr[964] = (melt_ptr_t) & cdat->dstr_796__CLASS_OBJPUTCLOS; cdat->dstr_796__CLASS_OBJPUTCLOS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_796__CLASS_OBJPUTCLOS.val, "CLASS_OBJPUTCLOSEDNOTNULLV", sizeof (cdat->dstr_796__CLASS_OBJPUTCLOS. val) - 1); cdat->dstr_796__CLASS_OBJPUTCLOS.val[26] = (char) 0; cdat->dstr_796__CLASS_OBJPUTCLOS.slen = 26; /*inimult dtup_797__CLASS_OBJPUTCLOSEDNOTNULLV */ /*_.VALTUP___V966*/ meltfptr[965] = (melt_ptr_t) & cdat->dtup_797__CLASS_OBJPUTCLOSEDNOTNULLV; cdat->dtup_797__CLASS_OBJPUTCLOSEDNOTNULLV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_797__CLASS_OBJPUTCLOSEDNOTNULLV.nbval = 4; /*inimult dtup_798__CLASS_OBJPUTCLOSEDNOTNULLV */ /*_.VALTUP___V967*/ meltfptr[966] = (melt_ptr_t) & cdat->dtup_798__CLASS_OBJPUTCLOSEDNOTNULLV; cdat->dtup_798__CLASS_OBJPUTCLOSEDNOTNULLV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_798__CLASS_OBJPUTCLOSEDNOTNULLV.nbval = 4; /*iniobj dsym_799__CLASS_OBJPUTROUTCONST*/ /*uniqueobj*/ if (! /*_.VALDATA___V968*/ meltfptr[967]) /*_.VALDATA___V968*/ meltfptr[967] = (melt_ptr_t) & cdat->dsym_799__CLASS_OBJPUTROUTCONST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_799__CLASS_OBJPUTROUTCONST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_799__CLASS_OBJPUTROUTCONST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_799__CLASS_OBJPUTROUTCONST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_799__CLASS_OBJPUTROUTCONST.obj_hash = 815485494; cdat->dsym_799__CLASS_OBJPUTROUTCONST.obj_len = 3; /*inistring dstr_800__CLASS_OBJPUTROUT*/ /*_.VALSTR___V969*/ meltfptr[968] = (melt_ptr_t) & cdat->dstr_800__CLASS_OBJPUTROUT; cdat->dstr_800__CLASS_OBJPUTROUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_800__CLASS_OBJPUTROUT.val, "CLASS_OBJPUTROUTCONST", sizeof (cdat->dstr_800__CLASS_OBJPUTROUT. val) - 1); cdat->dstr_800__CLASS_OBJPUTROUT.val[21] = (char) 0; cdat->dstr_800__CLASS_OBJPUTROUT.slen = 21; MELT_LOCATION ("warmelt-genobj.melt:511:/ iniobj"); /*iniobj dobj_801__CLASS_OBJPUTROUTCONST*/ /*_.VALDATA___V970*/ meltfptr[969] = (melt_ptr_t) & cdat->dobj_801__CLASS_OBJPUTROUTCONST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_801__CLASS_OBJPUTROUTCONST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_801__CLASS_OBJPUTROUTCONST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_801__CLASS_OBJPUTROUTCONST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_801__CLASS_OBJPUTROUTCONST.obj_num = MELTOBMAG_OBJECT; cdat->dobj_801__CLASS_OBJPUTROUTCONST.obj_hash = 980127079; cdat->dobj_801__CLASS_OBJPUTROUTCONST.obj_len = 8; /*inistring dstr_802__CLASS_OBJPUTROUT*/ /*_.VALSTR___V971*/ meltfptr[970] = (melt_ptr_t) & cdat->dstr_802__CLASS_OBJPUTROUT; cdat->dstr_802__CLASS_OBJPUTROUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_802__CLASS_OBJPUTROUT.val, "CLASS_OBJPUTROUTCONST", sizeof (cdat->dstr_802__CLASS_OBJPUTROUT. val) - 1); cdat->dstr_802__CLASS_OBJPUTROUT.val[21] = (char) 0; cdat->dstr_802__CLASS_OBJPUTROUT.slen = 21; /*inimult dtup_803__CLASS_OBJPUTROUTCONST */ /*_.VALTUP___V972*/ meltfptr[971] = (melt_ptr_t) & cdat->dtup_803__CLASS_OBJPUTROUTCONST; cdat->dtup_803__CLASS_OBJPUTROUTCONST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_803__CLASS_OBJPUTROUTCONST.nbval = 3; /*inimult dtup_804__CLASS_OBJPUTROUTCONST */ /*_.VALTUP___V979*/ meltfptr[978] = (melt_ptr_t) & cdat->dtup_804__CLASS_OBJPUTROUTCONST; cdat->dtup_804__CLASS_OBJPUTROUTCONST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_804__CLASS_OBJPUTROUTCONST.nbval = 4; /*iniobj dsym_805__OPRCONST_ROUT*/ /*uniqueobj*/ if (! /*_.VALDATA___V980*/ meltfptr[979]) /*_.VALDATA___V980*/ meltfptr[979] = (melt_ptr_t) & cdat->dsym_805__OPRCONST_ROUT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_805__OPRCONST_ROUT", melt_magic_discr ((melt_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__OPRCONST_ROUT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_805__OPRCONST_ROUT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_805__OPRCONST_ROUT.obj_hash = 511449421; cdat->dsym_805__OPRCONST_ROUT.obj_len = 3; /*inistring dstr_806__OPRCONST_ROUT*/ /*_.VALSTR___V981*/ meltfptr[980] = (melt_ptr_t) & cdat->dstr_806__OPRCONST_ROUT; cdat->dstr_806__OPRCONST_ROUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_806__OPRCONST_ROUT.val, "OPRCONST_ROUT", sizeof (cdat->dstr_806__OPRCONST_ROUT.val) - 1); cdat->dstr_806__OPRCONST_ROUT.val[13] = (char) 0; cdat->dstr_806__OPRCONST_ROUT.slen = 13; /*^iniobj */ /*iniobj dobj_807__OPRCONST_ROUT*/ /*_.VALDATA___V973*/ meltfptr[972] = (melt_ptr_t) & cdat->dobj_807__OPRCONST_ROUT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_807__OPRCONST_ROUT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_807__OPRCONST_ROUT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_807__OPRCONST_ROUT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_807__OPRCONST_ROUT.obj_num = 1; cdat->dobj_807__OPRCONST_ROUT.obj_hash = 1034995253; cdat->dobj_807__OPRCONST_ROUT.obj_len = 4; /*inistring dstr_808__OPRCONST_ROUT*/ /*_.VALSTR___V974*/ meltfptr[973] = (melt_ptr_t) & cdat->dstr_808__OPRCONST_ROUT; cdat->dstr_808__OPRCONST_ROUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_808__OPRCONST_ROUT.val, "OPRCONST_ROUT", sizeof (cdat->dstr_808__OPRCONST_ROUT.val) - 1); cdat->dstr_808__OPRCONST_ROUT.val[13] = (char) 0; cdat->dstr_808__OPRCONST_ROUT.slen = 13; /*iniobj dsym_809__OPRCONST_OFF*/ /*uniqueobj*/ if (! /*_.VALDATA___V982*/ meltfptr[981]) /*_.VALDATA___V982*/ meltfptr[981] = (melt_ptr_t) & cdat->dsym_809__OPRCONST_OFF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_809__OPRCONST_OFF", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_809__OPRCONST_OFF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_809__OPRCONST_OFF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_809__OPRCONST_OFF.obj_hash = 732701010; cdat->dsym_809__OPRCONST_OFF.obj_len = 3; /*inistring dstr_810__OPRCONST_OFF*/ /*_.VALSTR___V983*/ meltfptr[982] = (melt_ptr_t) & cdat->dstr_810__OPRCONST_OFF; cdat->dstr_810__OPRCONST_OFF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_810__OPRCONST_OFF.val, "OPRCONST_OFF", sizeof (cdat->dstr_810__OPRCONST_OFF.val) - 1); cdat->dstr_810__OPRCONST_OFF.val[12] = (char) 0; cdat->dstr_810__OPRCONST_OFF.slen = 12; /*^iniobj */ /*iniobj dobj_811__OPRCONST_OFF*/ /*_.VALDATA___V975*/ meltfptr[974] = (melt_ptr_t) & cdat->dobj_811__OPRCONST_OFF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_811__OPRCONST_OFF", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_811__OPRCONST_OFF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_811__OPRCONST_OFF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_811__OPRCONST_OFF.obj_num = 2; cdat->dobj_811__OPRCONST_OFF.obj_hash = 141570718; cdat->dobj_811__OPRCONST_OFF.obj_len = 4; /*inistring dstr_812__OPRCONST_OFF*/ /*_.VALSTR___V976*/ meltfptr[975] = (melt_ptr_t) & cdat->dstr_812__OPRCONST_OFF; cdat->dstr_812__OPRCONST_OFF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_812__OPRCONST_OFF.val, "OPRCONST_OFF", sizeof (cdat->dstr_812__OPRCONST_OFF.val) - 1); cdat->dstr_812__OPRCONST_OFF.val[12] = (char) 0; cdat->dstr_812__OPRCONST_OFF.slen = 12; /*iniobj dsym_813__OPRCONST_CVAL*/ /*uniqueobj*/ if (! /*_.VALDATA___V984*/ meltfptr[983]) /*_.VALDATA___V984*/ meltfptr[983] = (melt_ptr_t) & cdat->dsym_813__OPRCONST_CVAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_813__OPRCONST_CVAL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_813__OPRCONST_CVAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_813__OPRCONST_CVAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_813__OPRCONST_CVAL.obj_hash = 509800729; cdat->dsym_813__OPRCONST_CVAL.obj_len = 3; /*inistring dstr_814__OPRCONST_CVAL*/ /*_.VALSTR___V985*/ meltfptr[984] = (melt_ptr_t) & cdat->dstr_814__OPRCONST_CVAL; cdat->dstr_814__OPRCONST_CVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_814__OPRCONST_CVAL.val, "OPRCONST_CVAL", sizeof (cdat->dstr_814__OPRCONST_CVAL.val) - 1); cdat->dstr_814__OPRCONST_CVAL.val[13] = (char) 0; cdat->dstr_814__OPRCONST_CVAL.slen = 13; /*^iniobj */ /*iniobj dobj_815__OPRCONST_CVAL*/ /*_.VALDATA___V977*/ meltfptr[976] = (melt_ptr_t) & cdat->dobj_815__OPRCONST_CVAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_815__OPRCONST_CVAL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_815__OPRCONST_CVAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_815__OPRCONST_CVAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_815__OPRCONST_CVAL.obj_num = 3; cdat->dobj_815__OPRCONST_CVAL.obj_hash = 327713090; cdat->dobj_815__OPRCONST_CVAL.obj_len = 4; /*inistring dstr_816__OPRCONST_CVAL*/ /*_.VALSTR___V978*/ meltfptr[977] = (melt_ptr_t) & cdat->dstr_816__OPRCONST_CVAL; cdat->dstr_816__OPRCONST_CVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_816__OPRCONST_CVAL.val, "OPRCONST_CVAL", sizeof (cdat->dstr_816__OPRCONST_CVAL.val) - 1); cdat->dstr_816__OPRCONST_CVAL.val[13] = (char) 0; cdat->dstr_816__OPRCONST_CVAL.slen = 13; /*iniobj dsym_817__CLASS_OBJPUTROUTCONSTNOTNULL*/ /*uniqueobj*/ if (! /*_.VALDATA___V986*/ meltfptr[985]) /*_.VALDATA___V986*/ meltfptr[985] = (melt_ptr_t) & cdat->dsym_817__CLASS_OBJPUTROUTCONSTNOTNULL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_817__CLASS_OBJPUTROUTCONSTNOTNULL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_817__CLASS_OBJPUTROUTCONSTNOTNULL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_817__CLASS_OBJPUTROUTCONSTNOTNULL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_817__CLASS_OBJPUTROUTCONSTNOTNULL.obj_hash = 698971949; cdat->dsym_817__CLASS_OBJPUTROUTCONSTNOTNULL.obj_len = 3; /*inistring dstr_818__CLASS_OBJPUTROUT*/ /*_.VALSTR___V987*/ meltfptr[986] = (melt_ptr_t) & cdat->dstr_818__CLASS_OBJPUTROUT; cdat->dstr_818__CLASS_OBJPUTROUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_818__CLASS_OBJPUTROUT.val, "CLASS_OBJPUTROUTCONSTNOTNULL", sizeof (cdat->dstr_818__CLASS_OBJPUTROUT. val) - 1); cdat->dstr_818__CLASS_OBJPUTROUT.val[28] = (char) 0; cdat->dstr_818__CLASS_OBJPUTROUT.slen = 28; MELT_LOCATION ("warmelt-genobj.melt:519:/ iniobj"); /*iniobj dobj_819__CLASS_OBJPUTROUTCONSTNOTNULL*/ /*_.VALDATA___V988*/ meltfptr[987] = (melt_ptr_t) & cdat->dobj_819__CLASS_OBJPUTROUTCONSTNOTNULL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_819__CLASS_OBJPUTROUTCONSTNOTNULL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_819__CLASS_OBJPUTROUTCONSTNOTNULL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_819__CLASS_OBJPUTROUTCONSTNOTNULL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_819__CLASS_OBJPUTROUTCONSTNOTNULL.obj_num = MELTOBMAG_OBJECT; cdat->dobj_819__CLASS_OBJPUTROUTCONSTNOTNULL.obj_hash = 584806760; cdat->dobj_819__CLASS_OBJPUTROUTCONSTNOTNULL.obj_len = 8; /*inistring dstr_820__CLASS_OBJPUTROUT*/ /*_.VALSTR___V989*/ meltfptr[988] = (melt_ptr_t) & cdat->dstr_820__CLASS_OBJPUTROUT; cdat->dstr_820__CLASS_OBJPUTROUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_820__CLASS_OBJPUTROUT.val, "CLASS_OBJPUTROUTCONSTNOTNULL", sizeof (cdat->dstr_820__CLASS_OBJPUTROUT. val) - 1); cdat->dstr_820__CLASS_OBJPUTROUT.val[28] = (char) 0; cdat->dstr_820__CLASS_OBJPUTROUT.slen = 28; /*inimult dtup_821__CLASS_OBJPUTROUTCONSTNOTNULL */ /*_.VALTUP___V990*/ meltfptr[989] = (melt_ptr_t) & cdat->dtup_821__CLASS_OBJPUTROUTCONSTNOTNULL; cdat->dtup_821__CLASS_OBJPUTROUTCONSTNOTNULL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_821__CLASS_OBJPUTROUTCONSTNOTNULL.nbval = 4; /*inimult dtup_822__CLASS_OBJPUTROUTCONSTNOTNULL */ /*_.VALTUP___V991*/ meltfptr[990] = (melt_ptr_t) & cdat->dtup_822__CLASS_OBJPUTROUTCONSTNOTNULL; cdat->dtup_822__CLASS_OBJPUTROUTCONSTNOTNULL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_822__CLASS_OBJPUTROUTCONSTNOTNULL.nbval = 4; /*iniobj dsym_823__CLASS_OBJTOUCH*/ /*uniqueobj*/ if (! /*_.VALDATA___V992*/ meltfptr[991]) /*_.VALDATA___V992*/ meltfptr[991] = (melt_ptr_t) & cdat->dsym_823__CLASS_OBJTOUCH; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_823__CLASS_OBJTOUCH", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_823__CLASS_OBJTOUCH", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_823__CLASS_OBJTOUCH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_823__CLASS_OBJTOUCH.obj_hash = 643155770; cdat->dsym_823__CLASS_OBJTOUCH.obj_len = 3; /*inistring dstr_824__CLASS_OBJTOUCH*/ /*_.VALSTR___V993*/ meltfptr[992] = (melt_ptr_t) & cdat->dstr_824__CLASS_OBJTOUCH; cdat->dstr_824__CLASS_OBJTOUCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_824__CLASS_OBJTOUCH.val, "CLASS_OBJTOUCH", sizeof (cdat->dstr_824__CLASS_OBJTOUCH.val) - 1); cdat->dstr_824__CLASS_OBJTOUCH.val[14] = (char) 0; cdat->dstr_824__CLASS_OBJTOUCH.slen = 14; MELT_LOCATION ("warmelt-genobj.melt:525:/ iniobj"); /*iniobj dobj_825__CLASS_OBJTOUCH*/ /*_.VALDATA___V994*/ meltfptr[993] = (melt_ptr_t) & cdat->dobj_825__CLASS_OBJTOUCH; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_825__CLASS_OBJTOUCH", 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_825__CLASS_OBJTOUCH", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_825__CLASS_OBJTOUCH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_825__CLASS_OBJTOUCH.obj_num = MELTOBMAG_OBJECT; cdat->dobj_825__CLASS_OBJTOUCH.obj_hash = 617242597; cdat->dobj_825__CLASS_OBJTOUCH.obj_len = 8; /*inistring dstr_826__CLASS_OBJTOUCH*/ /*_.VALSTR___V995*/ meltfptr[994] = (melt_ptr_t) & cdat->dstr_826__CLASS_OBJTOUCH; cdat->dstr_826__CLASS_OBJTOUCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_826__CLASS_OBJTOUCH.val, "CLASS_OBJTOUCH", sizeof (cdat->dstr_826__CLASS_OBJTOUCH.val) - 1); cdat->dstr_826__CLASS_OBJTOUCH.val[14] = (char) 0; cdat->dstr_826__CLASS_OBJTOUCH.slen = 14; /*inimult dtup_827__CLASS_OBJTOUCH */ /*_.VALTUP___V996*/ meltfptr[995] = (melt_ptr_t) & cdat->dtup_827__CLASS_OBJTOUCH; cdat->dtup_827__CLASS_OBJTOUCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_827__CLASS_OBJTOUCH.nbval = 3; /*inimult dtup_828__CLASS_OBJTOUCH */ /*_.VALTUP___V1001*/ meltfptr[1000] = (melt_ptr_t) & cdat->dtup_828__CLASS_OBJTOUCH; cdat->dtup_828__CLASS_OBJTOUCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_828__CLASS_OBJTOUCH.nbval = 3; /*iniobj dsym_829__OTOUCH_VAL*/ /*uniqueobj*/ if (! /*_.VALDATA___V1002*/ meltfptr[1001]) /*_.VALDATA___V1002*/ meltfptr[1001] = (melt_ptr_t) & cdat->dsym_829__OTOUCH_VAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_829__OTOUCH_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_829__OTOUCH_VAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_829__OTOUCH_VAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_829__OTOUCH_VAL.obj_hash = 756535232; cdat->dsym_829__OTOUCH_VAL.obj_len = 3; /*inistring dstr_830__OTOUCH_VAL*/ /*_.VALSTR___V1003*/ meltfptr[1002] = (melt_ptr_t) & cdat->dstr_830__OTOUCH_VAL; cdat->dstr_830__OTOUCH_VAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_830__OTOUCH_VAL.val, "OTOUCH_VAL", sizeof (cdat->dstr_830__OTOUCH_VAL.val) - 1); cdat->dstr_830__OTOUCH_VAL.val[10] = (char) 0; cdat->dstr_830__OTOUCH_VAL.slen = 10; /*^iniobj */ /*iniobj dobj_831__OTOUCH_VAL*/ /*_.VALDATA___V997*/ meltfptr[996] = (melt_ptr_t) & cdat->dobj_831__OTOUCH_VAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_831__OTOUCH_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_831__OTOUCH_VAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_831__OTOUCH_VAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_831__OTOUCH_VAL.obj_num = 1; cdat->dobj_831__OTOUCH_VAL.obj_hash = 340427621; cdat->dobj_831__OTOUCH_VAL.obj_len = 4; /*inistring dstr_832__OTOUCH_VAL*/ /*_.VALSTR___V998*/ meltfptr[997] = (melt_ptr_t) & cdat->dstr_832__OTOUCH_VAL; cdat->dstr_832__OTOUCH_VAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_832__OTOUCH_VAL.val, "OTOUCH_VAL", sizeof (cdat->dstr_832__OTOUCH_VAL.val) - 1); cdat->dstr_832__OTOUCH_VAL.val[10] = (char) 0; cdat->dstr_832__OTOUCH_VAL.slen = 10; /*iniobj dsym_833__OTOUCH_COMMENT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1004*/ meltfptr[1003]) /*_.VALDATA___V1004*/ meltfptr[1003] = (melt_ptr_t) & cdat->dsym_833__OTOUCH_COMMENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_833__OTOUCH_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_833__OTOUCH_COMMENT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_833__OTOUCH_COMMENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_833__OTOUCH_COMMENT.obj_hash = 649717129; cdat->dsym_833__OTOUCH_COMMENT.obj_len = 3; /*inistring dstr_834__OTOUCH_COMMENT*/ /*_.VALSTR___V1005*/ meltfptr[1004] = (melt_ptr_t) & cdat->dstr_834__OTOUCH_COMMENT; cdat->dstr_834__OTOUCH_COMMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_834__OTOUCH_COMMENT.val, "OTOUCH_COMMENT", sizeof (cdat->dstr_834__OTOUCH_COMMENT.val) - 1); cdat->dstr_834__OTOUCH_COMMENT.val[14] = (char) 0; cdat->dstr_834__OTOUCH_COMMENT.slen = 14; /*^iniobj */ /*iniobj dobj_835__OTOUCH_COMMENT*/ /*_.VALDATA___V999*/ meltfptr[998] = (melt_ptr_t) & cdat->dobj_835__OTOUCH_COMMENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_835__OTOUCH_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_835__OTOUCH_COMMENT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_835__OTOUCH_COMMENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_835__OTOUCH_COMMENT.obj_num = 2; cdat->dobj_835__OTOUCH_COMMENT.obj_hash = 1069661057; cdat->dobj_835__OTOUCH_COMMENT.obj_len = 4; /*inistring dstr_836__OTOUCH_COMMENT*/ /*_.VALSTR___V1000*/ meltfptr[999] = (melt_ptr_t) & cdat->dstr_836__OTOUCH_COMMENT; cdat->dstr_836__OTOUCH_COMMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_836__OTOUCH_COMMENT.val, "OTOUCH_COMMENT", sizeof (cdat->dstr_836__OTOUCH_COMMENT.val) - 1); cdat->dstr_836__OTOUCH_COMMENT.val[14] = (char) 0; cdat->dstr_836__OTOUCH_COMMENT.slen = 14; /*iniobj dsym_837__CLASS_OBJSETPREDEF*/ /*uniqueobj*/ if (! /*_.VALDATA___V1006*/ meltfptr[1005]) /*_.VALDATA___V1006*/ meltfptr[1005] = (melt_ptr_t) & cdat->dsym_837__CLASS_OBJSETPREDEF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_837__CLASS_OBJSETPREDEF", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_837__CLASS_OBJSETPREDEF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_837__CLASS_OBJSETPREDEF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_837__CLASS_OBJSETPREDEF.obj_hash = 287625349; cdat->dsym_837__CLASS_OBJSETPREDEF.obj_len = 3; /*inistring dstr_838__CLASS_OBJSETPRED*/ /*_.VALSTR___V1007*/ meltfptr[1006] = (melt_ptr_t) & cdat->dstr_838__CLASS_OBJSETPRED; cdat->dstr_838__CLASS_OBJSETPRED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_838__CLASS_OBJSETPRED.val, "CLASS_OBJSETPREDEF", sizeof (cdat->dstr_838__CLASS_OBJSETPRED. val) - 1); cdat->dstr_838__CLASS_OBJSETPRED.val[18] = (char) 0; cdat->dstr_838__CLASS_OBJSETPRED.slen = 18; MELT_LOCATION ("warmelt-genobj.melt:532:/ iniobj"); /*iniobj dobj_839__CLASS_OBJSETPREDEF*/ /*_.VALDATA___V1008*/ meltfptr[1007] = (melt_ptr_t) & cdat->dobj_839__CLASS_OBJSETPREDEF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_839__CLASS_OBJSETPREDEF", 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_839__CLASS_OBJSETPREDEF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_839__CLASS_OBJSETPREDEF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_839__CLASS_OBJSETPREDEF.obj_num = MELTOBMAG_OBJECT; cdat->dobj_839__CLASS_OBJSETPREDEF.obj_hash = 23644191; cdat->dobj_839__CLASS_OBJSETPREDEF.obj_len = 8; /*inistring dstr_840__CLASS_OBJSETPRED*/ /*_.VALSTR___V1009*/ meltfptr[1008] = (melt_ptr_t) & cdat->dstr_840__CLASS_OBJSETPRED; cdat->dstr_840__CLASS_OBJSETPRED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_840__CLASS_OBJSETPRED.val, "CLASS_OBJSETPREDEF", sizeof (cdat->dstr_840__CLASS_OBJSETPRED. val) - 1); cdat->dstr_840__CLASS_OBJSETPRED.val[18] = (char) 0; cdat->dstr_840__CLASS_OBJSETPRED.slen = 18; /*inimult dtup_841__CLASS_OBJSETPREDEF */ /*_.VALTUP___V1010*/ meltfptr[1009] = (melt_ptr_t) & cdat->dtup_841__CLASS_OBJSETPREDEF; cdat->dtup_841__CLASS_OBJSETPREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_841__CLASS_OBJSETPREDEF.nbval = 3; /*inimult dtup_842__CLASS_OBJSETPREDEF */ /*_.VALTUP___V1015*/ meltfptr[1014] = (melt_ptr_t) & cdat->dtup_842__CLASS_OBJSETPREDEF; cdat->dtup_842__CLASS_OBJSETPREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_842__CLASS_OBJSETPREDEF.nbval = 3; /*iniobj dsym_843__OSPR_OBJECT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1016*/ meltfptr[1015]) /*_.VALDATA___V1016*/ meltfptr[1015] = (melt_ptr_t) & cdat->dsym_843__OSPR_OBJECT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_843__OSPR_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_843__OSPR_OBJECT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_843__OSPR_OBJECT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_843__OSPR_OBJECT.obj_hash = 410793032; cdat->dsym_843__OSPR_OBJECT.obj_len = 3; /*inistring dstr_844__OSPR_OBJECT*/ /*_.VALSTR___V1017*/ meltfptr[1016] = (melt_ptr_t) & cdat->dstr_844__OSPR_OBJECT; cdat->dstr_844__OSPR_OBJECT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_844__OSPR_OBJECT.val, "OSPR_OBJECT", sizeof (cdat->dstr_844__OSPR_OBJECT.val) - 1); cdat->dstr_844__OSPR_OBJECT.val[11] = (char) 0; cdat->dstr_844__OSPR_OBJECT.slen = 11; /*^iniobj */ /*iniobj dobj_845__OSPR_OBJECT*/ /*_.VALDATA___V1011*/ meltfptr[1010] = (melt_ptr_t) & cdat->dobj_845__OSPR_OBJECT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_845__OSPR_OBJECT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_845__OSPR_OBJECT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_845__OSPR_OBJECT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_845__OSPR_OBJECT.obj_num = 1; cdat->dobj_845__OSPR_OBJECT.obj_hash = 34581646; cdat->dobj_845__OSPR_OBJECT.obj_len = 4; /*inistring dstr_846__OSPR_OBJECT*/ /*_.VALSTR___V1012*/ meltfptr[1011] = (melt_ptr_t) & cdat->dstr_846__OSPR_OBJECT; cdat->dstr_846__OSPR_OBJECT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_846__OSPR_OBJECT.val, "OSPR_OBJECT", sizeof (cdat->dstr_846__OSPR_OBJECT.val) - 1); cdat->dstr_846__OSPR_OBJECT.val[11] = (char) 0; cdat->dstr_846__OSPR_OBJECT.slen = 11; /*iniobj dsym_847__OSPR_PREDEF*/ /*uniqueobj*/ if (! /*_.VALDATA___V1018*/ meltfptr[1017]) /*_.VALDATA___V1018*/ meltfptr[1017] = (melt_ptr_t) & cdat->dsym_847__OSPR_PREDEF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_847__OSPR_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_847__OSPR_PREDEF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_847__OSPR_PREDEF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_847__OSPR_PREDEF.obj_hash = 674986323; cdat->dsym_847__OSPR_PREDEF.obj_len = 3; /*inistring dstr_848__OSPR_PREDEF*/ /*_.VALSTR___V1019*/ meltfptr[1018] = (melt_ptr_t) & cdat->dstr_848__OSPR_PREDEF; cdat->dstr_848__OSPR_PREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_848__OSPR_PREDEF.val, "OSPR_PREDEF", sizeof (cdat->dstr_848__OSPR_PREDEF.val) - 1); cdat->dstr_848__OSPR_PREDEF.val[11] = (char) 0; cdat->dstr_848__OSPR_PREDEF.slen = 11; /*^iniobj */ /*iniobj dobj_849__OSPR_PREDEF*/ /*_.VALDATA___V1013*/ meltfptr[1012] = (melt_ptr_t) & cdat->dobj_849__OSPR_PREDEF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_849__OSPR_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_849__OSPR_PREDEF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_849__OSPR_PREDEF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_849__OSPR_PREDEF.obj_num = 2; cdat->dobj_849__OSPR_PREDEF.obj_hash = 84943738; cdat->dobj_849__OSPR_PREDEF.obj_len = 4; /*inistring dstr_850__OSPR_PREDEF*/ /*_.VALSTR___V1014*/ meltfptr[1013] = (melt_ptr_t) & cdat->dstr_850__OSPR_PREDEF; cdat->dstr_850__OSPR_PREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_850__OSPR_PREDEF.val, "OSPR_PREDEF", sizeof (cdat->dstr_850__OSPR_PREDEF.val) - 1); cdat->dstr_850__OSPR_PREDEF.val[11] = (char) 0; cdat->dstr_850__OSPR_PREDEF.slen = 11; /*iniobj dsym_851__CLASS_ROUTINEOBJ*/ /*uniqueobj*/ if (! /*_.VALDATA___V1020*/ meltfptr[1019]) /*_.VALDATA___V1020*/ meltfptr[1019] = (melt_ptr_t) & cdat->dsym_851__CLASS_ROUTINEOBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_851__CLASS_ROUTINEOBJ", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_851__CLASS_ROUTINEOBJ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_851__CLASS_ROUTINEOBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_851__CLASS_ROUTINEOBJ.obj_hash = 302625151; cdat->dsym_851__CLASS_ROUTINEOBJ.obj_len = 3; /*inistring dstr_852__CLASS_ROUTINEOBJ*/ /*_.VALSTR___V1021*/ meltfptr[1020] = (melt_ptr_t) & cdat->dstr_852__CLASS_ROUTINEOBJ; cdat->dstr_852__CLASS_ROUTINEOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_852__CLASS_ROUTINEOBJ.val, "CLASS_ROUTINEOBJ", sizeof (cdat->dstr_852__CLASS_ROUTINEOBJ. val) - 1); cdat->dstr_852__CLASS_ROUTINEOBJ.val[16] = (char) 0; cdat->dstr_852__CLASS_ROUTINEOBJ.slen = 16; /*iniobj dsym_853__CLASS_NAMED*/ /*uniqueobj*/ if (! /*_.VALDATA___V1022*/ meltfptr[1021]) /*_.VALDATA___V1022*/ meltfptr[1021] = (melt_ptr_t) & cdat->dsym_853__CLASS_NAMED; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_853__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_853__CLASS_NAMED", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_853__CLASS_NAMED.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_853__CLASS_NAMED.obj_hash = 60407004; cdat->dsym_853__CLASS_NAMED.obj_len = 3; /*inistring dstr_854__CLASS_NAMED*/ /*_.VALSTR___V1023*/ meltfptr[1022] = (melt_ptr_t) & cdat->dstr_854__CLASS_NAMED; cdat->dstr_854__CLASS_NAMED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_854__CLASS_NAMED.val, "CLASS_NAMED", sizeof (cdat->dstr_854__CLASS_NAMED.val) - 1); cdat->dstr_854__CLASS_NAMED.val[11] = (char) 0; cdat->dstr_854__CLASS_NAMED.slen = 11; MELT_LOCATION ("warmelt-genobj.melt:540:/ iniobj"); /*iniobj dobj_855__CLASS_ROUTINEOBJ*/ /*_.VALDATA___V1024*/ meltfptr[1023] = (melt_ptr_t) & cdat->dobj_855__CLASS_ROUTINEOBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_855__CLASS_ROUTINEOBJ", 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_855__CLASS_ROUTINEOBJ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_855__CLASS_ROUTINEOBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_855__CLASS_ROUTINEOBJ.obj_num = MELTOBMAG_OBJECT; cdat->dobj_855__CLASS_ROUTINEOBJ.obj_hash = 409330598; cdat->dobj_855__CLASS_ROUTINEOBJ.obj_len = 8; /*inistring dstr_856__CLASS_ROUTINEOBJ*/ /*_.VALSTR___V1025*/ meltfptr[1024] = (melt_ptr_t) & cdat->dstr_856__CLASS_ROUTINEOBJ; cdat->dstr_856__CLASS_ROUTINEOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_856__CLASS_ROUTINEOBJ.val, "CLASS_ROUTINEOBJ", sizeof (cdat->dstr_856__CLASS_ROUTINEOBJ. val) - 1); cdat->dstr_856__CLASS_ROUTINEOBJ.val[16] = (char) 0; cdat->dstr_856__CLASS_ROUTINEOBJ.slen = 16; /*inimult dtup_857__CLASS_ROUTINEOBJ */ /*_.VALTUP___V1026*/ meltfptr[1025] = (melt_ptr_t) & cdat->dtup_857__CLASS_ROUTINEOBJ; cdat->dtup_857__CLASS_ROUTINEOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_857__CLASS_ROUTINEOBJ.nbval = 3; /*inimult dtup_858__CLASS_ROUTINEOBJ */ /*_.VALTUP___V1043*/ meltfptr[1042] = (melt_ptr_t) & cdat->dtup_858__CLASS_ROUTINEOBJ; cdat->dtup_858__CLASS_ROUTINEOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_858__CLASS_ROUTINEOBJ.nbval = 10; /*iniobj dsym_859__OBROUT_PROC*/ /*uniqueobj*/ if (! /*_.VALDATA___V1044*/ meltfptr[1043]) /*_.VALDATA___V1044*/ meltfptr[1043] = (melt_ptr_t) & cdat->dsym_859__OBROUT_PROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_859__OBROUT_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_859__OBROUT_PROC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_859__OBROUT_PROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_859__OBROUT_PROC.obj_hash = 407621219; cdat->dsym_859__OBROUT_PROC.obj_len = 3; /*inistring dstr_860__OBROUT_PROC*/ /*_.VALSTR___V1045*/ meltfptr[1044] = (melt_ptr_t) & cdat->dstr_860__OBROUT_PROC; cdat->dstr_860__OBROUT_PROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_860__OBROUT_PROC.val, "OBROUT_PROC", sizeof (cdat->dstr_860__OBROUT_PROC.val) - 1); cdat->dstr_860__OBROUT_PROC.val[11] = (char) 0; cdat->dstr_860__OBROUT_PROC.slen = 11; /*^iniobj */ /*iniobj dobj_861__OBROUT_PROC*/ /*_.VALDATA___V1027*/ meltfptr[1026] = (melt_ptr_t) & cdat->dobj_861__OBROUT_PROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_861__OBROUT_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_861__OBROUT_PROC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_861__OBROUT_PROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_861__OBROUT_PROC.obj_num = 2; cdat->dobj_861__OBROUT_PROC.obj_hash = 1010060325; cdat->dobj_861__OBROUT_PROC.obj_len = 4; /*inistring dstr_862__OBROUT_PROC*/ /*_.VALSTR___V1028*/ meltfptr[1027] = (melt_ptr_t) & cdat->dstr_862__OBROUT_PROC; cdat->dstr_862__OBROUT_PROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_862__OBROUT_PROC.val, "OBROUT_PROC", sizeof (cdat->dstr_862__OBROUT_PROC.val) - 1); cdat->dstr_862__OBROUT_PROC.val[11] = (char) 0; cdat->dstr_862__OBROUT_PROC.slen = 11; /*iniobj dsym_863__OBROUT_BODY*/ /*uniqueobj*/ if (! /*_.VALDATA___V1046*/ meltfptr[1045]) /*_.VALDATA___V1046*/ meltfptr[1045] = (melt_ptr_t) & cdat->dsym_863__OBROUT_BODY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_863__OBROUT_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_863__OBROUT_BODY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_863__OBROUT_BODY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_863__OBROUT_BODY.obj_hash = 271133814; cdat->dsym_863__OBROUT_BODY.obj_len = 3; /*inistring dstr_864__OBROUT_BODY*/ /*_.VALSTR___V1047*/ meltfptr[1046] = (melt_ptr_t) & cdat->dstr_864__OBROUT_BODY; cdat->dstr_864__OBROUT_BODY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_864__OBROUT_BODY.val, "OBROUT_BODY", sizeof (cdat->dstr_864__OBROUT_BODY.val) - 1); cdat->dstr_864__OBROUT_BODY.val[11] = (char) 0; cdat->dstr_864__OBROUT_BODY.slen = 11; /*^iniobj */ /*iniobj dobj_865__OBROUT_BODY*/ /*_.VALDATA___V1029*/ meltfptr[1028] = (melt_ptr_t) & cdat->dobj_865__OBROUT_BODY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_865__OBROUT_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_865__OBROUT_BODY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_865__OBROUT_BODY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_865__OBROUT_BODY.obj_num = 3; cdat->dobj_865__OBROUT_BODY.obj_hash = 612958455; cdat->dobj_865__OBROUT_BODY.obj_len = 4; /*inistring dstr_866__OBROUT_BODY*/ /*_.VALSTR___V1030*/ meltfptr[1029] = (melt_ptr_t) & cdat->dstr_866__OBROUT_BODY; cdat->dstr_866__OBROUT_BODY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_866__OBROUT_BODY.val, "OBROUT_BODY", sizeof (cdat->dstr_866__OBROUT_BODY.val) - 1); cdat->dstr_866__OBROUT_BODY.val[11] = (char) 0; cdat->dstr_866__OBROUT_BODY.slen = 11; /*iniobj dsym_867__OBROUT_NBVAL*/ /*uniqueobj*/ if (! /*_.VALDATA___V1048*/ meltfptr[1047]) /*_.VALDATA___V1048*/ meltfptr[1047] = (melt_ptr_t) & cdat->dsym_867__OBROUT_NBVAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_867__OBROUT_NBVAL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_867__OBROUT_NBVAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_867__OBROUT_NBVAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_867__OBROUT_NBVAL.obj_hash = 275635470; cdat->dsym_867__OBROUT_NBVAL.obj_len = 3; /*inistring dstr_868__OBROUT_NBVAL*/ /*_.VALSTR___V1049*/ meltfptr[1048] = (melt_ptr_t) & cdat->dstr_868__OBROUT_NBVAL; cdat->dstr_868__OBROUT_NBVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_868__OBROUT_NBVAL.val, "OBROUT_NBVAL", sizeof (cdat->dstr_868__OBROUT_NBVAL.val) - 1); cdat->dstr_868__OBROUT_NBVAL.val[12] = (char) 0; cdat->dstr_868__OBROUT_NBVAL.slen = 12; /*^iniobj */ /*iniobj dobj_869__OBROUT_NBVAL*/ /*_.VALDATA___V1031*/ meltfptr[1030] = (melt_ptr_t) & cdat->dobj_869__OBROUT_NBVAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_869__OBROUT_NBVAL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_869__OBROUT_NBVAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_869__OBROUT_NBVAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_869__OBROUT_NBVAL.obj_num = 4; cdat->dobj_869__OBROUT_NBVAL.obj_hash = 219964049; cdat->dobj_869__OBROUT_NBVAL.obj_len = 4; /*inistring dstr_870__OBROUT_NBVAL*/ /*_.VALSTR___V1032*/ meltfptr[1031] = (melt_ptr_t) & cdat->dstr_870__OBROUT_NBVAL; cdat->dstr_870__OBROUT_NBVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_870__OBROUT_NBVAL.val, "OBROUT_NBVAL", sizeof (cdat->dstr_870__OBROUT_NBVAL.val) - 1); cdat->dstr_870__OBROUT_NBVAL.val[12] = (char) 0; cdat->dstr_870__OBROUT_NBVAL.slen = 12; /*iniobj dsym_871__OBROUT_NBLONG*/ /*uniqueobj*/ if (! /*_.VALDATA___V1050*/ meltfptr[1049]) /*_.VALDATA___V1050*/ meltfptr[1049] = (melt_ptr_t) & cdat->dsym_871__OBROUT_NBLONG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_871__OBROUT_NBLONG", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_871__OBROUT_NBLONG", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_871__OBROUT_NBLONG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_871__OBROUT_NBLONG.obj_hash = 873816186; cdat->dsym_871__OBROUT_NBLONG.obj_len = 3; /*inistring dstr_872__OBROUT_NBLONG*/ /*_.VALSTR___V1051*/ meltfptr[1050] = (melt_ptr_t) & cdat->dstr_872__OBROUT_NBLONG; cdat->dstr_872__OBROUT_NBLONG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_872__OBROUT_NBLONG.val, "OBROUT_NBLONG", sizeof (cdat->dstr_872__OBROUT_NBLONG.val) - 1); cdat->dstr_872__OBROUT_NBLONG.val[13] = (char) 0; cdat->dstr_872__OBROUT_NBLONG.slen = 13; /*^iniobj */ /*iniobj dobj_873__OBROUT_NBLONG*/ /*_.VALDATA___V1033*/ meltfptr[1032] = (melt_ptr_t) & cdat->dobj_873__OBROUT_NBLONG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_873__OBROUT_NBLONG", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_873__OBROUT_NBLONG", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_873__OBROUT_NBLONG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_873__OBROUT_NBLONG.obj_num = 5; cdat->dobj_873__OBROUT_NBLONG.obj_hash = 407183204; cdat->dobj_873__OBROUT_NBLONG.obj_len = 4; /*inistring dstr_874__OBROUT_NBLONG*/ /*_.VALSTR___V1034*/ meltfptr[1033] = (melt_ptr_t) & cdat->dstr_874__OBROUT_NBLONG; cdat->dstr_874__OBROUT_NBLONG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_874__OBROUT_NBLONG.val, "OBROUT_NBLONG", sizeof (cdat->dstr_874__OBROUT_NBLONG.val) - 1); cdat->dstr_874__OBROUT_NBLONG.val[13] = (char) 0; cdat->dstr_874__OBROUT_NBLONG.slen = 13; /*iniobj dsym_875__OBROUT_OTHERS*/ /*uniqueobj*/ if (! /*_.VALDATA___V1052*/ meltfptr[1051]) /*_.VALDATA___V1052*/ meltfptr[1051] = (melt_ptr_t) & cdat->dsym_875__OBROUT_OTHERS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_875__OBROUT_OTHERS", melt_magic_discr ((melt_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__OBROUT_OTHERS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_875__OBROUT_OTHERS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_875__OBROUT_OTHERS.obj_hash = 83520399; cdat->dsym_875__OBROUT_OTHERS.obj_len = 3; /*inistring dstr_876__OBROUT_OTHERS*/ /*_.VALSTR___V1053*/ meltfptr[1052] = (melt_ptr_t) & cdat->dstr_876__OBROUT_OTHERS; cdat->dstr_876__OBROUT_OTHERS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_876__OBROUT_OTHERS.val, "OBROUT_OTHERS", sizeof (cdat->dstr_876__OBROUT_OTHERS.val) - 1); cdat->dstr_876__OBROUT_OTHERS.val[13] = (char) 0; cdat->dstr_876__OBROUT_OTHERS.slen = 13; /*^iniobj */ /*iniobj dobj_877__OBROUT_OTHERS*/ /*_.VALDATA___V1035*/ meltfptr[1034] = (melt_ptr_t) & cdat->dobj_877__OBROUT_OTHERS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_877__OBROUT_OTHERS", melt_magic_discr ((melt_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__OBROUT_OTHERS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_877__OBROUT_OTHERS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_877__OBROUT_OTHERS.obj_num = 6; cdat->dobj_877__OBROUT_OTHERS.obj_hash = 584162263; cdat->dobj_877__OBROUT_OTHERS.obj_len = 4; /*inistring dstr_878__OBROUT_OTHERS*/ /*_.VALSTR___V1036*/ meltfptr[1035] = (melt_ptr_t) & cdat->dstr_878__OBROUT_OTHERS; cdat->dstr_878__OBROUT_OTHERS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_878__OBROUT_OTHERS.val, "OBROUT_OTHERS", sizeof (cdat->dstr_878__OBROUT_OTHERS.val) - 1); cdat->dstr_878__OBROUT_OTHERS.val[13] = (char) 0; cdat->dstr_878__OBROUT_OTHERS.slen = 13; /*iniobj dsym_879__OBROUT_RETVAL*/ /*uniqueobj*/ if (! /*_.VALDATA___V1054*/ meltfptr[1053]) /*_.VALDATA___V1054*/ meltfptr[1053] = (melt_ptr_t) & cdat->dsym_879__OBROUT_RETVAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_879__OBROUT_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_879__OBROUT_RETVAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_879__OBROUT_RETVAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_879__OBROUT_RETVAL.obj_hash = 354531664; cdat->dsym_879__OBROUT_RETVAL.obj_len = 3; /*inistring dstr_880__OBROUT_RETVAL*/ /*_.VALSTR___V1055*/ meltfptr[1054] = (melt_ptr_t) & cdat->dstr_880__OBROUT_RETVAL; cdat->dstr_880__OBROUT_RETVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_880__OBROUT_RETVAL.val, "OBROUT_RETVAL", sizeof (cdat->dstr_880__OBROUT_RETVAL.val) - 1); cdat->dstr_880__OBROUT_RETVAL.val[13] = (char) 0; cdat->dstr_880__OBROUT_RETVAL.slen = 13; /*^iniobj */ /*iniobj dobj_881__OBROUT_RETVAL*/ /*_.VALDATA___V1037*/ meltfptr[1036] = (melt_ptr_t) & cdat->dobj_881__OBROUT_RETVAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_881__OBROUT_RETVAL", melt_magic_discr ((melt_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__OBROUT_RETVAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_881__OBROUT_RETVAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_881__OBROUT_RETVAL.obj_num = 7; cdat->dobj_881__OBROUT_RETVAL.obj_hash = 584653002; cdat->dobj_881__OBROUT_RETVAL.obj_len = 4; /*inistring dstr_882__OBROUT_RETVAL*/ /*_.VALSTR___V1038*/ meltfptr[1037] = (melt_ptr_t) & cdat->dstr_882__OBROUT_RETVAL; cdat->dstr_882__OBROUT_RETVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_882__OBROUT_RETVAL.val, "OBROUT_RETVAL", sizeof (cdat->dstr_882__OBROUT_RETVAL.val) - 1); cdat->dstr_882__OBROUT_RETVAL.val[13] = (char) 0; cdat->dstr_882__OBROUT_RETVAL.slen = 13; /*iniobj dsym_883__OBROUT_CNTCITER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1056*/ meltfptr[1055]) /*_.VALDATA___V1056*/ meltfptr[1055] = (melt_ptr_t) & cdat->dsym_883__OBROUT_CNTCITER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_883__OBROUT_CNTCITER", melt_magic_discr ((melt_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__OBROUT_CNTCITER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_883__OBROUT_CNTCITER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_883__OBROUT_CNTCITER.obj_hash = 288722674; cdat->dsym_883__OBROUT_CNTCITER.obj_len = 3; /*inistring dstr_884__OBROUT_CNTCITER*/ /*_.VALSTR___V1057*/ meltfptr[1056] = (melt_ptr_t) & cdat->dstr_884__OBROUT_CNTCITER; cdat->dstr_884__OBROUT_CNTCITER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_884__OBROUT_CNTCITER.val, "OBROUT_CNTCITER", sizeof (cdat->dstr_884__OBROUT_CNTCITER.val) - 1); cdat->dstr_884__OBROUT_CNTCITER.val[15] = (char) 0; cdat->dstr_884__OBROUT_CNTCITER.slen = 15; /*^iniobj */ /*iniobj dobj_885__OBROUT_CNTCITER*/ /*_.VALDATA___V1039*/ meltfptr[1038] = (melt_ptr_t) & cdat->dobj_885__OBROUT_CNTCITER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_885__OBROUT_CNTCITER", melt_magic_discr ((melt_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__OBROUT_CNTCITER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_885__OBROUT_CNTCITER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_885__OBROUT_CNTCITER.obj_num = 8; cdat->dobj_885__OBROUT_CNTCITER.obj_hash = 747355439; cdat->dobj_885__OBROUT_CNTCITER.obj_len = 4; /*inistring dstr_886__OBROUT_CNTCITER*/ /*_.VALSTR___V1040*/ meltfptr[1039] = (melt_ptr_t) & cdat->dstr_886__OBROUT_CNTCITER; cdat->dstr_886__OBROUT_CNTCITER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_886__OBROUT_CNTCITER.val, "OBROUT_CNTCITER", sizeof (cdat->dstr_886__OBROUT_CNTCITER.val) - 1); cdat->dstr_886__OBROUT_CNTCITER.val[15] = (char) 0; cdat->dstr_886__OBROUT_CNTCITER.slen = 15; /*iniobj dsym_887__OBROUT_CNTLETREC*/ /*uniqueobj*/ if (! /*_.VALDATA___V1058*/ meltfptr[1057]) /*_.VALDATA___V1058*/ meltfptr[1057] = (melt_ptr_t) & cdat->dsym_887__OBROUT_CNTLETREC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_887__OBROUT_CNTLETREC", melt_magic_discr ((melt_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__OBROUT_CNTLETREC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_887__OBROUT_CNTLETREC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_887__OBROUT_CNTLETREC.obj_hash = 1048136560; cdat->dsym_887__OBROUT_CNTLETREC.obj_len = 3; /*inistring dstr_888__OBROUT_CNTLETREC*/ /*_.VALSTR___V1059*/ meltfptr[1058] = (melt_ptr_t) & cdat->dstr_888__OBROUT_CNTLETREC; cdat->dstr_888__OBROUT_CNTLETREC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_888__OBROUT_CNTLETREC.val, "OBROUT_CNTLETREC", sizeof (cdat->dstr_888__OBROUT_CNTLETREC. val) - 1); cdat->dstr_888__OBROUT_CNTLETREC.val[16] = (char) 0; cdat->dstr_888__OBROUT_CNTLETREC.slen = 16; /*^iniobj */ /*iniobj dobj_889__OBROUT_CNTLETREC*/ /*_.VALDATA___V1041*/ meltfptr[1040] = (melt_ptr_t) & cdat->dobj_889__OBROUT_CNTLETREC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_889__OBROUT_CNTLETREC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_889__OBROUT_CNTLETREC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_889__OBROUT_CNTLETREC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_889__OBROUT_CNTLETREC.obj_num = 9; cdat->dobj_889__OBROUT_CNTLETREC.obj_hash = 1004315880; cdat->dobj_889__OBROUT_CNTLETREC.obj_len = 4; /*inistring dstr_890__OBROUT_CNTLETREC*/ /*_.VALSTR___V1042*/ meltfptr[1041] = (melt_ptr_t) & cdat->dstr_890__OBROUT_CNTLETREC; cdat->dstr_890__OBROUT_CNTLETREC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_890__OBROUT_CNTLETREC.val, "OBROUT_CNTLETREC", sizeof (cdat->dstr_890__OBROUT_CNTLETREC. val) - 1); cdat->dstr_890__OBROUT_CNTLETREC.val[16] = (char) 0; cdat->dstr_890__OBROUT_CNTLETREC.slen = 16; /*iniobj dsym_891__CLASS_PROCROUTINEOBJ*/ /*uniqueobj*/ if (! /*_.VALDATA___V1060*/ meltfptr[1059]) /*_.VALDATA___V1060*/ meltfptr[1059] = (melt_ptr_t) & cdat->dsym_891__CLASS_PROCROUTINEOBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_891__CLASS_PROCROUTINEOBJ", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_891__CLASS_PROCROUTINEOBJ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_891__CLASS_PROCROUTINEOBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_891__CLASS_PROCROUTINEOBJ.obj_hash = 171301749; cdat->dsym_891__CLASS_PROCROUTINEOBJ.obj_len = 3; /*inistring dstr_892__CLASS_PROCROUTIN*/ /*_.VALSTR___V1061*/ meltfptr[1060] = (melt_ptr_t) & cdat->dstr_892__CLASS_PROCROUTIN; cdat->dstr_892__CLASS_PROCROUTIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_892__CLASS_PROCROUTIN.val, "CLASS_PROCROUTINEOBJ", sizeof (cdat->dstr_892__CLASS_PROCROUTIN. val) - 1); cdat->dstr_892__CLASS_PROCROUTIN.val[20] = (char) 0; cdat->dstr_892__CLASS_PROCROUTIN.slen = 20; MELT_LOCATION ("warmelt-genobj.melt:556:/ iniobj"); /*iniobj dobj_893__CLASS_PROCROUTINEOBJ*/ /*_.VALDATA___V1062*/ meltfptr[1061] = (melt_ptr_t) & cdat->dobj_893__CLASS_PROCROUTINEOBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_893__CLASS_PROCROUTINEOBJ", 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_893__CLASS_PROCROUTINEOBJ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_893__CLASS_PROCROUTINEOBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_893__CLASS_PROCROUTINEOBJ.obj_num = MELTOBMAG_OBJECT; cdat->dobj_893__CLASS_PROCROUTINEOBJ.obj_hash = 256308096; cdat->dobj_893__CLASS_PROCROUTINEOBJ.obj_len = 8; /*inistring dstr_894__CLASS_PROCROUTIN*/ /*_.VALSTR___V1063*/ meltfptr[1062] = (melt_ptr_t) & cdat->dstr_894__CLASS_PROCROUTIN; cdat->dstr_894__CLASS_PROCROUTIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_894__CLASS_PROCROUTIN.val, "CLASS_PROCROUTINEOBJ", sizeof (cdat->dstr_894__CLASS_PROCROUTIN. val) - 1); cdat->dstr_894__CLASS_PROCROUTIN.val[20] = (char) 0; cdat->dstr_894__CLASS_PROCROUTIN.slen = 20; /*inimult dtup_895__CLASS_PROCROUTINEOBJ */ /*_.VALTUP___V1064*/ meltfptr[1063] = (melt_ptr_t) & cdat->dtup_895__CLASS_PROCROUTINEOBJ; cdat->dtup_895__CLASS_PROCROUTINEOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_895__CLASS_PROCROUTINEOBJ.nbval = 4; /*inimult dtup_896__CLASS_PROCROUTINEOBJ */ /*_.VALTUP___V1075*/ meltfptr[1074] = (melt_ptr_t) & cdat->dtup_896__CLASS_PROCROUTINEOBJ; cdat->dtup_896__CLASS_PROCROUTINEOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_896__CLASS_PROCROUTINEOBJ.nbval = 15; /*iniobj dsym_897__OPROUT_GETARGS*/ /*uniqueobj*/ if (! /*_.VALDATA___V1076*/ meltfptr[1075]) /*_.VALDATA___V1076*/ meltfptr[1075] = (melt_ptr_t) & cdat->dsym_897__OPROUT_GETARGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_897__OPROUT_GETARGS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_897__OPROUT_GETARGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_897__OPROUT_GETARGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_897__OPROUT_GETARGS.obj_hash = 508312057; cdat->dsym_897__OPROUT_GETARGS.obj_len = 3; /*inistring dstr_898__OPROUT_GETARGS*/ /*_.VALSTR___V1077*/ meltfptr[1076] = (melt_ptr_t) & cdat->dstr_898__OPROUT_GETARGS; cdat->dstr_898__OPROUT_GETARGS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_898__OPROUT_GETARGS.val, "OPROUT_GETARGS", sizeof (cdat->dstr_898__OPROUT_GETARGS.val) - 1); cdat->dstr_898__OPROUT_GETARGS.val[14] = (char) 0; cdat->dstr_898__OPROUT_GETARGS.slen = 14; /*^iniobj */ /*iniobj dobj_899__OPROUT_GETARGS*/ /*_.VALDATA___V1065*/ meltfptr[1064] = (melt_ptr_t) & cdat->dobj_899__OPROUT_GETARGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_899__OPROUT_GETARGS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_899__OPROUT_GETARGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_899__OPROUT_GETARGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_899__OPROUT_GETARGS.obj_num = 10; cdat->dobj_899__OPROUT_GETARGS.obj_hash = 41238284; cdat->dobj_899__OPROUT_GETARGS.obj_len = 4; /*inistring dstr_900__OPROUT_GETARGS*/ /*_.VALSTR___V1066*/ meltfptr[1065] = (melt_ptr_t) & cdat->dstr_900__OPROUT_GETARGS; cdat->dstr_900__OPROUT_GETARGS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_900__OPROUT_GETARGS.val, "OPROUT_GETARGS", sizeof (cdat->dstr_900__OPROUT_GETARGS.val) - 1); cdat->dstr_900__OPROUT_GETARGS.val[14] = (char) 0; cdat->dstr_900__OPROUT_GETARGS.slen = 14; /*iniobj dsym_901__OPROUT_LOC*/ /*uniqueobj*/ if (! /*_.VALDATA___V1078*/ meltfptr[1077]) /*_.VALDATA___V1078*/ meltfptr[1077] = (melt_ptr_t) & cdat->dsym_901__OPROUT_LOC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_901__OPROUT_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_901__OPROUT_LOC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_901__OPROUT_LOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_901__OPROUT_LOC.obj_hash = 1041994650; cdat->dsym_901__OPROUT_LOC.obj_len = 3; /*inistring dstr_902__OPROUT_LOC*/ /*_.VALSTR___V1079*/ meltfptr[1078] = (melt_ptr_t) & cdat->dstr_902__OPROUT_LOC; cdat->dstr_902__OPROUT_LOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_902__OPROUT_LOC.val, "OPROUT_LOC", sizeof (cdat->dstr_902__OPROUT_LOC.val) - 1); cdat->dstr_902__OPROUT_LOC.val[10] = (char) 0; cdat->dstr_902__OPROUT_LOC.slen = 10; /*^iniobj */ /*iniobj dobj_903__OPROUT_LOC*/ /*_.VALDATA___V1067*/ meltfptr[1066] = (melt_ptr_t) & cdat->dobj_903__OPROUT_LOC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_903__OPROUT_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_903__OPROUT_LOC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_903__OPROUT_LOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_903__OPROUT_LOC.obj_num = 11; cdat->dobj_903__OPROUT_LOC.obj_hash = 16803905; cdat->dobj_903__OPROUT_LOC.obj_len = 4; /*inistring dstr_904__OPROUT_LOC*/ /*_.VALSTR___V1068*/ meltfptr[1067] = (melt_ptr_t) & cdat->dstr_904__OPROUT_LOC; cdat->dstr_904__OPROUT_LOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_904__OPROUT_LOC.val, "OPROUT_LOC", sizeof (cdat->dstr_904__OPROUT_LOC.val) - 1); cdat->dstr_904__OPROUT_LOC.val[10] = (char) 0; cdat->dstr_904__OPROUT_LOC.slen = 10; /*iniobj dsym_905__OPROUT_FUNAM*/ /*uniqueobj*/ if (! /*_.VALDATA___V1080*/ meltfptr[1079]) /*_.VALDATA___V1080*/ meltfptr[1079] = (melt_ptr_t) & cdat->dsym_905__OPROUT_FUNAM; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_905__OPROUT_FUNAM", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_905__OPROUT_FUNAM", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_905__OPROUT_FUNAM.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_905__OPROUT_FUNAM.obj_hash = 829875206; cdat->dsym_905__OPROUT_FUNAM.obj_len = 3; /*inistring dstr_906__OPROUT_FUNAM*/ /*_.VALSTR___V1081*/ meltfptr[1080] = (melt_ptr_t) & cdat->dstr_906__OPROUT_FUNAM; cdat->dstr_906__OPROUT_FUNAM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_906__OPROUT_FUNAM.val, "OPROUT_FUNAM", sizeof (cdat->dstr_906__OPROUT_FUNAM.val) - 1); cdat->dstr_906__OPROUT_FUNAM.val[12] = (char) 0; cdat->dstr_906__OPROUT_FUNAM.slen = 12; /*^iniobj */ /*iniobj dobj_907__OPROUT_FUNAM*/ /*_.VALDATA___V1069*/ meltfptr[1068] = (melt_ptr_t) & cdat->dobj_907__OPROUT_FUNAM; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_907__OPROUT_FUNAM", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_907__OPROUT_FUNAM", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_907__OPROUT_FUNAM.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_907__OPROUT_FUNAM.obj_num = 12; cdat->dobj_907__OPROUT_FUNAM.obj_hash = 259245675; cdat->dobj_907__OPROUT_FUNAM.obj_len = 4; /*inistring dstr_908__OPROUT_FUNAM*/ /*_.VALSTR___V1070*/ meltfptr[1069] = (melt_ptr_t) & cdat->dstr_908__OPROUT_FUNAM; cdat->dstr_908__OPROUT_FUNAM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_908__OPROUT_FUNAM.val, "OPROUT_FUNAM", sizeof (cdat->dstr_908__OPROUT_FUNAM.val) - 1); cdat->dstr_908__OPROUT_FUNAM.val[12] = (char) 0; cdat->dstr_908__OPROUT_FUNAM.slen = 12; /*iniobj dsym_909__OPROUT_RESTNAM*/ /*uniqueobj*/ if (! /*_.VALDATA___V1082*/ meltfptr[1081]) /*_.VALDATA___V1082*/ meltfptr[1081] = (melt_ptr_t) & cdat->dsym_909__OPROUT_RESTNAM; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_909__OPROUT_RESTNAM", melt_magic_discr ((melt_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__OPROUT_RESTNAM", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_909__OPROUT_RESTNAM.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_909__OPROUT_RESTNAM.obj_hash = 888296044; cdat->dsym_909__OPROUT_RESTNAM.obj_len = 3; /*inistring dstr_910__OPROUT_RESTNAM*/ /*_.VALSTR___V1083*/ meltfptr[1082] = (melt_ptr_t) & cdat->dstr_910__OPROUT_RESTNAM; cdat->dstr_910__OPROUT_RESTNAM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_910__OPROUT_RESTNAM.val, "OPROUT_RESTNAM", sizeof (cdat->dstr_910__OPROUT_RESTNAM.val) - 1); cdat->dstr_910__OPROUT_RESTNAM.val[14] = (char) 0; cdat->dstr_910__OPROUT_RESTNAM.slen = 14; /*^iniobj */ /*iniobj dobj_911__OPROUT_RESTNAM*/ /*_.VALDATA___V1071*/ meltfptr[1070] = (melt_ptr_t) & cdat->dobj_911__OPROUT_RESTNAM; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_911__OPROUT_RESTNAM", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_911__OPROUT_RESTNAM", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_911__OPROUT_RESTNAM.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_911__OPROUT_RESTNAM.obj_num = 13; cdat->dobj_911__OPROUT_RESTNAM.obj_hash = 865245625; cdat->dobj_911__OPROUT_RESTNAM.obj_len = 4; /*inistring dstr_912__OPROUT_RESTNAM*/ /*_.VALSTR___V1072*/ meltfptr[1071] = (melt_ptr_t) & cdat->dstr_912__OPROUT_RESTNAM; cdat->dstr_912__OPROUT_RESTNAM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_912__OPROUT_RESTNAM.val, "OPROUT_RESTNAM", sizeof (cdat->dstr_912__OPROUT_RESTNAM.val) - 1); cdat->dstr_912__OPROUT_RESTNAM.val[14] = (char) 0; cdat->dstr_912__OPROUT_RESTNAM.slen = 14; /*iniobj dsym_913__OPROUT_FILENUM*/ /*uniqueobj*/ if (! /*_.VALDATA___V1084*/ meltfptr[1083]) /*_.VALDATA___V1084*/ meltfptr[1083] = (melt_ptr_t) & cdat->dsym_913__OPROUT_FILENUM; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_913__OPROUT_FILENUM", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_913__OPROUT_FILENUM", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_913__OPROUT_FILENUM.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_913__OPROUT_FILENUM.obj_hash = 335268226; cdat->dsym_913__OPROUT_FILENUM.obj_len = 3; /*inistring dstr_914__OPROUT_FILENUM*/ /*_.VALSTR___V1085*/ meltfptr[1084] = (melt_ptr_t) & cdat->dstr_914__OPROUT_FILENUM; cdat->dstr_914__OPROUT_FILENUM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_914__OPROUT_FILENUM.val, "OPROUT_FILENUM", sizeof (cdat->dstr_914__OPROUT_FILENUM.val) - 1); cdat->dstr_914__OPROUT_FILENUM.val[14] = (char) 0; cdat->dstr_914__OPROUT_FILENUM.slen = 14; /*^iniobj */ /*iniobj dobj_915__OPROUT_FILENUM*/ /*_.VALDATA___V1073*/ meltfptr[1072] = (melt_ptr_t) & cdat->dobj_915__OPROUT_FILENUM; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_915__OPROUT_FILENUM", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_915__OPROUT_FILENUM", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_915__OPROUT_FILENUM.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_915__OPROUT_FILENUM.obj_num = 14; cdat->dobj_915__OPROUT_FILENUM.obj_hash = 297806718; cdat->dobj_915__OPROUT_FILENUM.obj_len = 4; /*inistring dstr_916__OPROUT_FILENUM*/ /*_.VALSTR___V1074*/ meltfptr[1073] = (melt_ptr_t) & cdat->dstr_916__OPROUT_FILENUM; cdat->dstr_916__OPROUT_FILENUM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_916__OPROUT_FILENUM.val, "OPROUT_FILENUM", sizeof (cdat->dstr_916__OPROUT_FILENUM.val) - 1); cdat->dstr_916__OPROUT_FILENUM.val[14] = (char) 0; cdat->dstr_916__OPROUT_FILENUM.slen = 14; /*iniobj dsym_917__CLASS_INITIALROUTINEOBJ*/ /*uniqueobj*/ if (! /*_.VALDATA___V1086*/ meltfptr[1085]) /*_.VALDATA___V1086*/ meltfptr[1085] = (melt_ptr_t) & cdat->dsym_917__CLASS_INITIALROUTINEOBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_917__CLASS_INITIALROUTINEOBJ", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_917__CLASS_INITIALROUTINEOBJ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_917__CLASS_INITIALROUTINEOBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_917__CLASS_INITIALROUTINEOBJ.obj_hash = 149718249; cdat->dsym_917__CLASS_INITIALROUTINEOBJ.obj_len = 3; /*inistring dstr_918__CLASS_INITIALROU*/ /*_.VALSTR___V1087*/ meltfptr[1086] = (melt_ptr_t) & cdat->dstr_918__CLASS_INITIALROU; cdat->dstr_918__CLASS_INITIALROU.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_918__CLASS_INITIALROU.val, "CLASS_INITIALROUTINEOBJ", sizeof (cdat->dstr_918__CLASS_INITIALROU. val) - 1); cdat->dstr_918__CLASS_INITIALROU.val[23] = (char) 0; cdat->dstr_918__CLASS_INITIALROU.slen = 23; MELT_LOCATION ("warmelt-genobj.melt:566:/ iniobj"); /*iniobj dobj_919__CLASS_INITIALROUTINEOBJ*/ /*_.VALDATA___V1088*/ meltfptr[1087] = (melt_ptr_t) & cdat->dobj_919__CLASS_INITIALROUTINEOBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_919__CLASS_INITIALROUTINEOBJ", 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_919__CLASS_INITIALROUTINEOBJ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_919__CLASS_INITIALROUTINEOBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_919__CLASS_INITIALROUTINEOBJ.obj_num = MELTOBMAG_OBJECT; cdat->dobj_919__CLASS_INITIALROUTINEOBJ.obj_hash = 966691218; cdat->dobj_919__CLASS_INITIALROUTINEOBJ.obj_len = 8; /*inistring dstr_920__CLASS_INITIALROU*/ /*_.VALSTR___V1089*/ meltfptr[1088] = (melt_ptr_t) & cdat->dstr_920__CLASS_INITIALROU; cdat->dstr_920__CLASS_INITIALROU.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_920__CLASS_INITIALROU.val, "CLASS_INITIALROUTINEOBJ", sizeof (cdat->dstr_920__CLASS_INITIALROU. val) - 1); cdat->dstr_920__CLASS_INITIALROU.val[23] = (char) 0; cdat->dstr_920__CLASS_INITIALROU.slen = 23; /*inimult dtup_921__CLASS_INITIALROUTINEOBJ */ /*_.VALTUP___V1090*/ meltfptr[1089] = (melt_ptr_t) & cdat->dtup_921__CLASS_INITIALROUTINEOBJ; cdat->dtup_921__CLASS_INITIALROUTINEOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_921__CLASS_INITIALROUTINEOBJ.nbval = 4; /*inimult dtup_922__CLASS_INITIALROUTINEOBJ */ /*_.VALTUP___V1097*/ meltfptr[1096] = (melt_ptr_t) & cdat->dtup_922__CLASS_INITIALROUTINEOBJ; cdat->dtup_922__CLASS_INITIALROUTINEOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_922__CLASS_INITIALROUTINEOBJ.nbval = 13; /*iniobj dsym_923__OIROUT_DATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V1098*/ meltfptr[1097]) /*_.VALDATA___V1098*/ meltfptr[1097] = (melt_ptr_t) & cdat->dsym_923__OIROUT_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_923__OIROUT_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__OIROUT_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_923__OIROUT_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_923__OIROUT_DATA.obj_hash = 518220617; cdat->dsym_923__OIROUT_DATA.obj_len = 3; /*inistring dstr_924__OIROUT_DATA*/ /*_.VALSTR___V1099*/ meltfptr[1098] = (melt_ptr_t) & cdat->dstr_924__OIROUT_DATA; cdat->dstr_924__OIROUT_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_924__OIROUT_DATA.val, "OIROUT_DATA", sizeof (cdat->dstr_924__OIROUT_DATA.val) - 1); cdat->dstr_924__OIROUT_DATA.val[11] = (char) 0; cdat->dstr_924__OIROUT_DATA.slen = 11; /*^iniobj */ /*iniobj dobj_925__OIROUT_DATA*/ /*_.VALDATA___V1091*/ meltfptr[1090] = (melt_ptr_t) & cdat->dobj_925__OIROUT_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_925__OIROUT_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__OIROUT_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_925__OIROUT_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_925__OIROUT_DATA.obj_num = 10; cdat->dobj_925__OIROUT_DATA.obj_hash = 361090113; cdat->dobj_925__OIROUT_DATA.obj_len = 4; /*inistring dstr_926__OIROUT_DATA*/ /*_.VALSTR___V1092*/ meltfptr[1091] = (melt_ptr_t) & cdat->dstr_926__OIROUT_DATA; cdat->dstr_926__OIROUT_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_926__OIROUT_DATA.val, "OIROUT_DATA", sizeof (cdat->dstr_926__OIROUT_DATA.val) - 1); cdat->dstr_926__OIROUT_DATA.val[11] = (char) 0; cdat->dstr_926__OIROUT_DATA.slen = 11; /*iniobj dsym_927__OIROUT_PROLOG*/ /*uniqueobj*/ if (! /*_.VALDATA___V1100*/ meltfptr[1099]) /*_.VALDATA___V1100*/ meltfptr[1099] = (melt_ptr_t) & cdat->dsym_927__OIROUT_PROLOG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_927__OIROUT_PROLOG", melt_magic_discr ((melt_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__OIROUT_PROLOG", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_927__OIROUT_PROLOG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_927__OIROUT_PROLOG.obj_hash = 441114313; cdat->dsym_927__OIROUT_PROLOG.obj_len = 3; /*inistring dstr_928__OIROUT_PROLOG*/ /*_.VALSTR___V1101*/ meltfptr[1100] = (melt_ptr_t) & cdat->dstr_928__OIROUT_PROLOG; cdat->dstr_928__OIROUT_PROLOG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_928__OIROUT_PROLOG.val, "OIROUT_PROLOG", sizeof (cdat->dstr_928__OIROUT_PROLOG.val) - 1); cdat->dstr_928__OIROUT_PROLOG.val[13] = (char) 0; cdat->dstr_928__OIROUT_PROLOG.slen = 13; /*^iniobj */ /*iniobj dobj_929__OIROUT_PROLOG*/ /*_.VALDATA___V1093*/ meltfptr[1092] = (melt_ptr_t) & cdat->dobj_929__OIROUT_PROLOG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_929__OIROUT_PROLOG", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_929__OIROUT_PROLOG", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_929__OIROUT_PROLOG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_929__OIROUT_PROLOG.obj_num = 11; cdat->dobj_929__OIROUT_PROLOG.obj_hash = 229052854; cdat->dobj_929__OIROUT_PROLOG.obj_len = 4; /*inistring dstr_930__OIROUT_PROLOG*/ /*_.VALSTR___V1094*/ meltfptr[1093] = (melt_ptr_t) & cdat->dstr_930__OIROUT_PROLOG; cdat->dstr_930__OIROUT_PROLOG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_930__OIROUT_PROLOG.val, "OIROUT_PROLOG", sizeof (cdat->dstr_930__OIROUT_PROLOG.val) - 1); cdat->dstr_930__OIROUT_PROLOG.val[13] = (char) 0; cdat->dstr_930__OIROUT_PROLOG.slen = 13; /*iniobj dsym_931__OIROUT_FILL*/ /*uniqueobj*/ if (! /*_.VALDATA___V1102*/ meltfptr[1101]) /*_.VALDATA___V1102*/ meltfptr[1101] = (melt_ptr_t) & cdat->dsym_931__OIROUT_FILL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_931__OIROUT_FILL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_931__OIROUT_FILL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_931__OIROUT_FILL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_931__OIROUT_FILL.obj_hash = 857346910; cdat->dsym_931__OIROUT_FILL.obj_len = 3; /*inistring dstr_932__OIROUT_FILL*/ /*_.VALSTR___V1103*/ meltfptr[1102] = (melt_ptr_t) & cdat->dstr_932__OIROUT_FILL; cdat->dstr_932__OIROUT_FILL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_932__OIROUT_FILL.val, "OIROUT_FILL", sizeof (cdat->dstr_932__OIROUT_FILL.val) - 1); cdat->dstr_932__OIROUT_FILL.val[11] = (char) 0; cdat->dstr_932__OIROUT_FILL.slen = 11; /*^iniobj */ /*iniobj dobj_933__OIROUT_FILL*/ /*_.VALDATA___V1095*/ meltfptr[1094] = (melt_ptr_t) & cdat->dobj_933__OIROUT_FILL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_933__OIROUT_FILL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_933__OIROUT_FILL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_933__OIROUT_FILL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_933__OIROUT_FILL.obj_num = 12; cdat->dobj_933__OIROUT_FILL.obj_hash = 676909420; cdat->dobj_933__OIROUT_FILL.obj_len = 4; /*inistring dstr_934__OIROUT_FILL*/ /*_.VALSTR___V1096*/ meltfptr[1095] = (melt_ptr_t) & cdat->dstr_934__OIROUT_FILL; cdat->dstr_934__OIROUT_FILL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_934__OIROUT_FILL.val, "OIROUT_FILL", sizeof (cdat->dstr_934__OIROUT_FILL.val) - 1); cdat->dstr_934__OIROUT_FILL.val[11] = (char) 0; cdat->dstr_934__OIROUT_FILL.slen = 11; /*iniobj dsym_935__CLASS_INITIAL_MODULE_ROUTINEOBJ*/ /*uniqueobj*/ if (! /*_.VALDATA___V1104*/ meltfptr[1103]) /*_.VALDATA___V1104*/ meltfptr[1103] = (melt_ptr_t) & cdat->dsym_935__CLASS_INITIAL_MODULE_ROUTINEOBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_935__CLASS_INITIAL_MODULE_ROUTINEOBJ", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_935__CLASS_INITIAL_MODULE_ROUTINEOBJ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_935__CLASS_INITIAL_MODULE_ROUTINEOBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_935__CLASS_INITIAL_MODULE_ROUTINEOBJ.obj_hash = 633261830; cdat->dsym_935__CLASS_INITIAL_MODULE_ROUTINEOBJ.obj_len = 3; /*inistring dstr_936__CLASS_INITIAL_MO*/ /*_.VALSTR___V1105*/ meltfptr[1104] = (melt_ptr_t) & cdat->dstr_936__CLASS_INITIAL_MO; cdat->dstr_936__CLASS_INITIAL_MO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_936__CLASS_INITIAL_MO.val, "CLASS_INITIAL_MODULE_ROUTINEOBJ", sizeof (cdat->dstr_936__CLASS_INITIAL_MO. val) - 1); cdat->dstr_936__CLASS_INITIAL_MO.val[31] = (char) 0; cdat->dstr_936__CLASS_INITIAL_MO.slen = 31; MELT_LOCATION ("warmelt-genobj.melt:575:/ iniobj"); /*iniobj dobj_937__CLASS_INITIAL_MODULE_ROUTINEOBJ*/ /*_.VALDATA___V1106*/ meltfptr[1105] = (melt_ptr_t) & cdat->dobj_937__CLASS_INITIAL_MODULE_ROUTINEOBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_937__CLASS_INITIAL_MODULE_ROUTINEOBJ", 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_937__CLASS_INITIAL_MODULE_ROUTINEOBJ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_937__CLASS_INITIAL_MODULE_ROUTINEOBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_937__CLASS_INITIAL_MODULE_ROUTINEOBJ.obj_num = MELTOBMAG_OBJECT; cdat->dobj_937__CLASS_INITIAL_MODULE_ROUTINEOBJ.obj_hash = 143341692; cdat->dobj_937__CLASS_INITIAL_MODULE_ROUTINEOBJ.obj_len = 8; /*inistring dstr_938__CLASS_INITIAL_MO*/ /*_.VALSTR___V1107*/ meltfptr[1106] = (melt_ptr_t) & cdat->dstr_938__CLASS_INITIAL_MO; cdat->dstr_938__CLASS_INITIAL_MO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_938__CLASS_INITIAL_MO.val, "CLASS_INITIAL_MODULE_ROUTINEOBJ", sizeof (cdat->dstr_938__CLASS_INITIAL_MO. val) - 1); cdat->dstr_938__CLASS_INITIAL_MO.val[31] = (char) 0; cdat->dstr_938__CLASS_INITIAL_MO.slen = 31; /*inimult dtup_939__CLASS_INITIAL_MODULE_ROUTINEOBJ */ /*_.VALTUP___V1108*/ meltfptr[1107] = (melt_ptr_t) & cdat->dtup_939__CLASS_INITIAL_MODULE_ROUTINEOBJ; cdat->dtup_939__CLASS_INITIAL_MODULE_ROUTINEOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_939__CLASS_INITIAL_MODULE_ROUTINEOBJ.nbval = 5; /*inimult dtup_940__CLASS_INITIAL_MODULE_ROUTINEOBJ */ /*_.VALTUP___V1111*/ meltfptr[1110] = (melt_ptr_t) & cdat->dtup_940__CLASS_INITIAL_MODULE_ROUTINEOBJ; cdat->dtup_940__CLASS_INITIAL_MODULE_ROUTINEOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_940__CLASS_INITIAL_MODULE_ROUTINEOBJ.nbval = 14; /*iniobj dsym_941__OIROUT_MODULENAME*/ /*uniqueobj*/ if (! /*_.VALDATA___V1112*/ meltfptr[1111]) /*_.VALDATA___V1112*/ meltfptr[1111] = (melt_ptr_t) & cdat->dsym_941__OIROUT_MODULENAME; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_941__OIROUT_MODULENAME", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_941__OIROUT_MODULENAME", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_941__OIROUT_MODULENAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_941__OIROUT_MODULENAME.obj_hash = 786315647; cdat->dsym_941__OIROUT_MODULENAME.obj_len = 3; /*inistring dstr_942__OIROUT_MODULENAM*/ /*_.VALSTR___V1113*/ meltfptr[1112] = (melt_ptr_t) & cdat->dstr_942__OIROUT_MODULENAM; cdat->dstr_942__OIROUT_MODULENAM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_942__OIROUT_MODULENAM.val, "OIROUT_MODULENAME", sizeof (cdat->dstr_942__OIROUT_MODULENAM. val) - 1); cdat->dstr_942__OIROUT_MODULENAM.val[17] = (char) 0; cdat->dstr_942__OIROUT_MODULENAM.slen = 17; /*^iniobj */ /*iniobj dobj_943__OIROUT_MODULENAME*/ /*_.VALDATA___V1109*/ meltfptr[1108] = (melt_ptr_t) & cdat->dobj_943__OIROUT_MODULENAME; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_943__OIROUT_MODULENAME", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_943__OIROUT_MODULENAME", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_943__OIROUT_MODULENAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_943__OIROUT_MODULENAME.obj_num = 13; cdat->dobj_943__OIROUT_MODULENAME.obj_hash = 243400662; cdat->dobj_943__OIROUT_MODULENAME.obj_len = 4; /*inistring dstr_944__OIROUT_MODULENAM*/ /*_.VALSTR___V1110*/ meltfptr[1109] = (melt_ptr_t) & cdat->dstr_944__OIROUT_MODULENAM; cdat->dstr_944__OIROUT_MODULENAM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_944__OIROUT_MODULENAM.val, "OIROUT_MODULENAME", sizeof (cdat->dstr_944__OIROUT_MODULENAM. val) - 1); cdat->dstr_944__OIROUT_MODULENAM.val[17] = (char) 0; cdat->dstr_944__OIROUT_MODULENAM.slen = 17; /*iniobj dsym_945__CLASS_INITIAL_EXTENSION_ROUTINEOBJ*/ /*uniqueobj*/ if (! /*_.VALDATA___V1114*/ meltfptr[1113]) /*_.VALDATA___V1114*/ meltfptr[1113] = (melt_ptr_t) & cdat->dsym_945__CLASS_INITIAL_EXTENSION_ROUTINEOBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_945__CLASS_INITIAL_EXTENSION_ROUTINEOBJ", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_945__CLASS_INITIAL_EXTENSION_ROUTINEOBJ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_945__CLASS_INITIAL_EXTENSION_ROUTINEOBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_945__CLASS_INITIAL_EXTENSION_ROUTINEOBJ.obj_hash = 1011209043; cdat->dsym_945__CLASS_INITIAL_EXTENSION_ROUTINEOBJ.obj_len = 3; /*inistring dstr_946__CLASS_INITIAL_EX*/ /*_.VALSTR___V1115*/ meltfptr[1114] = (melt_ptr_t) & cdat->dstr_946__CLASS_INITIAL_EX; cdat->dstr_946__CLASS_INITIAL_EX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_946__CLASS_INITIAL_EX.val, "CLASS_INITIAL_EXTENSION_ROUTINEOBJ", sizeof (cdat->dstr_946__CLASS_INITIAL_EX. val) - 1); cdat->dstr_946__CLASS_INITIAL_EX.val[34] = (char) 0; cdat->dstr_946__CLASS_INITIAL_EX.slen = 34; MELT_LOCATION ("warmelt-genobj.melt:582:/ iniobj"); /*iniobj dobj_947__CLASS_INITIAL_EXTENSION_ROUTINEOBJ*/ /*_.VALDATA___V1116*/ meltfptr[1115] = (melt_ptr_t) & cdat->dobj_947__CLASS_INITIAL_EXTENSION_ROUTINEOBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_947__CLASS_INITIAL_EXTENSION_ROUTINEOBJ", 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_947__CLASS_INITIAL_EXTENSION_ROUTINEOBJ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_947__CLASS_INITIAL_EXTENSION_ROUTINEOBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_947__CLASS_INITIAL_EXTENSION_ROUTINEOBJ.obj_num = MELTOBMAG_OBJECT; cdat->dobj_947__CLASS_INITIAL_EXTENSION_ROUTINEOBJ.obj_hash = 438139200; cdat->dobj_947__CLASS_INITIAL_EXTENSION_ROUTINEOBJ.obj_len = 8; /*inistring dstr_948__CLASS_INITIAL_EX*/ /*_.VALSTR___V1117*/ meltfptr[1116] = (melt_ptr_t) & cdat->dstr_948__CLASS_INITIAL_EX; cdat->dstr_948__CLASS_INITIAL_EX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_948__CLASS_INITIAL_EX.val, "CLASS_INITIAL_EXTENSION_ROUTINEOBJ", sizeof (cdat->dstr_948__CLASS_INITIAL_EX. val) - 1); cdat->dstr_948__CLASS_INITIAL_EX.val[34] = (char) 0; cdat->dstr_948__CLASS_INITIAL_EX.slen = 34; /*inimult dtup_949__CLASS_INITIAL_EXTENSION_ROUTINEOBJ */ /*_.VALTUP___V1118*/ meltfptr[1117] = (melt_ptr_t) & cdat->dtup_949__CLASS_INITIAL_EXTENSION_ROUTINEOBJ; cdat->dtup_949__CLASS_INITIAL_EXTENSION_ROUTINEOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_949__CLASS_INITIAL_EXTENSION_ROUTINEOBJ.nbval = 5; /*inimult dtup_950__CLASS_INITIAL_EXTENSION_ROUTINEOBJ */ /*_.VALTUP___V1121*/ meltfptr[1120] = (melt_ptr_t) & cdat->dtup_950__CLASS_INITIAL_EXTENSION_ROUTINEOBJ; cdat->dtup_950__CLASS_INITIAL_EXTENSION_ROUTINEOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_950__CLASS_INITIAL_EXTENSION_ROUTINEOBJ.nbval = 14; /*iniobj dsym_951__OIROUTX_EXTENDNAME*/ /*uniqueobj*/ if (! /*_.VALDATA___V1122*/ meltfptr[1121]) /*_.VALDATA___V1122*/ meltfptr[1121] = (melt_ptr_t) & cdat->dsym_951__OIROUTX_EXTENDNAME; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_951__OIROUTX_EXTENDNAME", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_951__OIROUTX_EXTENDNAME", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_951__OIROUTX_EXTENDNAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_951__OIROUTX_EXTENDNAME.obj_hash = 509182485; cdat->dsym_951__OIROUTX_EXTENDNAME.obj_len = 3; /*inistring dstr_952__OIROUTX_EXTENDNA*/ /*_.VALSTR___V1123*/ meltfptr[1122] = (melt_ptr_t) & cdat->dstr_952__OIROUTX_EXTENDNA; cdat->dstr_952__OIROUTX_EXTENDNA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_952__OIROUTX_EXTENDNA.val, "OIROUTX_EXTENDNAME", sizeof (cdat->dstr_952__OIROUTX_EXTENDNA. val) - 1); cdat->dstr_952__OIROUTX_EXTENDNA.val[18] = (char) 0; cdat->dstr_952__OIROUTX_EXTENDNA.slen = 18; /*^iniobj */ /*iniobj dobj_953__OIROUTX_EXTENDNAME*/ /*_.VALDATA___V1119*/ meltfptr[1118] = (melt_ptr_t) & cdat->dobj_953__OIROUTX_EXTENDNAME; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_953__OIROUTX_EXTENDNAME", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_953__OIROUTX_EXTENDNAME", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_953__OIROUTX_EXTENDNAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_953__OIROUTX_EXTENDNAME.obj_num = 13; cdat->dobj_953__OIROUTX_EXTENDNAME.obj_hash = 1072661831; cdat->dobj_953__OIROUTX_EXTENDNAME.obj_len = 4; /*inistring dstr_954__OIROUTX_EXTENDNA*/ /*_.VALSTR___V1120*/ meltfptr[1119] = (melt_ptr_t) & cdat->dstr_954__OIROUTX_EXTENDNA; cdat->dstr_954__OIROUTX_EXTENDNA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_954__OIROUTX_EXTENDNA.val, "OIROUTX_EXTENDNAME", sizeof (cdat->dstr_954__OIROUTX_EXTENDNA. val) - 1); cdat->dstr_954__OIROUTX_EXTENDNA.val[18] = (char) 0; cdat->dstr_954__OIROUTX_EXTENDNA.slen = 18; /*iniobj dsym_955__CLASS_OBJBLOCK*/ /*uniqueobj*/ if (! /*_.VALDATA___V1124*/ meltfptr[1123]) /*_.VALDATA___V1124*/ meltfptr[1123] = (melt_ptr_t) & cdat->dsym_955__CLASS_OBJBLOCK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_955__CLASS_OBJBLOCK", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_955__CLASS_OBJBLOCK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_955__CLASS_OBJBLOCK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_955__CLASS_OBJBLOCK.obj_hash = 827902126; cdat->dsym_955__CLASS_OBJBLOCK.obj_len = 3; /*inistring dstr_956__CLASS_OBJBLOCK*/ /*_.VALSTR___V1125*/ meltfptr[1124] = (melt_ptr_t) & cdat->dstr_956__CLASS_OBJBLOCK; cdat->dstr_956__CLASS_OBJBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_956__CLASS_OBJBLOCK.val, "CLASS_OBJBLOCK", sizeof (cdat->dstr_956__CLASS_OBJBLOCK.val) - 1); cdat->dstr_956__CLASS_OBJBLOCK.val[14] = (char) 0; cdat->dstr_956__CLASS_OBJBLOCK.slen = 14; /*iniobj dsym_957__CLASS_OBJCHECKINTERRUPT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1126*/ meltfptr[1125]) /*_.VALDATA___V1126*/ meltfptr[1125] = (melt_ptr_t) & cdat->dsym_957__CLASS_OBJCHECKINTERRUPT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_957__CLASS_OBJCHECKINTERRUPT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_957__CLASS_OBJCHECKINTERRUPT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_957__CLASS_OBJCHECKINTERRUPT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_957__CLASS_OBJCHECKINTERRUPT.obj_hash = 387948052; cdat->dsym_957__CLASS_OBJCHECKINTERRUPT.obj_len = 3; /*inistring dstr_958__CLASS_OBJCHECKIN*/ /*_.VALSTR___V1127*/ meltfptr[1126] = (melt_ptr_t) & cdat->dstr_958__CLASS_OBJCHECKIN; cdat->dstr_958__CLASS_OBJCHECKIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_958__CLASS_OBJCHECKIN.val, "CLASS_OBJCHECKINTERRUPT", sizeof (cdat->dstr_958__CLASS_OBJCHECKIN. val) - 1); cdat->dstr_958__CLASS_OBJCHECKIN.val[23] = (char) 0; cdat->dstr_958__CLASS_OBJCHECKIN.slen = 23; /*inirout drout_959__MAKE_OBJLOCATEDEXP */ /*_.VALROUT___V1128*/ meltfptr[1127] = (melt_ptr_t) & cdat->drout_959__MAKE_OBJLOCATEDEXP; cdat->drout_959__MAKE_OBJLOCATEDEXP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_959__MAKE_OBJLOCATEDEXP.routdescr, "MAKE_OBJLOCATEDEXP @warmelt-genobj.melt:674", MELT_ROUTDESCR_LEN - 1); cdat->drout_959__MAKE_OBJLOCATEDEXP.nbval = 11; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_959__MAKE_OBJLOCATEDEXP, meltrout_1_warmelt_genobj_MAKE_OBJLOCATEDEXP); /*iniclos dclo_960__MAKE_OBJLOCATEDEXP */ /*_.VALCLO___V1129*/ meltfptr[1128] = (melt_ptr_t) & cdat->dclo_960__MAKE_OBJLOCATEDEXP; cdat->dclo_960__MAKE_OBJLOCATEDEXP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_960__MAKE_OBJLOCATEDEXP.nbval = 0; /*iniobj dsym_961__MELT_DEBUG_FUN*/ /*uniqueobj*/ if (! /*_.VALDATA___V1130*/ meltfptr[1129]) /*_.VALDATA___V1130*/ meltfptr[1129] = (melt_ptr_t) & cdat->dsym_961__MELT_DEBUG_FUN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_961__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_961__MELT_DEBUG_FUN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_961__MELT_DEBUG_FUN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_961__MELT_DEBUG_FUN.obj_hash = 972123377; cdat->dsym_961__MELT_DEBUG_FUN.obj_len = 3; /*inistring dstr_962__MELT_DEBUG_FUN*/ /*_.VALSTR___V1131*/ meltfptr[1130] = (melt_ptr_t) & cdat->dstr_962__MELT_DEBUG_FUN; cdat->dstr_962__MELT_DEBUG_FUN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_962__MELT_DEBUG_FUN.val, "MELT_DEBUG_FUN", sizeof (cdat->dstr_962__MELT_DEBUG_FUN.val) - 1); cdat->dstr_962__MELT_DEBUG_FUN.val[14] = (char) 0; cdat->dstr_962__MELT_DEBUG_FUN.slen = 14; /*iniobj dsym_963__DISCR_MIXED_INTEGER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1132*/ meltfptr[1131]) /*_.VALDATA___V1132*/ meltfptr[1131] = (melt_ptr_t) & cdat->dsym_963__DISCR_MIXED_INTEGER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_963__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_963__DISCR_MIXED_INTEGER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_963__DISCR_MIXED_INTEGER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_963__DISCR_MIXED_INTEGER.obj_hash = 355248820; cdat->dsym_963__DISCR_MIXED_INTEGER.obj_len = 3; /*inistring dstr_964__DISCR_MIXED_INTE*/ /*_.VALSTR___V1133*/ meltfptr[1132] = (melt_ptr_t) & cdat->dstr_964__DISCR_MIXED_INTE; cdat->dstr_964__DISCR_MIXED_INTE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_964__DISCR_MIXED_INTE.val, "DISCR_MIXED_INTEGER", sizeof (cdat->dstr_964__DISCR_MIXED_INTE. val) - 1); cdat->dstr_964__DISCR_MIXED_INTE.val[19] = (char) 0; cdat->dstr_964__DISCR_MIXED_INTE.slen = 19; /*iniobj dsym_965__DISCR_MIXED_LOCATION*/ /*uniqueobj*/ if (! /*_.VALDATA___V1134*/ meltfptr[1133]) /*_.VALDATA___V1134*/ meltfptr[1133] = (melt_ptr_t) & cdat->dsym_965__DISCR_MIXED_LOCATION; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_965__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_965__DISCR_MIXED_LOCATION", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_965__DISCR_MIXED_LOCATION.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_965__DISCR_MIXED_LOCATION.obj_hash = 1019373807; cdat->dsym_965__DISCR_MIXED_LOCATION.obj_len = 3; /*inistring dstr_966__DISCR_MIXED_LOCA*/ /*_.VALSTR___V1135*/ meltfptr[1134] = (melt_ptr_t) & cdat->dstr_966__DISCR_MIXED_LOCA; cdat->dstr_966__DISCR_MIXED_LOCA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_966__DISCR_MIXED_LOCA.val, "DISCR_MIXED_LOCATION", sizeof (cdat->dstr_966__DISCR_MIXED_LOCA. val) - 1); cdat->dstr_966__DISCR_MIXED_LOCA.val[20] = (char) 0; cdat->dstr_966__DISCR_MIXED_LOCA.slen = 20; /*iniobj dsym_967__CLASS_CTYPE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1136*/ meltfptr[1135]) /*_.VALDATA___V1136*/ meltfptr[1135] = (melt_ptr_t) & cdat->dsym_967__CLASS_CTYPE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_967__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_967__CLASS_CTYPE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_967__CLASS_CTYPE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_967__CLASS_CTYPE.obj_hash = 78610803; cdat->dsym_967__CLASS_CTYPE.obj_len = 3; /*inistring dstr_968__CLASS_CTYPE*/ /*_.VALSTR___V1137*/ meltfptr[1136] = (melt_ptr_t) & cdat->dstr_968__CLASS_CTYPE; cdat->dstr_968__CLASS_CTYPE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_968__CLASS_CTYPE.val, "CLASS_CTYPE", sizeof (cdat->dstr_968__CLASS_CTYPE.val) - 1); cdat->dstr_968__CLASS_CTYPE.val[11] = (char) 0; cdat->dstr_968__CLASS_CTYPE.slen = 11; /*iniobj dsym_969__DISCR_LIST*/ /*uniqueobj*/ if (! /*_.VALDATA___V1138*/ meltfptr[1137]) /*_.VALDATA___V1138*/ meltfptr[1137] = (melt_ptr_t) & cdat->dsym_969__DISCR_LIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_969__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_969__DISCR_LIST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_969__DISCR_LIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_969__DISCR_LIST.obj_hash = 98407634; cdat->dsym_969__DISCR_LIST.obj_len = 3; /*inistring dstr_970__DISCR_LIST*/ /*_.VALSTR___V1139*/ meltfptr[1138] = (melt_ptr_t) & cdat->dstr_970__DISCR_LIST; cdat->dstr_970__DISCR_LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_970__DISCR_LIST.val, "DISCR_LIST", sizeof (cdat->dstr_970__DISCR_LIST.val) - 1); cdat->dstr_970__DISCR_LIST.val[10] = (char) 0; cdat->dstr_970__DISCR_LIST.slen = 10; /*iniobj dsym_971__DISCR_CONSTANT_INTEGER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1140*/ meltfptr[1139]) /*_.VALDATA___V1140*/ meltfptr[1139] = (melt_ptr_t) & cdat->dsym_971__DISCR_CONSTANT_INTEGER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_971__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_971__DISCR_CONSTANT_INTEGER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_971__DISCR_CONSTANT_INTEGER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_971__DISCR_CONSTANT_INTEGER.obj_hash = 1007078494; cdat->dsym_971__DISCR_CONSTANT_INTEGER.obj_len = 3; /*inistring dstr_972__DISCR_CONSTANT_I*/ /*_.VALSTR___V1141*/ meltfptr[1140] = (melt_ptr_t) & cdat->dstr_972__DISCR_CONSTANT_I; cdat->dstr_972__DISCR_CONSTANT_I.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_972__DISCR_CONSTANT_I.val, "DISCR_CONSTANT_INTEGER", sizeof (cdat->dstr_972__DISCR_CONSTANT_I. val) - 1); cdat->dstr_972__DISCR_CONSTANT_I.val[22] = (char) 0; cdat->dstr_972__DISCR_CONSTANT_I.slen = 22; /*iniobj dsym_973__DISCR_VERBATIM_STRING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1142*/ meltfptr[1141]) /*_.VALDATA___V1142*/ meltfptr[1141] = (melt_ptr_t) & cdat->dsym_973__DISCR_VERBATIM_STRING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_973__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_973__DISCR_VERBATIM_STRING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_973__DISCR_VERBATIM_STRING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_973__DISCR_VERBATIM_STRING.obj_hash = 258402049; cdat->dsym_973__DISCR_VERBATIM_STRING.obj_len = 3; /*inistring dstr_974__DISCR_VERBATIM_S*/ /*_.VALSTR___V1143*/ meltfptr[1142] = (melt_ptr_t) & cdat->dstr_974__DISCR_VERBATIM_S; cdat->dstr_974__DISCR_VERBATIM_S.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_974__DISCR_VERBATIM_S.val, "DISCR_VERBATIM_STRING", sizeof (cdat->dstr_974__DISCR_VERBATIM_S. val) - 1); cdat->dstr_974__DISCR_VERBATIM_S.val[21] = (char) 0; cdat->dstr_974__DISCR_VERBATIM_S.slen = 21; /*iniobj dsym_975__LIST_APPEND2LIST*/ /*uniqueobj*/ if (! /*_.VALDATA___V1144*/ meltfptr[1143]) /*_.VALDATA___V1144*/ meltfptr[1143] = (melt_ptr_t) & cdat->dsym_975__LIST_APPEND2LIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_975__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_975__LIST_APPEND2LIST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_975__LIST_APPEND2LIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_975__LIST_APPEND2LIST.obj_hash = 744841630; cdat->dsym_975__LIST_APPEND2LIST.obj_len = 3; /*inistring dstr_976__LIST_APPEND2LIST*/ /*_.VALSTR___V1145*/ meltfptr[1144] = (melt_ptr_t) & cdat->dstr_976__LIST_APPEND2LIST; cdat->dstr_976__LIST_APPEND2LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_976__LIST_APPEND2LIST.val, "LIST_APPEND2LIST", sizeof (cdat->dstr_976__LIST_APPEND2LIST. val) - 1); cdat->dstr_976__LIST_APPEND2LIST.val[16] = (char) 0; cdat->dstr_976__LIST_APPEND2LIST.slen = 16; /*iniobj dsym_977__LIST_TO_MULTIPLE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1146*/ meltfptr[1145]) /*_.VALDATA___V1146*/ meltfptr[1145] = (melt_ptr_t) & cdat->dsym_977__LIST_TO_MULTIPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_977__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_977__LIST_TO_MULTIPLE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_977__LIST_TO_MULTIPLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_977__LIST_TO_MULTIPLE.obj_hash = 987171205; cdat->dsym_977__LIST_TO_MULTIPLE.obj_len = 3; /*inistring dstr_978__LIST_TO_MULTIPLE*/ /*_.VALSTR___V1147*/ meltfptr[1146] = (melt_ptr_t) & cdat->dstr_978__LIST_TO_MULTIPLE; cdat->dstr_978__LIST_TO_MULTIPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_978__LIST_TO_MULTIPLE.val, "LIST_TO_MULTIPLE", sizeof (cdat->dstr_978__LIST_TO_MULTIPLE. val) - 1); cdat->dstr_978__LIST_TO_MULTIPLE.val[16] = (char) 0; cdat->dstr_978__LIST_TO_MULTIPLE.slen = 16; /*iniobj dsym_979__DISCR_MULTIPLE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1148*/ meltfptr[1147]) /*_.VALDATA___V1148*/ meltfptr[1147] = (melt_ptr_t) & cdat->dsym_979__DISCR_MULTIPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_979__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_979__DISCR_MULTIPLE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_979__DISCR_MULTIPLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_979__DISCR_MULTIPLE.obj_hash = 91864583; cdat->dsym_979__DISCR_MULTIPLE.obj_len = 3; /*inistring dstr_980__DISCR_MULTIPLE*/ /*_.VALSTR___V1149*/ meltfptr[1148] = (melt_ptr_t) & cdat->dstr_980__DISCR_MULTIPLE; cdat->dstr_980__DISCR_MULTIPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_980__DISCR_MULTIPLE.val, "DISCR_MULTIPLE", sizeof (cdat->dstr_980__DISCR_MULTIPLE.val) - 1); cdat->dstr_980__DISCR_MULTIPLE.val[14] = (char) 0; cdat->dstr_980__DISCR_MULTIPLE.slen = 14; /*inirout drout_981__MAKE_OBJCOMPUTE */ /*_.VALROUT___V1150*/ meltfptr[1149] = (melt_ptr_t) & cdat->drout_981__MAKE_OBJCOMPUTE; cdat->drout_981__MAKE_OBJCOMPUTE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_981__MAKE_OBJCOMPUTE.routdescr, "MAKE_OBJCOMPUTE @warmelt-genobj.melt:720", MELT_ROUTDESCR_LEN - 1); cdat->drout_981__MAKE_OBJCOMPUTE.nbval = 10; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_981__MAKE_OBJCOMPUTE, meltrout_2_warmelt_genobj_MAKE_OBJCOMPUTE); /*iniclos dclo_982__MAKE_OBJCOMPUTE */ /*_.VALCLO___V1151*/ meltfptr[1150] = (melt_ptr_t) & cdat->dclo_982__MAKE_OBJCOMPUTE; cdat->dclo_982__MAKE_OBJCOMPUTE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_982__MAKE_OBJCOMPUTE.nbval = 0; /*inirout drout_983__MAKE_OBJEXPANDPUREVAL */ /*_.VALROUT___V1152*/ meltfptr[1151] = (melt_ptr_t) & cdat->drout_983__MAKE_OBJEXPANDPUREVAL; cdat->drout_983__MAKE_OBJEXPANDPUREVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_983__MAKE_OBJEXPANDPUREVAL.routdescr, "MAKE_OBJEXPANDPUREVAL @warmelt-genobj.melt:767", MELT_ROUTDESCR_LEN - 1); cdat->drout_983__MAKE_OBJEXPANDPUREVAL.nbval = 11; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_983__MAKE_OBJEXPANDPUREVAL, meltrout_3_warmelt_genobj_MAKE_OBJEXPANDPUREVAL); /*iniclos dclo_984__MAKE_OBJEXPANDPUREVAL */ /*_.VALCLO___V1153*/ meltfptr[1152] = (melt_ptr_t) & cdat->dclo_984__MAKE_OBJEXPANDPUREVAL; cdat->dclo_984__MAKE_OBJEXPANDPUREVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_984__MAKE_OBJEXPANDPUREVAL.nbval = 0; /*iniobj dsym_985__CTYPE_VOID*/ /*uniqueobj*/ if (! /*_.VALDATA___V1154*/ meltfptr[1153]) /*_.VALDATA___V1154*/ meltfptr[1153] = (melt_ptr_t) & cdat->dsym_985__CTYPE_VOID; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_985__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_985__CTYPE_VOID", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_985__CTYPE_VOID.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_985__CTYPE_VOID.obj_hash = 94242002; cdat->dsym_985__CTYPE_VOID.obj_len = 3; /*inistring dstr_986__CTYPE_VOID*/ /*_.VALSTR___V1155*/ meltfptr[1154] = (melt_ptr_t) & cdat->dstr_986__CTYPE_VOID; cdat->dstr_986__CTYPE_VOID.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_986__CTYPE_VOID.val, "CTYPE_VOID", sizeof (cdat->dstr_986__CTYPE_VOID.val) - 1); cdat->dstr_986__CTYPE_VOID.val[10] = (char) 0; cdat->dstr_986__CTYPE_VOID.slen = 10; /*iniobj dsym_987__OUTPUT_C_DECLINIT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1156*/ meltfptr[1155]) /*_.VALDATA___V1156*/ meltfptr[1155] = (melt_ptr_t) & cdat->dsym_987__OUTPUT_C_DECLINIT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_987__OUTPUT_C_DECLINIT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_987__OUTPUT_C_DECLINIT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_987__OUTPUT_C_DECLINIT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_987__OUTPUT_C_DECLINIT.obj_hash = 1046624755; cdat->dsym_987__OUTPUT_C_DECLINIT.obj_len = 3; /*inistring dstr_988__OUTPUT_C_DECLINI*/ /*_.VALSTR___V1157*/ meltfptr[1156] = (melt_ptr_t) & cdat->dstr_988__OUTPUT_C_DECLINI; cdat->dstr_988__OUTPUT_C_DECLINI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_988__OUTPUT_C_DECLINI.val, "OUTPUT_C_DECLINIT", sizeof (cdat->dstr_988__OUTPUT_C_DECLINI. val) - 1); cdat->dstr_988__OUTPUT_C_DECLINI.val[17] = (char) 0; cdat->dstr_988__OUTPUT_C_DECLINI.slen = 17; /*iniobj dsym_989__CLASS_SELECTOR*/ /*uniqueobj*/ if (! /*_.VALDATA___V1158*/ meltfptr[1157]) /*_.VALDATA___V1158*/ meltfptr[1157] = (melt_ptr_t) & cdat->dsym_989__CLASS_SELECTOR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_989__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_989__CLASS_SELECTOR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_989__CLASS_SELECTOR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_989__CLASS_SELECTOR.obj_hash = 100646971; cdat->dsym_989__CLASS_SELECTOR.obj_len = 3; /*inistring dstr_990__CLASS_SELECTOR*/ /*_.VALSTR___V1159*/ meltfptr[1158] = (melt_ptr_t) & cdat->dstr_990__CLASS_SELECTOR; cdat->dstr_990__CLASS_SELECTOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_990__CLASS_SELECTOR.val, "CLASS_SELECTOR", sizeof (cdat->dstr_990__CLASS_SELECTOR.val) - 1); cdat->dstr_990__CLASS_SELECTOR.val[14] = (char) 0; cdat->dstr_990__CLASS_SELECTOR.slen = 14; /*iniobj dsym_991__RECV*/ /*uniqueobj*/ if (! /*_.VALDATA___V1160*/ meltfptr[1159]) /*_.VALDATA___V1160*/ meltfptr[1159] = (melt_ptr_t) & cdat->dsym_991__RECV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_991__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_991__RECV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_991__RECV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_991__RECV.obj_hash = 10842790; cdat->dsym_991__RECV.obj_len = 3; /*inistring dstr_992__RECV*/ /*_.VALSTR___V1161*/ meltfptr[1160] = (melt_ptr_t) & cdat->dstr_992__RECV; cdat->dstr_992__RECV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_992__RECV.val, "RECV", sizeof (cdat->dstr_992__RECV.val) - 1); cdat->dstr_992__RECV.val[4] = (char) 0; cdat->dstr_992__RECV.slen = 4; MELT_LOCATION ("warmelt-genobj.melt:819:/ iniobj"); /*iniobj dobj_993*/ /*_.VALDATA___V1162*/ meltfptr[1161] = (melt_ptr_t) & cdat->dobj_993; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_993", 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_993", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_993.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_993.obj_num = 0; cdat->dobj_993.obj_hash = 845643099; cdat->dobj_993.obj_len = 2; /*iniobj dsym_994__SBUF*/ /*uniqueobj*/ if (! /*_.VALDATA___V1163*/ meltfptr[1162]) /*_.VALDATA___V1163*/ meltfptr[1162] = (melt_ptr_t) & cdat->dsym_994__SBUF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_994__SBUF", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_994__SBUF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_994__SBUF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_994__SBUF.obj_hash = 120431958; cdat->dsym_994__SBUF.obj_len = 3; /*inistring dstr_995__SBUF*/ /*_.VALSTR___V1164*/ meltfptr[1163] = (melt_ptr_t) & cdat->dstr_995__SBUF; cdat->dstr_995__SBUF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_995__SBUF.val, "SBUF", sizeof (cdat->dstr_995__SBUF.val) - 1); cdat->dstr_995__SBUF.val[4] = (char) 0; cdat->dstr_995__SBUF.slen = 4; /*^iniobj */ /*iniobj dobj_996*/ /*_.VALDATA___V1165*/ meltfptr[1164] = (melt_ptr_t) & cdat->dobj_996; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_996", 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_996", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_996.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_996.obj_num = 1; cdat->dobj_996.obj_hash = 97832440; cdat->dobj_996.obj_len = 2; /*inimult dtup_997__OUTPUT_C_DECLINIT */ /*_.VALTUP___V1166*/ meltfptr[1165] = (melt_ptr_t) & cdat->dtup_997__OUTPUT_C_DECLINIT; cdat->dtup_997__OUTPUT_C_DECLINIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_MULTIPLE)))); cdat->dtup_997__OUTPUT_C_DECLINIT.nbval = 2; /*^iniobj */ /*iniobj dobj_998__OUTPUT_C_DECLINIT*/ /*_.VALDATA___V1167*/ meltfptr[1166] = (melt_ptr_t) & cdat->dobj_998__OUTPUT_C_DECLINIT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_998__OUTPUT_C_DECLINIT", 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_998__OUTPUT_C_DECLINIT", ((meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V20*/ meltfptr[19]))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_998__OUTPUT_C_DECLINIT.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V20*/ meltfptr[19]); cdat->dobj_998__OUTPUT_C_DECLINIT.obj_hash = 439397983; cdat->dobj_998__OUTPUT_C_DECLINIT.obj_len = 4; /*inistring dstr_999__OUTPUT_C_DECLINI*/ /*_.VALSTR___V1168*/ meltfptr[1167] = (melt_ptr_t) & cdat->dstr_999__OUTPUT_C_DECLINI; cdat->dstr_999__OUTPUT_C_DECLINI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_999__OUTPUT_C_DECLINI.val, "OUTPUT_C_DECLINIT", sizeof (cdat->dstr_999__OUTPUT_C_DECLINI. val) - 1); cdat->dstr_999__OUTPUT_C_DECLINI.val[17] = (char) 0; cdat->dstr_999__OUTPUT_C_DECLINI.slen = 17; /*iniobj dsym_1000__PUT_OBJDEST*/ /*uniqueobj*/ if (! /*_.VALDATA___V1169*/ meltfptr[1168]) /*_.VALDATA___V1169*/ meltfptr[1168] = (melt_ptr_t) & cdat->dsym_1000__PUT_OBJDEST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1000__PUT_OBJDEST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1000__PUT_OBJDEST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1000__PUT_OBJDEST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1000__PUT_OBJDEST.obj_hash = 830731085; cdat->dsym_1000__PUT_OBJDEST.obj_len = 3; /*inistring dstr_1001__PUT_OBJDEST*/ /*_.VALSTR___V1170*/ meltfptr[1169] = (melt_ptr_t) & cdat->dstr_1001__PUT_OBJDEST; cdat->dstr_1001__PUT_OBJDEST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1001__PUT_OBJDEST.val, "PUT_OBJDEST", sizeof (cdat->dstr_1001__PUT_OBJDEST.val) - 1); cdat->dstr_1001__PUT_OBJDEST.val[11] = (char) 0; cdat->dstr_1001__PUT_OBJDEST.slen = 11; MELT_LOCATION ("warmelt-genobj.melt:830:/ iniobj"); /*iniobj dobj_1002__PUT_OBJDEST*/ /*_.VALDATA___V1171*/ meltfptr[1170] = (melt_ptr_t) & cdat->dobj_1002__PUT_OBJDEST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1002__PUT_OBJDEST", 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_1002__PUT_OBJDEST", ((meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V20*/ meltfptr[19]))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1002__PUT_OBJDEST.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V20*/ meltfptr[19]); cdat->dobj_1002__PUT_OBJDEST.obj_hash = 124540502; cdat->dobj_1002__PUT_OBJDEST.obj_len = 4; /*inistring dstr_1003__PUT_OBJDEST*/ /*_.VALSTR___V1172*/ meltfptr[1171] = (melt_ptr_t) & cdat->dstr_1003__PUT_OBJDEST; cdat->dstr_1003__PUT_OBJDEST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1003__PUT_OBJDEST.val, "PUT_OBJDEST", sizeof (cdat->dstr_1003__PUT_OBJDEST.val) - 1); cdat->dstr_1003__PUT_OBJDEST.val[11] = (char) 0; cdat->dstr_1003__PUT_OBJDEST.slen = 11; /*iniobj dsym_1004__OUTPUT_C_CODE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1173*/ meltfptr[1172]) /*_.VALDATA___V1173*/ meltfptr[1172] = (melt_ptr_t) & cdat->dsym_1004__OUTPUT_C_CODE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1004__OUTPUT_C_CODE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1004__OUTPUT_C_CODE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1004__OUTPUT_C_CODE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1004__OUTPUT_C_CODE.obj_hash = 137415526; cdat->dsym_1004__OUTPUT_C_CODE.obj_len = 3; /*inistring dstr_1005__OUTPUT_C_CODE*/ /*_.VALSTR___V1174*/ meltfptr[1173] = (melt_ptr_t) & cdat->dstr_1005__OUTPUT_C_CODE; cdat->dstr_1005__OUTPUT_C_CODE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1005__OUTPUT_C_CODE.val, "OUTPUT_C_CODE", sizeof (cdat->dstr_1005__OUTPUT_C_CODE.val) - 1); cdat->dstr_1005__OUTPUT_C_CODE.val[13] = (char) 0; cdat->dstr_1005__OUTPUT_C_CODE.slen = 13; MELT_LOCATION ("warmelt-genobj.melt:841:/ iniobj"); /*iniobj dobj_1006*/ /*_.VALDATA___V1175*/ meltfptr[1174] = (melt_ptr_t) & cdat->dobj_1006; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1006", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1006", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1006.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1006.obj_num = 0; cdat->dobj_1006.obj_hash = 711672093; cdat->dobj_1006.obj_len = 2; /*iniobj dsym_1007__DECLBUF*/ /*uniqueobj*/ if (! /*_.VALDATA___V1176*/ meltfptr[1175]) /*_.VALDATA___V1176*/ meltfptr[1175] = (melt_ptr_t) & cdat->dsym_1007__DECLBUF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1007__DECLBUF", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1007__DECLBUF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1007__DECLBUF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1007__DECLBUF.obj_hash = 666270403; cdat->dsym_1007__DECLBUF.obj_len = 3; /*inistring dstr_1008__DECLBUF*/ /*_.VALSTR___V1177*/ meltfptr[1176] = (melt_ptr_t) & cdat->dstr_1008__DECLBUF; cdat->dstr_1008__DECLBUF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1008__DECLBUF.val, "DECLBUF", sizeof (cdat->dstr_1008__DECLBUF.val) - 1); cdat->dstr_1008__DECLBUF.val[7] = (char) 0; cdat->dstr_1008__DECLBUF.slen = 7; /*^iniobj */ /*iniobj dobj_1009*/ /*_.VALDATA___V1178*/ meltfptr[1177] = (melt_ptr_t) & cdat->dobj_1009; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1009", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1009", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1009.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1009.obj_num = 1; cdat->dobj_1009.obj_hash = 496042551; cdat->dobj_1009.obj_len = 2; /*iniobj dsym_1010__IMPLBUF*/ /*uniqueobj*/ if (! /*_.VALDATA___V1179*/ meltfptr[1178]) /*_.VALDATA___V1179*/ meltfptr[1178] = (melt_ptr_t) & cdat->dsym_1010__IMPLBUF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1010__IMPLBUF", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1010__IMPLBUF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1010__IMPLBUF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1010__IMPLBUF.obj_hash = 60972773; cdat->dsym_1010__IMPLBUF.obj_len = 3; /*inistring dstr_1011__IMPLBUF*/ /*_.VALSTR___V1180*/ meltfptr[1179] = (melt_ptr_t) & cdat->dstr_1011__IMPLBUF; cdat->dstr_1011__IMPLBUF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1011__IMPLBUF.val, "IMPLBUF", sizeof (cdat->dstr_1011__IMPLBUF.val) - 1); cdat->dstr_1011__IMPLBUF.val[7] = (char) 0; cdat->dstr_1011__IMPLBUF.slen = 7; /*^iniobj */ /*iniobj dobj_1012*/ /*_.VALDATA___V1181*/ meltfptr[1180] = (melt_ptr_t) & cdat->dobj_1012; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1012", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1012", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1012.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1012.obj_num = 2; cdat->dobj_1012.obj_hash = 839774408; cdat->dobj_1012.obj_len = 2; /*iniobj dsym_1013__DEPTH*/ /*uniqueobj*/ if (! /*_.VALDATA___V1182*/ meltfptr[1181]) /*_.VALDATA___V1182*/ meltfptr[1181] = (melt_ptr_t) & cdat->dsym_1013__DEPTH; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1013__DEPTH", melt_magic_discr ((melt_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__DEPTH", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1013__DEPTH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1013__DEPTH.obj_hash = 52029444; cdat->dsym_1013__DEPTH.obj_len = 3; /*inistring dstr_1014__DEPTH*/ /*_.VALSTR___V1183*/ meltfptr[1182] = (melt_ptr_t) & cdat->dstr_1014__DEPTH; cdat->dstr_1014__DEPTH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1014__DEPTH.val, "DEPTH", sizeof (cdat->dstr_1014__DEPTH.val) - 1); cdat->dstr_1014__DEPTH.val[5] = (char) 0; cdat->dstr_1014__DEPTH.slen = 5; /*^iniobj */ /*iniobj dobj_1015*/ /*_.VALDATA___V1184*/ meltfptr[1183] = (melt_ptr_t) & cdat->dobj_1015; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1015", 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_1015", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1015.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1015.obj_num = 3; cdat->dobj_1015.obj_hash = 480120286; cdat->dobj_1015.obj_len = 2; /*inimult dtup_1016__OUTPUT_C_CODE */ /*_.VALTUP___V1185*/ meltfptr[1184] = (melt_ptr_t) & cdat->dtup_1016__OUTPUT_C_CODE; cdat->dtup_1016__OUTPUT_C_CODE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_MULTIPLE)))); cdat->dtup_1016__OUTPUT_C_CODE.nbval = 4; /*^iniobj */ /*iniobj dobj_1017__OUTPUT_C_CODE*/ /*_.VALDATA___V1186*/ meltfptr[1185] = (melt_ptr_t) & cdat->dobj_1017__OUTPUT_C_CODE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1017__OUTPUT_C_CODE", 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_1017__OUTPUT_C_CODE", ((meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V20*/ meltfptr[19]))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1017__OUTPUT_C_CODE.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V20*/ meltfptr[19]); cdat->dobj_1017__OUTPUT_C_CODE.obj_hash = 294437853; cdat->dobj_1017__OUTPUT_C_CODE.obj_len = 4; /*inistring dstr_1018__OUTPUT_C_CODE*/ /*_.VALSTR___V1187*/ meltfptr[1186] = (melt_ptr_t) & cdat->dstr_1018__OUTPUT_C_CODE; cdat->dstr_1018__OUTPUT_C_CODE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1018__OUTPUT_C_CODE.val, "OUTPUT_C_CODE", sizeof (cdat->dstr_1018__OUTPUT_C_CODE.val) - 1); cdat->dstr_1018__OUTPUT_C_CODE.val[13] = (char) 0; cdat->dstr_1018__OUTPUT_C_CODE.slen = 13; /*iniobj dsym_1019__OUTPUT_C_INITIAL_FILL*/ /*uniqueobj*/ if (! /*_.VALDATA___V1188*/ meltfptr[1187]) /*_.VALDATA___V1188*/ meltfptr[1187] = (melt_ptr_t) & cdat->dsym_1019__OUTPUT_C_INITIAL_FILL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1019__OUTPUT_C_INITIAL_FILL", melt_magic_discr ((melt_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__OUTPUT_C_INITIAL_FILL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1019__OUTPUT_C_INITIAL_FILL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1019__OUTPUT_C_INITIAL_FILL.obj_hash = 494706160; cdat->dsym_1019__OUTPUT_C_INITIAL_FILL.obj_len = 3; /*inistring dstr_1020__OUTPUT_C_INITIAL*/ /*_.VALSTR___V1189*/ meltfptr[1188] = (melt_ptr_t) & cdat->dstr_1020__OUTPUT_C_INITIAL; cdat->dstr_1020__OUTPUT_C_INITIAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1020__OUTPUT_C_INITIAL.val, "OUTPUT_C_INITIAL_FILL", sizeof (cdat->dstr_1020__OUTPUT_C_INITIAL. val) - 1); cdat->dstr_1020__OUTPUT_C_INITIAL.val[21] = (char) 0; cdat->dstr_1020__OUTPUT_C_INITIAL.slen = 21; MELT_LOCATION ("warmelt-genobj.melt:852:/ iniobj"); /*iniobj dobj_1021*/ /*_.VALDATA___V1190*/ meltfptr[1189] = (melt_ptr_t) & cdat->dobj_1021; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1021", 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_1021", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1021.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1021.obj_num = 0; cdat->dobj_1021.obj_hash = 624390881; cdat->dobj_1021.obj_len = 2; /*^iniobj */ /*iniobj dobj_1022*/ /*_.VALDATA___V1191*/ meltfptr[1190] = (melt_ptr_t) & cdat->dobj_1022; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1022", 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_1022", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1022.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1022.obj_num = 1; cdat->dobj_1022.obj_hash = 870591916; cdat->dobj_1022.obj_len = 2; /*iniobj dsym_1023__PTRSTR*/ /*uniqueobj*/ if (! /*_.VALDATA___V1192*/ meltfptr[1191]) /*_.VALDATA___V1192*/ meltfptr[1191] = (melt_ptr_t) & cdat->dsym_1023__PTRSTR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1023__PTRSTR", melt_magic_discr ((melt_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__PTRSTR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1023__PTRSTR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1023__PTRSTR.obj_hash = 663318532; cdat->dsym_1023__PTRSTR.obj_len = 3; /*inistring dstr_1024__PTRSTR*/ /*_.VALSTR___V1193*/ meltfptr[1192] = (melt_ptr_t) & cdat->dstr_1024__PTRSTR; cdat->dstr_1024__PTRSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1024__PTRSTR.val, "PTRSTR", sizeof (cdat->dstr_1024__PTRSTR.val) - 1); cdat->dstr_1024__PTRSTR.val[6] = (char) 0; cdat->dstr_1024__PTRSTR.slen = 6; /*^iniobj */ /*iniobj dobj_1025*/ /*_.VALDATA___V1194*/ meltfptr[1193] = (melt_ptr_t) & cdat->dobj_1025; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1025", 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_1025", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1025.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1025.obj_num = 2; cdat->dobj_1025.obj_hash = 417090753; cdat->dobj_1025.obj_len = 2; /*^iniobj */ /*iniobj dobj_1026*/ /*_.VALDATA___V1195*/ meltfptr[1194] = (melt_ptr_t) & cdat->dobj_1026; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1026", 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_1026", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1026.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1026.obj_num = 3; cdat->dobj_1026.obj_hash = 210078333; cdat->dobj_1026.obj_len = 2; /*inimult dtup_1027__OUTPUT_C_INITIAL_FILL */ /*_.VALTUP___V1196*/ meltfptr[1195] = (melt_ptr_t) & cdat->dtup_1027__OUTPUT_C_INITIAL_FILL; cdat->dtup_1027__OUTPUT_C_INITIAL_FILL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_MULTIPLE)))); cdat->dtup_1027__OUTPUT_C_INITIAL_FILL.nbval = 4; /*^iniobj */ /*iniobj dobj_1028__OUTPUT_C_INITIAL_FILL*/ /*_.VALDATA___V1197*/ meltfptr[1196] = (melt_ptr_t) & cdat->dobj_1028__OUTPUT_C_INITIAL_FILL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1028__OUTPUT_C_INITIAL_FILL", 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_1028__OUTPUT_C_INITIAL_FILL", ((meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V20*/ meltfptr[19]))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1028__OUTPUT_C_INITIAL_FILL.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V20*/ meltfptr[19]); cdat->dobj_1028__OUTPUT_C_INITIAL_FILL.obj_hash = 382272253; cdat->dobj_1028__OUTPUT_C_INITIAL_FILL.obj_len = 4; /*inistring dstr_1029__OUTPUT_C_INITIAL*/ /*_.VALSTR___V1198*/ meltfptr[1197] = (melt_ptr_t) & cdat->dstr_1029__OUTPUT_C_INITIAL; cdat->dstr_1029__OUTPUT_C_INITIAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1029__OUTPUT_C_INITIAL.val, "OUTPUT_C_INITIAL_FILL", sizeof (cdat->dstr_1029__OUTPUT_C_INITIAL. val) - 1); cdat->dstr_1029__OUTPUT_C_INITIAL.val[21] = (char) 0; cdat->dstr_1029__OUTPUT_C_INITIAL.slen = 21; /*iniobj dsym_1030__OUTPUT_C_INITIAL_PREDEF*/ /*uniqueobj*/ if (! /*_.VALDATA___V1199*/ meltfptr[1198]) /*_.VALDATA___V1199*/ meltfptr[1198] = (melt_ptr_t) & cdat->dsym_1030__OUTPUT_C_INITIAL_PREDEF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1030__OUTPUT_C_INITIAL_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_1030__OUTPUT_C_INITIAL_PREDEF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1030__OUTPUT_C_INITIAL_PREDEF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1030__OUTPUT_C_INITIAL_PREDEF.obj_hash = 431855229; cdat->dsym_1030__OUTPUT_C_INITIAL_PREDEF.obj_len = 3; /*inistring dstr_1031__OUTPUT_C_INITIAL*/ /*_.VALSTR___V1200*/ meltfptr[1199] = (melt_ptr_t) & cdat->dstr_1031__OUTPUT_C_INITIAL; cdat->dstr_1031__OUTPUT_C_INITIAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1031__OUTPUT_C_INITIAL.val, "OUTPUT_C_INITIAL_PREDEF", sizeof (cdat->dstr_1031__OUTPUT_C_INITIAL. val) - 1); cdat->dstr_1031__OUTPUT_C_INITIAL.val[23] = (char) 0; cdat->dstr_1031__OUTPUT_C_INITIAL.slen = 23; MELT_LOCATION ("warmelt-genobj.melt:863:/ iniobj"); /*iniobj dobj_1032*/ /*_.VALDATA___V1201*/ meltfptr[1200] = (melt_ptr_t) & cdat->dobj_1032; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1032", 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_1032", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1032.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1032.obj_num = 0; cdat->dobj_1032.obj_hash = 927545946; cdat->dobj_1032.obj_len = 2; /*^iniobj */ /*iniobj dobj_1033*/ /*_.VALDATA___V1202*/ meltfptr[1201] = (melt_ptr_t) & cdat->dobj_1033; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1033", 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_1033", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1033.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1033.obj_num = 1; cdat->dobj_1033.obj_hash = 1046291980; cdat->dobj_1033.obj_len = 2; /*iniobj dsym_1034__PRTRSTR*/ /*uniqueobj*/ if (! /*_.VALDATA___V1203*/ meltfptr[1202]) /*_.VALDATA___V1203*/ meltfptr[1202] = (melt_ptr_t) & cdat->dsym_1034__PRTRSTR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1034__PRTRSTR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1034__PRTRSTR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1034__PRTRSTR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1034__PRTRSTR.obj_hash = 983955331; cdat->dsym_1034__PRTRSTR.obj_len = 3; /*inistring dstr_1035__PRTRSTR*/ /*_.VALSTR___V1204*/ meltfptr[1203] = (melt_ptr_t) & cdat->dstr_1035__PRTRSTR; cdat->dstr_1035__PRTRSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1035__PRTRSTR.val, "PRTRSTR", sizeof (cdat->dstr_1035__PRTRSTR.val) - 1); cdat->dstr_1035__PRTRSTR.val[7] = (char) 0; cdat->dstr_1035__PRTRSTR.slen = 7; /*^iniobj */ /*iniobj dobj_1036*/ /*_.VALDATA___V1205*/ meltfptr[1204] = (melt_ptr_t) & cdat->dobj_1036; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1036", 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_1036", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1036.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1036.obj_num = 2; cdat->dobj_1036.obj_hash = 127936730; cdat->dobj_1036.obj_len = 2; /*^iniobj */ /*iniobj dobj_1037*/ /*_.VALDATA___V1206*/ meltfptr[1205] = (melt_ptr_t) & cdat->dobj_1037; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1037", 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_1037", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1037.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1037.obj_num = 3; cdat->dobj_1037.obj_hash = 560309370; cdat->dobj_1037.obj_len = 2; /*inimult dtup_1038__OUTPUT_C_INITIAL_PREDEF */ /*_.VALTUP___V1207*/ meltfptr[1206] = (melt_ptr_t) & cdat->dtup_1038__OUTPUT_C_INITIAL_PREDEF; cdat->dtup_1038__OUTPUT_C_INITIAL_PREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_MULTIPLE)))); cdat->dtup_1038__OUTPUT_C_INITIAL_PREDEF.nbval = 4; /*^iniobj */ /*iniobj dobj_1039__OUTPUT_C_INITIAL_PREDEF*/ /*_.VALDATA___V1208*/ meltfptr[1207] = (melt_ptr_t) & cdat->dobj_1039__OUTPUT_C_INITIAL_PREDEF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1039__OUTPUT_C_INITIAL_PREDEF", 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_1039__OUTPUT_C_INITIAL_PREDEF", ((meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V20*/ meltfptr[19]))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1039__OUTPUT_C_INITIAL_PREDEF.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V20*/ meltfptr[19]); cdat->dobj_1039__OUTPUT_C_INITIAL_PREDEF.obj_hash = 931377959; cdat->dobj_1039__OUTPUT_C_INITIAL_PREDEF.obj_len = 4; /*inistring dstr_1040__OUTPUT_C_INITIAL*/ /*_.VALSTR___V1209*/ meltfptr[1208] = (melt_ptr_t) & cdat->dstr_1040__OUTPUT_C_INITIAL; cdat->dstr_1040__OUTPUT_C_INITIAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1040__OUTPUT_C_INITIAL.val, "OUTPUT_C_INITIAL_PREDEF", sizeof (cdat->dstr_1040__OUTPUT_C_INITIAL. val) - 1); cdat->dstr_1040__OUTPUT_C_INITIAL.val[23] = (char) 0; cdat->dstr_1040__OUTPUT_C_INITIAL.slen = 23; /*iniobj dsym_1041__MAKE_OBJEXPANDPUREVAL*/ /*uniqueobj*/ if (! /*_.VALDATA___V1210*/ meltfptr[1209]) /*_.VALDATA___V1210*/ meltfptr[1209] = (melt_ptr_t) & cdat->dsym_1041__MAKE_OBJEXPANDPUREVAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1041__MAKE_OBJEXPANDPUREVAL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1041__MAKE_OBJEXPANDPUREVAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1041__MAKE_OBJEXPANDPUREVAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1041__MAKE_OBJEXPANDPUREVAL.obj_hash = 1025908143; cdat->dsym_1041__MAKE_OBJEXPANDPUREVAL.obj_len = 3; /*inistring dstr_1042__MAKE_OBJEXPANDPU*/ /*_.VALSTR___V1211*/ meltfptr[1210] = (melt_ptr_t) & cdat->dstr_1042__MAKE_OBJEXPANDPU; cdat->dstr_1042__MAKE_OBJEXPANDPU.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1042__MAKE_OBJEXPANDPU.val, "MAKE_OBJEXPANDPUREVAL", sizeof (cdat->dstr_1042__MAKE_OBJEXPANDPU. val) - 1); cdat->dstr_1042__MAKE_OBJEXPANDPU.val[21] = (char) 0; cdat->dstr_1042__MAKE_OBJEXPANDPU.slen = 21; /*inirout drout_1043__COMPILOBJ_CATCHALL_NREP */ /*_.VALROUT___V1212*/ meltfptr[1211] = (melt_ptr_t) & cdat->drout_1043__COMPILOBJ_CATCHALL_NREP; cdat->drout_1043__COMPILOBJ_CATCHALL_NREP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1043__COMPILOBJ_CATCHALL_NREP.routdescr, "COMPILOBJ_CATCHALL_NREP @warmelt-genobj.melt:879", MELT_ROUTDESCR_LEN - 1); cdat->drout_1043__COMPILOBJ_CATCHALL_NREP.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1043__COMPILOBJ_CATCHALL_NREP, meltrout_4_warmelt_genobj_COMPILOBJ_CATCHALL_NREP); /*iniclos dclo_1044__COMPILOBJ_CATCHALL_NREP */ /*_.VALCLO___V1213*/ meltfptr[1212] = (melt_ptr_t) & cdat->dclo_1044__COMPILOBJ_CATCHALL_NREP; cdat->dclo_1044__COMPILOBJ_CATCHALL_NREP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1044__COMPILOBJ_CATCHALL_NREP.nbval = 0; /*iniobj dsym_1045__INSTALL_METHOD*/ /*uniqueobj*/ if (! /*_.VALDATA___V1214*/ meltfptr[1213]) /*_.VALDATA___V1214*/ meltfptr[1213] = (melt_ptr_t) & cdat->dsym_1045__INSTALL_METHOD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1045__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_1045__INSTALL_METHOD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1045__INSTALL_METHOD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1045__INSTALL_METHOD.obj_hash = 680699224; cdat->dsym_1045__INSTALL_METHOD.obj_len = 3; /*inistring dstr_1046__INSTALL_METHOD*/ /*_.VALSTR___V1215*/ meltfptr[1214] = (melt_ptr_t) & cdat->dstr_1046__INSTALL_METHOD; cdat->dstr_1046__INSTALL_METHOD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1046__INSTALL_METHOD.val, "INSTALL_METHOD", sizeof (cdat->dstr_1046__INSTALL_METHOD.val) - 1); cdat->dstr_1046__INSTALL_METHOD.val[14] = (char) 0; cdat->dstr_1046__INSTALL_METHOD.slen = 14; /*iniobj dsym_1047__CLASS_NREP*/ /*uniqueobj*/ if (! /*_.VALDATA___V1216*/ meltfptr[1215]) /*_.VALDATA___V1216*/ meltfptr[1215] = (melt_ptr_t) & cdat->dsym_1047__CLASS_NREP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1047__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_1047__CLASS_NREP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1047__CLASS_NREP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1047__CLASS_NREP.obj_hash = 704846736; cdat->dsym_1047__CLASS_NREP.obj_len = 3; /*inistring dstr_1048__CLASS_NREP*/ /*_.VALSTR___V1217*/ meltfptr[1216] = (melt_ptr_t) & cdat->dstr_1048__CLASS_NREP; cdat->dstr_1048__CLASS_NREP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1048__CLASS_NREP.val, "CLASS_NREP", sizeof (cdat->dstr_1048__CLASS_NREP.val) - 1); cdat->dstr_1048__CLASS_NREP.val[10] = (char) 0; cdat->dstr_1048__CLASS_NREP.slen = 10; /*iniobj dsym_1049__COMPILE_OBJ*/ /*uniqueobj*/ if (! /*_.VALDATA___V1218*/ meltfptr[1217]) /*_.VALDATA___V1218*/ meltfptr[1217] = (melt_ptr_t) & cdat->dsym_1049__COMPILE_OBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1049__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_1049__COMPILE_OBJ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1049__COMPILE_OBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1049__COMPILE_OBJ.obj_hash = 749017560; cdat->dsym_1049__COMPILE_OBJ.obj_len = 3; /*inistring dstr_1050__COMPILE_OBJ*/ /*_.VALSTR___V1219*/ meltfptr[1218] = (melt_ptr_t) & cdat->dstr_1050__COMPILE_OBJ; cdat->dstr_1050__COMPILE_OBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1050__COMPILE_OBJ.val, "COMPILE_OBJ", sizeof (cdat->dstr_1050__COMPILE_OBJ.val) - 1); cdat->dstr_1050__COMPILE_OBJ.val[11] = (char) 0; cdat->dstr_1050__COMPILE_OBJ.slen = 11; /*inirout drout_1051__PUTOBJDEST_CATCHALL_OBJCODE */ /*_.VALROUT___V1220*/ meltfptr[1219] = (melt_ptr_t) & cdat->drout_1051__PUTOBJDEST_CATCHALL_OBJCODE; cdat->drout_1051__PUTOBJDEST_CATCHALL_OBJCODE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1051__PUTOBJDEST_CATCHALL_OBJCODE.routdescr, "PUTOBJDEST_CATCHALL_OBJCODE @warmelt-genobj.melt:889", MELT_ROUTDESCR_LEN - 1); cdat->drout_1051__PUTOBJDEST_CATCHALL_OBJCODE.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1051__PUTOBJDEST_CATCHALL_OBJCODE, meltrout_5_warmelt_genobj_PUTOBJDEST_CATCHALL_OBJCODE); /*iniclos dclo_1052__PUTOBJDEST_CATCHALL_OBJCODE */ /*_.VALCLO___V1221*/ meltfptr[1220] = (melt_ptr_t) & cdat->dclo_1052__PUTOBJDEST_CATCHALL_OBJCODE; cdat->dclo_1052__PUTOBJDEST_CATCHALL_OBJCODE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1052__PUTOBJDEST_CATCHALL_OBJCODE.nbval = 0; /*inirout drout_1053__PUTOBJDEST_CATCHALL_ANYDISCR */ /*_.VALROUT___V1222*/ meltfptr[1221] = (melt_ptr_t) & cdat->drout_1053__PUTOBJDEST_CATCHALL_ANYDISCR; cdat->drout_1053__PUTOBJDEST_CATCHALL_ANYDISCR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1053__PUTOBJDEST_CATCHALL_ANYDISCR.routdescr, "PUTOBJDEST_CATCHALL_ANYDISCR @warmelt-genobj.melt:900", MELT_ROUTDESCR_LEN - 1); cdat->drout_1053__PUTOBJDEST_CATCHALL_ANYDISCR.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1053__PUTOBJDEST_CATCHALL_ANYDISCR, meltrout_6_warmelt_genobj_PUTOBJDEST_CATCHALL_ANYDISCR); /*iniclos dclo_1054__PUTOBJDEST_CATCHALL_ANYDISCR */ /*_.VALCLO___V1223*/ meltfptr[1222] = (melt_ptr_t) & cdat->dclo_1054__PUTOBJDEST_CATCHALL_ANYDISCR; cdat->dclo_1054__PUTOBJDEST_CATCHALL_ANYDISCR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1054__PUTOBJDEST_CATCHALL_ANYDISCR.nbval = 0; /*iniobj dsym_1055__DISCR_ANY_RECEIVER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1224*/ meltfptr[1223]) /*_.VALDATA___V1224*/ meltfptr[1223] = (melt_ptr_t) & cdat->dsym_1055__DISCR_ANY_RECEIVER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1055__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_1055__DISCR_ANY_RECEIVER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1055__DISCR_ANY_RECEIVER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1055__DISCR_ANY_RECEIVER.obj_hash = 95947314; cdat->dsym_1055__DISCR_ANY_RECEIVER.obj_len = 3; /*inistring dstr_1056__DISCR_ANY_RECEIV*/ /*_.VALSTR___V1225*/ meltfptr[1224] = (melt_ptr_t) & cdat->dstr_1056__DISCR_ANY_RECEIV; cdat->dstr_1056__DISCR_ANY_RECEIV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1056__DISCR_ANY_RECEIV.val, "DISCR_ANY_RECEIVER", sizeof (cdat->dstr_1056__DISCR_ANY_RECEIV. val) - 1); cdat->dstr_1056__DISCR_ANY_RECEIV.val[18] = (char) 0; cdat->dstr_1056__DISCR_ANY_RECEIV.slen = 18; /*inirout drout_1057__GETCTYPE_OBJVALUE */ /*_.VALROUT___V1226*/ meltfptr[1225] = (melt_ptr_t) & cdat->drout_1057__GETCTYPE_OBJVALUE; cdat->drout_1057__GETCTYPE_OBJVALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1057__GETCTYPE_OBJVALUE.routdescr, "GETCTYPE_OBJVALUE @warmelt-genobj.melt:911", MELT_ROUTDESCR_LEN - 1); cdat->drout_1057__GETCTYPE_OBJVALUE.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1057__GETCTYPE_OBJVALUE, meltrout_7_warmelt_genobj_GETCTYPE_OBJVALUE); /*iniclos dclo_1058__GETCTYPE_OBJVALUE */ /*_.VALCLO___V1227*/ meltfptr[1226] = (melt_ptr_t) & cdat->dclo_1058__GETCTYPE_OBJVALUE; cdat->dclo_1058__GETCTYPE_OBJVALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1058__GETCTYPE_OBJVALUE.nbval = 0; /*iniobj dsym_1059__GET_CTYPE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1228*/ meltfptr[1227]) /*_.VALDATA___V1228*/ meltfptr[1227] = (melt_ptr_t) & cdat->dsym_1059__GET_CTYPE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1059__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_1059__GET_CTYPE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1059__GET_CTYPE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1059__GET_CTYPE.obj_hash = 747649571; cdat->dsym_1059__GET_CTYPE.obj_len = 3; /*inistring dstr_1060__GET_CTYPE*/ /*_.VALSTR___V1229*/ meltfptr[1228] = (melt_ptr_t) & cdat->dstr_1060__GET_CTYPE; cdat->dstr_1060__GET_CTYPE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1060__GET_CTYPE.val, "GET_CTYPE", sizeof (cdat->dstr_1060__GET_CTYPE.val) - 1); cdat->dstr_1060__GET_CTYPE.val[9] = (char) 0; cdat->dstr_1060__GET_CTYPE.slen = 9; /*inirout drout_1061__GECTYP_OBJNIL */ /*_.VALROUT___V1230*/ meltfptr[1229] = (melt_ptr_t) & cdat->drout_1061__GECTYP_OBJNIL; cdat->drout_1061__GECTYP_OBJNIL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1061__GECTYP_OBJNIL.routdescr, "GECTYP_OBJNIL @warmelt-genobj.melt:921", MELT_ROUTDESCR_LEN - 1); cdat->drout_1061__GECTYP_OBJNIL.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1061__GECTYP_OBJNIL, meltrout_8_warmelt_genobj_GECTYP_OBJNIL); /*iniclos dclo_1062__GECTYP_OBJNIL */ /*_.VALCLO___V1231*/ meltfptr[1230] = (melt_ptr_t) & cdat->dclo_1062__GECTYP_OBJNIL; cdat->dclo_1062__GECTYP_OBJNIL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1062__GECTYP_OBJNIL.nbval = 0; /*iniobj dsym_1063__CTYPE_VALUE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1232*/ meltfptr[1231]) /*_.VALDATA___V1232*/ meltfptr[1231] = (melt_ptr_t) & cdat->dsym_1063__CTYPE_VALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1063__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_1063__CTYPE_VALUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1063__CTYPE_VALUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1063__CTYPE_VALUE.obj_hash = 11062864; cdat->dsym_1063__CTYPE_VALUE.obj_len = 3; /*inistring dstr_1064__CTYPE_VALUE*/ /*_.VALSTR___V1233*/ meltfptr[1232] = (melt_ptr_t) & cdat->dstr_1064__CTYPE_VALUE; cdat->dstr_1064__CTYPE_VALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1064__CTYPE_VALUE.val, "CTYPE_VALUE", sizeof (cdat->dstr_1064__CTYPE_VALUE.val) - 1); cdat->dstr_1064__CTYPE_VALUE.val[11] = (char) 0; cdat->dstr_1064__CTYPE_VALUE.slen = 11; /*inirout drout_1065__GECTYP_OBJINITSTRING */ /*_.VALROUT___V1234*/ meltfptr[1233] = (melt_ptr_t) & cdat->drout_1065__GECTYP_OBJINITSTRING; cdat->drout_1065__GECTYP_OBJINITSTRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1065__GECTYP_OBJINITSTRING.routdescr, "GECTYP_OBJINITSTRING @warmelt-genobj.melt:927", MELT_ROUTDESCR_LEN - 1); cdat->drout_1065__GECTYP_OBJINITSTRING.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1065__GECTYP_OBJINITSTRING, meltrout_9_warmelt_genobj_GECTYP_OBJINITSTRING); /*iniclos dclo_1066__GECTYP_OBJINITSTRING */ /*_.VALCLO___V1235*/ meltfptr[1234] = (melt_ptr_t) & cdat->dclo_1066__GECTYP_OBJINITSTRING; cdat->dclo_1066__GECTYP_OBJINITSTRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1066__GECTYP_OBJINITSTRING.nbval = 0; /*inirout drout_1067__DBGOUT_ROUTINEOBJ */ /*_.VALROUT___V1236*/ meltfptr[1235] = (melt_ptr_t) & cdat->drout_1067__DBGOUT_ROUTINEOBJ; cdat->drout_1067__DBGOUT_ROUTINEOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1067__DBGOUT_ROUTINEOBJ.routdescr, "DBGOUT_ROUTINEOBJ @warmelt-genobj.melt:933", MELT_ROUTDESCR_LEN - 1); cdat->drout_1067__DBGOUT_ROUTINEOBJ.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1067__DBGOUT_ROUTINEOBJ, meltrout_10_warmelt_genobj_DBGOUT_ROUTINEOBJ); /*iniclos dclo_1068__DBGOUT_ROUTINEOBJ */ /*_.VALCLO___V1237*/ meltfptr[1236] = (melt_ptr_t) & cdat->dclo_1068__DBGOUT_ROUTINEOBJ; cdat->dclo_1068__DBGOUT_ROUTINEOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1068__DBGOUT_ROUTINEOBJ.nbval = 0; /*iniobj dsym_1069__DBGOUT_NAMEDOBJECT_METHOD*/ /*uniqueobj*/ if (! /*_.VALDATA___V1238*/ meltfptr[1237]) /*_.VALDATA___V1238*/ meltfptr[1237] = (melt_ptr_t) & cdat->dsym_1069__DBGOUT_NAMEDOBJECT_METHOD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1069__DBGOUT_NAMEDOBJECT_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_1069__DBGOUT_NAMEDOBJECT_METHOD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1069__DBGOUT_NAMEDOBJECT_METHOD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1069__DBGOUT_NAMEDOBJECT_METHOD.obj_hash = 359355803; cdat->dsym_1069__DBGOUT_NAMEDOBJECT_METHOD.obj_len = 3; /*inistring dstr_1070__DBGOUT_NAMEDOBJE*/ /*_.VALSTR___V1239*/ meltfptr[1238] = (melt_ptr_t) & cdat->dstr_1070__DBGOUT_NAMEDOBJE; cdat->dstr_1070__DBGOUT_NAMEDOBJE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1070__DBGOUT_NAMEDOBJE.val, "DBGOUT_NAMEDOBJECT_METHOD", sizeof (cdat->dstr_1070__DBGOUT_NAMEDOBJE. val) - 1); cdat->dstr_1070__DBGOUT_NAMEDOBJE.val[25] = (char) 0; cdat->dstr_1070__DBGOUT_NAMEDOBJE.slen = 25; /*iniobj dsym_1071__DBG_OUTPUT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1240*/ meltfptr[1239]) /*_.VALDATA___V1240*/ meltfptr[1239] = (melt_ptr_t) & cdat->dsym_1071__DBG_OUTPUT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1071__DBG_OUTPUT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1071__DBG_OUTPUT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1071__DBG_OUTPUT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1071__DBG_OUTPUT.obj_hash = 225394304; cdat->dsym_1071__DBG_OUTPUT.obj_len = 3; /*inistring dstr_1072__DBG_OUTPUT*/ /*_.VALSTR___V1241*/ meltfptr[1240] = (melt_ptr_t) & cdat->dstr_1072__DBG_OUTPUT; cdat->dstr_1072__DBG_OUTPUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1072__DBG_OUTPUT.val, "DBG_OUTPUT", sizeof (cdat->dstr_1072__DBG_OUTPUT.val) - 1); cdat->dstr_1072__DBG_OUTPUT.val[10] = (char) 0; cdat->dstr_1072__DBG_OUTPUT.slen = 10; /*inirout drout_1073__PUTOBJDEST_OBJDESTINSTR */ /*_.VALROUT___V1242*/ meltfptr[1241] = (melt_ptr_t) & cdat->drout_1073__PUTOBJDEST_OBJDESTINSTR; cdat->drout_1073__PUTOBJDEST_OBJDESTINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1073__PUTOBJDEST_OBJDESTINSTR.routdescr, "PUTOBJDEST_OBJDESTINSTR @warmelt-genobj.melt:941", MELT_ROUTDESCR_LEN - 1); cdat->drout_1073__PUTOBJDEST_OBJDESTINSTR.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1073__PUTOBJDEST_OBJDESTINSTR, meltrout_11_warmelt_genobj_PUTOBJDEST_OBJDESTINSTR); /*iniclos dclo_1074__PUTOBJDEST_OBJDESTINSTR */ /*_.VALCLO___V1243*/ meltfptr[1242] = (melt_ptr_t) & cdat->dclo_1074__PUTOBJDEST_OBJDESTINSTR; cdat->dclo_1074__PUTOBJDEST_OBJDESTINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1074__PUTOBJDEST_OBJDESTINSTR.nbval = 0; /*inirout drout_1075__PUTOBJDEST_OBJFINALRETURN */ /*_.VALROUT___V1244*/ meltfptr[1243] = (melt_ptr_t) & cdat->drout_1075__PUTOBJDEST_OBJFINALRETURN; cdat->drout_1075__PUTOBJDEST_OBJFINALRETURN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1075__PUTOBJDEST_OBJFINALRETURN.routdescr, "PUTOBJDEST_OBJFINALRETURN @warmelt-genobj.melt:977", MELT_ROUTDESCR_LEN - 1); cdat->drout_1075__PUTOBJDEST_OBJFINALRETURN.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1075__PUTOBJDEST_OBJFINALRETURN, meltrout_12_warmelt_genobj_PUTOBJDEST_OBJFINALRETURN); /*iniclos dclo_1076__PUTOBJDEST_OBJFINALRETURN */ /*_.VALCLO___V1245*/ meltfptr[1244] = (melt_ptr_t) & cdat->dclo_1076__PUTOBJDEST_OBJFINALRETURN; cdat->dclo_1076__PUTOBJDEST_OBJFINALRETURN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1076__PUTOBJDEST_OBJFINALRETURN.nbval = 0; /*inirout drout_1077__VARIADIC_IDSTR */ /*_.VALROUT___V1246*/ meltfptr[1245] = (melt_ptr_t) & cdat->drout_1077__VARIADIC_IDSTR; cdat->drout_1077__VARIADIC_IDSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1077__VARIADIC_IDSTR.routdescr, "VARIADIC_IDSTR @warmelt-genobj.melt:985", MELT_ROUTDESCR_LEN - 1); cdat->drout_1077__VARIADIC_IDSTR.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1077__VARIADIC_IDSTR, meltrout_13_warmelt_genobj_VARIADIC_IDSTR); /*iniclos dclo_1078__VARIADIC_IDSTR */ /*_.VALCLO___V1247*/ meltfptr[1246] = (melt_ptr_t) & cdat->dclo_1078__VARIADIC_IDSTR; cdat->dclo_1078__VARIADIC_IDSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1078__VARIADIC_IDSTR.nbval = 0; /*iniobj dsym_1079__AS_NULL*/ /*uniqueobj*/ if (! /*_.VALDATA___V1248*/ meltfptr[1247]) /*_.VALDATA___V1248*/ meltfptr[1247] = (melt_ptr_t) & cdat->dsym_1079__AS_NULL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1079__AS_NULL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1079__AS_NULL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1079__AS_NULL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1079__AS_NULL.obj_hash = 76542906; cdat->dsym_1079__AS_NULL.obj_len = 3; /*inistring dstr_1080__AS_NULL*/ /*_.VALSTR___V1249*/ meltfptr[1248] = (melt_ptr_t) & cdat->dstr_1080__AS_NULL; cdat->dstr_1080__AS_NULL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1080__AS_NULL.val, "AS_NULL", sizeof (cdat->dstr_1080__AS_NULL.val) - 1); cdat->dstr_1080__AS_NULL.val[7] = (char) 0; cdat->dstr_1080__AS_NULL.slen = 7; /*iniobj dsym_1081__CLASS_CLONED_SYMBOL*/ /*uniqueobj*/ if (! /*_.VALDATA___V1250*/ meltfptr[1249]) /*_.VALDATA___V1250*/ meltfptr[1249] = (melt_ptr_t) & cdat->dsym_1081__CLASS_CLONED_SYMBOL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1081__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_1081__CLASS_CLONED_SYMBOL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1081__CLASS_CLONED_SYMBOL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1081__CLASS_CLONED_SYMBOL.obj_hash = 933549728; cdat->dsym_1081__CLASS_CLONED_SYMBOL.obj_len = 3; /*inistring dstr_1082__CLASS_CLONED_SYM*/ /*_.VALSTR___V1251*/ meltfptr[1250] = (melt_ptr_t) & cdat->dstr_1082__CLASS_CLONED_SYM; cdat->dstr_1082__CLASS_CLONED_SYM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1082__CLASS_CLONED_SYM.val, "CLASS_CLONED_SYMBOL", sizeof (cdat->dstr_1082__CLASS_CLONED_SYM. val) - 1); cdat->dstr_1082__CLASS_CLONED_SYM.val[19] = (char) 0; cdat->dstr_1082__CLASS_CLONED_SYM.slen = 19; /*iniobj dsym_1083__INTEGERBOX_OF*/ /*uniqueobj*/ if (! /*_.VALDATA___V1252*/ meltfptr[1251]) /*_.VALDATA___V1252*/ meltfptr[1251] = (melt_ptr_t) & cdat->dsym_1083__INTEGERBOX_OF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1083__INTEGERBOX_OF", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1083__INTEGERBOX_OF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1083__INTEGERBOX_OF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1083__INTEGERBOX_OF.obj_hash = 641824224; cdat->dsym_1083__INTEGERBOX_OF.obj_len = 3; /*inistring dstr_1084__INTEGERBOX_OF*/ /*_.VALSTR___V1253*/ meltfptr[1252] = (melt_ptr_t) & cdat->dstr_1084__INTEGERBOX_OF; cdat->dstr_1084__INTEGERBOX_OF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1084__INTEGERBOX_OF.val, "INTEGERBOX_OF", sizeof (cdat->dstr_1084__INTEGERBOX_OF.val) - 1); cdat->dstr_1084__INTEGERBOX_OF.val[13] = (char) 0; cdat->dstr_1084__INTEGERBOX_OF.slen = 13; /*iniobj dsym_1085__DISCR_STRBUF*/ /*uniqueobj*/ if (! /*_.VALDATA___V1254*/ meltfptr[1253]) /*_.VALDATA___V1254*/ meltfptr[1253] = (melt_ptr_t) & cdat->dsym_1085__DISCR_STRBUF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1085__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_1085__DISCR_STRBUF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1085__DISCR_STRBUF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1085__DISCR_STRBUF.obj_hash = 492035674; cdat->dsym_1085__DISCR_STRBUF.obj_len = 3; /*inistring dstr_1086__DISCR_STRBUF*/ /*_.VALSTR___V1255*/ meltfptr[1254] = (melt_ptr_t) & cdat->dstr_1086__DISCR_STRBUF; cdat->dstr_1086__DISCR_STRBUF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1086__DISCR_STRBUF.val, "DISCR_STRBUF", sizeof (cdat->dstr_1086__DISCR_STRBUF.val) - 1); cdat->dstr_1086__DISCR_STRBUF.val[12] = (char) 0; cdat->dstr_1086__DISCR_STRBUF.slen = 12; /*iniobj dsym_1087__CLASS_SYMBOL*/ /*uniqueobj*/ if (! /*_.VALDATA___V1256*/ meltfptr[1255]) /*_.VALDATA___V1256*/ meltfptr[1255] = (melt_ptr_t) & cdat->dsym_1087__CLASS_SYMBOL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1087__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_1087__CLASS_SYMBOL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1087__CLASS_SYMBOL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1087__CLASS_SYMBOL.obj_hash = 53524182; cdat->dsym_1087__CLASS_SYMBOL.obj_len = 3; /*inistring dstr_1088__CLASS_SYMBOL*/ /*_.VALSTR___V1257*/ meltfptr[1256] = (melt_ptr_t) & cdat->dstr_1088__CLASS_SYMBOL; cdat->dstr_1088__CLASS_SYMBOL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1088__CLASS_SYMBOL.val, "CLASS_SYMBOL", sizeof (cdat->dstr_1088__CLASS_SYMBOL.val) - 1); cdat->dstr_1088__CLASS_SYMBOL.val[12] = (char) 0; cdat->dstr_1088__CLASS_SYMBOL.slen = 12; /*inirout drout_1089__VARIADIC_INDEX_IDSTR */ /*_.VALROUT___V1258*/ meltfptr[1257] = (melt_ptr_t) & cdat->drout_1089__VARIADIC_INDEX_IDSTR; cdat->drout_1089__VARIADIC_INDEX_IDSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1089__VARIADIC_INDEX_IDSTR.routdescr, "VARIADIC_INDEX_IDSTR @warmelt-genobj.melt:1017", MELT_ROUTDESCR_LEN - 1); cdat->drout_1089__VARIADIC_INDEX_IDSTR.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1089__VARIADIC_INDEX_IDSTR, meltrout_14_warmelt_genobj_VARIADIC_INDEX_IDSTR); /*iniclos dclo_1090__VARIADIC_INDEX_IDSTR */ /*_.VALCLO___V1259*/ meltfptr[1258] = (melt_ptr_t) & cdat->dclo_1090__VARIADIC_INDEX_IDSTR; cdat->dclo_1090__VARIADIC_INDEX_IDSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1090__VARIADIC_INDEX_IDSTR.nbval = 0; /*inirout drout_1091__VARIADIC_LENGTH_IDSTR */ /*_.VALROUT___V1260*/ meltfptr[1259] = (melt_ptr_t) & cdat->drout_1091__VARIADIC_LENGTH_IDSTR; cdat->drout_1091__VARIADIC_LENGTH_IDSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1091__VARIADIC_LENGTH_IDSTR.routdescr, "VARIADIC_LENGTH_IDSTR @warmelt-genobj.melt:1021", MELT_ROUTDESCR_LEN - 1); cdat->drout_1091__VARIADIC_LENGTH_IDSTR.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1091__VARIADIC_LENGTH_IDSTR, meltrout_15_warmelt_genobj_VARIADIC_LENGTH_IDSTR); /*iniclos dclo_1092__VARIADIC_LENGTH_IDSTR */ /*_.VALCLO___V1261*/ meltfptr[1260] = (melt_ptr_t) & cdat->dclo_1092__VARIADIC_LENGTH_IDSTR; cdat->dclo_1092__VARIADIC_LENGTH_IDSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1092__VARIADIC_LENGTH_IDSTR.nbval = 0; /*inirout drout_1093__COMPILE2OBJ_PROCEDURE */ /*_.VALROUT___V1262*/ meltfptr[1261] = (melt_ptr_t) & cdat->drout_1093__COMPILE2OBJ_PROCEDURE; cdat->drout_1093__COMPILE2OBJ_PROCEDURE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1093__COMPILE2OBJ_PROCEDURE.routdescr, "COMPILE2OBJ_PROCEDURE @warmelt-genobj.melt:1030", MELT_ROUTDESCR_LEN - 1); cdat->drout_1093__COMPILE2OBJ_PROCEDURE.nbval = 33; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1093__COMPILE2OBJ_PROCEDURE, meltrout_16_warmelt_genobj_COMPILE2OBJ_PROCEDURE); /*iniclos dclo_1094__COMPILE2OBJ_PROCEDURE */ /*_.VALCLO___V1273*/ meltfptr[1272] = (melt_ptr_t) & cdat->dclo_1094__COMPILE2OBJ_PROCEDURE; cdat->dclo_1094__COMPILE2OBJ_PROCEDURE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1094__COMPILE2OBJ_PROCEDURE.nbval = 0; /*iniobj dsym_1095__CLASS_NREP_ROUTPROC*/ /*uniqueobj*/ if (! /*_.VALDATA___V1274*/ meltfptr[1273]) /*_.VALDATA___V1274*/ meltfptr[1273] = (melt_ptr_t) & cdat->dsym_1095__CLASS_NREP_ROUTPROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1095__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_1095__CLASS_NREP_ROUTPROC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1095__CLASS_NREP_ROUTPROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1095__CLASS_NREP_ROUTPROC.obj_hash = 959677762; cdat->dsym_1095__CLASS_NREP_ROUTPROC.obj_len = 3; /*inistring dstr_1096__CLASS_NREP_ROUTP*/ /*_.VALSTR___V1275*/ meltfptr[1274] = (melt_ptr_t) & cdat->dstr_1096__CLASS_NREP_ROUTP; cdat->dstr_1096__CLASS_NREP_ROUTP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1096__CLASS_NREP_ROUTP.val, "CLASS_NREP_ROUTPROC", sizeof (cdat->dstr_1096__CLASS_NREP_ROUTP. val) - 1); cdat->dstr_1096__CLASS_NREP_ROUTP.val[19] = (char) 0; cdat->dstr_1096__CLASS_NREP_ROUTP.slen = 19; /*iniobj dsym_1097__CLASS_MODULE_CONTEXT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1276*/ meltfptr[1275]) /*_.VALDATA___V1276*/ meltfptr[1275] = (melt_ptr_t) & cdat->dsym_1097__CLASS_MODULE_CONTEXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1097__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_1097__CLASS_MODULE_CONTEXT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1097__CLASS_MODULE_CONTEXT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1097__CLASS_MODULE_CONTEXT.obj_hash = 641718839; cdat->dsym_1097__CLASS_MODULE_CONTEXT.obj_len = 3; /*inistring dstr_1098__CLASS_MODULE_CON*/ /*_.VALSTR___V1277*/ meltfptr[1276] = (melt_ptr_t) & cdat->dstr_1098__CLASS_MODULE_CON; cdat->dstr_1098__CLASS_MODULE_CON.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1098__CLASS_MODULE_CON.val, "CLASS_MODULE_CONTEXT", sizeof (cdat->dstr_1098__CLASS_MODULE_CON. val) - 1); cdat->dstr_1098__CLASS_MODULE_CON.val[20] = (char) 0; cdat->dstr_1098__CLASS_MODULE_CON.slen = 20; /*iniobj dsym_1099__CLASS_NREP_DEFUNROUTPROC*/ /*uniqueobj*/ if (! /*_.VALDATA___V1278*/ meltfptr[1277]) /*_.VALDATA___V1278*/ meltfptr[1277] = (melt_ptr_t) & cdat->dsym_1099__CLASS_NREP_DEFUNROUTPROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1099__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_1099__CLASS_NREP_DEFUNROUTPROC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1099__CLASS_NREP_DEFUNROUTPROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1099__CLASS_NREP_DEFUNROUTPROC.obj_hash = 84907065; cdat->dsym_1099__CLASS_NREP_DEFUNROUTPROC.obj_len = 3; /*inistring dstr_1100__CLASS_NREP_DEFUN*/ /*_.VALSTR___V1279*/ meltfptr[1278] = (melt_ptr_t) & cdat->dstr_1100__CLASS_NREP_DEFUN; cdat->dstr_1100__CLASS_NREP_DEFUN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1100__CLASS_NREP_DEFUN.val, "CLASS_NREP_DEFUNROUTPROC", sizeof (cdat->dstr_1100__CLASS_NREP_DEFUN. val) - 1); cdat->dstr_1100__CLASS_NREP_DEFUN.val[24] = (char) 0; cdat->dstr_1100__CLASS_NREP_DEFUN.slen = 24; /*iniobj dsym_1101__DISCR_STRING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1280*/ meltfptr[1279]) /*_.VALDATA___V1280*/ meltfptr[1279] = (melt_ptr_t) & cdat->dsym_1101__DISCR_STRING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1101__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_1101__DISCR_STRING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1101__DISCR_STRING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1101__DISCR_STRING.obj_hash = 100436219; cdat->dsym_1101__DISCR_STRING.obj_len = 3; /*inistring dstr_1102__DISCR_STRING*/ /*_.VALSTR___V1281*/ meltfptr[1280] = (melt_ptr_t) & cdat->dstr_1102__DISCR_STRING; cdat->dstr_1102__DISCR_STRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1102__DISCR_STRING.val, "DISCR_STRING", sizeof (cdat->dstr_1102__DISCR_STRING.val) - 1); cdat->dstr_1102__DISCR_STRING.val[12] = (char) 0; cdat->dstr_1102__DISCR_STRING.slen = 12; /*iniobj dsym_1103__DISCR_INTEGER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1282*/ meltfptr[1281]) /*_.VALDATA___V1282*/ meltfptr[1281] = (melt_ptr_t) & cdat->dsym_1103__DISCR_INTEGER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1103__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_1103__DISCR_INTEGER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1103__DISCR_INTEGER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1103__DISCR_INTEGER.obj_hash = 119182103; cdat->dsym_1103__DISCR_INTEGER.obj_len = 3; /*inistring dstr_1104__DISCR_INTEGER*/ /*_.VALSTR___V1283*/ meltfptr[1282] = (melt_ptr_t) & cdat->dstr_1104__DISCR_INTEGER; cdat->dstr_1104__DISCR_INTEGER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1104__DISCR_INTEGER.val, "DISCR_INTEGER", sizeof (cdat->dstr_1104__DISCR_INTEGER.val) - 1); cdat->dstr_1104__DISCR_INTEGER.val[13] = (char) 0; cdat->dstr_1104__DISCR_INTEGER.slen = 13; /*iniobj dsym_1105__DISCR_MAP_OBJECTS*/ /*uniqueobj*/ if (! /*_.VALDATA___V1284*/ meltfptr[1283]) /*_.VALDATA___V1284*/ meltfptr[1283] = (melt_ptr_t) & cdat->dsym_1105__DISCR_MAP_OBJECTS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1105__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_1105__DISCR_MAP_OBJECTS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1105__DISCR_MAP_OBJECTS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1105__DISCR_MAP_OBJECTS.obj_hash = 217147088; cdat->dsym_1105__DISCR_MAP_OBJECTS.obj_len = 3; /*inistring dstr_1106__DISCR_MAP_OBJECT*/ /*_.VALSTR___V1285*/ meltfptr[1284] = (melt_ptr_t) & cdat->dstr_1106__DISCR_MAP_OBJECT; cdat->dstr_1106__DISCR_MAP_OBJECT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1106__DISCR_MAP_OBJECT.val, "DISCR_MAP_OBJECTS", sizeof (cdat->dstr_1106__DISCR_MAP_OBJECT. val) - 1); cdat->dstr_1106__DISCR_MAP_OBJECT.val[17] = (char) 0; cdat->dstr_1106__DISCR_MAP_OBJECT.slen = 17; /*iniobj dsym_1107__CLASS_C_GENERATION_CONTEXT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1286*/ meltfptr[1285]) /*_.VALDATA___V1286*/ meltfptr[1285] = (melt_ptr_t) & cdat->dsym_1107__CLASS_C_GENERATION_CONTEXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1107__CLASS_C_GENERATION_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_1107__CLASS_C_GENERATION_CONTEXT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1107__CLASS_C_GENERATION_CONTEXT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1107__CLASS_C_GENERATION_CONTEXT.obj_hash = 748328565; cdat->dsym_1107__CLASS_C_GENERATION_CONTEXT.obj_len = 3; /*inistring dstr_1108__CLASS_C_GENERATI*/ /*_.VALSTR___V1287*/ meltfptr[1286] = (melt_ptr_t) & cdat->dstr_1108__CLASS_C_GENERATI; cdat->dstr_1108__CLASS_C_GENERATI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1108__CLASS_C_GENERATI.val, "CLASS_C_GENERATION_CONTEXT", sizeof (cdat->dstr_1108__CLASS_C_GENERATI. val) - 1); cdat->dstr_1108__CLASS_C_GENERATI.val[26] = (char) 0; cdat->dstr_1108__CLASS_C_GENERATI.slen = 26; /*iniobj dsym_1109__RETVAL_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1265*/ meltfptr[1264]) /*_.VALDATA___V1265*/ meltfptr[1264] = (melt_ptr_t) & cdat->dsym_1109__RETVAL_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1109__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_1109__RETVAL_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1109__RETVAL_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1109__RETVAL_.obj_hash = 101078457; cdat->dsym_1109__RETVAL_.obj_len = 3; /*inistring dstr_1110__RETVAL_*/ /*_.VALSTR___V1266*/ meltfptr[1265] = (melt_ptr_t) & cdat->dstr_1110__RETVAL_; cdat->dstr_1110__RETVAL_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1110__RETVAL_.val, "_RETVAL_", sizeof (cdat->dstr_1110__RETVAL_.val) - 1); cdat->dstr_1110__RETVAL_.val[8] = (char) 0; cdat->dstr_1110__RETVAL_.slen = 8; /*iniobj dsym_1111__MULTIPLE_MAP*/ /*uniqueobj*/ if (! /*_.VALDATA___V1288*/ meltfptr[1287]) /*_.VALDATA___V1288*/ meltfptr[1287] = (melt_ptr_t) & cdat->dsym_1111__MULTIPLE_MAP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1111__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_1111__MULTIPLE_MAP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1111__MULTIPLE_MAP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1111__MULTIPLE_MAP.obj_hash = 218301686; cdat->dsym_1111__MULTIPLE_MAP.obj_len = 3; /*inistring dstr_1112__MULTIPLE_MAP*/ /*_.VALSTR___V1289*/ meltfptr[1288] = (melt_ptr_t) & cdat->dstr_1112__MULTIPLE_MAP; cdat->dstr_1112__MULTIPLE_MAP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1112__MULTIPLE_MAP.val, "MULTIPLE_MAP", sizeof (cdat->dstr_1112__MULTIPLE_MAP.val) - 1); cdat->dstr_1112__MULTIPLE_MAP.val[12] = (char) 0; cdat->dstr_1112__MULTIPLE_MAP.slen = 12; /*inirout drout_1113__LAMBDA_ */ /*_.VALROUT___V1271*/ meltfptr[1270] = (melt_ptr_t) & cdat->drout_1113__LAMBDA_; cdat->drout_1113__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1113__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:1111", MELT_ROUTDESCR_LEN - 1); cdat->drout_1113__LAMBDA_.nbval = 9; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1113__LAMBDA_, meltrout_17_warmelt_genobj_LAMBDA___1__); /*iniobj dsym_1114__CLASS_FORMAL_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1290*/ meltfptr[1289]) /*_.VALDATA___V1290*/ meltfptr[1289] = (melt_ptr_t) & cdat->dsym_1114__CLASS_FORMAL_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1114__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_1114__CLASS_FORMAL_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1114__CLASS_FORMAL_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1114__CLASS_FORMAL_BINDING.obj_hash = 3733780; cdat->dsym_1114__CLASS_FORMAL_BINDING.obj_len = 3; /*inistring dstr_1115__CLASS_FORMAL_BIN*/ /*_.VALSTR___V1291*/ meltfptr[1290] = (melt_ptr_t) & cdat->dstr_1115__CLASS_FORMAL_BIN; cdat->dstr_1115__CLASS_FORMAL_BIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1115__CLASS_FORMAL_BIN.val, "CLASS_FORMAL_BINDING", sizeof (cdat->dstr_1115__CLASS_FORMAL_BIN. val) - 1); cdat->dstr_1115__CLASS_FORMAL_BIN.val[20] = (char) 0; cdat->dstr_1115__CLASS_FORMAL_BIN.slen = 20; /*iniobj dsym_1116__CTYPE_LONG*/ /*uniqueobj*/ if (! /*_.VALDATA___V1292*/ meltfptr[1291]) /*_.VALDATA___V1292*/ meltfptr[1291] = (melt_ptr_t) & cdat->dsym_1116__CTYPE_LONG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1116__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_1116__CTYPE_LONG", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1116__CTYPE_LONG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1116__CTYPE_LONG.obj_hash = 64180850; cdat->dsym_1116__CTYPE_LONG.obj_len = 3; /*inistring dstr_1117__CTYPE_LONG*/ /*_.VALSTR___V1293*/ meltfptr[1292] = (melt_ptr_t) & cdat->dstr_1117__CTYPE_LONG; cdat->dstr_1117__CTYPE_LONG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1117__CTYPE_LONG.val, "CTYPE_LONG", sizeof (cdat->dstr_1117__CTYPE_LONG.val) - 1); cdat->dstr_1117__CTYPE_LONG.val[10] = (char) 0; cdat->dstr_1117__CTYPE_LONG.slen = 10; /*iniobj dsym_1118__LIST_EVERY*/ /*uniqueobj*/ if (! /*_.VALDATA___V1294*/ meltfptr[1293]) /*_.VALDATA___V1294*/ meltfptr[1293] = (melt_ptr_t) & cdat->dsym_1118__LIST_EVERY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1118__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_1118__LIST_EVERY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1118__LIST_EVERY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1118__LIST_EVERY.obj_hash = 942863429; cdat->dsym_1118__LIST_EVERY.obj_len = 3; /*inistring dstr_1119__LIST_EVERY*/ /*_.VALSTR___V1295*/ meltfptr[1294] = (melt_ptr_t) & cdat->dstr_1119__LIST_EVERY; cdat->dstr_1119__LIST_EVERY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1119__LIST_EVERY.val, "LIST_EVERY", sizeof (cdat->dstr_1119__LIST_EVERY.val) - 1); cdat->dstr_1119__LIST_EVERY.val[10] = (char) 0; cdat->dstr_1119__LIST_EVERY.slen = 10; /*inirout drout_1120__LAMBDA_ */ /*_.VALROUT___V1272*/ meltfptr[1271] = (melt_ptr_t) & cdat->drout_1120__LAMBDA_; cdat->drout_1120__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1120__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:1164", MELT_ROUTDESCR_LEN - 1); cdat->drout_1120__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1120__LAMBDA_, meltrout_18_warmelt_genobj_LAMBDA___2__); /*iniobj dsym_1121__INITIALSYSTEMDATA_OBJPREDEF*/ /*uniqueobj*/ if (! /*_.VALDATA___V1296*/ meltfptr[1295]) /*_.VALDATA___V1296*/ meltfptr[1295] = (melt_ptr_t) & cdat->dsym_1121__INITIALSYSTEMDATA_OBJPREDEF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1121__INITIALSYSTEMDATA_OBJPREDEF", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1121__INITIALSYSTEMDATA_OBJPREDEF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1121__INITIALSYSTEMDATA_OBJPREDEF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1121__INITIALSYSTEMDATA_OBJPREDEF.obj_hash = 358147021; cdat->dsym_1121__INITIALSYSTEMDATA_OBJPREDEF.obj_len = 3; /*inistring dstr_1122__INITIALSYSTEMDAT*/ /*_.VALSTR___V1297*/ meltfptr[1296] = (melt_ptr_t) & cdat->dstr_1122__INITIALSYSTEMDAT; cdat->dstr_1122__INITIALSYSTEMDAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1122__INITIALSYSTEMDAT.val, "INITIALSYSTEMDATA_OBJPREDEF", sizeof (cdat->dstr_1122__INITIALSYSTEMDAT. val) - 1); cdat->dstr_1122__INITIALSYSTEMDAT.val[27] = (char) 0; cdat->dstr_1122__INITIALSYSTEMDAT.slen = 27; MELT_LOCATION ("warmelt-genobj.melt:1183:/ iniobj"); /*iniobj dobj_1123__INITIALSYSTEMDATA_OBJPREDEF*/ /*_.VALDATA___V1298*/ meltfptr[1297] = (melt_ptr_t) & cdat->dobj_1123__INITIALSYSTEMDATA_OBJPREDEF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1123__INITIALSYSTEMDATA_OBJPREDEF", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231])) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1123__INITIALSYSTEMDATA_OBJPREDEF", ((meltobject_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231]))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1123__INITIALSYSTEMDATA_OBJPREDEF.meltobj_class = (meltobject_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231]); cdat->dobj_1123__INITIALSYSTEMDATA_OBJPREDEF.obj_hash = 517701640; cdat->dobj_1123__INITIALSYSTEMDATA_OBJPREDEF.obj_len = 2; /*iniobj dsym_1124__INITIAL_SYSTEM_DATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V1299*/ meltfptr[1298]) /*_.VALDATA___V1299*/ meltfptr[1298] = (melt_ptr_t) & cdat->dsym_1124__INITIAL_SYSTEM_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1124__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_1124__INITIAL_SYSTEM_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1124__INITIAL_SYSTEM_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1124__INITIAL_SYSTEM_DATA.obj_hash = 771349808; cdat->dsym_1124__INITIAL_SYSTEM_DATA.obj_len = 3; /*inistring dstr_1125__INITIAL_SYSTEM_D*/ /*_.VALSTR___V1300*/ meltfptr[1299] = (melt_ptr_t) & cdat->dstr_1125__INITIAL_SYSTEM_D; cdat->dstr_1125__INITIAL_SYSTEM_D.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1125__INITIAL_SYSTEM_D.val, "INITIAL_SYSTEM_DATA", sizeof (cdat->dstr_1125__INITIAL_SYSTEM_D. val) - 1); cdat->dstr_1125__INITIAL_SYSTEM_D.val[19] = (char) 0; cdat->dstr_1125__INITIAL_SYSTEM_D.slen = 19; /*inirout drout_1126__APPEND_COMMENT */ /*_.VALROUT___V1301*/ meltfptr[1300] = (melt_ptr_t) & cdat->drout_1126__APPEND_COMMENT; cdat->drout_1126__APPEND_COMMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1126__APPEND_COMMENT.routdescr, "APPEND_COMMENT @warmelt-genobj.melt:1188", MELT_ROUTDESCR_LEN - 1); cdat->drout_1126__APPEND_COMMENT.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1126__APPEND_COMMENT, meltrout_19_warmelt_genobj_APPEND_COMMENT); /*iniclos dclo_1127__APPEND_COMMENT */ /*_.VALCLO___V1302*/ meltfptr[1301] = (melt_ptr_t) & cdat->dclo_1127__APPEND_COMMENT; cdat->dclo_1127__APPEND_COMMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1127__APPEND_COMMENT.nbval = 0; /*inirout drout_1128__APPEND_COMMENTCONST */ /*_.VALROUT___V1303*/ meltfptr[1302] = (melt_ptr_t) & cdat->drout_1128__APPEND_COMMENTCONST; cdat->drout_1128__APPEND_COMMENTCONST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1128__APPEND_COMMENTCONST.routdescr, "APPEND_COMMENTCONST @warmelt-genobj.melt:1190", MELT_ROUTDESCR_LEN - 1); cdat->drout_1128__APPEND_COMMENTCONST.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1128__APPEND_COMMENTCONST, meltrout_20_warmelt_genobj_APPEND_COMMENTCONST); /*iniclos dclo_1129__APPEND_COMMENTCONST */ /*_.VALCLO___V1304*/ meltfptr[1303] = (melt_ptr_t) & cdat->dclo_1129__APPEND_COMMENTCONST; cdat->dclo_1129__APPEND_COMMENTCONST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1129__APPEND_COMMENTCONST.nbval = 0; /*inirout drout_1130__COMPILE2OBJ_INITPROC */ /*_.VALROUT___V1305*/ meltfptr[1304] = (melt_ptr_t) & cdat->drout_1130__COMPILE2OBJ_INITPROC; cdat->drout_1130__COMPILE2OBJ_INITPROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1130__COMPILE2OBJ_INITPROC.routdescr, "COMPILE2OBJ_INITPROC @warmelt-genobj.melt:1197", MELT_ROUTDESCR_LEN - 1); cdat->drout_1130__COMPILE2OBJ_INITPROC.nbval = 74; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1130__COMPILE2OBJ_INITPROC, meltrout_21_warmelt_genobj_COMPILE2OBJ_INITPROC); /*iniclos dclo_1131__COMPILE2OBJ_INITPROC */ /*_.VALCLO___V1327*/ meltfptr[1326] = (melt_ptr_t) & cdat->dclo_1131__COMPILE2OBJ_INITPROC; cdat->dclo_1131__COMPILE2OBJ_INITPROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1131__COMPILE2OBJ_INITPROC.nbval = 0; /*iniobj dsym_1132__CLASS_NREP_INITPROC*/ /*uniqueobj*/ if (! /*_.VALDATA___V1328*/ meltfptr[1327]) /*_.VALDATA___V1328*/ meltfptr[1327] = (melt_ptr_t) & cdat->dsym_1132__CLASS_NREP_INITPROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1132__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_1132__CLASS_NREP_INITPROC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1132__CLASS_NREP_INITPROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1132__CLASS_NREP_INITPROC.obj_hash = 915122709; cdat->dsym_1132__CLASS_NREP_INITPROC.obj_len = 3; /*inistring dstr_1133__CLASS_NREP_INITP*/ /*_.VALSTR___V1329*/ meltfptr[1328] = (melt_ptr_t) & cdat->dstr_1133__CLASS_NREP_INITP; cdat->dstr_1133__CLASS_NREP_INITP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1133__CLASS_NREP_INITP.val, "CLASS_NREP_INITPROC", sizeof (cdat->dstr_1133__CLASS_NREP_INITP. val) - 1); cdat->dstr_1133__CLASS_NREP_INITP.val[19] = (char) 0; cdat->dstr_1133__CLASS_NREP_INITP.slen = 19; /*inistring dstr_1134__melt_start_this_*/ /*_.VALSTR___V1306*/ meltfptr[1305] = (melt_ptr_t) & cdat->dstr_1134__melt_start_this_; cdat->dstr_1134__melt_start_this_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1134__melt_start_this_.val, "melt_start_this_module", sizeof (cdat->dstr_1134__melt_start_this_. val) - 1); cdat->dstr_1134__melt_start_this_.val[22] = (char) 0; cdat->dstr_1134__melt_start_this_.slen = 22; /*iniobj dsym_1135__CLASS_INITIAL_GENERATION_CONTEXT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1330*/ meltfptr[1329]) /*_.VALDATA___V1330*/ meltfptr[1329] = (melt_ptr_t) & cdat->dsym_1135__CLASS_INITIAL_GENERATION_CONTEXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1135__CLASS_INITIAL_GENERATION_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_1135__CLASS_INITIAL_GENERATION_CONTEXT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1135__CLASS_INITIAL_GENERATION_CONTEXT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1135__CLASS_INITIAL_GENERATION_CONTEXT.obj_hash = 132112963; cdat->dsym_1135__CLASS_INITIAL_GENERATION_CONTEXT.obj_len = 3; /*inistring dstr_1136__CLASS_INITIAL_GE*/ /*_.VALSTR___V1331*/ meltfptr[1330] = (melt_ptr_t) & cdat->dstr_1136__CLASS_INITIAL_GE; cdat->dstr_1136__CLASS_INITIAL_GE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1136__CLASS_INITIAL_GE.val, "CLASS_INITIAL_GENERATION_CONTEXT", sizeof (cdat->dstr_1136__CLASS_INITIAL_GE. val) - 1); cdat->dstr_1136__CLASS_INITIAL_GE.val[32] = (char) 0; cdat->dstr_1136__CLASS_INITIAL_GE.slen = 32; /*iniobj dsym_1137__LIST_MAP*/ /*uniqueobj*/ if (! /*_.VALDATA___V1332*/ meltfptr[1331]) /*_.VALDATA___V1332*/ meltfptr[1331] = (melt_ptr_t) & cdat->dsym_1137__LIST_MAP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1137__LIST_MAP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1137__LIST_MAP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1137__LIST_MAP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1137__LIST_MAP.obj_hash = 941133477; cdat->dsym_1137__LIST_MAP.obj_len = 3; /*inistring dstr_1138__LIST_MAP*/ /*_.VALSTR___V1333*/ meltfptr[1332] = (melt_ptr_t) & cdat->dstr_1138__LIST_MAP; cdat->dstr_1138__LIST_MAP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1138__LIST_MAP.val, "LIST_MAP", sizeof (cdat->dstr_1138__LIST_MAP.val) - 1); cdat->dstr_1138__LIST_MAP.val[8] = (char) 0; cdat->dstr_1138__LIST_MAP.slen = 8; /*inirout drout_1139__LAMBDA_ */ /*_.VALROUT___V1307*/ meltfptr[1306] = (melt_ptr_t) & cdat->drout_1139__LAMBDA_; cdat->drout_1139__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1139__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:1245", MELT_ROUTDESCR_LEN - 1); cdat->drout_1139__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1139__LAMBDA_, meltrout_22_warmelt_genobj_LAMBDA___3__); /*iniobj dsym_1140__RETINIT_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1308*/ meltfptr[1307]) /*_.VALDATA___V1308*/ meltfptr[1307] = (melt_ptr_t) & cdat->dsym_1140__RETINIT_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1140__RETINIT_", melt_magic_discr ((melt_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__RETINIT_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1140__RETINIT_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1140__RETINIT_.obj_hash = 103322274; cdat->dsym_1140__RETINIT_.obj_len = 3; /*inistring dstr_1141__RETINIT_*/ /*_.VALSTR___V1309*/ meltfptr[1308] = (melt_ptr_t) & cdat->dstr_1141__RETINIT_; cdat->dstr_1141__RETINIT_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1141__RETINIT_.val, "_RETINIT_", sizeof (cdat->dstr_1141__RETINIT_.val) - 1); cdat->dstr_1141__RETINIT_.val[9] = (char) 0; cdat->dstr_1141__RETINIT_.slen = 9; /*iniobj dsym_1142__CONTENV_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1310*/ meltfptr[1309]) /*_.VALDATA___V1310*/ meltfptr[1309] = (melt_ptr_t) & cdat->dsym_1142__CONTENV_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1142__CONTENV_", melt_magic_discr ((melt_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__CONTENV_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1142__CONTENV_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1142__CONTENV_.obj_hash = 332262066; cdat->dsym_1142__CONTENV_.obj_len = 3; /*inistring dstr_1143__CONTENV_*/ /*_.VALSTR___V1311*/ meltfptr[1310] = (melt_ptr_t) & cdat->dstr_1143__CONTENV_; cdat->dstr_1143__CONTENV_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1143__CONTENV_.val, "_CONTENV_", sizeof (cdat->dstr_1143__CONTENV_.val) - 1); cdat->dstr_1143__CONTENV_.val[9] = (char) 0; cdat->dstr_1143__CONTENV_.slen = 9; /*iniobj dsym_1144__FRESHENV_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1312*/ meltfptr[1311]) /*_.VALDATA___V1312*/ meltfptr[1311] = (melt_ptr_t) & cdat->dsym_1144__FRESHENV_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1144__FRESHENV_", melt_magic_discr ((melt_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__FRESHENV_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1144__FRESHENV_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1144__FRESHENV_.obj_hash = 796121246; cdat->dsym_1144__FRESHENV_.obj_len = 3; /*inistring dstr_1145__FRESHENV_*/ /*_.VALSTR___V1313*/ meltfptr[1312] = (melt_ptr_t) & cdat->dstr_1145__FRESHENV_; cdat->dstr_1145__FRESHENV_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1145__FRESHENV_.val, "_FRESHENV_", sizeof (cdat->dstr_1145__FRESHENV_.val) - 1); cdat->dstr_1145__FRESHENV_.val[10] = (char) 0; cdat->dstr_1145__FRESHENV_.slen = 10; /*iniobj dsym_1146__PREVENV_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1314*/ meltfptr[1313]) /*_.VALDATA___V1314*/ meltfptr[1313] = (melt_ptr_t) & cdat->dsym_1146__PREVENV_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1146__PREVENV_", melt_magic_discr ((melt_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__PREVENV_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1146__PREVENV_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1146__PREVENV_.obj_hash = 72124100; cdat->dsym_1146__PREVENV_.obj_len = 3; /*inistring dstr_1147__PREVENV_*/ /*_.VALSTR___V1315*/ meltfptr[1314] = (melt_ptr_t) & cdat->dstr_1147__PREVENV_; cdat->dstr_1147__PREVENV_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1147__PREVENV_.val, "_PREVENV_", sizeof (cdat->dstr_1147__PREVENV_.val) - 1); cdat->dstr_1147__PREVENV_.val[9] = (char) 0; cdat->dstr_1147__PREVENV_.slen = 9; /*iniobj dsym_1148__VALEXPORT_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1316*/ meltfptr[1315]) /*_.VALDATA___V1316*/ meltfptr[1315] = (melt_ptr_t) & cdat->dsym_1148__VALEXPORT_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1148__VALEXPORT_", melt_magic_discr ((melt_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__VALEXPORT_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1148__VALEXPORT_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1148__VALEXPORT_.obj_hash = 587366079; cdat->dsym_1148__VALEXPORT_.obj_len = 3; /*inistring dstr_1149__VALEXPORT_*/ /*_.VALSTR___V1317*/ meltfptr[1316] = (melt_ptr_t) & cdat->dstr_1149__VALEXPORT_; cdat->dstr_1149__VALEXPORT_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1149__VALEXPORT_.val, "_VALEXPORT_", sizeof (cdat->dstr_1149__VALEXPORT_.val) - 1); cdat->dstr_1149__VALEXPORT_.val[11] = (char) 0; cdat->dstr_1149__VALEXPORT_.slen = 11; /*iniobj dsym_1150__VALIMPORT_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1318*/ meltfptr[1317]) /*_.VALDATA___V1318*/ meltfptr[1317] = (melt_ptr_t) & cdat->dsym_1150__VALIMPORT_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1150__VALIMPORT_", melt_magic_discr ((melt_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__VALIMPORT_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1150__VALIMPORT_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1150__VALIMPORT_.obj_hash = 1009523468; cdat->dsym_1150__VALIMPORT_.obj_len = 3; /*inistring dstr_1151__VALIMPORT_*/ /*_.VALSTR___V1319*/ meltfptr[1318] = (melt_ptr_t) & cdat->dstr_1151__VALIMPORT_; cdat->dstr_1151__VALIMPORT_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1151__VALIMPORT_.val, "_VALIMPORT_", sizeof (cdat->dstr_1151__VALIMPORT_.val) - 1); cdat->dstr_1151__VALIMPORT_.val[11] = (char) 0; cdat->dstr_1151__VALIMPORT_.slen = 11; /*iniobj dsym_1152__CLASS_ANY_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1334*/ meltfptr[1333]) /*_.VALDATA___V1334*/ meltfptr[1333] = (melt_ptr_t) & cdat->dsym_1152__CLASS_ANY_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1152__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_1152__CLASS_ANY_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1152__CLASS_ANY_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1152__CLASS_ANY_BINDING.obj_hash = 935770; cdat->dsym_1152__CLASS_ANY_BINDING.obj_len = 3; /*inistring dstr_1153__CLASS_ANY_BINDIN*/ /*_.VALSTR___V1335*/ meltfptr[1334] = (melt_ptr_t) & cdat->dstr_1153__CLASS_ANY_BINDIN; cdat->dstr_1153__CLASS_ANY_BINDIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1153__CLASS_ANY_BINDIN.val, "CLASS_ANY_BINDING", sizeof (cdat->dstr_1153__CLASS_ANY_BINDIN. val) - 1); cdat->dstr_1153__CLASS_ANY_BINDIN.val[17] = (char) 0; cdat->dstr_1153__CLASS_ANY_BINDIN.slen = 17; /*iniobj dsym_1154__CLASS_FIXED_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1336*/ meltfptr[1335]) /*_.VALDATA___V1336*/ meltfptr[1335] = (melt_ptr_t) & cdat->dsym_1154__CLASS_FIXED_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1154__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_1154__CLASS_FIXED_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1154__CLASS_FIXED_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1154__CLASS_FIXED_BINDING.obj_hash = 179808938; cdat->dsym_1154__CLASS_FIXED_BINDING.obj_len = 3; /*inistring dstr_1155__CLASS_FIXED_BIND*/ /*_.VALSTR___V1337*/ meltfptr[1336] = (melt_ptr_t) & cdat->dstr_1155__CLASS_FIXED_BIND; cdat->dstr_1155__CLASS_FIXED_BIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1155__CLASS_FIXED_BIND.val, "CLASS_FIXED_BINDING", sizeof (cdat->dstr_1155__CLASS_FIXED_BIND. val) - 1); cdat->dstr_1155__CLASS_FIXED_BIND.val[19] = (char) 0; cdat->dstr_1155__CLASS_FIXED_BIND.slen = 19; /*iniobj dsym_1156__CLASS_NREP_SIMPLE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1338*/ meltfptr[1337]) /*_.VALDATA___V1338*/ meltfptr[1337] = (melt_ptr_t) & cdat->dsym_1156__CLASS_NREP_SIMPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1156__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_1156__CLASS_NREP_SIMPLE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1156__CLASS_NREP_SIMPLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1156__CLASS_NREP_SIMPLE.obj_hash = 945537669; cdat->dsym_1156__CLASS_NREP_SIMPLE.obj_len = 3; /*inistring dstr_1157__CLASS_NREP_SIMPL*/ /*_.VALSTR___V1339*/ meltfptr[1338] = (melt_ptr_t) & cdat->dstr_1157__CLASS_NREP_SIMPL; cdat->dstr_1157__CLASS_NREP_SIMPL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1157__CLASS_NREP_SIMPL.val, "CLASS_NREP_SIMPLE", sizeof (cdat->dstr_1157__CLASS_NREP_SIMPL. val) - 1); cdat->dstr_1157__CLASS_NREP_SIMPL.val[17] = (char) 0; cdat->dstr_1157__CLASS_NREP_SIMPL.slen = 17; /*iniobj dsym_1158__SYSDATA_CONT_FRESH_ENV*/ /*uniqueobj*/ if (! /*_.VALDATA___V1340*/ meltfptr[1339]) /*_.VALDATA___V1340*/ meltfptr[1339] = (melt_ptr_t) & cdat->dsym_1158__SYSDATA_CONT_FRESH_ENV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1158__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_1158__SYSDATA_CONT_FRESH_ENV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1158__SYSDATA_CONT_FRESH_ENV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1158__SYSDATA_CONT_FRESH_ENV.obj_hash = 628092944; cdat->dsym_1158__SYSDATA_CONT_FRESH_ENV.obj_len = 3; /*inistring dstr_1159__SYSDATA_CONT_FRE*/ /*_.VALSTR___V1341*/ meltfptr[1340] = (melt_ptr_t) & cdat->dstr_1159__SYSDATA_CONT_FRE; cdat->dstr_1159__SYSDATA_CONT_FRE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1159__SYSDATA_CONT_FRE.val, "SYSDATA_CONT_FRESH_ENV", sizeof (cdat->dstr_1159__SYSDATA_CONT_FRE. val) - 1); cdat->dstr_1159__SYSDATA_CONT_FRE.val[22] = (char) 0; cdat->dstr_1159__SYSDATA_CONT_FRE.slen = 22; /*inirout drout_1160__LAMBDA_ */ /*_.VALROUT___V1320*/ meltfptr[1319] = (melt_ptr_t) & cdat->drout_1160__LAMBDA_; cdat->drout_1160__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1160__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:1348", MELT_ROUTDESCR_LEN - 1); cdat->drout_1160__LAMBDA_.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1160__LAMBDA_, meltrout_23_warmelt_genobj_LAMBDA___4__); /*iniobj dsym_1161__CLASS_NREP_IMPORTEDVAL*/ /*uniqueobj*/ if (! /*_.VALDATA___V1342*/ meltfptr[1341]) /*_.VALDATA___V1342*/ meltfptr[1341] = (melt_ptr_t) & cdat->dsym_1161__CLASS_NREP_IMPORTEDVAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1161__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_1161__CLASS_NREP_IMPORTEDVAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1161__CLASS_NREP_IMPORTEDVAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1161__CLASS_NREP_IMPORTEDVAL.obj_hash = 143332453; cdat->dsym_1161__CLASS_NREP_IMPORTEDVAL.obj_len = 3; /*inistring dstr_1162__CLASS_NREP_IMPOR*/ /*_.VALSTR___V1343*/ meltfptr[1342] = (melt_ptr_t) & cdat->dstr_1162__CLASS_NREP_IMPOR; cdat->dstr_1162__CLASS_NREP_IMPOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1162__CLASS_NREP_IMPOR.val, "CLASS_NREP_IMPORTEDVAL", sizeof (cdat->dstr_1162__CLASS_NREP_IMPOR. val) - 1); cdat->dstr_1162__CLASS_NREP_IMPOR.val[22] = (char) 0; cdat->dstr_1162__CLASS_NREP_IMPOR.slen = 22; /*inirout drout_1163__LAMBDA_ */ /*_.VALROUT___V1321*/ meltfptr[1320] = (melt_ptr_t) & cdat->drout_1163__LAMBDA_; cdat->drout_1163__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1163__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:1380", MELT_ROUTDESCR_LEN - 1); cdat->drout_1163__LAMBDA_.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1163__LAMBDA_, meltrout_24_warmelt_genobj_LAMBDA___5__); /*iniobj dsym_1164__CLASS_NREP_BOUND_DATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V1344*/ meltfptr[1343]) /*_.VALDATA___V1344*/ meltfptr[1343] = (melt_ptr_t) & cdat->dsym_1164__CLASS_NREP_BOUND_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1164__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_1164__CLASS_NREP_BOUND_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1164__CLASS_NREP_BOUND_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1164__CLASS_NREP_BOUND_DATA.obj_hash = 580314803; cdat->dsym_1164__CLASS_NREP_BOUND_DATA.obj_len = 3; /*inistring dstr_1165__CLASS_NREP_BOUND*/ /*_.VALSTR___V1345*/ meltfptr[1344] = (melt_ptr_t) & cdat->dstr_1165__CLASS_NREP_BOUND; cdat->dstr_1165__CLASS_NREP_BOUND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1165__CLASS_NREP_BOUND.val, "CLASS_NREP_BOUND_DATA", sizeof (cdat->dstr_1165__CLASS_NREP_BOUND. val) - 1); cdat->dstr_1165__CLASS_NREP_BOUND.val[21] = (char) 0; cdat->dstr_1165__CLASS_NREP_BOUND.slen = 21; /*inirout drout_1166__LAMBDA_ */ /*_.VALROUT___V1322*/ meltfptr[1321] = (melt_ptr_t) & cdat->drout_1166__LAMBDA_; cdat->drout_1166__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1166__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:1393", MELT_ROUTDESCR_LEN - 1); cdat->drout_1166__LAMBDA_.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1166__LAMBDA_, meltrout_25_warmelt_genobj_LAMBDA___6__); /*iniobj dsym_1167__MULTIPLE_EVERY*/ /*uniqueobj*/ if (! /*_.VALDATA___V1346*/ meltfptr[1345]) /*_.VALDATA___V1346*/ meltfptr[1345] = (melt_ptr_t) & cdat->dsym_1167__MULTIPLE_EVERY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1167__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_1167__MULTIPLE_EVERY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1167__MULTIPLE_EVERY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1167__MULTIPLE_EVERY.obj_hash = 130098745; cdat->dsym_1167__MULTIPLE_EVERY.obj_len = 3; /*inistring dstr_1168__MULTIPLE_EVERY*/ /*_.VALSTR___V1347*/ meltfptr[1346] = (melt_ptr_t) & cdat->dstr_1168__MULTIPLE_EVERY; cdat->dstr_1168__MULTIPLE_EVERY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1168__MULTIPLE_EVERY.val, "MULTIPLE_EVERY", sizeof (cdat->dstr_1168__MULTIPLE_EVERY.val) - 1); cdat->dstr_1168__MULTIPLE_EVERY.val[14] = (char) 0; cdat->dstr_1168__MULTIPLE_EVERY.slen = 14; /*inirout drout_1169__LAMBDA_ */ /*_.VALROUT___V1323*/ meltfptr[1322] = (melt_ptr_t) & cdat->drout_1169__LAMBDA_; cdat->drout_1169__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1169__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:1402", MELT_ROUTDESCR_LEN - 1); cdat->drout_1169__LAMBDA_.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1169__LAMBDA_, meltrout_26_warmelt_genobj_LAMBDA___7__); /*iniobj dsym_1170__CLASS_NREP_DATAKEYWORD*/ /*uniqueobj*/ if (! /*_.VALDATA___V1348*/ meltfptr[1347]) /*_.VALDATA___V1348*/ meltfptr[1347] = (melt_ptr_t) & cdat->dsym_1170__CLASS_NREP_DATAKEYWORD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1170__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_1170__CLASS_NREP_DATAKEYWORD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1170__CLASS_NREP_DATAKEYWORD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1170__CLASS_NREP_DATAKEYWORD.obj_hash = 755124591; cdat->dsym_1170__CLASS_NREP_DATAKEYWORD.obj_len = 3; /*inistring dstr_1171__CLASS_NREP_DATAK*/ /*_.VALSTR___V1349*/ meltfptr[1348] = (melt_ptr_t) & cdat->dstr_1171__CLASS_NREP_DATAK; cdat->dstr_1171__CLASS_NREP_DATAK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1171__CLASS_NREP_DATAK.val, "CLASS_NREP_DATAKEYWORD", sizeof (cdat->dstr_1171__CLASS_NREP_DATAK. val) - 1); cdat->dstr_1171__CLASS_NREP_DATAK.val[22] = (char) 0; cdat->dstr_1171__CLASS_NREP_DATAK.slen = 22; /*iniobj dsym_1172__CLASS_NREP_DATASYMBOL*/ /*uniqueobj*/ if (! /*_.VALDATA___V1350*/ meltfptr[1349]) /*_.VALDATA___V1350*/ meltfptr[1349] = (melt_ptr_t) & cdat->dsym_1172__CLASS_NREP_DATASYMBOL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1172__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_1172__CLASS_NREP_DATASYMBOL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1172__CLASS_NREP_DATASYMBOL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1172__CLASS_NREP_DATASYMBOL.obj_hash = 55902456; cdat->dsym_1172__CLASS_NREP_DATASYMBOL.obj_len = 3; /*inistring dstr_1173__CLASS_NREP_DATAS*/ /*_.VALSTR___V1351*/ meltfptr[1350] = (melt_ptr_t) & cdat->dstr_1173__CLASS_NREP_DATAS; cdat->dstr_1173__CLASS_NREP_DATAS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1173__CLASS_NREP_DATAS.val, "CLASS_NREP_DATASYMBOL", sizeof (cdat->dstr_1173__CLASS_NREP_DATAS. val) - 1); cdat->dstr_1173__CLASS_NREP_DATAS.val[21] = (char) 0; cdat->dstr_1173__CLASS_NREP_DATAS.slen = 21; /*iniobj dsym_1174__SYSDATA_VALUE_IMPORTER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1352*/ meltfptr[1351]) /*_.VALDATA___V1352*/ meltfptr[1351] = (melt_ptr_t) & cdat->dsym_1174__SYSDATA_VALUE_IMPORTER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1174__SYSDATA_VALUE_IMPORTER", melt_magic_discr ((melt_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__SYSDATA_VALUE_IMPORTER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1174__SYSDATA_VALUE_IMPORTER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1174__SYSDATA_VALUE_IMPORTER.obj_hash = 705328400; cdat->dsym_1174__SYSDATA_VALUE_IMPORTER.obj_len = 3; /*inistring dstr_1175__SYSDATA_VALUE_IM*/ /*_.VALSTR___V1353*/ meltfptr[1352] = (melt_ptr_t) & cdat->dstr_1175__SYSDATA_VALUE_IM; cdat->dstr_1175__SYSDATA_VALUE_IM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1175__SYSDATA_VALUE_IM.val, "SYSDATA_VALUE_IMPORTER", sizeof (cdat->dstr_1175__SYSDATA_VALUE_IM. val) - 1); cdat->dstr_1175__SYSDATA_VALUE_IM.val[22] = (char) 0; cdat->dstr_1175__SYSDATA_VALUE_IM.slen = 22; /*inirout drout_1176__LAMBDA_ */ /*_.VALROUT___V1324*/ meltfptr[1323] = (melt_ptr_t) & cdat->drout_1176__LAMBDA_; cdat->drout_1176__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1176__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:1440", MELT_ROUTDESCR_LEN - 1); cdat->drout_1176__LAMBDA_.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1176__LAMBDA_, meltrout_27_warmelt_genobj_LAMBDA___8__); /*inirout drout_1177__LAMBDA_ */ /*_.VALROUT___V1325*/ meltfptr[1324] = (melt_ptr_t) & cdat->drout_1177__LAMBDA_; cdat->drout_1177__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1177__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:1463", MELT_ROUTDESCR_LEN - 1); cdat->drout_1177__LAMBDA_.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1177__LAMBDA_, meltrout_28_warmelt_genobj_LAMBDA___9__); /*inirout drout_1178__LAMBDA_ */ /*_.VALROUT___V1326*/ meltfptr[1325] = (melt_ptr_t) & cdat->drout_1178__LAMBDA_; cdat->drout_1178__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1178__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:1473", MELT_ROUTDESCR_LEN - 1); cdat->drout_1178__LAMBDA_.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1178__LAMBDA_, meltrout_29_warmelt_genobj_LAMBDA___10__); /*inirout drout_1179__COMPILE2OBJ_INITEXTENDPROC */ /*_.VALROUT___V1354*/ meltfptr[1353] = (melt_ptr_t) & cdat->drout_1179__COMPILE2OBJ_INITEXTENDPROC; cdat->drout_1179__COMPILE2OBJ_INITEXTENDPROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1179__COMPILE2OBJ_INITEXTENDPROC.routdescr, "COMPILE2OBJ_INITEXTENDPROC @warmelt-genobj.melt:1517", MELT_ROUTDESCR_LEN - 1); cdat->drout_1179__COMPILE2OBJ_INITEXTENDPROC.nbval = 69; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1179__COMPILE2OBJ_INITEXTENDPROC, meltrout_30_warmelt_genobj_COMPILE2OBJ_INITEXTENDPROC); /*iniclos dclo_1180__COMPILE2OBJ_INITEXTENDPROC */ /*_.VALCLO___V1372*/ meltfptr[1371] = (melt_ptr_t) & cdat->dclo_1180__COMPILE2OBJ_INITEXTENDPROC; cdat->dclo_1180__COMPILE2OBJ_INITEXTENDPROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1180__COMPILE2OBJ_INITEXTENDPROC.nbval = 0; /*iniobj dsym_1181__CLASS_NREP_INITEXTENDPROC*/ /*uniqueobj*/ if (! /*_.VALDATA___V1373*/ meltfptr[1372]) /*_.VALDATA___V1373*/ meltfptr[1372] = (melt_ptr_t) & cdat->dsym_1181__CLASS_NREP_INITEXTENDPROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1181__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_1181__CLASS_NREP_INITEXTENDPROC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1181__CLASS_NREP_INITEXTENDPROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1181__CLASS_NREP_INITEXTENDPROC.obj_hash = 446278172; cdat->dsym_1181__CLASS_NREP_INITEXTENDPROC.obj_len = 3; /*inistring dstr_1182__CLASS_NREP_INITE*/ /*_.VALSTR___V1374*/ meltfptr[1373] = (melt_ptr_t) & cdat->dstr_1182__CLASS_NREP_INITE; cdat->dstr_1182__CLASS_NREP_INITE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1182__CLASS_NREP_INITE.val, "CLASS_NREP_INITEXTENDPROC", sizeof (cdat->dstr_1182__CLASS_NREP_INITE. val) - 1); cdat->dstr_1182__CLASS_NREP_INITE.val[25] = (char) 0; cdat->dstr_1182__CLASS_NREP_INITE.slen = 25; /*iniobj dsym_1183__CLASS_RUNNING_EXTENSION_MODULE_CONTEXT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1375*/ meltfptr[1374]) /*_.VALDATA___V1375*/ meltfptr[1374] = (melt_ptr_t) & cdat->dsym_1183__CLASS_RUNNING_EXTENSION_MODULE_CONTEXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1183__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_1183__CLASS_RUNNING_EXTENSION_MODULE_CONTEXT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1183__CLASS_RUNNING_EXTENSION_MODULE_CONTEXT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1183__CLASS_RUNNING_EXTENSION_MODULE_CONTEXT.obj_hash = 618245499; cdat->dsym_1183__CLASS_RUNNING_EXTENSION_MODULE_CONTEXT.obj_len = 3; /*inistring dstr_1184__CLASS_RUNNING_EX*/ /*_.VALSTR___V1376*/ meltfptr[1375] = (melt_ptr_t) & cdat->dstr_1184__CLASS_RUNNING_EX; cdat->dstr_1184__CLASS_RUNNING_EX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1184__CLASS_RUNNING_EX.val, "CLASS_RUNNING_EXTENSION_MODULE_CONTEXT", sizeof (cdat->dstr_1184__CLASS_RUNNING_EX. val) - 1); cdat->dstr_1184__CLASS_RUNNING_EX.val[38] = (char) 0; cdat->dstr_1184__CLASS_RUNNING_EX.slen = 38; /*iniobj dsym_1185__CLASS_NREP_ANYPROC*/ /*uniqueobj*/ if (! /*_.VALDATA___V1377*/ meltfptr[1376]) /*_.VALDATA___V1377*/ meltfptr[1376] = (melt_ptr_t) & cdat->dsym_1185__CLASS_NREP_ANYPROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1185__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_1185__CLASS_NREP_ANYPROC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1185__CLASS_NREP_ANYPROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1185__CLASS_NREP_ANYPROC.obj_hash = 605230702; cdat->dsym_1185__CLASS_NREP_ANYPROC.obj_len = 3; /*inistring dstr_1186__CLASS_NREP_ANYPR*/ /*_.VALSTR___V1378*/ meltfptr[1377] = (melt_ptr_t) & cdat->dstr_1186__CLASS_NREP_ANYPR; cdat->dstr_1186__CLASS_NREP_ANYPR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1186__CLASS_NREP_ANYPR.val, "CLASS_NREP_ANYPROC", sizeof (cdat->dstr_1186__CLASS_NREP_ANYPR. val) - 1); cdat->dstr_1186__CLASS_NREP_ANYPR.val[18] = (char) 0; cdat->dstr_1186__CLASS_NREP_ANYPR.slen = 18; /*inistring dstr_1187__melt_start_run_e*/ /*_.VALSTR___V1355*/ meltfptr[1354] = (melt_ptr_t) & cdat->dstr_1187__melt_start_run_e; cdat->dstr_1187__melt_start_run_e.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1187__melt_start_run_e.val, "melt_start_run_extension", sizeof (cdat->dstr_1187__melt_start_run_e. val) - 1); cdat->dstr_1187__melt_start_run_e.val[24] = (char) 0; cdat->dstr_1187__melt_start_run_e.slen = 24; /*iniobj dsym_1188__CLASS_EXTENSION_GENERATION_CONTEXT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1379*/ meltfptr[1378]) /*_.VALDATA___V1379*/ meltfptr[1378] = (melt_ptr_t) & cdat->dsym_1188__CLASS_EXTENSION_GENERATION_CONTEXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1188__CLASS_EXTENSION_GENERATION_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_1188__CLASS_EXTENSION_GENERATION_CONTEXT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1188__CLASS_EXTENSION_GENERATION_CONTEXT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1188__CLASS_EXTENSION_GENERATION_CONTEXT.obj_hash = 831040547; cdat->dsym_1188__CLASS_EXTENSION_GENERATION_CONTEXT.obj_len = 3; /*inistring dstr_1189__CLASS_EXTENSION_*/ /*_.VALSTR___V1380*/ meltfptr[1379] = (melt_ptr_t) & cdat->dstr_1189__CLASS_EXTENSION_; cdat->dstr_1189__CLASS_EXTENSION_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1189__CLASS_EXTENSION_.val, "CLASS_EXTENSION_GENERATION_CONTEXT", sizeof (cdat->dstr_1189__CLASS_EXTENSION_. val) - 1); cdat->dstr_1189__CLASS_EXTENSION_.val[34] = (char) 0; cdat->dstr_1189__CLASS_EXTENSION_.slen = 34; /*inirout drout_1190__LAMBDA_ */ /*_.VALROUT___V1356*/ meltfptr[1355] = (melt_ptr_t) & cdat->drout_1190__LAMBDA_; cdat->drout_1190__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1190__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:1569", MELT_ROUTDESCR_LEN - 1); cdat->drout_1190__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1190__LAMBDA_, meltrout_31_warmelt_genobj_LAMBDA___11__); /*iniobj dsym_1191__RETRUNINIT_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1357*/ meltfptr[1356]) /*_.VALDATA___V1357*/ meltfptr[1356] = (melt_ptr_t) & cdat->dsym_1191__RETRUNINIT_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1191__RETRUNINIT_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1191__RETRUNINIT_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1191__RETRUNINIT_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1191__RETRUNINIT_.obj_hash = 393407341; cdat->dsym_1191__RETRUNINIT_.obj_len = 3; /*inistring dstr_1192__RETRUNINIT_*/ /*_.VALSTR___V1358*/ meltfptr[1357] = (melt_ptr_t) & cdat->dstr_1192__RETRUNINIT_; cdat->dstr_1192__RETRUNINIT_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1192__RETRUNINIT_.val, "_RETRUNINIT_", sizeof (cdat->dstr_1192__RETRUNINIT_.val) - 1); cdat->dstr_1192__RETRUNINIT_.val[12] = (char) 0; cdat->dstr_1192__RETRUNINIT_.slen = 12; /*iniobj dsym_1193__OCURENVBOXLOC_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1359*/ meltfptr[1358]) /*_.VALDATA___V1359*/ meltfptr[1358] = (melt_ptr_t) & cdat->dsym_1193__OCURENVBOXLOC_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1193__OCURENVBOXLOC_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1193__OCURENVBOXLOC_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1193__OCURENVBOXLOC_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1193__OCURENVBOXLOC_.obj_hash = 952638854; cdat->dsym_1193__OCURENVBOXLOC_.obj_len = 3; /*inistring dstr_1194__OCURENVBOXLOC_*/ /*_.VALSTR___V1360*/ meltfptr[1359] = (melt_ptr_t) & cdat->dstr_1194__OCURENVBOXLOC_; cdat->dstr_1194__OCURENVBOXLOC_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1194__OCURENVBOXLOC_.val, "_OCURENVBOXLOC_", sizeof (cdat->dstr_1194__OCURENVBOXLOC_.val) - 1); cdat->dstr_1194__OCURENVBOXLOC_.val[15] = (char) 0; cdat->dstr_1194__OCURENVBOXLOC_.slen = 15; /*iniobj dsym_1195__OCURENVLOC_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1361*/ meltfptr[1360]) /*_.VALDATA___V1361*/ meltfptr[1360] = (melt_ptr_t) & cdat->dsym_1195__OCURENVLOC_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1195__OCURENVLOC_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1195__OCURENVLOC_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1195__OCURENVLOC_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1195__OCURENVLOC_.obj_hash = 406751371; cdat->dsym_1195__OCURENVLOC_.obj_len = 3; /*inistring dstr_1196__OCURENVLOC_*/ /*_.VALSTR___V1362*/ meltfptr[1361] = (melt_ptr_t) & cdat->dstr_1196__OCURENVLOC_; cdat->dstr_1196__OCURENVLOC_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1196__OCURENVLOC_.val, "_OCURENVLOC_", sizeof (cdat->dstr_1196__OCURENVLOC_.val) - 1); cdat->dstr_1196__OCURENVLOC_.val[12] = (char) 0; cdat->dstr_1196__OCURENVLOC_.slen = 12; /*iniobj dsym_1197__PREVENVLOC_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1363*/ meltfptr[1362]) /*_.VALDATA___V1363*/ meltfptr[1362] = (melt_ptr_t) & cdat->dsym_1197__PREVENVLOC_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1197__PREVENVLOC_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1197__PREVENVLOC_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1197__PREVENVLOC_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1197__PREVENVLOC_.obj_hash = 903971913; cdat->dsym_1197__PREVENVLOC_.obj_len = 3; /*inistring dstr_1198__PREVENVLOC_*/ /*_.VALSTR___V1364*/ meltfptr[1363] = (melt_ptr_t) & cdat->dstr_1198__PREVENVLOC_; cdat->dstr_1198__PREVENVLOC_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1198__PREVENVLOC_.val, "_PREVENVLOC_", sizeof (cdat->dstr_1198__PREVENVLOC_.val) - 1); cdat->dstr_1198__PREVENVLOC_.val[12] = (char) 0; cdat->dstr_1198__PREVENVLOC_.slen = 12; /*iniobj dsym_1199__OLITVALUETUPLOC_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1365*/ meltfptr[1364]) /*_.VALDATA___V1365*/ meltfptr[1364] = (melt_ptr_t) & cdat->dsym_1199__OLITVALUETUPLOC_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1199__OLITVALUETUPLOC_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1199__OLITVALUETUPLOC_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1199__OLITVALUETUPLOC_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1199__OLITVALUETUPLOC_.obj_hash = 786879235; cdat->dsym_1199__OLITVALUETUPLOC_.obj_len = 3; /*inistring dstr_1200__OLITVALUETUPLOC*/ /*_.VALSTR___V1366*/ meltfptr[1365] = (melt_ptr_t) & cdat->dstr_1200__OLITVALUETUPLOC; cdat->dstr_1200__OLITVALUETUPLOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1200__OLITVALUETUPLOC.val, "_OLITVALUETUPLOC_", sizeof (cdat->dstr_1200__OLITVALUETUPLOC. val) - 1); cdat->dstr_1200__OLITVALUETUPLOC.val[17] = (char) 0; cdat->dstr_1200__OLITVALUETUPLOC.slen = 17; /*inirout drout_1201__LAMBDA_ */ /*_.VALROUT___V1367*/ meltfptr[1366] = (melt_ptr_t) & cdat->drout_1201__LAMBDA_; cdat->drout_1201__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1201__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:1640", MELT_ROUTDESCR_LEN - 1); cdat->drout_1201__LAMBDA_.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1201__LAMBDA_, meltrout_32_warmelt_genobj_LAMBDA___12__); /*iniobj dsym_1202__CLASS_NREP_LITERALNAMEDVALUE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1381*/ meltfptr[1380]) /*_.VALDATA___V1381*/ meltfptr[1380] = (melt_ptr_t) & cdat->dsym_1202__CLASS_NREP_LITERALNAMEDVALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1202__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_1202__CLASS_NREP_LITERALNAMEDVALUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1202__CLASS_NREP_LITERALNAMEDVALUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1202__CLASS_NREP_LITERALNAMEDVALUE.obj_hash = 289245242; cdat->dsym_1202__CLASS_NREP_LITERALNAMEDVALUE.obj_len = 3; /*inistring dstr_1203__CLASS_NREP_LITER*/ /*_.VALSTR___V1382*/ meltfptr[1381] = (melt_ptr_t) & cdat->dstr_1203__CLASS_NREP_LITER; cdat->dstr_1203__CLASS_NREP_LITER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1203__CLASS_NREP_LITER.val, "CLASS_NREP_LITERALNAMEDVALUE", sizeof (cdat->dstr_1203__CLASS_NREP_LITER. val) - 1); cdat->dstr_1203__CLASS_NREP_LITER.val[28] = (char) 0; cdat->dstr_1203__CLASS_NREP_LITER.slen = 28; /*iniobj dsym_1204__CLASS_NREP_LITERALVALUE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1383*/ meltfptr[1382]) /*_.VALDATA___V1383*/ meltfptr[1382] = (melt_ptr_t) & cdat->dsym_1204__CLASS_NREP_LITERALVALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1204__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_1204__CLASS_NREP_LITERALVALUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1204__CLASS_NREP_LITERALVALUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1204__CLASS_NREP_LITERALVALUE.obj_hash = 562300827; cdat->dsym_1204__CLASS_NREP_LITERALVALUE.obj_len = 3; /*inistring dstr_1205__CLASS_NREP_LITER*/ /*_.VALSTR___V1384*/ meltfptr[1383] = (melt_ptr_t) & cdat->dstr_1205__CLASS_NREP_LITER; cdat->dstr_1205__CLASS_NREP_LITER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1205__CLASS_NREP_LITER.val, "CLASS_NREP_LITERALVALUE", sizeof (cdat->dstr_1205__CLASS_NREP_LITER. val) - 1); cdat->dstr_1205__CLASS_NREP_LITER.val[23] = (char) 0; cdat->dstr_1205__CLASS_NREP_LITER.slen = 23; /*iniobj dsym_1206__CLASS_LITERAL_VALUE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1385*/ meltfptr[1384]) /*_.VALDATA___V1385*/ meltfptr[1384] = (melt_ptr_t) & cdat->dsym_1206__CLASS_LITERAL_VALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1206__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_1206__CLASS_LITERAL_VALUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1206__CLASS_LITERAL_VALUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1206__CLASS_LITERAL_VALUE.obj_hash = 801101132; cdat->dsym_1206__CLASS_LITERAL_VALUE.obj_len = 3; /*inistring dstr_1207__CLASS_LITERAL_VA*/ /*_.VALSTR___V1386*/ meltfptr[1385] = (melt_ptr_t) & cdat->dstr_1207__CLASS_LITERAL_VA; cdat->dstr_1207__CLASS_LITERAL_VA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1207__CLASS_LITERAL_VA.val, "CLASS_LITERAL_VALUE", sizeof (cdat->dstr_1207__CLASS_LITERAL_VA. val) - 1); cdat->dstr_1207__CLASS_LITERAL_VA.val[19] = (char) 0; cdat->dstr_1207__CLASS_LITERAL_VA.slen = 19; /*iniobj dsym_1208__REFERENCED_VALUE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1387*/ meltfptr[1386]) /*_.VALDATA___V1387*/ meltfptr[1386] = (melt_ptr_t) & cdat->dsym_1208__REFERENCED_VALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1208__REFERENCED_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_1208__REFERENCED_VALUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1208__REFERENCED_VALUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1208__REFERENCED_VALUE.obj_hash = 333195267; cdat->dsym_1208__REFERENCED_VALUE.obj_len = 3; /*inistring dstr_1209__REFERENCED_VALUE*/ /*_.VALSTR___V1388*/ meltfptr[1387] = (melt_ptr_t) & cdat->dstr_1209__REFERENCED_VALUE; cdat->dstr_1209__REFERENCED_VALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1209__REFERENCED_VALUE.val, "REFERENCED_VALUE", sizeof (cdat->dstr_1209__REFERENCED_VALUE. val) - 1); cdat->dstr_1209__REFERENCED_VALUE.val[16] = (char) 0; cdat->dstr_1209__REFERENCED_VALUE.slen = 16; /*iniobj dsym_1210__ENV_PREV*/ /*uniqueobj*/ if (! /*_.VALDATA___V1389*/ meltfptr[1388]) /*_.VALDATA___V1389*/ meltfptr[1388] = (melt_ptr_t) & cdat->dsym_1210__ENV_PREV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1210__ENV_PREV", melt_magic_discr ((melt_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__ENV_PREV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1210__ENV_PREV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1210__ENV_PREV.obj_hash = 363634370; cdat->dsym_1210__ENV_PREV.obj_len = 3; /*inistring dstr_1211__ENV_PREV*/ /*_.VALSTR___V1390*/ meltfptr[1389] = (melt_ptr_t) & cdat->dstr_1211__ENV_PREV; cdat->dstr_1211__ENV_PREV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1211__ENV_PREV.val, "ENV_PREV", sizeof (cdat->dstr_1211__ENV_PREV.val) - 1); cdat->dstr_1211__ENV_PREV.val[8] = (char) 0; cdat->dstr_1211__ENV_PREV.slen = 8; /*inirout drout_1212__LAMBDA_ */ /*_.VALROUT___V1368*/ meltfptr[1367] = (melt_ptr_t) & cdat->drout_1212__LAMBDA_; cdat->drout_1212__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1212__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:1704", MELT_ROUTDESCR_LEN - 1); cdat->drout_1212__LAMBDA_.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1212__LAMBDA_, meltrout_33_warmelt_genobj_LAMBDA___13__); /*inirout drout_1213__LAMBDA_ */ /*_.VALROUT___V1369*/ meltfptr[1368] = (melt_ptr_t) & cdat->drout_1213__LAMBDA_; cdat->drout_1213__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1213__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:1718", MELT_ROUTDESCR_LEN - 1); cdat->drout_1213__LAMBDA_.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1213__LAMBDA_, meltrout_34_warmelt_genobj_LAMBDA___14__); /*inirout drout_1214__LAMBDA_ */ /*_.VALROUT___V1370*/ meltfptr[1369] = (melt_ptr_t) & cdat->drout_1214__LAMBDA_; cdat->drout_1214__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1214__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:1729", MELT_ROUTDESCR_LEN - 1); cdat->drout_1214__LAMBDA_.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1214__LAMBDA_, meltrout_35_warmelt_genobj_LAMBDA___15__); /*inirout drout_1215__LAMBDA_ */ /*_.VALROUT___V1371*/ meltfptr[1370] = (melt_ptr_t) & cdat->drout_1215__LAMBDA_; cdat->drout_1215__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1215__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:1759", MELT_ROUTDESCR_LEN - 1); cdat->drout_1215__LAMBDA_.nbval = 8; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1215__LAMBDA_, meltrout_36_warmelt_genobj_LAMBDA___16__); /*iniobj dsym_1216__COMPILE2OBJ_INITPROC*/ /*uniqueobj*/ if (! /*_.VALDATA___V1391*/ meltfptr[1390]) /*_.VALDATA___V1391*/ meltfptr[1390] = (melt_ptr_t) & cdat->dsym_1216__COMPILE2OBJ_INITPROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1216__COMPILE2OBJ_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_1216__COMPILE2OBJ_INITPROC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1216__COMPILE2OBJ_INITPROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1216__COMPILE2OBJ_INITPROC.obj_hash = 795051323; cdat->dsym_1216__COMPILE2OBJ_INITPROC.obj_len = 3; /*inistring dstr_1217__COMPILE2OBJ_INIT*/ /*_.VALSTR___V1392*/ meltfptr[1391] = (melt_ptr_t) & cdat->dstr_1217__COMPILE2OBJ_INIT; cdat->dstr_1217__COMPILE2OBJ_INIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1217__COMPILE2OBJ_INIT.val, "COMPILE2OBJ_INITPROC", sizeof (cdat->dstr_1217__COMPILE2OBJ_INIT. val) - 1); cdat->dstr_1217__COMPILE2OBJ_INIT.val[20] = (char) 0; cdat->dstr_1217__COMPILE2OBJ_INIT.slen = 20; /*iniobj dsym_1218__COMPILE2OBJ_INITEXTENDPROC*/ /*uniqueobj*/ if (! /*_.VALDATA___V1393*/ meltfptr[1392]) /*_.VALDATA___V1393*/ meltfptr[1392] = (melt_ptr_t) & cdat->dsym_1218__COMPILE2OBJ_INITEXTENDPROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1218__COMPILE2OBJ_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_1218__COMPILE2OBJ_INITEXTENDPROC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1218__COMPILE2OBJ_INITEXTENDPROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1218__COMPILE2OBJ_INITEXTENDPROC.obj_hash = 801786105; cdat->dsym_1218__COMPILE2OBJ_INITEXTENDPROC.obj_len = 3; /*inistring dstr_1219__COMPILE2OBJ_INIT*/ /*_.VALSTR___V1394*/ meltfptr[1393] = (melt_ptr_t) & cdat->dstr_1219__COMPILE2OBJ_INIT; cdat->dstr_1219__COMPILE2OBJ_INIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1219__COMPILE2OBJ_INIT.val, "COMPILE2OBJ_INITEXTENDPROC", sizeof (cdat->dstr_1219__COMPILE2OBJ_INIT. val) - 1); cdat->dstr_1219__COMPILE2OBJ_INIT.val[26] = (char) 0; cdat->dstr_1219__COMPILE2OBJ_INIT.slen = 26; /*iniobj dsym_1220__COMPILE2OBJ_PROCEDURE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1395*/ meltfptr[1394]) /*_.VALDATA___V1395*/ meltfptr[1394] = (melt_ptr_t) & cdat->dsym_1220__COMPILE2OBJ_PROCEDURE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1220__COMPILE2OBJ_PROCEDURE", melt_magic_discr ((melt_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__COMPILE2OBJ_PROCEDURE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1220__COMPILE2OBJ_PROCEDURE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1220__COMPILE2OBJ_PROCEDURE.obj_hash = 315972622; cdat->dsym_1220__COMPILE2OBJ_PROCEDURE.obj_len = 3; /*inistring dstr_1221__COMPILE2OBJ_PROC*/ /*_.VALSTR___V1396*/ meltfptr[1395] = (melt_ptr_t) & cdat->dstr_1221__COMPILE2OBJ_PROC; cdat->dstr_1221__COMPILE2OBJ_PROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1221__COMPILE2OBJ_PROC.val, "COMPILE2OBJ_PROCEDURE", sizeof (cdat->dstr_1221__COMPILE2OBJ_PROC. val) - 1); cdat->dstr_1221__COMPILE2OBJ_PROC.val[21] = (char) 0; cdat->dstr_1221__COMPILE2OBJ_PROC.slen = 21; /*iniobj dsym_1222__VARIADIC_INDEX_IDSTR*/ /*uniqueobj*/ if (! /*_.VALDATA___V1397*/ meltfptr[1396]) /*_.VALDATA___V1397*/ meltfptr[1396] = (melt_ptr_t) & cdat->dsym_1222__VARIADIC_INDEX_IDSTR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1222__VARIADIC_INDEX_IDSTR", melt_magic_discr ((melt_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__VARIADIC_INDEX_IDSTR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1222__VARIADIC_INDEX_IDSTR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1222__VARIADIC_INDEX_IDSTR.obj_hash = 890084931; cdat->dsym_1222__VARIADIC_INDEX_IDSTR.obj_len = 3; /*inistring dstr_1223__VARIADIC_INDEX_I*/ /*_.VALSTR___V1398*/ meltfptr[1397] = (melt_ptr_t) & cdat->dstr_1223__VARIADIC_INDEX_I; cdat->dstr_1223__VARIADIC_INDEX_I.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1223__VARIADIC_INDEX_I.val, "VARIADIC_INDEX_IDSTR", sizeof (cdat->dstr_1223__VARIADIC_INDEX_I. val) - 1); cdat->dstr_1223__VARIADIC_INDEX_I.val[20] = (char) 0; cdat->dstr_1223__VARIADIC_INDEX_I.slen = 20; /*iniobj dsym_1224__VARIADIC_LENGTH_IDSTR*/ /*uniqueobj*/ if (! /*_.VALDATA___V1399*/ meltfptr[1398]) /*_.VALDATA___V1399*/ meltfptr[1398] = (melt_ptr_t) & cdat->dsym_1224__VARIADIC_LENGTH_IDSTR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1224__VARIADIC_LENGTH_IDSTR", melt_magic_discr ((melt_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__VARIADIC_LENGTH_IDSTR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1224__VARIADIC_LENGTH_IDSTR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1224__VARIADIC_LENGTH_IDSTR.obj_hash = 768398948; cdat->dsym_1224__VARIADIC_LENGTH_IDSTR.obj_len = 3; /*inistring dstr_1225__VARIADIC_LENGTH_*/ /*_.VALSTR___V1400*/ meltfptr[1399] = (melt_ptr_t) & cdat->dstr_1225__VARIADIC_LENGTH_; cdat->dstr_1225__VARIADIC_LENGTH_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1225__VARIADIC_LENGTH_.val, "VARIADIC_LENGTH_IDSTR", sizeof (cdat->dstr_1225__VARIADIC_LENGTH_. val) - 1); cdat->dstr_1225__VARIADIC_LENGTH_.val[21] = (char) 0; cdat->dstr_1225__VARIADIC_LENGTH_.slen = 21; /*inirout drout_1226__GET_FREE_OBJLOCPTR */ /*_.VALROUT___V1264*/ meltfptr[1263] = (melt_ptr_t) & cdat->drout_1226__GET_FREE_OBJLOCPTR; cdat->drout_1226__GET_FREE_OBJLOCPTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1226__GET_FREE_OBJLOCPTR.routdescr, "GET_FREE_OBJLOCPTR @warmelt-genobj.melt:1837", MELT_ROUTDESCR_LEN - 1); cdat->drout_1226__GET_FREE_OBJLOCPTR.nbval = 9; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1226__GET_FREE_OBJLOCPTR, meltrout_37_warmelt_genobj_GET_FREE_OBJLOCPTR); /*iniclos dclo_1227__GET_FREE_OBJLOCPTR */ /*_.VALCLO___V1263*/ meltfptr[1262] = (melt_ptr_t) & cdat->dclo_1227__GET_FREE_OBJLOCPTR; cdat->dclo_1227__GET_FREE_OBJLOCPTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1227__GET_FREE_OBJLOCPTR.nbval = 0; /*inirout drout_1228__GET_FREE_OBJLOCLONG */ /*_.VALROUT___V1268*/ meltfptr[1267] = (melt_ptr_t) & cdat->drout_1228__GET_FREE_OBJLOCLONG; cdat->drout_1228__GET_FREE_OBJLOCLONG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1228__GET_FREE_OBJLOCLONG.routdescr, "GET_FREE_OBJLOCLONG @warmelt-genobj.melt:1886", MELT_ROUTDESCR_LEN - 1); cdat->drout_1228__GET_FREE_OBJLOCLONG.nbval = 9; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1228__GET_FREE_OBJLOCLONG, meltrout_38_warmelt_genobj_GET_FREE_OBJLOCLONG); /*iniclos dclo_1229__GET_FREE_OBJLOCLONG */ /*_.VALCLO___V1267*/ meltfptr[1266] = (melt_ptr_t) & cdat->dclo_1229__GET_FREE_OBJLOCLONG; cdat->dclo_1229__GET_FREE_OBJLOCLONG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1229__GET_FREE_OBJLOCLONG.nbval = 0; /*inirout drout_1230__GET_FREE_OBJLOCTYPED */ /*_.VALROUT___V1270*/ meltfptr[1269] = (melt_ptr_t) & cdat->drout_1230__GET_FREE_OBJLOCTYPED; cdat->drout_1230__GET_FREE_OBJLOCTYPED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1230__GET_FREE_OBJLOCTYPED.routdescr, "GET_FREE_OBJLOCTYPED @warmelt-genobj.melt:1929", MELT_ROUTDESCR_LEN - 1); cdat->drout_1230__GET_FREE_OBJLOCTYPED.nbval = 15; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1230__GET_FREE_OBJLOCTYPED, meltrout_39_warmelt_genobj_GET_FREE_OBJLOCTYPED); /*iniclos dclo_1231__GET_FREE_OBJLOCTYPED */ /*_.VALCLO___V1269*/ meltfptr[1268] = (melt_ptr_t) & cdat->dclo_1231__GET_FREE_OBJLOCTYPED; cdat->dclo_1231__GET_FREE_OBJLOCTYPED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1231__GET_FREE_OBJLOCTYPED.nbval = 0; /*inirout drout_1232__DISPOSE_OBJLOC */ /*_.VALROUT___V1401*/ meltfptr[1400] = (melt_ptr_t) & cdat->drout_1232__DISPOSE_OBJLOC; cdat->drout_1232__DISPOSE_OBJLOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1232__DISPOSE_OBJLOC.routdescr, "DISPOSE_OBJLOC @warmelt-genobj.melt:1989", MELT_ROUTDESCR_LEN - 1); cdat->drout_1232__DISPOSE_OBJLOC.nbval = 8; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1232__DISPOSE_OBJLOC, meltrout_40_warmelt_genobj_DISPOSE_OBJLOC); /*iniclos dclo_1233__DISPOSE_OBJLOC */ /*_.VALCLO___V1402*/ meltfptr[1401] = (melt_ptr_t) & cdat->dclo_1233__DISPOSE_OBJLOC; cdat->dclo_1233__DISPOSE_OBJLOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1233__DISPOSE_OBJLOC.nbval = 0; /*inirout drout_1234__DISPOSE_BND_OBJ */ /*_.VALROUT___V1403*/ meltfptr[1402] = (melt_ptr_t) & cdat->drout_1234__DISPOSE_BND_OBJ; cdat->drout_1234__DISPOSE_BND_OBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1234__DISPOSE_BND_OBJ.routdescr, "DISPOSE_BND_OBJ @warmelt-genobj.melt:2020", MELT_ROUTDESCR_LEN - 1); cdat->drout_1234__DISPOSE_BND_OBJ.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1234__DISPOSE_BND_OBJ, meltrout_41_warmelt_genobj_DISPOSE_BND_OBJ); /*iniclos dclo_1235__DISPOSE_BND_OBJ */ /*_.VALCLO___V1404*/ meltfptr[1403] = (melt_ptr_t) & cdat->dclo_1235__DISPOSE_BND_OBJ; cdat->dclo_1235__DISPOSE_BND_OBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1235__DISPOSE_BND_OBJ.nbval = 0; /*iniobj dsym_1236__CLASS_LET_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1405*/ meltfptr[1404]) /*_.VALDATA___V1405*/ meltfptr[1404] = (melt_ptr_t) & cdat->dsym_1236__CLASS_LET_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1236__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_1236__CLASS_LET_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1236__CLASS_LET_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1236__CLASS_LET_BINDING.obj_hash = 373730517; cdat->dsym_1236__CLASS_LET_BINDING.obj_len = 3; /*inistring dstr_1237__CLASS_LET_BINDIN*/ /*_.VALSTR___V1406*/ meltfptr[1405] = (melt_ptr_t) & cdat->dstr_1237__CLASS_LET_BINDIN; cdat->dstr_1237__CLASS_LET_BINDIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1237__CLASS_LET_BINDIN.val, "CLASS_LET_BINDING", sizeof (cdat->dstr_1237__CLASS_LET_BINDIN. val) - 1); cdat->dstr_1237__CLASS_LET_BINDIN.val[17] = (char) 0; cdat->dstr_1237__CLASS_LET_BINDIN.slen = 17; /*inirout drout_1238__COMPILOBJ_NREP_CHUNK */ /*_.VALROUT___V1407*/ meltfptr[1406] = (melt_ptr_t) & cdat->drout_1238__COMPILOBJ_NREP_CHUNK; cdat->drout_1238__COMPILOBJ_NREP_CHUNK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1238__COMPILOBJ_NREP_CHUNK.routdescr, "COMPILOBJ_NREP_CHUNK @warmelt-genobj.melt:2041", MELT_ROUTDESCR_LEN - 1); cdat->drout_1238__COMPILOBJ_NREP_CHUNK.nbval = 12; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1238__COMPILOBJ_NREP_CHUNK, meltrout_42_warmelt_genobj_COMPILOBJ_NREP_CHUNK); /*iniclos dclo_1239__COMPILOBJ_NREP_CHUNK */ /*_.VALCLO___V1409*/ meltfptr[1408] = (melt_ptr_t) & cdat->dclo_1239__COMPILOBJ_NREP_CHUNK; cdat->dclo_1239__COMPILOBJ_NREP_CHUNK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1239__COMPILOBJ_NREP_CHUNK.nbval = 0; /*iniobj dsym_1240__CLASS_NREP_CHUNK*/ /*uniqueobj*/ if (! /*_.VALDATA___V1410*/ meltfptr[1409]) /*_.VALDATA___V1410*/ meltfptr[1409] = (melt_ptr_t) & cdat->dsym_1240__CLASS_NREP_CHUNK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1240__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_1240__CLASS_NREP_CHUNK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1240__CLASS_NREP_CHUNK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1240__CLASS_NREP_CHUNK.obj_hash = 877025959; cdat->dsym_1240__CLASS_NREP_CHUNK.obj_len = 3; /*inistring dstr_1241__CLASS_NREP_CHUNK*/ /*_.VALSTR___V1411*/ meltfptr[1410] = (melt_ptr_t) & cdat->dstr_1241__CLASS_NREP_CHUNK; cdat->dstr_1241__CLASS_NREP_CHUNK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1241__CLASS_NREP_CHUNK.val, "CLASS_NREP_CHUNK", sizeof (cdat->dstr_1241__CLASS_NREP_CHUNK. val) - 1); cdat->dstr_1241__CLASS_NREP_CHUNK.val[16] = (char) 0; cdat->dstr_1241__CLASS_NREP_CHUNK.slen = 16; /*inirout drout_1242__LAMBDA_ */ /*_.VALROUT___V1408*/ meltfptr[1407] = (melt_ptr_t) & cdat->drout_1242__LAMBDA_; cdat->drout_1242__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1242__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:2055", MELT_ROUTDESCR_LEN - 1); cdat->drout_1242__LAMBDA_.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1242__LAMBDA_, meltrout_43_warmelt_genobj_LAMBDA___17__); /*inirout drout_1243__GETCTYPE_TYPEXPR */ /*_.VALROUT___V1412*/ meltfptr[1411] = (melt_ptr_t) & cdat->drout_1243__GETCTYPE_TYPEXPR; cdat->drout_1243__GETCTYPE_TYPEXPR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1243__GETCTYPE_TYPEXPR.routdescr, "GETCTYPE_TYPEXPR @warmelt-genobj.melt:2080", MELT_ROUTDESCR_LEN - 1); cdat->drout_1243__GETCTYPE_TYPEXPR.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1243__GETCTYPE_TYPEXPR, meltrout_44_warmelt_genobj_GETCTYPE_TYPEXPR); /*iniclos dclo_1244__GETCTYPE_TYPEXPR */ /*_.VALCLO___V1413*/ meltfptr[1412] = (melt_ptr_t) & cdat->dclo_1244__GETCTYPE_TYPEXPR; cdat->dclo_1244__GETCTYPE_TYPEXPR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1244__GETCTYPE_TYPEXPR.nbval = 0; /*iniobj dsym_1245__CLASS_NREP_TYPED_EXPRESSION*/ /*uniqueobj*/ if (! /*_.VALDATA___V1414*/ meltfptr[1413]) /*_.VALDATA___V1414*/ meltfptr[1413] = (melt_ptr_t) & cdat->dsym_1245__CLASS_NREP_TYPED_EXPRESSION; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1245__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_1245__CLASS_NREP_TYPED_EXPRESSION", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1245__CLASS_NREP_TYPED_EXPRESSION.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1245__CLASS_NREP_TYPED_EXPRESSION.obj_hash = 826853213; cdat->dsym_1245__CLASS_NREP_TYPED_EXPRESSION.obj_len = 3; /*inistring dstr_1246__CLASS_NREP_TYPED*/ /*_.VALSTR___V1415*/ meltfptr[1414] = (melt_ptr_t) & cdat->dstr_1246__CLASS_NREP_TYPED; cdat->dstr_1246__CLASS_NREP_TYPED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1246__CLASS_NREP_TYPED.val, "CLASS_NREP_TYPED_EXPRESSION", sizeof (cdat->dstr_1246__CLASS_NREP_TYPED. val) - 1); cdat->dstr_1246__CLASS_NREP_TYPED.val[27] = (char) 0; cdat->dstr_1246__CLASS_NREP_TYPED.slen = 27; /*inirout drout_1247__COMPILOBJ_NREP_NIL */ /*_.VALROUT___V1416*/ meltfptr[1415] = (melt_ptr_t) & cdat->drout_1247__COMPILOBJ_NREP_NIL; cdat->drout_1247__COMPILOBJ_NREP_NIL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1247__COMPILOBJ_NREP_NIL.routdescr, "COMPILOBJ_NREP_NIL @warmelt-genobj.melt:2086", MELT_ROUTDESCR_LEN - 1); cdat->drout_1247__COMPILOBJ_NREP_NIL.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1247__COMPILOBJ_NREP_NIL, meltrout_45_warmelt_genobj_COMPILOBJ_NREP_NIL); /*iniclos dclo_1248__COMPILOBJ_NREP_NIL */ /*_.VALCLO___V1417*/ meltfptr[1416] = (melt_ptr_t) & cdat->dclo_1248__COMPILOBJ_NREP_NIL; cdat->dclo_1248__COMPILOBJ_NREP_NIL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1248__COMPILOBJ_NREP_NIL.nbval = 0; /*iniobj dsym_1249__CLASS_NREP_NIL*/ /*uniqueobj*/ if (! /*_.VALDATA___V1418*/ meltfptr[1417]) /*_.VALDATA___V1418*/ meltfptr[1417] = (melt_ptr_t) & cdat->dsym_1249__CLASS_NREP_NIL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1249__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_1249__CLASS_NREP_NIL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1249__CLASS_NREP_NIL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1249__CLASS_NREP_NIL.obj_hash = 607452589; cdat->dsym_1249__CLASS_NREP_NIL.obj_len = 3; /*inistring dstr_1250__CLASS_NREP_NIL*/ /*_.VALSTR___V1419*/ meltfptr[1418] = (melt_ptr_t) & cdat->dstr_1250__CLASS_NREP_NIL; cdat->dstr_1250__CLASS_NREP_NIL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1250__CLASS_NREP_NIL.val, "CLASS_NREP_NIL", sizeof (cdat->dstr_1250__CLASS_NREP_NIL.val) - 1); cdat->dstr_1250__CLASS_NREP_NIL.val[14] = (char) 0; cdat->dstr_1250__CLASS_NREP_NIL.slen = 14; /*inirout drout_1251__COMPILOBJ_NREP_COMMENT */ /*_.VALROUT___V1420*/ meltfptr[1419] = (melt_ptr_t) & cdat->drout_1251__COMPILOBJ_NREP_COMMENT; cdat->drout_1251__COMPILOBJ_NREP_COMMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1251__COMPILOBJ_NREP_COMMENT.routdescr, "COMPILOBJ_NREP_COMMENT @warmelt-genobj.melt:2097", MELT_ROUTDESCR_LEN - 1); cdat->drout_1251__COMPILOBJ_NREP_COMMENT.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1251__COMPILOBJ_NREP_COMMENT, meltrout_46_warmelt_genobj_COMPILOBJ_NREP_COMMENT); /*iniclos dclo_1252__COMPILOBJ_NREP_COMMENT */ /*_.VALCLO___V1421*/ meltfptr[1420] = (melt_ptr_t) & cdat->dclo_1252__COMPILOBJ_NREP_COMMENT; cdat->dclo_1252__COMPILOBJ_NREP_COMMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1252__COMPILOBJ_NREP_COMMENT.nbval = 0; /*iniobj dsym_1253__CLASS_NREP_COMMENT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1422*/ meltfptr[1421]) /*_.VALDATA___V1422*/ meltfptr[1421] = (melt_ptr_t) & cdat->dsym_1253__CLASS_NREP_COMMENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1253__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_1253__CLASS_NREP_COMMENT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1253__CLASS_NREP_COMMENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1253__CLASS_NREP_COMMENT.obj_hash = 351814368; cdat->dsym_1253__CLASS_NREP_COMMENT.obj_len = 3; /*inistring dstr_1254__CLASS_NREP_COMME*/ /*_.VALSTR___V1423*/ meltfptr[1422] = (melt_ptr_t) & cdat->dstr_1254__CLASS_NREP_COMME; cdat->dstr_1254__CLASS_NREP_COMME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1254__CLASS_NREP_COMME.val, "CLASS_NREP_COMMENT", sizeof (cdat->dstr_1254__CLASS_NREP_COMME. val) - 1); cdat->dstr_1254__CLASS_NREP_COMME.val[18] = (char) 0; cdat->dstr_1254__CLASS_NREP_COMME.slen = 18; /*inirout drout_1255__COMPILOBJ_NREP_LOCSYMOCC */ /*_.VALROUT___V1424*/ meltfptr[1423] = (melt_ptr_t) & cdat->drout_1255__COMPILOBJ_NREP_LOCSYMOCC; cdat->drout_1255__COMPILOBJ_NREP_LOCSYMOCC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1255__COMPILOBJ_NREP_LOCSYMOCC.routdescr, "COMPILOBJ_NREP_LOCSYMOCC @warmelt-genobj.melt:2121", MELT_ROUTDESCR_LEN - 1); cdat->drout_1255__COMPILOBJ_NREP_LOCSYMOCC.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1255__COMPILOBJ_NREP_LOCSYMOCC, meltrout_47_warmelt_genobj_COMPILOBJ_NREP_LOCSYMOCC); /*iniclos dclo_1256__COMPILOBJ_NREP_LOCSYMOCC */ /*_.VALCLO___V1425*/ meltfptr[1424] = (melt_ptr_t) & cdat->dclo_1256__COMPILOBJ_NREP_LOCSYMOCC; cdat->dclo_1256__COMPILOBJ_NREP_LOCSYMOCC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1256__COMPILOBJ_NREP_LOCSYMOCC.nbval = 0; /*iniobj dsym_1257__CLASS_NREP_LOCSYMOCC*/ /*uniqueobj*/ if (! /*_.VALDATA___V1426*/ meltfptr[1425]) /*_.VALDATA___V1426*/ meltfptr[1425] = (melt_ptr_t) & cdat->dsym_1257__CLASS_NREP_LOCSYMOCC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1257__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_1257__CLASS_NREP_LOCSYMOCC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1257__CLASS_NREP_LOCSYMOCC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1257__CLASS_NREP_LOCSYMOCC.obj_hash = 614887922; cdat->dsym_1257__CLASS_NREP_LOCSYMOCC.obj_len = 3; /*inistring dstr_1258__CLASS_NREP_LOCSY*/ /*_.VALSTR___V1427*/ meltfptr[1426] = (melt_ptr_t) & cdat->dstr_1258__CLASS_NREP_LOCSY; cdat->dstr_1258__CLASS_NREP_LOCSY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1258__CLASS_NREP_LOCSY.val, "CLASS_NREP_LOCSYMOCC", sizeof (cdat->dstr_1258__CLASS_NREP_LOCSY. val) - 1); cdat->dstr_1258__CLASS_NREP_LOCSY.val[20] = (char) 0; cdat->dstr_1258__CLASS_NREP_LOCSY.slen = 20; /*inirout drout_1259__COMPILOBJ_NREP_CLOSEDOCC */ /*_.VALROUT___V1428*/ meltfptr[1427] = (melt_ptr_t) & cdat->drout_1259__COMPILOBJ_NREP_CLOSEDOCC; cdat->drout_1259__COMPILOBJ_NREP_CLOSEDOCC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1259__COMPILOBJ_NREP_CLOSEDOCC.routdescr, "COMPILOBJ_NREP_CLOSEDOCC @warmelt-genobj.melt:2149", MELT_ROUTDESCR_LEN - 1); cdat->drout_1259__COMPILOBJ_NREP_CLOSEDOCC.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1259__COMPILOBJ_NREP_CLOSEDOCC, meltrout_48_warmelt_genobj_COMPILOBJ_NREP_CLOSEDOCC); /*iniclos dclo_1260__COMPILOBJ_NREP_CLOSEDOCC */ /*_.VALCLO___V1429*/ meltfptr[1428] = (melt_ptr_t) & cdat->dclo_1260__COMPILOBJ_NREP_CLOSEDOCC; cdat->dclo_1260__COMPILOBJ_NREP_CLOSEDOCC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1260__COMPILOBJ_NREP_CLOSEDOCC.nbval = 0; /*iniobj dsym_1261__CLASS_NREP_CLOSEDOCC*/ /*uniqueobj*/ if (! /*_.VALDATA___V1430*/ meltfptr[1429]) /*_.VALDATA___V1430*/ meltfptr[1429] = (melt_ptr_t) & cdat->dsym_1261__CLASS_NREP_CLOSEDOCC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1261__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_1261__CLASS_NREP_CLOSEDOCC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1261__CLASS_NREP_CLOSEDOCC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1261__CLASS_NREP_CLOSEDOCC.obj_hash = 907150232; cdat->dsym_1261__CLASS_NREP_CLOSEDOCC.obj_len = 3; /*inistring dstr_1262__CLASS_NREP_CLOSE*/ /*_.VALSTR___V1431*/ meltfptr[1430] = (melt_ptr_t) & cdat->dstr_1262__CLASS_NREP_CLOSE; cdat->dstr_1262__CLASS_NREP_CLOSE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1262__CLASS_NREP_CLOSE.val, "CLASS_NREP_CLOSEDOCC", sizeof (cdat->dstr_1262__CLASS_NREP_CLOSE. val) - 1); cdat->dstr_1262__CLASS_NREP_CLOSE.val[20] = (char) 0; cdat->dstr_1262__CLASS_NREP_CLOSE.slen = 20; /*inirout drout_1263__COMPILOBJ_NREP_CONSTOCC */ /*_.VALROUT___V1432*/ meltfptr[1431] = (melt_ptr_t) & cdat->drout_1263__COMPILOBJ_NREP_CONSTOCC; cdat->drout_1263__COMPILOBJ_NREP_CONSTOCC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1263__COMPILOBJ_NREP_CONSTOCC.routdescr, "COMPILOBJ_NREP_CONSTOCC @warmelt-genobj.melt:2199", MELT_ROUTDESCR_LEN - 1); cdat->drout_1263__COMPILOBJ_NREP_CONSTOCC.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1263__COMPILOBJ_NREP_CONSTOCC, meltrout_49_warmelt_genobj_COMPILOBJ_NREP_CONSTOCC); /*iniclos dclo_1264__COMPILOBJ_NREP_CONSTOCC */ /*_.VALCLO___V1433*/ meltfptr[1432] = (melt_ptr_t) & cdat->dclo_1264__COMPILOBJ_NREP_CONSTOCC; cdat->dclo_1264__COMPILOBJ_NREP_CONSTOCC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1264__COMPILOBJ_NREP_CONSTOCC.nbval = 0; /*iniobj dsym_1265__CLASS_NREP_CONSTOCC*/ /*uniqueobj*/ if (! /*_.VALDATA___V1434*/ meltfptr[1433]) /*_.VALDATA___V1434*/ meltfptr[1433] = (melt_ptr_t) & cdat->dsym_1265__CLASS_NREP_CONSTOCC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1265__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_1265__CLASS_NREP_CONSTOCC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1265__CLASS_NREP_CONSTOCC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1265__CLASS_NREP_CONSTOCC.obj_hash = 1065884175; cdat->dsym_1265__CLASS_NREP_CONSTOCC.obj_len = 3; /*inistring dstr_1266__CLASS_NREP_CONST*/ /*_.VALSTR___V1435*/ meltfptr[1434] = (melt_ptr_t) & cdat->dstr_1266__CLASS_NREP_CONST; cdat->dstr_1266__CLASS_NREP_CONST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1266__CLASS_NREP_CONST.val, "CLASS_NREP_CONSTOCC", sizeof (cdat->dstr_1266__CLASS_NREP_CONST. val) - 1); cdat->dstr_1266__CLASS_NREP_CONST.val[19] = (char) 0; cdat->dstr_1266__CLASS_NREP_CONST.slen = 19; /*inirout drout_1267__COMPILOBJ_NREP_IMPORTEDVAL */ /*_.VALROUT___V1436*/ meltfptr[1435] = (melt_ptr_t) & cdat->drout_1267__COMPILOBJ_NREP_IMPORTEDVAL; cdat->drout_1267__COMPILOBJ_NREP_IMPORTEDVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1267__COMPILOBJ_NREP_IMPORTEDVAL.routdescr, "COMPILOBJ_NREP_IMPORTEDVAL @warmelt-genobj.melt:2247", MELT_ROUTDESCR_LEN - 1); cdat->drout_1267__COMPILOBJ_NREP_IMPORTEDVAL.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1267__COMPILOBJ_NREP_IMPORTEDVAL, meltrout_50_warmelt_genobj_COMPILOBJ_NREP_IMPORTEDVAL); /*iniclos dclo_1268__COMPILOBJ_NREP_IMPORTEDVAL */ /*_.VALCLO___V1437*/ meltfptr[1436] = (melt_ptr_t) & cdat->dclo_1268__COMPILOBJ_NREP_IMPORTEDVAL; cdat->dclo_1268__COMPILOBJ_NREP_IMPORTEDVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1268__COMPILOBJ_NREP_IMPORTEDVAL.nbval = 0; /*inirout drout_1269__COMPILOBJ_NREP_LITERALVALUE */ /*_.VALROUT___V1438*/ meltfptr[1437] = (melt_ptr_t) & cdat->drout_1269__COMPILOBJ_NREP_LITERALVALUE; cdat->drout_1269__COMPILOBJ_NREP_LITERALVALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1269__COMPILOBJ_NREP_LITERALVALUE.routdescr, "COMPILOBJ_NREP_LITERALVALUE @warmelt-genobj.melt:2263", MELT_ROUTDESCR_LEN - 1); cdat->drout_1269__COMPILOBJ_NREP_LITERALVALUE.nbval = 9; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1269__COMPILOBJ_NREP_LITERALVALUE, meltrout_51_warmelt_genobj_COMPILOBJ_NREP_LITERALVALUE); /*iniclos dclo_1270__COMPILOBJ_NREP_LITERALVALUE */ /*_.VALCLO___V1439*/ meltfptr[1438] = (melt_ptr_t) & cdat->dclo_1270__COMPILOBJ_NREP_LITERALVALUE; cdat->dclo_1270__COMPILOBJ_NREP_LITERALVALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1270__COMPILOBJ_NREP_LITERALVALUE.nbval = 0; /*iniobj dsym_1271__STRING4OUT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1440*/ meltfptr[1439]) /*_.VALDATA___V1440*/ meltfptr[1439] = (melt_ptr_t) & cdat->dsym_1271__STRING4OUT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1271__STRING4OUT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1271__STRING4OUT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1271__STRING4OUT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1271__STRING4OUT.obj_hash = 209944893; cdat->dsym_1271__STRING4OUT.obj_len = 3; /*inistring dstr_1272__STRING4OUT*/ /*_.VALSTR___V1441*/ meltfptr[1440] = (melt_ptr_t) & cdat->dstr_1272__STRING4OUT; cdat->dstr_1272__STRING4OUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1272__STRING4OUT.val, "STRING4OUT", sizeof (cdat->dstr_1272__STRING4OUT.val) - 1); cdat->dstr_1272__STRING4OUT.val[10] = (char) 0; cdat->dstr_1272__STRING4OUT.slen = 10; /*inirout drout_1273__COMPILOBJ_NREP_DEFINEDCONSTANT */ /*_.VALROUT___V1442*/ meltfptr[1441] = (melt_ptr_t) & cdat->drout_1273__COMPILOBJ_NREP_DEFINEDCONSTANT; cdat->drout_1273__COMPILOBJ_NREP_DEFINEDCONSTANT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1273__COMPILOBJ_NREP_DEFINEDCONSTANT.routdescr, "COMPILOBJ_NREP_DEFINEDCONSTANT @warmelt-genobj.melt:2290", MELT_ROUTDESCR_LEN - 1); cdat->drout_1273__COMPILOBJ_NREP_DEFINEDCONSTANT.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat-> drout_1273__COMPILOBJ_NREP_DEFINEDCONSTANT, meltrout_52_warmelt_genobj_COMPILOBJ_NREP_DEFINEDCONSTANT); /*iniclos dclo_1274__COMPILOBJ_NREP_DEFINEDCONSTANT */ /*_.VALCLO___V1443*/ meltfptr[1442] = (melt_ptr_t) & cdat->dclo_1274__COMPILOBJ_NREP_DEFINEDCONSTANT; cdat->dclo_1274__COMPILOBJ_NREP_DEFINEDCONSTANT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1274__COMPILOBJ_NREP_DEFINEDCONSTANT.nbval = 0; /*iniobj dsym_1275__CLASS_NREP_DEFINED_CONSTANT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1444*/ meltfptr[1443]) /*_.VALDATA___V1444*/ meltfptr[1443] = (melt_ptr_t) & cdat->dsym_1275__CLASS_NREP_DEFINED_CONSTANT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1275__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_1275__CLASS_NREP_DEFINED_CONSTANT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1275__CLASS_NREP_DEFINED_CONSTANT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1275__CLASS_NREP_DEFINED_CONSTANT.obj_hash = 660592329; cdat->dsym_1275__CLASS_NREP_DEFINED_CONSTANT.obj_len = 3; /*inistring dstr_1276__CLASS_NREP_DEFIN*/ /*_.VALSTR___V1445*/ meltfptr[1444] = (melt_ptr_t) & cdat->dstr_1276__CLASS_NREP_DEFIN; cdat->dstr_1276__CLASS_NREP_DEFIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1276__CLASS_NREP_DEFIN.val, "CLASS_NREP_DEFINED_CONSTANT", sizeof (cdat->dstr_1276__CLASS_NREP_DEFIN. val) - 1); cdat->dstr_1276__CLASS_NREP_DEFIN.val[27] = (char) 0; cdat->dstr_1276__CLASS_NREP_DEFIN.slen = 27; /*inirout drout_1277__COMPILOBJ_NREP_QUASICONSTANT */ /*_.VALROUT___V1446*/ meltfptr[1445] = (melt_ptr_t) & cdat->drout_1277__COMPILOBJ_NREP_QUASICONSTANT; cdat->drout_1277__COMPILOBJ_NREP_QUASICONSTANT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1277__COMPILOBJ_NREP_QUASICONSTANT.routdescr, "COMPILOBJ_NREP_QUASICONSTANT @warmelt-genobj.melt:2309", MELT_ROUTDESCR_LEN - 1); cdat->drout_1277__COMPILOBJ_NREP_QUASICONSTANT.nbval = 11; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1277__COMPILOBJ_NREP_QUASICONSTANT, meltrout_53_warmelt_genobj_COMPILOBJ_NREP_QUASICONSTANT); /*iniclos dclo_1278__COMPILOBJ_NREP_QUASICONSTANT */ /*_.VALCLO___V1447*/ meltfptr[1446] = (melt_ptr_t) & cdat->dclo_1278__COMPILOBJ_NREP_QUASICONSTANT; cdat->dclo_1278__COMPILOBJ_NREP_QUASICONSTANT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1278__COMPILOBJ_NREP_QUASICONSTANT.nbval = 0; /*iniobj dsym_1279__CLASS_NREP_QUASICONSTANT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1448*/ meltfptr[1447]) /*_.VALDATA___V1448*/ meltfptr[1447] = (melt_ptr_t) & cdat->dsym_1279__CLASS_NREP_QUASICONSTANT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1279__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_1279__CLASS_NREP_QUASICONSTANT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1279__CLASS_NREP_QUASICONSTANT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1279__CLASS_NREP_QUASICONSTANT.obj_hash = 430834528; cdat->dsym_1279__CLASS_NREP_QUASICONSTANT.obj_len = 3; /*inistring dstr_1280__CLASS_NREP_QUASI*/ /*_.VALSTR___V1449*/ meltfptr[1448] = (melt_ptr_t) & cdat->dstr_1280__CLASS_NREP_QUASI; cdat->dstr_1280__CLASS_NREP_QUASI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1280__CLASS_NREP_QUASI.val, "CLASS_NREP_QUASICONSTANT", sizeof (cdat->dstr_1280__CLASS_NREP_QUASI. val) - 1); cdat->dstr_1280__CLASS_NREP_QUASI.val[24] = (char) 0; cdat->dstr_1280__CLASS_NREP_QUASI.slen = 24; /*inirout drout_1281__COMPILOBJ_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ /*_.VALROUT___V1450*/ meltfptr[1449] = (melt_ptr_t) & cdat-> drout_1281__COMPILOBJ_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER; cdat-> drout_1281__COMPILOBJ_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER. discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat-> drout_1281__COMPILOBJ_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER. routdescr, "COMPILOBJ_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER @warmelt-genobj.melt:2368", MELT_ROUTDESCR_LEN - 1); cdat-> drout_1281__COMPILOBJ_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER. nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&cdat-> drout_1281__COMPILOBJ_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER, meltrout_54_warmelt_genobj_COMPILOBJ_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER); /*iniclos dclo_1282__COMPILOBJ_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ /*_.VALCLO___V1451*/ meltfptr[1450] = (melt_ptr_t) & cdat-> dclo_1282__COMPILOBJ_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER; cdat-> dclo_1282__COMPILOBJ_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER. discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat-> dclo_1282__COMPILOBJ_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER. nbval = 0; /*iniobj dsym_1283__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1452*/ meltfptr[1451]) /*_.VALDATA___V1452*/ meltfptr[1451] = (melt_ptr_t) & cdat-> dsym_1283__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1283__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_1283__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1283__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER. meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1283__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER. obj_hash = 576407711; cdat->dsym_1283__CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER. obj_len = 3; /*inistring dstr_1284__CLASS_NREP_QUASI*/ /*_.VALSTR___V1453*/ meltfptr[1452] = (melt_ptr_t) & cdat->dstr_1284__CLASS_NREP_QUASI; cdat->dstr_1284__CLASS_NREP_QUASI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1284__CLASS_NREP_QUASI.val, "CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER", sizeof (cdat->dstr_1284__CLASS_NREP_QUASI. val) - 1); cdat->dstr_1284__CLASS_NREP_QUASI.val[58] = (char) 0; cdat->dstr_1284__CLASS_NREP_QUASI.slen = 58; /*inirout drout_1285__COMPILOBJ_NREP_FOREVER */ /*_.VALROUT___V1454*/ meltfptr[1453] = (melt_ptr_t) & cdat->drout_1285__COMPILOBJ_NREP_FOREVER; cdat->drout_1285__COMPILOBJ_NREP_FOREVER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1285__COMPILOBJ_NREP_FOREVER.routdescr, "COMPILOBJ_NREP_FOREVER @warmelt-genobj.melt:2396", MELT_ROUTDESCR_LEN - 1); cdat->drout_1285__COMPILOBJ_NREP_FOREVER.nbval = 12; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1285__COMPILOBJ_NREP_FOREVER, meltrout_55_warmelt_genobj_COMPILOBJ_NREP_FOREVER); /*iniclos dclo_1286__COMPILOBJ_NREP_FOREVER */ /*_.VALCLO___V1456*/ meltfptr[1455] = (melt_ptr_t) & cdat->dclo_1286__COMPILOBJ_NREP_FOREVER; cdat->dclo_1286__COMPILOBJ_NREP_FOREVER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1286__COMPILOBJ_NREP_FOREVER.nbval = 0; /*iniobj dsym_1287__CLASS_NREP_FOREVER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1457*/ meltfptr[1456]) /*_.VALDATA___V1457*/ meltfptr[1456] = (melt_ptr_t) & cdat->dsym_1287__CLASS_NREP_FOREVER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1287__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_1287__CLASS_NREP_FOREVER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1287__CLASS_NREP_FOREVER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1287__CLASS_NREP_FOREVER.obj_hash = 590813330; cdat->dsym_1287__CLASS_NREP_FOREVER.obj_len = 3; /*inistring dstr_1288__CLASS_NREP_FOREV*/ /*_.VALSTR___V1458*/ meltfptr[1457] = (melt_ptr_t) & cdat->dstr_1288__CLASS_NREP_FOREV; cdat->dstr_1288__CLASS_NREP_FOREV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1288__CLASS_NREP_FOREV.val, "CLASS_NREP_FOREVER", sizeof (cdat->dstr_1288__CLASS_NREP_FOREV. val) - 1); cdat->dstr_1288__CLASS_NREP_FOREV.val[18] = (char) 0; cdat->dstr_1288__CLASS_NREP_FOREV.slen = 18; /*iniobj dsym_1289__CLASS_LABEL_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1459*/ meltfptr[1458]) /*_.VALDATA___V1459*/ meltfptr[1458] = (melt_ptr_t) & cdat->dsym_1289__CLASS_LABEL_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1289__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_1289__CLASS_LABEL_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1289__CLASS_LABEL_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1289__CLASS_LABEL_BINDING.obj_hash = 513737494; cdat->dsym_1289__CLASS_LABEL_BINDING.obj_len = 3; /*inistring dstr_1290__CLASS_LABEL_BIND*/ /*_.VALSTR___V1460*/ meltfptr[1459] = (melt_ptr_t) & cdat->dstr_1290__CLASS_LABEL_BIND; cdat->dstr_1290__CLASS_LABEL_BIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1290__CLASS_LABEL_BIND.val, "CLASS_LABEL_BINDING", sizeof (cdat->dstr_1290__CLASS_LABEL_BIND. val) - 1); cdat->dstr_1290__CLASS_LABEL_BIND.val[19] = (char) 0; cdat->dstr_1290__CLASS_LABEL_BIND.slen = 19; /*inirout drout_1291__LAMBDA_ */ /*_.VALROUT___V1455*/ meltfptr[1454] = (melt_ptr_t) & cdat->drout_1291__LAMBDA_; cdat->drout_1291__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1291__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:2425", MELT_ROUTDESCR_LEN - 1); cdat->drout_1291__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1291__LAMBDA_, meltrout_56_warmelt_genobj_LAMBDA___18__); /*inirout drout_1292__COMPILOBJ_NREP_EXIT */ /*_.VALROUT___V1461*/ meltfptr[1460] = (melt_ptr_t) & cdat->drout_1292__COMPILOBJ_NREP_EXIT; cdat->drout_1292__COMPILOBJ_NREP_EXIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1292__COMPILOBJ_NREP_EXIT.routdescr, "COMPILOBJ_NREP_EXIT @warmelt-genobj.melt:2436", MELT_ROUTDESCR_LEN - 1); cdat->drout_1292__COMPILOBJ_NREP_EXIT.nbval = 10; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1292__COMPILOBJ_NREP_EXIT, meltrout_57_warmelt_genobj_COMPILOBJ_NREP_EXIT); /*iniclos dclo_1293__COMPILOBJ_NREP_EXIT */ /*_.VALCLO___V1462*/ meltfptr[1461] = (melt_ptr_t) & cdat->dclo_1293__COMPILOBJ_NREP_EXIT; cdat->dclo_1293__COMPILOBJ_NREP_EXIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1293__COMPILOBJ_NREP_EXIT.nbval = 0; /*iniobj dsym_1294__CLASS_NREP_EXIT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1463*/ meltfptr[1462]) /*_.VALDATA___V1463*/ meltfptr[1462] = (melt_ptr_t) & cdat->dsym_1294__CLASS_NREP_EXIT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1294__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_1294__CLASS_NREP_EXIT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1294__CLASS_NREP_EXIT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1294__CLASS_NREP_EXIT.obj_hash = 563709683; cdat->dsym_1294__CLASS_NREP_EXIT.obj_len = 3; /*inistring dstr_1295__CLASS_NREP_EXIT*/ /*_.VALSTR___V1464*/ meltfptr[1463] = (melt_ptr_t) & cdat->dstr_1295__CLASS_NREP_EXIT; cdat->dstr_1295__CLASS_NREP_EXIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1295__CLASS_NREP_EXIT.val, "CLASS_NREP_EXIT", sizeof (cdat->dstr_1295__CLASS_NREP_EXIT. val) - 1); cdat->dstr_1295__CLASS_NREP_EXIT.val[15] = (char) 0; cdat->dstr_1295__CLASS_NREP_EXIT.slen = 15; /*inirout drout_1296__COMPILOBJ_NREP_AGAIN */ /*_.VALROUT___V1465*/ meltfptr[1464] = (melt_ptr_t) & cdat->drout_1296__COMPILOBJ_NREP_AGAIN; cdat->drout_1296__COMPILOBJ_NREP_AGAIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1296__COMPILOBJ_NREP_AGAIN.routdescr, "COMPILOBJ_NREP_AGAIN @warmelt-genobj.melt:2477", MELT_ROUTDESCR_LEN - 1); cdat->drout_1296__COMPILOBJ_NREP_AGAIN.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1296__COMPILOBJ_NREP_AGAIN, meltrout_58_warmelt_genobj_COMPILOBJ_NREP_AGAIN); /*iniclos dclo_1297__COMPILOBJ_NREP_AGAIN */ /*_.VALCLO___V1466*/ meltfptr[1465] = (melt_ptr_t) & cdat->dclo_1297__COMPILOBJ_NREP_AGAIN; cdat->dclo_1297__COMPILOBJ_NREP_AGAIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1297__COMPILOBJ_NREP_AGAIN.nbval = 0; /*iniobj dsym_1298__CLASS_NREP_AGAIN*/ /*uniqueobj*/ if (! /*_.VALDATA___V1467*/ meltfptr[1466]) /*_.VALDATA___V1467*/ meltfptr[1466] = (melt_ptr_t) & cdat->dsym_1298__CLASS_NREP_AGAIN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1298__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_1298__CLASS_NREP_AGAIN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1298__CLASS_NREP_AGAIN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1298__CLASS_NREP_AGAIN.obj_hash = 330426153; cdat->dsym_1298__CLASS_NREP_AGAIN.obj_len = 3; /*inistring dstr_1299__CLASS_NREP_AGAIN*/ /*_.VALSTR___V1468*/ meltfptr[1467] = (melt_ptr_t) & cdat->dstr_1299__CLASS_NREP_AGAIN; cdat->dstr_1299__CLASS_NREP_AGAIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1299__CLASS_NREP_AGAIN.val, "CLASS_NREP_AGAIN", sizeof (cdat->dstr_1299__CLASS_NREP_AGAIN. val) - 1); cdat->dstr_1299__CLASS_NREP_AGAIN.val[16] = (char) 0; cdat->dstr_1299__CLASS_NREP_AGAIN.slen = 16; /*inirout drout_1300__COMPILOBJ_DISCRANY */ /*_.VALROUT___V1469*/ meltfptr[1468] = (melt_ptr_t) & cdat->drout_1300__COMPILOBJ_DISCRANY; cdat->drout_1300__COMPILOBJ_DISCRANY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1300__COMPILOBJ_DISCRANY.routdescr, "COMPILOBJ_DISCRANY @warmelt-genobj.melt:2498", MELT_ROUTDESCR_LEN - 1); cdat->drout_1300__COMPILOBJ_DISCRANY.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1300__COMPILOBJ_DISCRANY, meltrout_59_warmelt_genobj_COMPILOBJ_DISCRANY); /*iniclos dclo_1301__COMPILOBJ_DISCRANY */ /*_.VALCLO___V1470*/ meltfptr[1469] = (melt_ptr_t) & cdat->dclo_1301__COMPILOBJ_DISCRANY; cdat->dclo_1301__COMPILOBJ_DISCRANY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1301__COMPILOBJ_DISCRANY.nbval = 0; /*inirout drout_1302__COMPILOBJ_NREP_LET */ /*_.VALROUT___V1471*/ meltfptr[1470] = (melt_ptr_t) & cdat->drout_1302__COMPILOBJ_NREP_LET; cdat->drout_1302__COMPILOBJ_NREP_LET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1302__COMPILOBJ_NREP_LET.routdescr, "COMPILOBJ_NREP_LET @warmelt-genobj.melt:2505", MELT_ROUTDESCR_LEN - 1); cdat->drout_1302__COMPILOBJ_NREP_LET.nbval = 20; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1302__COMPILOBJ_NREP_LET, meltrout_60_warmelt_genobj_COMPILOBJ_NREP_LET); /*iniclos dclo_1303__COMPILOBJ_NREP_LET */ /*_.VALCLO___V1475*/ meltfptr[1474] = (melt_ptr_t) & cdat->dclo_1303__COMPILOBJ_NREP_LET; cdat->dclo_1303__COMPILOBJ_NREP_LET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1303__COMPILOBJ_NREP_LET.nbval = 0; /*iniobj dsym_1304__CLASS_NREP_LET*/ /*uniqueobj*/ if (! /*_.VALDATA___V1476*/ meltfptr[1475]) /*_.VALDATA___V1476*/ meltfptr[1475] = (melt_ptr_t) & cdat->dsym_1304__CLASS_NREP_LET; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1304__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_1304__CLASS_NREP_LET", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1304__CLASS_NREP_LET.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1304__CLASS_NREP_LET.obj_hash = 726308322; cdat->dsym_1304__CLASS_NREP_LET.obj_len = 3; /*inistring dstr_1305__CLASS_NREP_LET*/ /*_.VALSTR___V1477*/ meltfptr[1476] = (melt_ptr_t) & cdat->dstr_1305__CLASS_NREP_LET; cdat->dstr_1305__CLASS_NREP_LET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1305__CLASS_NREP_LET.val, "CLASS_NREP_LET", sizeof (cdat->dstr_1305__CLASS_NREP_LET.val) - 1); cdat->dstr_1305__CLASS_NREP_LET.val[14] = (char) 0; cdat->dstr_1305__CLASS_NREP_LET.slen = 14; /*inirout drout_1306__LAMBDA_ */ /*_.VALROUT___V1472*/ meltfptr[1471] = (melt_ptr_t) & cdat->drout_1306__LAMBDA_; cdat->drout_1306__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1306__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:2526", MELT_ROUTDESCR_LEN - 1); cdat->drout_1306__LAMBDA_.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1306__LAMBDA_, meltrout_61_warmelt_genobj_LAMBDA___19__); /*iniobj dsym_1307__CLASS_NORMAL_LET_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1478*/ meltfptr[1477]) /*_.VALDATA___V1478*/ meltfptr[1477] = (melt_ptr_t) & cdat->dsym_1307__CLASS_NORMAL_LET_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1307__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_1307__CLASS_NORMAL_LET_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1307__CLASS_NORMAL_LET_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1307__CLASS_NORMAL_LET_BINDING.obj_hash = 76320742; cdat->dsym_1307__CLASS_NORMAL_LET_BINDING.obj_len = 3; /*inistring dstr_1308__CLASS_NORMAL_LET*/ /*_.VALSTR___V1479*/ meltfptr[1478] = (melt_ptr_t) & cdat->dstr_1308__CLASS_NORMAL_LET; cdat->dstr_1308__CLASS_NORMAL_LET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1308__CLASS_NORMAL_LET.val, "CLASS_NORMAL_LET_BINDING", sizeof (cdat->dstr_1308__CLASS_NORMAL_LET. val) - 1); cdat->dstr_1308__CLASS_NORMAL_LET.val[24] = (char) 0; cdat->dstr_1308__CLASS_NORMAL_LET.slen = 24; /*iniobj dsym_1309__CLASS_SEXPR*/ /*uniqueobj*/ if (! /*_.VALDATA___V1480*/ meltfptr[1479]) /*_.VALDATA___V1480*/ meltfptr[1479] = (melt_ptr_t) & cdat->dsym_1309__CLASS_SEXPR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1309__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_1309__CLASS_SEXPR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1309__CLASS_SEXPR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1309__CLASS_SEXPR.obj_hash = 53411612; cdat->dsym_1309__CLASS_SEXPR.obj_len = 3; /*inistring dstr_1310__CLASS_SEXPR*/ /*_.VALSTR___V1481*/ meltfptr[1480] = (melt_ptr_t) & cdat->dstr_1310__CLASS_SEXPR; cdat->dstr_1310__CLASS_SEXPR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1310__CLASS_SEXPR.val, "CLASS_SEXPR", sizeof (cdat->dstr_1310__CLASS_SEXPR.val) - 1); cdat->dstr_1310__CLASS_SEXPR.val[11] = (char) 0; cdat->dstr_1310__CLASS_SEXPR.slen = 11; /*inirout drout_1311__LAMBDA_ */ /*_.VALROUT___V1473*/ meltfptr[1472] = (melt_ptr_t) & cdat->drout_1311__LAMBDA_; cdat->drout_1311__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1311__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:2569", MELT_ROUTDESCR_LEN - 1); cdat->drout_1311__LAMBDA_.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1311__LAMBDA_, meltrout_62_warmelt_genobj_LAMBDA___20__); /*inirout drout_1312__LAMBDA_ */ /*_.VALROUT___V1474*/ meltfptr[1473] = (melt_ptr_t) & cdat->drout_1312__LAMBDA_; cdat->drout_1312__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1312__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:2582", MELT_ROUTDESCR_LEN - 1); cdat->drout_1312__LAMBDA_.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1312__LAMBDA_, meltrout_63_warmelt_genobj_LAMBDA___21__); /*iniobj dsym_1313__COMPILE_LETREC_FILL*/ /*uniqueobj*/ if (! /*_.VALDATA___V1482*/ meltfptr[1481]) /*_.VALDATA___V1482*/ meltfptr[1481] = (melt_ptr_t) & cdat->dsym_1313__COMPILE_LETREC_FILL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1313__COMPILE_LETREC_FILL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1313__COMPILE_LETREC_FILL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1313__COMPILE_LETREC_FILL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1313__COMPILE_LETREC_FILL.obj_hash = 721941940; cdat->dsym_1313__COMPILE_LETREC_FILL.obj_len = 3; /*inistring dstr_1314__COMPILE_LETREC_F*/ /*_.VALSTR___V1483*/ meltfptr[1482] = (melt_ptr_t) & cdat->dstr_1314__COMPILE_LETREC_F; cdat->dstr_1314__COMPILE_LETREC_F.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1314__COMPILE_LETREC_F.val, "COMPILE_LETREC_FILL", sizeof (cdat->dstr_1314__COMPILE_LETREC_F. val) - 1); cdat->dstr_1314__COMPILE_LETREC_F.val[19] = (char) 0; cdat->dstr_1314__COMPILE_LETREC_F.slen = 19; MELT_LOCATION ("warmelt-genobj.melt:2598:/ iniobj"); /*iniobj dobj_1315*/ /*_.VALDATA___V1484*/ meltfptr[1483] = (melt_ptr_t) & cdat->dobj_1315; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1315", 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_1315", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1315.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1315.obj_num = 0; cdat->dobj_1315.obj_hash = 441333320; cdat->dobj_1315.obj_len = 2; /*iniobj dsym_1316__OBVA*/ /*uniqueobj*/ if (! /*_.VALDATA___V1485*/ meltfptr[1484]) /*_.VALDATA___V1485*/ meltfptr[1484] = (melt_ptr_t) & cdat->dsym_1316__OBVA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1316__OBVA", melt_magic_discr ((melt_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__OBVA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1316__OBVA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1316__OBVA.obj_hash = 365786386; cdat->dsym_1316__OBVA.obj_len = 3; /*inistring dstr_1317__OBVA*/ /*_.VALSTR___V1486*/ meltfptr[1485] = (melt_ptr_t) & cdat->dstr_1317__OBVA; cdat->dstr_1317__OBVA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1317__OBVA.val, "OBVA", sizeof (cdat->dstr_1317__OBVA.val) - 1); cdat->dstr_1317__OBVA.val[4] = (char) 0; cdat->dstr_1317__OBVA.slen = 4; /*^iniobj */ /*iniobj dobj_1318*/ /*_.VALDATA___V1487*/ meltfptr[1486] = (melt_ptr_t) & cdat->dobj_1318; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1318", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1318", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1318.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1318.obj_num = 1; cdat->dobj_1318.obj_hash = 564248905; cdat->dobj_1318.obj_len = 2; /*iniobj dsym_1319__OBODL*/ /*uniqueobj*/ if (! /*_.VALDATA___V1488*/ meltfptr[1487]) /*_.VALDATA___V1488*/ meltfptr[1487] = (melt_ptr_t) & cdat->dsym_1319__OBODL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1319__OBODL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1319__OBODL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1319__OBODL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1319__OBODL.obj_hash = 850166125; cdat->dsym_1319__OBODL.obj_len = 3; /*inistring dstr_1320__OBODL*/ /*_.VALSTR___V1489*/ meltfptr[1488] = (melt_ptr_t) & cdat->dstr_1320__OBODL; cdat->dstr_1320__OBODL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1320__OBODL.val, "OBODL", sizeof (cdat->dstr_1320__OBODL.val) - 1); cdat->dstr_1320__OBODL.val[5] = (char) 0; cdat->dstr_1320__OBODL.slen = 5; /*^iniobj */ /*iniobj dobj_1321*/ /*_.VALDATA___V1490*/ meltfptr[1489] = (melt_ptr_t) & cdat->dobj_1321; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1321", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1321", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1321.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1321.obj_num = 2; cdat->dobj_1321.obj_hash = 692935890; cdat->dobj_1321.obj_len = 2; /*iniobj dsym_1322__GCX*/ /*uniqueobj*/ if (! /*_.VALDATA___V1491*/ meltfptr[1490]) /*_.VALDATA___V1491*/ meltfptr[1490] = (melt_ptr_t) & cdat->dsym_1322__GCX; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1322__GCX", melt_magic_discr ((melt_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__GCX", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1322__GCX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1322__GCX.obj_hash = 664133416; cdat->dsym_1322__GCX.obj_len = 3; /*inistring dstr_1323__GCX*/ /*_.VALSTR___V1492*/ meltfptr[1491] = (melt_ptr_t) & cdat->dstr_1323__GCX; cdat->dstr_1323__GCX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1323__GCX.val, "GCX", sizeof (cdat->dstr_1323__GCX.val) - 1); cdat->dstr_1323__GCX.val[3] = (char) 0; cdat->dstr_1323__GCX.slen = 3; /*^iniobj */ /*iniobj dobj_1324*/ /*_.VALDATA___V1493*/ meltfptr[1492] = (melt_ptr_t) & cdat->dobj_1324; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1324", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1324", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1324.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1324.obj_num = 3; cdat->dobj_1324.obj_hash = 854753996; cdat->dobj_1324.obj_len = 2; /*iniobj dsym_1325__SLOC*/ /*uniqueobj*/ if (! /*_.VALDATA___V1494*/ meltfptr[1493]) /*_.VALDATA___V1494*/ meltfptr[1493] = (melt_ptr_t) & cdat->dsym_1325__SLOC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1325__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_1325__SLOC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1325__SLOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1325__SLOC.obj_hash = 214022047; cdat->dsym_1325__SLOC.obj_len = 3; /*inistring dstr_1326__SLOC*/ /*_.VALSTR___V1495*/ meltfptr[1494] = (melt_ptr_t) & cdat->dstr_1326__SLOC; cdat->dstr_1326__SLOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1326__SLOC.val, "SLOC", sizeof (cdat->dstr_1326__SLOC.val) - 1); cdat->dstr_1326__SLOC.val[4] = (char) 0; cdat->dstr_1326__SLOC.slen = 4; /*^iniobj */ /*iniobj dobj_1327*/ /*_.VALDATA___V1496*/ meltfptr[1495] = (melt_ptr_t) & cdat->dobj_1327; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1327", 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_1327", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1327.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1327.obj_num = 4; cdat->dobj_1327.obj_hash = 904080555; cdat->dobj_1327.obj_len = 2; /*inimult dtup_1328__COMPILE_LETREC_FILL */ /*_.VALTUP___V1497*/ meltfptr[1496] = (melt_ptr_t) & cdat->dtup_1328__COMPILE_LETREC_FILL; cdat->dtup_1328__COMPILE_LETREC_FILL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_MULTIPLE)))); cdat->dtup_1328__COMPILE_LETREC_FILL.nbval = 5; /*^iniobj */ /*iniobj dobj_1329__COMPILE_LETREC_FILL*/ /*_.VALDATA___V1498*/ meltfptr[1497] = (melt_ptr_t) & cdat->dobj_1329__COMPILE_LETREC_FILL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1329__COMPILE_LETREC_FILL", 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_1329__COMPILE_LETREC_FILL", ((meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V20*/ meltfptr[19]))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1329__COMPILE_LETREC_FILL.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V20*/ meltfptr[19]); cdat->dobj_1329__COMPILE_LETREC_FILL.obj_hash = 205961128; cdat->dobj_1329__COMPILE_LETREC_FILL.obj_len = 4; /*inistring dstr_1330__COMPILE_LETREC_F*/ /*_.VALSTR___V1499*/ meltfptr[1498] = (melt_ptr_t) & cdat->dstr_1330__COMPILE_LETREC_F; cdat->dstr_1330__COMPILE_LETREC_F.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1330__COMPILE_LETREC_F.val, "COMPILE_LETREC_FILL", sizeof (cdat->dstr_1330__COMPILE_LETREC_F. val) - 1); cdat->dstr_1330__COMPILE_LETREC_F.val[19] = (char) 0; cdat->dstr_1330__COMPILE_LETREC_F.slen = 19; /*inirout drout_1331__FAIL_COMPILETRECFILL */ /*_.VALROUT___V1500*/ meltfptr[1499] = (melt_ptr_t) & cdat->drout_1331__FAIL_COMPILETRECFILL; cdat->drout_1331__FAIL_COMPILETRECFILL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1331__FAIL_COMPILETRECFILL.routdescr, "FAIL_COMPILETRECFILL @warmelt-genobj.melt:2607", MELT_ROUTDESCR_LEN - 1); cdat->drout_1331__FAIL_COMPILETRECFILL.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1331__FAIL_COMPILETRECFILL, meltrout_64_warmelt_genobj_FAIL_COMPILETRECFILL); /*iniclos dclo_1332__FAIL_COMPILETRECFILL */ /*_.VALCLO___V1501*/ meltfptr[1500] = (melt_ptr_t) & cdat->dclo_1332__FAIL_COMPILETRECFILL; cdat->dclo_1332__FAIL_COMPILETRECFILL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1332__FAIL_COMPILETRECFILL.nbval = 0; /*inirout drout_1333__COMPILETREC_LAMBDA */ /*_.VALROUT___V1502*/ meltfptr[1501] = (melt_ptr_t) & cdat->drout_1333__COMPILETREC_LAMBDA; cdat->drout_1333__COMPILETREC_LAMBDA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1333__COMPILETREC_LAMBDA.routdescr, "COMPILETREC_LAMBDA @warmelt-genobj.melt:2618", MELT_ROUTDESCR_LEN - 1); cdat->drout_1333__COMPILETREC_LAMBDA.nbval = 11; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1333__COMPILETREC_LAMBDA, meltrout_65_warmelt_genobj_COMPILETREC_LAMBDA); /*iniclos dclo_1334__COMPILETREC_LAMBDA */ /*_.VALCLO___V1503*/ meltfptr[1502] = (melt_ptr_t) & cdat->dclo_1334__COMPILETREC_LAMBDA; cdat->dclo_1334__COMPILETREC_LAMBDA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1334__COMPILETREC_LAMBDA.nbval = 0; /*iniobj dsym_1335__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1504*/ meltfptr[1503]) /*_.VALDATA___V1504*/ meltfptr[1503] = (melt_ptr_t) & cdat->dsym_1335__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1335__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_1335__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1335__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1335__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING.obj_hash = 444318231; cdat->dsym_1335__CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING.obj_len = 3; /*inistring dstr_1336__CLASS_NORMAL_CON*/ /*_.VALSTR___V1505*/ meltfptr[1504] = (melt_ptr_t) & cdat->dstr_1336__CLASS_NORMAL_CON; cdat->dstr_1336__CLASS_NORMAL_CON.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1336__CLASS_NORMAL_CON.val, "CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING", sizeof (cdat->dstr_1336__CLASS_NORMAL_CON. val) - 1); cdat->dstr_1336__CLASS_NORMAL_CON.val[39] = (char) 0; cdat->dstr_1336__CLASS_NORMAL_CON.slen = 39; /*iniobj dsym_1337__CLASS_NORMAL_CONSTRUCTOR_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1506*/ meltfptr[1505]) /*_.VALDATA___V1506*/ meltfptr[1505] = (melt_ptr_t) & cdat->dsym_1337__CLASS_NORMAL_CONSTRUCTOR_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1337__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_1337__CLASS_NORMAL_CONSTRUCTOR_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1337__CLASS_NORMAL_CONSTRUCTOR_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1337__CLASS_NORMAL_CONSTRUCTOR_BINDING.obj_hash = 828004188; cdat->dsym_1337__CLASS_NORMAL_CONSTRUCTOR_BINDING.obj_len = 3; /*inistring dstr_1338__CLASS_NORMAL_CON*/ /*_.VALSTR___V1507*/ meltfptr[1506] = (melt_ptr_t) & cdat->dstr_1338__CLASS_NORMAL_CON; cdat->dstr_1338__CLASS_NORMAL_CON.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1338__CLASS_NORMAL_CON.val, "CLASS_NORMAL_CONSTRUCTOR_BINDING", sizeof (cdat->dstr_1338__CLASS_NORMAL_CON. val) - 1); cdat->dstr_1338__CLASS_NORMAL_CON.val[32] = (char) 0; cdat->dstr_1338__CLASS_NORMAL_CON.slen = 32; /*inirout drout_1339__COMPILETREC_TUPLE */ /*_.VALROUT___V1508*/ meltfptr[1507] = (melt_ptr_t) & cdat->drout_1339__COMPILETREC_TUPLE; cdat->drout_1339__COMPILETREC_TUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1339__COMPILETREC_TUPLE.routdescr, "COMPILETREC_TUPLE @warmelt-genobj.melt:2677", MELT_ROUTDESCR_LEN - 1); cdat->drout_1339__COMPILETREC_TUPLE.nbval = 10; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1339__COMPILETREC_TUPLE, meltrout_66_warmelt_genobj_COMPILETREC_TUPLE); /*iniclos dclo_1340__COMPILETREC_TUPLE */ /*_.VALCLO___V1509*/ meltfptr[1508] = (melt_ptr_t) & cdat->dclo_1340__COMPILETREC_TUPLE; cdat->dclo_1340__COMPILETREC_TUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1340__COMPILETREC_TUPLE.nbval = 0; /*iniobj dsym_1341__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1510*/ meltfptr[1509]) /*_.VALDATA___V1510*/ meltfptr[1509] = (melt_ptr_t) & cdat->dsym_1341__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1341__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_1341__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1341__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1341__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING.obj_hash = 529357655; cdat->dsym_1341__CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING.obj_len = 3; /*inistring dstr_1342__CLASS_NORMAL_CON*/ /*_.VALSTR___V1511*/ meltfptr[1510] = (melt_ptr_t) & cdat->dstr_1342__CLASS_NORMAL_CON; cdat->dstr_1342__CLASS_NORMAL_CON.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1342__CLASS_NORMAL_CON.val, "CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING", sizeof (cdat->dstr_1342__CLASS_NORMAL_CON. val) - 1); cdat->dstr_1342__CLASS_NORMAL_CON.val[38] = (char) 0; cdat->dstr_1342__CLASS_NORMAL_CON.slen = 38; /*inirout drout_1343__COMPILETREC_PAIR */ /*_.VALROUT___V1512*/ meltfptr[1511] = (melt_ptr_t) & cdat->drout_1343__COMPILETREC_PAIR; cdat->drout_1343__COMPILETREC_PAIR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1343__COMPILETREC_PAIR.routdescr, "COMPILETREC_PAIR @warmelt-genobj.melt:2720", MELT_ROUTDESCR_LEN - 1); cdat->drout_1343__COMPILETREC_PAIR.nbval = 10; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1343__COMPILETREC_PAIR, meltrout_67_warmelt_genobj_COMPILETREC_PAIR); /*iniclos dclo_1344__COMPILETREC_PAIR */ /*_.VALCLO___V1513*/ meltfptr[1512] = (melt_ptr_t) & cdat->dclo_1344__COMPILETREC_PAIR; cdat->dclo_1344__COMPILETREC_PAIR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1344__COMPILETREC_PAIR.nbval = 0; /*iniobj dsym_1345__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1514*/ meltfptr[1513]) /*_.VALDATA___V1514*/ meltfptr[1513] = (melt_ptr_t) & cdat->dsym_1345__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1345__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_1345__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1345__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1345__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING.obj_hash = 175512947; cdat->dsym_1345__CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING.obj_len = 3; /*inistring dstr_1346__CLASS_NORMAL_CON*/ /*_.VALSTR___V1515*/ meltfptr[1514] = (melt_ptr_t) & cdat->dstr_1346__CLASS_NORMAL_CON; cdat->dstr_1346__CLASS_NORMAL_CON.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1346__CLASS_NORMAL_CON.val, "CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING", sizeof (cdat->dstr_1346__CLASS_NORMAL_CON. val) - 1); cdat->dstr_1346__CLASS_NORMAL_CON.val[37] = (char) 0; cdat->dstr_1346__CLASS_NORMAL_CON.slen = 37; /*inirout drout_1347__COMPILETREC_LIST */ /*_.VALROUT___V1516*/ meltfptr[1515] = (melt_ptr_t) & cdat->drout_1347__COMPILETREC_LIST; cdat->drout_1347__COMPILETREC_LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1347__COMPILETREC_LIST.routdescr, "COMPILETREC_LIST @warmelt-genobj.melt:2760", MELT_ROUTDESCR_LEN - 1); cdat->drout_1347__COMPILETREC_LIST.nbval = 9; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1347__COMPILETREC_LIST, meltrout_68_warmelt_genobj_COMPILETREC_LIST); /*iniclos dclo_1348__COMPILETREC_LIST */ /*_.VALCLO___V1517*/ meltfptr[1516] = (melt_ptr_t) & cdat->dclo_1348__COMPILETREC_LIST; cdat->dclo_1348__COMPILETREC_LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1348__COMPILETREC_LIST.nbval = 0; /*iniobj dsym_1349__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1518*/ meltfptr[1517]) /*_.VALDATA___V1518*/ meltfptr[1517] = (melt_ptr_t) & cdat->dsym_1349__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1349__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_1349__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1349__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1349__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING.obj_hash = 377142415; cdat->dsym_1349__CLASS_NORMAL_CONSTRUCTED_LIST_BINDING.obj_len = 3; /*inistring dstr_1350__CLASS_NORMAL_CON*/ /*_.VALSTR___V1519*/ meltfptr[1518] = (melt_ptr_t) & cdat->dstr_1350__CLASS_NORMAL_CON; cdat->dstr_1350__CLASS_NORMAL_CON.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1350__CLASS_NORMAL_CON.val, "CLASS_NORMAL_CONSTRUCTED_LIST_BINDING", sizeof (cdat->dstr_1350__CLASS_NORMAL_CON. val) - 1); cdat->dstr_1350__CLASS_NORMAL_CON.val[37] = (char) 0; cdat->dstr_1350__CLASS_NORMAL_CON.slen = 37; /*inirout drout_1351__COMPILETREC_INSTANCE */ /*_.VALROUT___V1520*/ meltfptr[1519] = (melt_ptr_t) & cdat->drout_1351__COMPILETREC_INSTANCE; cdat->drout_1351__COMPILETREC_INSTANCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1351__COMPILETREC_INSTANCE.routdescr, "COMPILETREC_INSTANCE @warmelt-genobj.melt:2801", MELT_ROUTDESCR_LEN - 1); cdat->drout_1351__COMPILETREC_INSTANCE.nbval = 13; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1351__COMPILETREC_INSTANCE, meltrout_69_warmelt_genobj_COMPILETREC_INSTANCE); /*iniclos dclo_1352__COMPILETREC_INSTANCE */ /*_.VALCLO___V1521*/ meltfptr[1520] = (melt_ptr_t) & cdat->dclo_1352__COMPILETREC_INSTANCE; cdat->dclo_1352__COMPILETREC_INSTANCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1352__COMPILETREC_INSTANCE.nbval = 0; /*iniobj dsym_1353__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1522*/ meltfptr[1521]) /*_.VALDATA___V1522*/ meltfptr[1521] = (melt_ptr_t) & cdat-> dsym_1353__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1353__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_1353__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1353__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1353__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING.obj_hash = 123856315; cdat->dsym_1353__CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING.obj_len = 3; /*inistring dstr_1354__CLASS_NORMAL_CON*/ /*_.VALSTR___V1523*/ meltfptr[1522] = (melt_ptr_t) & cdat->dstr_1354__CLASS_NORMAL_CON; cdat->dstr_1354__CLASS_NORMAL_CON.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1354__CLASS_NORMAL_CON.val, "CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING", sizeof (cdat->dstr_1354__CLASS_NORMAL_CON. val) - 1); cdat->dstr_1354__CLASS_NORMAL_CON.val[41] = (char) 0; cdat->dstr_1354__CLASS_NORMAL_CON.slen = 41; /*iniobj dsym_1355__CLASS_VALUE_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1524*/ meltfptr[1523]) /*_.VALDATA___V1524*/ meltfptr[1523] = (melt_ptr_t) & cdat->dsym_1355__CLASS_VALUE_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1355__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_1355__CLASS_VALUE_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1355__CLASS_VALUE_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1355__CLASS_VALUE_BINDING.obj_hash = 952021086; cdat->dsym_1355__CLASS_VALUE_BINDING.obj_len = 3; /*inistring dstr_1356__CLASS_VALUE_BIND*/ /*_.VALSTR___V1525*/ meltfptr[1524] = (melt_ptr_t) & cdat->dstr_1356__CLASS_VALUE_BIND; cdat->dstr_1356__CLASS_VALUE_BIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1356__CLASS_VALUE_BIND.val, "CLASS_VALUE_BINDING", sizeof (cdat->dstr_1356__CLASS_VALUE_BIND. val) - 1); cdat->dstr_1356__CLASS_VALUE_BIND.val[19] = (char) 0; cdat->dstr_1356__CLASS_VALUE_BIND.slen = 19; /*iniobj dsym_1357__CLASS_CLASS_BINDING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1526*/ meltfptr[1525]) /*_.VALDATA___V1526*/ meltfptr[1525] = (melt_ptr_t) & cdat->dsym_1357__CLASS_CLASS_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1357__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_1357__CLASS_CLASS_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1357__CLASS_CLASS_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1357__CLASS_CLASS_BINDING.obj_hash = 848133131; cdat->dsym_1357__CLASS_CLASS_BINDING.obj_len = 3; /*inistring dstr_1358__CLASS_CLASS_BIND*/ /*_.VALSTR___V1527*/ meltfptr[1526] = (melt_ptr_t) & cdat->dstr_1358__CLASS_CLASS_BIND; cdat->dstr_1358__CLASS_CLASS_BIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1358__CLASS_CLASS_BIND.val, "CLASS_CLASS_BINDING", sizeof (cdat->dstr_1358__CLASS_CLASS_BIND. val) - 1); cdat->dstr_1358__CLASS_CLASS_BIND.val[19] = (char) 0; cdat->dstr_1358__CLASS_CLASS_BIND.slen = 19; /*iniobj dsym_1359__CLASS_CLASS*/ /*uniqueobj*/ if (! /*_.VALDATA___V1528*/ meltfptr[1527]) /*_.VALDATA___V1528*/ meltfptr[1527] = (melt_ptr_t) & cdat->dsym_1359__CLASS_CLASS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1359__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_1359__CLASS_CLASS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1359__CLASS_CLASS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1359__CLASS_CLASS.obj_hash = 60141292; cdat->dsym_1359__CLASS_CLASS.obj_len = 3; /*inistring dstr_1360__CLASS_CLASS*/ /*_.VALSTR___V1529*/ meltfptr[1528] = (melt_ptr_t) & cdat->dstr_1360__CLASS_CLASS; cdat->dstr_1360__CLASS_CLASS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1360__CLASS_CLASS.val, "CLASS_CLASS", sizeof (cdat->dstr_1360__CLASS_CLASS.val) - 1); cdat->dstr_1360__CLASS_CLASS.val[11] = (char) 0; cdat->dstr_1360__CLASS_CLASS.slen = 11; /*inirout drout_1361__COMPILOBJ_NREP_LETREC */ /*_.VALROUT___V1530*/ meltfptr[1529] = (melt_ptr_t) & cdat->drout_1361__COMPILOBJ_NREP_LETREC; cdat->drout_1361__COMPILOBJ_NREP_LETREC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1361__COMPILOBJ_NREP_LETREC.routdescr, "COMPILOBJ_NREP_LETREC @warmelt-genobj.melt:2856", MELT_ROUTDESCR_LEN - 1); cdat->drout_1361__COMPILOBJ_NREP_LETREC.nbval = 23; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1361__COMPILOBJ_NREP_LETREC, meltrout_70_warmelt_genobj_COMPILOBJ_NREP_LETREC); /*iniclos dclo_1362__COMPILOBJ_NREP_LETREC */ /*_.VALCLO___V1531*/ meltfptr[1530] = (melt_ptr_t) & cdat->dclo_1362__COMPILOBJ_NREP_LETREC; cdat->dclo_1362__COMPILOBJ_NREP_LETREC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1362__COMPILOBJ_NREP_LETREC.nbval = 0; /*iniobj dsym_1363__CLASS_NREP_LETREC*/ /*uniqueobj*/ if (! /*_.VALDATA___V1532*/ meltfptr[1531]) /*_.VALDATA___V1532*/ meltfptr[1531] = (melt_ptr_t) & cdat->dsym_1363__CLASS_NREP_LETREC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1363__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_1363__CLASS_NREP_LETREC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1363__CLASS_NREP_LETREC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1363__CLASS_NREP_LETREC.obj_hash = 229582462; cdat->dsym_1363__CLASS_NREP_LETREC.obj_len = 3; /*inistring dstr_1364__CLASS_NREP_LETRE*/ /*_.VALSTR___V1533*/ meltfptr[1532] = (melt_ptr_t) & cdat->dstr_1364__CLASS_NREP_LETRE; cdat->dstr_1364__CLASS_NREP_LETRE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1364__CLASS_NREP_LETRE.val, "CLASS_NREP_LETREC", sizeof (cdat->dstr_1364__CLASS_NREP_LETRE. val) - 1); cdat->dstr_1364__CLASS_NREP_LETRE.val[17] = (char) 0; cdat->dstr_1364__CLASS_NREP_LETRE.slen = 17; /*iniobj dsym_1365__CLASS_NREP_SYMOCC*/ /*uniqueobj*/ if (! /*_.VALDATA___V1534*/ meltfptr[1533]) /*_.VALDATA___V1534*/ meltfptr[1533] = (melt_ptr_t) & cdat->dsym_1365__CLASS_NREP_SYMOCC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1365__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_1365__CLASS_NREP_SYMOCC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1365__CLASS_NREP_SYMOCC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1365__CLASS_NREP_SYMOCC.obj_hash = 643883390; cdat->dsym_1365__CLASS_NREP_SYMOCC.obj_len = 3; /*inistring dstr_1366__CLASS_NREP_SYMOC*/ /*_.VALSTR___V1535*/ meltfptr[1534] = (melt_ptr_t) & cdat->dstr_1366__CLASS_NREP_SYMOC; cdat->dstr_1366__CLASS_NREP_SYMOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1366__CLASS_NREP_SYMOC.val, "CLASS_NREP_SYMOCC", sizeof (cdat->dstr_1366__CLASS_NREP_SYMOC. val) - 1); cdat->dstr_1366__CLASS_NREP_SYMOC.val[17] = (char) 0; cdat->dstr_1366__CLASS_NREP_SYMOC.slen = 17; /*inirout drout_1367__COMPILOBJ_NREP_CITERATION */ /*_.VALROUT___V1536*/ meltfptr[1535] = (melt_ptr_t) & cdat->drout_1367__COMPILOBJ_NREP_CITERATION; cdat->drout_1367__COMPILOBJ_NREP_CITERATION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1367__COMPILOBJ_NREP_CITERATION.routdescr, "COMPILOBJ_NREP_CITERATION @warmelt-genobj.melt:3070", MELT_ROUTDESCR_LEN - 1); cdat->drout_1367__COMPILOBJ_NREP_CITERATION.nbval = 33; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1367__COMPILOBJ_NREP_CITERATION, meltrout_71_warmelt_genobj_COMPILOBJ_NREP_CITERATION); /*iniclos dclo_1368__COMPILOBJ_NREP_CITERATION */ /*_.VALCLO___V1542*/ meltfptr[1541] = (melt_ptr_t) & cdat->dclo_1368__COMPILOBJ_NREP_CITERATION; cdat->dclo_1368__COMPILOBJ_NREP_CITERATION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1368__COMPILOBJ_NREP_CITERATION.nbval = 0; /*iniobj dsym_1369__CLASS_NREP_CITERATION*/ /*uniqueobj*/ if (! /*_.VALDATA___V1543*/ meltfptr[1542]) /*_.VALDATA___V1543*/ meltfptr[1542] = (melt_ptr_t) & cdat->dsym_1369__CLASS_NREP_CITERATION; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1369__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_1369__CLASS_NREP_CITERATION", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1369__CLASS_NREP_CITERATION.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1369__CLASS_NREP_CITERATION.obj_hash = 933737875; cdat->dsym_1369__CLASS_NREP_CITERATION.obj_len = 3; /*inistring dstr_1370__CLASS_NREP_CITER*/ /*_.VALSTR___V1544*/ meltfptr[1543] = (melt_ptr_t) & cdat->dstr_1370__CLASS_NREP_CITER; cdat->dstr_1370__CLASS_NREP_CITER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1370__CLASS_NREP_CITER.val, "CLASS_NREP_CITERATION", sizeof (cdat->dstr_1370__CLASS_NREP_CITER. val) - 1); cdat->dstr_1370__CLASS_NREP_CITER.val[21] = (char) 0; cdat->dstr_1370__CLASS_NREP_CITER.slen = 21; /*iniobj dsym_1371__CLASS_CITERATOR*/ /*uniqueobj*/ if (! /*_.VALDATA___V1545*/ meltfptr[1544]) /*_.VALDATA___V1545*/ meltfptr[1544] = (melt_ptr_t) & cdat->dsym_1371__CLASS_CITERATOR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1371__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_1371__CLASS_CITERATOR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1371__CLASS_CITERATOR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1371__CLASS_CITERATOR.obj_hash = 650290054; cdat->dsym_1371__CLASS_CITERATOR.obj_len = 3; /*inistring dstr_1372__CLASS_CITERATOR*/ /*_.VALSTR___V1546*/ meltfptr[1545] = (melt_ptr_t) & cdat->dstr_1372__CLASS_CITERATOR; cdat->dstr_1372__CLASS_CITERATOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1372__CLASS_CITERATOR.val, "CLASS_CITERATOR", sizeof (cdat->dstr_1372__CLASS_CITERATOR. val) - 1); cdat->dstr_1372__CLASS_CITERATOR.val[15] = (char) 0; cdat->dstr_1372__CLASS_CITERATOR.slen = 15; /*inirout drout_1373__LAMBDA_ */ /*_.VALROUT___V1537*/ meltfptr[1536] = (melt_ptr_t) & cdat->drout_1373__LAMBDA_; cdat->drout_1373__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1373__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:3109", MELT_ROUTDESCR_LEN - 1); cdat->drout_1373__LAMBDA_.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1373__LAMBDA_, meltrout_72_warmelt_genobj_LAMBDA___22__); /*inirout drout_1374__LAMBDA_ */ /*_.VALROUT___V1538*/ meltfptr[1537] = (melt_ptr_t) & cdat->drout_1374__LAMBDA_; cdat->drout_1374__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1374__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:3144", MELT_ROUTDESCR_LEN - 1); cdat->drout_1374__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1374__LAMBDA_, meltrout_73_warmelt_genobj_LAMBDA___23__); /*inirout drout_1375__LAMBDA_ */ /*_.VALROUT___V1539*/ meltfptr[1538] = (melt_ptr_t) & cdat->drout_1375__LAMBDA_; cdat->drout_1375__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1375__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:3154", MELT_ROUTDESCR_LEN - 1); cdat->drout_1375__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1375__LAMBDA_, meltrout_74_warmelt_genobj_LAMBDA___24__); /*inirout drout_1376__LAMBDA_ */ /*_.VALROUT___V1540*/ meltfptr[1539] = (melt_ptr_t) & cdat->drout_1376__LAMBDA_; cdat->drout_1376__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1376__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:3168", MELT_ROUTDESCR_LEN - 1); cdat->drout_1376__LAMBDA_.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1376__LAMBDA_, meltrout_75_warmelt_genobj_LAMBDA___25__); /*inirout drout_1377__LAMBDA_ */ /*_.VALROUT___V1541*/ meltfptr[1540] = (melt_ptr_t) & cdat->drout_1377__LAMBDA_; cdat->drout_1377__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1377__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:3199", MELT_ROUTDESCR_LEN - 1); cdat->drout_1377__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1377__LAMBDA_, meltrout_76_warmelt_genobj_LAMBDA___26__); /*inirout drout_1378__COMPILOBJ_NREP_SETQ */ /*_.VALROUT___V1547*/ meltfptr[1546] = (melt_ptr_t) & cdat->drout_1378__COMPILOBJ_NREP_SETQ; cdat->drout_1378__COMPILOBJ_NREP_SETQ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1378__COMPILOBJ_NREP_SETQ.routdescr, "COMPILOBJ_NREP_SETQ @warmelt-genobj.melt:3212", MELT_ROUTDESCR_LEN - 1); cdat->drout_1378__COMPILOBJ_NREP_SETQ.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1378__COMPILOBJ_NREP_SETQ, meltrout_77_warmelt_genobj_COMPILOBJ_NREP_SETQ); /*iniclos dclo_1379__COMPILOBJ_NREP_SETQ */ /*_.VALCLO___V1548*/ meltfptr[1547] = (melt_ptr_t) & cdat->dclo_1379__COMPILOBJ_NREP_SETQ; cdat->dclo_1379__COMPILOBJ_NREP_SETQ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1379__COMPILOBJ_NREP_SETQ.nbval = 0; /*iniobj dsym_1380__CLASS_NREP_SETQ*/ /*uniqueobj*/ if (! /*_.VALDATA___V1549*/ meltfptr[1548]) /*_.VALDATA___V1549*/ meltfptr[1548] = (melt_ptr_t) & cdat->dsym_1380__CLASS_NREP_SETQ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1380__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_1380__CLASS_NREP_SETQ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1380__CLASS_NREP_SETQ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1380__CLASS_NREP_SETQ.obj_hash = 314084823; cdat->dsym_1380__CLASS_NREP_SETQ.obj_len = 3; /*inistring dstr_1381__CLASS_NREP_SETQ*/ /*_.VALSTR___V1550*/ meltfptr[1549] = (melt_ptr_t) & cdat->dstr_1381__CLASS_NREP_SETQ; cdat->dstr_1381__CLASS_NREP_SETQ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1381__CLASS_NREP_SETQ.val, "CLASS_NREP_SETQ", sizeof (cdat->dstr_1381__CLASS_NREP_SETQ. val) - 1); cdat->dstr_1381__CLASS_NREP_SETQ.val[15] = (char) 0; cdat->dstr_1381__CLASS_NREP_SETQ.slen = 15; /*inirout drout_1382__COMPILOBJ_NREP_PROGN */ /*_.VALROUT___V1551*/ meltfptr[1550] = (melt_ptr_t) & cdat->drout_1382__COMPILOBJ_NREP_PROGN; cdat->drout_1382__COMPILOBJ_NREP_PROGN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1382__COMPILOBJ_NREP_PROGN.routdescr, "COMPILOBJ_NREP_PROGN @warmelt-genobj.melt:3239", MELT_ROUTDESCR_LEN - 1); cdat->drout_1382__COMPILOBJ_NREP_PROGN.nbval = 9; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1382__COMPILOBJ_NREP_PROGN, meltrout_78_warmelt_genobj_COMPILOBJ_NREP_PROGN); /*iniclos dclo_1383__COMPILOBJ_NREP_PROGN */ /*_.VALCLO___V1553*/ meltfptr[1552] = (melt_ptr_t) & cdat->dclo_1383__COMPILOBJ_NREP_PROGN; cdat->dclo_1383__COMPILOBJ_NREP_PROGN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1383__COMPILOBJ_NREP_PROGN.nbval = 0; /*iniobj dsym_1384__CLASS_NREP_PROGN*/ /*uniqueobj*/ if (! /*_.VALDATA___V1554*/ meltfptr[1553]) /*_.VALDATA___V1554*/ meltfptr[1553] = (melt_ptr_t) & cdat->dsym_1384__CLASS_NREP_PROGN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1384__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_1384__CLASS_NREP_PROGN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1384__CLASS_NREP_PROGN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1384__CLASS_NREP_PROGN.obj_hash = 378668026; cdat->dsym_1384__CLASS_NREP_PROGN.obj_len = 3; /*inistring dstr_1385__CLASS_NREP_PROGN*/ /*_.VALSTR___V1555*/ meltfptr[1554] = (melt_ptr_t) & cdat->dstr_1385__CLASS_NREP_PROGN; cdat->dstr_1385__CLASS_NREP_PROGN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1385__CLASS_NREP_PROGN.val, "CLASS_NREP_PROGN", sizeof (cdat->dstr_1385__CLASS_NREP_PROGN. val) - 1); cdat->dstr_1385__CLASS_NREP_PROGN.val[16] = (char) 0; cdat->dstr_1385__CLASS_NREP_PROGN.slen = 16; /*inirout drout_1386__LAMBDA_ */ /*_.VALROUT___V1552*/ meltfptr[1551] = (melt_ptr_t) & cdat->drout_1386__LAMBDA_; cdat->drout_1386__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1386__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:3255", MELT_ROUTDESCR_LEN - 1); cdat->drout_1386__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1386__LAMBDA_, meltrout_79_warmelt_genobj_LAMBDA___27__); /*inirout drout_1387__COMPILOBJ_NREP_MULTACC */ /*_.VALROUT___V1556*/ meltfptr[1555] = (melt_ptr_t) & cdat->drout_1387__COMPILOBJ_NREP_MULTACC; cdat->drout_1387__COMPILOBJ_NREP_MULTACC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1387__COMPILOBJ_NREP_MULTACC.routdescr, "COMPILOBJ_NREP_MULTACC @warmelt-genobj.melt:3267", MELT_ROUTDESCR_LEN - 1); cdat->drout_1387__COMPILOBJ_NREP_MULTACC.nbval = 10; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1387__COMPILOBJ_NREP_MULTACC, meltrout_80_warmelt_genobj_COMPILOBJ_NREP_MULTACC); /*iniclos dclo_1388__COMPILOBJ_NREP_MULTACC */ /*_.VALCLO___V1558*/ meltfptr[1557] = (melt_ptr_t) & cdat->dclo_1388__COMPILOBJ_NREP_MULTACC; cdat->dclo_1388__COMPILOBJ_NREP_MULTACC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1388__COMPILOBJ_NREP_MULTACC.nbval = 0; /*iniobj dsym_1389__CLASS_NREP_MULTACC*/ /*uniqueobj*/ if (! /*_.VALDATA___V1559*/ meltfptr[1558]) /*_.VALDATA___V1559*/ meltfptr[1558] = (melt_ptr_t) & cdat->dsym_1389__CLASS_NREP_MULTACC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1389__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_1389__CLASS_NREP_MULTACC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1389__CLASS_NREP_MULTACC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1389__CLASS_NREP_MULTACC.obj_hash = 444787444; cdat->dsym_1389__CLASS_NREP_MULTACC.obj_len = 3; /*inistring dstr_1390__CLASS_NREP_MULTA*/ /*_.VALSTR___V1560*/ meltfptr[1559] = (melt_ptr_t) & cdat->dstr_1390__CLASS_NREP_MULTA; cdat->dstr_1390__CLASS_NREP_MULTA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1390__CLASS_NREP_MULTA.val, "CLASS_NREP_MULTACC", sizeof (cdat->dstr_1390__CLASS_NREP_MULTA. val) - 1); cdat->dstr_1390__CLASS_NREP_MULTA.val[18] = (char) 0; cdat->dstr_1390__CLASS_NREP_MULTA.slen = 18; /*inirout drout_1391__LAMBDA_ */ /*_.VALROUT___V1557*/ meltfptr[1556] = (melt_ptr_t) & cdat->drout_1391__LAMBDA_; cdat->drout_1391__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1391__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:3278", MELT_ROUTDESCR_LEN - 1); cdat->drout_1391__LAMBDA_.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1391__LAMBDA_, meltrout_81_warmelt_genobj_LAMBDA___28__); /*inirout drout_1392__COMPILOBJ_NREP_FIELDACC */ /*_.VALROUT___V1561*/ meltfptr[1560] = (melt_ptr_t) & cdat->drout_1392__COMPILOBJ_NREP_FIELDACC; cdat->drout_1392__COMPILOBJ_NREP_FIELDACC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1392__COMPILOBJ_NREP_FIELDACC.routdescr, "COMPILOBJ_NREP_FIELDACC @warmelt-genobj.melt:3318", MELT_ROUTDESCR_LEN - 1); cdat->drout_1392__COMPILOBJ_NREP_FIELDACC.nbval = 14; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1392__COMPILOBJ_NREP_FIELDACC, meltrout_82_warmelt_genobj_COMPILOBJ_NREP_FIELDACC); /*iniclos dclo_1393__COMPILOBJ_NREP_FIELDACC */ /*_.VALCLO___V1563*/ meltfptr[1562] = (melt_ptr_t) & cdat->dclo_1393__COMPILOBJ_NREP_FIELDACC; cdat->dclo_1393__COMPILOBJ_NREP_FIELDACC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1393__COMPILOBJ_NREP_FIELDACC.nbval = 0; /*iniobj dsym_1394__CLASS_NREP_FIELDACC*/ /*uniqueobj*/ if (! /*_.VALDATA___V1564*/ meltfptr[1563]) /*_.VALDATA___V1564*/ meltfptr[1563] = (melt_ptr_t) & cdat->dsym_1394__CLASS_NREP_FIELDACC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1394__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_1394__CLASS_NREP_FIELDACC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1394__CLASS_NREP_FIELDACC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1394__CLASS_NREP_FIELDACC.obj_hash = 571372072; cdat->dsym_1394__CLASS_NREP_FIELDACC.obj_len = 3; /*inistring dstr_1395__CLASS_NREP_FIELD*/ /*_.VALSTR___V1565*/ meltfptr[1564] = (melt_ptr_t) & cdat->dstr_1395__CLASS_NREP_FIELD; cdat->dstr_1395__CLASS_NREP_FIELD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1395__CLASS_NREP_FIELD.val, "CLASS_NREP_FIELDACC", sizeof (cdat->dstr_1395__CLASS_NREP_FIELD. val) - 1); cdat->dstr_1395__CLASS_NREP_FIELD.val[19] = (char) 0; cdat->dstr_1395__CLASS_NREP_FIELD.slen = 19; /*inirout drout_1396__LAMBDA_ */ /*_.VALROUT___V1562*/ meltfptr[1561] = (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-genobj.melt:3331", MELT_ROUTDESCR_LEN - 1); cdat->drout_1396__LAMBDA_.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1396__LAMBDA_, meltrout_83_warmelt_genobj_LAMBDA___29__); /*iniobj dsym_1397__CLASS_FIELD*/ /*uniqueobj*/ if (! /*_.VALDATA___V1566*/ meltfptr[1565]) /*_.VALDATA___V1566*/ meltfptr[1565] = (melt_ptr_t) & cdat->dsym_1397__CLASS_FIELD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1397__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_1397__CLASS_FIELD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1397__CLASS_FIELD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1397__CLASS_FIELD.obj_hash = 523073; cdat->dsym_1397__CLASS_FIELD.obj_len = 3; /*inistring dstr_1398__CLASS_FIELD*/ /*_.VALSTR___V1567*/ meltfptr[1566] = (melt_ptr_t) & cdat->dstr_1398__CLASS_FIELD; cdat->dstr_1398__CLASS_FIELD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1398__CLASS_FIELD.val, "CLASS_FIELD", sizeof (cdat->dstr_1398__CLASS_FIELD.val) - 1); cdat->dstr_1398__CLASS_FIELD.val[11] = (char) 0; cdat->dstr_1398__CLASS_FIELD.slen = 11; /*iniobj dsym_1399__CLASS_NREP_DATAINSTANCE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1568*/ meltfptr[1567]) /*_.VALDATA___V1568*/ meltfptr[1567] = (melt_ptr_t) & cdat->dsym_1399__CLASS_NREP_DATAINSTANCE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1399__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_1399__CLASS_NREP_DATAINSTANCE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1399__CLASS_NREP_DATAINSTANCE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1399__CLASS_NREP_DATAINSTANCE.obj_hash = 475932459; cdat->dsym_1399__CLASS_NREP_DATAINSTANCE.obj_len = 3; /*inistring dstr_1400__CLASS_NREP_DATAI*/ /*_.VALSTR___V1569*/ meltfptr[1568] = (melt_ptr_t) & cdat->dstr_1400__CLASS_NREP_DATAI; cdat->dstr_1400__CLASS_NREP_DATAI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1400__CLASS_NREP_DATAI.val, "CLASS_NREP_DATAINSTANCE", sizeof (cdat->dstr_1400__CLASS_NREP_DATAI. val) - 1); cdat->dstr_1400__CLASS_NREP_DATAI.val[23] = (char) 0; cdat->dstr_1400__CLASS_NREP_DATAI.slen = 23; /*inirout drout_1401__COMPILOBJ_NREP_UNSAFE_GET_FIELD */ /*_.VALROUT___V1570*/ meltfptr[1569] = (melt_ptr_t) & cdat->drout_1401__COMPILOBJ_NREP_UNSAFE_GET_FIELD; cdat->drout_1401__COMPILOBJ_NREP_UNSAFE_GET_FIELD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1401__COMPILOBJ_NREP_UNSAFE_GET_FIELD.routdescr, "COMPILOBJ_NREP_UNSAFE_GET_FIELD @warmelt-genobj.melt:3372", MELT_ROUTDESCR_LEN - 1); cdat->drout_1401__COMPILOBJ_NREP_UNSAFE_GET_FIELD.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat-> drout_1401__COMPILOBJ_NREP_UNSAFE_GET_FIELD, meltrout_84_warmelt_genobj_COMPILOBJ_NREP_UNSAFE_GET_FIELD); /*iniclos dclo_1402__COMPILOBJ_NREP_UNSAFE_GET_FIELD */ /*_.VALCLO___V1571*/ meltfptr[1570] = (melt_ptr_t) & cdat->dclo_1402__COMPILOBJ_NREP_UNSAFE_GET_FIELD; cdat->dclo_1402__COMPILOBJ_NREP_UNSAFE_GET_FIELD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1402__COMPILOBJ_NREP_UNSAFE_GET_FIELD.nbval = 0; /*iniobj dsym_1403__CLASS_NREP_UNSAFE_GET_FIELD*/ /*uniqueobj*/ if (! /*_.VALDATA___V1572*/ meltfptr[1571]) /*_.VALDATA___V1572*/ meltfptr[1571] = (melt_ptr_t) & cdat->dsym_1403__CLASS_NREP_UNSAFE_GET_FIELD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1403__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_1403__CLASS_NREP_UNSAFE_GET_FIELD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1403__CLASS_NREP_UNSAFE_GET_FIELD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1403__CLASS_NREP_UNSAFE_GET_FIELD.obj_hash = 71587717; cdat->dsym_1403__CLASS_NREP_UNSAFE_GET_FIELD.obj_len = 3; /*inistring dstr_1404__CLASS_NREP_UNSAF*/ /*_.VALSTR___V1573*/ meltfptr[1572] = (melt_ptr_t) & cdat->dstr_1404__CLASS_NREP_UNSAF; cdat->dstr_1404__CLASS_NREP_UNSAF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1404__CLASS_NREP_UNSAF.val, "CLASS_NREP_UNSAFE_GET_FIELD", sizeof (cdat->dstr_1404__CLASS_NREP_UNSAF. val) - 1); cdat->dstr_1404__CLASS_NREP_UNSAF.val[27] = (char) 0; cdat->dstr_1404__CLASS_NREP_UNSAF.slen = 27; /*inirout drout_1405__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS */ /*_.VALROUT___V1574*/ meltfptr[1573] = (melt_ptr_t) & cdat->drout_1405__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS; cdat->drout_1405__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1405__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS.routdescr, "COMPILOBJ_NREP_UNSAFE_PUT_FIELDS @warmelt-genobj.melt:3394", MELT_ROUTDESCR_LEN - 1); cdat->drout_1405__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS.nbval = 17; MELT_ROUTINE_SET_ROUTCODE (&cdat-> drout_1405__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS, meltrout_85_warmelt_genobj_COMPILOBJ_NREP_UNSAFE_PUT_FIELDS); /*iniclos dclo_1406__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS */ /*_.VALCLO___V1577*/ meltfptr[1576] = (melt_ptr_t) & cdat->dclo_1406__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS; cdat->dclo_1406__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1406__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS.nbval = 0; /*iniobj dsym_1407__CLASS_NREP_UNSAFE_PUT_FIELDS*/ /*uniqueobj*/ if (! /*_.VALDATA___V1578*/ meltfptr[1577]) /*_.VALDATA___V1578*/ meltfptr[1577] = (melt_ptr_t) & cdat->dsym_1407__CLASS_NREP_UNSAFE_PUT_FIELDS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1407__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_1407__CLASS_NREP_UNSAFE_PUT_FIELDS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1407__CLASS_NREP_UNSAFE_PUT_FIELDS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1407__CLASS_NREP_UNSAFE_PUT_FIELDS.obj_hash = 7092667; cdat->dsym_1407__CLASS_NREP_UNSAFE_PUT_FIELDS.obj_len = 3; /*inistring dstr_1408__CLASS_NREP_UNSAF*/ /*_.VALSTR___V1579*/ meltfptr[1578] = (melt_ptr_t) & cdat->dstr_1408__CLASS_NREP_UNSAF; cdat->dstr_1408__CLASS_NREP_UNSAF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1408__CLASS_NREP_UNSAF.val, "CLASS_NREP_UNSAFE_PUT_FIELDS", sizeof (cdat->dstr_1408__CLASS_NREP_UNSAF. val) - 1); cdat->dstr_1408__CLASS_NREP_UNSAF.val[28] = (char) 0; cdat->dstr_1408__CLASS_NREP_UNSAF.slen = 28; /*inirout drout_1409__LAMBDA_ */ /*_.VALROUT___V1575*/ meltfptr[1574] = (melt_ptr_t) & cdat->drout_1409__LAMBDA_; cdat->drout_1409__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1409__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:3411", MELT_ROUTDESCR_LEN - 1); cdat->drout_1409__LAMBDA_.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1409__LAMBDA_, meltrout_86_warmelt_genobj_LAMBDA___30__); /*iniobj dsym_1410__CLASS_NREP_FIELDASSIGN*/ /*uniqueobj*/ if (! /*_.VALDATA___V1580*/ meltfptr[1579]) /*_.VALDATA___V1580*/ meltfptr[1579] = (melt_ptr_t) & cdat->dsym_1410__CLASS_NREP_FIELDASSIGN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1410__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_1410__CLASS_NREP_FIELDASSIGN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1410__CLASS_NREP_FIELDASSIGN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1410__CLASS_NREP_FIELDASSIGN.obj_hash = 500200612; cdat->dsym_1410__CLASS_NREP_FIELDASSIGN.obj_len = 3; /*inistring dstr_1411__CLASS_NREP_FIELD*/ /*_.VALSTR___V1581*/ meltfptr[1580] = (melt_ptr_t) & cdat->dstr_1411__CLASS_NREP_FIELD; cdat->dstr_1411__CLASS_NREP_FIELD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1411__CLASS_NREP_FIELD.val, "CLASS_NREP_FIELDASSIGN", sizeof (cdat->dstr_1411__CLASS_NREP_FIELD. val) - 1); cdat->dstr_1411__CLASS_NREP_FIELD.val[22] = (char) 0; cdat->dstr_1411__CLASS_NREP_FIELD.slen = 22; /*inistring dstr_1412__put_fields*/ /*_.VALSTR___V1576*/ meltfptr[1575] = (melt_ptr_t) & cdat->dstr_1412__put_fields; cdat->dstr_1412__put_fields.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1412__put_fields.val, "put-fields", sizeof (cdat->dstr_1412__put_fields.val) - 1); cdat->dstr_1412__put_fields.val[10] = (char) 0; cdat->dstr_1412__put_fields.slen = 10; /*inirout drout_1413__COMPILOBJ_NREP_CHECKSIGNAL */ /*_.VALROUT___V1582*/ meltfptr[1581] = (melt_ptr_t) & cdat->drout_1413__COMPILOBJ_NREP_CHECKSIGNAL; cdat->drout_1413__COMPILOBJ_NREP_CHECKSIGNAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1413__COMPILOBJ_NREP_CHECKSIGNAL.routdescr, "COMPILOBJ_NREP_CHECKSIGNAL @warmelt-genobj.melt:3446", MELT_ROUTDESCR_LEN - 1); cdat->drout_1413__COMPILOBJ_NREP_CHECKSIGNAL.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1413__COMPILOBJ_NREP_CHECKSIGNAL, meltrout_87_warmelt_genobj_COMPILOBJ_NREP_CHECKSIGNAL); /*iniclos dclo_1414__COMPILOBJ_NREP_CHECKSIGNAL */ /*_.VALCLO___V1583*/ meltfptr[1582] = (melt_ptr_t) & cdat->dclo_1414__COMPILOBJ_NREP_CHECKSIGNAL; cdat->dclo_1414__COMPILOBJ_NREP_CHECKSIGNAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1414__COMPILOBJ_NREP_CHECKSIGNAL.nbval = 0; /*iniobj dsym_1415__CLASS_NREP_CHECKSIGNAL*/ /*uniqueobj*/ if (! /*_.VALDATA___V1584*/ meltfptr[1583]) /*_.VALDATA___V1584*/ meltfptr[1583] = (melt_ptr_t) & cdat->dsym_1415__CLASS_NREP_CHECKSIGNAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1415__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_1415__CLASS_NREP_CHECKSIGNAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1415__CLASS_NREP_CHECKSIGNAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1415__CLASS_NREP_CHECKSIGNAL.obj_hash = 33589219; cdat->dsym_1415__CLASS_NREP_CHECKSIGNAL.obj_len = 3; /*inistring dstr_1416__CLASS_NREP_CHECK*/ /*_.VALSTR___V1585*/ meltfptr[1584] = (melt_ptr_t) & cdat->dstr_1416__CLASS_NREP_CHECK; cdat->dstr_1416__CLASS_NREP_CHECK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1416__CLASS_NREP_CHECK.val, "CLASS_NREP_CHECKSIGNAL", sizeof (cdat->dstr_1416__CLASS_NREP_CHECK. val) - 1); cdat->dstr_1416__CLASS_NREP_CHECK.val[22] = (char) 0; cdat->dstr_1416__CLASS_NREP_CHECK.slen = 22; /*inirout drout_1417__COMPILOBJ_NREP_UNSAFE_NTH_COMPONENT */ /*_.VALROUT___V1586*/ meltfptr[1585] = (melt_ptr_t) & cdat->drout_1417__COMPILOBJ_NREP_UNSAFE_NTH_COMPONENT; cdat->drout_1417__COMPILOBJ_NREP_UNSAFE_NTH_COMPONENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1417__COMPILOBJ_NREP_UNSAFE_NTH_COMPONENT.routdescr, "COMPILOBJ_NREP_UNSAFE_NTH_COMPONENT @warmelt-genobj.melt:3462", MELT_ROUTDESCR_LEN - 1); cdat->drout_1417__COMPILOBJ_NREP_UNSAFE_NTH_COMPONENT.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat-> drout_1417__COMPILOBJ_NREP_UNSAFE_NTH_COMPONENT, meltrout_88_warmelt_genobj_COMPILOBJ_NREP_UNSAFE_NTH_COMPONENT); /*iniclos dclo_1418__COMPILOBJ_NREP_UNSAFE_NTH_COMPONENT */ /*_.VALCLO___V1587*/ meltfptr[1586] = (melt_ptr_t) & cdat->dclo_1418__COMPILOBJ_NREP_UNSAFE_NTH_COMPONENT; cdat->dclo_1418__COMPILOBJ_NREP_UNSAFE_NTH_COMPONENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1418__COMPILOBJ_NREP_UNSAFE_NTH_COMPONENT.nbval = 0; /*iniobj dsym_1419__CLASS_NREP_UNSAFE_NTH_COMPONENT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1588*/ meltfptr[1587]) /*_.VALDATA___V1588*/ meltfptr[1587] = (melt_ptr_t) & cdat->dsym_1419__CLASS_NREP_UNSAFE_NTH_COMPONENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1419__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_1419__CLASS_NREP_UNSAFE_NTH_COMPONENT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1419__CLASS_NREP_UNSAFE_NTH_COMPONENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1419__CLASS_NREP_UNSAFE_NTH_COMPONENT.obj_hash = 888296044; cdat->dsym_1419__CLASS_NREP_UNSAFE_NTH_COMPONENT.obj_len = 3; /*inistring dstr_1420__CLASS_NREP_UNSAF*/ /*_.VALSTR___V1589*/ meltfptr[1588] = (melt_ptr_t) & cdat->dstr_1420__CLASS_NREP_UNSAF; cdat->dstr_1420__CLASS_NREP_UNSAF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1420__CLASS_NREP_UNSAF.val, "CLASS_NREP_UNSAFE_NTH_COMPONENT", sizeof (cdat->dstr_1420__CLASS_NREP_UNSAF. val) - 1); cdat->dstr_1420__CLASS_NREP_UNSAF.val[31] = (char) 0; cdat->dstr_1420__CLASS_NREP_UNSAF.slen = 31; /*inirout drout_1421__COMPILOBJ_NREP_APPLY */ /*_.VALROUT___V1590*/ meltfptr[1589] = (melt_ptr_t) & cdat->drout_1421__COMPILOBJ_NREP_APPLY; cdat->drout_1421__COMPILOBJ_NREP_APPLY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1421__COMPILOBJ_NREP_APPLY.routdescr, "COMPILOBJ_NREP_APPLY @warmelt-genobj.melt:3481", MELT_ROUTDESCR_LEN - 1); cdat->drout_1421__COMPILOBJ_NREP_APPLY.nbval = 10; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1421__COMPILOBJ_NREP_APPLY, meltrout_89_warmelt_genobj_COMPILOBJ_NREP_APPLY); /*iniclos dclo_1422__COMPILOBJ_NREP_APPLY */ /*_.VALCLO___V1592*/ meltfptr[1591] = (melt_ptr_t) & cdat->dclo_1422__COMPILOBJ_NREP_APPLY; cdat->dclo_1422__COMPILOBJ_NREP_APPLY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1422__COMPILOBJ_NREP_APPLY.nbval = 0; /*iniobj dsym_1423__CLASS_NREP_APPLY*/ /*uniqueobj*/ if (! /*_.VALDATA___V1593*/ meltfptr[1592]) /*_.VALDATA___V1593*/ meltfptr[1592] = (melt_ptr_t) & cdat->dsym_1423__CLASS_NREP_APPLY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1423__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_1423__CLASS_NREP_APPLY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1423__CLASS_NREP_APPLY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1423__CLASS_NREP_APPLY.obj_hash = 866094506; cdat->dsym_1423__CLASS_NREP_APPLY.obj_len = 3; /*inistring dstr_1424__CLASS_NREP_APPLY*/ /*_.VALSTR___V1594*/ meltfptr[1593] = (melt_ptr_t) & cdat->dstr_1424__CLASS_NREP_APPLY; cdat->dstr_1424__CLASS_NREP_APPLY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1424__CLASS_NREP_APPLY.val, "CLASS_NREP_APPLY", sizeof (cdat->dstr_1424__CLASS_NREP_APPLY. val) - 1); cdat->dstr_1424__CLASS_NREP_APPLY.val[16] = (char) 0; cdat->dstr_1424__CLASS_NREP_APPLY.slen = 16; /*inirout drout_1425__LAMBDA_ */ /*_.VALROUT___V1591*/ meltfptr[1590] = (melt_ptr_t) & cdat->drout_1425__LAMBDA_; cdat->drout_1425__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1425__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:3492", MELT_ROUTDESCR_LEN - 1); cdat->drout_1425__LAMBDA_.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1425__LAMBDA_, meltrout_90_warmelt_genobj_LAMBDA___31__); /*inirout drout_1426__COMPILOBJ_NREP_MULTIAPPLY */ /*_.VALROUT___V1595*/ meltfptr[1594] = (melt_ptr_t) & cdat->drout_1426__COMPILOBJ_NREP_MULTIAPPLY; cdat->drout_1426__COMPILOBJ_NREP_MULTIAPPLY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1426__COMPILOBJ_NREP_MULTIAPPLY.routdescr, "COMPILOBJ_NREP_MULTIAPPLY @warmelt-genobj.melt:3512", MELT_ROUTDESCR_LEN - 1); cdat->drout_1426__COMPILOBJ_NREP_MULTIAPPLY.nbval = 23; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1426__COMPILOBJ_NREP_MULTIAPPLY, meltrout_91_warmelt_genobj_COMPILOBJ_NREP_MULTIAPPLY); /*iniclos dclo_1427__COMPILOBJ_NREP_MULTIAPPLY */ /*_.VALCLO___V1601*/ meltfptr[1600] = (melt_ptr_t) & cdat->dclo_1427__COMPILOBJ_NREP_MULTIAPPLY; cdat->dclo_1427__COMPILOBJ_NREP_MULTIAPPLY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1427__COMPILOBJ_NREP_MULTIAPPLY.nbval = 0; /*iniobj dsym_1428__CLASS_NREP_MULTIAPPLY*/ /*uniqueobj*/ if (! /*_.VALDATA___V1602*/ meltfptr[1601]) /*_.VALDATA___V1602*/ meltfptr[1601] = (melt_ptr_t) & cdat->dsym_1428__CLASS_NREP_MULTIAPPLY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1428__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_1428__CLASS_NREP_MULTIAPPLY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1428__CLASS_NREP_MULTIAPPLY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1428__CLASS_NREP_MULTIAPPLY.obj_hash = 257736327; cdat->dsym_1428__CLASS_NREP_MULTIAPPLY.obj_len = 3; /*inistring dstr_1429__CLASS_NREP_MULTI*/ /*_.VALSTR___V1603*/ meltfptr[1602] = (melt_ptr_t) & cdat->dstr_1429__CLASS_NREP_MULTI; cdat->dstr_1429__CLASS_NREP_MULTI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1429__CLASS_NREP_MULTI.val, "CLASS_NREP_MULTIAPPLY", sizeof (cdat->dstr_1429__CLASS_NREP_MULTI. val) - 1); cdat->dstr_1429__CLASS_NREP_MULTI.val[21] = (char) 0; cdat->dstr_1429__CLASS_NREP_MULTI.slen = 21; /*inirout drout_1430__LAMBDA_ */ /*_.VALROUT___V1596*/ meltfptr[1595] = (melt_ptr_t) & cdat->drout_1430__LAMBDA_; cdat->drout_1430__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1430__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:3526", MELT_ROUTDESCR_LEN - 1); cdat->drout_1430__LAMBDA_.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1430__LAMBDA_, meltrout_92_warmelt_genobj_LAMBDA___32__); /*inirout drout_1431__LAMBDA_ */ /*_.VALROUT___V1597*/ meltfptr[1596] = (melt_ptr_t) & cdat->drout_1431__LAMBDA_; cdat->drout_1431__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1431__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:3550", MELT_ROUTDESCR_LEN - 1); cdat->drout_1431__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1431__LAMBDA_, meltrout_93_warmelt_genobj_LAMBDA___33__); /*inirout drout_1432__LAMBDA_ */ /*_.VALROUT___V1598*/ meltfptr[1597] = (melt_ptr_t) & cdat->drout_1432__LAMBDA_; cdat->drout_1432__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1432__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:3564", MELT_ROUTDESCR_LEN - 1); cdat->drout_1432__LAMBDA_.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1432__LAMBDA_, meltrout_94_warmelt_genobj_LAMBDA___34__); /*inirout drout_1433__LAMBDA_ */ /*_.VALROUT___V1599*/ meltfptr[1598] = (melt_ptr_t) & cdat->drout_1433__LAMBDA_; cdat->drout_1433__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1433__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:3574", MELT_ROUTDESCR_LEN - 1); cdat->drout_1433__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1433__LAMBDA_, meltrout_95_warmelt_genobj_LAMBDA___35__); /*inirout drout_1434__LAMBDA_ */ /*_.VALROUT___V1600*/ meltfptr[1599] = (melt_ptr_t) & cdat->drout_1434__LAMBDA_; cdat->drout_1434__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1434__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:3585", MELT_ROUTDESCR_LEN - 1); cdat->drout_1434__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1434__LAMBDA_, meltrout_96_warmelt_genobj_LAMBDA___36__); /*inirout drout_1435__COMPILOBJ_NREP_MSEND */ /*_.VALROUT___V1604*/ meltfptr[1603] = (melt_ptr_t) & cdat->drout_1435__COMPILOBJ_NREP_MSEND; cdat->drout_1435__COMPILOBJ_NREP_MSEND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1435__COMPILOBJ_NREP_MSEND.routdescr, "COMPILOBJ_NREP_MSEND @warmelt-genobj.melt:3594", MELT_ROUTDESCR_LEN - 1); cdat->drout_1435__COMPILOBJ_NREP_MSEND.nbval = 10; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1435__COMPILOBJ_NREP_MSEND, meltrout_97_warmelt_genobj_COMPILOBJ_NREP_MSEND); /*iniclos dclo_1436__COMPILOBJ_NREP_MSEND */ /*_.VALCLO___V1606*/ meltfptr[1605] = (melt_ptr_t) & cdat->dclo_1436__COMPILOBJ_NREP_MSEND; cdat->dclo_1436__COMPILOBJ_NREP_MSEND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1436__COMPILOBJ_NREP_MSEND.nbval = 0; /*iniobj dsym_1437__CLASS_NREP_MSEND*/ /*uniqueobj*/ if (! /*_.VALDATA___V1607*/ meltfptr[1606]) /*_.VALDATA___V1607*/ meltfptr[1606] = (melt_ptr_t) & cdat->dsym_1437__CLASS_NREP_MSEND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1437__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_1437__CLASS_NREP_MSEND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1437__CLASS_NREP_MSEND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1437__CLASS_NREP_MSEND.obj_hash = 263475785; cdat->dsym_1437__CLASS_NREP_MSEND.obj_len = 3; /*inistring dstr_1438__CLASS_NREP_MSEND*/ /*_.VALSTR___V1608*/ meltfptr[1607] = (melt_ptr_t) & cdat->dstr_1438__CLASS_NREP_MSEND; cdat->dstr_1438__CLASS_NREP_MSEND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1438__CLASS_NREP_MSEND.val, "CLASS_NREP_MSEND", sizeof (cdat->dstr_1438__CLASS_NREP_MSEND. val) - 1); cdat->dstr_1438__CLASS_NREP_MSEND.val[16] = (char) 0; cdat->dstr_1438__CLASS_NREP_MSEND.slen = 16; /*inirout drout_1439__LAMBDA_ */ /*_.VALROUT___V1605*/ meltfptr[1604] = (melt_ptr_t) & cdat->drout_1439__LAMBDA_; cdat->drout_1439__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1439__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:3608", MELT_ROUTDESCR_LEN - 1); cdat->drout_1439__LAMBDA_.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1439__LAMBDA_, meltrout_98_warmelt_genobj_LAMBDA___37__); /*inirout drout_1440__COMPILOBJ_NREP_MULTIMSEND */ /*_.VALROUT___V1609*/ meltfptr[1608] = (melt_ptr_t) & cdat->drout_1440__COMPILOBJ_NREP_MULTIMSEND; cdat->drout_1440__COMPILOBJ_NREP_MULTIMSEND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1440__COMPILOBJ_NREP_MULTIMSEND.routdescr, "COMPILOBJ_NREP_MULTIMSEND @warmelt-genobj.melt:3634", MELT_ROUTDESCR_LEN - 1); cdat->drout_1440__COMPILOBJ_NREP_MULTIMSEND.nbval = 22; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1440__COMPILOBJ_NREP_MULTIMSEND, meltrout_99_warmelt_genobj_COMPILOBJ_NREP_MULTIMSEND); /*iniclos dclo_1441__COMPILOBJ_NREP_MULTIMSEND */ /*_.VALCLO___V1614*/ meltfptr[1613] = (melt_ptr_t) & cdat->dclo_1441__COMPILOBJ_NREP_MULTIMSEND; cdat->dclo_1441__COMPILOBJ_NREP_MULTIMSEND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1441__COMPILOBJ_NREP_MULTIMSEND.nbval = 0; /*iniobj dsym_1442__CLASS_NREP_MULTIMSEND*/ /*uniqueobj*/ if (! /*_.VALDATA___V1615*/ meltfptr[1614]) /*_.VALDATA___V1615*/ meltfptr[1614] = (melt_ptr_t) & cdat->dsym_1442__CLASS_NREP_MULTIMSEND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1442__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_1442__CLASS_NREP_MULTIMSEND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1442__CLASS_NREP_MULTIMSEND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1442__CLASS_NREP_MULTIMSEND.obj_hash = 247075982; cdat->dsym_1442__CLASS_NREP_MULTIMSEND.obj_len = 3; /*inistring dstr_1443__CLASS_NREP_MULTI*/ /*_.VALSTR___V1616*/ meltfptr[1615] = (melt_ptr_t) & cdat->dstr_1443__CLASS_NREP_MULTI; cdat->dstr_1443__CLASS_NREP_MULTI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1443__CLASS_NREP_MULTI.val, "CLASS_NREP_MULTIMSEND", sizeof (cdat->dstr_1443__CLASS_NREP_MULTI. val) - 1); cdat->dstr_1443__CLASS_NREP_MULTI.val[21] = (char) 0; cdat->dstr_1443__CLASS_NREP_MULTI.slen = 21; /*inirout drout_1444__LAMBDA_ */ /*_.VALROUT___V1610*/ meltfptr[1609] = (melt_ptr_t) & cdat->drout_1444__LAMBDA_; cdat->drout_1444__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1444__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:3649", MELT_ROUTDESCR_LEN - 1); cdat->drout_1444__LAMBDA_.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1444__LAMBDA_, meltrout_100_warmelt_genobj_LAMBDA___38__); /*inirout drout_1445__LAMBDA_ */ /*_.VALROUT___V1611*/ meltfptr[1610] = (melt_ptr_t) & cdat->drout_1445__LAMBDA_; cdat->drout_1445__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1445__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:3669", MELT_ROUTDESCR_LEN - 1); cdat->drout_1445__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1445__LAMBDA_, meltrout_101_warmelt_genobj_LAMBDA___39__); /*inirout drout_1446__LAMBDA_ */ /*_.VALROUT___V1612*/ meltfptr[1611] = (melt_ptr_t) & cdat->drout_1446__LAMBDA_; cdat->drout_1446__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1446__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:3701", MELT_ROUTDESCR_LEN - 1); cdat->drout_1446__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1446__LAMBDA_, meltrout_102_warmelt_genobj_LAMBDA___40__); /*inirout drout_1447__LAMBDA_ */ /*_.VALROUT___V1613*/ meltfptr[1612] = (melt_ptr_t) & cdat->drout_1447__LAMBDA_; cdat->drout_1447__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1447__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:3711", MELT_ROUTDESCR_LEN - 1); cdat->drout_1447__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1447__LAMBDA_, meltrout_103_warmelt_genobj_LAMBDA___41__); /*inirout drout_1448__COMPILOBJ_ANY_BINDING */ /*_.VALROUT___V1617*/ meltfptr[1616] = (melt_ptr_t) & cdat->drout_1448__COMPILOBJ_ANY_BINDING; cdat->drout_1448__COMPILOBJ_ANY_BINDING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1448__COMPILOBJ_ANY_BINDING.routdescr, "COMPILOBJ_ANY_BINDING @warmelt-genobj.melt:3721", MELT_ROUTDESCR_LEN - 1); cdat->drout_1448__COMPILOBJ_ANY_BINDING.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1448__COMPILOBJ_ANY_BINDING, meltrout_104_warmelt_genobj_COMPILOBJ_ANY_BINDING); /*iniclos dclo_1449__COMPILOBJ_ANY_BINDING */ /*_.VALCLO___V1618*/ meltfptr[1617] = (melt_ptr_t) & cdat->dclo_1449__COMPILOBJ_ANY_BINDING; cdat->dclo_1449__COMPILOBJ_ANY_BINDING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1449__COMPILOBJ_ANY_BINDING.nbval = 0; /*inirout drout_1450__COMPILOBJ_VALUE_BINDING */ /*_.VALROUT___V1619*/ meltfptr[1618] = (melt_ptr_t) & cdat->drout_1450__COMPILOBJ_VALUE_BINDING; cdat->drout_1450__COMPILOBJ_VALUE_BINDING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1450__COMPILOBJ_VALUE_BINDING.routdescr, "COMPILOBJ_VALUE_BINDING @warmelt-genobj.melt:3734", MELT_ROUTDESCR_LEN - 1); cdat->drout_1450__COMPILOBJ_VALUE_BINDING.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1450__COMPILOBJ_VALUE_BINDING, meltrout_105_warmelt_genobj_COMPILOBJ_VALUE_BINDING); /*iniclos dclo_1451__COMPILOBJ_VALUE_BINDING */ /*_.VALCLO___V1620*/ meltfptr[1619] = (melt_ptr_t) & cdat->dclo_1451__COMPILOBJ_VALUE_BINDING; cdat->dclo_1451__COMPILOBJ_VALUE_BINDING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1451__COMPILOBJ_VALUE_BINDING.nbval = 0; /*inirout drout_1452__COMPILOBJ_FIXED_BINDING */ /*_.VALROUT___V1621*/ meltfptr[1620] = (melt_ptr_t) & cdat->drout_1452__COMPILOBJ_FIXED_BINDING; cdat->drout_1452__COMPILOBJ_FIXED_BINDING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1452__COMPILOBJ_FIXED_BINDING.routdescr, "COMPILOBJ_FIXED_BINDING @warmelt-genobj.melt:3750", MELT_ROUTDESCR_LEN - 1); cdat->drout_1452__COMPILOBJ_FIXED_BINDING.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1452__COMPILOBJ_FIXED_BINDING, meltrout_106_warmelt_genobj_COMPILOBJ_FIXED_BINDING); /*iniclos dclo_1453__COMPILOBJ_FIXED_BINDING */ /*_.VALCLO___V1622*/ meltfptr[1621] = (melt_ptr_t) & cdat->dclo_1453__COMPILOBJ_FIXED_BINDING; cdat->dclo_1453__COMPILOBJ_FIXED_BINDING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1453__COMPILOBJ_FIXED_BINDING.nbval = 0; /*inirout drout_1454__COMPILOBJ_NORMAL_LET_BINDING */ /*_.VALROUT___V1623*/ meltfptr[1622] = (melt_ptr_t) & cdat->drout_1454__COMPILOBJ_NORMAL_LET_BINDING; cdat->drout_1454__COMPILOBJ_NORMAL_LET_BINDING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1454__COMPILOBJ_NORMAL_LET_BINDING.routdescr, "COMPILOBJ_NORMAL_LET_BINDING @warmelt-genobj.melt:3763", MELT_ROUTDESCR_LEN - 1); cdat->drout_1454__COMPILOBJ_NORMAL_LET_BINDING.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1454__COMPILOBJ_NORMAL_LET_BINDING, meltrout_107_warmelt_genobj_COMPILOBJ_NORMAL_LET_BINDING); /*iniclos dclo_1455__COMPILOBJ_NORMAL_LET_BINDING */ /*_.VALCLO___V1624*/ meltfptr[1623] = (melt_ptr_t) & cdat->dclo_1455__COMPILOBJ_NORMAL_LET_BINDING; cdat->dclo_1455__COMPILOBJ_NORMAL_LET_BINDING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1455__COMPILOBJ_NORMAL_LET_BINDING.nbval = 0; /*inirout drout_1456__COMPILOBJ_CONSLAMBDABIND */ /*_.VALROUT___V1625*/ meltfptr[1624] = (melt_ptr_t) & cdat->drout_1456__COMPILOBJ_CONSLAMBDABIND; cdat->drout_1456__COMPILOBJ_CONSLAMBDABIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1456__COMPILOBJ_CONSLAMBDABIND.routdescr, "COMPILOBJ_CONSLAMBDABIND @warmelt-genobj.melt:3779", MELT_ROUTDESCR_LEN - 1); cdat->drout_1456__COMPILOBJ_CONSLAMBDABIND.nbval = 10; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1456__COMPILOBJ_CONSLAMBDABIND, meltrout_108_warmelt_genobj_COMPILOBJ_CONSLAMBDABIND); /*iniclos dclo_1457__COMPILOBJ_CONSLAMBDABIND */ /*_.VALCLO___V1626*/ meltfptr[1625] = (melt_ptr_t) & cdat->dclo_1457__COMPILOBJ_CONSLAMBDABIND; cdat->dclo_1457__COMPILOBJ_CONSLAMBDABIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1457__COMPILOBJ_CONSLAMBDABIND.nbval = 0; /*inirout drout_1458__COMPILOBJ_CONSTUPLEBIND */ /*_.VALROUT___V1627*/ meltfptr[1626] = (melt_ptr_t) & cdat->drout_1458__COMPILOBJ_CONSTUPLEBIND; cdat->drout_1458__COMPILOBJ_CONSTUPLEBIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1458__COMPILOBJ_CONSTUPLEBIND.routdescr, "COMPILOBJ_CONSTUPLEBIND @warmelt-genobj.melt:3824", MELT_ROUTDESCR_LEN - 1); cdat->drout_1458__COMPILOBJ_CONSTUPLEBIND.nbval = 11; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1458__COMPILOBJ_CONSTUPLEBIND, meltrout_109_warmelt_genobj_COMPILOBJ_CONSTUPLEBIND); /*iniclos dclo_1459__COMPILOBJ_CONSTUPLEBIND */ /*_.VALCLO___V1628*/ meltfptr[1627] = (melt_ptr_t) & cdat->dclo_1459__COMPILOBJ_CONSTUPLEBIND; cdat->dclo_1459__COMPILOBJ_CONSTUPLEBIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1459__COMPILOBJ_CONSTUPLEBIND.nbval = 0; /*inirout drout_1460__COMPILOBJ_CONSPAIRBIND */ /*_.VALROUT___V1629*/ meltfptr[1628] = (melt_ptr_t) & cdat->drout_1460__COMPILOBJ_CONSPAIRBIND; cdat->drout_1460__COMPILOBJ_CONSPAIRBIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1460__COMPILOBJ_CONSPAIRBIND.routdescr, "COMPILOBJ_CONSPAIRBIND @warmelt-genobj.melt:3868", MELT_ROUTDESCR_LEN - 1); cdat->drout_1460__COMPILOBJ_CONSPAIRBIND.nbval = 10; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1460__COMPILOBJ_CONSPAIRBIND, meltrout_110_warmelt_genobj_COMPILOBJ_CONSPAIRBIND); /*iniclos dclo_1461__COMPILOBJ_CONSPAIRBIND */ /*_.VALCLO___V1630*/ meltfptr[1629] = (melt_ptr_t) & cdat->dclo_1461__COMPILOBJ_CONSPAIRBIND; cdat->dclo_1461__COMPILOBJ_CONSPAIRBIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1461__COMPILOBJ_CONSPAIRBIND.nbval = 0; /*inirout drout_1462__COMPILOBJ_CONSLISTBIND */ /*_.VALROUT___V1631*/ meltfptr[1630] = (melt_ptr_t) & cdat->drout_1462__COMPILOBJ_CONSLISTBIND; cdat->drout_1462__COMPILOBJ_CONSLISTBIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1462__COMPILOBJ_CONSLISTBIND.routdescr, "COMPILOBJ_CONSLISTBIND @warmelt-genobj.melt:3907", MELT_ROUTDESCR_LEN - 1); cdat->drout_1462__COMPILOBJ_CONSLISTBIND.nbval = 9; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1462__COMPILOBJ_CONSLISTBIND, meltrout_111_warmelt_genobj_COMPILOBJ_CONSLISTBIND); /*iniclos dclo_1463__COMPILOBJ_CONSLISTBIND */ /*_.VALCLO___V1632*/ meltfptr[1631] = (melt_ptr_t) & cdat->dclo_1463__COMPILOBJ_CONSLISTBIND; cdat->dclo_1463__COMPILOBJ_CONSLISTBIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1463__COMPILOBJ_CONSLISTBIND.nbval = 0; /*inirout drout_1464__COMPILOBJ_CONSINSTANCEBIND */ /*_.VALROUT___V1633*/ meltfptr[1632] = (melt_ptr_t) & cdat->drout_1464__COMPILOBJ_CONSINSTANCEBIND; cdat->drout_1464__COMPILOBJ_CONSINSTANCEBIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1464__COMPILOBJ_CONSINSTANCEBIND.routdescr, "COMPILOBJ_CONSINSTANCEBIND @warmelt-genobj.melt:3943", MELT_ROUTDESCR_LEN - 1); cdat->drout_1464__COMPILOBJ_CONSINSTANCEBIND.nbval = 12; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1464__COMPILOBJ_CONSINSTANCEBIND, meltrout_112_warmelt_genobj_COMPILOBJ_CONSINSTANCEBIND); /*iniclos dclo_1465__COMPILOBJ_CONSINSTANCEBIND */ /*_.VALCLO___V1634*/ meltfptr[1633] = (melt_ptr_t) & cdat->dclo_1465__COMPILOBJ_CONSINSTANCEBIND; cdat->dclo_1465__COMPILOBJ_CONSINSTANCEBIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1465__COMPILOBJ_CONSINSTANCEBIND.nbval = 0; /*inirout drout_1466__PUTOBJDEST_OBJVALUE */ /*_.VALROUT___V1635*/ meltfptr[1634] = (melt_ptr_t) & cdat->drout_1466__PUTOBJDEST_OBJVALUE; cdat->drout_1466__PUTOBJDEST_OBJVALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1466__PUTOBJDEST_OBJVALUE.routdescr, "PUTOBJDEST_OBJVALUE @warmelt-genobj.melt:3988", MELT_ROUTDESCR_LEN - 1); cdat->drout_1466__PUTOBJDEST_OBJVALUE.nbval = 9; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1466__PUTOBJDEST_OBJVALUE, meltrout_113_warmelt_genobj_PUTOBJDEST_OBJVALUE); /*iniclos dclo_1467__PUTOBJDEST_OBJVALUE */ /*_.VALCLO___V1636*/ meltfptr[1635] = (melt_ptr_t) & cdat->dclo_1467__PUTOBJDEST_OBJVALUE; cdat->dclo_1467__PUTOBJDEST_OBJVALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1467__PUTOBJDEST_OBJVALUE.nbval = 0; /*inirout drout_1468__PUTOBJDEST_INTEGER */ /*_.VALROUT___V1637*/ meltfptr[1636] = (melt_ptr_t) & cdat->drout_1468__PUTOBJDEST_INTEGER; cdat->drout_1468__PUTOBJDEST_INTEGER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1468__PUTOBJDEST_INTEGER.routdescr, "PUTOBJDEST_INTEGER @warmelt-genobj.melt:4053", MELT_ROUTDESCR_LEN - 1); cdat->drout_1468__PUTOBJDEST_INTEGER.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1468__PUTOBJDEST_INTEGER, meltrout_114_warmelt_genobj_PUTOBJDEST_INTEGER); /*iniclos dclo_1469__PUTOBJDEST_INTEGER */ /*_.VALCLO___V1638*/ meltfptr[1637] = (melt_ptr_t) & cdat->dclo_1469__PUTOBJDEST_INTEGER; cdat->dclo_1469__PUTOBJDEST_INTEGER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1469__PUTOBJDEST_INTEGER.nbval = 0; /*inirout drout_1470__PUTOBJDEST_STRING */ /*_.VALROUT___V1639*/ meltfptr[1638] = (melt_ptr_t) & cdat->drout_1470__PUTOBJDEST_STRING; cdat->drout_1470__PUTOBJDEST_STRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1470__PUTOBJDEST_STRING.routdescr, "PUTOBJDEST_STRING @warmelt-genobj.melt:4080", MELT_ROUTDESCR_LEN - 1); cdat->drout_1470__PUTOBJDEST_STRING.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1470__PUTOBJDEST_STRING, meltrout_115_warmelt_genobj_PUTOBJDEST_STRING); /*iniclos dclo_1471__PUTOBJDEST_STRING */ /*_.VALCLO___V1640*/ meltfptr[1639] = (melt_ptr_t) & cdat->dclo_1471__PUTOBJDEST_STRING; cdat->dclo_1471__PUTOBJDEST_STRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1471__PUTOBJDEST_STRING.nbval = 0; /*iniobj dsym_1472__CTYPE_CSTRING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1641*/ meltfptr[1640]) /*_.VALDATA___V1641*/ meltfptr[1640] = (melt_ptr_t) & cdat->dsym_1472__CTYPE_CSTRING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1472__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_1472__CTYPE_CSTRING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1472__CTYPE_CSTRING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1472__CTYPE_CSTRING.obj_hash = 90196516; cdat->dsym_1472__CTYPE_CSTRING.obj_len = 3; /*inistring dstr_1473__CTYPE_CSTRING*/ /*_.VALSTR___V1642*/ meltfptr[1641] = (melt_ptr_t) & cdat->dstr_1473__CTYPE_CSTRING; cdat->dstr_1473__CTYPE_CSTRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1473__CTYPE_CSTRING.val, "CTYPE_CSTRING", sizeof (cdat->dstr_1473__CTYPE_CSTRING.val) - 1); cdat->dstr_1473__CTYPE_CSTRING.val[13] = (char) 0; cdat->dstr_1473__CTYPE_CSTRING.slen = 13; /*inirout drout_1474__PUTOBJDEST_NULL */ /*_.VALROUT___V1643*/ meltfptr[1642] = (melt_ptr_t) & cdat->drout_1474__PUTOBJDEST_NULL; cdat->drout_1474__PUTOBJDEST_NULL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1474__PUTOBJDEST_NULL.routdescr, "PUTOBJDEST_NULL @warmelt-genobj.melt:4103", MELT_ROUTDESCR_LEN - 1); cdat->drout_1474__PUTOBJDEST_NULL.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1474__PUTOBJDEST_NULL, meltrout_116_warmelt_genobj_PUTOBJDEST_NULL); /*iniclos dclo_1475__PUTOBJDEST_NULL */ /*_.VALCLO___V1644*/ meltfptr[1643] = (melt_ptr_t) & cdat->dclo_1475__PUTOBJDEST_NULL; cdat->dclo_1475__PUTOBJDEST_NULL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1475__PUTOBJDEST_NULL.nbval = 0; /*iniobj dsym_1476__DISCR_NULL_RECEIVER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1645*/ meltfptr[1644]) /*_.VALDATA___V1645*/ meltfptr[1644] = (melt_ptr_t) & cdat->dsym_1476__DISCR_NULL_RECEIVER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1476__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_1476__DISCR_NULL_RECEIVER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1476__DISCR_NULL_RECEIVER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1476__DISCR_NULL_RECEIVER.obj_hash = 1063609307; cdat->dsym_1476__DISCR_NULL_RECEIVER.obj_len = 3; /*inistring dstr_1477__DISCR_NULL_RECEI*/ /*_.VALSTR___V1646*/ meltfptr[1645] = (melt_ptr_t) & cdat->dstr_1477__DISCR_NULL_RECEI; cdat->dstr_1477__DISCR_NULL_RECEI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1477__DISCR_NULL_RECEI.val, "DISCR_NULL_RECEIVER", sizeof (cdat->dstr_1477__DISCR_NULL_RECEI. val) - 1); cdat->dstr_1477__DISCR_NULL_RECEI.val[19] = (char) 0; cdat->dstr_1477__DISCR_NULL_RECEI.slen = 19; /*inirout drout_1478__PUTOBJDEST_OBJANYBLOCK */ /*_.VALROUT___V1647*/ meltfptr[1646] = (melt_ptr_t) & cdat->drout_1478__PUTOBJDEST_OBJANYBLOCK; cdat->drout_1478__PUTOBJDEST_OBJANYBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1478__PUTOBJDEST_OBJANYBLOCK.routdescr, "PUTOBJDEST_OBJANYBLOCK @warmelt-genobj.melt:4128", MELT_ROUTDESCR_LEN - 1); cdat->drout_1478__PUTOBJDEST_OBJANYBLOCK.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1478__PUTOBJDEST_OBJANYBLOCK, meltrout_117_warmelt_genobj_PUTOBJDEST_OBJANYBLOCK); /*iniclos dclo_1479__PUTOBJDEST_OBJANYBLOCK */ /*_.VALCLO___V1648*/ meltfptr[1647] = (melt_ptr_t) & cdat->dclo_1479__PUTOBJDEST_OBJANYBLOCK; cdat->dclo_1479__PUTOBJDEST_OBJANYBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1479__PUTOBJDEST_OBJANYBLOCK.nbval = 0; /*inirout drout_1480__PUTOBJDEST_OBJMULTIBLOCK */ /*_.VALROUT___V1649*/ meltfptr[1648] = (melt_ptr_t) & cdat->drout_1480__PUTOBJDEST_OBJMULTIBLOCK; cdat->drout_1480__PUTOBJDEST_OBJMULTIBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1480__PUTOBJDEST_OBJMULTIBLOCK.routdescr, "PUTOBJDEST_OBJMULTIBLOCK @warmelt-genobj.melt:4153", MELT_ROUTDESCR_LEN - 1); cdat->drout_1480__PUTOBJDEST_OBJMULTIBLOCK.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1480__PUTOBJDEST_OBJMULTIBLOCK, meltrout_118_warmelt_genobj_PUTOBJDEST_OBJMULTIBLOCK); /*iniclos dclo_1481__PUTOBJDEST_OBJMULTIBLOCK */ /*_.VALCLO___V1650*/ meltfptr[1649] = (melt_ptr_t) & cdat->dclo_1481__PUTOBJDEST_OBJMULTIBLOCK; cdat->dclo_1481__PUTOBJDEST_OBJMULTIBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1481__PUTOBJDEST_OBJMULTIBLOCK.nbval = 0; /*inirout drout_1482__PUTOBJDEST_OBJLOOP */ /*_.VALROUT___V1651*/ meltfptr[1650] = (melt_ptr_t) & cdat->drout_1482__PUTOBJDEST_OBJLOOP; cdat->drout_1482__PUTOBJDEST_OBJLOOP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1482__PUTOBJDEST_OBJLOOP.routdescr, "PUTOBJDEST_OBJLOOP @warmelt-genobj.melt:4166", MELT_ROUTDESCR_LEN - 1); cdat->drout_1482__PUTOBJDEST_OBJLOOP.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1482__PUTOBJDEST_OBJLOOP, meltrout_119_warmelt_genobj_PUTOBJDEST_OBJLOOP); /*iniclos dclo_1483__PUTOBJDEST_OBJLOOP */ /*_.VALCLO___V1652*/ meltfptr[1651] = (melt_ptr_t) & cdat->dclo_1483__PUTOBJDEST_OBJLOOP; cdat->dclo_1483__PUTOBJDEST_OBJLOOP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1483__PUTOBJDEST_OBJLOOP.nbval = 0; /*inirout drout_1484__PUTOBJDEST_OBJEXIT */ /*_.VALROUT___V1653*/ meltfptr[1652] = (melt_ptr_t) & cdat->drout_1484__PUTOBJDEST_OBJEXIT; cdat->drout_1484__PUTOBJDEST_OBJEXIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1484__PUTOBJDEST_OBJEXIT.routdescr, "PUTOBJDEST_OBJEXIT @warmelt-genobj.melt:4191", MELT_ROUTDESCR_LEN - 1); cdat->drout_1484__PUTOBJDEST_OBJEXIT.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1484__PUTOBJDEST_OBJEXIT, meltrout_120_warmelt_genobj_PUTOBJDEST_OBJEXIT); /*iniclos dclo_1485__PUTOBJDEST_OBJEXIT */ /*_.VALCLO___V1654*/ meltfptr[1653] = (melt_ptr_t) & cdat->dclo_1485__PUTOBJDEST_OBJEXIT; cdat->dclo_1485__PUTOBJDEST_OBJEXIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1485__PUTOBJDEST_OBJEXIT.nbval = 0; /*inirout drout_1486__COMPILOBJ_NREP_IF */ /*_.VALROUT___V1655*/ meltfptr[1654] = (melt_ptr_t) & cdat->drout_1486__COMPILOBJ_NREP_IF; cdat->drout_1486__COMPILOBJ_NREP_IF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1486__COMPILOBJ_NREP_IF.routdescr, "COMPILOBJ_NREP_IF @warmelt-genobj.melt:4201", MELT_ROUTDESCR_LEN - 1); cdat->drout_1486__COMPILOBJ_NREP_IF.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1486__COMPILOBJ_NREP_IF, meltrout_121_warmelt_genobj_COMPILOBJ_NREP_IF); /*iniclos dclo_1487__COMPILOBJ_NREP_IF */ /*_.VALCLO___V1656*/ meltfptr[1655] = (melt_ptr_t) & cdat->dclo_1487__COMPILOBJ_NREP_IF; cdat->dclo_1487__COMPILOBJ_NREP_IF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1487__COMPILOBJ_NREP_IF.nbval = 0; /*iniobj dsym_1488__CLASS_NREP_IF*/ /*uniqueobj*/ if (! /*_.VALDATA___V1657*/ meltfptr[1656]) /*_.VALDATA___V1657*/ meltfptr[1656] = (melt_ptr_t) & cdat->dsym_1488__CLASS_NREP_IF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1488__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_1488__CLASS_NREP_IF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1488__CLASS_NREP_IF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1488__CLASS_NREP_IF.obj_hash = 942597626; cdat->dsym_1488__CLASS_NREP_IF.obj_len = 3; /*inistring dstr_1489__CLASS_NREP_IF*/ /*_.VALSTR___V1658*/ meltfptr[1657] = (melt_ptr_t) & cdat->dstr_1489__CLASS_NREP_IF; cdat->dstr_1489__CLASS_NREP_IF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1489__CLASS_NREP_IF.val, "CLASS_NREP_IF", sizeof (cdat->dstr_1489__CLASS_NREP_IF.val) - 1); cdat->dstr_1489__CLASS_NREP_IF.val[13] = (char) 0; cdat->dstr_1489__CLASS_NREP_IF.slen = 13; /*inirout drout_1490__COMPILOBJ_NREP_IFISA */ /*_.VALROUT___V1659*/ meltfptr[1658] = (melt_ptr_t) & cdat->drout_1490__COMPILOBJ_NREP_IFISA; cdat->drout_1490__COMPILOBJ_NREP_IFISA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1490__COMPILOBJ_NREP_IFISA.routdescr, "COMPILOBJ_NREP_IFISA @warmelt-genobj.melt:4233", MELT_ROUTDESCR_LEN - 1); cdat->drout_1490__COMPILOBJ_NREP_IFISA.nbval = 10; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1490__COMPILOBJ_NREP_IFISA, meltrout_122_warmelt_genobj_COMPILOBJ_NREP_IFISA); /*iniclos dclo_1491__COMPILOBJ_NREP_IFISA */ /*_.VALCLO___V1660*/ meltfptr[1659] = (melt_ptr_t) & cdat->dclo_1491__COMPILOBJ_NREP_IFISA; cdat->dclo_1491__COMPILOBJ_NREP_IFISA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1491__COMPILOBJ_NREP_IFISA.nbval = 0; /*iniobj dsym_1492__CLASS_NREP_IFISA*/ /*uniqueobj*/ if (! /*_.VALDATA___V1661*/ meltfptr[1660]) /*_.VALDATA___V1661*/ meltfptr[1660] = (melt_ptr_t) & cdat->dsym_1492__CLASS_NREP_IFISA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1492__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_1492__CLASS_NREP_IFISA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1492__CLASS_NREP_IFISA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1492__CLASS_NREP_IFISA.obj_hash = 974189077; cdat->dsym_1492__CLASS_NREP_IFISA.obj_len = 3; /*inistring dstr_1493__CLASS_NREP_IFISA*/ /*_.VALSTR___V1662*/ meltfptr[1661] = (melt_ptr_t) & cdat->dstr_1493__CLASS_NREP_IFISA; cdat->dstr_1493__CLASS_NREP_IFISA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1493__CLASS_NREP_IFISA.val, "CLASS_NREP_IFISA", sizeof (cdat->dstr_1493__CLASS_NREP_IFISA. val) - 1); cdat->dstr_1493__CLASS_NREP_IFISA.val[16] = (char) 0; cdat->dstr_1493__CLASS_NREP_IFISA.slen = 16; /*iniobj dsym_1494__CLASS_NREP_IFTESTVALUE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1663*/ meltfptr[1662]) /*_.VALDATA___V1663*/ meltfptr[1662] = (melt_ptr_t) & cdat->dsym_1494__CLASS_NREP_IFTESTVALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1494__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_1494__CLASS_NREP_IFTESTVALUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1494__CLASS_NREP_IFTESTVALUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1494__CLASS_NREP_IFTESTVALUE.obj_hash = 613467083; cdat->dsym_1494__CLASS_NREP_IFTESTVALUE.obj_len = 3; /*inistring dstr_1495__CLASS_NREP_IFTES*/ /*_.VALSTR___V1664*/ meltfptr[1663] = (melt_ptr_t) & cdat->dstr_1495__CLASS_NREP_IFTES; cdat->dstr_1495__CLASS_NREP_IFTES.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1495__CLASS_NREP_IFTES.val, "CLASS_NREP_IFTESTVALUE", sizeof (cdat->dstr_1495__CLASS_NREP_IFTES. val) - 1); cdat->dstr_1495__CLASS_NREP_IFTES.val[22] = (char) 0; cdat->dstr_1495__CLASS_NREP_IFTES.slen = 22; /*inirout drout_1496__COMPILOBJ_NREP_IFTUPLESIZED */ /*_.VALROUT___V1665*/ meltfptr[1664] = (melt_ptr_t) & cdat->drout_1496__COMPILOBJ_NREP_IFTUPLESIZED; cdat->drout_1496__COMPILOBJ_NREP_IFTUPLESIZED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1496__COMPILOBJ_NREP_IFTUPLESIZED.routdescr, "COMPILOBJ_NREP_IFTUPLESIZED @warmelt-genobj.melt:4267", MELT_ROUTDESCR_LEN - 1); cdat->drout_1496__COMPILOBJ_NREP_IFTUPLESIZED.nbval = 8; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1496__COMPILOBJ_NREP_IFTUPLESIZED, meltrout_123_warmelt_genobj_COMPILOBJ_NREP_IFTUPLESIZED); /*iniclos dclo_1497__COMPILOBJ_NREP_IFTUPLESIZED */ /*_.VALCLO___V1666*/ meltfptr[1665] = (melt_ptr_t) & cdat->dclo_1497__COMPILOBJ_NREP_IFTUPLESIZED; cdat->dclo_1497__COMPILOBJ_NREP_IFTUPLESIZED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1497__COMPILOBJ_NREP_IFTUPLESIZED.nbval = 0; /*iniobj dsym_1498__CLASS_NREP_IFTUPLESIZED*/ /*uniqueobj*/ if (! /*_.VALDATA___V1667*/ meltfptr[1666]) /*_.VALDATA___V1667*/ meltfptr[1666] = (melt_ptr_t) & cdat->dsym_1498__CLASS_NREP_IFTUPLESIZED; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1498__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_1498__CLASS_NREP_IFTUPLESIZED", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1498__CLASS_NREP_IFTUPLESIZED.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1498__CLASS_NREP_IFTUPLESIZED.obj_hash = 768158499; cdat->dsym_1498__CLASS_NREP_IFTUPLESIZED.obj_len = 3; /*inistring dstr_1499__CLASS_NREP_IFTUP*/ /*_.VALSTR___V1668*/ meltfptr[1667] = (melt_ptr_t) & cdat->dstr_1499__CLASS_NREP_IFTUP; cdat->dstr_1499__CLASS_NREP_IFTUP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1499__CLASS_NREP_IFTUP.val, "CLASS_NREP_IFTUPLESIZED", sizeof (cdat->dstr_1499__CLASS_NREP_IFTUP. val) - 1); cdat->dstr_1499__CLASS_NREP_IFTUP.val[23] = (char) 0; cdat->dstr_1499__CLASS_NREP_IFTUP.slen = 23; /*inirout drout_1500__COMPILOBJ_NREP_IFVARIADIC */ /*_.VALROUT___V1669*/ meltfptr[1668] = (melt_ptr_t) & cdat->drout_1500__COMPILOBJ_NREP_IFVARIADIC; cdat->drout_1500__COMPILOBJ_NREP_IFVARIADIC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1500__COMPILOBJ_NREP_IFVARIADIC.routdescr, "COMPILOBJ_NREP_IFVARIADIC @warmelt-genobj.melt:4299", MELT_ROUTDESCR_LEN - 1); cdat->drout_1500__COMPILOBJ_NREP_IFVARIADIC.nbval = 14; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1500__COMPILOBJ_NREP_IFVARIADIC, meltrout_124_warmelt_genobj_COMPILOBJ_NREP_IFVARIADIC); /*iniclos dclo_1501__COMPILOBJ_NREP_IFVARIADIC */ /*_.VALCLO___V1670*/ meltfptr[1669] = (melt_ptr_t) & cdat->dclo_1501__COMPILOBJ_NREP_IFVARIADIC; cdat->dclo_1501__COMPILOBJ_NREP_IFVARIADIC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1501__COMPILOBJ_NREP_IFVARIADIC.nbval = 0; /*iniobj dsym_1502__CLASS_NREP_IFVARIADIC*/ /*uniqueobj*/ if (! /*_.VALDATA___V1671*/ meltfptr[1670]) /*_.VALDATA___V1671*/ meltfptr[1670] = (melt_ptr_t) & cdat->dsym_1502__CLASS_NREP_IFVARIADIC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1502__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_1502__CLASS_NREP_IFVARIADIC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1502__CLASS_NREP_IFVARIADIC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1502__CLASS_NREP_IFVARIADIC.obj_hash = 711812837; cdat->dsym_1502__CLASS_NREP_IFVARIADIC.obj_len = 3; /*inistring dstr_1503__CLASS_NREP_IFVAR*/ /*_.VALSTR___V1672*/ meltfptr[1671] = (melt_ptr_t) & cdat->dstr_1503__CLASS_NREP_IFVAR; cdat->dstr_1503__CLASS_NREP_IFVAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1503__CLASS_NREP_IFVAR.val, "CLASS_NREP_IFVARIADIC", sizeof (cdat->dstr_1503__CLASS_NREP_IFVAR. val) - 1); cdat->dstr_1503__CLASS_NREP_IFVAR.val[21] = (char) 0; cdat->dstr_1503__CLASS_NREP_IFVAR.slen = 21; /*inirout drout_1504__GETCTYPE_IFVARIADIC */ /*_.VALROUT___V1673*/ meltfptr[1672] = (melt_ptr_t) & cdat->drout_1504__GETCTYPE_IFVARIADIC; cdat->drout_1504__GETCTYPE_IFVARIADIC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1504__GETCTYPE_IFVARIADIC.routdescr, "GETCTYPE_IFVARIADIC @warmelt-genobj.melt:4385", MELT_ROUTDESCR_LEN - 1); cdat->drout_1504__GETCTYPE_IFVARIADIC.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1504__GETCTYPE_IFVARIADIC, meltrout_125_warmelt_genobj_GETCTYPE_IFVARIADIC); /*iniclos dclo_1505__GETCTYPE_IFVARIADIC */ /*_.VALCLO___V1674*/ meltfptr[1673] = (melt_ptr_t) & cdat->dclo_1505__GETCTYPE_IFVARIADIC; cdat->dclo_1505__GETCTYPE_IFVARIADIC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1505__GETCTYPE_IFVARIADIC.nbval = 0; /*inirout drout_1506__COMPILOBJ_NREP_VARIADIC_ARGUMENT */ /*_.VALROUT___V1675*/ meltfptr[1674] = (melt_ptr_t) & cdat->drout_1506__COMPILOBJ_NREP_VARIADIC_ARGUMENT; cdat->drout_1506__COMPILOBJ_NREP_VARIADIC_ARGUMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1506__COMPILOBJ_NREP_VARIADIC_ARGUMENT.routdescr, "COMPILOBJ_NREP_VARIADIC_ARGUMENT @warmelt-genobj.melt:4393", MELT_ROUTDESCR_LEN - 1); cdat->drout_1506__COMPILOBJ_NREP_VARIADIC_ARGUMENT.nbval = 9; MELT_ROUTINE_SET_ROUTCODE (&cdat-> drout_1506__COMPILOBJ_NREP_VARIADIC_ARGUMENT, meltrout_126_warmelt_genobj_COMPILOBJ_NREP_VARIADIC_ARGUMENT); /*iniclos dclo_1507__COMPILOBJ_NREP_VARIADIC_ARGUMENT */ /*_.VALCLO___V1676*/ meltfptr[1675] = (melt_ptr_t) & cdat->dclo_1507__COMPILOBJ_NREP_VARIADIC_ARGUMENT; cdat->dclo_1507__COMPILOBJ_NREP_VARIADIC_ARGUMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1507__COMPILOBJ_NREP_VARIADIC_ARGUMENT.nbval = 0; /*iniobj dsym_1508__CLASS_NREP_VARIADIC_ARGUMENT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1677*/ meltfptr[1676]) /*_.VALDATA___V1677*/ meltfptr[1676] = (melt_ptr_t) & cdat->dsym_1508__CLASS_NREP_VARIADIC_ARGUMENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1508__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_1508__CLASS_NREP_VARIADIC_ARGUMENT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1508__CLASS_NREP_VARIADIC_ARGUMENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1508__CLASS_NREP_VARIADIC_ARGUMENT.obj_hash = 758212506; cdat->dsym_1508__CLASS_NREP_VARIADIC_ARGUMENT.obj_len = 3; /*inistring dstr_1509__CLASS_NREP_VARIA*/ /*_.VALSTR___V1678*/ meltfptr[1677] = (melt_ptr_t) & cdat->dstr_1509__CLASS_NREP_VARIA; cdat->dstr_1509__CLASS_NREP_VARIA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1509__CLASS_NREP_VARIA.val, "CLASS_NREP_VARIADIC_ARGUMENT", sizeof (cdat->dstr_1509__CLASS_NREP_VARIA. val) - 1); cdat->dstr_1509__CLASS_NREP_VARIA.val[28] = (char) 0; cdat->dstr_1509__CLASS_NREP_VARIA.slen = 28; /*inirout drout_1510__COMPILOBJ_NREP_CONSUMEVARIADIC */ /*_.VALROUT___V1679*/ meltfptr[1678] = (melt_ptr_t) & cdat->drout_1510__COMPILOBJ_NREP_CONSUMEVARIADIC; cdat->drout_1510__COMPILOBJ_NREP_CONSUMEVARIADIC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1510__COMPILOBJ_NREP_CONSUMEVARIADIC.routdescr, "COMPILOBJ_NREP_CONSUMEVARIADIC @warmelt-genobj.melt:4441", MELT_ROUTDESCR_LEN - 1); cdat->drout_1510__COMPILOBJ_NREP_CONSUMEVARIADIC.nbval = 14; MELT_ROUTINE_SET_ROUTCODE (&cdat-> drout_1510__COMPILOBJ_NREP_CONSUMEVARIADIC, meltrout_127_warmelt_genobj_COMPILOBJ_NREP_CONSUMEVARIADIC); /*iniclos dclo_1511__COMPILOBJ_NREP_CONSUMEVARIADIC */ /*_.VALCLO___V1680*/ meltfptr[1679] = (melt_ptr_t) & cdat->dclo_1511__COMPILOBJ_NREP_CONSUMEVARIADIC; cdat->dclo_1511__COMPILOBJ_NREP_CONSUMEVARIADIC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1511__COMPILOBJ_NREP_CONSUMEVARIADIC.nbval = 0; /*iniobj dsym_1512__CLASS_NREP_CONSUME_VARIADIC*/ /*uniqueobj*/ if (! /*_.VALDATA___V1681*/ meltfptr[1680]) /*_.VALDATA___V1681*/ meltfptr[1680] = (melt_ptr_t) & cdat->dsym_1512__CLASS_NREP_CONSUME_VARIADIC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1512__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_1512__CLASS_NREP_CONSUME_VARIADIC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1512__CLASS_NREP_CONSUME_VARIADIC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1512__CLASS_NREP_CONSUME_VARIADIC.obj_hash = 633396995; cdat->dsym_1512__CLASS_NREP_CONSUME_VARIADIC.obj_len = 3; /*inistring dstr_1513__CLASS_NREP_CONSU*/ /*_.VALSTR___V1682*/ meltfptr[1681] = (melt_ptr_t) & cdat->dstr_1513__CLASS_NREP_CONSU; cdat->dstr_1513__CLASS_NREP_CONSU.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1513__CLASS_NREP_CONSU.val, "CLASS_NREP_CONSUME_VARIADIC", sizeof (cdat->dstr_1513__CLASS_NREP_CONSU. val) - 1); cdat->dstr_1513__CLASS_NREP_CONSU.val[27] = (char) 0; cdat->dstr_1513__CLASS_NREP_CONSU.slen = 27; /*inirout drout_1514__PUTOBJDEST_OBJCOND */ /*_.VALROUT___V1683*/ meltfptr[1682] = (melt_ptr_t) & cdat->drout_1514__PUTOBJDEST_OBJCOND; cdat->drout_1514__PUTOBJDEST_OBJCOND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1514__PUTOBJDEST_OBJCOND.routdescr, "PUTOBJDEST_OBJCOND @warmelt-genobj.melt:4479", MELT_ROUTDESCR_LEN - 1); cdat->drout_1514__PUTOBJDEST_OBJCOND.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1514__PUTOBJDEST_OBJCOND, meltrout_128_warmelt_genobj_PUTOBJDEST_OBJCOND); /*iniclos dclo_1515__PUTOBJDEST_OBJCOND */ /*_.VALCLO___V1684*/ meltfptr[1683] = (melt_ptr_t) & cdat->dclo_1515__PUTOBJDEST_OBJCOND; cdat->dclo_1515__PUTOBJDEST_OBJCOND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1515__PUTOBJDEST_OBJCOND.nbval = 0; /*inirout drout_1516__COMPILOBJ_NREP_CPPIF */ /*_.VALROUT___V1685*/ meltfptr[1684] = (melt_ptr_t) & cdat->drout_1516__COMPILOBJ_NREP_CPPIF; cdat->drout_1516__COMPILOBJ_NREP_CPPIF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1516__COMPILOBJ_NREP_CPPIF.routdescr, "COMPILOBJ_NREP_CPPIF @warmelt-genobj.melt:4496", MELT_ROUTDESCR_LEN - 1); cdat->drout_1516__COMPILOBJ_NREP_CPPIF.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1516__COMPILOBJ_NREP_CPPIF, meltrout_129_warmelt_genobj_COMPILOBJ_NREP_CPPIF); /*iniclos dclo_1517__COMPILOBJ_NREP_CPPIF */ /*_.VALCLO___V1686*/ meltfptr[1685] = (melt_ptr_t) & cdat->dclo_1517__COMPILOBJ_NREP_CPPIF; cdat->dclo_1517__COMPILOBJ_NREP_CPPIF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1517__COMPILOBJ_NREP_CPPIF.nbval = 0; /*iniobj dsym_1518__CLASS_NREP_CPPIF*/ /*uniqueobj*/ if (! /*_.VALDATA___V1687*/ meltfptr[1686]) /*_.VALDATA___V1687*/ meltfptr[1686] = (melt_ptr_t) & cdat->dsym_1518__CLASS_NREP_CPPIF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1518__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_1518__CLASS_NREP_CPPIF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1518__CLASS_NREP_CPPIF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1518__CLASS_NREP_CPPIF.obj_hash = 768655685; cdat->dsym_1518__CLASS_NREP_CPPIF.obj_len = 3; /*inistring dstr_1519__CLASS_NREP_CPPIF*/ /*_.VALSTR___V1688*/ meltfptr[1687] = (melt_ptr_t) & cdat->dstr_1519__CLASS_NREP_CPPIF; cdat->dstr_1519__CLASS_NREP_CPPIF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1519__CLASS_NREP_CPPIF.val, "CLASS_NREP_CPPIF", sizeof (cdat->dstr_1519__CLASS_NREP_CPPIF. val) - 1); cdat->dstr_1519__CLASS_NREP_CPPIF.val[16] = (char) 0; cdat->dstr_1519__CLASS_NREP_CPPIF.slen = 16; /*inirout drout_1520__PUTOBJDEST_OBJCPPIF */ /*_.VALROUT___V1689*/ meltfptr[1688] = (melt_ptr_t) & cdat->drout_1520__PUTOBJDEST_OBJCPPIF; cdat->drout_1520__PUTOBJDEST_OBJCPPIF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1520__PUTOBJDEST_OBJCPPIF.routdescr, "PUTOBJDEST_OBJCPPIF @warmelt-genobj.melt:4522", MELT_ROUTDESCR_LEN - 1); cdat->drout_1520__PUTOBJDEST_OBJCPPIF.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1520__PUTOBJDEST_OBJCPPIF, meltrout_130_warmelt_genobj_PUTOBJDEST_OBJCPPIF); /*iniclos dclo_1521__PUTOBJDEST_OBJCPPIF */ /*_.VALCLO___V1690*/ meltfptr[1689] = (melt_ptr_t) & cdat->dclo_1521__PUTOBJDEST_OBJCPPIF; cdat->dclo_1521__PUTOBJDEST_OBJCPPIF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1521__PUTOBJDEST_OBJCPPIF.nbval = 0; /*inirout drout_1522__COMPILOBJ_NREP_RETURN */ /*_.VALROUT___V1691*/ meltfptr[1690] = (melt_ptr_t) & cdat->drout_1522__COMPILOBJ_NREP_RETURN; cdat->drout_1522__COMPILOBJ_NREP_RETURN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1522__COMPILOBJ_NREP_RETURN.routdescr, "COMPILOBJ_NREP_RETURN @warmelt-genobj.melt:4539", MELT_ROUTDESCR_LEN - 1); cdat->drout_1522__COMPILOBJ_NREP_RETURN.nbval = 14; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1522__COMPILOBJ_NREP_RETURN, meltrout_131_warmelt_genobj_COMPILOBJ_NREP_RETURN); /*iniclos dclo_1523__COMPILOBJ_NREP_RETURN */ /*_.VALCLO___V1692*/ meltfptr[1691] = (melt_ptr_t) & cdat->dclo_1523__COMPILOBJ_NREP_RETURN; cdat->dclo_1523__COMPILOBJ_NREP_RETURN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1523__COMPILOBJ_NREP_RETURN.nbval = 0; /*iniobj dsym_1524__CLASS_NREP_RETURN*/ /*uniqueobj*/ if (! /*_.VALDATA___V1693*/ meltfptr[1692]) /*_.VALDATA___V1693*/ meltfptr[1692] = (melt_ptr_t) & cdat->dsym_1524__CLASS_NREP_RETURN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1524__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_1524__CLASS_NREP_RETURN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1524__CLASS_NREP_RETURN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1524__CLASS_NREP_RETURN.obj_hash = 622944524; cdat->dsym_1524__CLASS_NREP_RETURN.obj_len = 3; /*inistring dstr_1525__CLASS_NREP_RETUR*/ /*_.VALSTR___V1694*/ meltfptr[1693] = (melt_ptr_t) & cdat->dstr_1525__CLASS_NREP_RETUR; cdat->dstr_1525__CLASS_NREP_RETUR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1525__CLASS_NREP_RETUR.val, "CLASS_NREP_RETURN", sizeof (cdat->dstr_1525__CLASS_NREP_RETUR. val) - 1); cdat->dstr_1525__CLASS_NREP_RETUR.val[17] = (char) 0; cdat->dstr_1525__CLASS_NREP_RETUR.slen = 17; /*inirout drout_1526__LAMBDA_ */ /*_.VALROUT___V1695*/ meltfptr[1694] = (melt_ptr_t) & cdat->drout_1526__LAMBDA_; cdat->drout_1526__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1526__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:4605", MELT_ROUTDESCR_LEN - 1); cdat->drout_1526__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1526__LAMBDA_, meltrout_132_warmelt_genobj_LAMBDA___42__); /*iniobj dsym_1527__DISCRCLOSURE_OBJPREDEF*/ /*uniqueobj*/ if (! /*_.VALDATA___V1696*/ meltfptr[1695]) /*_.VALDATA___V1696*/ meltfptr[1695] = (melt_ptr_t) & cdat->dsym_1527__DISCRCLOSURE_OBJPREDEF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1527__DISCRCLOSURE_OBJPREDEF", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1527__DISCRCLOSURE_OBJPREDEF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1527__DISCRCLOSURE_OBJPREDEF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1527__DISCRCLOSURE_OBJPREDEF.obj_hash = 78252136; cdat->dsym_1527__DISCRCLOSURE_OBJPREDEF.obj_len = 3; /*inistring dstr_1528__DISCRCLOSURE_OBJ*/ /*_.VALSTR___V1697*/ meltfptr[1696] = (melt_ptr_t) & cdat->dstr_1528__DISCRCLOSURE_OBJ; cdat->dstr_1528__DISCRCLOSURE_OBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1528__DISCRCLOSURE_OBJ.val, "DISCRCLOSURE_OBJPREDEF", sizeof (cdat->dstr_1528__DISCRCLOSURE_OBJ. val) - 1); cdat->dstr_1528__DISCRCLOSURE_OBJ.val[22] = (char) 0; cdat->dstr_1528__DISCRCLOSURE_OBJ.slen = 22; MELT_LOCATION ("warmelt-genobj.melt:4607:/ iniobj"); /*iniobj dobj_1529__DISCRCLOSURE_OBJPREDEF*/ /*_.VALDATA___V1698*/ meltfptr[1697] = (melt_ptr_t) & cdat->dobj_1529__DISCRCLOSURE_OBJPREDEF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1529__DISCRCLOSURE_OBJPREDEF", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231])) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1529__DISCRCLOSURE_OBJPREDEF", ((meltobject_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231]))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1529__DISCRCLOSURE_OBJPREDEF.meltobj_class = (meltobject_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231]); cdat->dobj_1529__DISCRCLOSURE_OBJPREDEF.obj_hash = 495482593; cdat->dobj_1529__DISCRCLOSURE_OBJPREDEF.obj_len = 2; /*iniobj dsym_1530__DISCR_CLOSURE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1699*/ meltfptr[1698]) /*_.VALDATA___V1699*/ meltfptr[1698] = (melt_ptr_t) & cdat->dsym_1530__DISCR_CLOSURE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1530__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_1530__DISCR_CLOSURE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1530__DISCR_CLOSURE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1530__DISCR_CLOSURE.obj_hash = 99248147; cdat->dsym_1530__DISCR_CLOSURE.obj_len = 3; /*inistring dstr_1531__DISCR_CLOSURE*/ /*_.VALSTR___V1700*/ meltfptr[1699] = (melt_ptr_t) & cdat->dstr_1531__DISCR_CLOSURE; cdat->dstr_1531__DISCR_CLOSURE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1531__DISCR_CLOSURE.val, "DISCR_CLOSURE", sizeof (cdat->dstr_1531__DISCR_CLOSURE.val) - 1); cdat->dstr_1531__DISCR_CLOSURE.val[13] = (char) 0; cdat->dstr_1531__DISCR_CLOSURE.slen = 13; /*inirout drout_1532__COMPILOBJ_NREP_LAMBDA */ /*_.VALROUT___V1701*/ meltfptr[1700] = (melt_ptr_t) & cdat->drout_1532__COMPILOBJ_NREP_LAMBDA; cdat->drout_1532__COMPILOBJ_NREP_LAMBDA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1532__COMPILOBJ_NREP_LAMBDA.routdescr, "COMPILOBJ_NREP_LAMBDA @warmelt-genobj.melt:4613", MELT_ROUTDESCR_LEN - 1); cdat->drout_1532__COMPILOBJ_NREP_LAMBDA.nbval = 16; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1532__COMPILOBJ_NREP_LAMBDA, meltrout_133_warmelt_genobj_COMPILOBJ_NREP_LAMBDA); /*iniclos dclo_1533__COMPILOBJ_NREP_LAMBDA */ /*_.VALCLO___V1703*/ meltfptr[1702] = (melt_ptr_t) & cdat->dclo_1533__COMPILOBJ_NREP_LAMBDA; cdat->dclo_1533__COMPILOBJ_NREP_LAMBDA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1533__COMPILOBJ_NREP_LAMBDA.nbval = 0; /*iniobj dsym_1534__CLASS_NREP_LAMBDA*/ /*uniqueobj*/ if (! /*_.VALDATA___V1704*/ meltfptr[1703]) /*_.VALDATA___V1704*/ meltfptr[1703] = (melt_ptr_t) & cdat->dsym_1534__CLASS_NREP_LAMBDA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1534__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_1534__CLASS_NREP_LAMBDA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1534__CLASS_NREP_LAMBDA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1534__CLASS_NREP_LAMBDA.obj_hash = 16774872; cdat->dsym_1534__CLASS_NREP_LAMBDA.obj_len = 3; /*inistring dstr_1535__CLASS_NREP_LAMBD*/ /*_.VALSTR___V1705*/ meltfptr[1704] = (melt_ptr_t) & cdat->dstr_1535__CLASS_NREP_LAMBD; cdat->dstr_1535__CLASS_NREP_LAMBD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1535__CLASS_NREP_LAMBD.val, "CLASS_NREP_LAMBDA", sizeof (cdat->dstr_1535__CLASS_NREP_LAMBD. val) - 1); cdat->dstr_1535__CLASS_NREP_LAMBD.val[17] = (char) 0; cdat->dstr_1535__CLASS_NREP_LAMBD.slen = 17; /*inirout drout_1536__LAMBDA_ */ /*_.VALROUT___V1702*/ meltfptr[1701] = (melt_ptr_t) & cdat->drout_1536__LAMBDA_; cdat->drout_1536__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1536__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:4649", MELT_ROUTDESCR_LEN - 1); cdat->drout_1536__LAMBDA_.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1536__LAMBDA_, meltrout_134_warmelt_genobj_LAMBDA___43__); /*inirout drout_1537__COMPILOBJ_NREP_MAKEINST */ /*_.VALROUT___V1706*/ meltfptr[1705] = (melt_ptr_t) & cdat->drout_1537__COMPILOBJ_NREP_MAKEINST; cdat->drout_1537__COMPILOBJ_NREP_MAKEINST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1537__COMPILOBJ_NREP_MAKEINST.routdescr, "COMPILOBJ_NREP_MAKEINST @warmelt-genobj.melt:4665", MELT_ROUTDESCR_LEN - 1); cdat->drout_1537__COMPILOBJ_NREP_MAKEINST.nbval = 21; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1537__COMPILOBJ_NREP_MAKEINST, meltrout_135_warmelt_genobj_COMPILOBJ_NREP_MAKEINST); /*iniclos dclo_1538__COMPILOBJ_NREP_MAKEINST */ /*_.VALCLO___V1711*/ meltfptr[1710] = (melt_ptr_t) & cdat->dclo_1538__COMPILOBJ_NREP_MAKEINST; cdat->dclo_1538__COMPILOBJ_NREP_MAKEINST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1538__COMPILOBJ_NREP_MAKEINST.nbval = 0; /*iniobj dsym_1539__CLASS_NREP_INSTANCE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1712*/ meltfptr[1711]) /*_.VALDATA___V1712*/ meltfptr[1711] = (melt_ptr_t) & cdat->dsym_1539__CLASS_NREP_INSTANCE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1539__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_1539__CLASS_NREP_INSTANCE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1539__CLASS_NREP_INSTANCE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1539__CLASS_NREP_INSTANCE.obj_hash = 832794532; cdat->dsym_1539__CLASS_NREP_INSTANCE.obj_len = 3; /*inistring dstr_1540__CLASS_NREP_INSTA*/ /*_.VALSTR___V1713*/ meltfptr[1712] = (melt_ptr_t) & cdat->dstr_1540__CLASS_NREP_INSTA; cdat->dstr_1540__CLASS_NREP_INSTA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1540__CLASS_NREP_INSTA.val, "CLASS_NREP_INSTANCE", sizeof (cdat->dstr_1540__CLASS_NREP_INSTA. val) - 1); cdat->dstr_1540__CLASS_NREP_INSTA.val[19] = (char) 0; cdat->dstr_1540__CLASS_NREP_INSTA.slen = 19; /*iniobj dsym_1541__INST*/ /*uniqueobj*/ if (! /*_.VALDATA___V1707*/ meltfptr[1706]) /*_.VALDATA___V1707*/ meltfptr[1706] = (melt_ptr_t) & cdat->dsym_1541__INST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1541__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_1541__INST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1541__INST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1541__INST.obj_hash = 36500330; cdat->dsym_1541__INST.obj_len = 3; /*inistring dstr_1542__INST*/ /*_.VALSTR___V1708*/ meltfptr[1707] = (melt_ptr_t) & cdat->dstr_1542__INST; cdat->dstr_1542__INST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1542__INST.val, "INST", sizeof (cdat->dstr_1542__INST.val) - 1); cdat->dstr_1542__INST.val[4] = (char) 0; cdat->dstr_1542__INST.slen = 4; /*inirout drout_1543__LAMBDA_ */ /*_.VALROUT___V1709*/ meltfptr[1708] = (melt_ptr_t) & cdat->drout_1543__LAMBDA_; cdat->drout_1543__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1543__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:4695", MELT_ROUTDESCR_LEN - 1); cdat->drout_1543__LAMBDA_.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1543__LAMBDA_, meltrout_136_warmelt_genobj_LAMBDA___44__); /*inistring dstr_1544__newly_made_insta*/ /*_.VALSTR___V1710*/ meltfptr[1709] = (melt_ptr_t) & cdat->dstr_1544__newly_made_insta; cdat->dstr_1544__newly_made_insta.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1544__newly_made_insta.val, "newly made instance", sizeof (cdat->dstr_1544__newly_made_insta. val) - 1); cdat->dstr_1544__newly_made_insta.val[19] = (char) 0; cdat->dstr_1544__newly_made_insta.slen = 19; /*inirout drout_1545__COMPILOBJ_ROUTPROC */ /*_.VALROUT___V1714*/ meltfptr[1713] = (melt_ptr_t) & cdat->drout_1545__COMPILOBJ_ROUTPROC; cdat->drout_1545__COMPILOBJ_ROUTPROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1545__COMPILOBJ_ROUTPROC.routdescr, "COMPILOBJ_ROUTPROC @warmelt-genobj.melt:4733", MELT_ROUTDESCR_LEN - 1); cdat->drout_1545__COMPILOBJ_ROUTPROC.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1545__COMPILOBJ_ROUTPROC, meltrout_137_warmelt_genobj_COMPILOBJ_ROUTPROC); /*iniclos dclo_1546__COMPILOBJ_ROUTPROC */ /*_.VALCLO___V1715*/ meltfptr[1714] = (melt_ptr_t) & cdat->dclo_1546__COMPILOBJ_ROUTPROC; cdat->dclo_1546__COMPILOBJ_ROUTPROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1546__COMPILOBJ_ROUTPROC.nbval = 0; /*inirout drout_1547__COMPILOBJ_PREDEF */ /*_.VALROUT___V1716*/ meltfptr[1715] = (melt_ptr_t) & cdat->drout_1547__COMPILOBJ_PREDEF; cdat->drout_1547__COMPILOBJ_PREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1547__COMPILOBJ_PREDEF.routdescr, "COMPILOBJ_PREDEF @warmelt-genobj.melt:4742", MELT_ROUTDESCR_LEN - 1); cdat->drout_1547__COMPILOBJ_PREDEF.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1547__COMPILOBJ_PREDEF, meltrout_138_warmelt_genobj_COMPILOBJ_PREDEF); /*iniclos dclo_1548__COMPILOBJ_PREDEF */ /*_.VALCLO___V1717*/ meltfptr[1716] = (melt_ptr_t) & cdat->dclo_1548__COMPILOBJ_PREDEF; cdat->dclo_1548__COMPILOBJ_PREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1548__COMPILOBJ_PREDEF.nbval = 0; /*iniobj dsym_1549__CLASS_NREP_PREDEF*/ /*uniqueobj*/ if (! /*_.VALDATA___V1718*/ meltfptr[1717]) /*_.VALDATA___V1718*/ meltfptr[1717] = (melt_ptr_t) & cdat->dsym_1549__CLASS_NREP_PREDEF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1549__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_1549__CLASS_NREP_PREDEF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1549__CLASS_NREP_PREDEF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1549__CLASS_NREP_PREDEF.obj_hash = 422259469; cdat->dsym_1549__CLASS_NREP_PREDEF.obj_len = 3; /*inistring dstr_1550__CLASS_NREP_PREDE*/ /*_.VALSTR___V1719*/ meltfptr[1718] = (melt_ptr_t) & cdat->dstr_1550__CLASS_NREP_PREDE; cdat->dstr_1550__CLASS_NREP_PREDE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1550__CLASS_NREP_PREDE.val, "CLASS_NREP_PREDEF", sizeof (cdat->dstr_1550__CLASS_NREP_PREDE. val) - 1); cdat->dstr_1550__CLASS_NREP_PREDE.val[17] = (char) 0; cdat->dstr_1550__CLASS_NREP_PREDE.slen = 17; /*inirout drout_1551__COMPIL_DATA_AND_SLOTS_FILL */ /*_.VALROUT___V1720*/ meltfptr[1719] = (melt_ptr_t) & cdat->drout_1551__COMPIL_DATA_AND_SLOTS_FILL; cdat->drout_1551__COMPIL_DATA_AND_SLOTS_FILL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1551__COMPIL_DATA_AND_SLOTS_FILL.routdescr, "COMPIL_DATA_AND_SLOTS_FILL @warmelt-genobj.melt:4758", MELT_ROUTDESCR_LEN - 1); cdat->drout_1551__COMPIL_DATA_AND_SLOTS_FILL.nbval = 34; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1551__COMPIL_DATA_AND_SLOTS_FILL, meltrout_139_warmelt_genobj_COMPIL_DATA_AND_SLOTS_FILL); /*iniclos dclo_1552__COMPIL_DATA_AND_SLOTS_FILL */ /*_.VALCLO___V1730*/ meltfptr[1729] = (melt_ptr_t) & cdat->dclo_1552__COMPIL_DATA_AND_SLOTS_FILL; cdat->dclo_1552__COMPIL_DATA_AND_SLOTS_FILL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1552__COMPIL_DATA_AND_SLOTS_FILL.nbval = 0; /*iniobj dsym_1553__VALDATA_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1721*/ meltfptr[1720]) /*_.VALDATA___V1721*/ meltfptr[1720] = (melt_ptr_t) & cdat->dsym_1553__VALDATA_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1553__VALDATA_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1553__VALDATA_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1553__VALDATA_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1553__VALDATA_.obj_hash = 49606842; cdat->dsym_1553__VALDATA_.obj_len = 3; /*inistring dstr_1554__VALDATA_*/ /*_.VALSTR___V1722*/ meltfptr[1721] = (melt_ptr_t) & cdat->dstr_1554__VALDATA_; cdat->dstr_1554__VALDATA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1554__VALDATA_.val, "_VALDATA_", sizeof (cdat->dstr_1554__VALDATA_.val) - 1); cdat->dstr_1554__VALDATA_.val[9] = (char) 0; cdat->dstr_1554__VALDATA_.slen = 9; /*iniobj dsym_1555__VALUEDATA_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1723*/ meltfptr[1722]) /*_.VALDATA___V1723*/ meltfptr[1722] = (melt_ptr_t) & cdat->dsym_1555__VALUEDATA_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1555__VALUEDATA_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1555__VALUEDATA_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1555__VALUEDATA_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1555__VALUEDATA_.obj_hash = 46272601; cdat->dsym_1555__VALUEDATA_.obj_len = 3; /*inistring dstr_1556__VALUEDATA_*/ /*_.VALSTR___V1724*/ meltfptr[1723] = (melt_ptr_t) & cdat->dstr_1556__VALUEDATA_; cdat->dstr_1556__VALUEDATA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1556__VALUEDATA_.val, "_VALUEDATA_", sizeof (cdat->dstr_1556__VALUEDATA_.val) - 1); cdat->dstr_1556__VALUEDATA_.val[11] = (char) 0; cdat->dstr_1556__VALUEDATA_.slen = 11; /*inistring dstr_1557__fill_predef_slot*/ /*_.VALSTR___V1725*/ meltfptr[1724] = (melt_ptr_t) & cdat->dstr_1557__fill_predef_slot; cdat->dstr_1557__fill_predef_slot.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1557__fill_predef_slot.val, "fill predef slots", sizeof (cdat->dstr_1557__fill_predef_slot. val) - 1); cdat->dstr_1557__fill_predef_slot.val[17] = (char) 0; cdat->dstr_1557__fill_predef_slot.slen = 17; /*inirout drout_1558__LAMBDA_ */ /*_.VALROUT___V1726*/ meltfptr[1725] = (melt_ptr_t) & cdat->drout_1558__LAMBDA_; cdat->drout_1558__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1558__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:4829", MELT_ROUTDESCR_LEN - 1); cdat->drout_1558__LAMBDA_.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1558__LAMBDA_, meltrout_140_warmelt_genobj_LAMBDA___45__); /*inirout drout_1559__LAMBDA_ */ /*_.VALROUT___V1727*/ meltfptr[1726] = (melt_ptr_t) & cdat->drout_1559__LAMBDA_; cdat->drout_1559__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1559__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:4847", MELT_ROUTDESCR_LEN - 1); cdat->drout_1559__LAMBDA_.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1559__LAMBDA_, meltrout_141_warmelt_genobj_LAMBDA___46__); /*inistring dstr_1560__new_static_insta*/ /*_.VALSTR___V1728*/ meltfptr[1727] = (melt_ptr_t) & cdat->dstr_1560__new_static_insta; cdat->dstr_1560__new_static_insta.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1560__new_static_insta.val, "new static instance", sizeof (cdat->dstr_1560__new_static_insta. val) - 1); cdat->dstr_1560__new_static_insta.val[19] = (char) 0; cdat->dstr_1560__new_static_insta.slen = 19; /*inirout drout_1561__LAMBDA_ */ /*_.VALROUT___V1729*/ meltfptr[1728] = (melt_ptr_t) & cdat->drout_1561__LAMBDA_; cdat->drout_1561__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1561__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:4880", MELT_ROUTDESCR_LEN - 1); cdat->drout_1561__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1561__LAMBDA_, meltrout_142_warmelt_genobj_LAMBDA___47__); /*inirout drout_1562__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL */ /*_.VALROUT___V1731*/ meltfptr[1730] = (melt_ptr_t) & cdat-> drout_1562__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL; cdat->drout_1562__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1562__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL. routdescr, "DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL @warmelt-genobj.melt:4902", MELT_ROUTDESCR_LEN - 1); cdat->drout_1562__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat-> drout_1562__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL, meltrout_143_warmelt_genobj_DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL); /*iniclos dclo_1563__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL */ /*_.VALCLO___V1733*/ meltfptr[1732] = (melt_ptr_t) & cdat-> dclo_1563__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL; cdat->dclo_1563__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1563__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL.nbval = 0; /*inirout drout_1564__LAMBDA_ */ /*_.VALROUT___V1732*/ meltfptr[1731] = (melt_ptr_t) & cdat->drout_1564__LAMBDA_; cdat->drout_1564__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1564__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:4907", MELT_ROUTDESCR_LEN - 1); cdat->drout_1564__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1564__LAMBDA_, meltrout_144_warmelt_genobj_LAMBDA___48__); /*inirout drout_1565__COMPILOBJ_DATASYMBOL */ /*_.VALROUT___V1734*/ meltfptr[1733] = (melt_ptr_t) & cdat->drout_1565__COMPILOBJ_DATASYMBOL; cdat->drout_1565__COMPILOBJ_DATASYMBOL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1565__COMPILOBJ_DATASYMBOL.routdescr, "COMPILOBJ_DATASYMBOL @warmelt-genobj.melt:4910", MELT_ROUTDESCR_LEN - 1); cdat->drout_1565__COMPILOBJ_DATASYMBOL.nbval = 10; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1565__COMPILOBJ_DATASYMBOL, meltrout_145_warmelt_genobj_COMPILOBJ_DATASYMBOL); /*iniclos dclo_1566__COMPILOBJ_DATASYMBOL */ /*_.VALCLO___V1735*/ meltfptr[1734] = (melt_ptr_t) & cdat->dclo_1566__COMPILOBJ_DATASYMBOL; cdat->dclo_1566__COMPILOBJ_DATASYMBOL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1566__COMPILOBJ_DATASYMBOL.nbval = 0; /*inirout drout_1567__COMPILOBJ_DATAINSTANCE */ /*_.VALROUT___V1736*/ meltfptr[1735] = (melt_ptr_t) & cdat->drout_1567__COMPILOBJ_DATAINSTANCE; cdat->drout_1567__COMPILOBJ_DATAINSTANCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1567__COMPILOBJ_DATAINSTANCE.routdescr, "COMPILOBJ_DATAINSTANCE @warmelt-genobj.melt:4961", MELT_ROUTDESCR_LEN - 1); cdat->drout_1567__COMPILOBJ_DATAINSTANCE.nbval = 10; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1567__COMPILOBJ_DATAINSTANCE, meltrout_146_warmelt_genobj_COMPILOBJ_DATAINSTANCE); /*iniclos dclo_1568__COMPILOBJ_DATAINSTANCE */ /*_.VALCLO___V1737*/ meltfptr[1736] = (melt_ptr_t) & cdat->dclo_1568__COMPILOBJ_DATAINSTANCE; cdat->dclo_1568__COMPILOBJ_DATAINSTANCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1568__COMPILOBJ_DATAINSTANCE.nbval = 0; /*inirout drout_1569__COMPILOBJ_DATATUPLE */ /*_.VALROUT___V1738*/ meltfptr[1737] = (melt_ptr_t) & cdat->drout_1569__COMPILOBJ_DATATUPLE; cdat->drout_1569__COMPILOBJ_DATATUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1569__COMPILOBJ_DATATUPLE.routdescr, "COMPILOBJ_DATATUPLE @warmelt-genobj.melt:5038", MELT_ROUTDESCR_LEN - 1); cdat->drout_1569__COMPILOBJ_DATATUPLE.nbval = 20; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1569__COMPILOBJ_DATATUPLE, meltrout_147_warmelt_genobj_COMPILOBJ_DATATUPLE); /*iniclos dclo_1570__COMPILOBJ_DATATUPLE */ /*_.VALCLO___V1745*/ meltfptr[1744] = (melt_ptr_t) & cdat->dclo_1570__COMPILOBJ_DATATUPLE; cdat->dclo_1570__COMPILOBJ_DATATUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1570__COMPILOBJ_DATATUPLE.nbval = 0; /*iniobj dsym_1571__CLASS_NREP_DATATUPLE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1746*/ meltfptr[1745]) /*_.VALDATA___V1746*/ meltfptr[1745] = (melt_ptr_t) & cdat->dsym_1571__CLASS_NREP_DATATUPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1571__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_1571__CLASS_NREP_DATATUPLE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1571__CLASS_NREP_DATATUPLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1571__CLASS_NREP_DATATUPLE.obj_hash = 100529129; cdat->dsym_1571__CLASS_NREP_DATATUPLE.obj_len = 3; /*inistring dstr_1572__CLASS_NREP_DATAT*/ /*_.VALSTR___V1747*/ meltfptr[1746] = (melt_ptr_t) & cdat->dstr_1572__CLASS_NREP_DATAT; cdat->dstr_1572__CLASS_NREP_DATAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1572__CLASS_NREP_DATAT.val, "CLASS_NREP_DATATUPLE", sizeof (cdat->dstr_1572__CLASS_NREP_DATAT. val) - 1); cdat->dstr_1572__CLASS_NREP_DATAT.val[20] = (char) 0; cdat->dstr_1572__CLASS_NREP_DATAT.slen = 20; /*inirout drout_1573__LAMBDA_ */ /*_.VALROUT___V1739*/ meltfptr[1738] = (melt_ptr_t) & cdat->drout_1573__LAMBDA_; cdat->drout_1573__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1573__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:5055", MELT_ROUTDESCR_LEN - 1); cdat->drout_1573__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1573__LAMBDA_, meltrout_148_warmelt_genobj_LAMBDA___49__); /*iniobj dsym_1574__VALTUP_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1740*/ meltfptr[1739]) /*_.VALDATA___V1740*/ meltfptr[1739] = (melt_ptr_t) & cdat->dsym_1574__VALTUP_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1574__VALTUP_", melt_magic_discr ((melt_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__VALTUP_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1574__VALTUP_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1574__VALTUP_.obj_hash = 21536389; cdat->dsym_1574__VALTUP_.obj_len = 3; /*inistring dstr_1575__VALTUP_*/ /*_.VALSTR___V1741*/ meltfptr[1740] = (melt_ptr_t) & cdat->dstr_1575__VALTUP_; cdat->dstr_1575__VALTUP_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1575__VALTUP_.val, "_VALTUP_", sizeof (cdat->dstr_1575__VALTUP_.val) - 1); cdat->dstr_1575__VALTUP_.val[8] = (char) 0; cdat->dstr_1575__VALTUP_.slen = 8; /*iniobj dsym_1576__INITUP_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1742*/ meltfptr[1741]) /*_.VALDATA___V1742*/ meltfptr[1741] = (melt_ptr_t) & cdat->dsym_1576__INITUP_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1576__INITUP_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1576__INITUP_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1576__INITUP_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1576__INITUP_.obj_hash = 117725906; cdat->dsym_1576__INITUP_.obj_len = 3; /*inistring dstr_1577__INITUP_*/ /*_.VALSTR___V1743*/ meltfptr[1742] = (melt_ptr_t) & cdat->dstr_1577__INITUP_; cdat->dstr_1577__INITUP_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1577__INITUP_.val, "_INITUP_", sizeof (cdat->dstr_1577__INITUP_.val) - 1); cdat->dstr_1577__INITUP_.val[8] = (char) 0; cdat->dstr_1577__INITUP_.slen = 8; /*inirout drout_1578__LAMBDA_ */ /*_.VALROUT___V1744*/ meltfptr[1743] = (melt_ptr_t) & cdat->drout_1578__LAMBDA_; cdat->drout_1578__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1578__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:5083", MELT_ROUTDESCR_LEN - 1); cdat->drout_1578__LAMBDA_.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1578__LAMBDA_, meltrout_149_warmelt_genobj_LAMBDA___50__); /*inirout drout_1579__COMPILOBJ_DATASTRING */ /*_.VALROUT___V1748*/ meltfptr[1747] = (melt_ptr_t) & cdat->drout_1579__COMPILOBJ_DATASTRING; cdat->drout_1579__COMPILOBJ_DATASTRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1579__COMPILOBJ_DATASTRING.routdescr, "COMPILOBJ_DATASTRING @warmelt-genobj.melt:5108", MELT_ROUTDESCR_LEN - 1); cdat->drout_1579__COMPILOBJ_DATASTRING.nbval = 10; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1579__COMPILOBJ_DATASTRING, meltrout_150_warmelt_genobj_COMPILOBJ_DATASTRING); /*iniclos dclo_1580__COMPILOBJ_DATASTRING */ /*_.VALCLO___V1751*/ meltfptr[1750] = (melt_ptr_t) & cdat->dclo_1580__COMPILOBJ_DATASTRING; cdat->dclo_1580__COMPILOBJ_DATASTRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1580__COMPILOBJ_DATASTRING.nbval = 0; /*iniobj dsym_1581__CLASS_NREP_DATASTRING*/ /*uniqueobj*/ if (! /*_.VALDATA___V1752*/ meltfptr[1751]) /*_.VALDATA___V1752*/ meltfptr[1751] = (melt_ptr_t) & cdat->dsym_1581__CLASS_NREP_DATASTRING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1581__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_1581__CLASS_NREP_DATASTRING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1581__CLASS_NREP_DATASTRING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1581__CLASS_NREP_DATASTRING.obj_hash = 1030159655; cdat->dsym_1581__CLASS_NREP_DATASTRING.obj_len = 3; /*inistring dstr_1582__CLASS_NREP_DATAS*/ /*_.VALSTR___V1753*/ meltfptr[1752] = (melt_ptr_t) & cdat->dstr_1582__CLASS_NREP_DATAS; cdat->dstr_1582__CLASS_NREP_DATAS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1582__CLASS_NREP_DATAS.val, "CLASS_NREP_DATASTRING", sizeof (cdat->dstr_1582__CLASS_NREP_DATAS. val) - 1); cdat->dstr_1582__CLASS_NREP_DATAS.val[21] = (char) 0; cdat->dstr_1582__CLASS_NREP_DATAS.slen = 21; /*iniobj dsym_1583__VALSTR_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1749*/ meltfptr[1748]) /*_.VALDATA___V1749*/ meltfptr[1748] = (melt_ptr_t) & cdat->dsym_1583__VALSTR_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1583__VALSTR_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1583__VALSTR_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1583__VALSTR_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1583__VALSTR_.obj_hash = 24192176; cdat->dsym_1583__VALSTR_.obj_len = 3; /*inistring dstr_1584__VALSTR_*/ /*_.VALSTR___V1750*/ meltfptr[1749] = (melt_ptr_t) & cdat->dstr_1584__VALSTR_; cdat->dstr_1584__VALSTR_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1584__VALSTR_.val, "_VALSTR_", sizeof (cdat->dstr_1584__VALSTR_.val) - 1); cdat->dstr_1584__VALSTR_.val[8] = (char) 0; cdat->dstr_1584__VALSTR_.slen = 8; /*inirout drout_1585__COMPILOBJ_DATABOXEDINTEGER */ /*_.VALROUT___V1754*/ meltfptr[1753] = (melt_ptr_t) & cdat->drout_1585__COMPILOBJ_DATABOXEDINTEGER; cdat->drout_1585__COMPILOBJ_DATABOXEDINTEGER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1585__COMPILOBJ_DATABOXEDINTEGER.routdescr, "COMPILOBJ_DATABOXEDINTEGER @warmelt-genobj.melt:5153", MELT_ROUTDESCR_LEN - 1); cdat->drout_1585__COMPILOBJ_DATABOXEDINTEGER.nbval = 10; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1585__COMPILOBJ_DATABOXEDINTEGER, meltrout_151_warmelt_genobj_COMPILOBJ_DATABOXEDINTEGER); /*iniclos dclo_1586__COMPILOBJ_DATABOXEDINTEGER */ /*_.VALCLO___V1757*/ meltfptr[1756] = (melt_ptr_t) & cdat->dclo_1586__COMPILOBJ_DATABOXEDINTEGER; cdat->dclo_1586__COMPILOBJ_DATABOXEDINTEGER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1586__COMPILOBJ_DATABOXEDINTEGER.nbval = 0; /*iniobj dsym_1587__CLASS_NREP_DATABOXEDINTEGER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1758*/ meltfptr[1757]) /*_.VALDATA___V1758*/ meltfptr[1757] = (melt_ptr_t) & cdat->dsym_1587__CLASS_NREP_DATABOXEDINTEGER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1587__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_1587__CLASS_NREP_DATABOXEDINTEGER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1587__CLASS_NREP_DATABOXEDINTEGER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1587__CLASS_NREP_DATABOXEDINTEGER.obj_hash = 874991843; cdat->dsym_1587__CLASS_NREP_DATABOXEDINTEGER.obj_len = 3; /*inistring dstr_1588__CLASS_NREP_DATAB*/ /*_.VALSTR___V1759*/ meltfptr[1758] = (melt_ptr_t) & cdat->dstr_1588__CLASS_NREP_DATAB; cdat->dstr_1588__CLASS_NREP_DATAB.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1588__CLASS_NREP_DATAB.val, "CLASS_NREP_DATABOXEDINTEGER", sizeof (cdat->dstr_1588__CLASS_NREP_DATAB. val) - 1); cdat->dstr_1588__CLASS_NREP_DATAB.val[27] = (char) 0; cdat->dstr_1588__CLASS_NREP_DATAB.slen = 27; /*iniobj dsym_1589__VALBXINT_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1755*/ meltfptr[1754]) /*_.VALDATA___V1755*/ meltfptr[1754] = (melt_ptr_t) & cdat->dsym_1589__VALBXINT_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1589__VALBXINT_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1589__VALBXINT_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1589__VALBXINT_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1589__VALBXINT_.obj_hash = 190266804; cdat->dsym_1589__VALBXINT_.obj_len = 3; /*inistring dstr_1590__VALBXINT_*/ /*_.VALSTR___V1756*/ meltfptr[1755] = (melt_ptr_t) & cdat->dstr_1590__VALBXINT_; cdat->dstr_1590__VALBXINT_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1590__VALBXINT_.val, "_VALBXINT_", sizeof (cdat->dstr_1590__VALBXINT_.val) - 1); cdat->dstr_1590__VALBXINT_.val[10] = (char) 0; cdat->dstr_1590__VALBXINT_.slen = 10; /*inirout drout_1591__COMPILOBJ_DATACLOSURE */ /*_.VALROUT___V1760*/ meltfptr[1759] = (melt_ptr_t) & cdat->drout_1591__COMPILOBJ_DATACLOSURE; cdat->drout_1591__COMPILOBJ_DATACLOSURE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1591__COMPILOBJ_DATACLOSURE.routdescr, "COMPILOBJ_DATACLOSURE @warmelt-genobj.melt:5198", MELT_ROUTDESCR_LEN - 1); cdat->drout_1591__COMPILOBJ_DATACLOSURE.nbval = 23; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1591__COMPILOBJ_DATACLOSURE, meltrout_152_warmelt_genobj_COMPILOBJ_DATACLOSURE); /*iniclos dclo_1592__COMPILOBJ_DATACLOSURE */ /*_.VALCLO___V1766*/ meltfptr[1765] = (melt_ptr_t) & cdat->dclo_1592__COMPILOBJ_DATACLOSURE; cdat->dclo_1592__COMPILOBJ_DATACLOSURE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1592__COMPILOBJ_DATACLOSURE.nbval = 0; /*iniobj dsym_1593__CLASS_NREP_DATACLOSURE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1767*/ meltfptr[1766]) /*_.VALDATA___V1767*/ meltfptr[1766] = (melt_ptr_t) & cdat->dsym_1593__CLASS_NREP_DATACLOSURE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1593__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_1593__CLASS_NREP_DATACLOSURE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1593__CLASS_NREP_DATACLOSURE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1593__CLASS_NREP_DATACLOSURE.obj_hash = 206205313; cdat->dsym_1593__CLASS_NREP_DATACLOSURE.obj_len = 3; /*inistring dstr_1594__CLASS_NREP_DATAC*/ /*_.VALSTR___V1768*/ meltfptr[1767] = (melt_ptr_t) & cdat->dstr_1594__CLASS_NREP_DATAC; cdat->dstr_1594__CLASS_NREP_DATAC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1594__CLASS_NREP_DATAC.val, "CLASS_NREP_DATACLOSURE", sizeof (cdat->dstr_1594__CLASS_NREP_DATAC. val) - 1); cdat->dstr_1594__CLASS_NREP_DATAC.val[22] = (char) 0; cdat->dstr_1594__CLASS_NREP_DATAC.slen = 22; /*iniobj dsym_1595__VALCLO_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1761*/ meltfptr[1760]) /*_.VALDATA___V1761*/ meltfptr[1760] = (melt_ptr_t) & cdat->dsym_1595__VALCLO_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1595__VALCLO_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1595__VALCLO_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1595__VALCLO_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1595__VALCLO_.obj_hash = 107460852; cdat->dsym_1595__VALCLO_.obj_len = 3; /*inistring dstr_1596__VALCLO_*/ /*_.VALSTR___V1762*/ meltfptr[1761] = (melt_ptr_t) & cdat->dstr_1596__VALCLO_; cdat->dstr_1596__VALCLO_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1596__VALCLO_.val, "_VALCLO_", sizeof (cdat->dstr_1596__VALCLO_.val) - 1); cdat->dstr_1596__VALCLO_.val[8] = (char) 0; cdat->dstr_1596__VALCLO_.slen = 8; /*iniobj dsym_1597__DATACLOSURE_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1763*/ meltfptr[1762]) /*_.VALDATA___V1763*/ meltfptr[1762] = (melt_ptr_t) & cdat->dsym_1597__DATACLOSURE_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1597__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_1597__DATACLOSURE_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1597__DATACLOSURE_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1597__DATACLOSURE_.obj_hash = 12102076; cdat->dsym_1597__DATACLOSURE_.obj_len = 3; /*inistring dstr_1598__DATACLOSURE_*/ /*_.VALSTR___V1764*/ meltfptr[1763] = (melt_ptr_t) & cdat->dstr_1598__DATACLOSURE_; cdat->dstr_1598__DATACLOSURE_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1598__DATACLOSURE_.val, "_DATACLOSURE_", sizeof (cdat->dstr_1598__DATACLOSURE_.val) - 1); cdat->dstr_1598__DATACLOSURE_.val[13] = (char) 0; cdat->dstr_1598__DATACLOSURE_.slen = 13; /*iniobj dsym_1599__CLASS_NREP_DATAROUTINE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1769*/ meltfptr[1768]) /*_.VALDATA___V1769*/ meltfptr[1768] = (melt_ptr_t) & cdat->dsym_1599__CLASS_NREP_DATAROUTINE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1599__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_1599__CLASS_NREP_DATAROUTINE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1599__CLASS_NREP_DATAROUTINE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1599__CLASS_NREP_DATAROUTINE.obj_hash = 675830344; cdat->dsym_1599__CLASS_NREP_DATAROUTINE.obj_len = 3; /*inistring dstr_1600__CLASS_NREP_DATAR*/ /*_.VALSTR___V1770*/ meltfptr[1769] = (melt_ptr_t) & cdat->dstr_1600__CLASS_NREP_DATAR; cdat->dstr_1600__CLASS_NREP_DATAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1600__CLASS_NREP_DATAR.val, "CLASS_NREP_DATAROUTINE", sizeof (cdat->dstr_1600__CLASS_NREP_DATAR. val) - 1); cdat->dstr_1600__CLASS_NREP_DATAR.val[22] = (char) 0; cdat->dstr_1600__CLASS_NREP_DATAR.slen = 22; /*inirout drout_1601__LAMBDA_ */ /*_.VALROUT___V1765*/ meltfptr[1764] = (melt_ptr_t) & cdat->drout_1601__LAMBDA_; cdat->drout_1601__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1601__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:5261", MELT_ROUTDESCR_LEN - 1); cdat->drout_1601__LAMBDA_.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1601__LAMBDA_, meltrout_153_warmelt_genobj_LAMBDA___51__); /*inirout drout_1602__COMPILOBJ_DATAROUTINE */ /*_.VALROUT___V1771*/ meltfptr[1770] = (melt_ptr_t) & cdat->drout_1602__COMPILOBJ_DATAROUTINE; cdat->drout_1602__COMPILOBJ_DATAROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1602__COMPILOBJ_DATAROUTINE.routdescr, "COMPILOBJ_DATAROUTINE @warmelt-genobj.melt:5285", MELT_ROUTDESCR_LEN - 1); cdat->drout_1602__COMPILOBJ_DATAROUTINE.nbval = 26; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1602__COMPILOBJ_DATAROUTINE, meltrout_154_warmelt_genobj_COMPILOBJ_DATAROUTINE); /*iniclos dclo_1603__COMPILOBJ_DATAROUTINE */ /*_.VALCLO___V1777*/ meltfptr[1776] = (melt_ptr_t) & cdat->dclo_1603__COMPILOBJ_DATAROUTINE; cdat->dclo_1603__COMPILOBJ_DATAROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1603__COMPILOBJ_DATAROUTINE.nbval = 0; /*iniobj dsym_1604__VALROUT_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1772*/ meltfptr[1771]) /*_.VALDATA___V1772*/ meltfptr[1771] = (melt_ptr_t) & cdat->dsym_1604__VALROUT_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1604__VALROUT_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1604__VALROUT_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1604__VALROUT_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1604__VALROUT_.obj_hash = 99461589; cdat->dsym_1604__VALROUT_.obj_len = 3; /*inistring dstr_1605__VALROUT_*/ /*_.VALSTR___V1773*/ meltfptr[1772] = (melt_ptr_t) & cdat->dstr_1605__VALROUT_; cdat->dstr_1605__VALROUT_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1605__VALROUT_.val, "_VALROUT_", sizeof (cdat->dstr_1605__VALROUT_.val) - 1); cdat->dstr_1605__VALROUT_.val[9] = (char) 0; cdat->dstr_1605__VALROUT_.slen = 9; /*iniobj dsym_1606__IROUTVAL_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1774*/ meltfptr[1773]) /*_.VALDATA___V1774*/ meltfptr[1773] = (melt_ptr_t) & cdat->dsym_1606__IROUTVAL_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1606__IROUTVAL_", melt_magic_discr ((melt_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__IROUTVAL_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1606__IROUTVAL_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1606__IROUTVAL_.obj_hash = 80558693; cdat->dsym_1606__IROUTVAL_.obj_len = 3; /*inistring dstr_1607__IROUTVAL_*/ /*_.VALSTR___V1775*/ meltfptr[1774] = (melt_ptr_t) & cdat->dstr_1607__IROUTVAL_; cdat->dstr_1607__IROUTVAL_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1607__IROUTVAL_.val, "_IROUTVAL_", sizeof (cdat->dstr_1607__IROUTVAL_.val) - 1); cdat->dstr_1607__IROUTVAL_.val[10] = (char) 0; cdat->dstr_1607__IROUTVAL_.slen = 10; /*inirout drout_1608__LAMBDA_ */ /*_.VALROUT___V1776*/ meltfptr[1775] = (melt_ptr_t) & cdat->drout_1608__LAMBDA_; cdat->drout_1608__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1608__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:5342", MELT_ROUTDESCR_LEN - 1); cdat->drout_1608__LAMBDA_.nbval = 8; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1608__LAMBDA_, meltrout_155_warmelt_genobj_LAMBDA___52__); /*iniobj dsym_1609__CLASS_NREP_QUASIDATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V1778*/ meltfptr[1777]) /*_.VALDATA___V1778*/ meltfptr[1777] = (melt_ptr_t) & cdat->dsym_1609__CLASS_NREP_QUASIDATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1609__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_1609__CLASS_NREP_QUASIDATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1609__CLASS_NREP_QUASIDATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1609__CLASS_NREP_QUASIDATA.obj_hash = 752535427; cdat->dsym_1609__CLASS_NREP_QUASIDATA.obj_len = 3; /*inistring dstr_1610__CLASS_NREP_QUASI*/ /*_.VALSTR___V1779*/ meltfptr[1778] = (melt_ptr_t) & cdat->dstr_1610__CLASS_NREP_QUASI; cdat->dstr_1610__CLASS_NREP_QUASI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1610__CLASS_NREP_QUASI.val, "CLASS_NREP_QUASIDATA", sizeof (cdat->dstr_1610__CLASS_NREP_QUASI. val) - 1); cdat->dstr_1610__CLASS_NREP_QUASI.val[20] = (char) 0; cdat->dstr_1610__CLASS_NREP_QUASI.slen = 20; /*inirout drout_1611__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ /*_.VALROUT___V1780*/ meltfptr[1779] = (melt_ptr_t) & cdat-> drout_1611__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER; cdat->drout_1611__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER. discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat-> drout_1611__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER. routdescr, "COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER @warmelt-genobj.melt:5403", MELT_ROUTDESCR_LEN - 1); cdat->drout_1611__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER. nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat-> drout_1611__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER, meltrout_156_warmelt_genobj_COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER); /*iniclos dclo_1612__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ /*_.VALCLO___V1781*/ meltfptr[1780] = (melt_ptr_t) & cdat-> dclo_1612__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER; cdat->dclo_1612__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER. discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1612__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER. nbval = 0; /*iniobj dsym_1613__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1782*/ meltfptr[1781]) /*_.VALDATA___V1782*/ meltfptr[1781] = (melt_ptr_t) & cdat-> dsym_1613__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1613__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_1613__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1613__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER. meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1613__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER. obj_hash = 940676789; cdat->dsym_1613__CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER. obj_len = 3; /*inistring dstr_1614__CLASS_NREP_QUASI*/ /*_.VALSTR___V1783*/ meltfptr[1782] = (melt_ptr_t) & cdat->dstr_1614__CLASS_NREP_QUASI; cdat->dstr_1614__CLASS_NREP_QUASI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1614__CLASS_NREP_QUASI.val, "CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER", sizeof (cdat->dstr_1614__CLASS_NREP_QUASI. val) - 1); cdat->dstr_1614__CLASS_NREP_QUASI.val[57] = (char) 0; cdat->dstr_1614__CLASS_NREP_QUASI.slen = 57; /*inirout drout_1615__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT */ /*_.VALROUT___V1784*/ meltfptr[1783] = (melt_ptr_t) & cdat-> drout_1615__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT; cdat->drout_1615__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1615__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT. routdescr, "COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT @warmelt-genobj.melt:5413", MELT_ROUTDESCR_LEN - 1); cdat->drout_1615__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat-> drout_1615__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT, meltrout_157_warmelt_genobj_COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT); /*iniclos dclo_1616__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT */ /*_.VALCLO___V1785*/ meltfptr[1784] = (melt_ptr_t) & cdat-> dclo_1616__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT; cdat->dclo_1616__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1616__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT.nbval = 0; /*iniobj dsym_1617__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1786*/ meltfptr[1785]) /*_.VALDATA___V1786*/ meltfptr[1785] = (melt_ptr_t) & cdat-> dsym_1617__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1617__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_1617__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1617__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT. meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1617__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT.obj_hash = 876593992; cdat->dsym_1617__CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT.obj_len = 3; /*inistring dstr_1618__CLASS_NREP_QUASI*/ /*_.VALSTR___V1787*/ meltfptr[1786] = (melt_ptr_t) & cdat->dstr_1618__CLASS_NREP_QUASI; cdat->dstr_1618__CLASS_NREP_QUASI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1618__CLASS_NREP_QUASI.val, "CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT", sizeof (cdat->dstr_1618__CLASS_NREP_QUASI. val) - 1); cdat->dstr_1618__CLASS_NREP_QUASI.val[46] = (char) 0; cdat->dstr_1618__CLASS_NREP_QUASI.slen = 46; /*inirout drout_1619__COMPILOBJ_NREP_STORE_PREDEFINED */ /*_.VALROUT___V1788*/ meltfptr[1787] = (melt_ptr_t) & cdat->drout_1619__COMPILOBJ_NREP_STORE_PREDEFINED; cdat->drout_1619__COMPILOBJ_NREP_STORE_PREDEFINED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1619__COMPILOBJ_NREP_STORE_PREDEFINED.routdescr, "COMPILOBJ_NREP_STORE_PREDEFINED @warmelt-genobj.melt:5423", MELT_ROUTDESCR_LEN - 1); cdat->drout_1619__COMPILOBJ_NREP_STORE_PREDEFINED.nbval = 9; MELT_ROUTINE_SET_ROUTCODE (&cdat-> drout_1619__COMPILOBJ_NREP_STORE_PREDEFINED, meltrout_158_warmelt_genobj_COMPILOBJ_NREP_STORE_PREDEFINED); /*iniclos dclo_1620__COMPILOBJ_NREP_STORE_PREDEFINED */ /*_.VALCLO___V1789*/ meltfptr[1788] = (melt_ptr_t) & cdat->dclo_1620__COMPILOBJ_NREP_STORE_PREDEFINED; cdat->dclo_1620__COMPILOBJ_NREP_STORE_PREDEFINED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1620__COMPILOBJ_NREP_STORE_PREDEFINED.nbval = 0; /*iniobj dsym_1621__CLASS_NREP_STORE_PREDEFINED*/ /*uniqueobj*/ if (! /*_.VALDATA___V1790*/ meltfptr[1789]) /*_.VALDATA___V1790*/ meltfptr[1789] = (melt_ptr_t) & cdat->dsym_1621__CLASS_NREP_STORE_PREDEFINED; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1621__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_1621__CLASS_NREP_STORE_PREDEFINED", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1621__CLASS_NREP_STORE_PREDEFINED.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1621__CLASS_NREP_STORE_PREDEFINED.obj_hash = 391152767; cdat->dsym_1621__CLASS_NREP_STORE_PREDEFINED.obj_len = 3; /*inistring dstr_1622__CLASS_NREP_STORE*/ /*_.VALSTR___V1791*/ meltfptr[1790] = (melt_ptr_t) & cdat->dstr_1622__CLASS_NREP_STORE; cdat->dstr_1622__CLASS_NREP_STORE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1622__CLASS_NREP_STORE.val, "CLASS_NREP_STORE_PREDEFINED", sizeof (cdat->dstr_1622__CLASS_NREP_STORE. val) - 1); cdat->dstr_1622__CLASS_NREP_STORE.val[27] = (char) 0; cdat->dstr_1622__CLASS_NREP_STORE.slen = 27; /*inirout drout_1623__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ /*_.VALROUT___V1792*/ meltfptr[1791] = (melt_ptr_t) & cdat-> drout_1623__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER; cdat-> drout_1623__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER. discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat-> drout_1623__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER. routdescr, "COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER @warmelt-genobj.melt:5462", MELT_ROUTDESCR_LEN - 1); cdat-> drout_1623__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER. nbval = 19; MELT_ROUTINE_SET_ROUTCODE (&cdat-> drout_1623__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER, meltrout_159_warmelt_genobj_COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER); /*iniclos dclo_1624__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ /*_.VALCLO___V1795*/ meltfptr[1794] = (melt_ptr_t) & cdat-> dclo_1624__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER; cdat->dclo_1624__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER. discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1624__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER. nbval = 0; /*iniobj dsym_1625__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1796*/ meltfptr[1795]) /*_.VALDATA___V1796*/ meltfptr[1795] = (melt_ptr_t) & cdat-> dsym_1625__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1625__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_1625__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1625__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER. meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1625__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER. obj_hash = 1007630346; cdat->dsym_1625__CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER. obj_len = 3; /*inistring dstr_1626__CLASS_NREP_UPDAT*/ /*_.VALSTR___V1797*/ meltfptr[1796] = (melt_ptr_t) & cdat->dstr_1626__CLASS_NREP_UPDAT; cdat->dstr_1626__CLASS_NREP_UPDAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1626__CLASS_NREP_UPDAT.val, "CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER", sizeof (cdat->dstr_1626__CLASS_NREP_UPDAT. val) - 1); cdat->dstr_1626__CLASS_NREP_UPDAT.val[54] = (char) 0; cdat->dstr_1626__CLASS_NREP_UPDAT.slen = 54; /*inirout drout_1627__LAMBDA_ */ /*_.VALROUT___V1793*/ meltfptr[1792] = (melt_ptr_t) & cdat->drout_1627__LAMBDA_; cdat->drout_1627__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1627__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:5507", MELT_ROUTDESCR_LEN - 1); cdat->drout_1627__LAMBDA_.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1627__LAMBDA_, meltrout_160_warmelt_genobj_LAMBDA___53__); /*inistring dstr_1628__compobj_upd_mod_*/ /*_.VALSTR___V1794*/ meltfptr[1793] = (melt_ptr_t) & cdat->dstr_1628__compobj_upd_mod_; cdat->dstr_1628__compobj_upd_mod_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1628__compobj_upd_mod_.val, "compobj.upd.mod.env.box", sizeof (cdat->dstr_1628__compobj_upd_mod_. val) - 1); cdat->dstr_1628__compobj_upd_mod_.val[23] = (char) 0; cdat->dstr_1628__compobj_upd_mod_.slen = 23; /*inirout drout_1629__COMPILOBJ_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER */ /*_.VALROUT___V1798*/ meltfptr[1797] = (melt_ptr_t) & cdat-> drout_1629__COMPILOBJ_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER; cdat->drout_1629__COMPILOBJ_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER. discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat-> drout_1629__COMPILOBJ_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER. routdescr, "COMPILOBJ_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER @warmelt-genobj.melt:5552", MELT_ROUTDESCR_LEN - 1); cdat->drout_1629__COMPILOBJ_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER. nbval = 26; MELT_ROUTINE_SET_ROUTCODE (&cdat-> drout_1629__COMPILOBJ_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER, meltrout_161_warmelt_genobj_COMPILOBJ_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER); /*iniclos dclo_1630__COMPILOBJ_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER */ /*_.VALCLO___V1803*/ meltfptr[1802] = (melt_ptr_t) & cdat-> dclo_1630__COMPILOBJ_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER; cdat->dclo_1630__COMPILOBJ_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER. discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1630__COMPILOBJ_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER. nbval = 0; /*iniobj dsym_1631__CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1804*/ meltfptr[1803]) /*_.VALDATA___V1804*/ meltfptr[1803] = (melt_ptr_t) & cdat-> dsym_1631__CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1631__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_1631__CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1631__CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER. meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1631__CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER. obj_hash = 602914932; cdat->dsym_1631__CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER. obj_len = 3; /*inistring dstr_1632__CLASS_NREP_CHECK*/ /*_.VALSTR___V1805*/ meltfptr[1804] = (melt_ptr_t) & cdat->dstr_1632__CLASS_NREP_CHECK; cdat->dstr_1632__CLASS_NREP_CHECK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1632__CLASS_NREP_CHECK.val, "CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER", sizeof (cdat->dstr_1632__CLASS_NREP_CHECK. val) - 1); cdat->dstr_1632__CLASS_NREP_CHECK.val[53] = (char) 0; cdat->dstr_1632__CLASS_NREP_CHECK.slen = 53; /*iniobj dsym_1633__CURMODENV_*/ /*uniqueobj*/ if (! /*_.VALDATA___V1799*/ meltfptr[1798]) /*_.VALDATA___V1799*/ meltfptr[1798] = (melt_ptr_t) & cdat->dsym_1633__CURMODENV_; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1633__CURMODENV_", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1633__CURMODENV_", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1633__CURMODENV_.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1633__CURMODENV_.obj_hash = 928447222; cdat->dsym_1633__CURMODENV_.obj_len = 3; /*inistring dstr_1634__CURMODENV_*/ /*_.VALSTR___V1800*/ meltfptr[1799] = (melt_ptr_t) & cdat->dstr_1634__CURMODENV_; cdat->dstr_1634__CURMODENV_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1634__CURMODENV_.val, "_CURMODENV_", sizeof (cdat->dstr_1634__CURMODENV_.val) - 1); cdat->dstr_1634__CURMODENV_.val[11] = (char) 0; cdat->dstr_1634__CURMODENV_.slen = 11; /*iniobj dsym_1635__ADD2OUT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1806*/ meltfptr[1805]) /*_.VALDATA___V1806*/ meltfptr[1805] = (melt_ptr_t) & cdat->dsym_1635__ADD2OUT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1635__ADD2OUT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1635__ADD2OUT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1635__ADD2OUT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1635__ADD2OUT.obj_hash = 901325062; cdat->dsym_1635__ADD2OUT.obj_len = 3; /*inistring dstr_1636__ADD2OUT*/ /*_.VALSTR___V1807*/ meltfptr[1806] = (melt_ptr_t) & cdat->dstr_1636__ADD2OUT; cdat->dstr_1636__ADD2OUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1636__ADD2OUT.val, "ADD2OUT", sizeof (cdat->dstr_1636__ADD2OUT.val) - 1); cdat->dstr_1636__ADD2OUT.val[7] = (char) 0; cdat->dstr_1636__ADD2OUT.slen = 7; /*inirout drout_1637__LAMBDA_ */ /*_.VALROUT___V1801*/ meltfptr[1800] = (melt_ptr_t) & cdat->drout_1637__LAMBDA_; cdat->drout_1637__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1637__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:5612", MELT_ROUTDESCR_LEN - 1); cdat->drout_1637__LAMBDA_.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1637__LAMBDA_, meltrout_162_warmelt_genobj_LAMBDA___54__); /*inistring dstr_1638__updat_cur_runnin*/ /*_.VALSTR___V1802*/ meltfptr[1801] = (melt_ptr_t) & cdat->dstr_1638__updat_cur_runnin; cdat->dstr_1638__updat_cur_runnin.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1638__updat_cur_runnin.val, "updat.cur.running.mod.env", sizeof (cdat->dstr_1638__updat_cur_runnin. val) - 1); cdat->dstr_1638__updat_cur_runnin.val[25] = (char) 0; cdat->dstr_1638__updat_cur_runnin.slen = 25; /*iniobj dsym_1639__COMPILE_MATCHER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1808*/ meltfptr[1807]) /*_.VALDATA___V1808*/ meltfptr[1807] = (melt_ptr_t) & cdat->dsym_1639__COMPILE_MATCHER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1639__COMPILE_MATCHER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1639__COMPILE_MATCHER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1639__COMPILE_MATCHER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1639__COMPILE_MATCHER.obj_hash = 1017313272; cdat->dsym_1639__COMPILE_MATCHER.obj_len = 3; /*inistring dstr_1640__COMPILE_MATCHER*/ /*_.VALSTR___V1809*/ meltfptr[1808] = (melt_ptr_t) & cdat->dstr_1640__COMPILE_MATCHER; cdat->dstr_1640__COMPILE_MATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1640__COMPILE_MATCHER.val, "COMPILE_MATCHER", sizeof (cdat->dstr_1640__COMPILE_MATCHER. val) - 1); cdat->dstr_1640__COMPILE_MATCHER.val[15] = (char) 0; cdat->dstr_1640__COMPILE_MATCHER.slen = 15; MELT_LOCATION ("warmelt-genobj.melt:5657:/ iniobj"); /*iniobj dobj_1641__COMPILE_MATCHER*/ /*_.VALDATA___V1810*/ meltfptr[1809] = (melt_ptr_t) & cdat->dobj_1641__COMPILE_MATCHER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1641__COMPILE_MATCHER", 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_1641__COMPILE_MATCHER", ((meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V20*/ meltfptr[19]))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1641__COMPILE_MATCHER.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V20*/ meltfptr[19]); cdat->dobj_1641__COMPILE_MATCHER.obj_hash = 554687611; cdat->dobj_1641__COMPILE_MATCHER.obj_len = 4; /*inistring dstr_1642__COMPILE_MATCHER*/ /*_.VALSTR___V1811*/ meltfptr[1810] = (melt_ptr_t) & cdat->dstr_1642__COMPILE_MATCHER; cdat->dstr_1642__COMPILE_MATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1642__COMPILE_MATCHER.val, "COMPILE_MATCHER", sizeof (cdat->dstr_1642__COMPILE_MATCHER. val) - 1); cdat->dstr_1642__COMPILE_MATCHER.val[15] = (char) 0; cdat->dstr_1642__COMPILE_MATCHER.slen = 15; /*iniobj dsym_1643__CLASS_MATCHCOMPILCONTEXT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1812*/ meltfptr[1811]) /*_.VALDATA___V1812*/ meltfptr[1811] = (melt_ptr_t) & cdat->dsym_1643__CLASS_MATCHCOMPILCONTEXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1643__CLASS_MATCHCOMPILCONTEXT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1643__CLASS_MATCHCOMPILCONTEXT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1643__CLASS_MATCHCOMPILCONTEXT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1643__CLASS_MATCHCOMPILCONTEXT.obj_hash = 1041467073; cdat->dsym_1643__CLASS_MATCHCOMPILCONTEXT.obj_len = 3; /*inistring dstr_1644__CLASS_MATCHCOMPI*/ /*_.VALSTR___V1813*/ meltfptr[1812] = (melt_ptr_t) & cdat->dstr_1644__CLASS_MATCHCOMPI; cdat->dstr_1644__CLASS_MATCHCOMPI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1644__CLASS_MATCHCOMPI.val, "CLASS_MATCHCOMPILCONTEXT", sizeof (cdat->dstr_1644__CLASS_MATCHCOMPI. val) - 1); cdat->dstr_1644__CLASS_MATCHCOMPI.val[24] = (char) 0; cdat->dstr_1644__CLASS_MATCHCOMPI.slen = 24; /*iniobj dsym_1645__CLASS_PROPED*/ /*uniqueobj*/ if (! /*_.VALDATA___V1814*/ meltfptr[1813]) /*_.VALDATA___V1814*/ meltfptr[1813] = (melt_ptr_t) & cdat->dsym_1645__CLASS_PROPED; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1645__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_1645__CLASS_PROPED", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1645__CLASS_PROPED.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1645__CLASS_PROPED.obj_hash = 96765023; cdat->dsym_1645__CLASS_PROPED.obj_len = 3; /*inistring dstr_1646__CLASS_PROPED*/ /*_.VALSTR___V1815*/ meltfptr[1814] = (melt_ptr_t) & cdat->dstr_1646__CLASS_PROPED; cdat->dstr_1646__CLASS_PROPED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1646__CLASS_PROPED.val, "CLASS_PROPED", sizeof (cdat->dstr_1646__CLASS_PROPED.val) - 1); cdat->dstr_1646__CLASS_PROPED.val[12] = (char) 0; cdat->dstr_1646__CLASS_PROPED.slen = 12; MELT_LOCATION ("warmelt-genobj.melt:5661:/ iniobj"); /*iniobj dobj_1647__CLASS_MATCHCOMPILCONTEXT*/ /*_.VALDATA___V1816*/ meltfptr[1815] = (melt_ptr_t) & cdat->dobj_1647__CLASS_MATCHCOMPILCONTEXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1647__CLASS_MATCHCOMPILCONTEXT", 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_1647__CLASS_MATCHCOMPILCONTEXT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1647__CLASS_MATCHCOMPILCONTEXT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_1647__CLASS_MATCHCOMPILCONTEXT.obj_num = MELTOBMAG_OBJECT; cdat->dobj_1647__CLASS_MATCHCOMPILCONTEXT.obj_hash = 968058659; cdat->dobj_1647__CLASS_MATCHCOMPILCONTEXT.obj_len = 8; /*inistring dstr_1648__CLASS_MATCHCOMPI*/ /*_.VALSTR___V1817*/ meltfptr[1816] = (melt_ptr_t) & cdat->dstr_1648__CLASS_MATCHCOMPI; cdat->dstr_1648__CLASS_MATCHCOMPI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1648__CLASS_MATCHCOMPI.val, "CLASS_MATCHCOMPILCONTEXT", sizeof (cdat->dstr_1648__CLASS_MATCHCOMPI. val) - 1); cdat->dstr_1648__CLASS_MATCHCOMPI.val[24] = (char) 0; cdat->dstr_1648__CLASS_MATCHCOMPI.slen = 24; /*inimult dtup_1649__CLASS_MATCHCOMPILCONTEXT */ /*_.VALTUP___V1818*/ meltfptr[1817] = (melt_ptr_t) & cdat->dtup_1649__CLASS_MATCHCOMPILCONTEXT; cdat->dtup_1649__CLASS_MATCHCOMPILCONTEXT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_1649__CLASS_MATCHCOMPILCONTEXT.nbval = 2; /*inimult dtup_1650__CLASS_MATCHCOMPILCONTEXT */ /*_.VALTUP___V1833*/ meltfptr[1832] = (melt_ptr_t) & cdat->dtup_1650__CLASS_MATCHCOMPILCONTEXT; cdat->dtup_1650__CLASS_MATCHCOMPILCONTEXT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_1650__CLASS_MATCHCOMPILCONTEXT.nbval = 8; /*iniobj dsym_1651__MCX_LOC*/ /*uniqueobj*/ if (! /*_.VALDATA___V1834*/ meltfptr[1833]) /*_.VALDATA___V1834*/ meltfptr[1833] = (melt_ptr_t) & cdat->dsym_1651__MCX_LOC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1651__MCX_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_1651__MCX_LOC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1651__MCX_LOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1651__MCX_LOC.obj_hash = 750608101; cdat->dsym_1651__MCX_LOC.obj_len = 3; /*inistring dstr_1652__MCX_LOC*/ /*_.VALSTR___V1835*/ meltfptr[1834] = (melt_ptr_t) & cdat->dstr_1652__MCX_LOC; cdat->dstr_1652__MCX_LOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1652__MCX_LOC.val, "MCX_LOC", sizeof (cdat->dstr_1652__MCX_LOC.val) - 1); cdat->dstr_1652__MCX_LOC.val[7] = (char) 0; cdat->dstr_1652__MCX_LOC.slen = 7; /*^iniobj */ /*iniobj dobj_1653__MCX_LOC*/ /*_.VALDATA___V1819*/ meltfptr[1818] = (melt_ptr_t) & cdat->dobj_1653__MCX_LOC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1653__MCX_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_1653__MCX_LOC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1653__MCX_LOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1653__MCX_LOC.obj_num = 1; cdat->dobj_1653__MCX_LOC.obj_hash = 951954547; cdat->dobj_1653__MCX_LOC.obj_len = 4; /*inistring dstr_1654__MCX_LOC*/ /*_.VALSTR___V1820*/ meltfptr[1819] = (melt_ptr_t) & cdat->dstr_1654__MCX_LOC; cdat->dstr_1654__MCX_LOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1654__MCX_LOC.val, "MCX_LOC", sizeof (cdat->dstr_1654__MCX_LOC.val) - 1); cdat->dstr_1654__MCX_LOC.val[7] = (char) 0; cdat->dstr_1654__MCX_LOC.slen = 7; /*iniobj dsym_1655__MCX_NORMTESTER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1836*/ meltfptr[1835]) /*_.VALDATA___V1836*/ meltfptr[1835] = (melt_ptr_t) & cdat->dsym_1655__MCX_NORMTESTER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1655__MCX_NORMTESTER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1655__MCX_NORMTESTER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1655__MCX_NORMTESTER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1655__MCX_NORMTESTER.obj_hash = 385472453; cdat->dsym_1655__MCX_NORMTESTER.obj_len = 3; /*inistring dstr_1656__MCX_NORMTESTER*/ /*_.VALSTR___V1837*/ meltfptr[1836] = (melt_ptr_t) & cdat->dstr_1656__MCX_NORMTESTER; cdat->dstr_1656__MCX_NORMTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1656__MCX_NORMTESTER.val, "MCX_NORMTESTER", sizeof (cdat->dstr_1656__MCX_NORMTESTER.val) - 1); cdat->dstr_1656__MCX_NORMTESTER.val[14] = (char) 0; cdat->dstr_1656__MCX_NORMTESTER.slen = 14; /*^iniobj */ /*iniobj dobj_1657__MCX_NORMTESTER*/ /*_.VALDATA___V1821*/ meltfptr[1820] = (melt_ptr_t) & cdat->dobj_1657__MCX_NORMTESTER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1657__MCX_NORMTESTER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1657__MCX_NORMTESTER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1657__MCX_NORMTESTER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1657__MCX_NORMTESTER.obj_num = 2; cdat->dobj_1657__MCX_NORMTESTER.obj_hash = 1009942129; cdat->dobj_1657__MCX_NORMTESTER.obj_len = 4; /*inistring dstr_1658__MCX_NORMTESTER*/ /*_.VALSTR___V1822*/ meltfptr[1821] = (melt_ptr_t) & cdat->dstr_1658__MCX_NORMTESTER; cdat->dstr_1658__MCX_NORMTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1658__MCX_NORMTESTER.val, "MCX_NORMTESTER", sizeof (cdat->dstr_1658__MCX_NORMTESTER.val) - 1); cdat->dstr_1658__MCX_NORMTESTER.val[14] = (char) 0; cdat->dstr_1658__MCX_NORMTESTER.slen = 14; /*iniobj dsym_1659__MCX_GOTOTHEN*/ /*uniqueobj*/ if (! /*_.VALDATA___V1838*/ meltfptr[1837]) /*_.VALDATA___V1838*/ meltfptr[1837] = (melt_ptr_t) & cdat->dsym_1659__MCX_GOTOTHEN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1659__MCX_GOTOTHEN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1659__MCX_GOTOTHEN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1659__MCX_GOTOTHEN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1659__MCX_GOTOTHEN.obj_hash = 294072678; cdat->dsym_1659__MCX_GOTOTHEN.obj_len = 3; /*inistring dstr_1660__MCX_GOTOTHEN*/ /*_.VALSTR___V1839*/ meltfptr[1838] = (melt_ptr_t) & cdat->dstr_1660__MCX_GOTOTHEN; cdat->dstr_1660__MCX_GOTOTHEN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1660__MCX_GOTOTHEN.val, "MCX_GOTOTHEN", sizeof (cdat->dstr_1660__MCX_GOTOTHEN.val) - 1); cdat->dstr_1660__MCX_GOTOTHEN.val[12] = (char) 0; cdat->dstr_1660__MCX_GOTOTHEN.slen = 12; /*^iniobj */ /*iniobj dobj_1661__MCX_GOTOTHEN*/ /*_.VALDATA___V1823*/ meltfptr[1822] = (melt_ptr_t) & cdat->dobj_1661__MCX_GOTOTHEN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1661__MCX_GOTOTHEN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1661__MCX_GOTOTHEN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1661__MCX_GOTOTHEN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1661__MCX_GOTOTHEN.obj_num = 3; cdat->dobj_1661__MCX_GOTOTHEN.obj_hash = 690965798; cdat->dobj_1661__MCX_GOTOTHEN.obj_len = 4; /*inistring dstr_1662__MCX_GOTOTHEN*/ /*_.VALSTR___V1824*/ meltfptr[1823] = (melt_ptr_t) & cdat->dstr_1662__MCX_GOTOTHEN; cdat->dstr_1662__MCX_GOTOTHEN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1662__MCX_GOTOTHEN.val, "MCX_GOTOTHEN", sizeof (cdat->dstr_1662__MCX_GOTOTHEN.val) - 1); cdat->dstr_1662__MCX_GOTOTHEN.val[12] = (char) 0; cdat->dstr_1662__MCX_GOTOTHEN.slen = 12; /*iniobj dsym_1663__MCX_GOTOELSE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1840*/ meltfptr[1839]) /*_.VALDATA___V1840*/ meltfptr[1839] = (melt_ptr_t) & cdat->dsym_1663__MCX_GOTOELSE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1663__MCX_GOTOELSE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1663__MCX_GOTOELSE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1663__MCX_GOTOELSE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1663__MCX_GOTOELSE.obj_hash = 673704960; cdat->dsym_1663__MCX_GOTOELSE.obj_len = 3; /*inistring dstr_1664__MCX_GOTOELSE*/ /*_.VALSTR___V1841*/ meltfptr[1840] = (melt_ptr_t) & cdat->dstr_1664__MCX_GOTOELSE; cdat->dstr_1664__MCX_GOTOELSE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1664__MCX_GOTOELSE.val, "MCX_GOTOELSE", sizeof (cdat->dstr_1664__MCX_GOTOELSE.val) - 1); cdat->dstr_1664__MCX_GOTOELSE.val[12] = (char) 0; cdat->dstr_1664__MCX_GOTOELSE.slen = 12; /*^iniobj */ /*iniobj dobj_1665__MCX_GOTOELSE*/ /*_.VALDATA___V1825*/ meltfptr[1824] = (melt_ptr_t) & cdat->dobj_1665__MCX_GOTOELSE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1665__MCX_GOTOELSE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1665__MCX_GOTOELSE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1665__MCX_GOTOELSE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1665__MCX_GOTOELSE.obj_num = 4; cdat->dobj_1665__MCX_GOTOELSE.obj_hash = 956475182; cdat->dobj_1665__MCX_GOTOELSE.obj_len = 4; /*inistring dstr_1666__MCX_GOTOELSE*/ /*_.VALSTR___V1826*/ meltfptr[1825] = (melt_ptr_t) & cdat->dstr_1666__MCX_GOTOELSE; cdat->dstr_1666__MCX_GOTOELSE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1666__MCX_GOTOELSE.val, "MCX_GOTOELSE", sizeof (cdat->dstr_1666__MCX_GOTOELSE.val) - 1); cdat->dstr_1666__MCX_GOTOELSE.val[12] = (char) 0; cdat->dstr_1666__MCX_GOTOELSE.slen = 12; /*iniobj dsym_1667__MCX_OLIST*/ /*uniqueobj*/ if (! /*_.VALDATA___V1842*/ meltfptr[1841]) /*_.VALDATA___V1842*/ meltfptr[1841] = (melt_ptr_t) & cdat->dsym_1667__MCX_OLIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1667__MCX_OLIST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1667__MCX_OLIST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1667__MCX_OLIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1667__MCX_OLIST.obj_hash = 25914724; cdat->dsym_1667__MCX_OLIST.obj_len = 3; /*inistring dstr_1668__MCX_OLIST*/ /*_.VALSTR___V1843*/ meltfptr[1842] = (melt_ptr_t) & cdat->dstr_1668__MCX_OLIST; cdat->dstr_1668__MCX_OLIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1668__MCX_OLIST.val, "MCX_OLIST", sizeof (cdat->dstr_1668__MCX_OLIST.val) - 1); cdat->dstr_1668__MCX_OLIST.val[9] = (char) 0; cdat->dstr_1668__MCX_OLIST.slen = 9; /*^iniobj */ /*iniobj dobj_1669__MCX_OLIST*/ /*_.VALDATA___V1827*/ meltfptr[1826] = (melt_ptr_t) & cdat->dobj_1669__MCX_OLIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1669__MCX_OLIST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1669__MCX_OLIST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1669__MCX_OLIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1669__MCX_OLIST.obj_num = 5; cdat->dobj_1669__MCX_OLIST.obj_hash = 697373836; cdat->dobj_1669__MCX_OLIST.obj_len = 4; /*inistring dstr_1670__MCX_OLIST*/ /*_.VALSTR___V1828*/ meltfptr[1827] = (melt_ptr_t) & cdat->dstr_1670__MCX_OLIST; cdat->dstr_1670__MCX_OLIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1670__MCX_OLIST.val, "MCX_OLIST", sizeof (cdat->dstr_1670__MCX_OLIST.val) - 1); cdat->dstr_1670__MCX_OLIST.val[9] = (char) 0; cdat->dstr_1670__MCX_OLIST.slen = 9; /*iniobj dsym_1671__MCX_SUFFIX*/ /*uniqueobj*/ if (! /*_.VALDATA___V1844*/ meltfptr[1843]) /*_.VALDATA___V1844*/ meltfptr[1843] = (melt_ptr_t) & cdat->dsym_1671__MCX_SUFFIX; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1671__MCX_SUFFIX", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1671__MCX_SUFFIX", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1671__MCX_SUFFIX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1671__MCX_SUFFIX.obj_hash = 853231498; cdat->dsym_1671__MCX_SUFFIX.obj_len = 3; /*inistring dstr_1672__MCX_SUFFIX*/ /*_.VALSTR___V1845*/ meltfptr[1844] = (melt_ptr_t) & cdat->dstr_1672__MCX_SUFFIX; cdat->dstr_1672__MCX_SUFFIX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1672__MCX_SUFFIX.val, "MCX_SUFFIX", sizeof (cdat->dstr_1672__MCX_SUFFIX.val) - 1); cdat->dstr_1672__MCX_SUFFIX.val[10] = (char) 0; cdat->dstr_1672__MCX_SUFFIX.slen = 10; /*^iniobj */ /*iniobj dobj_1673__MCX_SUFFIX*/ /*_.VALDATA___V1829*/ meltfptr[1828] = (melt_ptr_t) & cdat->dobj_1673__MCX_SUFFIX; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1673__MCX_SUFFIX", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1673__MCX_SUFFIX", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1673__MCX_SUFFIX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1673__MCX_SUFFIX.obj_num = 6; cdat->dobj_1673__MCX_SUFFIX.obj_hash = 1010647583; cdat->dobj_1673__MCX_SUFFIX.obj_len = 4; /*inistring dstr_1674__MCX_SUFFIX*/ /*_.VALSTR___V1830*/ meltfptr[1829] = (melt_ptr_t) & cdat->dstr_1674__MCX_SUFFIX; cdat->dstr_1674__MCX_SUFFIX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1674__MCX_SUFFIX.val, "MCX_SUFFIX", sizeof (cdat->dstr_1674__MCX_SUFFIX.val) - 1); cdat->dstr_1674__MCX_SUFFIX.val[10] = (char) 0; cdat->dstr_1674__MCX_SUFFIX.slen = 10; /*iniobj dsym_1675__MCX_STATECOUNTER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1846*/ meltfptr[1845]) /*_.VALDATA___V1846*/ meltfptr[1845] = (melt_ptr_t) & cdat->dsym_1675__MCX_STATECOUNTER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1675__MCX_STATECOUNTER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1675__MCX_STATECOUNTER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1675__MCX_STATECOUNTER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1675__MCX_STATECOUNTER.obj_hash = 893073031; cdat->dsym_1675__MCX_STATECOUNTER.obj_len = 3; /*inistring dstr_1676__MCX_STATECOUNTER*/ /*_.VALSTR___V1847*/ meltfptr[1846] = (melt_ptr_t) & cdat->dstr_1676__MCX_STATECOUNTER; cdat->dstr_1676__MCX_STATECOUNTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1676__MCX_STATECOUNTER.val, "MCX_STATECOUNTER", sizeof (cdat->dstr_1676__MCX_STATECOUNTER. val) - 1); cdat->dstr_1676__MCX_STATECOUNTER.val[16] = (char) 0; cdat->dstr_1676__MCX_STATECOUNTER.slen = 16; /*^iniobj */ /*iniobj dobj_1677__MCX_STATECOUNTER*/ /*_.VALDATA___V1831*/ meltfptr[1830] = (melt_ptr_t) & cdat->dobj_1677__MCX_STATECOUNTER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1677__MCX_STATECOUNTER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1677__MCX_STATECOUNTER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1677__MCX_STATECOUNTER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1677__MCX_STATECOUNTER.obj_num = 7; cdat->dobj_1677__MCX_STATECOUNTER.obj_hash = 1023553688; cdat->dobj_1677__MCX_STATECOUNTER.obj_len = 4; /*inistring dstr_1678__MCX_STATECOUNTER*/ /*_.VALSTR___V1832*/ meltfptr[1831] = (melt_ptr_t) & cdat->dstr_1678__MCX_STATECOUNTER; cdat->dstr_1678__MCX_STATECOUNTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1678__MCX_STATECOUNTER.val, "MCX_STATECOUNTER", sizeof (cdat->dstr_1678__MCX_STATECOUNTER. val) - 1); cdat->dstr_1678__MCX_STATECOUNTER.val[16] = (char) 0; cdat->dstr_1678__MCX_STATECOUNTER.slen = 16; /*iniobj dsym_1679__COMPILE_TESTER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1848*/ meltfptr[1847]) /*_.VALDATA___V1848*/ meltfptr[1847] = (melt_ptr_t) & cdat->dsym_1679__COMPILE_TESTER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1679__COMPILE_TESTER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1679__COMPILE_TESTER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1679__COMPILE_TESTER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1679__COMPILE_TESTER.obj_hash = 367976153; cdat->dsym_1679__COMPILE_TESTER.obj_len = 3; /*inistring dstr_1680__COMPILE_TESTER*/ /*_.VALSTR___V1849*/ meltfptr[1848] = (melt_ptr_t) & cdat->dstr_1680__COMPILE_TESTER; cdat->dstr_1680__COMPILE_TESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1680__COMPILE_TESTER.val, "COMPILE_TESTER", sizeof (cdat->dstr_1680__COMPILE_TESTER.val) - 1); cdat->dstr_1680__COMPILE_TESTER.val[14] = (char) 0; cdat->dstr_1680__COMPILE_TESTER.slen = 14; MELT_LOCATION ("warmelt-genobj.melt:5679:/ iniobj"); /*iniobj dobj_1681*/ /*_.VALDATA___V1850*/ meltfptr[1849] = (melt_ptr_t) & cdat->dobj_1681; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1681", 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_1681", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1681.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1681.obj_num = 0; cdat->dobj_1681.obj_hash = 327318079; cdat->dobj_1681.obj_len = 2; /*^iniobj */ /*iniobj dobj_1682*/ /*_.VALDATA___V1851*/ meltfptr[1850] = (melt_ptr_t) & cdat->dobj_1682; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1682", 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_1682", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1682.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1682.obj_num = 1; cdat->dobj_1682.obj_hash = 59736484; cdat->dobj_1682.obj_len = 2; /*iniobj dsym_1683__TCX*/ /*uniqueobj*/ if (! /*_.VALDATA___V1852*/ meltfptr[1851]) /*_.VALDATA___V1852*/ meltfptr[1851] = (melt_ptr_t) & cdat->dsym_1683__TCX; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1683__TCX", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1683__TCX", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1683__TCX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1683__TCX.obj_hash = 508119404; cdat->dsym_1683__TCX.obj_len = 3; /*inistring dstr_1684__TCX*/ /*_.VALSTR___V1853*/ meltfptr[1852] = (melt_ptr_t) & cdat->dstr_1684__TCX; cdat->dstr_1684__TCX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1684__TCX.val, "TCX", sizeof (cdat->dstr_1684__TCX.val) - 1); cdat->dstr_1684__TCX.val[3] = (char) 0; cdat->dstr_1684__TCX.slen = 3; /*^iniobj */ /*iniobj dobj_1685*/ /*_.VALDATA___V1854*/ meltfptr[1853] = (melt_ptr_t) & cdat->dobj_1685; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1685", 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_1685", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1685.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1685.obj_num = 2; cdat->dobj_1685.obj_hash = 815036435; cdat->dobj_1685.obj_len = 2; /*inimult dtup_1686__COMPILE_TESTER */ /*_.VALTUP___V1855*/ meltfptr[1854] = (melt_ptr_t) & cdat->dtup_1686__COMPILE_TESTER; cdat->dtup_1686__COMPILE_TESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_MULTIPLE)))); cdat->dtup_1686__COMPILE_TESTER.nbval = 3; /*^iniobj */ /*iniobj dobj_1687__COMPILE_TESTER*/ /*_.VALDATA___V1856*/ meltfptr[1855] = (melt_ptr_t) & cdat->dobj_1687__COMPILE_TESTER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1687__COMPILE_TESTER", 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_1687__COMPILE_TESTER", ((meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V20*/ meltfptr[19]))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1687__COMPILE_TESTER.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V20*/ meltfptr[19]); cdat->dobj_1687__COMPILE_TESTER.obj_hash = 96424961; cdat->dobj_1687__COMPILE_TESTER.obj_len = 4; /*inistring dstr_1688__COMPILE_TESTER*/ /*_.VALSTR___V1857*/ meltfptr[1856] = (melt_ptr_t) & cdat->dstr_1688__COMPILE_TESTER; cdat->dstr_1688__COMPILE_TESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1688__COMPILE_TESTER.val, "COMPILE_TESTER", sizeof (cdat->dstr_1688__COMPILE_TESTER.val) - 1); cdat->dstr_1688__COMPILE_TESTER.val[14] = (char) 0; cdat->dstr_1688__COMPILE_TESTER.slen = 14; /*iniobj dsym_1689__CLASS_TESTERCOMPILCONTEXT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1858*/ meltfptr[1857]) /*_.VALDATA___V1858*/ meltfptr[1857] = (melt_ptr_t) & cdat->dsym_1689__CLASS_TESTERCOMPILCONTEXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1689__CLASS_TESTERCOMPILCONTEXT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1689__CLASS_TESTERCOMPILCONTEXT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1689__CLASS_TESTERCOMPILCONTEXT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1689__CLASS_TESTERCOMPILCONTEXT.obj_hash = 340923428; cdat->dsym_1689__CLASS_TESTERCOMPILCONTEXT.obj_len = 3; /*inistring dstr_1690__CLASS_TESTERCOMP*/ /*_.VALSTR___V1859*/ meltfptr[1858] = (melt_ptr_t) & cdat->dstr_1690__CLASS_TESTERCOMP; cdat->dstr_1690__CLASS_TESTERCOMP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1690__CLASS_TESTERCOMP.val, "CLASS_TESTERCOMPILCONTEXT", sizeof (cdat->dstr_1690__CLASS_TESTERCOMP. val) - 1); cdat->dstr_1690__CLASS_TESTERCOMP.val[25] = (char) 0; cdat->dstr_1690__CLASS_TESTERCOMP.slen = 25; MELT_LOCATION ("warmelt-genobj.melt:5686:/ iniobj"); /*iniobj dobj_1691__CLASS_TESTERCOMPILCONTEXT*/ /*_.VALDATA___V1860*/ meltfptr[1859] = (melt_ptr_t) & cdat->dobj_1691__CLASS_TESTERCOMPILCONTEXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1691__CLASS_TESTERCOMPILCONTEXT", 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_1691__CLASS_TESTERCOMPILCONTEXT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1691__CLASS_TESTERCOMPILCONTEXT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_1691__CLASS_TESTERCOMPILCONTEXT.obj_num = MELTOBMAG_OBJECT; cdat->dobj_1691__CLASS_TESTERCOMPILCONTEXT.obj_hash = 835031517; cdat->dobj_1691__CLASS_TESTERCOMPILCONTEXT.obj_len = 8; /*inistring dstr_1692__CLASS_TESTERCOMP*/ /*_.VALSTR___V1861*/ meltfptr[1860] = (melt_ptr_t) & cdat->dstr_1692__CLASS_TESTERCOMP; cdat->dstr_1692__CLASS_TESTERCOMP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1692__CLASS_TESTERCOMP.val, "CLASS_TESTERCOMPILCONTEXT", sizeof (cdat->dstr_1692__CLASS_TESTERCOMP. val) - 1); cdat->dstr_1692__CLASS_TESTERCOMP.val[25] = (char) 0; cdat->dstr_1692__CLASS_TESTERCOMP.slen = 25; /*inimult dtup_1693__CLASS_TESTERCOMPILCONTEXT */ /*_.VALTUP___V1862*/ meltfptr[1861] = (melt_ptr_t) & cdat->dtup_1693__CLASS_TESTERCOMPILCONTEXT; cdat->dtup_1693__CLASS_TESTERCOMPILCONTEXT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_1693__CLASS_TESTERCOMPILCONTEXT.nbval = 2; /*inimult dtup_1694__CLASS_TESTERCOMPILCONTEXT */ /*_.VALTUP___V1869*/ meltfptr[1868] = (melt_ptr_t) & cdat->dtup_1694__CLASS_TESTERCOMPILCONTEXT; cdat->dtup_1694__CLASS_TESTERCOMPILCONTEXT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_1694__CLASS_TESTERCOMPILCONTEXT.nbval = 4; /*iniobj dsym_1695__TCX_NRMATCH*/ /*uniqueobj*/ if (! /*_.VALDATA___V1870*/ meltfptr[1869]) /*_.VALDATA___V1870*/ meltfptr[1869] = (melt_ptr_t) & cdat->dsym_1695__TCX_NRMATCH; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1695__TCX_NRMATCH", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1695__TCX_NRMATCH", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1695__TCX_NRMATCH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1695__TCX_NRMATCH.obj_hash = 969696101; cdat->dsym_1695__TCX_NRMATCH.obj_len = 3; /*inistring dstr_1696__TCX_NRMATCH*/ /*_.VALSTR___V1871*/ meltfptr[1870] = (melt_ptr_t) & cdat->dstr_1696__TCX_NRMATCH; cdat->dstr_1696__TCX_NRMATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1696__TCX_NRMATCH.val, "TCX_NRMATCH", sizeof (cdat->dstr_1696__TCX_NRMATCH.val) - 1); cdat->dstr_1696__TCX_NRMATCH.val[11] = (char) 0; cdat->dstr_1696__TCX_NRMATCH.slen = 11; /*^iniobj */ /*iniobj dobj_1697__TCX_NRMATCH*/ /*_.VALDATA___V1863*/ meltfptr[1862] = (melt_ptr_t) & cdat->dobj_1697__TCX_NRMATCH; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1697__TCX_NRMATCH", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1697__TCX_NRMATCH", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1697__TCX_NRMATCH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1697__TCX_NRMATCH.obj_num = 1; cdat->dobj_1697__TCX_NRMATCH.obj_hash = 572568515; cdat->dobj_1697__TCX_NRMATCH.obj_len = 4; /*inistring dstr_1698__TCX_NRMATCH*/ /*_.VALSTR___V1864*/ meltfptr[1863] = (melt_ptr_t) & cdat->dstr_1698__TCX_NRMATCH; cdat->dstr_1698__TCX_NRMATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1698__TCX_NRMATCH.val, "TCX_NRMATCH", sizeof (cdat->dstr_1698__TCX_NRMATCH.val) - 1); cdat->dstr_1698__TCX_NRMATCH.val[11] = (char) 0; cdat->dstr_1698__TCX_NRMATCH.slen = 11; /*iniobj dsym_1699__TCX_FREELIST*/ /*uniqueobj*/ if (! /*_.VALDATA___V1872*/ meltfptr[1871]) /*_.VALDATA___V1872*/ meltfptr[1871] = (melt_ptr_t) & cdat->dsym_1699__TCX_FREELIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1699__TCX_FREELIST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1699__TCX_FREELIST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1699__TCX_FREELIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1699__TCX_FREELIST.obj_hash = 514682872; cdat->dsym_1699__TCX_FREELIST.obj_len = 3; /*inistring dstr_1700__TCX_FREELIST*/ /*_.VALSTR___V1873*/ meltfptr[1872] = (melt_ptr_t) & cdat->dstr_1700__TCX_FREELIST; cdat->dstr_1700__TCX_FREELIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1700__TCX_FREELIST.val, "TCX_FREELIST", sizeof (cdat->dstr_1700__TCX_FREELIST.val) - 1); cdat->dstr_1700__TCX_FREELIST.val[12] = (char) 0; cdat->dstr_1700__TCX_FREELIST.slen = 12; /*^iniobj */ /*iniobj dobj_1701__TCX_FREELIST*/ /*_.VALDATA___V1865*/ meltfptr[1864] = (melt_ptr_t) & cdat->dobj_1701__TCX_FREELIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1701__TCX_FREELIST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1701__TCX_FREELIST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1701__TCX_FREELIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1701__TCX_FREELIST.obj_num = 2; cdat->dobj_1701__TCX_FREELIST.obj_hash = 510879388; cdat->dobj_1701__TCX_FREELIST.obj_len = 4; /*inistring dstr_1702__TCX_FREELIST*/ /*_.VALSTR___V1866*/ meltfptr[1865] = (melt_ptr_t) & cdat->dstr_1702__TCX_FREELIST; cdat->dstr_1702__TCX_FREELIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1702__TCX_FREELIST.val, "TCX_FREELIST", sizeof (cdat->dstr_1702__TCX_FREELIST.val) - 1); cdat->dstr_1702__TCX_FREELIST.val[12] = (char) 0; cdat->dstr_1702__TCX_FREELIST.slen = 12; /*iniobj dsym_1703__TCX_NEXTEST*/ /*uniqueobj*/ if (! /*_.VALDATA___V1874*/ meltfptr[1873]) /*_.VALDATA___V1874*/ meltfptr[1873] = (melt_ptr_t) & cdat->dsym_1703__TCX_NEXTEST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1703__TCX_NEXTEST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1703__TCX_NEXTEST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1703__TCX_NEXTEST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1703__TCX_NEXTEST.obj_hash = 64609921; cdat->dsym_1703__TCX_NEXTEST.obj_len = 3; /*inistring dstr_1704__TCX_NEXTEST*/ /*_.VALSTR___V1875*/ meltfptr[1874] = (melt_ptr_t) & cdat->dstr_1704__TCX_NEXTEST; cdat->dstr_1704__TCX_NEXTEST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1704__TCX_NEXTEST.val, "TCX_NEXTEST", sizeof (cdat->dstr_1704__TCX_NEXTEST.val) - 1); cdat->dstr_1704__TCX_NEXTEST.val[11] = (char) 0; cdat->dstr_1704__TCX_NEXTEST.slen = 11; /*^iniobj */ /*iniobj dobj_1705__TCX_NEXTEST*/ /*_.VALDATA___V1867*/ meltfptr[1866] = (melt_ptr_t) & cdat->dobj_1705__TCX_NEXTEST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1705__TCX_NEXTEST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1705__TCX_NEXTEST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1705__TCX_NEXTEST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1705__TCX_NEXTEST.obj_num = 3; cdat->dobj_1705__TCX_NEXTEST.obj_hash = 802927778; cdat->dobj_1705__TCX_NEXTEST.obj_len = 4; /*inistring dstr_1706__TCX_NEXTEST*/ /*_.VALSTR___V1868*/ meltfptr[1867] = (melt_ptr_t) & cdat->dstr_1706__TCX_NEXTEST; cdat->dstr_1706__TCX_NEXTEST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1706__TCX_NEXTEST.val, "TCX_NEXTEST", sizeof (cdat->dstr_1706__TCX_NEXTEST.val) - 1); cdat->dstr_1706__TCX_NEXTEST.val[11] = (char) 0; cdat->dstr_1706__TCX_NEXTEST.slen = 11; /*inirout drout_1707__COMPILTST_ANYTESTER */ /*_.VALROUT___V1876*/ meltfptr[1875] = (melt_ptr_t) & cdat->drout_1707__COMPILTST_ANYTESTER; cdat->drout_1707__COMPILTST_ANYTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1707__COMPILTST_ANYTESTER.routdescr, "COMPILTST_ANYTESTER @warmelt-genobj.melt:5696", MELT_ROUTDESCR_LEN - 1); cdat->drout_1707__COMPILTST_ANYTESTER.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1707__COMPILTST_ANYTESTER, meltrout_163_warmelt_genobj_COMPILTST_ANYTESTER); /*iniclos dclo_1708__COMPILTST_ANYTESTER */ /*_.VALCLO___V1877*/ meltfptr[1876] = (melt_ptr_t) & cdat->dclo_1708__COMPILTST_ANYTESTER; cdat->dclo_1708__COMPILTST_ANYTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1708__COMPILTST_ANYTESTER.nbval = 0; /*iniobj dsym_1709__CLASS_NORMTESTER_ANY*/ /*uniqueobj*/ if (! /*_.VALDATA___V1878*/ meltfptr[1877]) /*_.VALDATA___V1878*/ meltfptr[1877] = (melt_ptr_t) & cdat->dsym_1709__CLASS_NORMTESTER_ANY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1709__CLASS_NORMTESTER_ANY", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1709__CLASS_NORMTESTER_ANY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1709__CLASS_NORMTESTER_ANY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1709__CLASS_NORMTESTER_ANY.obj_hash = 734583955; cdat->dsym_1709__CLASS_NORMTESTER_ANY.obj_len = 3; /*inistring dstr_1710__CLASS_NORMTESTER*/ /*_.VALSTR___V1879*/ meltfptr[1878] = (melt_ptr_t) & cdat->dstr_1710__CLASS_NORMTESTER; cdat->dstr_1710__CLASS_NORMTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1710__CLASS_NORMTESTER.val, "CLASS_NORMTESTER_ANY", sizeof (cdat->dstr_1710__CLASS_NORMTESTER. val) - 1); cdat->dstr_1710__CLASS_NORMTESTER.val[20] = (char) 0; cdat->dstr_1710__CLASS_NORMTESTER.slen = 20; /*inirout drout_1711__COMPILOBJ_NREP_MATCH */ /*_.VALROUT___V1880*/ meltfptr[1879] = (melt_ptr_t) & cdat->drout_1711__COMPILOBJ_NREP_MATCH; cdat->drout_1711__COMPILOBJ_NREP_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1711__COMPILOBJ_NREP_MATCH.routdescr, "COMPILOBJ_NREP_MATCH @warmelt-genobj.melt:5710", MELT_ROUTDESCR_LEN - 1); cdat->drout_1711__COMPILOBJ_NREP_MATCH.nbval = 26; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1711__COMPILOBJ_NREP_MATCH, meltrout_164_warmelt_genobj_COMPILOBJ_NREP_MATCH); /*iniclos dclo_1712__COMPILOBJ_NREP_MATCH */ /*_.VALCLO___V1884*/ meltfptr[1883] = (melt_ptr_t) & cdat->dclo_1712__COMPILOBJ_NREP_MATCH; cdat->dclo_1712__COMPILOBJ_NREP_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1712__COMPILOBJ_NREP_MATCH.nbval = 0; /*iniobj dsym_1713__CLASS_NREP_MATCH*/ /*uniqueobj*/ if (! /*_.VALDATA___V1885*/ meltfptr[1884]) /*_.VALDATA___V1885*/ meltfptr[1884] = (melt_ptr_t) & cdat->dsym_1713__CLASS_NREP_MATCH; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1713__CLASS_NREP_MATCH", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1713__CLASS_NREP_MATCH", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1713__CLASS_NREP_MATCH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1713__CLASS_NREP_MATCH.obj_hash = 624411385; cdat->dsym_1713__CLASS_NREP_MATCH.obj_len = 3; /*inistring dstr_1714__CLASS_NREP_MATCH*/ /*_.VALSTR___V1886*/ meltfptr[1885] = (melt_ptr_t) & cdat->dstr_1714__CLASS_NREP_MATCH; cdat->dstr_1714__CLASS_NREP_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1714__CLASS_NREP_MATCH.val, "CLASS_NREP_MATCH", sizeof (cdat->dstr_1714__CLASS_NREP_MATCH. val) - 1); cdat->dstr_1714__CLASS_NREP_MATCH.val[16] = (char) 0; cdat->dstr_1714__CLASS_NREP_MATCH.slen = 16; /*iniobj dsym_1715__CLASS_NORMTESTER_ANYTESTER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1887*/ meltfptr[1886]) /*_.VALDATA___V1887*/ meltfptr[1886] = (melt_ptr_t) & cdat->dsym_1715__CLASS_NORMTESTER_ANYTESTER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1715__CLASS_NORMTESTER_ANYTESTER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1715__CLASS_NORMTESTER_ANYTESTER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1715__CLASS_NORMTESTER_ANYTESTER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1715__CLASS_NORMTESTER_ANYTESTER.obj_hash = 827354043; cdat->dsym_1715__CLASS_NORMTESTER_ANYTESTER.obj_len = 3; /*inistring dstr_1716__CLASS_NORMTESTER*/ /*_.VALSTR___V1888*/ meltfptr[1887] = (melt_ptr_t) & cdat->dstr_1716__CLASS_NORMTESTER; cdat->dstr_1716__CLASS_NORMTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1716__CLASS_NORMTESTER.val, "CLASS_NORMTESTER_ANYTESTER", sizeof (cdat->dstr_1716__CLASS_NORMTESTER. val) - 1); cdat->dstr_1716__CLASS_NORMTESTER.val[26] = (char) 0; cdat->dstr_1716__CLASS_NORMTESTER.slen = 26; /*iniobj dsym_1717__CLASS_NORMTESTER_SUCCESS*/ /*uniqueobj*/ if (! /*_.VALDATA___V1889*/ meltfptr[1888]) /*_.VALDATA___V1889*/ meltfptr[1888] = (melt_ptr_t) & cdat->dsym_1717__CLASS_NORMTESTER_SUCCESS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1717__CLASS_NORMTESTER_SUCCESS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1717__CLASS_NORMTESTER_SUCCESS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1717__CLASS_NORMTESTER_SUCCESS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1717__CLASS_NORMTESTER_SUCCESS.obj_hash = 1047093940; cdat->dsym_1717__CLASS_NORMTESTER_SUCCESS.obj_len = 3; /*inistring dstr_1718__CLASS_NORMTESTER*/ /*_.VALSTR___V1890*/ meltfptr[1889] = (melt_ptr_t) & cdat->dstr_1718__CLASS_NORMTESTER; cdat->dstr_1718__CLASS_NORMTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1718__CLASS_NORMTESTER.val, "CLASS_NORMTESTER_SUCCESS", sizeof (cdat->dstr_1718__CLASS_NORMTESTER. val) - 1); cdat->dstr_1718__CLASS_NORMTESTER.val[24] = (char) 0; cdat->dstr_1718__CLASS_NORMTESTER.slen = 24; /*iniobj dsym_1719__MAPOBJECT_EVERY*/ /*uniqueobj*/ if (! /*_.VALDATA___V1891*/ meltfptr[1890]) /*_.VALDATA___V1891*/ meltfptr[1890] = (melt_ptr_t) & cdat->dsym_1719__MAPOBJECT_EVERY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1719__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_1719__MAPOBJECT_EVERY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1719__MAPOBJECT_EVERY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1719__MAPOBJECT_EVERY.obj_hash = 726732435; cdat->dsym_1719__MAPOBJECT_EVERY.obj_len = 3; /*inistring dstr_1720__MAPOBJECT_EVERY*/ /*_.VALSTR___V1892*/ meltfptr[1891] = (melt_ptr_t) & cdat->dstr_1720__MAPOBJECT_EVERY; cdat->dstr_1720__MAPOBJECT_EVERY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1720__MAPOBJECT_EVERY.val, "MAPOBJECT_EVERY", sizeof (cdat->dstr_1720__MAPOBJECT_EVERY. val) - 1); cdat->dstr_1720__MAPOBJECT_EVERY.val[15] = (char) 0; cdat->dstr_1720__MAPOBJECT_EVERY.slen = 15; /*inirout drout_1721__LAMBDA_ */ /*_.VALROUT___V1883*/ meltfptr[1882] = (melt_ptr_t) & cdat->drout_1721__LAMBDA_; cdat->drout_1721__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1721__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:5843", MELT_ROUTDESCR_LEN - 1); cdat->drout_1721__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1721__LAMBDA_, meltrout_165_warmelt_genobj_LAMBDA___55__); /*iniobj dsym_1722__LIST_FIND*/ /*uniqueobj*/ if (! /*_.VALDATA___V1893*/ meltfptr[1892]) /*_.VALDATA___V1893*/ meltfptr[1892] = (melt_ptr_t) & cdat->dsym_1722__LIST_FIND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1722__LIST_FIND", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1722__LIST_FIND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1722__LIST_FIND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1722__LIST_FIND.obj_hash = 430964501; cdat->dsym_1722__LIST_FIND.obj_len = 3; /*inistring dstr_1723__LIST_FIND*/ /*_.VALSTR___V1894*/ meltfptr[1893] = (melt_ptr_t) & cdat->dstr_1723__LIST_FIND; cdat->dstr_1723__LIST_FIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1723__LIST_FIND.val, "LIST_FIND", sizeof (cdat->dstr_1723__LIST_FIND.val) - 1); cdat->dstr_1723__LIST_FIND.val[9] = (char) 0; cdat->dstr_1723__LIST_FIND.slen = 9; /*iniobj dsym_1724__CLASS_ALTERNATE_MATCH_NREP_DATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V1895*/ meltfptr[1894]) /*_.VALDATA___V1895*/ meltfptr[1894] = (melt_ptr_t) & cdat->dsym_1724__CLASS_ALTERNATE_MATCH_NREP_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1724__CLASS_ALTERNATE_MATCH_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_1724__CLASS_ALTERNATE_MATCH_NREP_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1724__CLASS_ALTERNATE_MATCH_NREP_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1724__CLASS_ALTERNATE_MATCH_NREP_DATA.obj_hash = 686824503; cdat->dsym_1724__CLASS_ALTERNATE_MATCH_NREP_DATA.obj_len = 3; /*inistring dstr_1725__CLASS_ALTERNATE_*/ /*_.VALSTR___V1896*/ meltfptr[1895] = (melt_ptr_t) & cdat->dstr_1725__CLASS_ALTERNATE_; cdat->dstr_1725__CLASS_ALTERNATE_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1725__CLASS_ALTERNATE_.val, "CLASS_ALTERNATE_MATCH_NREP_DATA", sizeof (cdat->dstr_1725__CLASS_ALTERNATE_. val) - 1); cdat->dstr_1725__CLASS_ALTERNATE_.val[31] = (char) 0; cdat->dstr_1725__CLASS_ALTERNATE_.slen = 31; /*iniobj dsym_1726__CLASS_ROOT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1897*/ meltfptr[1896]) /*_.VALDATA___V1897*/ meltfptr[1896] = (melt_ptr_t) & cdat->dsym_1726__CLASS_ROOT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1726__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_1726__CLASS_ROOT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1726__CLASS_ROOT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1726__CLASS_ROOT.obj_hash = 60568825; cdat->dsym_1726__CLASS_ROOT.obj_len = 3; /*inistring dstr_1727__CLASS_ROOT*/ /*_.VALSTR___V1898*/ meltfptr[1897] = (melt_ptr_t) & cdat->dstr_1727__CLASS_ROOT; cdat->dstr_1727__CLASS_ROOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1727__CLASS_ROOT.val, "CLASS_ROOT", sizeof (cdat->dstr_1727__CLASS_ROOT.val) - 1); cdat->dstr_1727__CLASS_ROOT.val[10] = (char) 0; cdat->dstr_1727__CLASS_ROOT.slen = 10; MELT_LOCATION ("warmelt-genobj.melt:5908:/ iniobj"); /*iniobj dobj_1728__CLASS_ALTERNATE_MATCH_NREP_DATA*/ /*_.VALDATA___V1899*/ meltfptr[1898] = (melt_ptr_t) & cdat->dobj_1728__CLASS_ALTERNATE_MATCH_NREP_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1728__CLASS_ALTERNATE_MATCH_NREP_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_1728__CLASS_ALTERNATE_MATCH_NREP_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1728__CLASS_ALTERNATE_MATCH_NREP_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_1728__CLASS_ALTERNATE_MATCH_NREP_DATA.obj_num = MELTOBMAG_OBJECT; cdat->dobj_1728__CLASS_ALTERNATE_MATCH_NREP_DATA.obj_hash = 465697503; cdat->dobj_1728__CLASS_ALTERNATE_MATCH_NREP_DATA.obj_len = 8; /*inistring dstr_1729__CLASS_ALTERNATE_*/ /*_.VALSTR___V1900*/ meltfptr[1899] = (melt_ptr_t) & cdat->dstr_1729__CLASS_ALTERNATE_; cdat->dstr_1729__CLASS_ALTERNATE_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1729__CLASS_ALTERNATE_.val, "CLASS_ALTERNATE_MATCH_NREP_DATA", sizeof (cdat->dstr_1729__CLASS_ALTERNATE_. val) - 1); cdat->dstr_1729__CLASS_ALTERNATE_.val[31] = (char) 0; cdat->dstr_1729__CLASS_ALTERNATE_.slen = 31; /*inimult dtup_1730__CLASS_ALTERNATE_MATCH_NREP_DATA */ /*_.VALTUP___V1901*/ meltfptr[1900] = (melt_ptr_t) & cdat->dtup_1730__CLASS_ALTERNATE_MATCH_NREP_DATA; cdat->dtup_1730__CLASS_ALTERNATE_MATCH_NREP_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); cdat->dtup_1730__CLASS_ALTERNATE_MATCH_NREP_DATA.nbval = 1; /*inimult dtup_1731__CLASS_ALTERNATE_MATCH_NREP_DATA */ /*_.VALTUP___V1910*/ meltfptr[1909] = (melt_ptr_t) & cdat->dtup_1731__CLASS_ALTERNATE_MATCH_NREP_DATA; cdat->dtup_1731__CLASS_ALTERNATE_MATCH_NREP_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); cdat->dtup_1731__CLASS_ALTERNATE_MATCH_NREP_DATA.nbval = 4; /*iniobj dsym_1732__ALTMATCHN_PREV*/ /*uniqueobj*/ if (! /*_.VALDATA___V1911*/ meltfptr[1910]) /*_.VALDATA___V1911*/ meltfptr[1910] = (melt_ptr_t) & cdat->dsym_1732__ALTMATCHN_PREV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1732__ALTMATCHN_PREV", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1732__ALTMATCHN_PREV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1732__ALTMATCHN_PREV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1732__ALTMATCHN_PREV.obj_hash = 447972878; cdat->dsym_1732__ALTMATCHN_PREV.obj_len = 3; /*inistring dstr_1733__ALTMATCHN_PREV*/ /*_.VALSTR___V1912*/ meltfptr[1911] = (melt_ptr_t) & cdat->dstr_1733__ALTMATCHN_PREV; cdat->dstr_1733__ALTMATCHN_PREV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1733__ALTMATCHN_PREV.val, "ALTMATCHN_PREV", sizeof (cdat->dstr_1733__ALTMATCHN_PREV.val) - 1); cdat->dstr_1733__ALTMATCHN_PREV.val[14] = (char) 0; cdat->dstr_1733__ALTMATCHN_PREV.slen = 14; /*^iniobj */ /*iniobj dobj_1734__ALTMATCHN_PREV*/ /*_.VALDATA___V1902*/ meltfptr[1901] = (melt_ptr_t) & cdat->dobj_1734__ALTMATCHN_PREV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1734__ALTMATCHN_PREV", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1734__ALTMATCHN_PREV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1734__ALTMATCHN_PREV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1734__ALTMATCHN_PREV.obj_num = 0; cdat->dobj_1734__ALTMATCHN_PREV.obj_hash = 841717482; cdat->dobj_1734__ALTMATCHN_PREV.obj_len = 4; /*inistring dstr_1735__ALTMATCHN_PREV*/ /*_.VALSTR___V1903*/ meltfptr[1902] = (melt_ptr_t) & cdat->dstr_1735__ALTMATCHN_PREV; cdat->dstr_1735__ALTMATCHN_PREV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1735__ALTMATCHN_PREV.val, "ALTMATCHN_PREV", sizeof (cdat->dstr_1735__ALTMATCHN_PREV.val) - 1); cdat->dstr_1735__ALTMATCHN_PREV.val[14] = (char) 0; cdat->dstr_1735__ALTMATCHN_PREV.slen = 14; /*iniobj dsym_1736__ALTMATCHN_NREP*/ /*uniqueobj*/ if (! /*_.VALDATA___V1913*/ meltfptr[1912]) /*_.VALDATA___V1913*/ meltfptr[1912] = (melt_ptr_t) & cdat->dsym_1736__ALTMATCHN_NREP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1736__ALTMATCHN_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_1736__ALTMATCHN_NREP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1736__ALTMATCHN_NREP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1736__ALTMATCHN_NREP.obj_hash = 56498279; cdat->dsym_1736__ALTMATCHN_NREP.obj_len = 3; /*inistring dstr_1737__ALTMATCHN_NREP*/ /*_.VALSTR___V1914*/ meltfptr[1913] = (melt_ptr_t) & cdat->dstr_1737__ALTMATCHN_NREP; cdat->dstr_1737__ALTMATCHN_NREP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1737__ALTMATCHN_NREP.val, "ALTMATCHN_NREP", sizeof (cdat->dstr_1737__ALTMATCHN_NREP.val) - 1); cdat->dstr_1737__ALTMATCHN_NREP.val[14] = (char) 0; cdat->dstr_1737__ALTMATCHN_NREP.slen = 14; /*^iniobj */ /*iniobj dobj_1738__ALTMATCHN_NREP*/ /*_.VALDATA___V1904*/ meltfptr[1903] = (melt_ptr_t) & cdat->dobj_1738__ALTMATCHN_NREP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1738__ALTMATCHN_NREP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1738__ALTMATCHN_NREP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1738__ALTMATCHN_NREP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1738__ALTMATCHN_NREP.obj_num = 1; cdat->dobj_1738__ALTMATCHN_NREP.obj_hash = 263132263; cdat->dobj_1738__ALTMATCHN_NREP.obj_len = 4; /*inistring dstr_1739__ALTMATCHN_NREP*/ /*_.VALSTR___V1905*/ meltfptr[1904] = (melt_ptr_t) & cdat->dstr_1739__ALTMATCHN_NREP; cdat->dstr_1739__ALTMATCHN_NREP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1739__ALTMATCHN_NREP.val, "ALTMATCHN_NREP", sizeof (cdat->dstr_1739__ALTMATCHN_NREP.val) - 1); cdat->dstr_1739__ALTMATCHN_NREP.val[14] = (char) 0; cdat->dstr_1739__ALTMATCHN_NREP.slen = 14; /*iniobj dsym_1740__ALTMATCHN_FLAGMAP*/ /*uniqueobj*/ if (! /*_.VALDATA___V1915*/ meltfptr[1914]) /*_.VALDATA___V1915*/ meltfptr[1914] = (melt_ptr_t) & cdat->dsym_1740__ALTMATCHN_FLAGMAP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1740__ALTMATCHN_FLAGMAP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1740__ALTMATCHN_FLAGMAP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1740__ALTMATCHN_FLAGMAP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1740__ALTMATCHN_FLAGMAP.obj_hash = 799191449; cdat->dsym_1740__ALTMATCHN_FLAGMAP.obj_len = 3; /*inistring dstr_1741__ALTMATCHN_FLAGMA*/ /*_.VALSTR___V1916*/ meltfptr[1915] = (melt_ptr_t) & cdat->dstr_1741__ALTMATCHN_FLAGMA; cdat->dstr_1741__ALTMATCHN_FLAGMA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1741__ALTMATCHN_FLAGMA.val, "ALTMATCHN_FLAGMAP", sizeof (cdat->dstr_1741__ALTMATCHN_FLAGMA. val) - 1); cdat->dstr_1741__ALTMATCHN_FLAGMA.val[17] = (char) 0; cdat->dstr_1741__ALTMATCHN_FLAGMA.slen = 17; /*^iniobj */ /*iniobj dobj_1742__ALTMATCHN_FLAGMAP*/ /*_.VALDATA___V1906*/ meltfptr[1905] = (melt_ptr_t) & cdat->dobj_1742__ALTMATCHN_FLAGMAP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1742__ALTMATCHN_FLAGMAP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1742__ALTMATCHN_FLAGMAP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1742__ALTMATCHN_FLAGMAP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1742__ALTMATCHN_FLAGMAP.obj_num = 2; cdat->dobj_1742__ALTMATCHN_FLAGMAP.obj_hash = 1016411407; cdat->dobj_1742__ALTMATCHN_FLAGMAP.obj_len = 4; /*inistring dstr_1743__ALTMATCHN_FLAGMA*/ /*_.VALSTR___V1907*/ meltfptr[1906] = (melt_ptr_t) & cdat->dstr_1743__ALTMATCHN_FLAGMA; cdat->dstr_1743__ALTMATCHN_FLAGMA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1743__ALTMATCHN_FLAGMA.val, "ALTMATCHN_FLAGMAP", sizeof (cdat->dstr_1743__ALTMATCHN_FLAGMA. val) - 1); cdat->dstr_1743__ALTMATCHN_FLAGMA.val[17] = (char) 0; cdat->dstr_1743__ALTMATCHN_FLAGMA.slen = 17; /*iniobj dsym_1744__ALTMATCHN_DATAMAP*/ /*uniqueobj*/ if (! /*_.VALDATA___V1917*/ meltfptr[1916]) /*_.VALDATA___V1917*/ meltfptr[1916] = (melt_ptr_t) & cdat->dsym_1744__ALTMATCHN_DATAMAP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1744__ALTMATCHN_DATAMAP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1744__ALTMATCHN_DATAMAP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1744__ALTMATCHN_DATAMAP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1744__ALTMATCHN_DATAMAP.obj_hash = 579942759; cdat->dsym_1744__ALTMATCHN_DATAMAP.obj_len = 3; /*inistring dstr_1745__ALTMATCHN_DATAMA*/ /*_.VALSTR___V1918*/ meltfptr[1917] = (melt_ptr_t) & cdat->dstr_1745__ALTMATCHN_DATAMA; cdat->dstr_1745__ALTMATCHN_DATAMA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1745__ALTMATCHN_DATAMA.val, "ALTMATCHN_DATAMAP", sizeof (cdat->dstr_1745__ALTMATCHN_DATAMA. val) - 1); cdat->dstr_1745__ALTMATCHN_DATAMA.val[17] = (char) 0; cdat->dstr_1745__ALTMATCHN_DATAMA.slen = 17; /*^iniobj */ /*iniobj dobj_1746__ALTMATCHN_DATAMAP*/ /*_.VALDATA___V1908*/ meltfptr[1907] = (melt_ptr_t) & cdat->dobj_1746__ALTMATCHN_DATAMAP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_1746__ALTMATCHN_DATAMAP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dobj_1746__ALTMATCHN_DATAMAP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1746__ALTMATCHN_DATAMAP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1746__ALTMATCHN_DATAMAP.obj_num = 3; cdat->dobj_1746__ALTMATCHN_DATAMAP.obj_hash = 774107093; cdat->dobj_1746__ALTMATCHN_DATAMAP.obj_len = 4; /*inistring dstr_1747__ALTMATCHN_DATAMA*/ /*_.VALSTR___V1909*/ meltfptr[1908] = (melt_ptr_t) & cdat->dstr_1747__ALTMATCHN_DATAMA; cdat->dstr_1747__ALTMATCHN_DATAMA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1747__ALTMATCHN_DATAMA.val, "ALTMATCHN_DATAMAP", sizeof (cdat->dstr_1747__ALTMATCHN_DATAMA. val) - 1); cdat->dstr_1747__ALTMATCHN_DATAMA.val[17] = (char) 0; cdat->dstr_1747__ALTMATCHN_DATAMA.slen = 17; /*inirout drout_1748__COMPILOBJ_NREP_ALTMATCH */ /*_.VALROUT___V1919*/ meltfptr[1918] = (melt_ptr_t) & cdat->drout_1748__COMPILOBJ_NREP_ALTMATCH; cdat->drout_1748__COMPILOBJ_NREP_ALTMATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1748__COMPILOBJ_NREP_ALTMATCH.routdescr, "COMPILOBJ_NREP_ALTMATCH @warmelt-genobj.melt:5919", MELT_ROUTDESCR_LEN - 1); cdat->drout_1748__COMPILOBJ_NREP_ALTMATCH.nbval = 16; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1748__COMPILOBJ_NREP_ALTMATCH, meltrout_166_warmelt_genobj_COMPILOBJ_NREP_ALTMATCH); /*iniclos dclo_1749__COMPILOBJ_NREP_ALTMATCH */ /*_.VALCLO___V1921*/ meltfptr[1920] = (melt_ptr_t) & cdat->dclo_1749__COMPILOBJ_NREP_ALTMATCH; cdat->dclo_1749__COMPILOBJ_NREP_ALTMATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1749__COMPILOBJ_NREP_ALTMATCH.nbval = 0; /*iniobj dsym_1750__CLASS_NREP_ALTMATCH*/ /*uniqueobj*/ if (! /*_.VALDATA___V1922*/ meltfptr[1921]) /*_.VALDATA___V1922*/ meltfptr[1921] = (melt_ptr_t) & cdat->dsym_1750__CLASS_NREP_ALTMATCH; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1750__CLASS_NREP_ALTMATCH", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1750__CLASS_NREP_ALTMATCH", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1750__CLASS_NREP_ALTMATCH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1750__CLASS_NREP_ALTMATCH.obj_hash = 373164524; cdat->dsym_1750__CLASS_NREP_ALTMATCH.obj_len = 3; /*inistring dstr_1751__CLASS_NREP_ALTMA*/ /*_.VALSTR___V1923*/ meltfptr[1922] = (melt_ptr_t) & cdat->dstr_1751__CLASS_NREP_ALTMA; cdat->dstr_1751__CLASS_NREP_ALTMA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1751__CLASS_NREP_ALTMA.val, "CLASS_NREP_ALTMATCH", sizeof (cdat->dstr_1751__CLASS_NREP_ALTMA. val) - 1); cdat->dstr_1751__CLASS_NREP_ALTMA.val[19] = (char) 0; cdat->dstr_1751__CLASS_NREP_ALTMA.slen = 19; /*inirout drout_1752__LAMBDA_ */ /*_.VALROUT___V1920*/ meltfptr[1919] = (melt_ptr_t) & cdat->drout_1752__LAMBDA_; cdat->drout_1752__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1752__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:5962", MELT_ROUTDESCR_LEN - 1); cdat->drout_1752__LAMBDA_.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1752__LAMBDA_, meltrout_167_warmelt_genobj_LAMBDA___56__); /*inirout drout_1753__COMPILOBJ_NREP_MATCHLABEL */ /*_.VALROUT___V1924*/ meltfptr[1923] = (melt_ptr_t) & cdat->drout_1753__COMPILOBJ_NREP_MATCHLABEL; cdat->drout_1753__COMPILOBJ_NREP_MATCHLABEL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1753__COMPILOBJ_NREP_MATCHLABEL.routdescr, "COMPILOBJ_NREP_MATCHLABEL @warmelt-genobj.melt:5992", MELT_ROUTDESCR_LEN - 1); cdat->drout_1753__COMPILOBJ_NREP_MATCHLABEL.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1753__COMPILOBJ_NREP_MATCHLABEL, meltrout_168_warmelt_genobj_COMPILOBJ_NREP_MATCHLABEL); /*iniclos dclo_1754__COMPILOBJ_NREP_MATCHLABEL */ /*_.VALCLO___V1925*/ meltfptr[1924] = (melt_ptr_t) & cdat->dclo_1754__COMPILOBJ_NREP_MATCHLABEL; cdat->dclo_1754__COMPILOBJ_NREP_MATCHLABEL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1754__COMPILOBJ_NREP_MATCHLABEL.nbval = 0; /*iniobj dsym_1755__CLASS_NREP_MATCH_LABEL*/ /*uniqueobj*/ if (! /*_.VALDATA___V1926*/ meltfptr[1925]) /*_.VALDATA___V1926*/ meltfptr[1925] = (melt_ptr_t) & cdat->dsym_1755__CLASS_NREP_MATCH_LABEL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1755__CLASS_NREP_MATCH_LABEL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1755__CLASS_NREP_MATCH_LABEL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1755__CLASS_NREP_MATCH_LABEL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1755__CLASS_NREP_MATCH_LABEL.obj_hash = 870271698; cdat->dsym_1755__CLASS_NREP_MATCH_LABEL.obj_len = 3; /*inistring dstr_1756__CLASS_NREP_MATCH*/ /*_.VALSTR___V1927*/ meltfptr[1926] = (melt_ptr_t) & cdat->dstr_1756__CLASS_NREP_MATCH; cdat->dstr_1756__CLASS_NREP_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1756__CLASS_NREP_MATCH.val, "CLASS_NREP_MATCH_LABEL", sizeof (cdat->dstr_1756__CLASS_NREP_MATCH. val) - 1); cdat->dstr_1756__CLASS_NREP_MATCH.val[22] = (char) 0; cdat->dstr_1756__CLASS_NREP_MATCH.slen = 22; /*iniobj dsym_1757__CLASS_MATCH_STEP_WITH_DATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V1928*/ meltfptr[1927]) /*_.VALDATA___V1928*/ meltfptr[1927] = (melt_ptr_t) & cdat->dsym_1757__CLASS_MATCH_STEP_WITH_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1757__CLASS_MATCH_STEP_WITH_DATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1757__CLASS_MATCH_STEP_WITH_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1757__CLASS_MATCH_STEP_WITH_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1757__CLASS_MATCH_STEP_WITH_DATA.obj_hash = 750906757; cdat->dsym_1757__CLASS_MATCH_STEP_WITH_DATA.obj_len = 3; /*inistring dstr_1758__CLASS_MATCH_STEP*/ /*_.VALSTR___V1929*/ meltfptr[1928] = (melt_ptr_t) & cdat->dstr_1758__CLASS_MATCH_STEP; cdat->dstr_1758__CLASS_MATCH_STEP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1758__CLASS_MATCH_STEP.val, "CLASS_MATCH_STEP_WITH_DATA", sizeof (cdat->dstr_1758__CLASS_MATCH_STEP. val) - 1); cdat->dstr_1758__CLASS_MATCH_STEP.val[26] = (char) 0; cdat->dstr_1758__CLASS_MATCH_STEP.slen = 26; /*inirout drout_1759__COMPILOBJ_NREP_MATCHFLAG */ /*_.VALROUT___V1930*/ meltfptr[1929] = (melt_ptr_t) & cdat->drout_1759__COMPILOBJ_NREP_MATCHFLAG; cdat->drout_1759__COMPILOBJ_NREP_MATCHFLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1759__COMPILOBJ_NREP_MATCHFLAG.routdescr, "COMPILOBJ_NREP_MATCHFLAG @warmelt-genobj.melt:6019", MELT_ROUTDESCR_LEN - 1); cdat->drout_1759__COMPILOBJ_NREP_MATCHFLAG.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1759__COMPILOBJ_NREP_MATCHFLAG, meltrout_169_warmelt_genobj_COMPILOBJ_NREP_MATCHFLAG); /*iniclos dclo_1760__COMPILOBJ_NREP_MATCHFLAG */ /*_.VALCLO___V1931*/ meltfptr[1930] = (melt_ptr_t) & cdat->dclo_1760__COMPILOBJ_NREP_MATCHFLAG; cdat->dclo_1760__COMPILOBJ_NREP_MATCHFLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1760__COMPILOBJ_NREP_MATCHFLAG.nbval = 0; /*iniobj dsym_1761__CLASS_NREP_MATCH_FLAG*/ /*uniqueobj*/ if (! /*_.VALDATA___V1932*/ meltfptr[1931]) /*_.VALDATA___V1932*/ meltfptr[1931] = (melt_ptr_t) & cdat->dsym_1761__CLASS_NREP_MATCH_FLAG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1761__CLASS_NREP_MATCH_FLAG", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1761__CLASS_NREP_MATCH_FLAG", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1761__CLASS_NREP_MATCH_FLAG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1761__CLASS_NREP_MATCH_FLAG.obj_hash = 479563009; cdat->dsym_1761__CLASS_NREP_MATCH_FLAG.obj_len = 3; /*inistring dstr_1762__CLASS_NREP_MATCH*/ /*_.VALSTR___V1933*/ meltfptr[1932] = (melt_ptr_t) & cdat->dstr_1762__CLASS_NREP_MATCH; cdat->dstr_1762__CLASS_NREP_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1762__CLASS_NREP_MATCH.val, "CLASS_NREP_MATCH_FLAG", sizeof (cdat->dstr_1762__CLASS_NREP_MATCH. val) - 1); cdat->dstr_1762__CLASS_NREP_MATCH.val[21] = (char) 0; cdat->dstr_1762__CLASS_NREP_MATCH.slen = 21; /*iniobj dsym_1763__CLASS_MATCH_FLAG*/ /*uniqueobj*/ if (! /*_.VALDATA___V1934*/ meltfptr[1933]) /*_.VALDATA___V1934*/ meltfptr[1933] = (melt_ptr_t) & cdat->dsym_1763__CLASS_MATCH_FLAG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1763__CLASS_MATCH_FLAG", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1763__CLASS_MATCH_FLAG", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1763__CLASS_MATCH_FLAG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1763__CLASS_MATCH_FLAG.obj_hash = 1656306; cdat->dsym_1763__CLASS_MATCH_FLAG.obj_len = 3; /*inistring dstr_1764__CLASS_MATCH_FLAG*/ /*_.VALSTR___V1935*/ meltfptr[1934] = (melt_ptr_t) & cdat->dstr_1764__CLASS_MATCH_FLAG; cdat->dstr_1764__CLASS_MATCH_FLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1764__CLASS_MATCH_FLAG.val, "CLASS_MATCH_FLAG", sizeof (cdat->dstr_1764__CLASS_MATCH_FLAG. val) - 1); cdat->dstr_1764__CLASS_MATCH_FLAG.val[16] = (char) 0; cdat->dstr_1764__CLASS_MATCH_FLAG.slen = 16; /*inirout drout_1765__COMPILOBJ_NREP_MATCHDATAINIT */ /*_.VALROUT___V1936*/ meltfptr[1935] = (melt_ptr_t) & cdat->drout_1765__COMPILOBJ_NREP_MATCHDATAINIT; cdat->drout_1765__COMPILOBJ_NREP_MATCHDATAINIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1765__COMPILOBJ_NREP_MATCHDATAINIT.routdescr, "COMPILOBJ_NREP_MATCHDATAINIT @warmelt-genobj.melt:6052", MELT_ROUTDESCR_LEN - 1); cdat->drout_1765__COMPILOBJ_NREP_MATCHDATAINIT.nbval = 11; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1765__COMPILOBJ_NREP_MATCHDATAINIT, meltrout_170_warmelt_genobj_COMPILOBJ_NREP_MATCHDATAINIT); /*iniclos dclo_1766__COMPILOBJ_NREP_MATCHDATAINIT */ /*_.VALCLO___V1939*/ meltfptr[1938] = (melt_ptr_t) & cdat->dclo_1766__COMPILOBJ_NREP_MATCHDATAINIT; cdat->dclo_1766__COMPILOBJ_NREP_MATCHDATAINIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1766__COMPILOBJ_NREP_MATCHDATAINIT.nbval = 0; /*iniobj dsym_1767__CLASS_NREP_MATCH_DATA_INITIALIZER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1940*/ meltfptr[1939]) /*_.VALDATA___V1940*/ meltfptr[1939] = (melt_ptr_t) & cdat->dsym_1767__CLASS_NREP_MATCH_DATA_INITIALIZER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1767__CLASS_NREP_MATCH_DATA_INITIALIZER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1767__CLASS_NREP_MATCH_DATA_INITIALIZER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1767__CLASS_NREP_MATCH_DATA_INITIALIZER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1767__CLASS_NREP_MATCH_DATA_INITIALIZER.obj_hash = 853828553; cdat->dsym_1767__CLASS_NREP_MATCH_DATA_INITIALIZER.obj_len = 3; /*inistring dstr_1768__CLASS_NREP_MATCH*/ /*_.VALSTR___V1941*/ meltfptr[1940] = (melt_ptr_t) & cdat->dstr_1768__CLASS_NREP_MATCH; cdat->dstr_1768__CLASS_NREP_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1768__CLASS_NREP_MATCH.val, "CLASS_NREP_MATCH_DATA_INITIALIZER", sizeof (cdat->dstr_1768__CLASS_NREP_MATCH. val) - 1); cdat->dstr_1768__CLASS_NREP_MATCH.val[33] = (char) 0; cdat->dstr_1768__CLASS_NREP_MATCH.slen = 33; /*iniobj dsym_1769__CLASS_NREP_MATCH_DATA_ACTION*/ /*uniqueobj*/ if (! /*_.VALDATA___V1942*/ meltfptr[1941]) /*_.VALDATA___V1942*/ meltfptr[1941] = (melt_ptr_t) & cdat->dsym_1769__CLASS_NREP_MATCH_DATA_ACTION; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1769__CLASS_NREP_MATCH_DATA_ACTION", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1769__CLASS_NREP_MATCH_DATA_ACTION", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1769__CLASS_NREP_MATCH_DATA_ACTION.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1769__CLASS_NREP_MATCH_DATA_ACTION.obj_hash = 238202196; cdat->dsym_1769__CLASS_NREP_MATCH_DATA_ACTION.obj_len = 3; /*inistring dstr_1770__CLASS_NREP_MATCH*/ /*_.VALSTR___V1943*/ meltfptr[1942] = (melt_ptr_t) & cdat->dstr_1770__CLASS_NREP_MATCH; cdat->dstr_1770__CLASS_NREP_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1770__CLASS_NREP_MATCH.val, "CLASS_NREP_MATCH_DATA_ACTION", sizeof (cdat->dstr_1770__CLASS_NREP_MATCH. val) - 1); cdat->dstr_1770__CLASS_NREP_MATCH.val[28] = (char) 0; cdat->dstr_1770__CLASS_NREP_MATCH.slen = 28; /*iniobj dsym_1771__CLASS_NREP_MATCHED_DATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V1944*/ meltfptr[1943]) /*_.VALDATA___V1944*/ meltfptr[1943] = (melt_ptr_t) & cdat->dsym_1771__CLASS_NREP_MATCHED_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1771__CLASS_NREP_MATCHED_DATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1771__CLASS_NREP_MATCHED_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1771__CLASS_NREP_MATCHED_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1771__CLASS_NREP_MATCHED_DATA.obj_hash = 180965645; cdat->dsym_1771__CLASS_NREP_MATCHED_DATA.obj_len = 3; /*inistring dstr_1772__CLASS_NREP_MATCH*/ /*_.VALSTR___V1945*/ meltfptr[1944] = (melt_ptr_t) & cdat->dstr_1772__CLASS_NREP_MATCH; cdat->dstr_1772__CLASS_NREP_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1772__CLASS_NREP_MATCH.val, "CLASS_NREP_MATCHED_DATA", sizeof (cdat->dstr_1772__CLASS_NREP_MATCH. val) - 1); cdat->dstr_1772__CLASS_NREP_MATCH.val[23] = (char) 0; cdat->dstr_1772__CLASS_NREP_MATCH.slen = 23; /*iniobj dsym_1773__CLONE_SYMBOL*/ /*uniqueobj*/ if (! /*_.VALDATA___V1946*/ meltfptr[1945]) /*_.VALDATA___V1946*/ meltfptr[1945] = (melt_ptr_t) & cdat->dsym_1773__CLONE_SYMBOL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1773__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_1773__CLONE_SYMBOL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1773__CLONE_SYMBOL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1773__CLONE_SYMBOL.obj_hash = 213258240; cdat->dsym_1773__CLONE_SYMBOL.obj_len = 3; /*inistring dstr_1774__CLONE_SYMBOL*/ /*_.VALSTR___V1947*/ meltfptr[1946] = (melt_ptr_t) & cdat->dstr_1774__CLONE_SYMBOL; cdat->dstr_1774__CLONE_SYMBOL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1774__CLONE_SYMBOL.val, "CLONE_SYMBOL", sizeof (cdat->dstr_1774__CLONE_SYMBOL.val) - 1); cdat->dstr_1774__CLONE_SYMBOL.val[12] = (char) 0; cdat->dstr_1774__CLONE_SYMBOL.slen = 12; /*iniobj dsym_1775__MATCHDATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V1937*/ meltfptr[1936]) /*_.VALDATA___V1937*/ meltfptr[1936] = (melt_ptr_t) & cdat->dsym_1775__MATCHDATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1775__MATCHDATA", melt_magic_discr ((melt_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__MATCHDATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1775__MATCHDATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1775__MATCHDATA.obj_hash = 216883424; cdat->dsym_1775__MATCHDATA.obj_len = 3; /*inistring dstr_1776__MATCHDATA*/ /*_.VALSTR___V1938*/ meltfptr[1937] = (melt_ptr_t) & cdat->dstr_1776__MATCHDATA; cdat->dstr_1776__MATCHDATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1776__MATCHDATA.val, "MATCHDATA", sizeof (cdat->dstr_1776__MATCHDATA.val) - 1); cdat->dstr_1776__MATCHDATA.val[9] = (char) 0; cdat->dstr_1776__MATCHDATA.slen = 9; /*iniobj dsym_1777__CLASS_MATCHED_DATA*/ /*uniqueobj*/ if (! /*_.VALDATA___V1948*/ meltfptr[1947]) /*_.VALDATA___V1948*/ meltfptr[1947] = (melt_ptr_t) & cdat->dsym_1777__CLASS_MATCHED_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1777__CLASS_MATCHED_DATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1777__CLASS_MATCHED_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1777__CLASS_MATCHED_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1777__CLASS_MATCHED_DATA.obj_hash = 1016753218; cdat->dsym_1777__CLASS_MATCHED_DATA.obj_len = 3; /*inistring dstr_1778__CLASS_MATCHED_DA*/ /*_.VALSTR___V1949*/ meltfptr[1948] = (melt_ptr_t) & cdat->dstr_1778__CLASS_MATCHED_DA; cdat->dstr_1778__CLASS_MATCHED_DA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1778__CLASS_MATCHED_DA.val, "CLASS_MATCHED_DATA", sizeof (cdat->dstr_1778__CLASS_MATCHED_DA. val) - 1); cdat->dstr_1778__CLASS_MATCHED_DA.val[18] = (char) 0; cdat->dstr_1778__CLASS_MATCHED_DA.slen = 18; /*inirout drout_1779__COMPILOBJ_NREP_MATCHEDATA */ /*_.VALROUT___V1950*/ meltfptr[1949] = (melt_ptr_t) & cdat->drout_1779__COMPILOBJ_NREP_MATCHEDATA; cdat->drout_1779__COMPILOBJ_NREP_MATCHEDATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1779__COMPILOBJ_NREP_MATCHEDATA.routdescr, "COMPILOBJ_NREP_MATCHEDATA @warmelt-genobj.melt:6093", MELT_ROUTDESCR_LEN - 1); cdat->drout_1779__COMPILOBJ_NREP_MATCHEDATA.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1779__COMPILOBJ_NREP_MATCHEDATA, meltrout_171_warmelt_genobj_COMPILOBJ_NREP_MATCHEDATA); /*iniclos dclo_1780__COMPILOBJ_NREP_MATCHEDATA */ /*_.VALCLO___V1951*/ meltfptr[1950] = (melt_ptr_t) & cdat->dclo_1780__COMPILOBJ_NREP_MATCHEDATA; cdat->dclo_1780__COMPILOBJ_NREP_MATCHEDATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1780__COMPILOBJ_NREP_MATCHEDATA.nbval = 0; /*inirout drout_1781__COMPILOBJ_NREP_MATCHJUMP */ /*_.VALROUT___V1952*/ meltfptr[1951] = (melt_ptr_t) & cdat->drout_1781__COMPILOBJ_NREP_MATCHJUMP; cdat->drout_1781__COMPILOBJ_NREP_MATCHJUMP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1781__COMPILOBJ_NREP_MATCHJUMP.routdescr, "COMPILOBJ_NREP_MATCHJUMP @warmelt-genobj.melt:6119", MELT_ROUTDESCR_LEN - 1); cdat->drout_1781__COMPILOBJ_NREP_MATCHJUMP.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1781__COMPILOBJ_NREP_MATCHJUMP, meltrout_172_warmelt_genobj_COMPILOBJ_NREP_MATCHJUMP); /*iniclos dclo_1782__COMPILOBJ_NREP_MATCHJUMP */ /*_.VALCLO___V1953*/ meltfptr[1952] = (melt_ptr_t) & cdat->dclo_1782__COMPILOBJ_NREP_MATCHJUMP; cdat->dclo_1782__COMPILOBJ_NREP_MATCHJUMP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1782__COMPILOBJ_NREP_MATCHJUMP.nbval = 0; /*iniobj dsym_1783__CLASS_NREP_MATCH_JUMP*/ /*uniqueobj*/ if (! /*_.VALDATA___V1954*/ meltfptr[1953]) /*_.VALDATA___V1954*/ meltfptr[1953] = (melt_ptr_t) & cdat->dsym_1783__CLASS_NREP_MATCH_JUMP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1783__CLASS_NREP_MATCH_JUMP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1783__CLASS_NREP_MATCH_JUMP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1783__CLASS_NREP_MATCH_JUMP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1783__CLASS_NREP_MATCH_JUMP.obj_hash = 677633544; cdat->dsym_1783__CLASS_NREP_MATCH_JUMP.obj_len = 3; /*inistring dstr_1784__CLASS_NREP_MATCH*/ /*_.VALSTR___V1955*/ meltfptr[1954] = (melt_ptr_t) & cdat->dstr_1784__CLASS_NREP_MATCH; cdat->dstr_1784__CLASS_NREP_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1784__CLASS_NREP_MATCH.val, "CLASS_NREP_MATCH_JUMP", sizeof (cdat->dstr_1784__CLASS_NREP_MATCH. val) - 1); cdat->dstr_1784__CLASS_NREP_MATCH.val[21] = (char) 0; cdat->dstr_1784__CLASS_NREP_MATCH.slen = 21; /*inirout drout_1785__NORMTESTER_LABELINSTR */ /*_.VALROUT___V1882*/ meltfptr[1881] = (melt_ptr_t) & cdat->drout_1785__NORMTESTER_LABELINSTR; cdat->drout_1785__NORMTESTER_LABELINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1785__NORMTESTER_LABELINSTR.routdescr, "NORMTESTER_LABELINSTR @warmelt-genobj.melt:6148", MELT_ROUTDESCR_LEN - 1); cdat->drout_1785__NORMTESTER_LABELINSTR.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1785__NORMTESTER_LABELINSTR, meltrout_173_warmelt_genobj_NORMTESTER_LABELINSTR); /*iniclos dclo_1786__NORMTESTER_LABELINSTR */ /*_.VALCLO___V1881*/ meltfptr[1880] = (melt_ptr_t) & cdat->dclo_1786__NORMTESTER_LABELINSTR; cdat->dclo_1786__NORMTESTER_LABELINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1786__NORMTESTER_LABELINSTR.nbval = 0; /*inirout drout_1787__NORMTESTER_GOTOINSTR */ /*_.VALROUT___V1956*/ meltfptr[1955] = (melt_ptr_t) & cdat->drout_1787__NORMTESTER_GOTOINSTR; cdat->drout_1787__NORMTESTER_GOTOINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1787__NORMTESTER_GOTOINSTR.routdescr, "NORMTESTER_GOTOINSTR @warmelt-genobj.melt:6180", MELT_ROUTDESCR_LEN - 1); cdat->drout_1787__NORMTESTER_GOTOINSTR.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1787__NORMTESTER_GOTOINSTR, meltrout_174_warmelt_genobj_NORMTESTER_GOTOINSTR); /*iniclos dclo_1788__NORMTESTER_GOTOINSTR */ /*_.VALCLO___V1957*/ meltfptr[1956] = (melt_ptr_t) & cdat->dclo_1788__NORMTESTER_GOTOINSTR; cdat->dclo_1788__NORMTESTER_GOTOINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1788__NORMTESTER_GOTOINSTR.nbval = 0; /*inirout drout_1789__ENDMATCH_GOTOINSTR */ /*_.VALROUT___V1958*/ meltfptr[1957] = (melt_ptr_t) & cdat->drout_1789__ENDMATCH_GOTOINSTR; cdat->drout_1789__ENDMATCH_GOTOINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1789__ENDMATCH_GOTOINSTR.routdescr, "ENDMATCH_GOTOINSTR @warmelt-genobj.melt:6213", MELT_ROUTDESCR_LEN - 1); cdat->drout_1789__ENDMATCH_GOTOINSTR.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1789__ENDMATCH_GOTOINSTR, meltrout_175_warmelt_genobj_ENDMATCH_GOTOINSTR); /*iniclos dclo_1790__ENDMATCH_GOTOINSTR */ /*_.VALCLO___V1959*/ meltfptr[1958] = (melt_ptr_t) & cdat->dclo_1790__ENDMATCH_GOTOINSTR; cdat->dclo_1790__ENDMATCH_GOTOINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1790__ENDMATCH_GOTOINSTR.nbval = 0; /*inirout drout_1791__TESTMATCH_GOTOINSTR */ /*_.VALROUT___V1960*/ meltfptr[1959] = (melt_ptr_t) & cdat->drout_1791__TESTMATCH_GOTOINSTR; cdat->drout_1791__TESTMATCH_GOTOINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1791__TESTMATCH_GOTOINSTR.routdescr, "TESTMATCH_GOTOINSTR @warmelt-genobj.melt:6237", MELT_ROUTDESCR_LEN - 1); cdat->drout_1791__TESTMATCH_GOTOINSTR.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1791__TESTMATCH_GOTOINSTR, meltrout_176_warmelt_genobj_TESTMATCH_GOTOINSTR); /*iniclos dclo_1792__TESTMATCH_GOTOINSTR */ /*_.VALCLO___V1961*/ meltfptr[1960] = (melt_ptr_t) & cdat->dclo_1792__TESTMATCH_GOTOINSTR; cdat->dclo_1792__TESTMATCH_GOTOINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1792__TESTMATCH_GOTOINSTR.nbval = 0; /*inirout drout_1793__NORMTESTER_FREE_OBJLOC_LIST */ /*_.VALROUT___V1962*/ meltfptr[1961] = (melt_ptr_t) & cdat->drout_1793__NORMTESTER_FREE_OBJLOC_LIST; cdat->drout_1793__NORMTESTER_FREE_OBJLOC_LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1793__NORMTESTER_FREE_OBJLOC_LIST.routdescr, "NORMTESTER_FREE_OBJLOC_LIST @warmelt-genobj.melt:6263", MELT_ROUTDESCR_LEN - 1); cdat->drout_1793__NORMTESTER_FREE_OBJLOC_LIST.nbval = 10; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1793__NORMTESTER_FREE_OBJLOC_LIST, meltrout_177_warmelt_genobj_NORMTESTER_FREE_OBJLOC_LIST); /*iniclos dclo_1794__NORMTESTER_FREE_OBJLOC_LIST */ /*_.VALCLO___V1964*/ meltfptr[1963] = (melt_ptr_t) & cdat->dclo_1794__NORMTESTER_FREE_OBJLOC_LIST; cdat->dclo_1794__NORMTESTER_FREE_OBJLOC_LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1794__NORMTESTER_FREE_OBJLOC_LIST.nbval = 0; /*inirout drout_1795__LAMBDA_ */ /*_.VALROUT___V1963*/ meltfptr[1962] = (melt_ptr_t) & cdat->drout_1795__LAMBDA_; cdat->drout_1795__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1795__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:6277", MELT_ROUTDESCR_LEN - 1); cdat->drout_1795__LAMBDA_.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1795__LAMBDA_, meltrout_178_warmelt_genobj_LAMBDA___57__); /*inirout drout_1796__COMPILTST_NORMTESTER_ANY */ /*_.VALROUT___V1965*/ meltfptr[1964] = (melt_ptr_t) & cdat->drout_1796__COMPILTST_NORMTESTER_ANY; cdat->drout_1796__COMPILTST_NORMTESTER_ANY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1796__COMPILTST_NORMTESTER_ANY.routdescr, "COMPILTST_NORMTESTER_ANY @warmelt-genobj.melt:6295", MELT_ROUTDESCR_LEN - 1); cdat->drout_1796__COMPILTST_NORMTESTER_ANY.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1796__COMPILTST_NORMTESTER_ANY, meltrout_179_warmelt_genobj_COMPILTST_NORMTESTER_ANY); /*iniclos dclo_1797__COMPILTST_NORMTESTER_ANY */ /*_.VALCLO___V1966*/ meltfptr[1965] = (melt_ptr_t) & cdat->dclo_1797__COMPILTST_NORMTESTER_ANY; cdat->dclo_1797__COMPILTST_NORMTESTER_ANY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1797__COMPILTST_NORMTESTER_ANY.nbval = 0; /*inirout drout_1798__COMPILTST_NORMTESTER_MATCHER */ /*_.VALROUT___V1967*/ meltfptr[1966] = (melt_ptr_t) & cdat->drout_1798__COMPILTST_NORMTESTER_MATCHER; cdat->drout_1798__COMPILTST_NORMTESTER_MATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1798__COMPILTST_NORMTESTER_MATCHER.routdescr, "COMPILTST_NORMTESTER_MATCHER @warmelt-genobj.melt:6307", MELT_ROUTDESCR_LEN - 1); cdat->drout_1798__COMPILTST_NORMTESTER_MATCHER.nbval = 14; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1798__COMPILTST_NORMTESTER_MATCHER, meltrout_180_warmelt_genobj_COMPILTST_NORMTESTER_MATCHER); /*iniclos dclo_1799__COMPILTST_NORMTESTER_MATCHER */ /*_.VALCLO___V1968*/ meltfptr[1967] = (melt_ptr_t) & cdat->dclo_1799__COMPILTST_NORMTESTER_MATCHER; cdat->dclo_1799__COMPILTST_NORMTESTER_MATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1799__COMPILTST_NORMTESTER_MATCHER.nbval = 0; /*iniobj dsym_1800__CLASS_NORMTESTER_MATCHER*/ /*uniqueobj*/ if (! /*_.VALDATA___V1969*/ meltfptr[1968]) /*_.VALDATA___V1969*/ meltfptr[1968] = (melt_ptr_t) & cdat->dsym_1800__CLASS_NORMTESTER_MATCHER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1800__CLASS_NORMTESTER_MATCHER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1800__CLASS_NORMTESTER_MATCHER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1800__CLASS_NORMTESTER_MATCHER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1800__CLASS_NORMTESTER_MATCHER.obj_hash = 274164991; cdat->dsym_1800__CLASS_NORMTESTER_MATCHER.obj_len = 3; /*inistring dstr_1801__CLASS_NORMTESTER*/ /*_.VALSTR___V1970*/ meltfptr[1969] = (melt_ptr_t) & cdat->dstr_1801__CLASS_NORMTESTER; cdat->dstr_1801__CLASS_NORMTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1801__CLASS_NORMTESTER.val, "CLASS_NORMTESTER_MATCHER", sizeof (cdat->dstr_1801__CLASS_NORMTESTER. val) - 1); cdat->dstr_1801__CLASS_NORMTESTER.val[24] = (char) 0; cdat->dstr_1801__CLASS_NORMTESTER.slen = 24; /*inirout drout_1802__COMPILTST_NORMTESTER_INSTANCE */ /*_.VALROUT___V1971*/ meltfptr[1970] = (melt_ptr_t) & cdat->drout_1802__COMPILTST_NORMTESTER_INSTANCE; cdat->drout_1802__COMPILTST_NORMTESTER_INSTANCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1802__COMPILTST_NORMTESTER_INSTANCE.routdescr, "COMPILTST_NORMTESTER_INSTANCE @warmelt-genobj.melt:6380", MELT_ROUTDESCR_LEN - 1); cdat->drout_1802__COMPILTST_NORMTESTER_INSTANCE.nbval = 19; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1802__COMPILTST_NORMTESTER_INSTANCE, meltrout_181_warmelt_genobj_COMPILTST_NORMTESTER_INSTANCE); /*iniclos dclo_1803__COMPILTST_NORMTESTER_INSTANCE */ /*_.VALCLO___V1972*/ meltfptr[1971] = (melt_ptr_t) & cdat->dclo_1803__COMPILTST_NORMTESTER_INSTANCE; cdat->dclo_1803__COMPILTST_NORMTESTER_INSTANCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1803__COMPILTST_NORMTESTER_INSTANCE.nbval = 0; /*iniobj dsym_1804__CLASS_NORMTESTER_INSTANCE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1973*/ meltfptr[1972]) /*_.VALDATA___V1973*/ meltfptr[1972] = (melt_ptr_t) & cdat->dsym_1804__CLASS_NORMTESTER_INSTANCE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1804__CLASS_NORMTESTER_INSTANCE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1804__CLASS_NORMTESTER_INSTANCE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1804__CLASS_NORMTESTER_INSTANCE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1804__CLASS_NORMTESTER_INSTANCE.obj_hash = 927841366; cdat->dsym_1804__CLASS_NORMTESTER_INSTANCE.obj_len = 3; /*inistring dstr_1805__CLASS_NORMTESTER*/ /*_.VALSTR___V1974*/ meltfptr[1973] = (melt_ptr_t) & cdat->dstr_1805__CLASS_NORMTESTER; cdat->dstr_1805__CLASS_NORMTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1805__CLASS_NORMTESTER.val, "CLASS_NORMTESTER_INSTANCE", sizeof (cdat->dstr_1805__CLASS_NORMTESTER. val) - 1); cdat->dstr_1805__CLASS_NORMTESTER.val[25] = (char) 0; cdat->dstr_1805__CLASS_NORMTESTER.slen = 25; /*inirout drout_1806__COMPILTST_NORMTESTER_TUPLE */ /*_.VALROUT___V1975*/ meltfptr[1974] = (melt_ptr_t) & cdat->drout_1806__COMPILTST_NORMTESTER_TUPLE; cdat->drout_1806__COMPILTST_NORMTESTER_TUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1806__COMPILTST_NORMTESTER_TUPLE.routdescr, "COMPILTST_NORMTESTER_TUPLE @warmelt-genobj.melt:6480", MELT_ROUTDESCR_LEN - 1); cdat->drout_1806__COMPILTST_NORMTESTER_TUPLE.nbval = 20; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1806__COMPILTST_NORMTESTER_TUPLE, meltrout_182_warmelt_genobj_COMPILTST_NORMTESTER_TUPLE); /*iniclos dclo_1807__COMPILTST_NORMTESTER_TUPLE */ /*_.VALCLO___V1976*/ meltfptr[1975] = (melt_ptr_t) & cdat->dclo_1807__COMPILTST_NORMTESTER_TUPLE; cdat->dclo_1807__COMPILTST_NORMTESTER_TUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1807__COMPILTST_NORMTESTER_TUPLE.nbval = 0; /*iniobj dsym_1808__CLASS_NORMTESTER_TUPLE*/ /*uniqueobj*/ if (! /*_.VALDATA___V1977*/ meltfptr[1976]) /*_.VALDATA___V1977*/ meltfptr[1976] = (melt_ptr_t) & cdat->dsym_1808__CLASS_NORMTESTER_TUPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1808__CLASS_NORMTESTER_TUPLE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1808__CLASS_NORMTESTER_TUPLE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1808__CLASS_NORMTESTER_TUPLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1808__CLASS_NORMTESTER_TUPLE.obj_hash = 138981626; cdat->dsym_1808__CLASS_NORMTESTER_TUPLE.obj_len = 3; /*inistring dstr_1809__CLASS_NORMTESTER*/ /*_.VALSTR___V1978*/ meltfptr[1977] = (melt_ptr_t) & cdat->dstr_1809__CLASS_NORMTESTER; cdat->dstr_1809__CLASS_NORMTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1809__CLASS_NORMTESTER.val, "CLASS_NORMTESTER_TUPLE", sizeof (cdat->dstr_1809__CLASS_NORMTESTER. val) - 1); cdat->dstr_1809__CLASS_NORMTESTER.val[22] = (char) 0; cdat->dstr_1809__CLASS_NORMTESTER.slen = 22; /*inirout drout_1810__COMPILTST_NORMTESTER_SAME */ /*_.VALROUT___V1979*/ meltfptr[1978] = (melt_ptr_t) & cdat->drout_1810__COMPILTST_NORMTESTER_SAME; cdat->drout_1810__COMPILTST_NORMTESTER_SAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1810__COMPILTST_NORMTESTER_SAME.routdescr, "COMPILTST_NORMTESTER_SAME @warmelt-genobj.melt:6579", MELT_ROUTDESCR_LEN - 1); cdat->drout_1810__COMPILTST_NORMTESTER_SAME.nbval = 15; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1810__COMPILTST_NORMTESTER_SAME, meltrout_183_warmelt_genobj_COMPILTST_NORMTESTER_SAME); /*iniclos dclo_1811__COMPILTST_NORMTESTER_SAME */ /*_.VALCLO___V1980*/ meltfptr[1979] = (melt_ptr_t) & cdat->dclo_1811__COMPILTST_NORMTESTER_SAME; cdat->dclo_1811__COMPILTST_NORMTESTER_SAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1811__COMPILTST_NORMTESTER_SAME.nbval = 0; /*iniobj dsym_1812__CLASS_NORMTESTER_SAME*/ /*uniqueobj*/ if (! /*_.VALDATA___V1981*/ meltfptr[1980]) /*_.VALDATA___V1981*/ meltfptr[1980] = (melt_ptr_t) & cdat->dsym_1812__CLASS_NORMTESTER_SAME; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1812__CLASS_NORMTESTER_SAME", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1812__CLASS_NORMTESTER_SAME", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1812__CLASS_NORMTESTER_SAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1812__CLASS_NORMTESTER_SAME.obj_hash = 327155773; cdat->dsym_1812__CLASS_NORMTESTER_SAME.obj_len = 3; /*inistring dstr_1813__CLASS_NORMTESTER*/ /*_.VALSTR___V1982*/ meltfptr[1981] = (melt_ptr_t) & cdat->dstr_1813__CLASS_NORMTESTER; cdat->dstr_1813__CLASS_NORMTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1813__CLASS_NORMTESTER.val, "CLASS_NORMTESTER_SAME", sizeof (cdat->dstr_1813__CLASS_NORMTESTER. val) - 1); cdat->dstr_1813__CLASS_NORMTESTER.val[21] = (char) 0; cdat->dstr_1813__CLASS_NORMTESTER.slen = 21; /*inirout drout_1814__COMPILTST_NORMTESTER_SUCCESS */ /*_.VALROUT___V1983*/ meltfptr[1982] = (melt_ptr_t) & cdat->drout_1814__COMPILTST_NORMTESTER_SUCCESS; cdat->drout_1814__COMPILTST_NORMTESTER_SUCCESS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1814__COMPILTST_NORMTESTER_SUCCESS.routdescr, "COMPILTST_NORMTESTER_SUCCESS @warmelt-genobj.melt:6647", MELT_ROUTDESCR_LEN - 1); cdat->drout_1814__COMPILTST_NORMTESTER_SUCCESS.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1814__COMPILTST_NORMTESTER_SUCCESS, meltrout_184_warmelt_genobj_COMPILTST_NORMTESTER_SUCCESS); /*iniclos dclo_1815__COMPILTST_NORMTESTER_SUCCESS */ /*_.VALCLO___V1984*/ meltfptr[1983] = (melt_ptr_t) & cdat->dclo_1815__COMPILTST_NORMTESTER_SUCCESS; cdat->dclo_1815__COMPILTST_NORMTESTER_SUCCESS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1815__COMPILTST_NORMTESTER_SUCCESS.nbval = 0; /*inirout drout_1816__COMPILTST_NORMTESTER_ORCLEAR */ /*_.VALROUT___V1985*/ meltfptr[1984] = (melt_ptr_t) & cdat->drout_1816__COMPILTST_NORMTESTER_ORCLEAR; cdat->drout_1816__COMPILTST_NORMTESTER_ORCLEAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1816__COMPILTST_NORMTESTER_ORCLEAR.routdescr, "COMPILTST_NORMTESTER_ORCLEAR @warmelt-genobj.melt:6678", MELT_ROUTDESCR_LEN - 1); cdat->drout_1816__COMPILTST_NORMTESTER_ORCLEAR.nbval = 9; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1816__COMPILTST_NORMTESTER_ORCLEAR, meltrout_185_warmelt_genobj_COMPILTST_NORMTESTER_ORCLEAR); /*iniclos dclo_1817__COMPILTST_NORMTESTER_ORCLEAR */ /*_.VALCLO___V1986*/ meltfptr[1985] = (melt_ptr_t) & cdat->dclo_1817__COMPILTST_NORMTESTER_ORCLEAR; cdat->dclo_1817__COMPILTST_NORMTESTER_ORCLEAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1817__COMPILTST_NORMTESTER_ORCLEAR.nbval = 0; /*iniobj dsym_1818__CLASS_NORMTESTER_OR_CLEAR*/ /*uniqueobj*/ if (! /*_.VALDATA___V1987*/ meltfptr[1986]) /*_.VALDATA___V1987*/ meltfptr[1986] = (melt_ptr_t) & cdat->dsym_1818__CLASS_NORMTESTER_OR_CLEAR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1818__CLASS_NORMTESTER_OR_CLEAR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1818__CLASS_NORMTESTER_OR_CLEAR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1818__CLASS_NORMTESTER_OR_CLEAR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1818__CLASS_NORMTESTER_OR_CLEAR.obj_hash = 938184631; cdat->dsym_1818__CLASS_NORMTESTER_OR_CLEAR.obj_len = 3; /*inistring dstr_1819__CLASS_NORMTESTER*/ /*_.VALSTR___V1988*/ meltfptr[1987] = (melt_ptr_t) & cdat->dstr_1819__CLASS_NORMTESTER; cdat->dstr_1819__CLASS_NORMTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1819__CLASS_NORMTESTER.val, "CLASS_NORMTESTER_OR_CLEAR", sizeof (cdat->dstr_1819__CLASS_NORMTESTER. val) - 1); cdat->dstr_1819__CLASS_NORMTESTER.val[25] = (char) 0; cdat->dstr_1819__CLASS_NORMTESTER.slen = 25; /*inirout drout_1820__COMPILTST_NORMTESTER_ORTRANSMIT */ /*_.VALROUT___V1989*/ meltfptr[1988] = (melt_ptr_t) & cdat->drout_1820__COMPILTST_NORMTESTER_ORTRANSMIT; cdat->drout_1820__COMPILTST_NORMTESTER_ORTRANSMIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1820__COMPILTST_NORMTESTER_ORTRANSMIT.routdescr, "COMPILTST_NORMTESTER_ORTRANSMIT @warmelt-genobj.melt:6728", MELT_ROUTDESCR_LEN - 1); cdat->drout_1820__COMPILTST_NORMTESTER_ORTRANSMIT.nbval = 10; MELT_ROUTINE_SET_ROUTCODE (&cdat-> drout_1820__COMPILTST_NORMTESTER_ORTRANSMIT, meltrout_186_warmelt_genobj_COMPILTST_NORMTESTER_ORTRANSMIT); /*iniclos dclo_1821__COMPILTST_NORMTESTER_ORTRANSMIT */ /*_.VALCLO___V1990*/ meltfptr[1989] = (melt_ptr_t) & cdat->dclo_1821__COMPILTST_NORMTESTER_ORTRANSMIT; cdat->dclo_1821__COMPILTST_NORMTESTER_ORTRANSMIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1821__COMPILTST_NORMTESTER_ORTRANSMIT.nbval = 0; /*iniobj dsym_1822__CLASS_NORMTESTER_OR_TRANSMIT*/ /*uniqueobj*/ if (! /*_.VALDATA___V1991*/ meltfptr[1990]) /*_.VALDATA___V1991*/ meltfptr[1990] = (melt_ptr_t) & cdat->dsym_1822__CLASS_NORMTESTER_OR_TRANSMIT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1822__CLASS_NORMTESTER_OR_TRANSMIT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1822__CLASS_NORMTESTER_OR_TRANSMIT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1822__CLASS_NORMTESTER_OR_TRANSMIT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1822__CLASS_NORMTESTER_OR_TRANSMIT.obj_hash = 832170664; cdat->dsym_1822__CLASS_NORMTESTER_OR_TRANSMIT.obj_len = 3; /*inistring dstr_1823__CLASS_NORMTESTER*/ /*_.VALSTR___V1992*/ meltfptr[1991] = (melt_ptr_t) & cdat->dstr_1823__CLASS_NORMTESTER; cdat->dstr_1823__CLASS_NORMTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1823__CLASS_NORMTESTER.val, "CLASS_NORMTESTER_OR_TRANSMIT", sizeof (cdat->dstr_1823__CLASS_NORMTESTER. val) - 1); cdat->dstr_1823__CLASS_NORMTESTER.val[28] = (char) 0; cdat->dstr_1823__CLASS_NORMTESTER.slen = 28; /*inirout drout_1824__COMPILTST_NORMTESTER_DISJUNCTION */ /*_.VALROUT___V1993*/ meltfptr[1992] = (melt_ptr_t) & cdat->drout_1824__COMPILTST_NORMTESTER_DISJUNCTION; cdat->drout_1824__COMPILTST_NORMTESTER_DISJUNCTION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1824__COMPILTST_NORMTESTER_DISJUNCTION.routdescr, "COMPILTST_NORMTESTER_DISJUNCTION @warmelt-genobj.melt:6779", MELT_ROUTDESCR_LEN - 1); cdat->drout_1824__COMPILTST_NORMTESTER_DISJUNCTION.nbval = 9; MELT_ROUTINE_SET_ROUTCODE (&cdat-> drout_1824__COMPILTST_NORMTESTER_DISJUNCTION, meltrout_187_warmelt_genobj_COMPILTST_NORMTESTER_DISJUNCTION); /*iniclos dclo_1825__COMPILTST_NORMTESTER_DISJUNCTION */ /*_.VALCLO___V1994*/ meltfptr[1993] = (melt_ptr_t) & cdat->dclo_1825__COMPILTST_NORMTESTER_DISJUNCTION; cdat->dclo_1825__COMPILTST_NORMTESTER_DISJUNCTION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1825__COMPILTST_NORMTESTER_DISJUNCTION.nbval = 0; /*iniobj dsym_1826__CLASS_NORMTESTER_DISJUNCTION*/ /*uniqueobj*/ if (! /*_.VALDATA___V1995*/ meltfptr[1994]) /*_.VALDATA___V1995*/ meltfptr[1994] = (melt_ptr_t) & cdat->dsym_1826__CLASS_NORMTESTER_DISJUNCTION; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1826__CLASS_NORMTESTER_DISJUNCTION", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr objmagic dsym_1826__CLASS_NORMTESTER_DISJUNCTION", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1826__CLASS_NORMTESTER_DISJUNCTION.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1826__CLASS_NORMTESTER_DISJUNCTION.obj_hash = 310373634; cdat->dsym_1826__CLASS_NORMTESTER_DISJUNCTION.obj_len = 3; /*inistring dstr_1827__CLASS_NORMTESTER*/ /*_.VALSTR___V1996*/ meltfptr[1995] = (melt_ptr_t) & cdat->dstr_1827__CLASS_NORMTESTER; cdat->dstr_1827__CLASS_NORMTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1827__CLASS_NORMTESTER.val, "CLASS_NORMTESTER_DISJUNCTION", sizeof (cdat->dstr_1827__CLASS_NORMTESTER. val) - 1); cdat->dstr_1827__CLASS_NORMTESTER.val[28] = (char) 0; cdat->dstr_1827__CLASS_NORMTESTER.slen = 28; /*inirout drout_1828__COMPILMATCHER_CMATCHER */ /*_.VALROUT___V1997*/ meltfptr[1996] = (melt_ptr_t) & cdat->drout_1828__COMPILMATCHER_CMATCHER; cdat->drout_1828__COMPILMATCHER_CMATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1828__COMPILMATCHER_CMATCHER.routdescr, "COMPILMATCHER_CMATCHER @warmelt-genobj.melt:6819", MELT_ROUTDESCR_LEN - 1); cdat->drout_1828__COMPILMATCHER_CMATCHER.nbval = 37; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1828__COMPILMATCHER_CMATCHER, meltrout_188_warmelt_genobj_COMPILMATCHER_CMATCHER); /*iniclos dclo_1829__COMPILMATCHER_CMATCHER */ /*_.VALCLO___V2002*/ meltfptr[2001] = (melt_ptr_t) & cdat->dclo_1829__COMPILMATCHER_CMATCHER; cdat->dclo_1829__COMPILMATCHER_CMATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1829__COMPILMATCHER_CMATCHER.nbval = 0; /*iniobj dsym_1830__CLASS_CMATCHER*/ /*uniqueobj*/ if (! /*_.VALDATA___V2003*/ meltfptr[2002]) /*_.VALDATA___V2003*/ meltfptr[2002] = (melt_ptr_t) & cdat->dsym_1830__CLASS_CMATCHER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1830__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_1830__CLASS_CMATCHER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1830__CLASS_CMATCHER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1830__CLASS_CMATCHER.obj_hash = 544975672; cdat->dsym_1830__CLASS_CMATCHER.obj_len = 3; /*inistring dstr_1831__CLASS_CMATCHER*/ /*_.VALSTR___V2004*/ meltfptr[2003] = (melt_ptr_t) & cdat->dstr_1831__CLASS_CMATCHER; cdat->dstr_1831__CLASS_CMATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1831__CLASS_CMATCHER.val, "CLASS_CMATCHER", sizeof (cdat->dstr_1831__CLASS_CMATCHER.val) - 1); cdat->dstr_1831__CLASS_CMATCHER.val[14] = (char) 0; cdat->dstr_1831__CLASS_CMATCHER.slen = 14; /*iniobj dsym_1832__MULTIPLE_EVERY_BOTH*/ /*uniqueobj*/ if (! /*_.VALDATA___V2005*/ meltfptr[2004]) /*_.VALDATA___V2005*/ meltfptr[2004] = (melt_ptr_t) & cdat->dsym_1832__MULTIPLE_EVERY_BOTH; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1832__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_1832__MULTIPLE_EVERY_BOTH", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1832__MULTIPLE_EVERY_BOTH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1832__MULTIPLE_EVERY_BOTH.obj_hash = 528900272; cdat->dsym_1832__MULTIPLE_EVERY_BOTH.obj_len = 3; /*inistring dstr_1833__MULTIPLE_EVERY_B*/ /*_.VALSTR___V2006*/ meltfptr[2005] = (melt_ptr_t) & cdat->dstr_1833__MULTIPLE_EVERY_B; cdat->dstr_1833__MULTIPLE_EVERY_B.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1833__MULTIPLE_EVERY_B.val, "MULTIPLE_EVERY_BOTH", sizeof (cdat->dstr_1833__MULTIPLE_EVERY_B. val) - 1); cdat->dstr_1833__MULTIPLE_EVERY_B.val[19] = (char) 0; cdat->dstr_1833__MULTIPLE_EVERY_B.slen = 19; /*inirout drout_1834__LAMBDA_ */ /*_.VALROUT___V1998*/ meltfptr[1997] = (melt_ptr_t) & cdat->drout_1834__LAMBDA_; cdat->drout_1834__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1834__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:6871", MELT_ROUTDESCR_LEN - 1); cdat->drout_1834__LAMBDA_.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1834__LAMBDA_, meltrout_189_warmelt_genobj_LAMBDA___58__); /*inirout drout_1835__LAMBDA_ */ /*_.VALROUT___V1999*/ meltfptr[1998] = (melt_ptr_t) & cdat->drout_1835__LAMBDA_; cdat->drout_1835__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1835__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:6884", MELT_ROUTDESCR_LEN - 1); cdat->drout_1835__LAMBDA_.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1835__LAMBDA_, meltrout_190_warmelt_genobj_LAMBDA___59__); /*inirout drout_1836__LAMBDA_ */ /*_.VALROUT___V2000*/ meltfptr[1999] = (melt_ptr_t) & cdat->drout_1836__LAMBDA_; cdat->drout_1836__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1836__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:6897", MELT_ROUTDESCR_LEN - 1); cdat->drout_1836__LAMBDA_.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1836__LAMBDA_, meltrout_191_warmelt_genobj_LAMBDA___60__); /*inirout drout_1837__LAMBDA_ */ /*_.VALROUT___V2001*/ meltfptr[2000] = (melt_ptr_t) & cdat->drout_1837__LAMBDA_; cdat->drout_1837__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1837__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:6900", MELT_ROUTDESCR_LEN - 1); cdat->drout_1837__LAMBDA_.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1837__LAMBDA_, meltrout_192_warmelt_genobj_LAMBDA___61__); /*inirout drout_1838__COMPILMATCHER_FUNMATCHER */ /*_.VALROUT___V2007*/ meltfptr[2006] = (melt_ptr_t) & cdat->drout_1838__COMPILMATCHER_FUNMATCHER; cdat->drout_1838__COMPILMATCHER_FUNMATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1838__COMPILMATCHER_FUNMATCHER.routdescr, "COMPILMATCHER_FUNMATCHER @warmelt-genobj.melt:6981", MELT_ROUTDESCR_LEN - 1); cdat->drout_1838__COMPILMATCHER_FUNMATCHER.nbval = 23; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1838__COMPILMATCHER_FUNMATCHER, meltrout_193_warmelt_genobj_COMPILMATCHER_FUNMATCHER); /*iniclos dclo_1839__COMPILMATCHER_FUNMATCHER */ /*_.VALCLO___V2012*/ meltfptr[2011] = (melt_ptr_t) & cdat->dclo_1839__COMPILMATCHER_FUNMATCHER; cdat->dclo_1839__COMPILMATCHER_FUNMATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); cdat->dclo_1839__COMPILMATCHER_FUNMATCHER.nbval = 0; /*iniobj dsym_1840__CLASS_FUNMATCHER*/ /*uniqueobj*/ if (! /*_.VALDATA___V2013*/ meltfptr[2012]) /*_.VALDATA___V2013*/ meltfptr[2012] = (melt_ptr_t) & cdat->dsym_1840__CLASS_FUNMATCHER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1840__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_1840__CLASS_FUNMATCHER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1840__CLASS_FUNMATCHER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1840__CLASS_FUNMATCHER.obj_hash = 197743893; cdat->dsym_1840__CLASS_FUNMATCHER.obj_len = 3; /*inistring dstr_1841__CLASS_FUNMATCHER*/ /*_.VALSTR___V2014*/ meltfptr[2013] = (melt_ptr_t) & cdat->dstr_1841__CLASS_FUNMATCHER; cdat->dstr_1841__CLASS_FUNMATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1841__CLASS_FUNMATCHER.val, "CLASS_FUNMATCHER", sizeof (cdat->dstr_1841__CLASS_FUNMATCHER. val) - 1); cdat->dstr_1841__CLASS_FUNMATCHER.val[16] = (char) 0; cdat->dstr_1841__CLASS_FUNMATCHER.slen = 16; /*inirout drout_1842__LAMBDA_ */ /*_.VALROUT___V2008*/ meltfptr[2007] = (melt_ptr_t) & cdat->drout_1842__LAMBDA_; cdat->drout_1842__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1842__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:7005", MELT_ROUTDESCR_LEN - 1); cdat->drout_1842__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1842__LAMBDA_, meltrout_194_warmelt_genobj_LAMBDA___62__); /*inirout drout_1843__LAMBDA_ */ /*_.VALROUT___V2009*/ meltfptr[2008] = (melt_ptr_t) & cdat->drout_1843__LAMBDA_; cdat->drout_1843__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1843__LAMBDA_.routdescr, "LAMBDA_ @warmelt-genobj.melt:7010", MELT_ROUTDESCR_LEN - 1); cdat->drout_1843__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1843__LAMBDA_, meltrout_195_warmelt_genobj_LAMBDA___63__); /*iniobj dsym_1844__CLOSFUNMATCH*/ /*uniqueobj*/ if (! /*_.VALDATA___V2010*/ meltfptr[2009]) /*_.VALDATA___V2010*/ meltfptr[2009] = (melt_ptr_t) & cdat->dsym_1844__CLOSFUNMATCH; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1844__CLOSFUNMATCH", melt_magic_discr ((melt_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__CLOSFUNMATCH", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1844__CLOSFUNMATCH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1844__CLOSFUNMATCH.obj_hash = 417962854; cdat->dsym_1844__CLOSFUNMATCH.obj_len = 3; /*inistring dstr_1845__CLOSFUNMATCH*/ /*_.VALSTR___V2011*/ meltfptr[2010] = (melt_ptr_t) & cdat->dstr_1845__CLOSFUNMATCH; cdat->dstr_1845__CLOSFUNMATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1845__CLOSFUNMATCH.val, "_CLOSFUNMATCH", sizeof (cdat->dstr_1845__CLOSFUNMATCH.val) - 1); cdat->dstr_1845__CLOSFUNMATCH.val[13] = (char) 0; cdat->dstr_1845__CLOSFUNMATCH.slen = 13; /*iniobj dsym_1846__FMATCH_MATCHF*/ /*uniqueobj*/ if (! /*_.VALDATA___V2015*/ meltfptr[2014]) /*_.VALDATA___V2015*/ meltfptr[2014] = (melt_ptr_t) & cdat->dsym_1846__FMATCH_MATCHF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1846__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_1846__FMATCH_MATCHF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); cdat->dsym_1846__FMATCH_MATCHF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); cdat->dsym_1846__FMATCH_MATCHF.obj_hash = 945393090; cdat->dsym_1846__FMATCH_MATCHF.obj_len = 3; /*inistring dstr_1847__FMATCH_MATCHF*/ /*_.VALSTR___V2016*/ meltfptr[2015] = (melt_ptr_t) & cdat->dstr_1847__FMATCH_MATCHF; cdat->dstr_1847__FMATCH_MATCHF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1847__FMATCH_MATCHF.val, "FMATCH_MATCHF", sizeof (cdat->dstr_1847__FMATCH_MATCHF.val) - 1); cdat->dstr_1847__FMATCH_MATCHF.val[13] = (char) 0; cdat->dstr_1847__FMATCH_MATCHF.slen = 13; cdat = NULL; melt_prohibit_garbcoll = FALSE; #undef meltfram__ } /*end initialize_module_meltdata_warmelt_genobj */ #if MELT_HAVE_DEBUG const char meltmodule_warmelt_genobj__melt_have_debug_enabled[] = "MELT module warmelt-genobj have debug enabled"; #else /*!MELT_HAVE_DEBUG */ const char meltmodule_warmelt_genobj__melt_have_debug_disabled[] = "MELT module warmelt-genobj 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 2830*/ meltfram__.mcfr_nbvar = -2830 /*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 */ -2830; ((struct melt_callframe_st *) &meltfram__)->mcfr_forwmarkrout = meltmod__warmelt_genobj__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_OBJVALUE */ { melt_ptr_t sy_CLASS_OBJVALUE = meltgc_named_symbol ("CLASS_OBJVALUE", MELT_GET); if (sy_CLASS_OBJVALUE && NULL == /*_.VALDATA___V170*/ meltfptr[169]) /*_.VALDATA___V170*/ meltfptr[169] = (melt_ptr_t) sy_CLASS_OBJVALUE; } /*^getnamedsymbol */ /*getnamedsym:CLASS_GENERATED_C_CODE */ { melt_ptr_t sy_CLASS_GENERATED_C_CODE = meltgc_named_symbol ("CLASS_GENERATED_C_CODE", MELT_GET); if (sy_CLASS_GENERATED_C_CODE && NULL == /*_.VALDATA___V172*/ meltfptr[171]) /*_.VALDATA___V172*/ meltfptr[171] = (melt_ptr_t) sy_CLASS_GENERATED_C_CODE; } /*^getnamedsymbol */ /*getnamedsym:OBV_TYPE */ { melt_ptr_t sy_OBV_TYPE = meltgc_named_symbol ("OBV_TYPE", MELT_GET); if (sy_OBV_TYPE && NULL == /*_.VALDATA___V180*/ meltfptr[179]) /*_.VALDATA___V180*/ meltfptr[179] = (melt_ptr_t) sy_OBV_TYPE; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUREVALUE */ { melt_ptr_t sy_CLASS_OBJPUREVALUE = meltgc_named_symbol ("CLASS_OBJPUREVALUE", MELT_GET); if (sy_CLASS_OBJPUREVALUE && NULL == /*_.VALDATA___V182*/ meltfptr[181]) /*_.VALDATA___V182*/ meltfptr[181] = (melt_ptr_t) sy_CLASS_OBJPUREVALUE; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJLOCV */ { melt_ptr_t sy_CLASS_OBJLOCV = meltgc_named_symbol ("CLASS_OBJLOCV", MELT_GET); if (sy_CLASS_OBJLOCV && NULL == /*_.VALDATA___V188*/ meltfptr[187]) /*_.VALDATA___V188*/ meltfptr[187] = (melt_ptr_t) sy_CLASS_OBJLOCV; } /*^getnamedsymbol */ /*getnamedsym:OBL_OFF */ { melt_ptr_t sy_OBL_OFF = meltgc_named_symbol ("OBL_OFF", MELT_GET); if (sy_OBL_OFF && NULL == /*_.VALDATA___V200*/ meltfptr[199]) /*_.VALDATA___V200*/ meltfptr[199] = (melt_ptr_t) sy_OBL_OFF; } /*^getnamedsymbol */ /*getnamedsym:OBL_PROC */ { melt_ptr_t sy_OBL_PROC = meltgc_named_symbol ("OBL_PROC", MELT_GET); if (sy_OBL_PROC && NULL == /*_.VALDATA___V202*/ meltfptr[201]) /*_.VALDATA___V202*/ meltfptr[201] = (melt_ptr_t) sy_OBL_PROC; } /*^getnamedsymbol */ /*getnamedsym:OBL_CNAME */ { melt_ptr_t sy_OBL_CNAME = meltgc_named_symbol ("OBL_CNAME", MELT_GET); if (sy_OBL_CNAME && NULL == /*_.VALDATA___V204*/ meltfptr[203]) /*_.VALDATA___V204*/ meltfptr[203] = (melt_ptr_t) sy_OBL_CNAME; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJCLOCCV */ { melt_ptr_t sy_CLASS_OBJCLOCCV = meltgc_named_symbol ("CLASS_OBJCLOCCV", MELT_GET); if (sy_CLASS_OBJCLOCCV && NULL == /*_.VALDATA___V206*/ meltfptr[205]) /*_.VALDATA___V206*/ meltfptr[205] = (melt_ptr_t) sy_CLASS_OBJCLOCCV; } /*^getnamedsymbol */ /*getnamedsym:OBC_OFF */ { melt_ptr_t sy_OBC_OFF = meltgc_named_symbol ("OBC_OFF", MELT_GET); if (sy_OBC_OFF && NULL == /*_.VALDATA___V218*/ meltfptr[217]) /*_.VALDATA___V218*/ meltfptr[217] = (melt_ptr_t) sy_OBC_OFF; } /*^getnamedsymbol */ /*getnamedsym:OBC_PROC */ { melt_ptr_t sy_OBC_PROC = meltgc_named_symbol ("OBC_PROC", MELT_GET); if (sy_OBC_PROC && NULL == /*_.VALDATA___V220*/ meltfptr[219]) /*_.VALDATA___V220*/ meltfptr[219] = (melt_ptr_t) sy_OBC_PROC; } /*^getnamedsymbol */ /*getnamedsym:OBC_NAME */ { melt_ptr_t sy_OBC_NAME = meltgc_named_symbol ("OBC_NAME", MELT_GET); if (sy_OBC_NAME && NULL == /*_.VALDATA___V222*/ meltfptr[221]) /*_.VALDATA___V222*/ meltfptr[221] = (melt_ptr_t) sy_OBC_NAME; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJCONSTV */ { melt_ptr_t sy_CLASS_OBJCONSTV = meltgc_named_symbol ("CLASS_OBJCONSTV", MELT_GET); if (sy_CLASS_OBJCONSTV && NULL == /*_.VALDATA___V224*/ meltfptr[223]) /*_.VALDATA___V224*/ meltfptr[223] = (melt_ptr_t) sy_CLASS_OBJCONSTV; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPREDEF */ { melt_ptr_t sy_CLASS_OBJPREDEF = meltgc_named_symbol ("CLASS_OBJPREDEF", MELT_GET); if (sy_CLASS_OBJPREDEF && NULL == /*_.VALDATA___V230*/ meltfptr[229]) /*_.VALDATA___V230*/ meltfptr[229] = (melt_ptr_t) sy_CLASS_OBJPREDEF; } /*^getnamedsymbol */ /*getnamedsym:OBPREDEF */ { melt_ptr_t sy_OBPREDEF = meltgc_named_symbol ("OBPREDEF", MELT_GET); if (sy_OBPREDEF && NULL == /*_.VALDATA___V238*/ meltfptr[237]) /*_.VALDATA___V238*/ meltfptr[237] = (melt_ptr_t) sy_OBPREDEF; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJNIL */ { melt_ptr_t sy_CLASS_OBJNIL = meltgc_named_symbol ("CLASS_OBJNIL", MELT_GET); if (sy_CLASS_OBJNIL && NULL == /*_.VALDATA___V240*/ meltfptr[239]) /*_.VALDATA___V240*/ meltfptr[239] = (melt_ptr_t) sy_CLASS_OBJNIL; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJEXPANDPUREVAL */ { melt_ptr_t sy_CLASS_OBJEXPANDPUREVAL = meltgc_named_symbol ("CLASS_OBJEXPANDPUREVAL", MELT_GET); if (sy_CLASS_OBJEXPANDPUREVAL && NULL == /*_.VALDATA___V246*/ meltfptr[245]) /*_.VALDATA___V246*/ meltfptr[245] = (melt_ptr_t) sy_CLASS_OBJEXPANDPUREVAL; } /*^getnamedsymbol */ /*getnamedsym:OXPURVAL_LOC */ { melt_ptr_t sy_OXPURVAL_LOC = meltgc_named_symbol ("OXPURVAL_LOC", MELT_GET); if (sy_OXPURVAL_LOC && NULL == /*_.VALDATA___V258*/ meltfptr[257]) /*_.VALDATA___V258*/ meltfptr[257] = (melt_ptr_t) sy_OXPURVAL_LOC; } /*^getnamedsymbol */ /*getnamedsym:OXPURVAL_COMM */ { melt_ptr_t sy_OXPURVAL_COMM = meltgc_named_symbol ("OXPURVAL_COMM", MELT_GET); if (sy_OXPURVAL_COMM && NULL == /*_.VALDATA___V260*/ meltfptr[259]) /*_.VALDATA___V260*/ meltfptr[259] = (melt_ptr_t) sy_OXPURVAL_COMM; } /*^getnamedsymbol */ /*getnamedsym:OXPURVAL_CONT */ { melt_ptr_t sy_OXPURVAL_CONT = meltgc_named_symbol ("OXPURVAL_CONT", MELT_GET); if (sy_OXPURVAL_CONT && NULL == /*_.VALDATA___V262*/ meltfptr[261]) /*_.VALDATA___V262*/ meltfptr[261] = (melt_ptr_t) sy_OXPURVAL_CONT; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINITELEM */ { melt_ptr_t sy_CLASS_OBJINITELEM = meltgc_named_symbol ("CLASS_OBJINITELEM", MELT_GET); if (sy_CLASS_OBJINITELEM && NULL == /*_.VALDATA___V264*/ meltfptr[263]) /*_.VALDATA___V264*/ meltfptr[263] = (melt_ptr_t) sy_CLASS_OBJINITELEM; } /*^getnamedsymbol */ /*getnamedsym:OIE_CNAME */ { melt_ptr_t sy_OIE_CNAME = meltgc_named_symbol ("OIE_CNAME", MELT_GET); if (sy_OIE_CNAME && NULL == /*_.VALDATA___V278*/ meltfptr[277]) /*_.VALDATA___V278*/ meltfptr[277] = (melt_ptr_t) sy_OIE_CNAME; } /*^getnamedsymbol */ /*getnamedsym:OIE_DATA */ { melt_ptr_t sy_OIE_DATA = meltgc_named_symbol ("OIE_DATA", MELT_GET); if (sy_OIE_DATA && NULL == /*_.VALDATA___V280*/ meltfptr[279]) /*_.VALDATA___V280*/ meltfptr[279] = (melt_ptr_t) sy_OIE_DATA; } /*^getnamedsymbol */ /*getnamedsym:OIE_DISCR */ { melt_ptr_t sy_OIE_DISCR = meltgc_named_symbol ("OIE_DISCR", MELT_GET); if (sy_OIE_DISCR && NULL == /*_.VALDATA___V282*/ meltfptr[281]) /*_.VALDATA___V282*/ meltfptr[281] = (melt_ptr_t) sy_OIE_DISCR; } /*^getnamedsymbol */ /*getnamedsym:OIE_LOCVAR */ { melt_ptr_t sy_OIE_LOCVAR = meltgc_named_symbol ("OIE_LOCVAR", MELT_GET); if (sy_OIE_LOCVAR && NULL == /*_.VALDATA___V284*/ meltfptr[283]) /*_.VALDATA___V284*/ meltfptr[283] = (melt_ptr_t) sy_OIE_LOCVAR; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINITOBJECT */ { melt_ptr_t sy_CLASS_OBJINITOBJECT = meltgc_named_symbol ("CLASS_OBJINITOBJECT", MELT_GET); if (sy_CLASS_OBJINITOBJECT && NULL == /*_.VALDATA___V286*/ meltfptr[285]) /*_.VALDATA___V286*/ meltfptr[285] = (melt_ptr_t) sy_CLASS_OBJINITOBJECT; } /*^getnamedsymbol */ /*getnamedsym:OIO_PREDEF */ { melt_ptr_t sy_OIO_PREDEF = meltgc_named_symbol ("OIO_PREDEF", MELT_GET); if (sy_OIO_PREDEF && NULL == /*_.VALDATA___V296*/ meltfptr[295]) /*_.VALDATA___V296*/ meltfptr[295] = (melt_ptr_t) sy_OIO_PREDEF; } /*^getnamedsymbol */ /*getnamedsym:OIO_CLASS */ { melt_ptr_t sy_OIO_CLASS = meltgc_named_symbol ("OIO_CLASS", MELT_GET); if (sy_OIO_CLASS && NULL == /*_.VALDATA___V298*/ meltfptr[297]) /*_.VALDATA___V298*/ meltfptr[297] = (melt_ptr_t) sy_OIO_CLASS; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINITUNIQUEOBJECT */ { melt_ptr_t sy_CLASS_OBJINITUNIQUEOBJECT = meltgc_named_symbol ("CLASS_OBJINITUNIQUEOBJECT", MELT_GET); if (sy_CLASS_OBJINITUNIQUEOBJECT && NULL == /*_.VALDATA___V300*/ meltfptr[299]) /*_.VALDATA___V300*/ meltfptr[299] = (melt_ptr_t) sy_CLASS_OBJINITUNIQUEOBJECT; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINITMULTIPLE */ { melt_ptr_t sy_CLASS_OBJINITMULTIPLE = meltgc_named_symbol ("CLASS_OBJINITMULTIPLE", MELT_GET); if (sy_CLASS_OBJINITMULTIPLE && NULL == /*_.VALDATA___V306*/ meltfptr[305]) /*_.VALDATA___V306*/ meltfptr[305] = (melt_ptr_t) sy_CLASS_OBJINITMULTIPLE; } /*^getnamedsymbol */ /*getnamedsym:OIM_TUPVAL */ { melt_ptr_t sy_OIM_TUPVAL = meltgc_named_symbol ("OIM_TUPVAL", MELT_GET); if (sy_OIM_TUPVAL && NULL == /*_.VALDATA___V314*/ meltfptr[313]) /*_.VALDATA___V314*/ meltfptr[313] = (melt_ptr_t) sy_OIM_TUPVAL; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINITCLOSURE */ { melt_ptr_t sy_CLASS_OBJINITCLOSURE = meltgc_named_symbol ("CLASS_OBJINITCLOSURE", MELT_GET); if (sy_CLASS_OBJINITCLOSURE && NULL == /*_.VALDATA___V316*/ meltfptr[315]) /*_.VALDATA___V316*/ meltfptr[315] = (melt_ptr_t) sy_CLASS_OBJINITCLOSURE; } /*^getnamedsymbol */ /*getnamedsym:OICLO_ROUT */ { melt_ptr_t sy_OICLO_ROUT = meltgc_named_symbol ("OICLO_ROUT", MELT_GET); if (sy_OICLO_ROUT && NULL == /*_.VALDATA___V324*/ meltfptr[323]) /*_.VALDATA___V324*/ meltfptr[323] = (melt_ptr_t) sy_OICLO_ROUT; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINITROUTINE */ { melt_ptr_t sy_CLASS_OBJINITROUTINE = meltgc_named_symbol ("CLASS_OBJINITROUTINE", MELT_GET); if (sy_CLASS_OBJINITROUTINE && NULL == /*_.VALDATA___V326*/ meltfptr[325]) /*_.VALDATA___V326*/ meltfptr[325] = (melt_ptr_t) sy_CLASS_OBJINITROUTINE; } /*^getnamedsymbol */ /*getnamedsym:OIR_PROCROUTINE */ { melt_ptr_t sy_OIR_PROCROUTINE = meltgc_named_symbol ("OIR_PROCROUTINE", MELT_GET); if (sy_OIR_PROCROUTINE && NULL == /*_.VALDATA___V334*/ meltfptr[333]) /*_.VALDATA___V334*/ meltfptr[333] = (melt_ptr_t) sy_OIR_PROCROUTINE; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINITSTRING */ { melt_ptr_t sy_CLASS_OBJINITSTRING = meltgc_named_symbol ("CLASS_OBJINITSTRING", MELT_GET); if (sy_CLASS_OBJINITSTRING && NULL == /*_.VALDATA___V336*/ meltfptr[335]) /*_.VALDATA___V336*/ meltfptr[335] = (melt_ptr_t) sy_CLASS_OBJINITSTRING; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINITPAIR */ { melt_ptr_t sy_CLASS_OBJINITPAIR = meltgc_named_symbol ("CLASS_OBJINITPAIR", MELT_GET); if (sy_CLASS_OBJINITPAIR && NULL == /*_.VALDATA___V342*/ meltfptr[341]) /*_.VALDATA___V342*/ meltfptr[341] = (melt_ptr_t) sy_CLASS_OBJINITPAIR; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINITLIST */ { melt_ptr_t sy_CLASS_OBJINITLIST = meltgc_named_symbol ("CLASS_OBJINITLIST", MELT_GET); if (sy_CLASS_OBJINITLIST && NULL == /*_.VALDATA___V348*/ meltfptr[347]) /*_.VALDATA___V348*/ meltfptr[347] = (melt_ptr_t) sy_CLASS_OBJINITLIST; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINITBOXINTEGER */ { melt_ptr_t sy_CLASS_OBJINITBOXINTEGER = meltgc_named_symbol ("CLASS_OBJINITBOXINTEGER", MELT_GET); if (sy_CLASS_OBJINITBOXINTEGER && NULL == /*_.VALDATA___V354*/ meltfptr[353]) /*_.VALDATA___V354*/ meltfptr[353] = (melt_ptr_t) sy_CLASS_OBJINITBOXINTEGER; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJEXPV */ { melt_ptr_t sy_CLASS_OBJEXPV = meltgc_named_symbol ("CLASS_OBJEXPV", MELT_GET); if (sy_CLASS_OBJEXPV && NULL == /*_.VALDATA___V360*/ meltfptr[359]) /*_.VALDATA___V360*/ meltfptr[359] = (melt_ptr_t) sy_CLASS_OBJEXPV; } /*^getnamedsymbol */ /*getnamedsym:OBX_CONT */ { melt_ptr_t sy_OBX_CONT = meltgc_named_symbol ("OBX_CONT", MELT_GET); if (sy_OBX_CONT && NULL == /*_.VALDATA___V368*/ meltfptr[367]) /*_.VALDATA___V368*/ meltfptr[367] = (melt_ptr_t) sy_OBX_CONT; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJLOCATEDEXPV */ { melt_ptr_t sy_CLASS_OBJLOCATEDEXPV = meltgc_named_symbol ("CLASS_OBJLOCATEDEXPV", MELT_GET); if (sy_CLASS_OBJLOCATEDEXPV && NULL == /*_.VALDATA___V370*/ meltfptr[369]) /*_.VALDATA___V370*/ meltfptr[369] = (melt_ptr_t) sy_CLASS_OBJLOCATEDEXPV; } /*^getnamedsymbol */ /*getnamedsym:OBCX_LOC */ { melt_ptr_t sy_OBCX_LOC = meltgc_named_symbol ("OBCX_LOC", MELT_GET); if (sy_OBCX_LOC && NULL == /*_.VALDATA___V378*/ meltfptr[377]) /*_.VALDATA___V378*/ meltfptr[377] = (melt_ptr_t) sy_OBCX_LOC; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJFLAG */ { melt_ptr_t sy_CLASS_OBJFLAG = meltgc_named_symbol ("CLASS_OBJFLAG", MELT_GET); if (sy_CLASS_OBJFLAG && NULL == /*_.VALDATA___V380*/ meltfptr[379]) /*_.VALDATA___V380*/ meltfptr[379] = (melt_ptr_t) sy_CLASS_OBJFLAG; } /*^getnamedsymbol */ /*getnamedsym:OBFLAG_MATCHFLAG */ { melt_ptr_t sy_OBFLAG_MATCHFLAG = meltgc_named_symbol ("OBFLAG_MATCHFLAG", MELT_GET); if (sy_OBFLAG_MATCHFLAG && NULL == /*_.VALDATA___V392*/ meltfptr[391]) /*_.VALDATA___V392*/ meltfptr[391] = (melt_ptr_t) sy_OBFLAG_MATCHFLAG; } /*^getnamedsymbol */ /*getnamedsym:OBFLAG_NAME */ { melt_ptr_t sy_OBFLAG_NAME = meltgc_named_symbol ("OBFLAG_NAME", MELT_GET); if (sy_OBFLAG_NAME && NULL == /*_.VALDATA___V394*/ meltfptr[393]) /*_.VALDATA___V394*/ meltfptr[393] = (melt_ptr_t) sy_OBFLAG_NAME; } /*^getnamedsymbol */ /*getnamedsym:OBFLAG_RANK */ { melt_ptr_t sy_OBFLAG_RANK = meltgc_named_symbol ("OBFLAG_RANK", MELT_GET); if (sy_OBFLAG_RANK && NULL == /*_.VALDATA___V396*/ meltfptr[395]) /*_.VALDATA___V396*/ meltfptr[395] = (melt_ptr_t) sy_OBFLAG_RANK; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINSTR */ { melt_ptr_t sy_CLASS_OBJINSTR = meltgc_named_symbol ("CLASS_OBJINSTR", MELT_GET); if (sy_CLASS_OBJINSTR && NULL == /*_.VALDATA___V398*/ meltfptr[397]) /*_.VALDATA___V398*/ meltfptr[397] = (melt_ptr_t) sy_CLASS_OBJINSTR; } /*^getnamedsymbol */ /*getnamedsym:OBI_LOC */ { melt_ptr_t sy_OBI_LOC = meltgc_named_symbol ("OBI_LOC", MELT_GET); if (sy_OBI_LOC && NULL == /*_.VALDATA___V406*/ meltfptr[405]) /*_.VALDATA___V406*/ meltfptr[405] = (melt_ptr_t) sy_OBI_LOC; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJCOMMENTINSTR */ { melt_ptr_t sy_CLASS_OBJCOMMENTINSTR = meltgc_named_symbol ("CLASS_OBJCOMMENTINSTR", MELT_GET); if (sy_CLASS_OBJCOMMENTINSTR && NULL == /*_.VALDATA___V408*/ meltfptr[407]) /*_.VALDATA___V408*/ meltfptr[407] = (melt_ptr_t) sy_CLASS_OBJCOMMENTINSTR; } /*^getnamedsymbol */ /*getnamedsym:OBCI_COMMENT */ { melt_ptr_t sy_OBCI_COMMENT = meltgc_named_symbol ("OBCI_COMMENT", MELT_GET); if (sy_OBCI_COMMENT && NULL == /*_.VALDATA___V416*/ meltfptr[415]) /*_.VALDATA___V416*/ meltfptr[415] = (melt_ptr_t) sy_OBCI_COMMENT; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJCHECKSIGNAL */ { melt_ptr_t sy_CLASS_OBJCHECKSIGNAL = meltgc_named_symbol ("CLASS_OBJCHECKSIGNAL", MELT_GET); if (sy_CLASS_OBJCHECKSIGNAL && NULL == /*_.VALDATA___V418*/ meltfptr[417]) /*_.VALDATA___V418*/ meltfptr[417] = (melt_ptr_t) sy_CLASS_OBJCHECKSIGNAL; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJDESTINSTR */ { melt_ptr_t sy_CLASS_OBJDESTINSTR = meltgc_named_symbol ("CLASS_OBJDESTINSTR", MELT_GET); if (sy_CLASS_OBJDESTINSTR && NULL == /*_.VALDATA___V424*/ meltfptr[423]) /*_.VALDATA___V424*/ meltfptr[423] = (melt_ptr_t) sy_CLASS_OBJDESTINSTR; } /*^getnamedsymbol */ /*getnamedsym:OBDI_DESTLIST */ { melt_ptr_t sy_OBDI_DESTLIST = meltgc_named_symbol ("OBDI_DESTLIST", MELT_GET); if (sy_OBDI_DESTLIST && NULL == /*_.VALDATA___V432*/ meltfptr[431]) /*_.VALDATA___V432*/ meltfptr[431] = (melt_ptr_t) sy_OBDI_DESTLIST; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJCOMPUTE */ { melt_ptr_t sy_CLASS_OBJCOMPUTE = meltgc_named_symbol ("CLASS_OBJCOMPUTE", MELT_GET); if (sy_CLASS_OBJCOMPUTE && NULL == /*_.VALDATA___V434*/ meltfptr[433]) /*_.VALDATA___V434*/ meltfptr[433] = (melt_ptr_t) sy_CLASS_OBJCOMPUTE; } /*^getnamedsymbol */ /*getnamedsym:OBCPT_EXPR */ { melt_ptr_t sy_OBCPT_EXPR = meltgc_named_symbol ("OBCPT_EXPR", MELT_GET); if (sy_OBCPT_EXPR && NULL == /*_.VALDATA___V444*/ meltfptr[443]) /*_.VALDATA___V444*/ meltfptr[443] = (melt_ptr_t) sy_OBCPT_EXPR; } /*^getnamedsymbol */ /*getnamedsym:OBCPT_TYPE */ { melt_ptr_t sy_OBCPT_TYPE = meltgc_named_symbol ("OBCPT_TYPE", MELT_GET); if (sy_OBCPT_TYPE && NULL == /*_.VALDATA___V446*/ meltfptr[445]) /*_.VALDATA___V446*/ meltfptr[445] = (melt_ptr_t) sy_OBCPT_TYPE; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJGETARG */ { melt_ptr_t sy_CLASS_OBJGETARG = meltgc_named_symbol ("CLASS_OBJGETARG", MELT_GET); if (sy_CLASS_OBJGETARG && NULL == /*_.VALDATA___V448*/ meltfptr[447]) /*_.VALDATA___V448*/ meltfptr[447] = (melt_ptr_t) sy_CLASS_OBJGETARG; } /*^getnamedsymbol */ /*getnamedsym:OBARG_OBLOC */ { melt_ptr_t sy_OBARG_OBLOC = meltgc_named_symbol ("OBARG_OBLOC", MELT_GET); if (sy_OBARG_OBLOC && NULL == /*_.VALDATA___V458*/ meltfptr[457]) /*_.VALDATA___V458*/ meltfptr[457] = (melt_ptr_t) sy_OBARG_OBLOC; } /*^getnamedsymbol */ /*getnamedsym:OBARG_BIND */ { melt_ptr_t sy_OBARG_BIND = meltgc_named_symbol ("OBARG_BIND", MELT_GET); if (sy_OBARG_BIND && NULL == /*_.VALDATA___V460*/ meltfptr[459]) /*_.VALDATA___V460*/ meltfptr[459] = (melt_ptr_t) sy_OBARG_BIND; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJGETARGREST */ { melt_ptr_t sy_CLASS_OBJGETARGREST = meltgc_named_symbol ("CLASS_OBJGETARGREST", MELT_GET); if (sy_CLASS_OBJGETARGREST && NULL == /*_.VALDATA___V462*/ meltfptr[461]) /*_.VALDATA___V462*/ meltfptr[461] = (melt_ptr_t) sy_CLASS_OBJGETARGREST; } /*^getnamedsymbol */ /*getnamedsym:OBARG_REST */ { melt_ptr_t sy_OBARG_REST = meltgc_named_symbol ("OBARG_REST", MELT_GET); if (sy_OBARG_REST && NULL == /*_.VALDATA___V470*/ meltfptr[469]) /*_.VALDATA___V470*/ meltfptr[469] = (melt_ptr_t) sy_OBARG_REST; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTXTRARESULT */ { melt_ptr_t sy_CLASS_OBJPUTXTRARESULT = meltgc_named_symbol ("CLASS_OBJPUTXTRARESULT", MELT_GET); if (sy_CLASS_OBJPUTXTRARESULT && NULL == /*_.VALDATA___V472*/ meltfptr[471]) /*_.VALDATA___V472*/ meltfptr[471] = (melt_ptr_t) sy_CLASS_OBJPUTXTRARESULT; } /*^getnamedsymbol */ /*getnamedsym:OBXRES_RANK */ { melt_ptr_t sy_OBXRES_RANK = meltgc_named_symbol ("OBXRES_RANK", MELT_GET); if (sy_OBXRES_RANK && NULL == /*_.VALDATA___V482*/ meltfptr[481]) /*_.VALDATA___V482*/ meltfptr[481] = (melt_ptr_t) sy_OBXRES_RANK; } /*^getnamedsymbol */ /*getnamedsym:OBXRES_OBLOC */ { melt_ptr_t sy_OBXRES_OBLOC = meltgc_named_symbol ("OBXRES_OBLOC", MELT_GET); if (sy_OBXRES_OBLOC && NULL == /*_.VALDATA___V484*/ meltfptr[483]) /*_.VALDATA___V484*/ meltfptr[483] = (melt_ptr_t) sy_OBXRES_OBLOC; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJFINALRETURN */ { melt_ptr_t sy_CLASS_OBJFINALRETURN = meltgc_named_symbol ("CLASS_OBJFINALRETURN", MELT_GET); if (sy_CLASS_OBJFINALRETURN && NULL == /*_.VALDATA___V486*/ meltfptr[485]) /*_.VALDATA___V486*/ meltfptr[485] = (melt_ptr_t) sy_CLASS_OBJFINALRETURN; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJCLEAR */ { melt_ptr_t sy_CLASS_OBJCLEAR = meltgc_named_symbol ("CLASS_OBJCLEAR", MELT_GET); if (sy_CLASS_OBJCLEAR && NULL == /*_.VALDATA___V492*/ meltfptr[491]) /*_.VALDATA___V492*/ meltfptr[491] = (melt_ptr_t) sy_CLASS_OBJCLEAR; } /*^getnamedsymbol */ /*getnamedsym:OCLR_VLOC */ { melt_ptr_t sy_OCLR_VLOC = meltgc_named_symbol ("OCLR_VLOC", MELT_GET); if (sy_OCLR_VLOC && NULL == /*_.VALDATA___V500*/ meltfptr[499]) /*_.VALDATA___V500*/ meltfptr[499] = (melt_ptr_t) sy_OCLR_VLOC; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJANYBLOCK */ { melt_ptr_t sy_CLASS_OBJANYBLOCK = meltgc_named_symbol ("CLASS_OBJANYBLOCK", MELT_GET); if (sy_CLASS_OBJANYBLOCK && NULL == /*_.VALDATA___V502*/ meltfptr[501]) /*_.VALDATA___V502*/ meltfptr[501] = (melt_ptr_t) sy_CLASS_OBJANYBLOCK; } /*^getnamedsymbol */ /*getnamedsym:OBLO_BODYL */ { melt_ptr_t sy_OBLO_BODYL = meltgc_named_symbol ("OBLO_BODYL", MELT_GET); if (sy_OBLO_BODYL && NULL == /*_.VALDATA___V512*/ meltfptr[511]) /*_.VALDATA___V512*/ meltfptr[511] = (melt_ptr_t) sy_OBLO_BODYL; } /*^getnamedsymbol */ /*getnamedsym:OBLO_EPIL */ { melt_ptr_t sy_OBLO_EPIL = meltgc_named_symbol ("OBLO_EPIL", MELT_GET); if (sy_OBLO_EPIL && NULL == /*_.VALDATA___V514*/ meltfptr[513]) /*_.VALDATA___V514*/ meltfptr[513] = (melt_ptr_t) sy_OBLO_EPIL; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPLAINBLOCK */ { melt_ptr_t sy_CLASS_OBJPLAINBLOCK = meltgc_named_symbol ("CLASS_OBJPLAINBLOCK", MELT_GET); if (sy_CLASS_OBJPLAINBLOCK && NULL == /*_.VALDATA___V516*/ meltfptr[515]) /*_.VALDATA___V516*/ meltfptr[515] = (melt_ptr_t) sy_CLASS_OBJPLAINBLOCK; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJMULTIALLOCBLOCK */ { melt_ptr_t sy_CLASS_OBJMULTIALLOCBLOCK = meltgc_named_symbol ("CLASS_OBJMULTIALLOCBLOCK", MELT_GET); if (sy_CLASS_OBJMULTIALLOCBLOCK && NULL == /*_.VALDATA___V522*/ meltfptr[521]) /*_.VALDATA___V522*/ meltfptr[521] = (melt_ptr_t) sy_CLASS_OBJMULTIALLOCBLOCK; } /*^getnamedsymbol */ /*getnamedsym:OMALBLO_ALLSTRUCT */ { melt_ptr_t sy_OMALBLO_ALLSTRUCT = meltgc_named_symbol ("OMALBLO_ALLSTRUCT", MELT_GET); if (sy_OMALBLO_ALLSTRUCT && NULL == /*_.VALDATA___V532*/ meltfptr[531]) /*_.VALDATA___V532*/ meltfptr[531] = (melt_ptr_t) sy_OMALBLO_ALLSTRUCT; } /*^getnamedsymbol */ /*getnamedsym:OMALBLO_NAME */ { melt_ptr_t sy_OMALBLO_NAME = meltgc_named_symbol ("OMALBLO_NAME", MELT_GET); if (sy_OMALBLO_NAME && NULL == /*_.VALDATA___V534*/ meltfptr[533]) /*_.VALDATA___V534*/ meltfptr[533] = (melt_ptr_t) sy_OMALBLO_NAME; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJCOMMENTEDBLOCK */ { melt_ptr_t sy_CLASS_OBJCOMMENTEDBLOCK = meltgc_named_symbol ("CLASS_OBJCOMMENTEDBLOCK", MELT_GET); if (sy_CLASS_OBJCOMMENTEDBLOCK && NULL == /*_.VALDATA___V536*/ meltfptr[535]) /*_.VALDATA___V536*/ meltfptr[535] = (melt_ptr_t) sy_CLASS_OBJCOMMENTEDBLOCK; } /*^getnamedsymbol */ /*getnamedsym:OCOMBLO_COMMENT */ { melt_ptr_t sy_OCOMBLO_COMMENT = meltgc_named_symbol ("OCOMBLO_COMMENT", MELT_GET); if (sy_OCOMBLO_COMMENT && NULL == /*_.VALDATA___V544*/ meltfptr[543]) /*_.VALDATA___V544*/ meltfptr[543] = (melt_ptr_t) sy_OCOMBLO_COMMENT; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJMULTIBLOCK */ { melt_ptr_t sy_CLASS_OBJMULTIBLOCK = meltgc_named_symbol ("CLASS_OBJMULTIBLOCK", MELT_GET); if (sy_CLASS_OBJMULTIBLOCK && NULL == /*_.VALDATA___V546*/ meltfptr[545]) /*_.VALDATA___V546*/ meltfptr[545] = (melt_ptr_t) sy_CLASS_OBJMULTIBLOCK; } /*^getnamedsymbol */ /*getnamedsym:OMULBLO_SUBCOMP */ { melt_ptr_t sy_OMULBLO_SUBCOMP = meltgc_named_symbol ("OMULBLO_SUBCOMP", MELT_GET); if (sy_OMULBLO_SUBCOMP && NULL == /*_.VALDATA___V554*/ meltfptr[553]) /*_.VALDATA___V554*/ meltfptr[553] = (melt_ptr_t) sy_OMULBLO_SUBCOMP; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJMATCHFLAGBLOCK */ { melt_ptr_t sy_CLASS_OBJMATCHFLAGBLOCK = meltgc_named_symbol ("CLASS_OBJMATCHFLAGBLOCK", MELT_GET); if (sy_CLASS_OBJMATCHFLAGBLOCK && NULL == /*_.VALDATA___V556*/ meltfptr[555]) /*_.VALDATA___V556*/ meltfptr[555] = (melt_ptr_t) sy_CLASS_OBJMATCHFLAGBLOCK; } /*^getnamedsymbol */ /*getnamedsym:OMCHFLGBLO_FLAGS */ { melt_ptr_t sy_OMCHFLGBLO_FLAGS = meltgc_named_symbol ("OMCHFLGBLO_FLAGS", MELT_GET); if (sy_OMCHFLGBLO_FLAGS && NULL == /*_.VALDATA___V564*/ meltfptr[563]) /*_.VALDATA___V564*/ meltfptr[563] = (melt_ptr_t) sy_OMCHFLGBLO_FLAGS; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJLABELINSTR */ { melt_ptr_t sy_CLASS_OBJLABELINSTR = meltgc_named_symbol ("CLASS_OBJLABELINSTR", MELT_GET); if (sy_CLASS_OBJLABELINSTR && NULL == /*_.VALDATA___V566*/ meltfptr[565]) /*_.VALDATA___V566*/ meltfptr[565] = (melt_ptr_t) sy_CLASS_OBJLABELINSTR; } /*^getnamedsymbol */ /*getnamedsym:OBLAB_PREFIX */ { melt_ptr_t sy_OBLAB_PREFIX = meltgc_named_symbol ("OBLAB_PREFIX", MELT_GET); if (sy_OBLAB_PREFIX && NULL == /*_.VALDATA___V576*/ meltfptr[575]) /*_.VALDATA___V576*/ meltfptr[575] = (melt_ptr_t) sy_OBLAB_PREFIX; } /*^getnamedsymbol */ /*getnamedsym:OBLAB_RANK */ { melt_ptr_t sy_OBLAB_RANK = meltgc_named_symbol ("OBLAB_RANK", MELT_GET); if (sy_OBLAB_RANK && NULL == /*_.VALDATA___V578*/ meltfptr[577]) /*_.VALDATA___V578*/ meltfptr[577] = (melt_ptr_t) sy_OBLAB_RANK; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJGOTOINSTR */ { melt_ptr_t sy_CLASS_OBJGOTOINSTR = meltgc_named_symbol ("CLASS_OBJGOTOINSTR", MELT_GET); if (sy_CLASS_OBJGOTOINSTR && NULL == /*_.VALDATA___V580*/ meltfptr[579]) /*_.VALDATA___V580*/ meltfptr[579] = (melt_ptr_t) sy_CLASS_OBJGOTOINSTR; } /*^getnamedsymbol */ /*getnamedsym:OBGOTO_PREFIX */ { melt_ptr_t sy_OBGOTO_PREFIX = meltgc_named_symbol ("OBGOTO_PREFIX", MELT_GET); if (sy_OBGOTO_PREFIX && NULL == /*_.VALDATA___V590*/ meltfptr[589]) /*_.VALDATA___V590*/ meltfptr[589] = (melt_ptr_t) sy_OBGOTO_PREFIX; } /*^getnamedsymbol */ /*getnamedsym:OBGOTO_RANK */ { melt_ptr_t sy_OBGOTO_RANK = meltgc_named_symbol ("OBGOTO_RANK", MELT_GET); if (sy_OBGOTO_RANK && NULL == /*_.VALDATA___V592*/ meltfptr[591]) /*_.VALDATA___V592*/ meltfptr[591] = (melt_ptr_t) sy_OBGOTO_RANK; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJLOOP */ { melt_ptr_t sy_CLASS_OBJLOOP = meltgc_named_symbol ("CLASS_OBJLOOP", MELT_GET); if (sy_CLASS_OBJLOOP && NULL == /*_.VALDATA___V594*/ meltfptr[593]) /*_.VALDATA___V594*/ meltfptr[593] = (melt_ptr_t) sy_CLASS_OBJLOOP; } /*^getnamedsymbol */ /*getnamedsym:OBLOOP_LABEL */ { melt_ptr_t sy_OBLOOP_LABEL = meltgc_named_symbol ("OBLOOP_LABEL", MELT_GET); if (sy_OBLOOP_LABEL && NULL == /*_.VALDATA___V604*/ meltfptr[603]) /*_.VALDATA___V604*/ meltfptr[603] = (melt_ptr_t) sy_OBLOOP_LABEL; } /*^getnamedsymbol */ /*getnamedsym:OBLOOP_RESV */ { melt_ptr_t sy_OBLOOP_RESV = meltgc_named_symbol ("OBLOOP_RESV", MELT_GET); if (sy_OBLOOP_RESV && NULL == /*_.VALDATA___V606*/ meltfptr[605]) /*_.VALDATA___V606*/ meltfptr[605] = (melt_ptr_t) sy_OBLOOP_RESV; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJEXIT */ { melt_ptr_t sy_CLASS_OBJEXIT = meltgc_named_symbol ("CLASS_OBJEXIT", MELT_GET); if (sy_CLASS_OBJEXIT && NULL == /*_.VALDATA___V608*/ meltfptr[607]) /*_.VALDATA___V608*/ meltfptr[607] = (melt_ptr_t) sy_CLASS_OBJEXIT; } /*^getnamedsymbol */ /*getnamedsym:OBEXIT_LABEL */ { melt_ptr_t sy_OBEXIT_LABEL = meltgc_named_symbol ("OBEXIT_LABEL", MELT_GET); if (sy_OBEXIT_LABEL && NULL == /*_.VALDATA___V616*/ meltfptr[615]) /*_.VALDATA___V616*/ meltfptr[615] = (melt_ptr_t) sy_OBEXIT_LABEL; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJAGAIN */ { melt_ptr_t sy_CLASS_OBJAGAIN = meltgc_named_symbol ("CLASS_OBJAGAIN", MELT_GET); if (sy_CLASS_OBJAGAIN && NULL == /*_.VALDATA___V618*/ meltfptr[617]) /*_.VALDATA___V618*/ meltfptr[617] = (melt_ptr_t) sy_CLASS_OBJAGAIN; } /*^getnamedsymbol */ /*getnamedsym:OBAGAIN_LABEL */ { melt_ptr_t sy_OBAGAIN_LABEL = meltgc_named_symbol ("OBAGAIN_LABEL", MELT_GET); if (sy_OBAGAIN_LABEL && NULL == /*_.VALDATA___V626*/ meltfptr[625]) /*_.VALDATA___V626*/ meltfptr[625] = (melt_ptr_t) sy_OBAGAIN_LABEL; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJCITERBLOCK */ { melt_ptr_t sy_CLASS_OBJCITERBLOCK = meltgc_named_symbol ("CLASS_OBJCITERBLOCK", MELT_GET); if (sy_CLASS_OBJCITERBLOCK && NULL == /*_.VALDATA___V628*/ meltfptr[627]) /*_.VALDATA___V628*/ meltfptr[627] = (melt_ptr_t) sy_CLASS_OBJCITERBLOCK; } /*^getnamedsymbol */ /*getnamedsym:OBCITER_CITER */ { melt_ptr_t sy_OBCITER_CITER = meltgc_named_symbol ("OBCITER_CITER", MELT_GET); if (sy_OBCITER_CITER && NULL == /*_.VALDATA___V640*/ meltfptr[639]) /*_.VALDATA___V640*/ meltfptr[639] = (melt_ptr_t) sy_OBCITER_CITER; } /*^getnamedsymbol */ /*getnamedsym:OBCITER_BEFORE */ { melt_ptr_t sy_OBCITER_BEFORE = meltgc_named_symbol ("OBCITER_BEFORE", MELT_GET); if (sy_OBCITER_BEFORE && NULL == /*_.VALDATA___V642*/ meltfptr[641]) /*_.VALDATA___V642*/ meltfptr[641] = (melt_ptr_t) sy_OBCITER_BEFORE; } /*^getnamedsymbol */ /*getnamedsym:OBCITER_AFTER */ { melt_ptr_t sy_OBCITER_AFTER = meltgc_named_symbol ("OBCITER_AFTER", MELT_GET); if (sy_OBCITER_AFTER && NULL == /*_.VALDATA___V644*/ meltfptr[643]) /*_.VALDATA___V644*/ meltfptr[643] = (melt_ptr_t) sy_OBCITER_AFTER; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJCOND */ { melt_ptr_t sy_CLASS_OBJCOND = meltgc_named_symbol ("CLASS_OBJCOND", MELT_GET); if (sy_CLASS_OBJCOND && NULL == /*_.VALDATA___V646*/ meltfptr[645]) /*_.VALDATA___V646*/ meltfptr[645] = (melt_ptr_t) sy_CLASS_OBJCOND; } /*^getnamedsymbol */ /*getnamedsym:OBCOND_TEST */ { melt_ptr_t sy_OBCOND_TEST = meltgc_named_symbol ("OBCOND_TEST", MELT_GET); if (sy_OBCOND_TEST && NULL == /*_.VALDATA___V658*/ meltfptr[657]) /*_.VALDATA___V658*/ meltfptr[657] = (melt_ptr_t) sy_OBCOND_TEST; } /*^getnamedsymbol */ /*getnamedsym:OBCOND_THEN */ { melt_ptr_t sy_OBCOND_THEN = meltgc_named_symbol ("OBCOND_THEN", MELT_GET); if (sy_OBCOND_THEN && NULL == /*_.VALDATA___V660*/ meltfptr[659]) /*_.VALDATA___V660*/ meltfptr[659] = (melt_ptr_t) sy_OBCOND_THEN; } /*^getnamedsymbol */ /*getnamedsym:OBCOND_ELSE */ { melt_ptr_t sy_OBCOND_ELSE = meltgc_named_symbol ("OBCOND_ELSE", MELT_GET); if (sy_OBCOND_ELSE && NULL == /*_.VALDATA___V662*/ meltfptr[661]) /*_.VALDATA___V662*/ meltfptr[661] = (melt_ptr_t) sy_OBCOND_ELSE; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJCPPIF */ { melt_ptr_t sy_CLASS_OBJCPPIF = meltgc_named_symbol ("CLASS_OBJCPPIF", MELT_GET); if (sy_CLASS_OBJCPPIF && NULL == /*_.VALDATA___V664*/ meltfptr[663]) /*_.VALDATA___V664*/ meltfptr[663] = (melt_ptr_t) sy_CLASS_OBJCPPIF; } /*^getnamedsymbol */ /*getnamedsym:OBIFP_COND */ { melt_ptr_t sy_OBIFP_COND = meltgc_named_symbol ("OBIFP_COND", MELT_GET); if (sy_OBIFP_COND && NULL == /*_.VALDATA___V676*/ meltfptr[675]) /*_.VALDATA___V676*/ meltfptr[675] = (melt_ptr_t) sy_OBIFP_COND; } /*^getnamedsymbol */ /*getnamedsym:OBIFP_THEN */ { melt_ptr_t sy_OBIFP_THEN = meltgc_named_symbol ("OBIFP_THEN", MELT_GET); if (sy_OBIFP_THEN && NULL == /*_.VALDATA___V678*/ meltfptr[677]) /*_.VALDATA___V678*/ meltfptr[677] = (melt_ptr_t) sy_OBIFP_THEN; } /*^getnamedsymbol */ /*getnamedsym:OBIFP_ELSE */ { melt_ptr_t sy_OBIFP_ELSE = meltgc_named_symbol ("OBIFP_ELSE", MELT_GET); if (sy_OBIFP_ELSE && NULL == /*_.VALDATA___V680*/ meltfptr[679]) /*_.VALDATA___V680*/ meltfptr[679] = (melt_ptr_t) sy_OBIFP_ELSE; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINTERNCOMMON */ { melt_ptr_t sy_CLASS_OBJINTERNCOMMON = meltgc_named_symbol ("CLASS_OBJINTERNCOMMON", MELT_GET); if (sy_CLASS_OBJINTERNCOMMON && NULL == /*_.VALDATA___V682*/ meltfptr[681]) /*_.VALDATA___V682*/ meltfptr[681] = (melt_ptr_t) sy_CLASS_OBJINTERNCOMMON; } /*^getnamedsymbol */ /*getnamedsym:OBINTERN_IOBJ */ { melt_ptr_t sy_OBINTERN_IOBJ = meltgc_named_symbol ("OBINTERN_IOBJ", MELT_GET); if (sy_OBINTERN_IOBJ && NULL == /*_.VALDATA___V690*/ meltfptr[689]) /*_.VALDATA___V690*/ meltfptr[689] = (melt_ptr_t) sy_OBINTERN_IOBJ; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINTERNSYMBOL */ { melt_ptr_t sy_CLASS_OBJINTERNSYMBOL = meltgc_named_symbol ("CLASS_OBJINTERNSYMBOL", MELT_GET); if (sy_CLASS_OBJINTERNSYMBOL && NULL == /*_.VALDATA___V692*/ meltfptr[691]) /*_.VALDATA___V692*/ meltfptr[691] = (melt_ptr_t) sy_CLASS_OBJINTERNSYMBOL; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINTERNKEYWORD */ { melt_ptr_t sy_CLASS_OBJINTERNKEYWORD = meltgc_named_symbol ("CLASS_OBJINTERNKEYWORD", MELT_GET); if (sy_CLASS_OBJINTERNKEYWORD && NULL == /*_.VALDATA___V698*/ meltfptr[697]) /*_.VALDATA___V698*/ meltfptr[697] = (melt_ptr_t) sy_CLASS_OBJINTERNKEYWORD; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJGETNAMEDCOMMON */ { melt_ptr_t sy_CLASS_OBJGETNAMEDCOMMON = meltgc_named_symbol ("CLASS_OBJGETNAMEDCOMMON", MELT_GET); if (sy_CLASS_OBJGETNAMEDCOMMON && NULL == /*_.VALDATA___V704*/ meltfptr[703]) /*_.VALDATA___V704*/ meltfptr[703] = (melt_ptr_t) sy_CLASS_OBJGETNAMEDCOMMON; } /*^getnamedsymbol */ /*getnamedsym:OBGNAMED_IOBJ */ { melt_ptr_t sy_OBGNAMED_IOBJ = meltgc_named_symbol ("OBGNAMED_IOBJ", MELT_GET); if (sy_OBGNAMED_IOBJ && NULL == /*_.VALDATA___V712*/ meltfptr[711]) /*_.VALDATA___V712*/ meltfptr[711] = (melt_ptr_t) sy_OBGNAMED_IOBJ; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJGETNAMEDSYMBOL */ { melt_ptr_t sy_CLASS_OBJGETNAMEDSYMBOL = meltgc_named_symbol ("CLASS_OBJGETNAMEDSYMBOL", MELT_GET); if (sy_CLASS_OBJGETNAMEDSYMBOL && NULL == /*_.VALDATA___V714*/ meltfptr[713]) /*_.VALDATA___V714*/ meltfptr[713] = (melt_ptr_t) sy_CLASS_OBJGETNAMEDSYMBOL; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJGETNAMEDKEYWORD */ { melt_ptr_t sy_CLASS_OBJGETNAMEDKEYWORD = meltgc_named_symbol ("CLASS_OBJGETNAMEDKEYWORD", MELT_GET); if (sy_CLASS_OBJGETNAMEDKEYWORD && NULL == /*_.VALDATA___V720*/ meltfptr[719]) /*_.VALDATA___V720*/ meltfptr[719] = (melt_ptr_t) sy_CLASS_OBJGETNAMEDKEYWORD; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJAPPLY */ { melt_ptr_t sy_CLASS_OBJAPPLY = meltgc_named_symbol ("CLASS_OBJAPPLY", MELT_GET); if (sy_CLASS_OBJAPPLY && NULL == /*_.VALDATA___V726*/ meltfptr[725]) /*_.VALDATA___V726*/ meltfptr[725] = (melt_ptr_t) sy_CLASS_OBJAPPLY; } /*^getnamedsymbol */ /*getnamedsym:OBAPP_CLOS */ { melt_ptr_t sy_OBAPP_CLOS = meltgc_named_symbol ("OBAPP_CLOS", MELT_GET); if (sy_OBAPP_CLOS && NULL == /*_.VALDATA___V736*/ meltfptr[735]) /*_.VALDATA___V736*/ meltfptr[735] = (melt_ptr_t) sy_OBAPP_CLOS; } /*^getnamedsymbol */ /*getnamedsym:OBAPP_ARGS */ { melt_ptr_t sy_OBAPP_ARGS = meltgc_named_symbol ("OBAPP_ARGS", MELT_GET); if (sy_OBAPP_ARGS && NULL == /*_.VALDATA___V738*/ meltfptr[737]) /*_.VALDATA___V738*/ meltfptr[737] = (melt_ptr_t) sy_OBAPP_ARGS; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJMULTIAPPLY */ { melt_ptr_t sy_CLASS_OBJMULTIAPPLY = meltgc_named_symbol ("CLASS_OBJMULTIAPPLY", MELT_GET); if (sy_CLASS_OBJMULTIAPPLY && NULL == /*_.VALDATA___V740*/ meltfptr[739]) /*_.VALDATA___V740*/ meltfptr[739] = (melt_ptr_t) sy_CLASS_OBJMULTIAPPLY; } /*^getnamedsymbol */ /*getnamedsym:OBMULTAPP_XRES */ { melt_ptr_t sy_OBMULTAPP_XRES = meltgc_named_symbol ("OBMULTAPP_XRES", MELT_GET); if (sy_OBMULTAPP_XRES && NULL == /*_.VALDATA___V748*/ meltfptr[747]) /*_.VALDATA___V748*/ meltfptr[747] = (melt_ptr_t) sy_OBMULTAPP_XRES; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJMSEND */ { melt_ptr_t sy_CLASS_OBJMSEND = meltgc_named_symbol ("CLASS_OBJMSEND", MELT_GET); if (sy_CLASS_OBJMSEND && NULL == /*_.VALDATA___V750*/ meltfptr[749]) /*_.VALDATA___V750*/ meltfptr[749] = (melt_ptr_t) sy_CLASS_OBJMSEND; } /*^getnamedsymbol */ /*getnamedsym:OBMSND_SEL */ { melt_ptr_t sy_OBMSND_SEL = meltgc_named_symbol ("OBMSND_SEL", MELT_GET); if (sy_OBMSND_SEL && NULL == /*_.VALDATA___V762*/ meltfptr[761]) /*_.VALDATA___V762*/ meltfptr[761] = (melt_ptr_t) sy_OBMSND_SEL; } /*^getnamedsymbol */ /*getnamedsym:OBMSND_RECV */ { melt_ptr_t sy_OBMSND_RECV = meltgc_named_symbol ("OBMSND_RECV", MELT_GET); if (sy_OBMSND_RECV && NULL == /*_.VALDATA___V764*/ meltfptr[763]) /*_.VALDATA___V764*/ meltfptr[763] = (melt_ptr_t) sy_OBMSND_RECV; } /*^getnamedsymbol */ /*getnamedsym:OBMSND_ARGS */ { melt_ptr_t sy_OBMSND_ARGS = meltgc_named_symbol ("OBMSND_ARGS", MELT_GET); if (sy_OBMSND_ARGS && NULL == /*_.VALDATA___V766*/ meltfptr[765]) /*_.VALDATA___V766*/ meltfptr[765] = (melt_ptr_t) sy_OBMSND_ARGS; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJMULTIMSEND */ { melt_ptr_t sy_CLASS_OBJMULTIMSEND = meltgc_named_symbol ("CLASS_OBJMULTIMSEND", MELT_GET); if (sy_CLASS_OBJMULTIMSEND && NULL == /*_.VALDATA___V768*/ meltfptr[767]) /*_.VALDATA___V768*/ meltfptr[767] = (melt_ptr_t) sy_CLASS_OBJMULTIMSEND; } /*^getnamedsymbol */ /*getnamedsym:OBMULTSND_XRES */ { melt_ptr_t sy_OBMULTSND_XRES = meltgc_named_symbol ("OBMULTSND_XRES", MELT_GET); if (sy_OBMULTSND_XRES && NULL == /*_.VALDATA___V776*/ meltfptr[775]) /*_.VALDATA___V776*/ meltfptr[775] = (melt_ptr_t) sy_OBMULTSND_XRES; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJRAWALLOCOBJ */ { melt_ptr_t sy_CLASS_OBJRAWALLOCOBJ = meltgc_named_symbol ("CLASS_OBJRAWALLOCOBJ", MELT_GET); if (sy_CLASS_OBJRAWALLOCOBJ && NULL == /*_.VALDATA___V778*/ meltfptr[777]) /*_.VALDATA___V778*/ meltfptr[777] = (melt_ptr_t) sy_CLASS_OBJRAWALLOCOBJ; } /*^getnamedsymbol */ /*getnamedsym:OBRALLOBJ_CLASS */ { melt_ptr_t sy_OBRALLOBJ_CLASS = meltgc_named_symbol ("OBRALLOBJ_CLASS", MELT_GET); if (sy_OBRALLOBJ_CLASS && NULL == /*_.VALDATA___V790*/ meltfptr[789]) /*_.VALDATA___V790*/ meltfptr[789] = (melt_ptr_t) sy_OBRALLOBJ_CLASS; } /*^getnamedsymbol */ /*getnamedsym:OBRALLOBJ_LEN */ { melt_ptr_t sy_OBRALLOBJ_LEN = meltgc_named_symbol ("OBRALLOBJ_LEN", MELT_GET); if (sy_OBRALLOBJ_LEN && NULL == /*_.VALDATA___V792*/ meltfptr[791]) /*_.VALDATA___V792*/ meltfptr[791] = (melt_ptr_t) sy_OBRALLOBJ_LEN; } /*^getnamedsymbol */ /*getnamedsym:OBRALLOBJ_CLASSNAME */ { melt_ptr_t sy_OBRALLOBJ_CLASSNAME = meltgc_named_symbol ("OBRALLOBJ_CLASSNAME", MELT_GET); if (sy_OBRALLOBJ_CLASSNAME && NULL == /*_.VALDATA___V794*/ meltfptr[793]) /*_.VALDATA___V794*/ meltfptr[793] = (melt_ptr_t) sy_OBRALLOBJ_CLASSNAME; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJDBGTRACEWRITEOBJ */ { melt_ptr_t sy_CLASS_OBJDBGTRACEWRITEOBJ = meltgc_named_symbol ("CLASS_OBJDBGTRACEWRITEOBJ", MELT_GET); if (sy_CLASS_OBJDBGTRACEWRITEOBJ && NULL == /*_.VALDATA___V796*/ meltfptr[795]) /*_.VALDATA___V796*/ meltfptr[795] = (melt_ptr_t) sy_CLASS_OBJDBGTRACEWRITEOBJ; } /*^getnamedsymbol */ /*getnamedsym:OBDTW_WRITTENOBJ */ { melt_ptr_t sy_OBDTW_WRITTENOBJ = meltgc_named_symbol ("OBDTW_WRITTENOBJ", MELT_GET); if (sy_OBDTW_WRITTENOBJ && NULL == /*_.VALDATA___V806*/ meltfptr[805]) /*_.VALDATA___V806*/ meltfptr[805] = (melt_ptr_t) sy_OBDTW_WRITTENOBJ; } /*^getnamedsymbol */ /*getnamedsym:OBDTW_MESSAGE */ { melt_ptr_t sy_OBDTW_MESSAGE = meltgc_named_symbol ("OBDTW_MESSAGE", MELT_GET); if (sy_OBDTW_MESSAGE && NULL == /*_.VALDATA___V808*/ meltfptr[807]) /*_.VALDATA___V808*/ meltfptr[807] = (melt_ptr_t) sy_OBDTW_MESSAGE; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJNEWCLOSURE */ { melt_ptr_t sy_CLASS_OBJNEWCLOSURE = meltgc_named_symbol ("CLASS_OBJNEWCLOSURE", MELT_GET); if (sy_CLASS_OBJNEWCLOSURE && NULL == /*_.VALDATA___V810*/ meltfptr[809]) /*_.VALDATA___V810*/ meltfptr[809] = (melt_ptr_t) sy_CLASS_OBJNEWCLOSURE; } /*^getnamedsymbol */ /*getnamedsym:OBNCLO_DISCR */ { melt_ptr_t sy_OBNCLO_DISCR = meltgc_named_symbol ("OBNCLO_DISCR", MELT_GET); if (sy_OBNCLO_DISCR && NULL == /*_.VALDATA___V822*/ meltfptr[821]) /*_.VALDATA___V822*/ meltfptr[821] = (melt_ptr_t) sy_OBNCLO_DISCR; } /*^getnamedsymbol */ /*getnamedsym:OBNCLO_ROUT */ { melt_ptr_t sy_OBNCLO_ROUT = meltgc_named_symbol ("OBNCLO_ROUT", MELT_GET); if (sy_OBNCLO_ROUT && NULL == /*_.VALDATA___V824*/ meltfptr[823]) /*_.VALDATA___V824*/ meltfptr[823] = (melt_ptr_t) sy_OBNCLO_ROUT; } /*^getnamedsymbol */ /*getnamedsym:OBNCLO_LEN */ { melt_ptr_t sy_OBNCLO_LEN = meltgc_named_symbol ("OBNCLO_LEN", MELT_GET); if (sy_OBNCLO_LEN && NULL == /*_.VALDATA___V826*/ meltfptr[825]) /*_.VALDATA___V826*/ meltfptr[825] = (melt_ptr_t) sy_OBNCLO_LEN; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTUPLE */ { melt_ptr_t sy_CLASS_OBJPUTUPLE = meltgc_named_symbol ("CLASS_OBJPUTUPLE", MELT_GET); if (sy_CLASS_OBJPUTUPLE && NULL == /*_.VALDATA___V828*/ meltfptr[827]) /*_.VALDATA___V828*/ meltfptr[827] = (melt_ptr_t) sy_CLASS_OBJPUTUPLE; } /*^getnamedsymbol */ /*getnamedsym:OPUTU_TUPLED */ { melt_ptr_t sy_OPUTU_TUPLED = meltgc_named_symbol ("OPUTU_TUPLED", MELT_GET); if (sy_OPUTU_TUPLED && NULL == /*_.VALDATA___V840*/ meltfptr[839]) /*_.VALDATA___V840*/ meltfptr[839] = (melt_ptr_t) sy_OPUTU_TUPLED; } /*^getnamedsymbol */ /*getnamedsym:OPUTU_OFFSET */ { melt_ptr_t sy_OPUTU_OFFSET = meltgc_named_symbol ("OPUTU_OFFSET", MELT_GET); if (sy_OPUTU_OFFSET && NULL == /*_.VALDATA___V842*/ meltfptr[841]) /*_.VALDATA___V842*/ meltfptr[841] = (melt_ptr_t) sy_OPUTU_OFFSET; } /*^getnamedsymbol */ /*getnamedsym:OPUTU_VALUE */ { melt_ptr_t sy_OPUTU_VALUE = meltgc_named_symbol ("OPUTU_VALUE", MELT_GET); if (sy_OPUTU_VALUE && NULL == /*_.VALDATA___V844*/ meltfptr[843]) /*_.VALDATA___V844*/ meltfptr[843] = (melt_ptr_t) sy_OPUTU_VALUE; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTPAIR */ { melt_ptr_t sy_CLASS_OBJPUTPAIR = meltgc_named_symbol ("CLASS_OBJPUTPAIR", MELT_GET); if (sy_CLASS_OBJPUTPAIR && NULL == /*_.VALDATA___V846*/ meltfptr[845]) /*_.VALDATA___V846*/ meltfptr[845] = (melt_ptr_t) sy_CLASS_OBJPUTPAIR; } /*^getnamedsymbol */ /*getnamedsym:OPUTP_PAIR */ { melt_ptr_t sy_OPUTP_PAIR = meltgc_named_symbol ("OPUTP_PAIR", MELT_GET); if (sy_OPUTP_PAIR && NULL == /*_.VALDATA___V854*/ meltfptr[853]) /*_.VALDATA___V854*/ meltfptr[853] = (melt_ptr_t) sy_OPUTP_PAIR; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTPAIRHEAD */ { melt_ptr_t sy_CLASS_OBJPUTPAIRHEAD = meltgc_named_symbol ("CLASS_OBJPUTPAIRHEAD", MELT_GET); if (sy_CLASS_OBJPUTPAIRHEAD && NULL == /*_.VALDATA___V856*/ meltfptr[855]) /*_.VALDATA___V856*/ meltfptr[855] = (melt_ptr_t) sy_CLASS_OBJPUTPAIRHEAD; } /*^getnamedsymbol */ /*getnamedsym:OPUTP_HEAD */ { melt_ptr_t sy_OPUTP_HEAD = meltgc_named_symbol ("OPUTP_HEAD", MELT_GET); if (sy_OPUTP_HEAD && NULL == /*_.VALDATA___V864*/ meltfptr[863]) /*_.VALDATA___V864*/ meltfptr[863] = (melt_ptr_t) sy_OPUTP_HEAD; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTPAIRTAIL */ { melt_ptr_t sy_CLASS_OBJPUTPAIRTAIL = meltgc_named_symbol ("CLASS_OBJPUTPAIRTAIL", MELT_GET); if (sy_CLASS_OBJPUTPAIRTAIL && NULL == /*_.VALDATA___V866*/ meltfptr[865]) /*_.VALDATA___V866*/ meltfptr[865] = (melt_ptr_t) sy_CLASS_OBJPUTPAIRTAIL; } /*^getnamedsymbol */ /*getnamedsym:OPUTP_TAIL */ { melt_ptr_t sy_OPUTP_TAIL = meltgc_named_symbol ("OPUTP_TAIL", MELT_GET); if (sy_OPUTP_TAIL && NULL == /*_.VALDATA___V874*/ meltfptr[873]) /*_.VALDATA___V874*/ meltfptr[873] = (melt_ptr_t) sy_OPUTP_TAIL; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTLIST */ { melt_ptr_t sy_CLASS_OBJPUTLIST = meltgc_named_symbol ("CLASS_OBJPUTLIST", MELT_GET); if (sy_CLASS_OBJPUTLIST && NULL == /*_.VALDATA___V876*/ meltfptr[875]) /*_.VALDATA___V876*/ meltfptr[875] = (melt_ptr_t) sy_CLASS_OBJPUTLIST; } /*^getnamedsymbol */ /*getnamedsym:OPUTL_LIST */ { melt_ptr_t sy_OPUTL_LIST = meltgc_named_symbol ("OPUTL_LIST", MELT_GET); if (sy_OPUTL_LIST && NULL == /*_.VALDATA___V888*/ meltfptr[887]) /*_.VALDATA___V888*/ meltfptr[887] = (melt_ptr_t) sy_OPUTL_LIST; } /*^getnamedsymbol */ /*getnamedsym:OPUTL_FIRST */ { melt_ptr_t sy_OPUTL_FIRST = meltgc_named_symbol ("OPUTL_FIRST", MELT_GET); if (sy_OPUTL_FIRST && NULL == /*_.VALDATA___V890*/ meltfptr[889]) /*_.VALDATA___V890*/ meltfptr[889] = (melt_ptr_t) sy_OPUTL_FIRST; } /*^getnamedsymbol */ /*getnamedsym:OPUTL_LAST */ { melt_ptr_t sy_OPUTL_LAST = meltgc_named_symbol ("OPUTL_LAST", MELT_GET); if (sy_OPUTL_LAST && NULL == /*_.VALDATA___V892*/ meltfptr[891]) /*_.VALDATA___V892*/ meltfptr[891] = (melt_ptr_t) sy_OPUTL_LAST; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTSLOT */ { melt_ptr_t sy_CLASS_OBJPUTSLOT = meltgc_named_symbol ("CLASS_OBJPUTSLOT", MELT_GET); if (sy_CLASS_OBJPUTSLOT && NULL == /*_.VALDATA___V894*/ meltfptr[893]) /*_.VALDATA___V894*/ meltfptr[893] = (melt_ptr_t) sy_CLASS_OBJPUTSLOT; } /*^getnamedsymbol */ /*getnamedsym:OSLOT_ODATA */ { melt_ptr_t sy_OSLOT_ODATA = meltgc_named_symbol ("OSLOT_ODATA", MELT_GET); if (sy_OSLOT_ODATA && NULL == /*_.VALDATA___V908*/ meltfptr[907]) /*_.VALDATA___V908*/ meltfptr[907] = (melt_ptr_t) sy_OSLOT_ODATA; } /*^getnamedsymbol */ /*getnamedsym:OSLOT_OFFSET */ { melt_ptr_t sy_OSLOT_OFFSET = meltgc_named_symbol ("OSLOT_OFFSET", MELT_GET); if (sy_OSLOT_OFFSET && NULL == /*_.VALDATA___V910*/ meltfptr[909]) /*_.VALDATA___V910*/ meltfptr[909] = (melt_ptr_t) sy_OSLOT_OFFSET; } /*^getnamedsymbol */ /*getnamedsym:OSLOT_FIELD */ { melt_ptr_t sy_OSLOT_FIELD = meltgc_named_symbol ("OSLOT_FIELD", MELT_GET); if (sy_OSLOT_FIELD && NULL == /*_.VALDATA___V912*/ meltfptr[911]) /*_.VALDATA___V912*/ meltfptr[911] = (melt_ptr_t) sy_OSLOT_FIELD; } /*^getnamedsymbol */ /*getnamedsym:OSLOT_VALUE */ { melt_ptr_t sy_OSLOT_VALUE = meltgc_named_symbol ("OSLOT_VALUE", MELT_GET); if (sy_OSLOT_VALUE && NULL == /*_.VALDATA___V914*/ meltfptr[913]) /*_.VALDATA___V914*/ meltfptr[913] = (melt_ptr_t) sy_OSLOT_VALUE; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJGETSLOT */ { melt_ptr_t sy_CLASS_OBJGETSLOT = meltgc_named_symbol ("CLASS_OBJGETSLOT", MELT_GET); if (sy_CLASS_OBJGETSLOT && NULL == /*_.VALDATA___V916*/ meltfptr[915]) /*_.VALDATA___V916*/ meltfptr[915] = (melt_ptr_t) sy_CLASS_OBJGETSLOT; } /*^getnamedsymbol */ /*getnamedsym:OGETSL_OBJ */ { melt_ptr_t sy_OGETSL_OBJ = meltgc_named_symbol ("OGETSL_OBJ", MELT_GET); if (sy_OGETSL_OBJ && NULL == /*_.VALDATA___V926*/ meltfptr[925]) /*_.VALDATA___V926*/ meltfptr[925] = (melt_ptr_t) sy_OGETSL_OBJ; } /*^getnamedsymbol */ /*getnamedsym:OGETSL_FIELD */ { melt_ptr_t sy_OGETSL_FIELD = meltgc_named_symbol ("OGETSL_FIELD", MELT_GET); if (sy_OGETSL_FIELD && NULL == /*_.VALDATA___V928*/ meltfptr[927]) /*_.VALDATA___V928*/ meltfptr[927] = (melt_ptr_t) sy_OGETSL_FIELD; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTCLOSUROUT */ { melt_ptr_t sy_CLASS_OBJPUTCLOSUROUT = meltgc_named_symbol ("CLASS_OBJPUTCLOSUROUT", MELT_GET); if (sy_CLASS_OBJPUTCLOSUROUT && NULL == /*_.VALDATA___V930*/ meltfptr[929]) /*_.VALDATA___V930*/ meltfptr[929] = (melt_ptr_t) sy_CLASS_OBJPUTCLOSUROUT; } /*^getnamedsymbol */ /*getnamedsym:OPCLOR_CLOS */ { melt_ptr_t sy_OPCLOR_CLOS = meltgc_named_symbol ("OPCLOR_CLOS", MELT_GET); if (sy_OPCLOR_CLOS && NULL == /*_.VALDATA___V940*/ meltfptr[939]) /*_.VALDATA___V940*/ meltfptr[939] = (melt_ptr_t) sy_OPCLOR_CLOS; } /*^getnamedsymbol */ /*getnamedsym:OPCLOR_ROUT */ { melt_ptr_t sy_OPCLOR_ROUT = meltgc_named_symbol ("OPCLOR_ROUT", MELT_GET); if (sy_OPCLOR_ROUT && NULL == /*_.VALDATA___V942*/ meltfptr[941]) /*_.VALDATA___V942*/ meltfptr[941] = (melt_ptr_t) sy_OPCLOR_ROUT; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTCLOSEDV */ { melt_ptr_t sy_CLASS_OBJPUTCLOSEDV = meltgc_named_symbol ("CLASS_OBJPUTCLOSEDV", MELT_GET); if (sy_CLASS_OBJPUTCLOSEDV && NULL == /*_.VALDATA___V944*/ meltfptr[943]) /*_.VALDATA___V944*/ meltfptr[943] = (melt_ptr_t) sy_CLASS_OBJPUTCLOSEDV; } /*^getnamedsymbol */ /*getnamedsym:OPCLOV_CLOS */ { melt_ptr_t sy_OPCLOV_CLOS = meltgc_named_symbol ("OPCLOV_CLOS", MELT_GET); if (sy_OPCLOV_CLOS && NULL == /*_.VALDATA___V956*/ meltfptr[955]) /*_.VALDATA___V956*/ meltfptr[955] = (melt_ptr_t) sy_OPCLOV_CLOS; } /*^getnamedsymbol */ /*getnamedsym:OPCLOV_OFF */ { melt_ptr_t sy_OPCLOV_OFF = meltgc_named_symbol ("OPCLOV_OFF", MELT_GET); if (sy_OPCLOV_OFF && NULL == /*_.VALDATA___V958*/ meltfptr[957]) /*_.VALDATA___V958*/ meltfptr[957] = (melt_ptr_t) sy_OPCLOV_OFF; } /*^getnamedsymbol */ /*getnamedsym:OPCLOV_CVAL */ { melt_ptr_t sy_OPCLOV_CVAL = meltgc_named_symbol ("OPCLOV_CVAL", MELT_GET); if (sy_OPCLOV_CVAL && NULL == /*_.VALDATA___V960*/ meltfptr[959]) /*_.VALDATA___V960*/ meltfptr[959] = (melt_ptr_t) sy_OPCLOV_CVAL; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTCLOSEDNOTNULLV */ { melt_ptr_t sy_CLASS_OBJPUTCLOSEDNOTNULLV = meltgc_named_symbol ("CLASS_OBJPUTCLOSEDNOTNULLV", MELT_GET); if (sy_CLASS_OBJPUTCLOSEDNOTNULLV && NULL == /*_.VALDATA___V962*/ meltfptr[961]) /*_.VALDATA___V962*/ meltfptr[961] = (melt_ptr_t) sy_CLASS_OBJPUTCLOSEDNOTNULLV; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTROUTCONST */ { melt_ptr_t sy_CLASS_OBJPUTROUTCONST = meltgc_named_symbol ("CLASS_OBJPUTROUTCONST", MELT_GET); if (sy_CLASS_OBJPUTROUTCONST && NULL == /*_.VALDATA___V968*/ meltfptr[967]) /*_.VALDATA___V968*/ meltfptr[967] = (melt_ptr_t) sy_CLASS_OBJPUTROUTCONST; } /*^getnamedsymbol */ /*getnamedsym:OPRCONST_ROUT */ { melt_ptr_t sy_OPRCONST_ROUT = meltgc_named_symbol ("OPRCONST_ROUT", MELT_GET); if (sy_OPRCONST_ROUT && NULL == /*_.VALDATA___V980*/ meltfptr[979]) /*_.VALDATA___V980*/ meltfptr[979] = (melt_ptr_t) sy_OPRCONST_ROUT; } /*^getnamedsymbol */ /*getnamedsym:OPRCONST_OFF */ { melt_ptr_t sy_OPRCONST_OFF = meltgc_named_symbol ("OPRCONST_OFF", MELT_GET); if (sy_OPRCONST_OFF && NULL == /*_.VALDATA___V982*/ meltfptr[981]) /*_.VALDATA___V982*/ meltfptr[981] = (melt_ptr_t) sy_OPRCONST_OFF; } /*^getnamedsymbol */ /*getnamedsym:OPRCONST_CVAL */ { melt_ptr_t sy_OPRCONST_CVAL = meltgc_named_symbol ("OPRCONST_CVAL", MELT_GET); if (sy_OPRCONST_CVAL && NULL == /*_.VALDATA___V984*/ meltfptr[983]) /*_.VALDATA___V984*/ meltfptr[983] = (melt_ptr_t) sy_OPRCONST_CVAL; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTROUTCONSTNOTNULL */ { melt_ptr_t sy_CLASS_OBJPUTROUTCONSTNOTNULL = meltgc_named_symbol ("CLASS_OBJPUTROUTCONSTNOTNULL", MELT_GET); if (sy_CLASS_OBJPUTROUTCONSTNOTNULL && NULL == /*_.VALDATA___V986*/ meltfptr[985]) /*_.VALDATA___V986*/ meltfptr[985] = (melt_ptr_t) sy_CLASS_OBJPUTROUTCONSTNOTNULL; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJTOUCH */ { melt_ptr_t sy_CLASS_OBJTOUCH = meltgc_named_symbol ("CLASS_OBJTOUCH", MELT_GET); if (sy_CLASS_OBJTOUCH && NULL == /*_.VALDATA___V992*/ meltfptr[991]) /*_.VALDATA___V992*/ meltfptr[991] = (melt_ptr_t) sy_CLASS_OBJTOUCH; } /*^getnamedsymbol */ /*getnamedsym:OTOUCH_VAL */ { melt_ptr_t sy_OTOUCH_VAL = meltgc_named_symbol ("OTOUCH_VAL", MELT_GET); if (sy_OTOUCH_VAL && NULL == /*_.VALDATA___V1002*/ meltfptr[1001]) /*_.VALDATA___V1002*/ meltfptr[1001] = (melt_ptr_t) sy_OTOUCH_VAL; } /*^getnamedsymbol */ /*getnamedsym:OTOUCH_COMMENT */ { melt_ptr_t sy_OTOUCH_COMMENT = meltgc_named_symbol ("OTOUCH_COMMENT", MELT_GET); if (sy_OTOUCH_COMMENT && NULL == /*_.VALDATA___V1004*/ meltfptr[1003]) /*_.VALDATA___V1004*/ meltfptr[1003] = (melt_ptr_t) sy_OTOUCH_COMMENT; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJSETPREDEF */ { melt_ptr_t sy_CLASS_OBJSETPREDEF = meltgc_named_symbol ("CLASS_OBJSETPREDEF", MELT_GET); if (sy_CLASS_OBJSETPREDEF && NULL == /*_.VALDATA___V1006*/ meltfptr[1005]) /*_.VALDATA___V1006*/ meltfptr[1005] = (melt_ptr_t) sy_CLASS_OBJSETPREDEF; } /*^getnamedsymbol */ /*getnamedsym:OSPR_OBJECT */ { melt_ptr_t sy_OSPR_OBJECT = meltgc_named_symbol ("OSPR_OBJECT", MELT_GET); if (sy_OSPR_OBJECT && NULL == /*_.VALDATA___V1016*/ meltfptr[1015]) /*_.VALDATA___V1016*/ meltfptr[1015] = (melt_ptr_t) sy_OSPR_OBJECT; } /*^getnamedsymbol */ /*getnamedsym:OSPR_PREDEF */ { melt_ptr_t sy_OSPR_PREDEF = meltgc_named_symbol ("OSPR_PREDEF", MELT_GET); if (sy_OSPR_PREDEF && NULL == /*_.VALDATA___V1018*/ meltfptr[1017]) /*_.VALDATA___V1018*/ meltfptr[1017] = (melt_ptr_t) sy_OSPR_PREDEF; } /*^getnamedsymbol */ /*getnamedsym:CLASS_ROUTINEOBJ */ { melt_ptr_t sy_CLASS_ROUTINEOBJ = meltgc_named_symbol ("CLASS_ROUTINEOBJ", MELT_GET); if (sy_CLASS_ROUTINEOBJ && NULL == /*_.VALDATA___V1020*/ meltfptr[1019]) /*_.VALDATA___V1020*/ meltfptr[1019] = (melt_ptr_t) sy_CLASS_ROUTINEOBJ; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NAMED */ { melt_ptr_t sy_CLASS_NAMED = meltgc_named_symbol ("CLASS_NAMED", MELT_GET); if (sy_CLASS_NAMED && NULL == /*_.VALDATA___V1022*/ meltfptr[1021]) /*_.VALDATA___V1022*/ meltfptr[1021] = (melt_ptr_t) sy_CLASS_NAMED; } /*^getnamedsymbol */ /*getnamedsym:OBROUT_PROC */ { melt_ptr_t sy_OBROUT_PROC = meltgc_named_symbol ("OBROUT_PROC", MELT_GET); if (sy_OBROUT_PROC && NULL == /*_.VALDATA___V1044*/ meltfptr[1043]) /*_.VALDATA___V1044*/ meltfptr[1043] = (melt_ptr_t) sy_OBROUT_PROC; } /*^getnamedsymbol */ /*getnamedsym:OBROUT_BODY */ { melt_ptr_t sy_OBROUT_BODY = meltgc_named_symbol ("OBROUT_BODY", MELT_GET); if (sy_OBROUT_BODY && NULL == /*_.VALDATA___V1046*/ meltfptr[1045]) /*_.VALDATA___V1046*/ meltfptr[1045] = (melt_ptr_t) sy_OBROUT_BODY; } /*^getnamedsymbol */ /*getnamedsym:OBROUT_NBVAL */ { melt_ptr_t sy_OBROUT_NBVAL = meltgc_named_symbol ("OBROUT_NBVAL", MELT_GET); if (sy_OBROUT_NBVAL && NULL == /*_.VALDATA___V1048*/ meltfptr[1047]) /*_.VALDATA___V1048*/ meltfptr[1047] = (melt_ptr_t) sy_OBROUT_NBVAL; } /*^getnamedsymbol */ /*getnamedsym:OBROUT_NBLONG */ { melt_ptr_t sy_OBROUT_NBLONG = meltgc_named_symbol ("OBROUT_NBLONG", MELT_GET); if (sy_OBROUT_NBLONG && NULL == /*_.VALDATA___V1050*/ meltfptr[1049]) /*_.VALDATA___V1050*/ meltfptr[1049] = (melt_ptr_t) sy_OBROUT_NBLONG; } /*^getnamedsymbol */ /*getnamedsym:OBROUT_OTHERS */ { melt_ptr_t sy_OBROUT_OTHERS = meltgc_named_symbol ("OBROUT_OTHERS", MELT_GET); if (sy_OBROUT_OTHERS && NULL == /*_.VALDATA___V1052*/ meltfptr[1051]) /*_.VALDATA___V1052*/ meltfptr[1051] = (melt_ptr_t) sy_OBROUT_OTHERS; } /*^getnamedsymbol */ /*getnamedsym:OBROUT_RETVAL */ { melt_ptr_t sy_OBROUT_RETVAL = meltgc_named_symbol ("OBROUT_RETVAL", MELT_GET); if (sy_OBROUT_RETVAL && NULL == /*_.VALDATA___V1054*/ meltfptr[1053]) /*_.VALDATA___V1054*/ meltfptr[1053] = (melt_ptr_t) sy_OBROUT_RETVAL; } /*^getnamedsymbol */ /*getnamedsym:OBROUT_CNTCITER */ { melt_ptr_t sy_OBROUT_CNTCITER = meltgc_named_symbol ("OBROUT_CNTCITER", MELT_GET); if (sy_OBROUT_CNTCITER && NULL == /*_.VALDATA___V1056*/ meltfptr[1055]) /*_.VALDATA___V1056*/ meltfptr[1055] = (melt_ptr_t) sy_OBROUT_CNTCITER; } /*^getnamedsymbol */ /*getnamedsym:OBROUT_CNTLETREC */ { melt_ptr_t sy_OBROUT_CNTLETREC = meltgc_named_symbol ("OBROUT_CNTLETREC", MELT_GET); if (sy_OBROUT_CNTLETREC && NULL == /*_.VALDATA___V1058*/ meltfptr[1057]) /*_.VALDATA___V1058*/ meltfptr[1057] = (melt_ptr_t) sy_OBROUT_CNTLETREC; } /*^getnamedsymbol */ /*getnamedsym:CLASS_PROCROUTINEOBJ */ { melt_ptr_t sy_CLASS_PROCROUTINEOBJ = meltgc_named_symbol ("CLASS_PROCROUTINEOBJ", MELT_GET); if (sy_CLASS_PROCROUTINEOBJ && NULL == /*_.VALDATA___V1060*/ meltfptr[1059]) /*_.VALDATA___V1060*/ meltfptr[1059] = (melt_ptr_t) sy_CLASS_PROCROUTINEOBJ; } /*^getnamedsymbol */ /*getnamedsym:OPROUT_GETARGS */ { melt_ptr_t sy_OPROUT_GETARGS = meltgc_named_symbol ("OPROUT_GETARGS", MELT_GET); if (sy_OPROUT_GETARGS && NULL == /*_.VALDATA___V1076*/ meltfptr[1075]) /*_.VALDATA___V1076*/ meltfptr[1075] = (melt_ptr_t) sy_OPROUT_GETARGS; } /*^getnamedsymbol */ /*getnamedsym:OPROUT_LOC */ { melt_ptr_t sy_OPROUT_LOC = meltgc_named_symbol ("OPROUT_LOC", MELT_GET); if (sy_OPROUT_LOC && NULL == /*_.VALDATA___V1078*/ meltfptr[1077]) /*_.VALDATA___V1078*/ meltfptr[1077] = (melt_ptr_t) sy_OPROUT_LOC; } /*^getnamedsymbol */ /*getnamedsym:OPROUT_FUNAM */ { melt_ptr_t sy_OPROUT_FUNAM = meltgc_named_symbol ("OPROUT_FUNAM", MELT_GET); if (sy_OPROUT_FUNAM && NULL == /*_.VALDATA___V1080*/ meltfptr[1079]) /*_.VALDATA___V1080*/ meltfptr[1079] = (melt_ptr_t) sy_OPROUT_FUNAM; } /*^getnamedsymbol */ /*getnamedsym:OPROUT_RESTNAM */ { melt_ptr_t sy_OPROUT_RESTNAM = meltgc_named_symbol ("OPROUT_RESTNAM", MELT_GET); if (sy_OPROUT_RESTNAM && NULL == /*_.VALDATA___V1082*/ meltfptr[1081]) /*_.VALDATA___V1082*/ meltfptr[1081] = (melt_ptr_t) sy_OPROUT_RESTNAM; } /*^getnamedsymbol */ /*getnamedsym:OPROUT_FILENUM */ { melt_ptr_t sy_OPROUT_FILENUM = meltgc_named_symbol ("OPROUT_FILENUM", MELT_GET); if (sy_OPROUT_FILENUM && NULL == /*_.VALDATA___V1084*/ meltfptr[1083]) /*_.VALDATA___V1084*/ meltfptr[1083] = (melt_ptr_t) sy_OPROUT_FILENUM; } /*^getnamedsymbol */ /*getnamedsym:CLASS_INITIALROUTINEOBJ */ { melt_ptr_t sy_CLASS_INITIALROUTINEOBJ = meltgc_named_symbol ("CLASS_INITIALROUTINEOBJ", MELT_GET); if (sy_CLASS_INITIALROUTINEOBJ && NULL == /*_.VALDATA___V1086*/ meltfptr[1085]) /*_.VALDATA___V1086*/ meltfptr[1085] = (melt_ptr_t) sy_CLASS_INITIALROUTINEOBJ; } /*^getnamedsymbol */ /*getnamedsym:OIROUT_DATA */ { melt_ptr_t sy_OIROUT_DATA = meltgc_named_symbol ("OIROUT_DATA", MELT_GET); if (sy_OIROUT_DATA && NULL == /*_.VALDATA___V1098*/ meltfptr[1097]) /*_.VALDATA___V1098*/ meltfptr[1097] = (melt_ptr_t) sy_OIROUT_DATA; } /*^getnamedsymbol */ /*getnamedsym:OIROUT_PROLOG */ { melt_ptr_t sy_OIROUT_PROLOG = meltgc_named_symbol ("OIROUT_PROLOG", MELT_GET); if (sy_OIROUT_PROLOG && NULL == /*_.VALDATA___V1100*/ meltfptr[1099]) /*_.VALDATA___V1100*/ meltfptr[1099] = (melt_ptr_t) sy_OIROUT_PROLOG; } /*^getnamedsymbol */ /*getnamedsym:OIROUT_FILL */ { melt_ptr_t sy_OIROUT_FILL = meltgc_named_symbol ("OIROUT_FILL", MELT_GET); if (sy_OIROUT_FILL && NULL == /*_.VALDATA___V1102*/ meltfptr[1101]) /*_.VALDATA___V1102*/ meltfptr[1101] = (melt_ptr_t) sy_OIROUT_FILL; } /*^getnamedsymbol */ /*getnamedsym:CLASS_INITIAL_MODULE_ROUTINEOBJ */ { melt_ptr_t sy_CLASS_INITIAL_MODULE_ROUTINEOBJ = meltgc_named_symbol ("CLASS_INITIAL_MODULE_ROUTINEOBJ", MELT_GET); if (sy_CLASS_INITIAL_MODULE_ROUTINEOBJ && NULL == /*_.VALDATA___V1104*/ meltfptr[1103]) /*_.VALDATA___V1104*/ meltfptr[1103] = (melt_ptr_t) sy_CLASS_INITIAL_MODULE_ROUTINEOBJ; } /*^getnamedsymbol */ /*getnamedsym:OIROUT_MODULENAME */ { melt_ptr_t sy_OIROUT_MODULENAME = meltgc_named_symbol ("OIROUT_MODULENAME", MELT_GET); if (sy_OIROUT_MODULENAME && NULL == /*_.VALDATA___V1112*/ meltfptr[1111]) /*_.VALDATA___V1112*/ meltfptr[1111] = (melt_ptr_t) sy_OIROUT_MODULENAME; } /*^getnamedsymbol */ /*getnamedsym:CLASS_INITIAL_EXTENSION_ROUTINEOBJ */ { melt_ptr_t sy_CLASS_INITIAL_EXTENSION_ROUTINEOBJ = meltgc_named_symbol ("CLASS_INITIAL_EXTENSION_ROUTINEOBJ", MELT_GET); if (sy_CLASS_INITIAL_EXTENSION_ROUTINEOBJ && NULL == /*_.VALDATA___V1114*/ meltfptr[1113]) /*_.VALDATA___V1114*/ meltfptr[1113] = (melt_ptr_t) sy_CLASS_INITIAL_EXTENSION_ROUTINEOBJ; } /*^getnamedsymbol */ /*getnamedsym:OIROUTX_EXTENDNAME */ { melt_ptr_t sy_OIROUTX_EXTENDNAME = meltgc_named_symbol ("OIROUTX_EXTENDNAME", MELT_GET); if (sy_OIROUTX_EXTENDNAME && NULL == /*_.VALDATA___V1122*/ meltfptr[1121]) /*_.VALDATA___V1122*/ meltfptr[1121] = (melt_ptr_t) sy_OIROUTX_EXTENDNAME; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJBLOCK */ { melt_ptr_t sy_CLASS_OBJBLOCK = meltgc_named_symbol ("CLASS_OBJBLOCK", MELT_GET); if (sy_CLASS_OBJBLOCK && NULL == /*_.VALDATA___V1124*/ meltfptr[1123]) /*_.VALDATA___V1124*/ meltfptr[1123] = (melt_ptr_t) sy_CLASS_OBJBLOCK; } /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJCHECKINTERRUPT */ { melt_ptr_t sy_CLASS_OBJCHECKINTERRUPT = meltgc_named_symbol ("CLASS_OBJCHECKINTERRUPT", MELT_GET); if (sy_CLASS_OBJCHECKINTERRUPT && NULL == /*_.VALDATA___V1126*/ meltfptr[1125]) /*_.VALDATA___V1126*/ meltfptr[1125] = (melt_ptr_t) sy_CLASS_OBJCHECKINTERRUPT; } /*^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___V1130*/ meltfptr[1129]) /*_.VALDATA___V1130*/ meltfptr[1129] = (melt_ptr_t) sy_MELT_DEBUG_FUN; } /*^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___V1132*/ meltfptr[1131]) /*_.VALDATA___V1132*/ meltfptr[1131] = (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___V1134*/ meltfptr[1133]) /*_.VALDATA___V1134*/ meltfptr[1133] = (melt_ptr_t) sy_DISCR_MIXED_LOCATION; } /*^getnamedsymbol */ /*getnamedsym:CLASS_CTYPE */ { melt_ptr_t sy_CLASS_CTYPE = meltgc_named_symbol ("CLASS_CTYPE", MELT_GET); if (sy_CLASS_CTYPE && NULL == /*_.VALDATA___V1136*/ meltfptr[1135]) /*_.VALDATA___V1136*/ meltfptr[1135] = (melt_ptr_t) sy_CLASS_CTYPE; } /*^getnamedsymbol */ /*getnamedsym:DISCR_LIST */ { melt_ptr_t sy_DISCR_LIST = meltgc_named_symbol ("DISCR_LIST", MELT_GET); if (sy_DISCR_LIST && NULL == /*_.VALDATA___V1138*/ meltfptr[1137]) /*_.VALDATA___V1138*/ meltfptr[1137] = (melt_ptr_t) sy_DISCR_LIST; } /*^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___V1140*/ meltfptr[1139]) /*_.VALDATA___V1140*/ meltfptr[1139] = (melt_ptr_t) sy_DISCR_CONSTANT_INTEGER; } /*^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___V1142*/ meltfptr[1141]) /*_.VALDATA___V1142*/ meltfptr[1141] = (melt_ptr_t) sy_DISCR_VERBATIM_STRING; } /*^getnamedsymbol */ /*getnamedsym:LIST_APPEND2LIST */ { melt_ptr_t sy_LIST_APPEND2LIST = meltgc_named_symbol ("LIST_APPEND2LIST", MELT_GET); if (sy_LIST_APPEND2LIST && NULL == /*_.VALDATA___V1144*/ meltfptr[1143]) /*_.VALDATA___V1144*/ meltfptr[1143] = (melt_ptr_t) sy_LIST_APPEND2LIST; } /*^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___V1146*/ meltfptr[1145]) /*_.VALDATA___V1146*/ meltfptr[1145] = (melt_ptr_t) sy_LIST_TO_MULTIPLE; } /*^getnamedsymbol */ /*getnamedsym:DISCR_MULTIPLE */ { melt_ptr_t sy_DISCR_MULTIPLE = meltgc_named_symbol ("DISCR_MULTIPLE", MELT_GET); if (sy_DISCR_MULTIPLE && NULL == /*_.VALDATA___V1148*/ meltfptr[1147]) /*_.VALDATA___V1148*/ meltfptr[1147] = (melt_ptr_t) sy_DISCR_MULTIPLE; } /*^getnamedsymbol */ /*getnamedsym:CTYPE_VOID */ { melt_ptr_t sy_CTYPE_VOID = meltgc_named_symbol ("CTYPE_VOID", MELT_GET); if (sy_CTYPE_VOID && NULL == /*_.VALDATA___V1154*/ meltfptr[1153]) /*_.VALDATA___V1154*/ meltfptr[1153] = (melt_ptr_t) sy_CTYPE_VOID; } /*^getnamedsymbol */ /*getnamedsym:OUTPUT_C_DECLINIT */ { melt_ptr_t sy_OUTPUT_C_DECLINIT = meltgc_named_symbol ("OUTPUT_C_DECLINIT", MELT_GET); if (sy_OUTPUT_C_DECLINIT && NULL == /*_.VALDATA___V1156*/ meltfptr[1155]) /*_.VALDATA___V1156*/ meltfptr[1155] = (melt_ptr_t) sy_OUTPUT_C_DECLINIT; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SELECTOR */ { melt_ptr_t sy_CLASS_SELECTOR = meltgc_named_symbol ("CLASS_SELECTOR", MELT_GET); if (sy_CLASS_SELECTOR && NULL == /*_.VALDATA___V1158*/ meltfptr[1157]) /*_.VALDATA___V1158*/ meltfptr[1157] = (melt_ptr_t) sy_CLASS_SELECTOR; } /*^getnamedsymbol */ /*getnamedsym:RECV */ { melt_ptr_t sy_RECV = meltgc_named_symbol ("RECV", MELT_GET); if (sy_RECV && NULL == /*_.VALDATA___V1160*/ meltfptr[1159]) /*_.VALDATA___V1160*/ meltfptr[1159] = (melt_ptr_t) sy_RECV; } /*^getnamedsymbol */ /*getnamedsym:SBUF */ { melt_ptr_t sy_SBUF = meltgc_named_symbol ("SBUF", MELT_GET); if (sy_SBUF && NULL == /*_.VALDATA___V1163*/ meltfptr[1162]) /*_.VALDATA___V1163*/ meltfptr[1162] = (melt_ptr_t) sy_SBUF; } /*^getnamedsymbol */ /*getnamedsym:PUT_OBJDEST */ { melt_ptr_t sy_PUT_OBJDEST = meltgc_named_symbol ("PUT_OBJDEST", MELT_GET); if (sy_PUT_OBJDEST && NULL == /*_.VALDATA___V1169*/ meltfptr[1168]) /*_.VALDATA___V1169*/ meltfptr[1168] = (melt_ptr_t) sy_PUT_OBJDEST; } /*^getnamedsymbol */ /*getnamedsym:OUTPUT_C_CODE */ { melt_ptr_t sy_OUTPUT_C_CODE = meltgc_named_symbol ("OUTPUT_C_CODE", MELT_GET); if (sy_OUTPUT_C_CODE && NULL == /*_.VALDATA___V1173*/ meltfptr[1172]) /*_.VALDATA___V1173*/ meltfptr[1172] = (melt_ptr_t) sy_OUTPUT_C_CODE; } /*^getnamedsymbol */ /*getnamedsym:DECLBUF */ { melt_ptr_t sy_DECLBUF = meltgc_named_symbol ("DECLBUF", MELT_GET); if (sy_DECLBUF && NULL == /*_.VALDATA___V1176*/ meltfptr[1175]) /*_.VALDATA___V1176*/ meltfptr[1175] = (melt_ptr_t) sy_DECLBUF; } /*^getnamedsymbol */ /*getnamedsym:IMPLBUF */ { melt_ptr_t sy_IMPLBUF = meltgc_named_symbol ("IMPLBUF", MELT_GET); if (sy_IMPLBUF && NULL == /*_.VALDATA___V1179*/ meltfptr[1178]) /*_.VALDATA___V1179*/ meltfptr[1178] = (melt_ptr_t) sy_IMPLBUF; } /*^getnamedsymbol */ /*getnamedsym:DEPTH */ { melt_ptr_t sy_DEPTH = meltgc_named_symbol ("DEPTH", MELT_GET); if (sy_DEPTH && NULL == /*_.VALDATA___V1182*/ meltfptr[1181]) /*_.VALDATA___V1182*/ meltfptr[1181] = (melt_ptr_t) sy_DEPTH; } /*^getnamedsymbol */ /*getnamedsym:OUTPUT_C_INITIAL_FILL */ { melt_ptr_t sy_OUTPUT_C_INITIAL_FILL = meltgc_named_symbol ("OUTPUT_C_INITIAL_FILL", MELT_GET); if (sy_OUTPUT_C_INITIAL_FILL && NULL == /*_.VALDATA___V1188*/ meltfptr[1187]) /*_.VALDATA___V1188*/ meltfptr[1187] = (melt_ptr_t) sy_OUTPUT_C_INITIAL_FILL; } /*^getnamedsymbol */ /*getnamedsym:PTRSTR */ { melt_ptr_t sy_PTRSTR = meltgc_named_symbol ("PTRSTR", MELT_GET); if (sy_PTRSTR && NULL == /*_.VALDATA___V1192*/ meltfptr[1191]) /*_.VALDATA___V1192*/ meltfptr[1191] = (melt_ptr_t) sy_PTRSTR; } /*^getnamedsymbol */ /*getnamedsym:OUTPUT_C_INITIAL_PREDEF */ { melt_ptr_t sy_OUTPUT_C_INITIAL_PREDEF = meltgc_named_symbol ("OUTPUT_C_INITIAL_PREDEF", MELT_GET); if (sy_OUTPUT_C_INITIAL_PREDEF && NULL == /*_.VALDATA___V1199*/ meltfptr[1198]) /*_.VALDATA___V1199*/ meltfptr[1198] = (melt_ptr_t) sy_OUTPUT_C_INITIAL_PREDEF; } /*^getnamedsymbol */ /*getnamedsym:PRTRSTR */ { melt_ptr_t sy_PRTRSTR = meltgc_named_symbol ("PRTRSTR", MELT_GET); if (sy_PRTRSTR && NULL == /*_.VALDATA___V1203*/ meltfptr[1202]) /*_.VALDATA___V1203*/ meltfptr[1202] = (melt_ptr_t) sy_PRTRSTR; } /*^getnamedsymbol */ /*getnamedsym:MAKE_OBJEXPANDPUREVAL */ { melt_ptr_t sy_MAKE_OBJEXPANDPUREVAL = meltgc_named_symbol ("MAKE_OBJEXPANDPUREVAL", MELT_GET); if (sy_MAKE_OBJEXPANDPUREVAL && NULL == /*_.VALDATA___V1210*/ meltfptr[1209]) /*_.VALDATA___V1210*/ meltfptr[1209] = (melt_ptr_t) sy_MAKE_OBJEXPANDPUREVAL; } /*^getnamedsymbol */ /*getnamedsym:INSTALL_METHOD */ { melt_ptr_t sy_INSTALL_METHOD = meltgc_named_symbol ("INSTALL_METHOD", MELT_GET); if (sy_INSTALL_METHOD && NULL == /*_.VALDATA___V1214*/ meltfptr[1213]) /*_.VALDATA___V1214*/ meltfptr[1213] = (melt_ptr_t) sy_INSTALL_METHOD; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP */ { melt_ptr_t sy_CLASS_NREP = meltgc_named_symbol ("CLASS_NREP", MELT_GET); if (sy_CLASS_NREP && NULL == /*_.VALDATA___V1216*/ meltfptr[1215]) /*_.VALDATA___V1216*/ meltfptr[1215] = (melt_ptr_t) sy_CLASS_NREP; } /*^getnamedsymbol */ /*getnamedsym:COMPILE_OBJ */ { melt_ptr_t sy_COMPILE_OBJ = meltgc_named_symbol ("COMPILE_OBJ", MELT_GET); if (sy_COMPILE_OBJ && NULL == /*_.VALDATA___V1218*/ meltfptr[1217]) /*_.VALDATA___V1218*/ meltfptr[1217] = (melt_ptr_t) sy_COMPILE_OBJ; } /*^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___V1224*/ meltfptr[1223]) /*_.VALDATA___V1224*/ meltfptr[1223] = (melt_ptr_t) sy_DISCR_ANY_RECEIVER; } /*^getnamedsymbol */ /*getnamedsym:GET_CTYPE */ { melt_ptr_t sy_GET_CTYPE = meltgc_named_symbol ("GET_CTYPE", MELT_GET); if (sy_GET_CTYPE && NULL == /*_.VALDATA___V1228*/ meltfptr[1227]) /*_.VALDATA___V1228*/ meltfptr[1227] = (melt_ptr_t) sy_GET_CTYPE; } /*^getnamedsymbol */ /*getnamedsym:CTYPE_VALUE */ { melt_ptr_t sy_CTYPE_VALUE = meltgc_named_symbol ("CTYPE_VALUE", MELT_GET); if (sy_CTYPE_VALUE && NULL == /*_.VALDATA___V1232*/ meltfptr[1231]) /*_.VALDATA___V1232*/ meltfptr[1231] = (melt_ptr_t) sy_CTYPE_VALUE; } /*^getnamedsymbol */ /*getnamedsym:DBGOUT_NAMEDOBJECT_METHOD */ { melt_ptr_t sy_DBGOUT_NAMEDOBJECT_METHOD = meltgc_named_symbol ("DBGOUT_NAMEDOBJECT_METHOD", MELT_GET); if (sy_DBGOUT_NAMEDOBJECT_METHOD && NULL == /*_.VALDATA___V1238*/ meltfptr[1237]) /*_.VALDATA___V1238*/ meltfptr[1237] = (melt_ptr_t) sy_DBGOUT_NAMEDOBJECT_METHOD; } /*^getnamedsymbol */ /*getnamedsym:DBG_OUTPUT */ { melt_ptr_t sy_DBG_OUTPUT = meltgc_named_symbol ("DBG_OUTPUT", MELT_GET); if (sy_DBG_OUTPUT && NULL == /*_.VALDATA___V1240*/ meltfptr[1239]) /*_.VALDATA___V1240*/ meltfptr[1239] = (melt_ptr_t) sy_DBG_OUTPUT; } /*^getnamedsymbol */ /*getnamedsym:AS_NULL */ { melt_ptr_t sy_AS_NULL = meltgc_named_symbol ("AS_NULL", MELT_GET); if (sy_AS_NULL && NULL == /*_.VALDATA___V1248*/ meltfptr[1247]) /*_.VALDATA___V1248*/ meltfptr[1247] = (melt_ptr_t) sy_AS_NULL; } /*^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___V1250*/ meltfptr[1249]) /*_.VALDATA___V1250*/ meltfptr[1249] = (melt_ptr_t) sy_CLASS_CLONED_SYMBOL; } /*^getnamedsymbol */ /*getnamedsym:INTEGERBOX_OF */ { melt_ptr_t sy_INTEGERBOX_OF = meltgc_named_symbol ("INTEGERBOX_OF", MELT_GET); if (sy_INTEGERBOX_OF && NULL == /*_.VALDATA___V1252*/ meltfptr[1251]) /*_.VALDATA___V1252*/ meltfptr[1251] = (melt_ptr_t) sy_INTEGERBOX_OF; } /*^getnamedsymbol */ /*getnamedsym:DISCR_STRBUF */ { melt_ptr_t sy_DISCR_STRBUF = meltgc_named_symbol ("DISCR_STRBUF", MELT_GET); if (sy_DISCR_STRBUF && NULL == /*_.VALDATA___V1254*/ meltfptr[1253]) /*_.VALDATA___V1254*/ meltfptr[1253] = (melt_ptr_t) sy_DISCR_STRBUF; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SYMBOL */ { melt_ptr_t sy_CLASS_SYMBOL = meltgc_named_symbol ("CLASS_SYMBOL", MELT_GET); if (sy_CLASS_SYMBOL && NULL == /*_.VALDATA___V1256*/ meltfptr[1255]) /*_.VALDATA___V1256*/ meltfptr[1255] = (melt_ptr_t) sy_CLASS_SYMBOL; } /*^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___V1274*/ meltfptr[1273]) /*_.VALDATA___V1274*/ meltfptr[1273] = (melt_ptr_t) sy_CLASS_NREP_ROUTPROC; } /*^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___V1276*/ meltfptr[1275]) /*_.VALDATA___V1276*/ meltfptr[1275] = (melt_ptr_t) sy_CLASS_MODULE_CONTEXT; } /*^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___V1278*/ meltfptr[1277]) /*_.VALDATA___V1278*/ meltfptr[1277] = (melt_ptr_t) sy_CLASS_NREP_DEFUNROUTPROC; } /*^getnamedsymbol */ /*getnamedsym:DISCR_STRING */ { melt_ptr_t sy_DISCR_STRING = meltgc_named_symbol ("DISCR_STRING", MELT_GET); if (sy_DISCR_STRING && NULL == /*_.VALDATA___V1280*/ meltfptr[1279]) /*_.VALDATA___V1280*/ meltfptr[1279] = (melt_ptr_t) sy_DISCR_STRING; } /*^getnamedsymbol */ /*getnamedsym:DISCR_INTEGER */ { melt_ptr_t sy_DISCR_INTEGER = meltgc_named_symbol ("DISCR_INTEGER", MELT_GET); if (sy_DISCR_INTEGER && NULL == /*_.VALDATA___V1282*/ meltfptr[1281]) /*_.VALDATA___V1282*/ meltfptr[1281] = (melt_ptr_t) sy_DISCR_INTEGER; } /*^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___V1284*/ meltfptr[1283]) /*_.VALDATA___V1284*/ meltfptr[1283] = (melt_ptr_t) sy_DISCR_MAP_OBJECTS; } /*^getnamedsymbol */ /*getnamedsym:CLASS_C_GENERATION_CONTEXT */ { melt_ptr_t sy_CLASS_C_GENERATION_CONTEXT = meltgc_named_symbol ("CLASS_C_GENERATION_CONTEXT", MELT_GET); if (sy_CLASS_C_GENERATION_CONTEXT && NULL == /*_.VALDATA___V1286*/ meltfptr[1285]) /*_.VALDATA___V1286*/ meltfptr[1285] = (melt_ptr_t) sy_CLASS_C_GENERATION_CONTEXT; } /*^getnamedsymbol */ /*getnamedsym:_RETVAL_ */ { melt_ptr_t sy_RETVAL_ = meltgc_named_symbol ("_RETVAL_", MELT_GET); if (sy_RETVAL_ && NULL == /*_.VALDATA___V1265*/ meltfptr[1264]) /*_.VALDATA___V1265*/ meltfptr[1264] = (melt_ptr_t) sy_RETVAL_; } /*^getnamedsymbol */ /*getnamedsym:MULTIPLE_MAP */ { melt_ptr_t sy_MULTIPLE_MAP = meltgc_named_symbol ("MULTIPLE_MAP", MELT_GET); if (sy_MULTIPLE_MAP && NULL == /*_.VALDATA___V1288*/ meltfptr[1287]) /*_.VALDATA___V1288*/ meltfptr[1287] = (melt_ptr_t) sy_MULTIPLE_MAP; } /*^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___V1290*/ meltfptr[1289]) /*_.VALDATA___V1290*/ meltfptr[1289] = (melt_ptr_t) sy_CLASS_FORMAL_BINDING; } /*^getnamedsymbol */ /*getnamedsym:CTYPE_LONG */ { melt_ptr_t sy_CTYPE_LONG = meltgc_named_symbol ("CTYPE_LONG", MELT_GET); if (sy_CTYPE_LONG && NULL == /*_.VALDATA___V1292*/ meltfptr[1291]) /*_.VALDATA___V1292*/ meltfptr[1291] = (melt_ptr_t) sy_CTYPE_LONG; } /*^getnamedsymbol */ /*getnamedsym:LIST_EVERY */ { melt_ptr_t sy_LIST_EVERY = meltgc_named_symbol ("LIST_EVERY", MELT_GET); if (sy_LIST_EVERY && NULL == /*_.VALDATA___V1294*/ meltfptr[1293]) /*_.VALDATA___V1294*/ meltfptr[1293] = (melt_ptr_t) sy_LIST_EVERY; } /*^getnamedsymbol */ /*getnamedsym:INITIALSYSTEMDATA_OBJPREDEF */ { melt_ptr_t sy_INITIALSYSTEMDATA_OBJPREDEF = meltgc_named_symbol ("INITIALSYSTEMDATA_OBJPREDEF", MELT_GET); if (sy_INITIALSYSTEMDATA_OBJPREDEF && NULL == /*_.VALDATA___V1296*/ meltfptr[1295]) /*_.VALDATA___V1296*/ meltfptr[1295] = (melt_ptr_t) sy_INITIALSYSTEMDATA_OBJPREDEF; } /*^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___V1299*/ meltfptr[1298]) /*_.VALDATA___V1299*/ meltfptr[1298] = (melt_ptr_t) sy_INITIAL_SYSTEM_DATA; } /*^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___V1328*/ meltfptr[1327]) /*_.VALDATA___V1328*/ meltfptr[1327] = (melt_ptr_t) sy_CLASS_NREP_INITPROC; } /*^getnamedsymbol */ /*getnamedsym:CLASS_INITIAL_GENERATION_CONTEXT */ { melt_ptr_t sy_CLASS_INITIAL_GENERATION_CONTEXT = meltgc_named_symbol ("CLASS_INITIAL_GENERATION_CONTEXT", MELT_GET); if (sy_CLASS_INITIAL_GENERATION_CONTEXT && NULL == /*_.VALDATA___V1330*/ meltfptr[1329]) /*_.VALDATA___V1330*/ meltfptr[1329] = (melt_ptr_t) sy_CLASS_INITIAL_GENERATION_CONTEXT; } /*^getnamedsymbol */ /*getnamedsym:LIST_MAP */ { melt_ptr_t sy_LIST_MAP = meltgc_named_symbol ("LIST_MAP", MELT_GET); if (sy_LIST_MAP && NULL == /*_.VALDATA___V1332*/ meltfptr[1331]) /*_.VALDATA___V1332*/ meltfptr[1331] = (melt_ptr_t) sy_LIST_MAP; } /*^getnamedsymbol */ /*getnamedsym:_RETINIT_ */ { melt_ptr_t sy_RETINIT_ = meltgc_named_symbol ("_RETINIT_", MELT_GET); if (sy_RETINIT_ && NULL == /*_.VALDATA___V1308*/ meltfptr[1307]) /*_.VALDATA___V1308*/ meltfptr[1307] = (melt_ptr_t) sy_RETINIT_; } /*^getnamedsymbol */ /*getnamedsym:_CONTENV_ */ { melt_ptr_t sy_CONTENV_ = meltgc_named_symbol ("_CONTENV_", MELT_GET); if (sy_CONTENV_ && NULL == /*_.VALDATA___V1310*/ meltfptr[1309]) /*_.VALDATA___V1310*/ meltfptr[1309] = (melt_ptr_t) sy_CONTENV_; } /*^getnamedsymbol */ /*getnamedsym:_FRESHENV_ */ { melt_ptr_t sy_FRESHENV_ = meltgc_named_symbol ("_FRESHENV_", MELT_GET); if (sy_FRESHENV_ && NULL == /*_.VALDATA___V1312*/ meltfptr[1311]) /*_.VALDATA___V1312*/ meltfptr[1311] = (melt_ptr_t) sy_FRESHENV_; } /*^getnamedsymbol */ /*getnamedsym:_PREVENV_ */ { melt_ptr_t sy_PREVENV_ = meltgc_named_symbol ("_PREVENV_", MELT_GET); if (sy_PREVENV_ && NULL == /*_.VALDATA___V1314*/ meltfptr[1313]) /*_.VALDATA___V1314*/ meltfptr[1313] = (melt_ptr_t) sy_PREVENV_; } /*^getnamedsymbol */ /*getnamedsym:_VALEXPORT_ */ { melt_ptr_t sy_VALEXPORT_ = meltgc_named_symbol ("_VALEXPORT_", MELT_GET); if (sy_VALEXPORT_ && NULL == /*_.VALDATA___V1316*/ meltfptr[1315]) /*_.VALDATA___V1316*/ meltfptr[1315] = (melt_ptr_t) sy_VALEXPORT_; } /*^getnamedsymbol */ /*getnamedsym:_VALIMPORT_ */ { melt_ptr_t sy_VALIMPORT_ = meltgc_named_symbol ("_VALIMPORT_", MELT_GET); if (sy_VALIMPORT_ && NULL == /*_.VALDATA___V1318*/ meltfptr[1317]) /*_.VALDATA___V1318*/ meltfptr[1317] = (melt_ptr_t) sy_VALIMPORT_; } /*^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___V1334*/ meltfptr[1333]) /*_.VALDATA___V1334*/ meltfptr[1333] = (melt_ptr_t) sy_CLASS_ANY_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___V1336*/ meltfptr[1335]) /*_.VALDATA___V1336*/ meltfptr[1335] = (melt_ptr_t) sy_CLASS_FIXED_BINDING; } /*^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___V1338*/ meltfptr[1337]) /*_.VALDATA___V1338*/ meltfptr[1337] = (melt_ptr_t) sy_CLASS_NREP_SIMPLE; } /*^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___V1340*/ meltfptr[1339]) /*_.VALDATA___V1340*/ meltfptr[1339] = (melt_ptr_t) sy_SYSDATA_CONT_FRESH_ENV; } /*^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___V1342*/ meltfptr[1341]) /*_.VALDATA___V1342*/ meltfptr[1341] = (melt_ptr_t) sy_CLASS_NREP_IMPORTEDVAL; } /*^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___V1344*/ meltfptr[1343]) /*_.VALDATA___V1344*/ meltfptr[1343] = (melt_ptr_t) sy_CLASS_NREP_BOUND_DATA; } /*^getnamedsymbol */ /*getnamedsym:MULTIPLE_EVERY */ { melt_ptr_t sy_MULTIPLE_EVERY = meltgc_named_symbol ("MULTIPLE_EVERY", MELT_GET); if (sy_MULTIPLE_EVERY && NULL == /*_.VALDATA___V1346*/ meltfptr[1345]) /*_.VALDATA___V1346*/ meltfptr[1345] = (melt_ptr_t) sy_MULTIPLE_EVERY; } /*^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___V1348*/ meltfptr[1347]) /*_.VALDATA___V1348*/ meltfptr[1347] = (melt_ptr_t) sy_CLASS_NREP_DATAKEYWORD; } /*^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___V1350*/ meltfptr[1349]) /*_.VALDATA___V1350*/ meltfptr[1349] = (melt_ptr_t) sy_CLASS_NREP_DATASYMBOL; } /*^getnamedsymbol */ /*getnamedsym:SYSDATA_VALUE_IMPORTER */ { melt_ptr_t sy_SYSDATA_VALUE_IMPORTER = meltgc_named_symbol ("SYSDATA_VALUE_IMPORTER", MELT_GET); if (sy_SYSDATA_VALUE_IMPORTER && NULL == /*_.VALDATA___V1352*/ meltfptr[1351]) /*_.VALDATA___V1352*/ meltfptr[1351] = (melt_ptr_t) sy_SYSDATA_VALUE_IMPORTER; } /*^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___V1373*/ meltfptr[1372]) /*_.VALDATA___V1373*/ meltfptr[1372] = (melt_ptr_t) sy_CLASS_NREP_INITEXTENDPROC; } /*^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___V1375*/ meltfptr[1374]) /*_.VALDATA___V1375*/ meltfptr[1374] = (melt_ptr_t) sy_CLASS_RUNNING_EXTENSION_MODULE_CONTEXT; } /*^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___V1377*/ meltfptr[1376]) /*_.VALDATA___V1377*/ meltfptr[1376] = (melt_ptr_t) sy_CLASS_NREP_ANYPROC; } /*^getnamedsymbol */ /*getnamedsym:CLASS_EXTENSION_GENERATION_CONTEXT */ { melt_ptr_t sy_CLASS_EXTENSION_GENERATION_CONTEXT = meltgc_named_symbol ("CLASS_EXTENSION_GENERATION_CONTEXT", MELT_GET); if (sy_CLASS_EXTENSION_GENERATION_CONTEXT && NULL == /*_.VALDATA___V1379*/ meltfptr[1378]) /*_.VALDATA___V1379*/ meltfptr[1378] = (melt_ptr_t) sy_CLASS_EXTENSION_GENERATION_CONTEXT; } /*^getnamedsymbol */ /*getnamedsym:_RETRUNINIT_ */ { melt_ptr_t sy_RETRUNINIT_ = meltgc_named_symbol ("_RETRUNINIT_", MELT_GET); if (sy_RETRUNINIT_ && NULL == /*_.VALDATA___V1357*/ meltfptr[1356]) /*_.VALDATA___V1357*/ meltfptr[1356] = (melt_ptr_t) sy_RETRUNINIT_; } /*^getnamedsymbol */ /*getnamedsym:_OCURENVBOXLOC_ */ { melt_ptr_t sy_OCURENVBOXLOC_ = meltgc_named_symbol ("_OCURENVBOXLOC_", MELT_GET); if (sy_OCURENVBOXLOC_ && NULL == /*_.VALDATA___V1359*/ meltfptr[1358]) /*_.VALDATA___V1359*/ meltfptr[1358] = (melt_ptr_t) sy_OCURENVBOXLOC_; } /*^getnamedsymbol */ /*getnamedsym:_OCURENVLOC_ */ { melt_ptr_t sy_OCURENVLOC_ = meltgc_named_symbol ("_OCURENVLOC_", MELT_GET); if (sy_OCURENVLOC_ && NULL == /*_.VALDATA___V1361*/ meltfptr[1360]) /*_.VALDATA___V1361*/ meltfptr[1360] = (melt_ptr_t) sy_OCURENVLOC_; } /*^getnamedsymbol */ /*getnamedsym:_PREVENVLOC_ */ { melt_ptr_t sy_PREVENVLOC_ = meltgc_named_symbol ("_PREVENVLOC_", MELT_GET); if (sy_PREVENVLOC_ && NULL == /*_.VALDATA___V1363*/ meltfptr[1362]) /*_.VALDATA___V1363*/ meltfptr[1362] = (melt_ptr_t) sy_PREVENVLOC_; } /*^getnamedsymbol */ /*getnamedsym:_OLITVALUETUPLOC_ */ { melt_ptr_t sy_OLITVALUETUPLOC_ = meltgc_named_symbol ("_OLITVALUETUPLOC_", MELT_GET); if (sy_OLITVALUETUPLOC_ && NULL == /*_.VALDATA___V1365*/ meltfptr[1364]) /*_.VALDATA___V1365*/ meltfptr[1364] = (melt_ptr_t) sy_OLITVALUETUPLOC_; } /*^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___V1381*/ meltfptr[1380]) /*_.VALDATA___V1381*/ meltfptr[1380] = (melt_ptr_t) sy_CLASS_NREP_LITERALNAMEDVALUE; } /*^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___V1383*/ meltfptr[1382]) /*_.VALDATA___V1383*/ meltfptr[1382] = (melt_ptr_t) sy_CLASS_NREP_LITERALVALUE; } /*^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___V1385*/ meltfptr[1384]) /*_.VALDATA___V1385*/ meltfptr[1384] = (melt_ptr_t) sy_CLASS_LITERAL_VALUE; } /*^getnamedsymbol */ /*getnamedsym:REFERENCED_VALUE */ { melt_ptr_t sy_REFERENCED_VALUE = meltgc_named_symbol ("REFERENCED_VALUE", MELT_GET); if (sy_REFERENCED_VALUE && NULL == /*_.VALDATA___V1387*/ meltfptr[1386]) /*_.VALDATA___V1387*/ meltfptr[1386] = (melt_ptr_t) sy_REFERENCED_VALUE; } /*^getnamedsymbol */ /*getnamedsym:ENV_PREV */ { melt_ptr_t sy_ENV_PREV = meltgc_named_symbol ("ENV_PREV", MELT_GET); if (sy_ENV_PREV && NULL == /*_.VALDATA___V1389*/ meltfptr[1388]) /*_.VALDATA___V1389*/ meltfptr[1388] = (melt_ptr_t) sy_ENV_PREV; } /*^getnamedsymbol */ /*getnamedsym:COMPILE2OBJ_INITPROC */ { melt_ptr_t sy_COMPILE2OBJ_INITPROC = meltgc_named_symbol ("COMPILE2OBJ_INITPROC", MELT_GET); if (sy_COMPILE2OBJ_INITPROC && NULL == /*_.VALDATA___V1391*/ meltfptr[1390]) /*_.VALDATA___V1391*/ meltfptr[1390] = (melt_ptr_t) sy_COMPILE2OBJ_INITPROC; } /*^getnamedsymbol */ /*getnamedsym:COMPILE2OBJ_INITEXTENDPROC */ { melt_ptr_t sy_COMPILE2OBJ_INITEXTENDPROC = meltgc_named_symbol ("COMPILE2OBJ_INITEXTENDPROC", MELT_GET); if (sy_COMPILE2OBJ_INITEXTENDPROC && NULL == /*_.VALDATA___V1393*/ meltfptr[1392]) /*_.VALDATA___V1393*/ meltfptr[1392] = (melt_ptr_t) sy_COMPILE2OBJ_INITEXTENDPROC; } /*^getnamedsymbol */ /*getnamedsym:COMPILE2OBJ_PROCEDURE */ { melt_ptr_t sy_COMPILE2OBJ_PROCEDURE = meltgc_named_symbol ("COMPILE2OBJ_PROCEDURE", MELT_GET); if (sy_COMPILE2OBJ_PROCEDURE && NULL == /*_.VALDATA___V1395*/ meltfptr[1394]) /*_.VALDATA___V1395*/ meltfptr[1394] = (melt_ptr_t) sy_COMPILE2OBJ_PROCEDURE; } /*^getnamedsymbol */ /*getnamedsym:VARIADIC_INDEX_IDSTR */ { melt_ptr_t sy_VARIADIC_INDEX_IDSTR = meltgc_named_symbol ("VARIADIC_INDEX_IDSTR", MELT_GET); if (sy_VARIADIC_INDEX_IDSTR && NULL == /*_.VALDATA___V1397*/ meltfptr[1396]) /*_.VALDATA___V1397*/ meltfptr[1396] = (melt_ptr_t) sy_VARIADIC_INDEX_IDSTR; } /*^getnamedsymbol */ /*getnamedsym:VARIADIC_LENGTH_IDSTR */ { melt_ptr_t sy_VARIADIC_LENGTH_IDSTR = meltgc_named_symbol ("VARIADIC_LENGTH_IDSTR", MELT_GET); if (sy_VARIADIC_LENGTH_IDSTR && NULL == /*_.VALDATA___V1399*/ meltfptr[1398]) /*_.VALDATA___V1399*/ meltfptr[1398] = (melt_ptr_t) sy_VARIADIC_LENGTH_IDSTR; } /*^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___V1405*/ meltfptr[1404]) /*_.VALDATA___V1405*/ meltfptr[1404] = (melt_ptr_t) sy_CLASS_LET_BINDING; } /*^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___V1410*/ meltfptr[1409]) /*_.VALDATA___V1410*/ meltfptr[1409] = (melt_ptr_t) sy_CLASS_NREP_CHUNK; } /*^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___V1414*/ meltfptr[1413]) /*_.VALDATA___V1414*/ meltfptr[1413] = (melt_ptr_t) sy_CLASS_NREP_TYPED_EXPRESSION; } /*^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___V1418*/ meltfptr[1417]) /*_.VALDATA___V1418*/ meltfptr[1417] = (melt_ptr_t) sy_CLASS_NREP_NIL; } /*^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___V1422*/ meltfptr[1421]) /*_.VALDATA___V1422*/ meltfptr[1421] = (melt_ptr_t) sy_CLASS_NREP_COMMENT; } /*^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___V1426*/ meltfptr[1425]) /*_.VALDATA___V1426*/ meltfptr[1425] = (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___V1430*/ meltfptr[1429]) /*_.VALDATA___V1430*/ meltfptr[1429] = (melt_ptr_t) sy_CLASS_NREP_CLOSEDOCC; } /*^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___V1434*/ meltfptr[1433]) /*_.VALDATA___V1434*/ meltfptr[1433] = (melt_ptr_t) sy_CLASS_NREP_CONSTOCC; } /*^getnamedsymbol */ /*getnamedsym:STRING4OUT */ { melt_ptr_t sy_STRING4OUT = meltgc_named_symbol ("STRING4OUT", MELT_GET); if (sy_STRING4OUT && NULL == /*_.VALDATA___V1440*/ meltfptr[1439]) /*_.VALDATA___V1440*/ meltfptr[1439] = (melt_ptr_t) sy_STRING4OUT; } /*^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___V1444*/ meltfptr[1443]) /*_.VALDATA___V1444*/ meltfptr[1443] = (melt_ptr_t) sy_CLASS_NREP_DEFINED_CONSTANT; } /*^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___V1448*/ meltfptr[1447]) /*_.VALDATA___V1448*/ meltfptr[1447] = (melt_ptr_t) sy_CLASS_NREP_QUASICONSTANT; } /*^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___V1452*/ meltfptr[1451]) /*_.VALDATA___V1452*/ meltfptr[1451] = (melt_ptr_t) sy_CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER; } /*^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___V1457*/ meltfptr[1456]) /*_.VALDATA___V1457*/ meltfptr[1456] = (melt_ptr_t) sy_CLASS_NREP_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___V1459*/ meltfptr[1458]) /*_.VALDATA___V1459*/ meltfptr[1458] = (melt_ptr_t) sy_CLASS_LABEL_BINDING; } /*^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___V1463*/ meltfptr[1462]) /*_.VALDATA___V1463*/ meltfptr[1462] = (melt_ptr_t) sy_CLASS_NREP_EXIT; } /*^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___V1467*/ meltfptr[1466]) /*_.VALDATA___V1467*/ meltfptr[1466] = (melt_ptr_t) sy_CLASS_NREP_AGAIN; } /*^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___V1476*/ meltfptr[1475]) /*_.VALDATA___V1476*/ meltfptr[1475] = (melt_ptr_t) sy_CLASS_NREP_LET; } /*^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___V1478*/ meltfptr[1477]) /*_.VALDATA___V1478*/ meltfptr[1477] = (melt_ptr_t) sy_CLASS_NORMAL_LET_BINDING; } /*^getnamedsymbol */ /*getnamedsym:CLASS_SEXPR */ { melt_ptr_t sy_CLASS_SEXPR = meltgc_named_symbol ("CLASS_SEXPR", MELT_GET); if (sy_CLASS_SEXPR && NULL == /*_.VALDATA___V1480*/ meltfptr[1479]) /*_.VALDATA___V1480*/ meltfptr[1479] = (melt_ptr_t) sy_CLASS_SEXPR; } /*^getnamedsymbol */ /*getnamedsym:COMPILE_LETREC_FILL */ { melt_ptr_t sy_COMPILE_LETREC_FILL = meltgc_named_symbol ("COMPILE_LETREC_FILL", MELT_GET); if (sy_COMPILE_LETREC_FILL && NULL == /*_.VALDATA___V1482*/ meltfptr[1481]) /*_.VALDATA___V1482*/ meltfptr[1481] = (melt_ptr_t) sy_COMPILE_LETREC_FILL; } /*^getnamedsymbol */ /*getnamedsym:OBVA */ { melt_ptr_t sy_OBVA = meltgc_named_symbol ("OBVA", MELT_GET); if (sy_OBVA && NULL == /*_.VALDATA___V1485*/ meltfptr[1484]) /*_.VALDATA___V1485*/ meltfptr[1484] = (melt_ptr_t) sy_OBVA; } /*^getnamedsymbol */ /*getnamedsym:OBODL */ { melt_ptr_t sy_OBODL = meltgc_named_symbol ("OBODL", MELT_GET); if (sy_OBODL && NULL == /*_.VALDATA___V1488*/ meltfptr[1487]) /*_.VALDATA___V1488*/ meltfptr[1487] = (melt_ptr_t) sy_OBODL; } /*^getnamedsymbol */ /*getnamedsym:GCX */ { melt_ptr_t sy_GCX = meltgc_named_symbol ("GCX", MELT_GET); if (sy_GCX && NULL == /*_.VALDATA___V1491*/ meltfptr[1490]) /*_.VALDATA___V1491*/ meltfptr[1490] = (melt_ptr_t) sy_GCX; } /*^getnamedsymbol */ /*getnamedsym:SLOC */ { melt_ptr_t sy_SLOC = meltgc_named_symbol ("SLOC", MELT_GET); if (sy_SLOC && NULL == /*_.VALDATA___V1494*/ meltfptr[1493]) /*_.VALDATA___V1494*/ meltfptr[1493] = (melt_ptr_t) sy_SLOC; } /*^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___V1504*/ meltfptr[1503]) /*_.VALDATA___V1504*/ meltfptr[1503] = (melt_ptr_t) sy_CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING; } /*^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___V1506*/ meltfptr[1505]) /*_.VALDATA___V1506*/ meltfptr[1505] = (melt_ptr_t) sy_CLASS_NORMAL_CONSTRUCTOR_BINDING; } /*^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___V1510*/ meltfptr[1509]) /*_.VALDATA___V1510*/ meltfptr[1509] = (melt_ptr_t) sy_CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING; } /*^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___V1514*/ meltfptr[1513]) /*_.VALDATA___V1514*/ meltfptr[1513] = (melt_ptr_t) sy_CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING; } /*^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___V1518*/ meltfptr[1517]) /*_.VALDATA___V1518*/ meltfptr[1517] = (melt_ptr_t) sy_CLASS_NORMAL_CONSTRUCTED_LIST_BINDING; } /*^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___V1522*/ meltfptr[1521]) /*_.VALDATA___V1522*/ meltfptr[1521] = (melt_ptr_t) sy_CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING; } /*^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___V1524*/ meltfptr[1523]) /*_.VALDATA___V1524*/ meltfptr[1523] = (melt_ptr_t) sy_CLASS_VALUE_BINDING; } /*^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___V1526*/ meltfptr[1525]) /*_.VALDATA___V1526*/ meltfptr[1525] = (melt_ptr_t) sy_CLASS_CLASS_BINDING; } /*^getnamedsymbol */ /*getnamedsym:CLASS_CLASS */ { melt_ptr_t sy_CLASS_CLASS = meltgc_named_symbol ("CLASS_CLASS", MELT_GET); if (sy_CLASS_CLASS && NULL == /*_.VALDATA___V1528*/ meltfptr[1527]) /*_.VALDATA___V1528*/ meltfptr[1527] = (melt_ptr_t) sy_CLASS_CLASS; } /*^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___V1532*/ meltfptr[1531]) /*_.VALDATA___V1532*/ meltfptr[1531] = (melt_ptr_t) sy_CLASS_NREP_LETREC; } /*^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___V1534*/ meltfptr[1533]) /*_.VALDATA___V1534*/ meltfptr[1533] = (melt_ptr_t) sy_CLASS_NREP_SYMOCC; } /*^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___V1543*/ meltfptr[1542]) /*_.VALDATA___V1543*/ meltfptr[1542] = (melt_ptr_t) sy_CLASS_NREP_CITERATION; } /*^getnamedsymbol */ /*getnamedsym:CLASS_CITERATOR */ { melt_ptr_t sy_CLASS_CITERATOR = meltgc_named_symbol ("CLASS_CITERATOR", MELT_GET); if (sy_CLASS_CITERATOR && NULL == /*_.VALDATA___V1545*/ meltfptr[1544]) /*_.VALDATA___V1545*/ meltfptr[1544] = (melt_ptr_t) sy_CLASS_CITERATOR; } /*^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___V1549*/ meltfptr[1548]) /*_.VALDATA___V1549*/ meltfptr[1548] = (melt_ptr_t) sy_CLASS_NREP_SETQ; } /*^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___V1554*/ meltfptr[1553]) /*_.VALDATA___V1554*/ meltfptr[1553] = (melt_ptr_t) sy_CLASS_NREP_PROGN; } /*^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___V1559*/ meltfptr[1558]) /*_.VALDATA___V1559*/ meltfptr[1558] = (melt_ptr_t) sy_CLASS_NREP_MULTACC; } /*^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___V1564*/ meltfptr[1563]) /*_.VALDATA___V1564*/ meltfptr[1563] = (melt_ptr_t) sy_CLASS_NREP_FIELDACC; } /*^getnamedsymbol */ /*getnamedsym:CLASS_FIELD */ { melt_ptr_t sy_CLASS_FIELD = meltgc_named_symbol ("CLASS_FIELD", MELT_GET); if (sy_CLASS_FIELD && NULL == /*_.VALDATA___V1566*/ meltfptr[1565]) /*_.VALDATA___V1566*/ meltfptr[1565] = (melt_ptr_t) sy_CLASS_FIELD; } /*^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___V1568*/ meltfptr[1567]) /*_.VALDATA___V1568*/ meltfptr[1567] = (melt_ptr_t) sy_CLASS_NREP_DATAINSTANCE; } /*^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___V1572*/ meltfptr[1571]) /*_.VALDATA___V1572*/ meltfptr[1571] = (melt_ptr_t) sy_CLASS_NREP_UNSAFE_GET_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___V1578*/ meltfptr[1577]) /*_.VALDATA___V1578*/ meltfptr[1577] = (melt_ptr_t) sy_CLASS_NREP_UNSAFE_PUT_FIELDS; } /*^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___V1580*/ meltfptr[1579]) /*_.VALDATA___V1580*/ meltfptr[1579] = (melt_ptr_t) sy_CLASS_NREP_FIELDASSIGN; } /*^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___V1584*/ meltfptr[1583]) /*_.VALDATA___V1584*/ meltfptr[1583] = (melt_ptr_t) sy_CLASS_NREP_CHECKSIGNAL; } /*^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___V1588*/ meltfptr[1587]) /*_.VALDATA___V1588*/ meltfptr[1587] = (melt_ptr_t) sy_CLASS_NREP_UNSAFE_NTH_COMPONENT; } /*^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___V1593*/ meltfptr[1592]) /*_.VALDATA___V1593*/ meltfptr[1592] = (melt_ptr_t) sy_CLASS_NREP_APPLY; } /*^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___V1602*/ meltfptr[1601]) /*_.VALDATA___V1602*/ meltfptr[1601] = (melt_ptr_t) sy_CLASS_NREP_MULTIAPPLY; } /*^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___V1607*/ meltfptr[1606]) /*_.VALDATA___V1607*/ meltfptr[1606] = (melt_ptr_t) sy_CLASS_NREP_MSEND; } /*^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___V1615*/ meltfptr[1614]) /*_.VALDATA___V1615*/ meltfptr[1614] = (melt_ptr_t) sy_CLASS_NREP_MULTIMSEND; } /*^getnamedsymbol */ /*getnamedsym:CTYPE_CSTRING */ { melt_ptr_t sy_CTYPE_CSTRING = meltgc_named_symbol ("CTYPE_CSTRING", MELT_GET); if (sy_CTYPE_CSTRING && NULL == /*_.VALDATA___V1641*/ meltfptr[1640]) /*_.VALDATA___V1641*/ meltfptr[1640] = (melt_ptr_t) sy_CTYPE_CSTRING; } /*^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___V1645*/ meltfptr[1644]) /*_.VALDATA___V1645*/ meltfptr[1644] = (melt_ptr_t) sy_DISCR_NULL_RECEIVER; } /*^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___V1657*/ meltfptr[1656]) /*_.VALDATA___V1657*/ meltfptr[1656] = (melt_ptr_t) sy_CLASS_NREP_IF; } /*^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___V1661*/ meltfptr[1660]) /*_.VALDATA___V1661*/ meltfptr[1660] = (melt_ptr_t) sy_CLASS_NREP_IFISA; } /*^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___V1663*/ meltfptr[1662]) /*_.VALDATA___V1663*/ meltfptr[1662] = (melt_ptr_t) sy_CLASS_NREP_IFTESTVALUE; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_IFTUPLESIZED */ { melt_ptr_t sy_CLASS_NREP_IFTUPLESIZED = meltgc_named_symbol ("CLASS_NREP_IFTUPLESIZED", MELT_GET); if (sy_CLASS_NREP_IFTUPLESIZED && NULL == /*_.VALDATA___V1667*/ meltfptr[1666]) /*_.VALDATA___V1667*/ meltfptr[1666] = (melt_ptr_t) sy_CLASS_NREP_IFTUPLESIZED; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_IFVARIADIC */ { melt_ptr_t sy_CLASS_NREP_IFVARIADIC = meltgc_named_symbol ("CLASS_NREP_IFVARIADIC", MELT_GET); if (sy_CLASS_NREP_IFVARIADIC && NULL == /*_.VALDATA___V1671*/ meltfptr[1670]) /*_.VALDATA___V1671*/ meltfptr[1670] = (melt_ptr_t) sy_CLASS_NREP_IFVARIADIC; } /*^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___V1677*/ meltfptr[1676]) /*_.VALDATA___V1677*/ meltfptr[1676] = (melt_ptr_t) sy_CLASS_NREP_VARIADIC_ARGUMENT; } /*^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___V1681*/ meltfptr[1680]) /*_.VALDATA___V1681*/ meltfptr[1680] = (melt_ptr_t) sy_CLASS_NREP_CONSUME_VARIADIC; } /*^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___V1687*/ meltfptr[1686]) /*_.VALDATA___V1687*/ meltfptr[1686] = (melt_ptr_t) sy_CLASS_NREP_CPPIF; } /*^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___V1693*/ meltfptr[1692]) /*_.VALDATA___V1693*/ meltfptr[1692] = (melt_ptr_t) sy_CLASS_NREP_RETURN; } /*^getnamedsymbol */ /*getnamedsym:DISCRCLOSURE_OBJPREDEF */ { melt_ptr_t sy_DISCRCLOSURE_OBJPREDEF = meltgc_named_symbol ("DISCRCLOSURE_OBJPREDEF", MELT_GET); if (sy_DISCRCLOSURE_OBJPREDEF && NULL == /*_.VALDATA___V1696*/ meltfptr[1695]) /*_.VALDATA___V1696*/ meltfptr[1695] = (melt_ptr_t) sy_DISCRCLOSURE_OBJPREDEF; } /*^getnamedsymbol */ /*getnamedsym:DISCR_CLOSURE */ { melt_ptr_t sy_DISCR_CLOSURE = meltgc_named_symbol ("DISCR_CLOSURE", MELT_GET); if (sy_DISCR_CLOSURE && NULL == /*_.VALDATA___V1699*/ meltfptr[1698]) /*_.VALDATA___V1699*/ meltfptr[1698] = (melt_ptr_t) sy_DISCR_CLOSURE; } /*^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___V1704*/ meltfptr[1703]) /*_.VALDATA___V1704*/ meltfptr[1703] = (melt_ptr_t) sy_CLASS_NREP_LAMBDA; } /*^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___V1712*/ meltfptr[1711]) /*_.VALDATA___V1712*/ meltfptr[1711] = (melt_ptr_t) sy_CLASS_NREP_INSTANCE; } /*^getnamedsymbol */ /*getnamedsym:INST */ { melt_ptr_t sy_INST = meltgc_named_symbol ("INST", MELT_GET); if (sy_INST && NULL == /*_.VALDATA___V1707*/ meltfptr[1706]) /*_.VALDATA___V1707*/ meltfptr[1706] = (melt_ptr_t) sy_INST; } /*^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___V1718*/ meltfptr[1717]) /*_.VALDATA___V1718*/ meltfptr[1717] = (melt_ptr_t) sy_CLASS_NREP_PREDEF; } /*^getnamedsymbol */ /*getnamedsym:_VALDATA_ */ { melt_ptr_t sy_VALDATA_ = meltgc_named_symbol ("_VALDATA_", MELT_GET); if (sy_VALDATA_ && NULL == /*_.VALDATA___V1721*/ meltfptr[1720]) /*_.VALDATA___V1721*/ meltfptr[1720] = (melt_ptr_t) sy_VALDATA_; } /*^getnamedsymbol */ /*getnamedsym:_VALUEDATA_ */ { melt_ptr_t sy_VALUEDATA_ = meltgc_named_symbol ("_VALUEDATA_", MELT_GET); if (sy_VALUEDATA_ && NULL == /*_.VALDATA___V1723*/ meltfptr[1722]) /*_.VALDATA___V1723*/ meltfptr[1722] = (melt_ptr_t) sy_VALUEDATA_; } /*^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___V1746*/ meltfptr[1745]) /*_.VALDATA___V1746*/ meltfptr[1745] = (melt_ptr_t) sy_CLASS_NREP_DATATUPLE; } /*^getnamedsymbol */ /*getnamedsym:_VALTUP_ */ { melt_ptr_t sy_VALTUP_ = meltgc_named_symbol ("_VALTUP_", MELT_GET); if (sy_VALTUP_ && NULL == /*_.VALDATA___V1740*/ meltfptr[1739]) /*_.VALDATA___V1740*/ meltfptr[1739] = (melt_ptr_t) sy_VALTUP_; } /*^getnamedsymbol */ /*getnamedsym:_INITUP_ */ { melt_ptr_t sy_INITUP_ = meltgc_named_symbol ("_INITUP_", MELT_GET); if (sy_INITUP_ && NULL == /*_.VALDATA___V1742*/ meltfptr[1741]) /*_.VALDATA___V1742*/ meltfptr[1741] = (melt_ptr_t) sy_INITUP_; } /*^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___V1752*/ meltfptr[1751]) /*_.VALDATA___V1752*/ meltfptr[1751] = (melt_ptr_t) sy_CLASS_NREP_DATASTRING; } /*^getnamedsymbol */ /*getnamedsym:_VALSTR_ */ { melt_ptr_t sy_VALSTR_ = meltgc_named_symbol ("_VALSTR_", MELT_GET); if (sy_VALSTR_ && NULL == /*_.VALDATA___V1749*/ meltfptr[1748]) /*_.VALDATA___V1749*/ meltfptr[1748] = (melt_ptr_t) sy_VALSTR_; } /*^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___V1758*/ meltfptr[1757]) /*_.VALDATA___V1758*/ meltfptr[1757] = (melt_ptr_t) sy_CLASS_NREP_DATABOXEDINTEGER; } /*^getnamedsymbol */ /*getnamedsym:_VALBXINT_ */ { melt_ptr_t sy_VALBXINT_ = meltgc_named_symbol ("_VALBXINT_", MELT_GET); if (sy_VALBXINT_ && NULL == /*_.VALDATA___V1755*/ meltfptr[1754]) /*_.VALDATA___V1755*/ meltfptr[1754] = (melt_ptr_t) sy_VALBXINT_; } /*^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___V1767*/ meltfptr[1766]) /*_.VALDATA___V1767*/ meltfptr[1766] = (melt_ptr_t) sy_CLASS_NREP_DATACLOSURE; } /*^getnamedsymbol */ /*getnamedsym:_VALCLO_ */ { melt_ptr_t sy_VALCLO_ = meltgc_named_symbol ("_VALCLO_", MELT_GET); if (sy_VALCLO_ && NULL == /*_.VALDATA___V1761*/ meltfptr[1760]) /*_.VALDATA___V1761*/ meltfptr[1760] = (melt_ptr_t) sy_VALCLO_; } /*^getnamedsymbol */ /*getnamedsym:_DATACLOSURE_ */ { melt_ptr_t sy_DATACLOSURE_ = meltgc_named_symbol ("_DATACLOSURE_", MELT_GET); if (sy_DATACLOSURE_ && NULL == /*_.VALDATA___V1763*/ meltfptr[1762]) /*_.VALDATA___V1763*/ meltfptr[1762] = (melt_ptr_t) sy_DATACLOSURE_; } /*^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___V1769*/ meltfptr[1768]) /*_.VALDATA___V1769*/ meltfptr[1768] = (melt_ptr_t) sy_CLASS_NREP_DATAROUTINE; } /*^getnamedsymbol */ /*getnamedsym:_VALROUT_ */ { melt_ptr_t sy_VALROUT_ = meltgc_named_symbol ("_VALROUT_", MELT_GET); if (sy_VALROUT_ && NULL == /*_.VALDATA___V1772*/ meltfptr[1771]) /*_.VALDATA___V1772*/ meltfptr[1771] = (melt_ptr_t) sy_VALROUT_; } /*^getnamedsymbol */ /*getnamedsym:_IROUTVAL_ */ { melt_ptr_t sy_IROUTVAL_ = meltgc_named_symbol ("_IROUTVAL_", MELT_GET); if (sy_IROUTVAL_ && NULL == /*_.VALDATA___V1774*/ meltfptr[1773]) /*_.VALDATA___V1774*/ meltfptr[1773] = (melt_ptr_t) sy_IROUTVAL_; } /*^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___V1778*/ meltfptr[1777]) /*_.VALDATA___V1778*/ meltfptr[1777] = (melt_ptr_t) sy_CLASS_NREP_QUASIDATA; } /*^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___V1782*/ meltfptr[1781]) /*_.VALDATA___V1782*/ meltfptr[1781] = (melt_ptr_t) sy_CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER; } /*^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___V1786*/ meltfptr[1785]) /*_.VALDATA___V1786*/ meltfptr[1785] = (melt_ptr_t) sy_CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT; } /*^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___V1790*/ meltfptr[1789]) /*_.VALDATA___V1790*/ meltfptr[1789] = (melt_ptr_t) sy_CLASS_NREP_STORE_PREDEFINED; } /*^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___V1796*/ meltfptr[1795]) /*_.VALDATA___V1796*/ meltfptr[1795] = (melt_ptr_t) sy_CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER; } /*^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___V1804*/ meltfptr[1803]) /*_.VALDATA___V1804*/ meltfptr[1803] = (melt_ptr_t) sy_CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER; } /*^getnamedsymbol */ /*getnamedsym:_CURMODENV_ */ { melt_ptr_t sy_CURMODENV_ = meltgc_named_symbol ("_CURMODENV_", MELT_GET); if (sy_CURMODENV_ && NULL == /*_.VALDATA___V1799*/ meltfptr[1798]) /*_.VALDATA___V1799*/ meltfptr[1798] = (melt_ptr_t) sy_CURMODENV_; } /*^getnamedsymbol */ /*getnamedsym:ADD2OUT */ { melt_ptr_t sy_ADD2OUT = meltgc_named_symbol ("ADD2OUT", MELT_GET); if (sy_ADD2OUT && NULL == /*_.VALDATA___V1806*/ meltfptr[1805]) /*_.VALDATA___V1806*/ meltfptr[1805] = (melt_ptr_t) sy_ADD2OUT; } /*^getnamedsymbol */ /*getnamedsym:COMPILE_MATCHER */ { melt_ptr_t sy_COMPILE_MATCHER = meltgc_named_symbol ("COMPILE_MATCHER", MELT_GET); if (sy_COMPILE_MATCHER && NULL == /*_.VALDATA___V1808*/ meltfptr[1807]) /*_.VALDATA___V1808*/ meltfptr[1807] = (melt_ptr_t) sy_COMPILE_MATCHER; } /*^getnamedsymbol */ /*getnamedsym:CLASS_MATCHCOMPILCONTEXT */ { melt_ptr_t sy_CLASS_MATCHCOMPILCONTEXT = meltgc_named_symbol ("CLASS_MATCHCOMPILCONTEXT", MELT_GET); if (sy_CLASS_MATCHCOMPILCONTEXT && NULL == /*_.VALDATA___V1812*/ meltfptr[1811]) /*_.VALDATA___V1812*/ meltfptr[1811] = (melt_ptr_t) sy_CLASS_MATCHCOMPILCONTEXT; } /*^getnamedsymbol */ /*getnamedsym:CLASS_PROPED */ { melt_ptr_t sy_CLASS_PROPED = meltgc_named_symbol ("CLASS_PROPED", MELT_GET); if (sy_CLASS_PROPED && NULL == /*_.VALDATA___V1814*/ meltfptr[1813]) /*_.VALDATA___V1814*/ meltfptr[1813] = (melt_ptr_t) sy_CLASS_PROPED; } /*^getnamedsymbol */ /*getnamedsym:MCX_LOC */ { melt_ptr_t sy_MCX_LOC = meltgc_named_symbol ("MCX_LOC", MELT_GET); if (sy_MCX_LOC && NULL == /*_.VALDATA___V1834*/ meltfptr[1833]) /*_.VALDATA___V1834*/ meltfptr[1833] = (melt_ptr_t) sy_MCX_LOC; } /*^getnamedsymbol */ /*getnamedsym:MCX_NORMTESTER */ { melt_ptr_t sy_MCX_NORMTESTER = meltgc_named_symbol ("MCX_NORMTESTER", MELT_GET); if (sy_MCX_NORMTESTER && NULL == /*_.VALDATA___V1836*/ meltfptr[1835]) /*_.VALDATA___V1836*/ meltfptr[1835] = (melt_ptr_t) sy_MCX_NORMTESTER; } /*^getnamedsymbol */ /*getnamedsym:MCX_GOTOTHEN */ { melt_ptr_t sy_MCX_GOTOTHEN = meltgc_named_symbol ("MCX_GOTOTHEN", MELT_GET); if (sy_MCX_GOTOTHEN && NULL == /*_.VALDATA___V1838*/ meltfptr[1837]) /*_.VALDATA___V1838*/ meltfptr[1837] = (melt_ptr_t) sy_MCX_GOTOTHEN; } /*^getnamedsymbol */ /*getnamedsym:MCX_GOTOELSE */ { melt_ptr_t sy_MCX_GOTOELSE = meltgc_named_symbol ("MCX_GOTOELSE", MELT_GET); if (sy_MCX_GOTOELSE && NULL == /*_.VALDATA___V1840*/ meltfptr[1839]) /*_.VALDATA___V1840*/ meltfptr[1839] = (melt_ptr_t) sy_MCX_GOTOELSE; } /*^getnamedsymbol */ /*getnamedsym:MCX_OLIST */ { melt_ptr_t sy_MCX_OLIST = meltgc_named_symbol ("MCX_OLIST", MELT_GET); if (sy_MCX_OLIST && NULL == /*_.VALDATA___V1842*/ meltfptr[1841]) /*_.VALDATA___V1842*/ meltfptr[1841] = (melt_ptr_t) sy_MCX_OLIST; } /*^getnamedsymbol */ /*getnamedsym:MCX_SUFFIX */ { melt_ptr_t sy_MCX_SUFFIX = meltgc_named_symbol ("MCX_SUFFIX", MELT_GET); if (sy_MCX_SUFFIX && NULL == /*_.VALDATA___V1844*/ meltfptr[1843]) /*_.VALDATA___V1844*/ meltfptr[1843] = (melt_ptr_t) sy_MCX_SUFFIX; } /*^getnamedsymbol */ /*getnamedsym:MCX_STATECOUNTER */ { melt_ptr_t sy_MCX_STATECOUNTER = meltgc_named_symbol ("MCX_STATECOUNTER", MELT_GET); if (sy_MCX_STATECOUNTER && NULL == /*_.VALDATA___V1846*/ meltfptr[1845]) /*_.VALDATA___V1846*/ meltfptr[1845] = (melt_ptr_t) sy_MCX_STATECOUNTER; } /*^getnamedsymbol */ /*getnamedsym:COMPILE_TESTER */ { melt_ptr_t sy_COMPILE_TESTER = meltgc_named_symbol ("COMPILE_TESTER", MELT_GET); if (sy_COMPILE_TESTER && NULL == /*_.VALDATA___V1848*/ meltfptr[1847]) /*_.VALDATA___V1848*/ meltfptr[1847] = (melt_ptr_t) sy_COMPILE_TESTER; } /*^getnamedsymbol */ /*getnamedsym:TCX */ { melt_ptr_t sy_TCX = meltgc_named_symbol ("TCX", MELT_GET); if (sy_TCX && NULL == /*_.VALDATA___V1852*/ meltfptr[1851]) /*_.VALDATA___V1852*/ meltfptr[1851] = (melt_ptr_t) sy_TCX; } /*^getnamedsymbol */ /*getnamedsym:CLASS_TESTERCOMPILCONTEXT */ { melt_ptr_t sy_CLASS_TESTERCOMPILCONTEXT = meltgc_named_symbol ("CLASS_TESTERCOMPILCONTEXT", MELT_GET); if (sy_CLASS_TESTERCOMPILCONTEXT && NULL == /*_.VALDATA___V1858*/ meltfptr[1857]) /*_.VALDATA___V1858*/ meltfptr[1857] = (melt_ptr_t) sy_CLASS_TESTERCOMPILCONTEXT; } /*^getnamedsymbol */ /*getnamedsym:TCX_NRMATCH */ { melt_ptr_t sy_TCX_NRMATCH = meltgc_named_symbol ("TCX_NRMATCH", MELT_GET); if (sy_TCX_NRMATCH && NULL == /*_.VALDATA___V1870*/ meltfptr[1869]) /*_.VALDATA___V1870*/ meltfptr[1869] = (melt_ptr_t) sy_TCX_NRMATCH; } /*^getnamedsymbol */ /*getnamedsym:TCX_FREELIST */ { melt_ptr_t sy_TCX_FREELIST = meltgc_named_symbol ("TCX_FREELIST", MELT_GET); if (sy_TCX_FREELIST && NULL == /*_.VALDATA___V1872*/ meltfptr[1871]) /*_.VALDATA___V1872*/ meltfptr[1871] = (melt_ptr_t) sy_TCX_FREELIST; } /*^getnamedsymbol */ /*getnamedsym:TCX_NEXTEST */ { melt_ptr_t sy_TCX_NEXTEST = meltgc_named_symbol ("TCX_NEXTEST", MELT_GET); if (sy_TCX_NEXTEST && NULL == /*_.VALDATA___V1874*/ meltfptr[1873]) /*_.VALDATA___V1874*/ meltfptr[1873] = (melt_ptr_t) sy_TCX_NEXTEST; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NORMTESTER_ANY */ { melt_ptr_t sy_CLASS_NORMTESTER_ANY = meltgc_named_symbol ("CLASS_NORMTESTER_ANY", MELT_GET); if (sy_CLASS_NORMTESTER_ANY && NULL == /*_.VALDATA___V1878*/ meltfptr[1877]) /*_.VALDATA___V1878*/ meltfptr[1877] = (melt_ptr_t) sy_CLASS_NORMTESTER_ANY; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_MATCH */ { melt_ptr_t sy_CLASS_NREP_MATCH = meltgc_named_symbol ("CLASS_NREP_MATCH", MELT_GET); if (sy_CLASS_NREP_MATCH && NULL == /*_.VALDATA___V1885*/ meltfptr[1884]) /*_.VALDATA___V1885*/ meltfptr[1884] = (melt_ptr_t) sy_CLASS_NREP_MATCH; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NORMTESTER_ANYTESTER */ { melt_ptr_t sy_CLASS_NORMTESTER_ANYTESTER = meltgc_named_symbol ("CLASS_NORMTESTER_ANYTESTER", MELT_GET); if (sy_CLASS_NORMTESTER_ANYTESTER && NULL == /*_.VALDATA___V1887*/ meltfptr[1886]) /*_.VALDATA___V1887*/ meltfptr[1886] = (melt_ptr_t) sy_CLASS_NORMTESTER_ANYTESTER; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NORMTESTER_SUCCESS */ { melt_ptr_t sy_CLASS_NORMTESTER_SUCCESS = meltgc_named_symbol ("CLASS_NORMTESTER_SUCCESS", MELT_GET); if (sy_CLASS_NORMTESTER_SUCCESS && NULL == /*_.VALDATA___V1889*/ meltfptr[1888]) /*_.VALDATA___V1889*/ meltfptr[1888] = (melt_ptr_t) sy_CLASS_NORMTESTER_SUCCESS; } /*^getnamedsymbol */ /*getnamedsym:MAPOBJECT_EVERY */ { melt_ptr_t sy_MAPOBJECT_EVERY = meltgc_named_symbol ("MAPOBJECT_EVERY", MELT_GET); if (sy_MAPOBJECT_EVERY && NULL == /*_.VALDATA___V1891*/ meltfptr[1890]) /*_.VALDATA___V1891*/ meltfptr[1890] = (melt_ptr_t) sy_MAPOBJECT_EVERY; } /*^getnamedsymbol */ /*getnamedsym:LIST_FIND */ { melt_ptr_t sy_LIST_FIND = meltgc_named_symbol ("LIST_FIND", MELT_GET); if (sy_LIST_FIND && NULL == /*_.VALDATA___V1893*/ meltfptr[1892]) /*_.VALDATA___V1893*/ meltfptr[1892] = (melt_ptr_t) sy_LIST_FIND; } /*^getnamedsymbol */ /*getnamedsym:CLASS_ALTERNATE_MATCH_NREP_DATA */ { melt_ptr_t sy_CLASS_ALTERNATE_MATCH_NREP_DATA = meltgc_named_symbol ("CLASS_ALTERNATE_MATCH_NREP_DATA", MELT_GET); if (sy_CLASS_ALTERNATE_MATCH_NREP_DATA && NULL == /*_.VALDATA___V1895*/ meltfptr[1894]) /*_.VALDATA___V1895*/ meltfptr[1894] = (melt_ptr_t) sy_CLASS_ALTERNATE_MATCH_NREP_DATA; } /*^getnamedsymbol */ /*getnamedsym:CLASS_ROOT */ { melt_ptr_t sy_CLASS_ROOT = meltgc_named_symbol ("CLASS_ROOT", MELT_GET); if (sy_CLASS_ROOT && NULL == /*_.VALDATA___V1897*/ meltfptr[1896]) /*_.VALDATA___V1897*/ meltfptr[1896] = (melt_ptr_t) sy_CLASS_ROOT; } /*^getnamedsymbol */ /*getnamedsym:ALTMATCHN_PREV */ { melt_ptr_t sy_ALTMATCHN_PREV = meltgc_named_symbol ("ALTMATCHN_PREV", MELT_GET); if (sy_ALTMATCHN_PREV && NULL == /*_.VALDATA___V1911*/ meltfptr[1910]) /*_.VALDATA___V1911*/ meltfptr[1910] = (melt_ptr_t) sy_ALTMATCHN_PREV; } /*^getnamedsymbol */ /*getnamedsym:ALTMATCHN_NREP */ { melt_ptr_t sy_ALTMATCHN_NREP = meltgc_named_symbol ("ALTMATCHN_NREP", MELT_GET); if (sy_ALTMATCHN_NREP && NULL == /*_.VALDATA___V1913*/ meltfptr[1912]) /*_.VALDATA___V1913*/ meltfptr[1912] = (melt_ptr_t) sy_ALTMATCHN_NREP; } /*^getnamedsymbol */ /*getnamedsym:ALTMATCHN_FLAGMAP */ { melt_ptr_t sy_ALTMATCHN_FLAGMAP = meltgc_named_symbol ("ALTMATCHN_FLAGMAP", MELT_GET); if (sy_ALTMATCHN_FLAGMAP && NULL == /*_.VALDATA___V1915*/ meltfptr[1914]) /*_.VALDATA___V1915*/ meltfptr[1914] = (melt_ptr_t) sy_ALTMATCHN_FLAGMAP; } /*^getnamedsymbol */ /*getnamedsym:ALTMATCHN_DATAMAP */ { melt_ptr_t sy_ALTMATCHN_DATAMAP = meltgc_named_symbol ("ALTMATCHN_DATAMAP", MELT_GET); if (sy_ALTMATCHN_DATAMAP && NULL == /*_.VALDATA___V1917*/ meltfptr[1916]) /*_.VALDATA___V1917*/ meltfptr[1916] = (melt_ptr_t) sy_ALTMATCHN_DATAMAP; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_ALTMATCH */ { melt_ptr_t sy_CLASS_NREP_ALTMATCH = meltgc_named_symbol ("CLASS_NREP_ALTMATCH", MELT_GET); if (sy_CLASS_NREP_ALTMATCH && NULL == /*_.VALDATA___V1922*/ meltfptr[1921]) /*_.VALDATA___V1922*/ meltfptr[1921] = (melt_ptr_t) sy_CLASS_NREP_ALTMATCH; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_MATCH_LABEL */ { melt_ptr_t sy_CLASS_NREP_MATCH_LABEL = meltgc_named_symbol ("CLASS_NREP_MATCH_LABEL", MELT_GET); if (sy_CLASS_NREP_MATCH_LABEL && NULL == /*_.VALDATA___V1926*/ meltfptr[1925]) /*_.VALDATA___V1926*/ meltfptr[1925] = (melt_ptr_t) sy_CLASS_NREP_MATCH_LABEL; } /*^getnamedsymbol */ /*getnamedsym:CLASS_MATCH_STEP_WITH_DATA */ { melt_ptr_t sy_CLASS_MATCH_STEP_WITH_DATA = meltgc_named_symbol ("CLASS_MATCH_STEP_WITH_DATA", MELT_GET); if (sy_CLASS_MATCH_STEP_WITH_DATA && NULL == /*_.VALDATA___V1928*/ meltfptr[1927]) /*_.VALDATA___V1928*/ meltfptr[1927] = (melt_ptr_t) sy_CLASS_MATCH_STEP_WITH_DATA; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_MATCH_FLAG */ { melt_ptr_t sy_CLASS_NREP_MATCH_FLAG = meltgc_named_symbol ("CLASS_NREP_MATCH_FLAG", MELT_GET); if (sy_CLASS_NREP_MATCH_FLAG && NULL == /*_.VALDATA___V1932*/ meltfptr[1931]) /*_.VALDATA___V1932*/ meltfptr[1931] = (melt_ptr_t) sy_CLASS_NREP_MATCH_FLAG; } /*^getnamedsymbol */ /*getnamedsym:CLASS_MATCH_FLAG */ { melt_ptr_t sy_CLASS_MATCH_FLAG = meltgc_named_symbol ("CLASS_MATCH_FLAG", MELT_GET); if (sy_CLASS_MATCH_FLAG && NULL == /*_.VALDATA___V1934*/ meltfptr[1933]) /*_.VALDATA___V1934*/ meltfptr[1933] = (melt_ptr_t) sy_CLASS_MATCH_FLAG; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_MATCH_DATA_INITIALIZER */ { melt_ptr_t sy_CLASS_NREP_MATCH_DATA_INITIALIZER = meltgc_named_symbol ("CLASS_NREP_MATCH_DATA_INITIALIZER", MELT_GET); if (sy_CLASS_NREP_MATCH_DATA_INITIALIZER && NULL == /*_.VALDATA___V1940*/ meltfptr[1939]) /*_.VALDATA___V1940*/ meltfptr[1939] = (melt_ptr_t) sy_CLASS_NREP_MATCH_DATA_INITIALIZER; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_MATCH_DATA_ACTION */ { melt_ptr_t sy_CLASS_NREP_MATCH_DATA_ACTION = meltgc_named_symbol ("CLASS_NREP_MATCH_DATA_ACTION", MELT_GET); if (sy_CLASS_NREP_MATCH_DATA_ACTION && NULL == /*_.VALDATA___V1942*/ meltfptr[1941]) /*_.VALDATA___V1942*/ meltfptr[1941] = (melt_ptr_t) sy_CLASS_NREP_MATCH_DATA_ACTION; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_MATCHED_DATA */ { melt_ptr_t sy_CLASS_NREP_MATCHED_DATA = meltgc_named_symbol ("CLASS_NREP_MATCHED_DATA", MELT_GET); if (sy_CLASS_NREP_MATCHED_DATA && NULL == /*_.VALDATA___V1944*/ meltfptr[1943]) /*_.VALDATA___V1944*/ meltfptr[1943] = (melt_ptr_t) sy_CLASS_NREP_MATCHED_DATA; } /*^getnamedsymbol */ /*getnamedsym:CLONE_SYMBOL */ { melt_ptr_t sy_CLONE_SYMBOL = meltgc_named_symbol ("CLONE_SYMBOL", MELT_GET); if (sy_CLONE_SYMBOL && NULL == /*_.VALDATA___V1946*/ meltfptr[1945]) /*_.VALDATA___V1946*/ meltfptr[1945] = (melt_ptr_t) sy_CLONE_SYMBOL; } /*^getnamedsymbol */ /*getnamedsym:MATCHDATA */ { melt_ptr_t sy_MATCHDATA = meltgc_named_symbol ("MATCHDATA", MELT_GET); if (sy_MATCHDATA && NULL == /*_.VALDATA___V1937*/ meltfptr[1936]) /*_.VALDATA___V1937*/ meltfptr[1936] = (melt_ptr_t) sy_MATCHDATA; } /*^getnamedsymbol */ /*getnamedsym:CLASS_MATCHED_DATA */ { melt_ptr_t sy_CLASS_MATCHED_DATA = meltgc_named_symbol ("CLASS_MATCHED_DATA", MELT_GET); if (sy_CLASS_MATCHED_DATA && NULL == /*_.VALDATA___V1948*/ meltfptr[1947]) /*_.VALDATA___V1948*/ meltfptr[1947] = (melt_ptr_t) sy_CLASS_MATCHED_DATA; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_MATCH_JUMP */ { melt_ptr_t sy_CLASS_NREP_MATCH_JUMP = meltgc_named_symbol ("CLASS_NREP_MATCH_JUMP", MELT_GET); if (sy_CLASS_NREP_MATCH_JUMP && NULL == /*_.VALDATA___V1954*/ meltfptr[1953]) /*_.VALDATA___V1954*/ meltfptr[1953] = (melt_ptr_t) sy_CLASS_NREP_MATCH_JUMP; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NORMTESTER_MATCHER */ { melt_ptr_t sy_CLASS_NORMTESTER_MATCHER = meltgc_named_symbol ("CLASS_NORMTESTER_MATCHER", MELT_GET); if (sy_CLASS_NORMTESTER_MATCHER && NULL == /*_.VALDATA___V1969*/ meltfptr[1968]) /*_.VALDATA___V1969*/ meltfptr[1968] = (melt_ptr_t) sy_CLASS_NORMTESTER_MATCHER; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NORMTESTER_INSTANCE */ { melt_ptr_t sy_CLASS_NORMTESTER_INSTANCE = meltgc_named_symbol ("CLASS_NORMTESTER_INSTANCE", MELT_GET); if (sy_CLASS_NORMTESTER_INSTANCE && NULL == /*_.VALDATA___V1973*/ meltfptr[1972]) /*_.VALDATA___V1973*/ meltfptr[1972] = (melt_ptr_t) sy_CLASS_NORMTESTER_INSTANCE; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NORMTESTER_TUPLE */ { melt_ptr_t sy_CLASS_NORMTESTER_TUPLE = meltgc_named_symbol ("CLASS_NORMTESTER_TUPLE", MELT_GET); if (sy_CLASS_NORMTESTER_TUPLE && NULL == /*_.VALDATA___V1977*/ meltfptr[1976]) /*_.VALDATA___V1977*/ meltfptr[1976] = (melt_ptr_t) sy_CLASS_NORMTESTER_TUPLE; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NORMTESTER_SAME */ { melt_ptr_t sy_CLASS_NORMTESTER_SAME = meltgc_named_symbol ("CLASS_NORMTESTER_SAME", MELT_GET); if (sy_CLASS_NORMTESTER_SAME && NULL == /*_.VALDATA___V1981*/ meltfptr[1980]) /*_.VALDATA___V1981*/ meltfptr[1980] = (melt_ptr_t) sy_CLASS_NORMTESTER_SAME; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NORMTESTER_OR_CLEAR */ { melt_ptr_t sy_CLASS_NORMTESTER_OR_CLEAR = meltgc_named_symbol ("CLASS_NORMTESTER_OR_CLEAR", MELT_GET); if (sy_CLASS_NORMTESTER_OR_CLEAR && NULL == /*_.VALDATA___V1987*/ meltfptr[1986]) /*_.VALDATA___V1987*/ meltfptr[1986] = (melt_ptr_t) sy_CLASS_NORMTESTER_OR_CLEAR; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NORMTESTER_OR_TRANSMIT */ { melt_ptr_t sy_CLASS_NORMTESTER_OR_TRANSMIT = meltgc_named_symbol ("CLASS_NORMTESTER_OR_TRANSMIT", MELT_GET); if (sy_CLASS_NORMTESTER_OR_TRANSMIT && NULL == /*_.VALDATA___V1991*/ meltfptr[1990]) /*_.VALDATA___V1991*/ meltfptr[1990] = (melt_ptr_t) sy_CLASS_NORMTESTER_OR_TRANSMIT; } /*^getnamedsymbol */ /*getnamedsym:CLASS_NORMTESTER_DISJUNCTION */ { melt_ptr_t sy_CLASS_NORMTESTER_DISJUNCTION = meltgc_named_symbol ("CLASS_NORMTESTER_DISJUNCTION", MELT_GET); if (sy_CLASS_NORMTESTER_DISJUNCTION && NULL == /*_.VALDATA___V1995*/ meltfptr[1994]) /*_.VALDATA___V1995*/ meltfptr[1994] = (melt_ptr_t) sy_CLASS_NORMTESTER_DISJUNCTION; } /*^getnamedsymbol */ /*getnamedsym:CLASS_CMATCHER */ { melt_ptr_t sy_CLASS_CMATCHER = meltgc_named_symbol ("CLASS_CMATCHER", MELT_GET); if (sy_CLASS_CMATCHER && NULL == /*_.VALDATA___V2003*/ meltfptr[2002]) /*_.VALDATA___V2003*/ meltfptr[2002] = (melt_ptr_t) sy_CLASS_CMATCHER; } /*^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___V2005*/ meltfptr[2004]) /*_.VALDATA___V2005*/ meltfptr[2004] = (melt_ptr_t) sy_MULTIPLE_EVERY_BOTH; } /*^getnamedsymbol */ /*getnamedsym:CLASS_FUNMATCHER */ { melt_ptr_t sy_CLASS_FUNMATCHER = meltgc_named_symbol ("CLASS_FUNMATCHER", MELT_GET); if (sy_CLASS_FUNMATCHER && NULL == /*_.VALDATA___V2013*/ meltfptr[2012]) /*_.VALDATA___V2013*/ meltfptr[2012] = (melt_ptr_t) sy_CLASS_FUNMATCHER; } /*^getnamedsymbol */ /*getnamedsym:_CLOSFUNMATCH */ { melt_ptr_t sy_CLOSFUNMATCH = meltgc_named_symbol ("_CLOSFUNMATCH", MELT_GET); if (sy_CLOSFUNMATCH && NULL == /*_.VALDATA___V2010*/ meltfptr[2009]) /*_.VALDATA___V2010*/ meltfptr[2009] = (melt_ptr_t) sy_CLOSFUNMATCH; } /*^getnamedsymbol */ /*getnamedsym:FMATCH_MATCHF */ { melt_ptr_t sy_FMATCH_MATCHF = meltgc_named_symbol ("FMATCH_MATCHF", MELT_GET); if (sy_FMATCH_MATCHF && NULL == /*_.VALDATA___V2015*/ meltfptr[2014]) /*_.VALDATA___V2015*/ meltfptr[2014] = (melt_ptr_t) sy_FMATCH_MATCHF; } /*^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_GENERATED_C_CODE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V172*/ meltfptr[171]), (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-genobj"; /*_.CLASS_NAMED__V8*/ meltfptr[7] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1022*/ meltfptr[1021]), (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-genobj"; /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1130*/ meltfptr[1129]), (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_MIXED_INTEGER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.DISCR_MIXED_INTEGER__V10*/ meltfptr[9] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1132*/ meltfptr[1131]), (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_MIXED_LOCATION"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.DISCR_MIXED_LOCATION__V11*/ meltfptr[10] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1134*/ meltfptr[1133]), (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-genobj"; /*_.CLASS_CTYPE__V12*/ meltfptr[11] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1136*/ meltfptr[1135]), (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-genobj"; /*_.DISCR_LIST__V13*/ meltfptr[12] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1138*/ meltfptr[1137]), (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-genobj"; /*_.DISCR_CONSTANT_INTEGER__V14*/ meltfptr[13] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1140*/ meltfptr[1139]), (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-genobj"; /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1142*/ meltfptr[1141]), (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-genobj"; /*_.LIST_APPEND2LIST__V16*/ meltfptr[15] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1144*/ meltfptr[1143]), (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-genobj"; /*_.LIST_TO_MULTIPLE__V17*/ meltfptr[16] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1146*/ meltfptr[1145]), (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-genobj"; /*_.DISCR_MULTIPLE__V18*/ meltfptr[17] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1148*/ meltfptr[1147]), (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-genobj"; /*_.CTYPE_VOID__V19*/ meltfptr[18] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1154*/ meltfptr[1153]), (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-genobj"; /*_.CLASS_SELECTOR__V20*/ meltfptr[19] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1158*/ meltfptr[1157]), (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-genobj"; /*_.INSTALL_METHOD__V21*/ meltfptr[20] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1214*/ meltfptr[1213]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP__V22*/ meltfptr[21] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1216*/ meltfptr[1215]), (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 = "COMPILE_OBJ"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.COMPILE_OBJ__V23*/ meltfptr[22] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1218*/ meltfptr[1217]), (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-genobj"; /*_.DISCR_ANY_RECEIVER__V24*/ meltfptr[23] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1224*/ meltfptr[1223]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "GET_CTYPE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.GET_CTYPE__V25*/ meltfptr[24] = 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 = "CTYPE_VALUE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CTYPE_VALUE__V26*/ meltfptr[25] = 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 = "DBGOUT_NAMEDOBJECT_METHOD"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.DBGOUT_NAMEDOBJECT_METHOD__V27*/ meltfptr[26] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1238*/ meltfptr[1237]), (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 = "DBG_OUTPUT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.DBG_OUTPUT__V28*/ meltfptr[27] = 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 = "AS_NULL"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.AS_NULL__V29*/ meltfptr[28] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1248*/ meltfptr[1247]), (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-genobj"; /*_.CLASS_CLONED_SYMBOL__V30*/ meltfptr[29] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1250*/ meltfptr[1249]), (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 = "INTEGERBOX_OF"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.INTEGERBOX_OF__V31*/ meltfptr[30] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1252*/ meltfptr[1251]), (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-genobj"; /*_.DISCR_STRBUF__V32*/ meltfptr[31] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1254*/ meltfptr[1253]), (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-genobj"; /*_.CLASS_SYMBOL__V33*/ meltfptr[32] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1256*/ meltfptr[1255]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_ROUTPROC"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_ROUTPROC__V34*/ meltfptr[33] = 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_MODULE_CONTEXT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_MODULE_CONTEXT__V35*/ meltfptr[34] = 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 = "CLASS_NREP_DEFUNROUTPROC"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_DEFUNROUTPROC__V36*/ meltfptr[35] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1278*/ meltfptr[1277]), (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-genobj"; /*_.DISCR_STRING__V37*/ meltfptr[36] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1280*/ meltfptr[1279]), (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-genobj"; /*_.DISCR_INTEGER__V38*/ meltfptr[37] = 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 = "DISCR_MAP_OBJECTS"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.DISCR_MAP_OBJECTS__V39*/ meltfptr[38] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1284*/ meltfptr[1283]), (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_C_GENERATION_CONTEXT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1286*/ meltfptr[1285]), (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-genobj"; /*_.MULTIPLE_MAP__V41*/ meltfptr[40] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1288*/ meltfptr[1287]), (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-genobj"; /*_.CLASS_FORMAL_BINDING__V42*/ meltfptr[41] = 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 = "CTYPE_LONG"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CTYPE_LONG__V43*/ meltfptr[42] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1292*/ meltfptr[1291]), (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-genobj"; /*_.LIST_EVERY__V44*/ meltfptr[43] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1294*/ meltfptr[1293]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_INITPROC"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_INITPROC__V45*/ meltfptr[44] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1328*/ meltfptr[1327]), (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_INITIAL_GENERATION_CONTEXT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_INITIAL_GENERATION_CONTEXT__V46*/ meltfptr[45] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1330*/ meltfptr[1329]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "LIST_MAP"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.LIST_MAP__V47*/ meltfptr[46] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1332*/ meltfptr[1331]), (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-genobj"; /*_.CLASS_ANY_BINDING__V48*/ meltfptr[47] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1334*/ meltfptr[1333]), (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-genobj"; /*_.CLASS_FIXED_BINDING__V49*/ meltfptr[48] = 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 = "CLASS_NREP_SIMPLE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_SIMPLE__V50*/ meltfptr[49] = 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 = "SYSDATA_CONT_FRESH_ENV"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.SYSDATA_CONT_FRESH_ENV__V51*/ meltfptr[50] = 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 = "CLASS_NREP_IMPORTEDVAL"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_IMPORTEDVAL__V52*/ meltfptr[51] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1342*/ meltfptr[1341]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_BOUND_DATA"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_BOUND_DATA__V53*/ meltfptr[52] = 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 = "MULTIPLE_EVERY"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.MULTIPLE_EVERY__V54*/ meltfptr[53] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1346*/ meltfptr[1345]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_DATAKEYWORD"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_DATAKEYWORD__V55*/ meltfptr[54] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1348*/ meltfptr[1347]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_DATASYMBOL"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_DATASYMBOL__V56*/ meltfptr[55] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1350*/ meltfptr[1349]), (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_IMPORTER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.SYSDATA_VALUE_IMPORTER__V57*/ meltfptr[56] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1352*/ meltfptr[1351]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_INITEXTENDPROC"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_INITEXTENDPROC__V58*/ meltfptr[57] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1373*/ meltfptr[1372]), (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-genobj"; /*_.CLASS_RUNNING_EXTENSION_MODULE_CONTEXT__V59*/ meltfptr[58] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1375*/ meltfptr[1374]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_ANYPROC"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_ANYPROC__V60*/ meltfptr[59] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1377*/ meltfptr[1376]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_EXTENSION_GENERATION_CONTEXT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_EXTENSION_GENERATION_CONTEXT__V61*/ meltfptr[60] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1379*/ meltfptr[1378]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_LITERALNAMEDVALUE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_LITERALNAMEDVALUE__V62*/ meltfptr[61] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1381*/ meltfptr[1380]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_LITERALVALUE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_LITERALVALUE__V63*/ meltfptr[62] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1383*/ meltfptr[1382]), (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_LITERAL_VALUE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_LITERAL_VALUE__V64*/ meltfptr[63] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1385*/ meltfptr[1384]), (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 = "REFERENCED_VALUE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.REFERENCED_VALUE__V65*/ meltfptr[64] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1387*/ meltfptr[1386]), (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 = "ENV_PREV"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.ENV_PREV__V66*/ meltfptr[65] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1389*/ meltfptr[1388]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_LET_BINDING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_LET_BINDING__V67*/ meltfptr[66] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1405*/ meltfptr[1404]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_CHUNK"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_CHUNK__V68*/ meltfptr[67] = 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 = "CLASS_NREP_TYPED_EXPRESSION"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_TYPED_EXPRESSION__V69*/ meltfptr[68] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1414*/ meltfptr[1413]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_NIL"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_NIL__V70*/ meltfptr[69] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1418*/ meltfptr[1417]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_COMMENT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_COMMENT__V71*/ meltfptr[70] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1422*/ meltfptr[1421]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_LOCSYMOCC"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_LOCSYMOCC__V72*/ meltfptr[71] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1426*/ meltfptr[1425]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_CLOSEDOCC"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_CLOSEDOCC__V73*/ meltfptr[72] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1430*/ meltfptr[1429]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_CONSTOCC"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_CONSTOCC__V74*/ meltfptr[73] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1434*/ meltfptr[1433]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "STRING4OUT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.STRING4OUT__V75*/ meltfptr[74] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1440*/ meltfptr[1439]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_DEFINED_CONSTANT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_DEFINED_CONSTANT__V76*/ meltfptr[75] = 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_NREP_QUASICONSTANT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_QUASICONSTANT__V77*/ meltfptr[76] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1448*/ meltfptr[1447]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V78*/ meltfptr[77] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1452*/ meltfptr[1451]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_FOREVER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_FOREVER__V79*/ meltfptr[78] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1457*/ meltfptr[1456]), (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-genobj"; /*_.CLASS_LABEL_BINDING__V80*/ meltfptr[79] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1459*/ meltfptr[1458]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_EXIT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_EXIT__V81*/ meltfptr[80] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1463*/ meltfptr[1462]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_AGAIN"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_AGAIN__V82*/ meltfptr[81] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1467*/ meltfptr[1466]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_LET"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_LET__V83*/ meltfptr[82] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1476*/ meltfptr[1475]), (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-genobj"; /*_.CLASS_NORMAL_LET_BINDING__V84*/ meltfptr[83] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1478*/ meltfptr[1477]), (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_SEXPR"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_SEXPR__V85*/ meltfptr[84] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1480*/ meltfptr[1479]), (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_CONSTRUCTED_LAMBDA_BINDING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING__V86*/ meltfptr[85] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1504*/ meltfptr[1503]), (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_CONSTRUCTOR_BINDING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NORMAL_CONSTRUCTOR_BINDING__V87*/ meltfptr[86] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1506*/ meltfptr[1505]), (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_CONSTRUCTED_TUPLE_BINDING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING__V88*/ meltfptr[87] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1510*/ meltfptr[1509]), (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_CONSTRUCTED_PAIR_BINDING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING__V89*/ meltfptr[88] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1514*/ meltfptr[1513]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NORMAL_CONSTRUCTED_LIST_BINDING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NORMAL_CONSTRUCTED_LIST_BINDING__V90*/ meltfptr[89] = 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 = "CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING__V91*/ meltfptr[90] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1522*/ meltfptr[1521]), (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-genobj"; /*_.CLASS_VALUE_BINDING__V92*/ meltfptr[91] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1524*/ meltfptr[1523]), (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-genobj"; /*_.CLASS_CLASS_BINDING__V93*/ meltfptr[92] = 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_CLASS"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_CLASS__V94*/ meltfptr[93] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1528*/ meltfptr[1527]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_LETREC"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_LETREC__V95*/ meltfptr[94] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1532*/ meltfptr[1531]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_SYMOCC"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_SYMOCC__V96*/ meltfptr[95] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1534*/ meltfptr[1533]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_CITERATION"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_CITERATION__V97*/ meltfptr[96] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1543*/ meltfptr[1542]), (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-genobj"; /*_.CLASS_CITERATOR__V98*/ meltfptr[97] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1545*/ meltfptr[1544]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_SETQ"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_SETQ__V99*/ meltfptr[98] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1549*/ meltfptr[1548]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_PROGN"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_PROGN__V100*/ meltfptr[99] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1554*/ meltfptr[1553]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_MULTACC"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_MULTACC__V101*/ meltfptr[100] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1559*/ meltfptr[1558]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_FIELDACC"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_FIELDACC__V102*/ meltfptr[101] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1564*/ meltfptr[1563]), (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-genobj"; /*_.CLASS_FIELD__V103*/ meltfptr[102] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1566*/ meltfptr[1565]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_DATAINSTANCE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_DATAINSTANCE__V104*/ meltfptr[103] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1568*/ meltfptr[1567]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_UNSAFE_GET_FIELD"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_UNSAFE_GET_FIELD__V105*/ meltfptr[104] = 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_NREP_UNSAFE_PUT_FIELDS"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_UNSAFE_PUT_FIELDS__V106*/ meltfptr[105] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1578*/ meltfptr[1577]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_FIELDASSIGN"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_FIELDASSIGN__V107*/ meltfptr[106] = 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_NREP_CHECKSIGNAL"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_CHECKSIGNAL__V108*/ meltfptr[107] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1584*/ meltfptr[1583]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_UNSAFE_NTH_COMPONENT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_UNSAFE_NTH_COMPONENT__V109*/ meltfptr[108] = 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_NREP_APPLY"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_APPLY__V110*/ meltfptr[109] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1593*/ meltfptr[1592]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_MULTIAPPLY"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_MULTIAPPLY__V111*/ meltfptr[110] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1602*/ meltfptr[1601]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_MSEND"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_MSEND__V112*/ meltfptr[111] = 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_NREP_MULTIMSEND"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_MULTIMSEND__V113*/ meltfptr[112] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1615*/ meltfptr[1614]), (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-genobj"; /*_.CTYPE_CSTRING__V114*/ meltfptr[113] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1641*/ meltfptr[1640]), (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-genobj"; /*_.DISCR_NULL_RECEIVER__V115*/ meltfptr[114] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1645*/ meltfptr[1644]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_IF"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_IF__V116*/ meltfptr[115] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1657*/ meltfptr[1656]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_IFISA"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_IFISA__V117*/ meltfptr[116] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1661*/ meltfptr[1660]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_IFTESTVALUE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_IFTESTVALUE__V118*/ meltfptr[117] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1663*/ meltfptr[1662]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_IFTUPLESIZED"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_IFTUPLESIZED__V119*/ meltfptr[118] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1667*/ meltfptr[1666]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_IFVARIADIC"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_IFVARIADIC__V120*/ meltfptr[119] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1671*/ meltfptr[1670]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_VARIADIC_ARGUMENT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_VARIADIC_ARGUMENT__V121*/ meltfptr[120] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1677*/ meltfptr[1676]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_CONSUME_VARIADIC"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_CONSUME_VARIADIC__V122*/ meltfptr[121] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1681*/ meltfptr[1680]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_CPPIF"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_CPPIF__V123*/ meltfptr[122] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1687*/ meltfptr[1686]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_RETURN"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_RETURN__V124*/ meltfptr[123] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1693*/ meltfptr[1692]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_LAMBDA"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_LAMBDA__V125*/ meltfptr[124] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1704*/ meltfptr[1703]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_INSTANCE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_INSTANCE__V126*/ meltfptr[125] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1712*/ meltfptr[1711]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_PREDEF"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_PREDEF__V127*/ meltfptr[126] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1718*/ meltfptr[1717]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_DATATUPLE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_DATATUPLE__V128*/ meltfptr[127] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1746*/ meltfptr[1745]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_DATASTRING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_DATASTRING__V129*/ meltfptr[128] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1752*/ meltfptr[1751]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_DATABOXEDINTEGER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_DATABOXEDINTEGER__V130*/ meltfptr[129] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1758*/ meltfptr[1757]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_DATACLOSURE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_DATACLOSURE__V131*/ meltfptr[130] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1767*/ meltfptr[1766]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_DATAROUTINE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_DATAROUTINE__V132*/ meltfptr[131] = 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 = "CLASS_NREP_QUASIDATA"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_QUASIDATA__V133*/ meltfptr[132] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1778*/ meltfptr[1777]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V134*/ meltfptr[133] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1782*/ meltfptr[1781]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT__V135*/ meltfptr[134] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1786*/ meltfptr[1785]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_STORE_PREDEFINED"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_STORE_PREDEFINED__V136*/ meltfptr[135] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1790*/ meltfptr[1789]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V137*/ meltfptr[136] = 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_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER__V138*/ meltfptr[137] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1804*/ meltfptr[1803]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "ADD2OUT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.ADD2OUT__V139*/ meltfptr[138] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1806*/ meltfptr[1805]), (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-genobj"; /*_.CLASS_PROPED__V140*/ meltfptr[139] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1814*/ meltfptr[1813]), (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_NORMTESTER_ANY"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NORMTESTER_ANY__V141*/ meltfptr[140] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1878*/ meltfptr[1877]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_MATCH"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_MATCH__V142*/ meltfptr[141] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1885*/ meltfptr[1884]), (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_NORMTESTER_ANYTESTER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NORMTESTER_ANYTESTER__V143*/ meltfptr[142] = 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_NORMTESTER_SUCCESS"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NORMTESTER_SUCCESS__V144*/ meltfptr[143] = 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 = "MAPOBJECT_EVERY"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.MAPOBJECT_EVERY__V145*/ meltfptr[144] = 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 = "LIST_FIND"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.LIST_FIND__V146*/ meltfptr[145] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1893*/ meltfptr[1892]), (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_ROOT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_ROOT__V147*/ meltfptr[146] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1897*/ meltfptr[1896]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_ALTMATCH"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_ALTMATCH__V148*/ meltfptr[147] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1922*/ meltfptr[1921]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_MATCH_LABEL"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_MATCH_LABEL__V149*/ meltfptr[148] = 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 = "CLASS_MATCH_STEP_WITH_DATA"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_MATCH_STEP_WITH_DATA__V150*/ meltfptr[149] = 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 = "CLASS_NREP_MATCH_FLAG"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_MATCH_FLAG__V151*/ meltfptr[150] = 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_MATCH_FLAG"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_MATCH_FLAG__V152*/ meltfptr[151] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1934*/ meltfptr[1933]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } /*^apply */ /*apply */ { union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_MATCH_DATA_INITIALIZER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_MATCH_DATA_INITIALIZER__V153*/ meltfptr[152] = 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 = "CLASS_NREP_MATCH_DATA_ACTION"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_MATCH_DATA_ACTION__V154*/ meltfptr[153] = 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 = "CLASS_NREP_MATCHED_DATA"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_MATCHED_DATA__V155*/ meltfptr[154] = 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 = "CLONE_SYMBOL"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLONE_SYMBOL__V156*/ meltfptr[155] = 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_MATCHED_DATA"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_MATCHED_DATA__V157*/ meltfptr[156] = 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_NREP_MATCH_JUMP"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NREP_MATCH_JUMP__V158*/ meltfptr[157] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1954*/ meltfptr[1953]), (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_NORMTESTER_MATCHER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NORMTESTER_MATCHER__V159*/ meltfptr[158] = 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 = "CLASS_NORMTESTER_INSTANCE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NORMTESTER_INSTANCE__V160*/ meltfptr[159] = 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 = "CLASS_NORMTESTER_TUPLE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NORMTESTER_TUPLE__V161*/ meltfptr[160] = 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 = "CLASS_NORMTESTER_SAME"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NORMTESTER_SAME__V162*/ meltfptr[161] = 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_NORMTESTER_OR_CLEAR"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NORMTESTER_OR_CLEAR__V163*/ meltfptr[162] = 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_NORMTESTER_OR_TRANSMIT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NORMTESTER_OR_TRANSMIT__V164*/ meltfptr[163] = 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 = "CLASS_NORMTESTER_DISJUNCTION"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_NORMTESTER_DISJUNCTION__V165*/ meltfptr[164] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V1995*/ meltfptr[1994]), (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-genobj"; /*_.CLASS_CMATCHER__V166*/ meltfptr[165] = 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 = "MULTIPLE_EVERY_BOTH"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.MULTIPLE_EVERY_BOTH__V167*/ meltfptr[166] = 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 = "CLASS_FUNMATCHER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-genobj"; /*_.CLASS_FUNMATCHER__V168*/ meltfptr[167] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V2013*/ meltfptr[2012]), (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-genobj"; /*_.FMATCH_MATCHF__V169*/ meltfptr[168] = melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t) ( /*_.VALDATA___V2015*/ meltfptr[2014]), (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_genobj (&meltfram__, meltpredefinited); /**initial routine body**/ meltmod__warmelt_genobj__initialmeltchunk_0 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_1 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_2 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_3 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_4 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_5 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_6 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_7 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_8 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_9 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_10 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_11 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_12 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_13 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_14 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_15 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_16 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_17 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_18 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_19 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_20 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_21 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_22 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_23 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_24 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_25 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_26 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_27 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_28 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_29 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_30 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_31 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_32 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_33 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_34 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_35 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_36 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_37 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_38 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_39 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_40 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_41 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_42 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_43 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_44 (&meltfram__, meltpredefinited); meltmod__warmelt_genobj__initialmeltchunk_45 (&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_genobj__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___V170*/ meltfptr[169])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V170*/ meltfptr[169])))); ((meltobject_ptr_t) ( /*_.VALDATA___V170*/ meltfptr[169]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V171*/ meltfptr[170]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V170*/ meltfptr[169]); melt_dbgtrace_written_object ( /*_.VALDATA___V170*/ meltfptr[169], "new static instance"); /*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"); MELT_LOCATION ("warmelt-genobj.melt:37:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-genobj.melt:37:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173])))); ((meltobject_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173]))->obj_vartab[4] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#41 */ melt_assertmsg ("putupl #41 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V176*/ meltfptr[175])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #41 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V176*/ meltfptr[175])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V176*/ meltfptr[175]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#42 */ melt_assertmsg ("putupl #42 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V176*/ meltfptr[175])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #42 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V176*/ meltfptr[175])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V176*/ meltfptr[175]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V176*/ meltfptr[175]); MELT_LOCATION ("warmelt-genobj.melt:37:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173])))); ((meltobject_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V176*/ meltfptr[175]); MELT_LOCATION ("warmelt-genobj.melt:37:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V177*/ meltfptr[176])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V177*/ meltfptr[176])))); ((meltobject_ptr_t) ( /*_.VALDATA___V177*/ meltfptr[176]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V178*/ meltfptr[177]); MELT_LOCATION ("warmelt-genobj.melt:37:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V177*/ meltfptr[176])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V177*/ meltfptr[176])))); ((meltobject_ptr_t) ( /*_.VALDATA___V177*/ meltfptr[176]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173]); MELT_LOCATION ("warmelt-genobj.melt:37:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V177*/ meltfptr[176]); MELT_LOCATION ("warmelt-genobj.melt:37:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V177*/ meltfptr[176], "new static instance"); /*putupl#43 */ melt_assertmsg ("putupl #43 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V179*/ meltfptr[178])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #43 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V179*/ meltfptr[178])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V179*/ meltfptr[178]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V177*/ meltfptr[176]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V179*/ meltfptr[178]); MELT_LOCATION ("warmelt-genobj.melt:37:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173])))); ((meltobject_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V179*/ meltfptr[178]); MELT_LOCATION ("warmelt-genobj.melt:37:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V174*/ meltfptr[173]); MELT_LOCATION ("warmelt-genobj.melt:37:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V174*/ meltfptr[173], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V180*/ meltfptr[179])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V180*/ meltfptr[179])))); ((meltobject_ptr_t) ( /*_.VALDATA___V180*/ meltfptr[179]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V181*/ meltfptr[180]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V180*/ meltfptr[179]); melt_dbgtrace_written_object ( /*_.VALDATA___V180*/ meltfptr[179], "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"); MELT_LOCATION ("warmelt-genobj.melt:44:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-genobj.melt:44:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183])))); ((meltobject_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173]); /*putupl#44 */ melt_assertmsg ("putupl #44 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V186*/ meltfptr[185])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #44 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V186*/ meltfptr[185])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V186*/ meltfptr[185]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#45 */ melt_assertmsg ("putupl #45 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V186*/ meltfptr[185])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #45 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V186*/ meltfptr[185])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V186*/ meltfptr[185]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#46 */ melt_assertmsg ("putupl #46 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V186*/ meltfptr[185])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #46 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V186*/ meltfptr[185])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V186*/ meltfptr[185]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V186*/ meltfptr[185]); MELT_LOCATION ("warmelt-genobj.melt:44:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183])))); ((meltobject_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V186*/ meltfptr[185]); /*putupl#47 */ melt_assertmsg ("putupl #47 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V187*/ meltfptr[186])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #47 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V187*/ meltfptr[186])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V187*/ meltfptr[186]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V177*/ meltfptr[176]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V187*/ meltfptr[186]); MELT_LOCATION ("warmelt-genobj.melt:44:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183])))); ((meltobject_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V187*/ meltfptr[186]); MELT_LOCATION ("warmelt-genobj.melt:44:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V184*/ meltfptr[183]); MELT_LOCATION ("warmelt-genobj.melt:44:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V184*/ meltfptr[183], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V188*/ meltfptr[187])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V188*/ meltfptr[187])))); ((meltobject_ptr_t) ( /*_.VALDATA___V188*/ meltfptr[187]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V189*/ meltfptr[188]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V188*/ meltfptr[187]); melt_dbgtrace_written_object ( /*_.VALDATA___V188*/ meltfptr[187], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:50:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-genobj.melt:50:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189])))); ((meltobject_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]); /*putupl#48 */ melt_assertmsg ("putupl #48 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V192*/ meltfptr[191])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #48 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V192*/ meltfptr[191])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V192*/ meltfptr[191]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#49 */ melt_assertmsg ("putupl #49 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V192*/ meltfptr[191])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #49 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V192*/ meltfptr[191])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V192*/ meltfptr[191]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#50 */ melt_assertmsg ("putupl #50 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V192*/ meltfptr[191])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #50 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V192*/ meltfptr[191])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V192*/ meltfptr[191]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173]); /*putupl#51 */ melt_assertmsg ("putupl #51 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V192*/ meltfptr[191])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #51 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V192*/ meltfptr[191])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V192*/ meltfptr[191]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-genobj.melt:50:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189])))); ((meltobject_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-genobj.melt:50:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V193*/ meltfptr[192])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V193*/ meltfptr[192])))); ((meltobject_ptr_t) ( /*_.VALDATA___V193*/ meltfptr[192]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V194*/ meltfptr[193]); MELT_LOCATION ("warmelt-genobj.melt:50:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V193*/ meltfptr[192])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V193*/ meltfptr[192])))); ((meltobject_ptr_t) ( /*_.VALDATA___V193*/ meltfptr[192]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189]); MELT_LOCATION ("warmelt-genobj.melt:50:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V193*/ meltfptr[192]); MELT_LOCATION ("warmelt-genobj.melt:50:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V193*/ meltfptr[192], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:50:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V195*/ meltfptr[194])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V195*/ meltfptr[194])))); ((meltobject_ptr_t) ( /*_.VALDATA___V195*/ meltfptr[194]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V196*/ meltfptr[195]); MELT_LOCATION ("warmelt-genobj.melt:50:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V195*/ meltfptr[194])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V195*/ meltfptr[194])))); ((meltobject_ptr_t) ( /*_.VALDATA___V195*/ meltfptr[194]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189]); MELT_LOCATION ("warmelt-genobj.melt:50:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V195*/ meltfptr[194]); MELT_LOCATION ("warmelt-genobj.melt:50:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V195*/ meltfptr[194], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:50:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V197*/ meltfptr[196])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V197*/ meltfptr[196])))); ((meltobject_ptr_t) ( /*_.VALDATA___V197*/ meltfptr[196]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-genobj.melt:50:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V197*/ meltfptr[196])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V197*/ meltfptr[196])))); ((meltobject_ptr_t) ( /*_.VALDATA___V197*/ meltfptr[196]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189]); MELT_LOCATION ("warmelt-genobj.melt:50:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V197*/ meltfptr[196]); MELT_LOCATION ("warmelt-genobj.melt:50:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V197*/ meltfptr[196], "new static instance"); /*putupl#52 */ melt_assertmsg ("putupl #52 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V199*/ meltfptr[198])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #52 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V199*/ meltfptr[198])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V199*/ meltfptr[198]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V177*/ meltfptr[176]); /*putupl#53 */ melt_assertmsg ("putupl #53 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V199*/ meltfptr[198])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #53 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V199*/ meltfptr[198])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V199*/ meltfptr[198]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V193*/ meltfptr[192]); /*putupl#54 */ melt_assertmsg ("putupl #54 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V199*/ meltfptr[198])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #54 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V199*/ meltfptr[198])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V199*/ meltfptr[198]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V195*/ meltfptr[194]); /*putupl#55 */ melt_assertmsg ("putupl #55 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V199*/ meltfptr[198])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #55 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V199*/ meltfptr[198])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V199*/ meltfptr[198]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V197*/ meltfptr[196]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V199*/ meltfptr[198]); MELT_LOCATION ("warmelt-genobj.melt:50:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189])))); ((meltobject_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V199*/ meltfptr[198]); MELT_LOCATION ("warmelt-genobj.melt:50:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V190*/ meltfptr[189]); MELT_LOCATION ("warmelt-genobj.melt:50:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V190*/ meltfptr[189], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V200*/ meltfptr[199])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V200*/ meltfptr[199])))); ((meltobject_ptr_t) ( /*_.VALDATA___V200*/ meltfptr[199]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V201*/ meltfptr[200]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V200*/ meltfptr[199]); melt_dbgtrace_written_object ( /*_.VALDATA___V200*/ meltfptr[199], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V202*/ meltfptr[201])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V202*/ meltfptr[201])))); ((meltobject_ptr_t) ( /*_.VALDATA___V202*/ meltfptr[201]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V203*/ meltfptr[202]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V202*/ meltfptr[201]); melt_dbgtrace_written_object ( /*_.VALDATA___V202*/ meltfptr[201], "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-genobj.melt:59:/ 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-genobj.melt:59:/ 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___V184*/ meltfptr[183]); /*putupl#56 */ melt_assertmsg ("putupl #56 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V210*/ meltfptr[209])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #56 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) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#57 */ melt_assertmsg ("putupl #57 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V210*/ meltfptr[209])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #57 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) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#58 */ melt_assertmsg ("putupl #58 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V210*/ meltfptr[209])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #58 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___V174*/ meltfptr[173]); /*putupl#59 */ melt_assertmsg ("putupl #59 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V210*/ meltfptr[209])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #59 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___V184*/ meltfptr[183]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V210*/ meltfptr[209]); MELT_LOCATION ("warmelt-genobj.melt:59:/ 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-genobj.melt:59:/ 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-genobj.melt:59:/ 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-genobj.melt:59:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V211*/ meltfptr[210]); MELT_LOCATION ("warmelt-genobj.melt:59:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V211*/ meltfptr[210], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:59:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V213*/ meltfptr[212])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V213*/ meltfptr[212])))); ((meltobject_ptr_t) ( /*_.VALDATA___V213*/ meltfptr[212]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V214*/ meltfptr[213]); MELT_LOCATION ("warmelt-genobj.melt:59:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V213*/ meltfptr[212])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V213*/ meltfptr[212])))); ((meltobject_ptr_t) ( /*_.VALDATA___V213*/ meltfptr[212]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V208*/ meltfptr[207]); MELT_LOCATION ("warmelt-genobj.melt:59:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V213*/ meltfptr[212]); MELT_LOCATION ("warmelt-genobj.melt:59:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V213*/ meltfptr[212], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:59:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V215*/ meltfptr[214])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V215*/ meltfptr[214])))); ((meltobject_ptr_t) ( /*_.VALDATA___V215*/ meltfptr[214]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V216*/ meltfptr[215]); MELT_LOCATION ("warmelt-genobj.melt:59:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V215*/ meltfptr[214])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V215*/ meltfptr[214])))); ((meltobject_ptr_t) ( /*_.VALDATA___V215*/ meltfptr[214]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V208*/ meltfptr[207]); MELT_LOCATION ("warmelt-genobj.melt:59:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V215*/ meltfptr[214]); MELT_LOCATION ("warmelt-genobj.melt:59:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V215*/ meltfptr[214], "new static instance"); /*putupl#60 */ melt_assertmsg ("putupl #60 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V217*/ meltfptr[216])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #60 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V217*/ meltfptr[216])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V217*/ meltfptr[216]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V177*/ meltfptr[176]); /*putupl#61 */ melt_assertmsg ("putupl #61 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V217*/ meltfptr[216])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #61 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V217*/ meltfptr[216])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V217*/ meltfptr[216]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V211*/ meltfptr[210]); /*putupl#62 */ melt_assertmsg ("putupl #62 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V217*/ meltfptr[216])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #62 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V217*/ meltfptr[216])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V217*/ meltfptr[216]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V213*/ meltfptr[212]); /*putupl#63 */ melt_assertmsg ("putupl #63 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V217*/ meltfptr[216])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #63 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V217*/ meltfptr[216])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V217*/ meltfptr[216]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V215*/ meltfptr[214]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V217*/ meltfptr[216]); MELT_LOCATION ("warmelt-genobj.melt:59:/ 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___V217*/ meltfptr[216]); MELT_LOCATION ("warmelt-genobj.melt:59:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V208*/ meltfptr[207]); MELT_LOCATION ("warmelt-genobj.melt:59:/ 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___V218*/ meltfptr[217])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V218*/ meltfptr[217])))); ((meltobject_ptr_t) ( /*_.VALDATA___V218*/ meltfptr[217]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V219*/ meltfptr[218]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V218*/ meltfptr[217]); melt_dbgtrace_written_object ( /*_.VALDATA___V218*/ meltfptr[217], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V220*/ meltfptr[219])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V220*/ meltfptr[219])))); ((meltobject_ptr_t) ( /*_.VALDATA___V220*/ meltfptr[219]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V221*/ meltfptr[220]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V220*/ meltfptr[219]); melt_dbgtrace_written_object ( /*_.VALDATA___V220*/ meltfptr[219], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V222*/ meltfptr[221])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V222*/ meltfptr[221])))); ((meltobject_ptr_t) ( /*_.VALDATA___V222*/ meltfptr[221]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V223*/ meltfptr[222]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V222*/ meltfptr[221]); melt_dbgtrace_written_object ( /*_.VALDATA___V222*/ meltfptr[221], "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"); MELT_LOCATION ("warmelt-genobj.melt:68:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-genobj.melt:68:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V226*/ meltfptr[225])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V226*/ meltfptr[225])))); ((meltobject_ptr_t) ( /*_.VALDATA___V226*/ meltfptr[225]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V208*/ meltfptr[207]); /*putupl#64 */ melt_assertmsg ("putupl #64 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V228*/ meltfptr[227])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #64 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V228*/ meltfptr[227])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V228*/ meltfptr[227]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#65 */ melt_assertmsg ("putupl #65 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V228*/ meltfptr[227])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #65 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V228*/ meltfptr[227])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V228*/ meltfptr[227]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#66 */ melt_assertmsg ("putupl #66 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V228*/ meltfptr[227])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #66 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V228*/ meltfptr[227])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V228*/ meltfptr[227]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173]); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_0 */ void meltmod__warmelt_genobj__initialmeltchunk_1 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*putupl#67*/ melt_assertmsg ("putupl #67 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V228*/ meltfptr[227])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #67 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V228*/ meltfptr[227])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V228*/ meltfptr[227]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]); /*putupl#68 */ melt_assertmsg ("putupl #68 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V228*/ meltfptr[227])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #68 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V228*/ meltfptr[227])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V228*/ meltfptr[227]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V208*/ meltfptr[207]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V228*/ meltfptr[227]); MELT_LOCATION ("warmelt-genobj.melt:68:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V226*/ meltfptr[225])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V226*/ meltfptr[225])))); ((meltobject_ptr_t) ( /*_.VALDATA___V226*/ meltfptr[225]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V228*/ meltfptr[227]); /*putupl#69 */ melt_assertmsg ("putupl #69 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V229*/ meltfptr[228])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #69 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V229*/ meltfptr[228])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V229*/ meltfptr[228]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V177*/ meltfptr[176]); /*putupl#70 */ melt_assertmsg ("putupl #70 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V229*/ meltfptr[228])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #70 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V229*/ meltfptr[228])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V229*/ meltfptr[228]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V211*/ meltfptr[210]); /*putupl#71 */ melt_assertmsg ("putupl #71 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V229*/ meltfptr[228])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #71 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V229*/ meltfptr[228])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V229*/ meltfptr[228]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V213*/ meltfptr[212]); /*putupl#72 */ melt_assertmsg ("putupl #72 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V229*/ meltfptr[228])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #72 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V229*/ meltfptr[228])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V229*/ meltfptr[228]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V215*/ meltfptr[214]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V229*/ meltfptr[228]); MELT_LOCATION ("warmelt-genobj.melt:68:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V226*/ meltfptr[225])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V226*/ meltfptr[225])))); ((meltobject_ptr_t) ( /*_.VALDATA___V226*/ meltfptr[225]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V229*/ meltfptr[228]); MELT_LOCATION ("warmelt-genobj.melt:68:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V226*/ meltfptr[225]); MELT_LOCATION ("warmelt-genobj.melt:68:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V226*/ meltfptr[225], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V230*/ meltfptr[229])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V230*/ meltfptr[229])))); ((meltobject_ptr_t) ( /*_.VALDATA___V230*/ meltfptr[229]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V231*/ meltfptr[230]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V230*/ meltfptr[229]); melt_dbgtrace_written_object ( /*_.VALDATA___V230*/ meltfptr[229], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:74:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231])))); ((meltobject_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V233*/ meltfptr[232]); MELT_LOCATION ("warmelt-genobj.melt:74:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231])))); ((meltobject_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]); /*putupl#73 */ melt_assertmsg ("putupl #73 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V234*/ meltfptr[233])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #73 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V234*/ meltfptr[233])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V234*/ meltfptr[233]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#74 */ melt_assertmsg ("putupl #74 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V234*/ meltfptr[233])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #74 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V234*/ meltfptr[233])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V234*/ meltfptr[233]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#75 */ melt_assertmsg ("putupl #75 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V234*/ meltfptr[233])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #75 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V234*/ meltfptr[233])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V234*/ meltfptr[233]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173]); /*putupl#76 */ melt_assertmsg ("putupl #76 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V234*/ meltfptr[233])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #76 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V234*/ meltfptr[233])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V234*/ meltfptr[233]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V234*/ meltfptr[233]); MELT_LOCATION ("warmelt-genobj.melt:74:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231])))); ((meltobject_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V234*/ meltfptr[233]); MELT_LOCATION ("warmelt-genobj.melt:74:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V235*/ meltfptr[234])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V235*/ meltfptr[234])))); ((meltobject_ptr_t) ( /*_.VALDATA___V235*/ meltfptr[234]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V236*/ meltfptr[235]); MELT_LOCATION ("warmelt-genobj.melt:74:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V235*/ meltfptr[234])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V235*/ meltfptr[234])))); ((meltobject_ptr_t) ( /*_.VALDATA___V235*/ meltfptr[234]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231]); MELT_LOCATION ("warmelt-genobj.melt:74:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V235*/ meltfptr[234]); MELT_LOCATION ("warmelt-genobj.melt:74:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V235*/ meltfptr[234], "new static instance"); /*putupl#77 */ melt_assertmsg ("putupl #77 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V237*/ meltfptr[236])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #77 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V237*/ meltfptr[236])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V237*/ meltfptr[236]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V177*/ meltfptr[176]); /*putupl#78 */ melt_assertmsg ("putupl #78 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V237*/ meltfptr[236])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #78 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V237*/ meltfptr[236])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V237*/ meltfptr[236]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V235*/ meltfptr[234]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V237*/ meltfptr[236]); MELT_LOCATION ("warmelt-genobj.melt:74:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231])))); ((meltobject_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V237*/ meltfptr[236]); MELT_LOCATION ("warmelt-genobj.melt:74:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V232*/ meltfptr[231]); MELT_LOCATION ("warmelt-genobj.melt:74:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V232*/ meltfptr[231], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___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-genobj.melt:80:/ 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-genobj.melt:80:/ 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___V184*/ meltfptr[183]); /*putupl#79 */ melt_assertmsg ("putupl #79 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V244*/ meltfptr[243])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #79 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) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#80 */ melt_assertmsg ("putupl #80 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V244*/ meltfptr[243])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #80 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) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#81 */ melt_assertmsg ("putupl #81 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V244*/ meltfptr[243])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #81 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___V174*/ meltfptr[173]); /*putupl#82 */ melt_assertmsg ("putupl #82 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V244*/ meltfptr[243])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #82 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___V184*/ meltfptr[183]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V244*/ meltfptr[243]); MELT_LOCATION ("warmelt-genobj.melt:80:/ 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]); /*putupl#83 */ melt_assertmsg ("putupl #83 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V245*/ meltfptr[244])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #83 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V245*/ meltfptr[244])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V245*/ meltfptr[244]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V177*/ meltfptr[176]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V245*/ meltfptr[244]); MELT_LOCATION ("warmelt-genobj.melt:80:/ 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___V245*/ meltfptr[244]); MELT_LOCATION ("warmelt-genobj.melt:80:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V242*/ meltfptr[241]); MELT_LOCATION ("warmelt-genobj.melt:80:/ 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___V246*/ meltfptr[245])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V246*/ meltfptr[245])))); ((meltobject_ptr_t) ( /*_.VALDATA___V246*/ meltfptr[245]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V247*/ meltfptr[246]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V246*/ meltfptr[245]); melt_dbgtrace_written_object ( /*_.VALDATA___V246*/ meltfptr[245], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:85:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V248*/ meltfptr[247])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V248*/ meltfptr[247])))); ((meltobject_ptr_t) ( /*_.VALDATA___V248*/ meltfptr[247]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V249*/ meltfptr[248]); MELT_LOCATION ("warmelt-genobj.melt:85:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V248*/ meltfptr[247])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V248*/ meltfptr[247])))); ((meltobject_ptr_t) ( /*_.VALDATA___V248*/ meltfptr[247]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]); /*putupl#84 */ melt_assertmsg ("putupl #84 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V250*/ meltfptr[249])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #84 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V250*/ meltfptr[249])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V250*/ meltfptr[249]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#85 */ melt_assertmsg ("putupl #85 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V250*/ meltfptr[249])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #85 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V250*/ meltfptr[249])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V250*/ meltfptr[249]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#86 */ melt_assertmsg ("putupl #86 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V250*/ meltfptr[249])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #86 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V250*/ meltfptr[249])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V250*/ meltfptr[249]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173]); /*putupl#87 */ melt_assertmsg ("putupl #87 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V250*/ meltfptr[249])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #87 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V250*/ meltfptr[249])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V250*/ meltfptr[249]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V250*/ meltfptr[249]); MELT_LOCATION ("warmelt-genobj.melt:85:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V248*/ meltfptr[247])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V248*/ meltfptr[247])))); ((meltobject_ptr_t) ( /*_.VALDATA___V248*/ meltfptr[247]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V250*/ meltfptr[249]); MELT_LOCATION ("warmelt-genobj.melt:85:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V251*/ meltfptr[250])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V251*/ meltfptr[250])))); ((meltobject_ptr_t) ( /*_.VALDATA___V251*/ meltfptr[250]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V252*/ meltfptr[251]); MELT_LOCATION ("warmelt-genobj.melt:85:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V251*/ meltfptr[250])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V251*/ meltfptr[250])))); ((meltobject_ptr_t) ( /*_.VALDATA___V251*/ meltfptr[250]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V248*/ meltfptr[247]); MELT_LOCATION ("warmelt-genobj.melt:85:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V251*/ meltfptr[250]); MELT_LOCATION ("warmelt-genobj.melt:85:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V251*/ meltfptr[250], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:85:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252])))); ((meltobject_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V254*/ meltfptr[253]); MELT_LOCATION ("warmelt-genobj.melt:85:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252])))); ((meltobject_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V248*/ meltfptr[247]); MELT_LOCATION ("warmelt-genobj.melt:85:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V253*/ meltfptr[252]); MELT_LOCATION ("warmelt-genobj.melt:85:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V253*/ meltfptr[252], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:85:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V255*/ meltfptr[254])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V255*/ meltfptr[254])))); ((meltobject_ptr_t) ( /*_.VALDATA___V255*/ meltfptr[254]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V256*/ meltfptr[255]); MELT_LOCATION ("warmelt-genobj.melt:85:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V255*/ meltfptr[254])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V255*/ meltfptr[254])))); ((meltobject_ptr_t) ( /*_.VALDATA___V255*/ meltfptr[254]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V248*/ meltfptr[247]); MELT_LOCATION ("warmelt-genobj.melt:85:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V255*/ meltfptr[254]); MELT_LOCATION ("warmelt-genobj.melt:85:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V255*/ meltfptr[254], "new static instance"); /*putupl#88 */ melt_assertmsg ("putupl #88 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V257*/ meltfptr[256])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #88 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V257*/ meltfptr[256])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V257*/ meltfptr[256]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V177*/ meltfptr[176]); /*putupl#89 */ melt_assertmsg ("putupl #89 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V257*/ meltfptr[256])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #89 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V257*/ meltfptr[256])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V257*/ meltfptr[256]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V251*/ meltfptr[250]); /*putupl#90 */ melt_assertmsg ("putupl #90 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V257*/ meltfptr[256])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #90 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V257*/ meltfptr[256])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V257*/ meltfptr[256]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V253*/ meltfptr[252]); /*putupl#91 */ melt_assertmsg ("putupl #91 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V257*/ meltfptr[256])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #91 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V257*/ meltfptr[256])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V257*/ meltfptr[256]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V255*/ meltfptr[254]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V257*/ meltfptr[256]); MELT_LOCATION ("warmelt-genobj.melt:85:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V248*/ meltfptr[247])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V248*/ meltfptr[247])))); ((meltobject_ptr_t) ( /*_.VALDATA___V248*/ meltfptr[247]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V257*/ meltfptr[256]); MELT_LOCATION ("warmelt-genobj.melt:85:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V248*/ meltfptr[247]); MELT_LOCATION ("warmelt-genobj.melt:85:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V248*/ meltfptr[247], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V258*/ meltfptr[257])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V258*/ meltfptr[257])))); ((meltobject_ptr_t) ( /*_.VALDATA___V258*/ meltfptr[257]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V259*/ meltfptr[258]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V258*/ meltfptr[257]); melt_dbgtrace_written_object ( /*_.VALDATA___V258*/ meltfptr[257], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V260*/ meltfptr[259])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V260*/ meltfptr[259])))); ((meltobject_ptr_t) ( /*_.VALDATA___V260*/ meltfptr[259]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V261*/ meltfptr[260]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V260*/ meltfptr[259]); melt_dbgtrace_written_object ( /*_.VALDATA___V260*/ meltfptr[259], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V262*/ meltfptr[261])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V262*/ meltfptr[261])))); ((meltobject_ptr_t) ( /*_.VALDATA___V262*/ meltfptr[261]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V263*/ meltfptr[262]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V262*/ meltfptr[261]); melt_dbgtrace_written_object ( /*_.VALDATA___V262*/ meltfptr[261], "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"); MELT_LOCATION ("warmelt-genobj.melt:93:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-genobj.melt:93:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265])))); ((meltobject_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]); /*putupl#92 */ melt_assertmsg ("putupl #92 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V268*/ meltfptr[267])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #92 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V268*/ meltfptr[267])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V268*/ meltfptr[267]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#93 */ melt_assertmsg ("putupl #93 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V268*/ meltfptr[267])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #93 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V268*/ meltfptr[267])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V268*/ meltfptr[267]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#94 */ melt_assertmsg ("putupl #94 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V268*/ meltfptr[267])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #94 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V268*/ meltfptr[267])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V268*/ meltfptr[267]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173]); /*putupl#95 */ melt_assertmsg ("putupl #95 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V268*/ meltfptr[267])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #95 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V268*/ meltfptr[267])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V268*/ meltfptr[267]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V268*/ meltfptr[267]); MELT_LOCATION ("warmelt-genobj.melt:93:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265])))); ((meltobject_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V268*/ meltfptr[267]); MELT_LOCATION ("warmelt-genobj.melt:93:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V269*/ meltfptr[268])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V269*/ meltfptr[268])))); ((meltobject_ptr_t) ( /*_.VALDATA___V269*/ meltfptr[268]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V270*/ meltfptr[269]); MELT_LOCATION ("warmelt-genobj.melt:93:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V269*/ meltfptr[268])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V269*/ meltfptr[268])))); ((meltobject_ptr_t) ( /*_.VALDATA___V269*/ meltfptr[268]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265]); MELT_LOCATION ("warmelt-genobj.melt:93:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V269*/ meltfptr[268]); MELT_LOCATION ("warmelt-genobj.melt:93:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V269*/ meltfptr[268], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:93:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V271*/ meltfptr[270])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V271*/ meltfptr[270])))); ((meltobject_ptr_t) ( /*_.VALDATA___V271*/ meltfptr[270]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V272*/ meltfptr[271]); MELT_LOCATION ("warmelt-genobj.melt:93:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V271*/ meltfptr[270])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V271*/ meltfptr[270])))); ((meltobject_ptr_t) ( /*_.VALDATA___V271*/ meltfptr[270]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265]); MELT_LOCATION ("warmelt-genobj.melt:93:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V271*/ meltfptr[270]); MELT_LOCATION ("warmelt-genobj.melt:93:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V271*/ meltfptr[270], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:93:/ 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-genobj.melt:93:/ 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___V266*/ meltfptr[265]); MELT_LOCATION ("warmelt-genobj.melt:93:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V273*/ meltfptr[272]); MELT_LOCATION ("warmelt-genobj.melt:93:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V273*/ meltfptr[272], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:93:/ 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-genobj.melt:93:/ 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___V266*/ meltfptr[265]); MELT_LOCATION ("warmelt-genobj.melt:93:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V275*/ meltfptr[274]); MELT_LOCATION ("warmelt-genobj.melt:93:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V275*/ meltfptr[274], "new static instance"); /*putupl#96 */ melt_assertmsg ("putupl #96 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V277*/ meltfptr[276])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #96 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___V177*/ meltfptr[176]); /*putupl#97 */ melt_assertmsg ("putupl #97 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V277*/ meltfptr[276])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #97 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___V269*/ meltfptr[268]); /*putupl#98 */ melt_assertmsg ("putupl #98 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V277*/ meltfptr[276])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #98 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___V271*/ meltfptr[270]); /*putupl#99 */ melt_assertmsg ("putupl #99 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V277*/ meltfptr[276])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #99 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___V273*/ meltfptr[272]); /*putupl#100 */ melt_assertmsg ("putupl #100 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V277*/ meltfptr[276])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #100 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V277*/ meltfptr[276])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V277*/ meltfptr[276]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V275*/ meltfptr[274]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V277*/ meltfptr[276]); MELT_LOCATION ("warmelt-genobj.melt:93:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265])))); ((meltobject_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V277*/ meltfptr[276]); MELT_LOCATION ("warmelt-genobj.melt:93:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V266*/ meltfptr[265]); MELT_LOCATION ("warmelt-genobj.melt:93:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V266*/ meltfptr[265], "new static instance"); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_1 */ void meltmod__warmelt_genobj__initialmeltchunk_2 (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___V278*/ meltfptr[277])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V278*/ meltfptr[277])))); ((meltobject_ptr_t) ( /*_.VALDATA___V278*/ meltfptr[277]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V279*/ meltfptr[278]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V278*/ meltfptr[277]); melt_dbgtrace_written_object ( /*_.VALDATA___V278*/ meltfptr[277], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V280*/ meltfptr[279])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V280*/ meltfptr[279])))); ((meltobject_ptr_t) ( /*_.VALDATA___V280*/ meltfptr[279]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V281*/ meltfptr[280]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V280*/ meltfptr[279]); melt_dbgtrace_written_object ( /*_.VALDATA___V280*/ meltfptr[279], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V282*/ meltfptr[281])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V282*/ meltfptr[281])))); ((meltobject_ptr_t) ( /*_.VALDATA___V282*/ meltfptr[281]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V283*/ meltfptr[282]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V282*/ meltfptr[281]); melt_dbgtrace_written_object ( /*_.VALDATA___V282*/ meltfptr[281], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V284*/ meltfptr[283])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V284*/ meltfptr[283])))); ((meltobject_ptr_t) ( /*_.VALDATA___V284*/ meltfptr[283]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V285*/ meltfptr[284]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V284*/ meltfptr[283]); melt_dbgtrace_written_object ( /*_.VALDATA___V284*/ meltfptr[283], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V286*/ meltfptr[285])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V286*/ meltfptr[285])))); ((meltobject_ptr_t) ( /*_.VALDATA___V286*/ meltfptr[285]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V287*/ meltfptr[286]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V286*/ meltfptr[285]); melt_dbgtrace_written_object ( /*_.VALDATA___V286*/ meltfptr[285], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:103:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V288*/ meltfptr[287])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V288*/ meltfptr[287])))); ((meltobject_ptr_t) ( /*_.VALDATA___V288*/ meltfptr[287]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V289*/ meltfptr[288]); MELT_LOCATION ("warmelt-genobj.melt:103:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V288*/ meltfptr[287])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V288*/ meltfptr[287])))); ((meltobject_ptr_t) ( /*_.VALDATA___V288*/ meltfptr[287]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265]); /*putupl#101 */ melt_assertmsg ("putupl #101 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V290*/ meltfptr[289])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #101 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V290*/ meltfptr[289])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V290*/ meltfptr[289]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#102 */ melt_assertmsg ("putupl #102 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V290*/ meltfptr[289])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #102 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V290*/ meltfptr[289])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V290*/ meltfptr[289]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#103 */ melt_assertmsg ("putupl #103 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V290*/ meltfptr[289])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #103 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V290*/ meltfptr[289])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V290*/ meltfptr[289]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173]); /*putupl#104 */ melt_assertmsg ("putupl #104 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V290*/ meltfptr[289])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #104 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V290*/ meltfptr[289])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V290*/ meltfptr[289]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]); /*putupl#105 */ melt_assertmsg ("putupl #105 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V290*/ meltfptr[289])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #105 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V290*/ meltfptr[289])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V290*/ meltfptr[289]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V290*/ meltfptr[289]); MELT_LOCATION ("warmelt-genobj.melt:103:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V288*/ meltfptr[287])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V288*/ meltfptr[287])))); ((meltobject_ptr_t) ( /*_.VALDATA___V288*/ meltfptr[287]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V290*/ meltfptr[289]); MELT_LOCATION ("warmelt-genobj.melt:103:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V291*/ meltfptr[290])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V291*/ meltfptr[290])))); ((meltobject_ptr_t) ( /*_.VALDATA___V291*/ meltfptr[290]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V292*/ meltfptr[291]); MELT_LOCATION ("warmelt-genobj.melt:103:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V291*/ meltfptr[290])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V291*/ meltfptr[290])))); ((meltobject_ptr_t) ( /*_.VALDATA___V291*/ meltfptr[290]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V288*/ meltfptr[287]); MELT_LOCATION ("warmelt-genobj.melt:103:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V291*/ meltfptr[290]); MELT_LOCATION ("warmelt-genobj.melt:103:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V291*/ meltfptr[290], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:103:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V293*/ meltfptr[292])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V293*/ meltfptr[292])))); ((meltobject_ptr_t) ( /*_.VALDATA___V293*/ meltfptr[292]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V294*/ meltfptr[293]); MELT_LOCATION ("warmelt-genobj.melt:103:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V293*/ meltfptr[292])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V293*/ meltfptr[292])))); ((meltobject_ptr_t) ( /*_.VALDATA___V293*/ meltfptr[292]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V288*/ meltfptr[287]); MELT_LOCATION ("warmelt-genobj.melt:103:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V293*/ meltfptr[292]); MELT_LOCATION ("warmelt-genobj.melt:103:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V293*/ meltfptr[292], "new static instance"); /*putupl#106 */ melt_assertmsg ("putupl #106 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V295*/ meltfptr[294])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #106 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V295*/ meltfptr[294])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V295*/ meltfptr[294]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V177*/ meltfptr[176]); /*putupl#107 */ melt_assertmsg ("putupl #107 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V295*/ meltfptr[294])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #107 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V295*/ meltfptr[294])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V295*/ meltfptr[294]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V269*/ meltfptr[268]); /*putupl#108 */ melt_assertmsg ("putupl #108 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V295*/ meltfptr[294])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #108 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V295*/ meltfptr[294])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V295*/ meltfptr[294]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V271*/ meltfptr[270]); /*putupl#109 */ melt_assertmsg ("putupl #109 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V295*/ meltfptr[294])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #109 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V295*/ meltfptr[294])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V295*/ meltfptr[294]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V273*/ meltfptr[272]); /*putupl#110 */ melt_assertmsg ("putupl #110 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V295*/ meltfptr[294])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #110 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V295*/ meltfptr[294])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V295*/ meltfptr[294]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V275*/ meltfptr[274]); /*putupl#111 */ melt_assertmsg ("putupl #111 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V295*/ meltfptr[294])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #111 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V295*/ meltfptr[294])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V295*/ meltfptr[294]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V291*/ meltfptr[290]); /*putupl#112 */ melt_assertmsg ("putupl #112 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V295*/ meltfptr[294])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #112 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V295*/ meltfptr[294])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V295*/ meltfptr[294]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V293*/ meltfptr[292]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V295*/ meltfptr[294]); MELT_LOCATION ("warmelt-genobj.melt:103:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V288*/ meltfptr[287])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V288*/ meltfptr[287])))); ((meltobject_ptr_t) ( /*_.VALDATA___V288*/ meltfptr[287]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V295*/ meltfptr[294]); MELT_LOCATION ("warmelt-genobj.melt:103:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V288*/ meltfptr[287]); MELT_LOCATION ("warmelt-genobj.melt:103:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V288*/ meltfptr[287], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V296*/ meltfptr[295])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V296*/ meltfptr[295])))); ((meltobject_ptr_t) ( /*_.VALDATA___V296*/ meltfptr[295]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V297*/ meltfptr[296]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V296*/ meltfptr[295]); melt_dbgtrace_written_object ( /*_.VALDATA___V296*/ meltfptr[295], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V298*/ meltfptr[297])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V298*/ meltfptr[297])))); ((meltobject_ptr_t) ( /*_.VALDATA___V298*/ meltfptr[297]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V299*/ meltfptr[298]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V298*/ meltfptr[297]); melt_dbgtrace_written_object ( /*_.VALDATA___V298*/ meltfptr[297], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V300*/ meltfptr[299])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V300*/ meltfptr[299])))); ((meltobject_ptr_t) ( /*_.VALDATA___V300*/ meltfptr[299]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V301*/ meltfptr[300]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V300*/ meltfptr[299]); melt_dbgtrace_written_object ( /*_.VALDATA___V300*/ meltfptr[299], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:112:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-genobj.melt:112:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V302*/ meltfptr[301])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V302*/ meltfptr[301])))); ((meltobject_ptr_t) ( /*_.VALDATA___V302*/ meltfptr[301]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V288*/ meltfptr[287]); /*putupl#113 */ melt_assertmsg ("putupl #113 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V304*/ meltfptr[303])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #113 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V304*/ meltfptr[303])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V304*/ meltfptr[303]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#114 */ melt_assertmsg ("putupl #114 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V304*/ meltfptr[303])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #114 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V304*/ meltfptr[303])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V304*/ meltfptr[303]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#115 */ melt_assertmsg ("putupl #115 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V304*/ meltfptr[303])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #115 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V304*/ meltfptr[303])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V304*/ meltfptr[303]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173]); /*putupl#116 */ melt_assertmsg ("putupl #116 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V304*/ meltfptr[303])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #116 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V304*/ meltfptr[303])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V304*/ meltfptr[303]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]); /*putupl#117 */ melt_assertmsg ("putupl #117 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V304*/ meltfptr[303])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #117 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V304*/ meltfptr[303])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V304*/ meltfptr[303]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265]); /*putupl#118 */ melt_assertmsg ("putupl #118 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V304*/ meltfptr[303])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #118 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V304*/ meltfptr[303])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V304*/ meltfptr[303]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V288*/ meltfptr[287]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V304*/ meltfptr[303]); MELT_LOCATION ("warmelt-genobj.melt:112:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V302*/ meltfptr[301])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V302*/ meltfptr[301])))); ((meltobject_ptr_t) ( /*_.VALDATA___V302*/ meltfptr[301]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V304*/ meltfptr[303]); /*putupl#119 */ melt_assertmsg ("putupl #119 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V305*/ meltfptr[304])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #119 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V305*/ meltfptr[304])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V305*/ meltfptr[304]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V177*/ meltfptr[176]); /*putupl#120 */ melt_assertmsg ("putupl #120 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V305*/ meltfptr[304])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #120 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V305*/ meltfptr[304])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V305*/ meltfptr[304]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V269*/ meltfptr[268]); /*putupl#121 */ melt_assertmsg ("putupl #121 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V305*/ meltfptr[304])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #121 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V305*/ meltfptr[304])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V305*/ meltfptr[304]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V271*/ meltfptr[270]); /*putupl#122 */ melt_assertmsg ("putupl #122 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V305*/ meltfptr[304])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #122 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V305*/ meltfptr[304])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V305*/ meltfptr[304]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V273*/ meltfptr[272]); /*putupl#123 */ melt_assertmsg ("putupl #123 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V305*/ meltfptr[304])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #123 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V305*/ meltfptr[304])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V305*/ meltfptr[304]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V275*/ meltfptr[274]); /*putupl#124 */ melt_assertmsg ("putupl #124 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V305*/ meltfptr[304])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #124 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V305*/ meltfptr[304])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V305*/ meltfptr[304]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V291*/ meltfptr[290]); /*putupl#125 */ melt_assertmsg ("putupl #125 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V305*/ meltfptr[304])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #125 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V305*/ meltfptr[304])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V305*/ meltfptr[304]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V293*/ meltfptr[292]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V305*/ meltfptr[304]); MELT_LOCATION ("warmelt-genobj.melt:112:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V302*/ meltfptr[301])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V302*/ meltfptr[301])))); ((meltobject_ptr_t) ( /*_.VALDATA___V302*/ meltfptr[301]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V305*/ meltfptr[304]); MELT_LOCATION ("warmelt-genobj.melt:112:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V302*/ meltfptr[301]); MELT_LOCATION ("warmelt-genobj.melt:112:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V302*/ meltfptr[301], "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-genobj.melt:119:/ 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-genobj.melt:119:/ 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___V266*/ meltfptr[265]); /*putupl#126 */ melt_assertmsg ("putupl #126 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V310*/ meltfptr[309])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #126 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) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#127 */ melt_assertmsg ("putupl #127 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V310*/ meltfptr[309])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #127 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) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#128 */ melt_assertmsg ("putupl #128 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V310*/ meltfptr[309])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #128 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___V174*/ meltfptr[173]); /*putupl#129 */ melt_assertmsg ("putupl #129 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V310*/ meltfptr[309])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #129 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___V184*/ meltfptr[183]); /*putupl#130 */ melt_assertmsg ("putupl #130 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V310*/ meltfptr[309])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #130 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V310*/ meltfptr[309])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V310*/ meltfptr[309]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V310*/ meltfptr[309]); MELT_LOCATION ("warmelt-genobj.melt:119:/ 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-genobj.melt:119:/ 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-genobj.melt:119:/ 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-genobj.melt:119:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V311*/ meltfptr[310]); MELT_LOCATION ("warmelt-genobj.melt:119:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V311*/ meltfptr[310], "new static instance"); /*putupl#131 */ melt_assertmsg ("putupl #131 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V313*/ meltfptr[312])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #131 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V313*/ meltfptr[312])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V313*/ meltfptr[312]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V177*/ meltfptr[176]); /*putupl#132 */ melt_assertmsg ("putupl #132 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V313*/ meltfptr[312])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #132 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V313*/ meltfptr[312])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V313*/ meltfptr[312]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V269*/ meltfptr[268]); /*putupl#133 */ melt_assertmsg ("putupl #133 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V313*/ meltfptr[312])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #133 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V313*/ meltfptr[312])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V313*/ meltfptr[312]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V271*/ meltfptr[270]); /*putupl#134 */ melt_assertmsg ("putupl #134 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V313*/ meltfptr[312])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #134 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V313*/ meltfptr[312])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V313*/ meltfptr[312]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V273*/ meltfptr[272]); /*putupl#135 */ melt_assertmsg ("putupl #135 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V313*/ meltfptr[312])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #135 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V313*/ meltfptr[312])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V313*/ meltfptr[312]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V275*/ meltfptr[274]); /*putupl#136 */ melt_assertmsg ("putupl #136 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V313*/ meltfptr[312])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #136 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V313*/ meltfptr[312])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V313*/ meltfptr[312]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V311*/ meltfptr[310]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V313*/ meltfptr[312]); MELT_LOCATION ("warmelt-genobj.melt:119:/ 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___V313*/ meltfptr[312]); MELT_LOCATION ("warmelt-genobj.melt:119:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V308*/ meltfptr[307]); MELT_LOCATION ("warmelt-genobj.melt:119:/ 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___V314*/ meltfptr[313])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V314*/ meltfptr[313])))); ((meltobject_ptr_t) ( /*_.VALDATA___V314*/ meltfptr[313]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V315*/ meltfptr[314]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V314*/ meltfptr[313]); melt_dbgtrace_written_object ( /*_.VALDATA___V314*/ meltfptr[313], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V316*/ meltfptr[315])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V316*/ meltfptr[315])))); ((meltobject_ptr_t) ( /*_.VALDATA___V316*/ meltfptr[315]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V317*/ meltfptr[316]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V316*/ meltfptr[315]); melt_dbgtrace_written_object ( /*_.VALDATA___V316*/ meltfptr[315], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:128:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-genobj.melt:128:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V318*/ meltfptr[317])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V318*/ meltfptr[317])))); ((meltobject_ptr_t) ( /*_.VALDATA___V318*/ meltfptr[317]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265]); /*putupl#137 */ melt_assertmsg ("putupl #137 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V320*/ meltfptr[319])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #137 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V320*/ meltfptr[319])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V320*/ meltfptr[319]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#138 */ melt_assertmsg ("putupl #138 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V320*/ meltfptr[319])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #138 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V320*/ meltfptr[319])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V320*/ meltfptr[319]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#139 */ melt_assertmsg ("putupl #139 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V320*/ meltfptr[319])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #139 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V320*/ meltfptr[319])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V320*/ meltfptr[319]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173]); /*putupl#140 */ melt_assertmsg ("putupl #140 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V320*/ meltfptr[319])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #140 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V320*/ meltfptr[319])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V320*/ meltfptr[319]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]); /*putupl#141 */ melt_assertmsg ("putupl #141 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V320*/ meltfptr[319])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #141 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V320*/ meltfptr[319])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V320*/ meltfptr[319]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V320*/ meltfptr[319]); MELT_LOCATION ("warmelt-genobj.melt:128:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V318*/ meltfptr[317])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V318*/ meltfptr[317])))); ((meltobject_ptr_t) ( /*_.VALDATA___V318*/ meltfptr[317]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V320*/ meltfptr[319]); MELT_LOCATION ("warmelt-genobj.melt:128:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V321*/ meltfptr[320])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V321*/ meltfptr[320])))); ((meltobject_ptr_t) ( /*_.VALDATA___V321*/ meltfptr[320]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V322*/ meltfptr[321]); MELT_LOCATION ("warmelt-genobj.melt:128:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V321*/ meltfptr[320])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V321*/ meltfptr[320])))); ((meltobject_ptr_t) ( /*_.VALDATA___V321*/ meltfptr[320]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V318*/ meltfptr[317]); MELT_LOCATION ("warmelt-genobj.melt:128:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V321*/ meltfptr[320]); MELT_LOCATION ("warmelt-genobj.melt:128:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V321*/ meltfptr[320], "new static instance"); /*putupl#142 */ melt_assertmsg ("putupl #142 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V323*/ meltfptr[322])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #142 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V323*/ meltfptr[322])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V323*/ meltfptr[322]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V177*/ meltfptr[176]); /*putupl#143 */ melt_assertmsg ("putupl #143 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V323*/ meltfptr[322])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #143 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V323*/ meltfptr[322])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V323*/ meltfptr[322]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V269*/ meltfptr[268]); /*putupl#144 */ melt_assertmsg ("putupl #144 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V323*/ meltfptr[322])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #144 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V323*/ meltfptr[322])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V323*/ meltfptr[322]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V271*/ meltfptr[270]); /*putupl#145 */ melt_assertmsg ("putupl #145 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V323*/ meltfptr[322])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #145 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V323*/ meltfptr[322])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V323*/ meltfptr[322]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V273*/ meltfptr[272]); /*putupl#146 */ melt_assertmsg ("putupl #146 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V323*/ meltfptr[322])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #146 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V323*/ meltfptr[322])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V323*/ meltfptr[322]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V275*/ meltfptr[274]); /*putupl#147 */ melt_assertmsg ("putupl #147 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V323*/ meltfptr[322])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #147 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V323*/ meltfptr[322])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V323*/ meltfptr[322]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V321*/ meltfptr[320]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V323*/ meltfptr[322]); MELT_LOCATION ("warmelt-genobj.melt:128:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V318*/ meltfptr[317])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V318*/ meltfptr[317])))); ((meltobject_ptr_t) ( /*_.VALDATA___V318*/ meltfptr[317]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V323*/ meltfptr[322]); MELT_LOCATION ("warmelt-genobj.melt:128:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V318*/ meltfptr[317]); MELT_LOCATION ("warmelt-genobj.melt:128:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V318*/ meltfptr[317], "new static instance"); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_2 */ void meltmod__warmelt_genobj__initialmeltchunk_3 (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___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"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V326*/ meltfptr[325]); melt_dbgtrace_written_object ( /*_.VALDATA___V326*/ meltfptr[325], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:136:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V328*/ meltfptr[327])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V328*/ meltfptr[327])))); ((meltobject_ptr_t) ( /*_.VALDATA___V328*/ meltfptr[327]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V329*/ meltfptr[328]); MELT_LOCATION ("warmelt-genobj.melt:136:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V328*/ meltfptr[327])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V328*/ meltfptr[327])))); ((meltobject_ptr_t) ( /*_.VALDATA___V328*/ meltfptr[327]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265]); /*putupl#148 */ melt_assertmsg ("putupl #148 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V330*/ meltfptr[329])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #148 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V330*/ meltfptr[329])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V330*/ meltfptr[329]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#149 */ melt_assertmsg ("putupl #149 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V330*/ meltfptr[329])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #149 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V330*/ meltfptr[329])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V330*/ meltfptr[329]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#150 */ melt_assertmsg ("putupl #150 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V330*/ meltfptr[329])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #150 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V330*/ meltfptr[329])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V330*/ meltfptr[329]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173]); /*putupl#151 */ melt_assertmsg ("putupl #151 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V330*/ meltfptr[329])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #151 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V330*/ meltfptr[329])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V330*/ meltfptr[329]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]); /*putupl#152 */ melt_assertmsg ("putupl #152 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V330*/ meltfptr[329])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #152 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V330*/ meltfptr[329])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V330*/ meltfptr[329]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V330*/ meltfptr[329]); MELT_LOCATION ("warmelt-genobj.melt:136:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V328*/ meltfptr[327])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V328*/ meltfptr[327])))); ((meltobject_ptr_t) ( /*_.VALDATA___V328*/ meltfptr[327]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V330*/ meltfptr[329]); MELT_LOCATION ("warmelt-genobj.melt:136:/ 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-genobj.melt:136:/ 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___V328*/ meltfptr[327]); MELT_LOCATION ("warmelt-genobj.melt:136:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V331*/ meltfptr[330]); MELT_LOCATION ("warmelt-genobj.melt:136:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V331*/ meltfptr[330], "new static instance"); /*putupl#153 */ melt_assertmsg ("putupl #153 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V333*/ meltfptr[332])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #153 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___V177*/ meltfptr[176]); /*putupl#154 */ melt_assertmsg ("putupl #154 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V333*/ meltfptr[332])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #154 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___V269*/ meltfptr[268]); /*putupl#155 */ melt_assertmsg ("putupl #155 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V333*/ meltfptr[332])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #155 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___V271*/ meltfptr[270]); /*putupl#156 */ melt_assertmsg ("putupl #156 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V333*/ meltfptr[332])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #156 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V333*/ meltfptr[332])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V333*/ meltfptr[332]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V273*/ meltfptr[272]); /*putupl#157 */ melt_assertmsg ("putupl #157 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V333*/ meltfptr[332])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #157 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V333*/ meltfptr[332])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V333*/ meltfptr[332]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V275*/ meltfptr[274]); /*putupl#158 */ melt_assertmsg ("putupl #158 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V333*/ meltfptr[332])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #158 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V333*/ meltfptr[332])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V333*/ meltfptr[332]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V331*/ meltfptr[330]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V333*/ meltfptr[332]); MELT_LOCATION ("warmelt-genobj.melt:136:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V328*/ meltfptr[327])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V328*/ meltfptr[327])))); ((meltobject_ptr_t) ( /*_.VALDATA___V328*/ meltfptr[327]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V333*/ meltfptr[332]); MELT_LOCATION ("warmelt-genobj.melt:136:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V328*/ meltfptr[327]); MELT_LOCATION ("warmelt-genobj.melt:136:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V328*/ meltfptr[327], "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"); MELT_LOCATION ("warmelt-genobj.melt:143:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-genobj.melt:143:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V338*/ meltfptr[337])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V338*/ meltfptr[337])))); ((meltobject_ptr_t) ( /*_.VALDATA___V338*/ meltfptr[337]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265]); /*putupl#159 */ melt_assertmsg ("putupl #159 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V340*/ meltfptr[339])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #159 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V340*/ meltfptr[339])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V340*/ meltfptr[339]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#160 */ melt_assertmsg ("putupl #160 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V340*/ meltfptr[339])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #160 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V340*/ meltfptr[339])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V340*/ meltfptr[339]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#161 */ melt_assertmsg ("putupl #161 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V340*/ meltfptr[339])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #161 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V340*/ meltfptr[339])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V340*/ meltfptr[339]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173]); /*putupl#162 */ melt_assertmsg ("putupl #162 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V340*/ meltfptr[339])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #162 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V340*/ meltfptr[339])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V340*/ meltfptr[339]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]); /*putupl#163 */ melt_assertmsg ("putupl #163 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V340*/ meltfptr[339])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #163 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V340*/ meltfptr[339])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V340*/ meltfptr[339]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V340*/ meltfptr[339]); MELT_LOCATION ("warmelt-genobj.melt:143:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V338*/ meltfptr[337])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V338*/ meltfptr[337])))); ((meltobject_ptr_t) ( /*_.VALDATA___V338*/ meltfptr[337]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V340*/ meltfptr[339]); /*putupl#164 */ melt_assertmsg ("putupl #164 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #164 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V177*/ meltfptr[176]); /*putupl#165 */ melt_assertmsg ("putupl #165 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #165 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V269*/ meltfptr[268]); /*putupl#166 */ melt_assertmsg ("putupl #166 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #166 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V271*/ meltfptr[270]); /*putupl#167 */ melt_assertmsg ("putupl #167 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #167 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V273*/ meltfptr[272]); /*putupl#168 */ melt_assertmsg ("putupl #168 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #168 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V275*/ meltfptr[274]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V341*/ meltfptr[340]); MELT_LOCATION ("warmelt-genobj.melt:143:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V338*/ meltfptr[337])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V338*/ meltfptr[337])))); ((meltobject_ptr_t) ( /*_.VALDATA___V338*/ meltfptr[337]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V341*/ meltfptr[340]); MELT_LOCATION ("warmelt-genobj.melt:143:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V338*/ meltfptr[337]); MELT_LOCATION ("warmelt-genobj.melt:143:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V338*/ meltfptr[337], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V342*/ meltfptr[341])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V342*/ meltfptr[341])))); ((meltobject_ptr_t) ( /*_.VALDATA___V342*/ meltfptr[341]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V343*/ meltfptr[342]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V342*/ meltfptr[341]); melt_dbgtrace_written_object ( /*_.VALDATA___V342*/ meltfptr[341], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:149:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343])))); ((meltobject_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V345*/ meltfptr[344]); MELT_LOCATION ("warmelt-genobj.melt:149:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343])))); ((meltobject_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265]); /*putupl#169 */ melt_assertmsg ("putupl #169 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V346*/ meltfptr[345])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #169 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V346*/ meltfptr[345])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V346*/ meltfptr[345]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#170 */ melt_assertmsg ("putupl #170 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V346*/ meltfptr[345])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #170 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V346*/ meltfptr[345])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V346*/ meltfptr[345]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#171 */ melt_assertmsg ("putupl #171 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V346*/ meltfptr[345])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #171 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V346*/ meltfptr[345])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V346*/ meltfptr[345]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173]); /*putupl#172 */ melt_assertmsg ("putupl #172 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V346*/ meltfptr[345])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #172 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V346*/ meltfptr[345])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V346*/ meltfptr[345]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]); /*putupl#173 */ melt_assertmsg ("putupl #173 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V346*/ meltfptr[345])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #173 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V346*/ meltfptr[345])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V346*/ meltfptr[345]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V346*/ meltfptr[345]); MELT_LOCATION ("warmelt-genobj.melt:149:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343])))); ((meltobject_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V346*/ meltfptr[345]); /*putupl#174 */ melt_assertmsg ("putupl #174 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V347*/ meltfptr[346])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #174 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___V177*/ meltfptr[176]); /*putupl#175 */ melt_assertmsg ("putupl #175 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V347*/ meltfptr[346])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #175 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___V269*/ meltfptr[268]); /*putupl#176 */ melt_assertmsg ("putupl #176 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V347*/ meltfptr[346])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #176 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___V271*/ meltfptr[270]); /*putupl#177 */ melt_assertmsg ("putupl #177 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V347*/ meltfptr[346])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #177 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___V273*/ meltfptr[272]); /*putupl#178 */ melt_assertmsg ("putupl #178 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V347*/ meltfptr[346])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #178 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V347*/ meltfptr[346])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V347*/ meltfptr[346]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V275*/ meltfptr[274]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V347*/ meltfptr[346]); MELT_LOCATION ("warmelt-genobj.melt:149:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343])))); ((meltobject_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V347*/ meltfptr[346]); MELT_LOCATION ("warmelt-genobj.melt:149:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V344*/ meltfptr[343]); MELT_LOCATION ("warmelt-genobj.melt:149:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V344*/ meltfptr[343], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V348*/ meltfptr[347])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V348*/ meltfptr[347])))); ((meltobject_ptr_t) ( /*_.VALDATA___V348*/ meltfptr[347]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V349*/ meltfptr[348]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V348*/ meltfptr[347]); melt_dbgtrace_written_object ( /*_.VALDATA___V348*/ meltfptr[347], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:154:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349])))); ((meltobject_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V351*/ meltfptr[350]); MELT_LOCATION ("warmelt-genobj.melt:154:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349])))); ((meltobject_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265]); /*putupl#179 */ melt_assertmsg ("putupl #179 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V352*/ meltfptr[351])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #179 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V352*/ meltfptr[351])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V352*/ meltfptr[351]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#180 */ melt_assertmsg ("putupl #180 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V352*/ meltfptr[351])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #180 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V352*/ meltfptr[351])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V352*/ meltfptr[351]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#181 */ melt_assertmsg ("putupl #181 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V352*/ meltfptr[351])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #181 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V352*/ meltfptr[351])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V352*/ meltfptr[351]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173]); /*putupl#182 */ melt_assertmsg ("putupl #182 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V352*/ meltfptr[351])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #182 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V352*/ meltfptr[351])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V352*/ meltfptr[351]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]); /*putupl#183 */ melt_assertmsg ("putupl #183 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V352*/ meltfptr[351])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #183 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V352*/ meltfptr[351])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V352*/ meltfptr[351]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V352*/ meltfptr[351]); MELT_LOCATION ("warmelt-genobj.melt:154:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349])))); ((meltobject_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V352*/ meltfptr[351]); /*putupl#184 */ melt_assertmsg ("putupl #184 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V353*/ meltfptr[352])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #184 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V353*/ meltfptr[352])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V353*/ meltfptr[352]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V177*/ meltfptr[176]); /*putupl#185 */ melt_assertmsg ("putupl #185 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V353*/ meltfptr[352])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #185 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V353*/ meltfptr[352])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V353*/ meltfptr[352]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V269*/ meltfptr[268]); /*putupl#186 */ melt_assertmsg ("putupl #186 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V353*/ meltfptr[352])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #186 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V353*/ meltfptr[352])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V353*/ meltfptr[352]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V271*/ meltfptr[270]); /*putupl#187 */ melt_assertmsg ("putupl #187 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V353*/ meltfptr[352])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #187 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V353*/ meltfptr[352])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V353*/ meltfptr[352]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V273*/ meltfptr[272]); /*putupl#188 */ melt_assertmsg ("putupl #188 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V353*/ meltfptr[352])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #188 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V353*/ meltfptr[352])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V353*/ meltfptr[352]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V275*/ meltfptr[274]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V353*/ meltfptr[352]); MELT_LOCATION ("warmelt-genobj.melt:154:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349])))); ((meltobject_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V353*/ meltfptr[352]); MELT_LOCATION ("warmelt-genobj.melt:154:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V350*/ meltfptr[349]); MELT_LOCATION ("warmelt-genobj.melt:154:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V350*/ meltfptr[349], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V354*/ meltfptr[353]); melt_dbgtrace_written_object ( /*_.VALDATA___V354*/ meltfptr[353], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:160:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V356*/ meltfptr[355])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V356*/ meltfptr[355])))); ((meltobject_ptr_t) ( /*_.VALDATA___V356*/ meltfptr[355]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V357*/ meltfptr[356]); MELT_LOCATION ("warmelt-genobj.melt:160:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V356*/ meltfptr[355])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V356*/ meltfptr[355])))); ((meltobject_ptr_t) ( /*_.VALDATA___V356*/ meltfptr[355]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265]); /*putupl#189 */ melt_assertmsg ("putupl #189 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V358*/ meltfptr[357])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #189 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V358*/ meltfptr[357])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V358*/ meltfptr[357]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#190 */ melt_assertmsg ("putupl #190 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V358*/ meltfptr[357])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #190 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V358*/ meltfptr[357])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V358*/ meltfptr[357]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#191 */ melt_assertmsg ("putupl #191 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V358*/ meltfptr[357])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #191 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V358*/ meltfptr[357])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V358*/ meltfptr[357]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173]); /*putupl#192 */ melt_assertmsg ("putupl #192 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V358*/ meltfptr[357])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #192 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V358*/ meltfptr[357])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V358*/ meltfptr[357]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]); /*putupl#193 */ melt_assertmsg ("putupl #193 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V358*/ meltfptr[357])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #193 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V358*/ meltfptr[357])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V358*/ meltfptr[357]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V358*/ meltfptr[357]); MELT_LOCATION ("warmelt-genobj.melt:160:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V356*/ meltfptr[355])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V356*/ meltfptr[355])))); ((meltobject_ptr_t) ( /*_.VALDATA___V356*/ meltfptr[355]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V358*/ meltfptr[357]); /*putupl#194 */ melt_assertmsg ("putupl #194 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V359*/ meltfptr[358])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #194 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___V177*/ meltfptr[176]); /*putupl#195 */ melt_assertmsg ("putupl #195 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V359*/ meltfptr[358])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #195 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___V269*/ meltfptr[268]); /*putupl#196 */ melt_assertmsg ("putupl #196 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V359*/ meltfptr[358])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #196 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___V271*/ meltfptr[270]); /*putupl#197 */ melt_assertmsg ("putupl #197 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V359*/ meltfptr[358])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #197 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___V273*/ meltfptr[272]); /*putupl#198 */ melt_assertmsg ("putupl #198 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V359*/ meltfptr[358])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #198 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___V275*/ meltfptr[274]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V359*/ meltfptr[358]); MELT_LOCATION ("warmelt-genobj.melt:160:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V356*/ meltfptr[355])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V356*/ meltfptr[355])))); ((meltobject_ptr_t) ( /*_.VALDATA___V356*/ meltfptr[355]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V359*/ meltfptr[358]); MELT_LOCATION ("warmelt-genobj.melt:160:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V356*/ meltfptr[355]); MELT_LOCATION ("warmelt-genobj.melt:160:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V356*/ meltfptr[355], "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"); MELT_LOCATION ("warmelt-genobj.melt:167:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-genobj.melt:167:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V362*/ meltfptr[361])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V362*/ meltfptr[361])))); ((meltobject_ptr_t) ( /*_.VALDATA___V362*/ meltfptr[361]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173]); /*putupl#199 */ melt_assertmsg ("putupl #199 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V364*/ meltfptr[363])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #199 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V364*/ meltfptr[363])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V364*/ meltfptr[363]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#200 */ melt_assertmsg ("putupl #200 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V364*/ meltfptr[363])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #200 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V364*/ meltfptr[363])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V364*/ meltfptr[363]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#201 */ melt_assertmsg ("putupl #201 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V364*/ meltfptr[363])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #201 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V364*/ meltfptr[363])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V364*/ meltfptr[363]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V364*/ meltfptr[363]); MELT_LOCATION ("warmelt-genobj.melt:167:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V362*/ meltfptr[361])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V362*/ meltfptr[361])))); ((meltobject_ptr_t) ( /*_.VALDATA___V362*/ meltfptr[361]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V364*/ meltfptr[363]); MELT_LOCATION ("warmelt-genobj.melt:167:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V365*/ meltfptr[364])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V365*/ meltfptr[364])))); ((meltobject_ptr_t) ( /*_.VALDATA___V365*/ meltfptr[364]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V366*/ meltfptr[365]); MELT_LOCATION ("warmelt-genobj.melt:167:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V365*/ meltfptr[364])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V365*/ meltfptr[364])))); ((meltobject_ptr_t) ( /*_.VALDATA___V365*/ meltfptr[364]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V362*/ meltfptr[361]); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_3 */ void meltmod__warmelt_genobj__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-genobj.melt:167:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V365*/ meltfptr[364]); MELT_LOCATION ("warmelt-genobj.melt:167:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V365*/ meltfptr[364], "new static instance"); /*putupl#202 */ melt_assertmsg ("putupl #202 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V367*/ meltfptr[366])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #202 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V367*/ meltfptr[366])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V367*/ meltfptr[366]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V177*/ meltfptr[176]); /*putupl#203 */ melt_assertmsg ("putupl #203 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V367*/ meltfptr[366])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #203 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V367*/ meltfptr[366])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V367*/ meltfptr[366]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V365*/ meltfptr[364]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V367*/ meltfptr[366]); MELT_LOCATION ("warmelt-genobj.melt:167:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V362*/ meltfptr[361])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V362*/ meltfptr[361])))); ((meltobject_ptr_t) ( /*_.VALDATA___V362*/ meltfptr[361]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V367*/ meltfptr[366]); MELT_LOCATION ("warmelt-genobj.melt:167:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V362*/ meltfptr[361]); MELT_LOCATION ("warmelt-genobj.melt:167:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V362*/ meltfptr[361], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V368*/ meltfptr[367])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V368*/ meltfptr[367])))); ((meltobject_ptr_t) ( /*_.VALDATA___V368*/ meltfptr[367]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V369*/ meltfptr[368]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V368*/ meltfptr[367]); melt_dbgtrace_written_object ( /*_.VALDATA___V368*/ meltfptr[367], "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"); MELT_LOCATION ("warmelt-genobj.melt:173:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-genobj.melt:173:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V372*/ meltfptr[371])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V372*/ meltfptr[371])))); ((meltobject_ptr_t) ( /*_.VALDATA___V372*/ meltfptr[371]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V362*/ meltfptr[361]); /*putupl#204 */ melt_assertmsg ("putupl #204 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V374*/ meltfptr[373])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #204 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V374*/ meltfptr[373])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V374*/ meltfptr[373]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#205 */ melt_assertmsg ("putupl #205 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V374*/ meltfptr[373])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #205 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V374*/ meltfptr[373])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V374*/ meltfptr[373]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#206 */ melt_assertmsg ("putupl #206 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V374*/ meltfptr[373])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #206 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V374*/ meltfptr[373])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V374*/ meltfptr[373]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173]); /*putupl#207 */ melt_assertmsg ("putupl #207 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V374*/ meltfptr[373])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #207 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V374*/ meltfptr[373])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V374*/ meltfptr[373]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V362*/ meltfptr[361]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V374*/ meltfptr[373]); MELT_LOCATION ("warmelt-genobj.melt:173:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V372*/ meltfptr[371])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V372*/ meltfptr[371])))); ((meltobject_ptr_t) ( /*_.VALDATA___V372*/ meltfptr[371]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V374*/ meltfptr[373]); MELT_LOCATION ("warmelt-genobj.melt:173:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V375*/ meltfptr[374])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V375*/ meltfptr[374])))); ((meltobject_ptr_t) ( /*_.VALDATA___V375*/ meltfptr[374]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V376*/ meltfptr[375]); MELT_LOCATION ("warmelt-genobj.melt:173:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V375*/ meltfptr[374])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V375*/ meltfptr[374])))); ((meltobject_ptr_t) ( /*_.VALDATA___V375*/ meltfptr[374]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V372*/ meltfptr[371]); MELT_LOCATION ("warmelt-genobj.melt:173:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V375*/ meltfptr[374]); MELT_LOCATION ("warmelt-genobj.melt:173:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V375*/ meltfptr[374], "new static instance"); /*putupl#208 */ melt_assertmsg ("putupl #208 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V377*/ meltfptr[376])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #208 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V377*/ meltfptr[376])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V377*/ meltfptr[376]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V177*/ meltfptr[176]); /*putupl#209 */ melt_assertmsg ("putupl #209 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V377*/ meltfptr[376])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #209 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V377*/ meltfptr[376])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V377*/ meltfptr[376]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V365*/ meltfptr[364]); /*putupl#210 */ melt_assertmsg ("putupl #210 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V377*/ meltfptr[376])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #210 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V377*/ meltfptr[376])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V377*/ meltfptr[376]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V375*/ meltfptr[374]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V377*/ meltfptr[376]); MELT_LOCATION ("warmelt-genobj.melt:173:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V372*/ meltfptr[371])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V372*/ meltfptr[371])))); ((meltobject_ptr_t) ( /*_.VALDATA___V372*/ meltfptr[371]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V377*/ meltfptr[376]); MELT_LOCATION ("warmelt-genobj.melt:173:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V372*/ meltfptr[371]); MELT_LOCATION ("warmelt-genobj.melt:173:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V372*/ meltfptr[371], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V378*/ meltfptr[377])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V378*/ meltfptr[377])))); ((meltobject_ptr_t) ( /*_.VALDATA___V378*/ meltfptr[377]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V379*/ meltfptr[378]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V378*/ meltfptr[377]); melt_dbgtrace_written_object ( /*_.VALDATA___V378*/ meltfptr[377], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V380*/ meltfptr[379])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V380*/ meltfptr[379])))); ((meltobject_ptr_t) ( /*_.VALDATA___V380*/ meltfptr[379]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V381*/ meltfptr[380]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V380*/ meltfptr[379]); melt_dbgtrace_written_object ( /*_.VALDATA___V380*/ meltfptr[379], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:179:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V382*/ meltfptr[381])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V382*/ meltfptr[381])))); ((meltobject_ptr_t) ( /*_.VALDATA___V382*/ meltfptr[381]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V383*/ meltfptr[382]); MELT_LOCATION ("warmelt-genobj.melt:179:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V382*/ meltfptr[381])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V382*/ meltfptr[381])))); ((meltobject_ptr_t) ( /*_.VALDATA___V382*/ meltfptr[381]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]); /*putupl#211 */ melt_assertmsg ("putupl #211 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V384*/ meltfptr[383])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #211 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V384*/ meltfptr[383])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V384*/ meltfptr[383]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#212 */ melt_assertmsg ("putupl #212 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V384*/ meltfptr[383])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #212 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V384*/ meltfptr[383])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V384*/ meltfptr[383]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#213 */ melt_assertmsg ("putupl #213 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V384*/ meltfptr[383])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #213 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V384*/ meltfptr[383])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V384*/ meltfptr[383]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173]); /*putupl#214 */ melt_assertmsg ("putupl #214 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V384*/ meltfptr[383])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #214 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V384*/ meltfptr[383])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V384*/ meltfptr[383]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V384*/ meltfptr[383]); MELT_LOCATION ("warmelt-genobj.melt:179:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V382*/ meltfptr[381])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V382*/ meltfptr[381])))); ((meltobject_ptr_t) ( /*_.VALDATA___V382*/ meltfptr[381]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V384*/ meltfptr[383]); MELT_LOCATION ("warmelt-genobj.melt:179:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V385*/ meltfptr[384])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V385*/ meltfptr[384])))); ((meltobject_ptr_t) ( /*_.VALDATA___V385*/ meltfptr[384]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V386*/ meltfptr[385]); MELT_LOCATION ("warmelt-genobj.melt:179:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V385*/ meltfptr[384])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V385*/ meltfptr[384])))); ((meltobject_ptr_t) ( /*_.VALDATA___V385*/ meltfptr[384]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V382*/ meltfptr[381]); MELT_LOCATION ("warmelt-genobj.melt:179:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V385*/ meltfptr[384]); MELT_LOCATION ("warmelt-genobj.melt:179:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V385*/ meltfptr[384], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:179:/ 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-genobj.melt:179:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V387*/ meltfptr[386])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V387*/ meltfptr[386])))); ((meltobject_ptr_t) ( /*_.VALDATA___V387*/ meltfptr[386]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V382*/ meltfptr[381]); MELT_LOCATION ("warmelt-genobj.melt:179:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V387*/ meltfptr[386]); MELT_LOCATION ("warmelt-genobj.melt:179:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V387*/ meltfptr[386], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:179:/ 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-genobj.melt:179:/ 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___V382*/ meltfptr[381]); MELT_LOCATION ("warmelt-genobj.melt:179:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V389*/ meltfptr[388]); MELT_LOCATION ("warmelt-genobj.melt:179:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V389*/ meltfptr[388], "new static instance"); /*putupl#215 */ melt_assertmsg ("putupl #215 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V391*/ meltfptr[390])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #215 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___V177*/ meltfptr[176]); /*putupl#216 */ melt_assertmsg ("putupl #216 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V391*/ meltfptr[390])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #216 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___V385*/ meltfptr[384]); /*putupl#217 */ melt_assertmsg ("putupl #217 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V391*/ meltfptr[390])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #217 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___V387*/ meltfptr[386]); /*putupl#218 */ melt_assertmsg ("putupl #218 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V391*/ meltfptr[390])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #218 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___V389*/ meltfptr[388]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V391*/ meltfptr[390]); MELT_LOCATION ("warmelt-genobj.melt:179:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V382*/ meltfptr[381])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V382*/ meltfptr[381])))); ((meltobject_ptr_t) ( /*_.VALDATA___V382*/ meltfptr[381]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V391*/ meltfptr[390]); MELT_LOCATION ("warmelt-genobj.melt:179:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V382*/ meltfptr[381]); MELT_LOCATION ("warmelt-genobj.melt:179:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V382*/ meltfptr[381], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___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"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V398*/ meltfptr[397]); melt_dbgtrace_written_object ( /*_.VALDATA___V398*/ meltfptr[397], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:187:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399])))); ((meltobject_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V401*/ meltfptr[400]); MELT_LOCATION ("warmelt-genobj.melt:187:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399])))); ((meltobject_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]))->obj_vartab[4] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#219 */ melt_assertmsg ("putupl #219 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V402*/ meltfptr[401])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #219 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V402*/ meltfptr[401])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V402*/ meltfptr[401]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#220 */ melt_assertmsg ("putupl #220 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V402*/ meltfptr[401])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #220 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V402*/ meltfptr[401])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V402*/ meltfptr[401]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V402*/ meltfptr[401]); MELT_LOCATION ("warmelt-genobj.melt:187:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399])))); ((meltobject_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V402*/ meltfptr[401]); MELT_LOCATION ("warmelt-genobj.melt:187:/ 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-genobj.melt:187:/ 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___V400*/ meltfptr[399]); MELT_LOCATION ("warmelt-genobj.melt:187:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V403*/ meltfptr[402]); MELT_LOCATION ("warmelt-genobj.melt:187:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V403*/ meltfptr[402], "new static instance"); /*putupl#221 */ melt_assertmsg ("putupl #221 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V405*/ meltfptr[404])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #221 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___V403*/ meltfptr[402]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V405*/ meltfptr[404]); MELT_LOCATION ("warmelt-genobj.melt:187:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399])))); ((meltobject_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V405*/ meltfptr[404]); MELT_LOCATION ("warmelt-genobj.melt:187:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V400*/ meltfptr[399]); MELT_LOCATION ("warmelt-genobj.melt:187:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V400*/ meltfptr[399], "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"); MELT_LOCATION ("warmelt-genobj.melt:192:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-genobj.melt:192:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V410*/ meltfptr[409])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V410*/ meltfptr[409])))); ((meltobject_ptr_t) ( /*_.VALDATA___V410*/ meltfptr[409]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#222 */ melt_assertmsg ("putupl #222 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V412*/ meltfptr[411])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #222 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V412*/ meltfptr[411])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V412*/ meltfptr[411]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#223 */ melt_assertmsg ("putupl #223 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V412*/ meltfptr[411])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #223 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V412*/ meltfptr[411])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V412*/ meltfptr[411]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#224 */ melt_assertmsg ("putupl #224 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V412*/ meltfptr[411])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #224 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V412*/ meltfptr[411])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V412*/ meltfptr[411]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V412*/ meltfptr[411]); MELT_LOCATION ("warmelt-genobj.melt:192:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V410*/ meltfptr[409])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V410*/ meltfptr[409])))); ((meltobject_ptr_t) ( /*_.VALDATA___V410*/ meltfptr[409]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V412*/ meltfptr[411]); MELT_LOCATION ("warmelt-genobj.melt:192:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V413*/ meltfptr[412])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V413*/ meltfptr[412])))); ((meltobject_ptr_t) ( /*_.VALDATA___V413*/ meltfptr[412]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V414*/ meltfptr[413]); MELT_LOCATION ("warmelt-genobj.melt:192:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V413*/ meltfptr[412])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V413*/ meltfptr[412])))); ((meltobject_ptr_t) ( /*_.VALDATA___V413*/ meltfptr[412]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V410*/ meltfptr[409]); MELT_LOCATION ("warmelt-genobj.melt:192:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V413*/ meltfptr[412]); MELT_LOCATION ("warmelt-genobj.melt:192:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V413*/ meltfptr[412], "new static instance"); /*putupl#225 */ melt_assertmsg ("putupl #225 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V415*/ meltfptr[414])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #225 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V415*/ meltfptr[414])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V415*/ meltfptr[414]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#226 */ melt_assertmsg ("putupl #226 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V415*/ meltfptr[414])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #226 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V415*/ meltfptr[414])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V415*/ meltfptr[414]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V413*/ meltfptr[412]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V415*/ meltfptr[414]); MELT_LOCATION ("warmelt-genobj.melt:192:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V410*/ meltfptr[409])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V410*/ meltfptr[409])))); ((meltobject_ptr_t) ( /*_.VALDATA___V410*/ meltfptr[409]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V415*/ meltfptr[414]); MELT_LOCATION ("warmelt-genobj.melt:192:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V410*/ meltfptr[409]); MELT_LOCATION ("warmelt-genobj.melt:192:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V410*/ meltfptr[409], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V416*/ meltfptr[415])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V416*/ meltfptr[415])))); ((meltobject_ptr_t) ( /*_.VALDATA___V416*/ meltfptr[415]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V417*/ meltfptr[416]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V416*/ meltfptr[415]); melt_dbgtrace_written_object ( /*_.VALDATA___V416*/ meltfptr[415], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V418*/ meltfptr[417])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V418*/ meltfptr[417])))); ((meltobject_ptr_t) ( /*_.VALDATA___V418*/ meltfptr[417]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V419*/ meltfptr[418]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V418*/ meltfptr[417]); melt_dbgtrace_written_object ( /*_.VALDATA___V418*/ meltfptr[417], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:197:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-genobj.melt:197:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V420*/ meltfptr[419])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V420*/ meltfptr[419])))); ((meltobject_ptr_t) ( /*_.VALDATA___V420*/ meltfptr[419]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#227 */ melt_assertmsg ("putupl #227 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V422*/ meltfptr[421])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #227 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V422*/ meltfptr[421])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V422*/ meltfptr[421]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#228 */ melt_assertmsg ("putupl #228 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V422*/ meltfptr[421])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #228 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V422*/ meltfptr[421])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V422*/ meltfptr[421]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#229 */ melt_assertmsg ("putupl #229 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V422*/ meltfptr[421])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #229 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V422*/ meltfptr[421])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V422*/ meltfptr[421]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_4 */ void meltmod__warmelt_genobj__initialmeltchunk_5 (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___V422*/ meltfptr[421]); MELT_LOCATION ("warmelt-genobj.melt:197:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V420*/ meltfptr[419])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V420*/ meltfptr[419])))); ((meltobject_ptr_t) ( /*_.VALDATA___V420*/ meltfptr[419]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V422*/ meltfptr[421]); /*putupl#230 */ melt_assertmsg ("putupl #230 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V423*/ meltfptr[422])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #230 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V423*/ meltfptr[422])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V423*/ meltfptr[422]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V423*/ meltfptr[422]); MELT_LOCATION ("warmelt-genobj.melt:197:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V420*/ meltfptr[419])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V420*/ meltfptr[419])))); ((meltobject_ptr_t) ( /*_.VALDATA___V420*/ meltfptr[419]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V423*/ meltfptr[422]); MELT_LOCATION ("warmelt-genobj.melt:197:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V420*/ meltfptr[419]); MELT_LOCATION ("warmelt-genobj.melt:197:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V420*/ meltfptr[419], "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-genobj.melt:203:/ 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-genobj.melt:203:/ 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___V400*/ meltfptr[399]); /*putupl#231 */ melt_assertmsg ("putupl #231 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V428*/ meltfptr[427])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #231 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) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#232 */ melt_assertmsg ("putupl #232 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V428*/ meltfptr[427])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #232 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) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#233 */ melt_assertmsg ("putupl #233 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V428*/ meltfptr[427])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #233 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___V400*/ meltfptr[399]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V428*/ meltfptr[427]); MELT_LOCATION ("warmelt-genobj.melt:203:/ 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-genobj.melt:203:/ 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-genobj.melt:203:/ 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-genobj.melt:203:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V429*/ meltfptr[428]); MELT_LOCATION ("warmelt-genobj.melt:203:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V429*/ meltfptr[428], "new static instance"); /*putupl#234 */ melt_assertmsg ("putupl #234 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V431*/ meltfptr[430])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #234 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___V403*/ meltfptr[402]); /*putupl#235 */ melt_assertmsg ("putupl #235 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V431*/ meltfptr[430])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #235 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___V429*/ meltfptr[428]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V431*/ meltfptr[430]); MELT_LOCATION ("warmelt-genobj.melt:203:/ 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-genobj.melt:203:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V426*/ meltfptr[425]); MELT_LOCATION ("warmelt-genobj.melt:203:/ 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-genobj.melt:209:/ 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-genobj.melt:209:/ 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___V426*/ meltfptr[425]); /*putupl#236 */ melt_assertmsg ("putupl #236 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V438*/ meltfptr[437])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #236 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) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#237 */ melt_assertmsg ("putupl #237 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V438*/ meltfptr[437])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #237 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) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#238 */ melt_assertmsg ("putupl #238 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V438*/ meltfptr[437])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #238 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___V400*/ meltfptr[399]); /*putupl#239 */ melt_assertmsg ("putupl #239 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V438*/ meltfptr[437])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #239 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V438*/ meltfptr[437])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V438*/ meltfptr[437]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V426*/ meltfptr[425]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V438*/ meltfptr[437]); MELT_LOCATION ("warmelt-genobj.melt:209:/ 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-genobj.melt:209:/ 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-genobj.melt:209:/ 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-genobj.melt:209:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V439*/ meltfptr[438]); MELT_LOCATION ("warmelt-genobj.melt:209:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V439*/ meltfptr[438], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:209:/ 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-genobj.melt:209:/ 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-genobj.melt:209:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V441*/ meltfptr[440]); MELT_LOCATION ("warmelt-genobj.melt:209:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V441*/ meltfptr[440], "new static instance"); /*putupl#240 */ melt_assertmsg ("putupl #240 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V443*/ meltfptr[442])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #240 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V443*/ meltfptr[442])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V443*/ meltfptr[442]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#241 */ melt_assertmsg ("putupl #241 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V443*/ meltfptr[442])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #241 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V443*/ meltfptr[442])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V443*/ meltfptr[442]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V429*/ meltfptr[428]); /*putupl#242 */ melt_assertmsg ("putupl #242 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V443*/ meltfptr[442])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #242 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V443*/ meltfptr[442])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V443*/ meltfptr[442]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V439*/ meltfptr[438]); /*putupl#243 */ melt_assertmsg ("putupl #243 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V443*/ meltfptr[442])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #243 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V443*/ meltfptr[442])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V443*/ meltfptr[442]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V441*/ meltfptr[440]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V443*/ meltfptr[442]); MELT_LOCATION ("warmelt-genobj.melt:209:/ 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___V443*/ meltfptr[442]); MELT_LOCATION ("warmelt-genobj.melt:209:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V436*/ meltfptr[435]); MELT_LOCATION ("warmelt-genobj.melt:209:/ 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___V444*/ meltfptr[443])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V444*/ meltfptr[443])))); ((meltobject_ptr_t) ( /*_.VALDATA___V444*/ meltfptr[443]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V445*/ meltfptr[444]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V444*/ meltfptr[443]); melt_dbgtrace_written_object ( /*_.VALDATA___V444*/ meltfptr[443], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V446*/ meltfptr[445])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V446*/ meltfptr[445])))); ((meltobject_ptr_t) ( /*_.VALDATA___V446*/ meltfptr[445]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V447*/ meltfptr[446]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V446*/ meltfptr[445]); melt_dbgtrace_written_object ( /*_.VALDATA___V446*/ meltfptr[445], "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"); MELT_LOCATION ("warmelt-genobj.melt:216:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-genobj.melt:216:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V450*/ meltfptr[449])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V450*/ meltfptr[449])))); ((meltobject_ptr_t) ( /*_.VALDATA___V450*/ meltfptr[449]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#244 */ melt_assertmsg ("putupl #244 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V452*/ meltfptr[451])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #244 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V452*/ meltfptr[451])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V452*/ meltfptr[451]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#245 */ melt_assertmsg ("putupl #245 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V452*/ meltfptr[451])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #245 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V452*/ meltfptr[451])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V452*/ meltfptr[451]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#246 */ melt_assertmsg ("putupl #246 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V452*/ meltfptr[451])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #246 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V452*/ meltfptr[451])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V452*/ meltfptr[451]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V452*/ meltfptr[451]); MELT_LOCATION ("warmelt-genobj.melt:216:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V450*/ meltfptr[449])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V450*/ meltfptr[449])))); ((meltobject_ptr_t) ( /*_.VALDATA___V450*/ meltfptr[449]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V452*/ meltfptr[451]); MELT_LOCATION ("warmelt-genobj.melt:216:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V453*/ meltfptr[452])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V453*/ meltfptr[452])))); ((meltobject_ptr_t) ( /*_.VALDATA___V453*/ meltfptr[452]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V454*/ meltfptr[453]); MELT_LOCATION ("warmelt-genobj.melt:216:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V453*/ meltfptr[452])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V453*/ meltfptr[452])))); ((meltobject_ptr_t) ( /*_.VALDATA___V453*/ meltfptr[452]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V450*/ meltfptr[449]); MELT_LOCATION ("warmelt-genobj.melt:216:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V453*/ meltfptr[452]); MELT_LOCATION ("warmelt-genobj.melt:216:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V453*/ meltfptr[452], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:216:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V455*/ meltfptr[454])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V455*/ meltfptr[454])))); ((meltobject_ptr_t) ( /*_.VALDATA___V455*/ meltfptr[454]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V456*/ meltfptr[455]); MELT_LOCATION ("warmelt-genobj.melt:216:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V455*/ meltfptr[454])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V455*/ meltfptr[454])))); ((meltobject_ptr_t) ( /*_.VALDATA___V455*/ meltfptr[454]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V450*/ meltfptr[449]); MELT_LOCATION ("warmelt-genobj.melt:216:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V455*/ meltfptr[454]); MELT_LOCATION ("warmelt-genobj.melt:216:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V455*/ meltfptr[454], "new static instance"); /*putupl#247 */ melt_assertmsg ("putupl #247 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V457*/ meltfptr[456])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #247 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V457*/ meltfptr[456])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V457*/ meltfptr[456]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#248 */ melt_assertmsg ("putupl #248 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V457*/ meltfptr[456])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #248 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V457*/ meltfptr[456])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V457*/ meltfptr[456]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V453*/ meltfptr[452]); /*putupl#249 */ melt_assertmsg ("putupl #249 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V457*/ meltfptr[456])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #249 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V457*/ meltfptr[456])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V457*/ meltfptr[456]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V455*/ meltfptr[454]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V457*/ meltfptr[456]); MELT_LOCATION ("warmelt-genobj.melt:216:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V450*/ meltfptr[449])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V450*/ meltfptr[449])))); ((meltobject_ptr_t) ( /*_.VALDATA___V450*/ meltfptr[449]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V457*/ meltfptr[456]); MELT_LOCATION ("warmelt-genobj.melt:216:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V450*/ meltfptr[449]); MELT_LOCATION ("warmelt-genobj.melt:216:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V450*/ meltfptr[449], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V458*/ meltfptr[457]); melt_dbgtrace_written_object ( /*_.VALDATA___V458*/ meltfptr[457], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V460*/ meltfptr[459])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V460*/ meltfptr[459])))); ((meltobject_ptr_t) ( /*_.VALDATA___V460*/ meltfptr[459]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V461*/ meltfptr[460]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V460*/ meltfptr[459]); melt_dbgtrace_written_object ( /*_.VALDATA___V460*/ meltfptr[459], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V462*/ meltfptr[461])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V462*/ meltfptr[461])))); ((meltobject_ptr_t) ( /*_.VALDATA___V462*/ meltfptr[461]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V463*/ meltfptr[462]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V462*/ meltfptr[461]); melt_dbgtrace_written_object ( /*_.VALDATA___V462*/ meltfptr[461], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:223:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V464*/ meltfptr[463])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V464*/ meltfptr[463])))); ((meltobject_ptr_t) ( /*_.VALDATA___V464*/ meltfptr[463]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V465*/ meltfptr[464]); MELT_LOCATION ("warmelt-genobj.melt:223:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V464*/ meltfptr[463])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V464*/ meltfptr[463])))); ((meltobject_ptr_t) ( /*_.VALDATA___V464*/ meltfptr[463]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V450*/ meltfptr[449]); /*putupl#250 */ melt_assertmsg ("putupl #250 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V466*/ meltfptr[465])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #250 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V466*/ meltfptr[465])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V466*/ meltfptr[465]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#251 */ melt_assertmsg ("putupl #251 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V466*/ meltfptr[465])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #251 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V466*/ meltfptr[465])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V466*/ meltfptr[465]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#252 */ melt_assertmsg ("putupl #252 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V466*/ meltfptr[465])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #252 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V466*/ meltfptr[465])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V466*/ meltfptr[465]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#253 */ melt_assertmsg ("putupl #253 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V466*/ meltfptr[465])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #253 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V466*/ meltfptr[465])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V466*/ meltfptr[465]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V450*/ meltfptr[449]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V466*/ meltfptr[465]); MELT_LOCATION ("warmelt-genobj.melt:223:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V464*/ meltfptr[463])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V464*/ meltfptr[463])))); ((meltobject_ptr_t) ( /*_.VALDATA___V464*/ meltfptr[463]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V466*/ meltfptr[465]); MELT_LOCATION ("warmelt-genobj.melt:223:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V467*/ meltfptr[466])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V467*/ meltfptr[466])))); ((meltobject_ptr_t) ( /*_.VALDATA___V467*/ meltfptr[466]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V468*/ meltfptr[467]); MELT_LOCATION ("warmelt-genobj.melt:223:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V467*/ meltfptr[466])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V467*/ meltfptr[466])))); ((meltobject_ptr_t) ( /*_.VALDATA___V467*/ meltfptr[466]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V464*/ meltfptr[463]); MELT_LOCATION ("warmelt-genobj.melt:223:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V467*/ meltfptr[466]); MELT_LOCATION ("warmelt-genobj.melt:223:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V467*/ meltfptr[466], "new static instance"); /*putupl#254 */ melt_assertmsg ("putupl #254 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V469*/ meltfptr[468])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #254 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V469*/ meltfptr[468])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V469*/ meltfptr[468]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#255 */ melt_assertmsg ("putupl #255 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V469*/ meltfptr[468])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #255 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V469*/ meltfptr[468])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V469*/ meltfptr[468]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V453*/ meltfptr[452]); /*putupl#256 */ melt_assertmsg ("putupl #256 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V469*/ meltfptr[468])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #256 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V469*/ meltfptr[468])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V469*/ meltfptr[468]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V455*/ meltfptr[454]); /*putupl#257 */ melt_assertmsg ("putupl #257 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V469*/ meltfptr[468])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #257 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V469*/ meltfptr[468])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V469*/ meltfptr[468]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V467*/ meltfptr[466]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V469*/ meltfptr[468]); MELT_LOCATION ("warmelt-genobj.melt:223:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V464*/ meltfptr[463])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V464*/ meltfptr[463])))); ((meltobject_ptr_t) ( /*_.VALDATA___V464*/ meltfptr[463]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V469*/ meltfptr[468]); MELT_LOCATION ("warmelt-genobj.melt:223:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V464*/ meltfptr[463]); MELT_LOCATION ("warmelt-genobj.melt:223:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V464*/ meltfptr[463], "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"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V472*/ meltfptr[471]); melt_dbgtrace_written_object ( /*_.VALDATA___V472*/ meltfptr[471], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:230:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V474*/ meltfptr[473])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V474*/ meltfptr[473])))); ((meltobject_ptr_t) ( /*_.VALDATA___V474*/ meltfptr[473]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V475*/ meltfptr[474]); MELT_LOCATION ("warmelt-genobj.melt:230:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V474*/ meltfptr[473])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V474*/ meltfptr[473])))); ((meltobject_ptr_t) ( /*_.VALDATA___V474*/ meltfptr[473]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#258 */ melt_assertmsg ("putupl #258 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V476*/ meltfptr[475])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #258 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V476*/ meltfptr[475])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V476*/ meltfptr[475]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#259 */ melt_assertmsg ("putupl #259 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V476*/ meltfptr[475])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #259 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V476*/ meltfptr[475])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V476*/ meltfptr[475]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#260 */ melt_assertmsg ("putupl #260 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V476*/ meltfptr[475])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #260 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V476*/ meltfptr[475])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V476*/ meltfptr[475]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_5 */ void meltmod__warmelt_genobj__initialmeltchunk_6 (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___V476*/ meltfptr[475]); MELT_LOCATION ("warmelt-genobj.melt:230:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V474*/ meltfptr[473])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V474*/ meltfptr[473])))); ((meltobject_ptr_t) ( /*_.VALDATA___V474*/ meltfptr[473]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V476*/ meltfptr[475]); MELT_LOCATION ("warmelt-genobj.melt:230:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V477*/ meltfptr[476])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V477*/ meltfptr[476])))); ((meltobject_ptr_t) ( /*_.VALDATA___V477*/ meltfptr[476]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V478*/ meltfptr[477]); MELT_LOCATION ("warmelt-genobj.melt:230:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V477*/ meltfptr[476])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V477*/ meltfptr[476])))); ((meltobject_ptr_t) ( /*_.VALDATA___V477*/ meltfptr[476]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V474*/ meltfptr[473]); MELT_LOCATION ("warmelt-genobj.melt:230:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V477*/ meltfptr[476]); MELT_LOCATION ("warmelt-genobj.melt:230:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V477*/ meltfptr[476], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:230:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V479*/ meltfptr[478])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V479*/ meltfptr[478])))); ((meltobject_ptr_t) ( /*_.VALDATA___V479*/ meltfptr[478]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V480*/ meltfptr[479]); MELT_LOCATION ("warmelt-genobj.melt:230:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V479*/ meltfptr[478])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V479*/ meltfptr[478])))); ((meltobject_ptr_t) ( /*_.VALDATA___V479*/ meltfptr[478]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V474*/ meltfptr[473]); MELT_LOCATION ("warmelt-genobj.melt:230:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V479*/ meltfptr[478]); MELT_LOCATION ("warmelt-genobj.melt:230:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V479*/ meltfptr[478], "new static instance"); /*putupl#261 */ melt_assertmsg ("putupl #261 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V481*/ meltfptr[480])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #261 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V481*/ meltfptr[480])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V481*/ meltfptr[480]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#262 */ melt_assertmsg ("putupl #262 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V481*/ meltfptr[480])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #262 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V481*/ meltfptr[480])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V481*/ meltfptr[480]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V477*/ meltfptr[476]); /*putupl#263 */ melt_assertmsg ("putupl #263 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V481*/ meltfptr[480])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #263 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V481*/ meltfptr[480])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V481*/ meltfptr[480]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V479*/ meltfptr[478]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V481*/ meltfptr[480]); MELT_LOCATION ("warmelt-genobj.melt:230:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V474*/ meltfptr[473])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V474*/ meltfptr[473])))); ((meltobject_ptr_t) ( /*_.VALDATA___V474*/ meltfptr[473]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V481*/ meltfptr[480]); MELT_LOCATION ("warmelt-genobj.melt:230:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V474*/ meltfptr[473]); MELT_LOCATION ("warmelt-genobj.melt:230:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V474*/ meltfptr[473], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V482*/ meltfptr[481])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V482*/ meltfptr[481])))); ((meltobject_ptr_t) ( /*_.VALDATA___V482*/ meltfptr[481]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V483*/ meltfptr[482]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V482*/ meltfptr[481]); melt_dbgtrace_written_object ( /*_.VALDATA___V482*/ meltfptr[481], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V484*/ meltfptr[483])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V484*/ meltfptr[483])))); ((meltobject_ptr_t) ( /*_.VALDATA___V484*/ meltfptr[483]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V485*/ meltfptr[484]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V484*/ meltfptr[483]); melt_dbgtrace_written_object ( /*_.VALDATA___V484*/ meltfptr[483], "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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V486*/ meltfptr[485]); melt_dbgtrace_written_object ( /*_.VALDATA___V486*/ meltfptr[485], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:237:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-genobj.melt:237:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V488*/ meltfptr[487])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V488*/ meltfptr[487])))); ((meltobject_ptr_t) ( /*_.VALDATA___V488*/ meltfptr[487]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#264 */ melt_assertmsg ("putupl #264 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V490*/ meltfptr[489])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #264 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V490*/ meltfptr[489])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V490*/ meltfptr[489]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#265 */ melt_assertmsg ("putupl #265 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V490*/ meltfptr[489])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #265 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V490*/ meltfptr[489])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V490*/ meltfptr[489]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#266 */ melt_assertmsg ("putupl #266 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V490*/ meltfptr[489])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #266 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V490*/ meltfptr[489])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V490*/ meltfptr[489]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V490*/ meltfptr[489]); MELT_LOCATION ("warmelt-genobj.melt:237:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V488*/ meltfptr[487])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V488*/ meltfptr[487])))); ((meltobject_ptr_t) ( /*_.VALDATA___V488*/ meltfptr[487]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V490*/ meltfptr[489]); /*putupl#267 */ melt_assertmsg ("putupl #267 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V491*/ meltfptr[490])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #267 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V491*/ meltfptr[490])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V491*/ meltfptr[490]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V491*/ meltfptr[490]); MELT_LOCATION ("warmelt-genobj.melt:237:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V488*/ meltfptr[487])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V488*/ meltfptr[487])))); ((meltobject_ptr_t) ( /*_.VALDATA___V488*/ meltfptr[487]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V491*/ meltfptr[490]); MELT_LOCATION ("warmelt-genobj.melt:237:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V488*/ meltfptr[487]); MELT_LOCATION ("warmelt-genobj.melt:237:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V488*/ meltfptr[487], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V492*/ meltfptr[491]); melt_dbgtrace_written_object ( /*_.VALDATA___V492*/ meltfptr[491], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:243:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493])))); ((meltobject_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V495*/ meltfptr[494]); MELT_LOCATION ("warmelt-genobj.melt:243:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493])))); ((meltobject_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#268 */ melt_assertmsg ("putupl #268 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V496*/ meltfptr[495])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #268 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V496*/ meltfptr[495])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V496*/ meltfptr[495]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#269 */ melt_assertmsg ("putupl #269 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V496*/ meltfptr[495])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #269 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V496*/ meltfptr[495])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V496*/ meltfptr[495]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#270 */ melt_assertmsg ("putupl #270 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V496*/ meltfptr[495])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #270 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V496*/ meltfptr[495])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V496*/ meltfptr[495]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V496*/ meltfptr[495]); MELT_LOCATION ("warmelt-genobj.melt:243:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493])))); ((meltobject_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V496*/ meltfptr[495]); MELT_LOCATION ("warmelt-genobj.melt:243:/ 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-genobj.melt:243:/ 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___V494*/ meltfptr[493]); MELT_LOCATION ("warmelt-genobj.melt:243:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V497*/ meltfptr[496]); MELT_LOCATION ("warmelt-genobj.melt:243:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V497*/ meltfptr[496], "new static instance"); /*putupl#271 */ melt_assertmsg ("putupl #271 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V499*/ meltfptr[498])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #271 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___V403*/ meltfptr[402]); /*putupl#272 */ melt_assertmsg ("putupl #272 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V499*/ meltfptr[498])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #272 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___V497*/ meltfptr[496]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V499*/ meltfptr[498]); MELT_LOCATION ("warmelt-genobj.melt:243:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493])))); ((meltobject_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V499*/ meltfptr[498]); MELT_LOCATION ("warmelt-genobj.melt:243:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V494*/ meltfptr[493]); MELT_LOCATION ("warmelt-genobj.melt:243:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V494*/ meltfptr[493], "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"); MELT_LOCATION ("warmelt-genobj.melt:251:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-genobj.melt:251:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V504*/ meltfptr[503])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V504*/ meltfptr[503])))); ((meltobject_ptr_t) ( /*_.VALDATA___V504*/ meltfptr[503]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#273 */ melt_assertmsg ("putupl #273 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V506*/ meltfptr[505])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #273 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V506*/ meltfptr[505])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V506*/ meltfptr[505]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#274 */ melt_assertmsg ("putupl #274 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V506*/ meltfptr[505])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #274 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V506*/ meltfptr[505])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V506*/ meltfptr[505]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#275 */ melt_assertmsg ("putupl #275 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V506*/ meltfptr[505])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #275 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V506*/ meltfptr[505])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V506*/ meltfptr[505]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V506*/ meltfptr[505]); MELT_LOCATION ("warmelt-genobj.melt:251:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V504*/ meltfptr[503])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V504*/ meltfptr[503])))); ((meltobject_ptr_t) ( /*_.VALDATA___V504*/ meltfptr[503]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V506*/ meltfptr[505]); MELT_LOCATION ("warmelt-genobj.melt:251:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V507*/ meltfptr[506])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V507*/ meltfptr[506])))); ((meltobject_ptr_t) ( /*_.VALDATA___V507*/ meltfptr[506]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V508*/ meltfptr[507]); MELT_LOCATION ("warmelt-genobj.melt:251:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V507*/ meltfptr[506])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V507*/ meltfptr[506])))); ((meltobject_ptr_t) ( /*_.VALDATA___V507*/ meltfptr[506]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V504*/ meltfptr[503]); MELT_LOCATION ("warmelt-genobj.melt:251:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V507*/ meltfptr[506]); MELT_LOCATION ("warmelt-genobj.melt:251:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V507*/ meltfptr[506], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:251:/ 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-genobj.melt:251:/ 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___V504*/ meltfptr[503]); MELT_LOCATION ("warmelt-genobj.melt:251:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V509*/ meltfptr[508]); MELT_LOCATION ("warmelt-genobj.melt:251:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V509*/ meltfptr[508], "new static instance"); /*putupl#276 */ melt_assertmsg ("putupl #276 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V511*/ meltfptr[510])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #276 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V511*/ meltfptr[510])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V511*/ meltfptr[510]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#277 */ melt_assertmsg ("putupl #277 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V511*/ meltfptr[510])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #277 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V511*/ meltfptr[510])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V511*/ meltfptr[510]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V507*/ meltfptr[506]); /*putupl#278 */ melt_assertmsg ("putupl #278 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V511*/ meltfptr[510])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #278 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V511*/ meltfptr[510])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V511*/ meltfptr[510]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V509*/ meltfptr[508]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V511*/ meltfptr[510]); MELT_LOCATION ("warmelt-genobj.melt:251:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V504*/ meltfptr[503])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V504*/ meltfptr[503])))); ((meltobject_ptr_t) ( /*_.VALDATA___V504*/ meltfptr[503]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V511*/ meltfptr[510]); MELT_LOCATION ("warmelt-genobj.melt:251:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V504*/ meltfptr[503]); MELT_LOCATION ("warmelt-genobj.melt:251:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V504*/ meltfptr[503], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V512*/ meltfptr[511])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V512*/ meltfptr[511])))); ((meltobject_ptr_t) ( /*_.VALDATA___V512*/ meltfptr[511]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V513*/ meltfptr[512]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V512*/ meltfptr[511]); melt_dbgtrace_written_object ( /*_.VALDATA___V512*/ meltfptr[511], "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"); MELT_LOCATION ("warmelt-genobj.melt:257:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-genobj.melt:257:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V518*/ meltfptr[517])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V518*/ meltfptr[517])))); ((meltobject_ptr_t) ( /*_.VALDATA___V518*/ meltfptr[517]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V504*/ meltfptr[503]); /*putupl#279 */ melt_assertmsg ("putupl #279 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V520*/ meltfptr[519])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #279 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V520*/ meltfptr[519])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V520*/ meltfptr[519]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#280 */ melt_assertmsg ("putupl #280 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V520*/ meltfptr[519])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #280 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V520*/ meltfptr[519])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V520*/ meltfptr[519]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#281 */ melt_assertmsg ("putupl #281 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V520*/ meltfptr[519])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #281 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V520*/ meltfptr[519])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V520*/ meltfptr[519]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#282 */ melt_assertmsg ("putupl #282 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V520*/ meltfptr[519])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #282 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V520*/ meltfptr[519])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V520*/ meltfptr[519]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V504*/ meltfptr[503]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V520*/ meltfptr[519]); MELT_LOCATION ("warmelt-genobj.melt:257:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V518*/ meltfptr[517])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V518*/ meltfptr[517])))); ((meltobject_ptr_t) ( /*_.VALDATA___V518*/ meltfptr[517]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V520*/ meltfptr[519]); /*putupl#283 */ melt_assertmsg ("putupl #283 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V521*/ meltfptr[520])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #283 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V521*/ meltfptr[520])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V521*/ meltfptr[520]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#284 */ melt_assertmsg ("putupl #284 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V521*/ meltfptr[520])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #284 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V521*/ meltfptr[520])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V521*/ meltfptr[520]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V507*/ meltfptr[506]); /*putupl#285 */ melt_assertmsg ("putupl #285 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V521*/ meltfptr[520])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #285 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V521*/ meltfptr[520])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V521*/ meltfptr[520]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V509*/ meltfptr[508]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V521*/ meltfptr[520]); MELT_LOCATION ("warmelt-genobj.melt:257:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V518*/ meltfptr[517])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V518*/ meltfptr[517])))); ((meltobject_ptr_t) ( /*_.VALDATA___V518*/ meltfptr[517]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V521*/ meltfptr[520]); MELT_LOCATION ("warmelt-genobj.melt:257:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V518*/ meltfptr[517]); MELT_LOCATION ("warmelt-genobj.melt:257:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V518*/ meltfptr[517], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V522*/ meltfptr[521])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V522*/ meltfptr[521])))); ((meltobject_ptr_t) ( /*_.VALDATA___V522*/ meltfptr[521]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V523*/ meltfptr[522]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V522*/ meltfptr[521]); melt_dbgtrace_written_object ( /*_.VALDATA___V522*/ meltfptr[521], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:263:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V524*/ meltfptr[523])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V524*/ meltfptr[523])))); ((meltobject_ptr_t) ( /*_.VALDATA___V524*/ meltfptr[523]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V525*/ meltfptr[524]); MELT_LOCATION ("warmelt-genobj.melt:263:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V524*/ meltfptr[523])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V524*/ meltfptr[523])))); ((meltobject_ptr_t) ( /*_.VALDATA___V524*/ meltfptr[523]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V504*/ meltfptr[503]); /*putupl#286 */ melt_assertmsg ("putupl #286 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V526*/ meltfptr[525])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #286 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V526*/ meltfptr[525])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V526*/ meltfptr[525]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#287 */ melt_assertmsg ("putupl #287 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V526*/ meltfptr[525])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #287 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V526*/ meltfptr[525])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V526*/ meltfptr[525]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#288 */ melt_assertmsg ("putupl #288 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V526*/ meltfptr[525])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #288 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V526*/ meltfptr[525])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V526*/ meltfptr[525]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#289 */ melt_assertmsg ("putupl #289 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V526*/ meltfptr[525])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #289 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V526*/ meltfptr[525])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V526*/ meltfptr[525]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V504*/ meltfptr[503]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V526*/ meltfptr[525]); MELT_LOCATION ("warmelt-genobj.melt:263:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V524*/ meltfptr[523])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V524*/ meltfptr[523])))); ((meltobject_ptr_t) ( /*_.VALDATA___V524*/ meltfptr[523]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V526*/ meltfptr[525]); MELT_LOCATION ("warmelt-genobj.melt:263:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V527*/ meltfptr[526])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V527*/ meltfptr[526])))); ((meltobject_ptr_t) ( /*_.VALDATA___V527*/ meltfptr[526]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V528*/ meltfptr[527]); MELT_LOCATION ("warmelt-genobj.melt:263:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V527*/ meltfptr[526])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V527*/ meltfptr[526])))); ((meltobject_ptr_t) ( /*_.VALDATA___V527*/ meltfptr[526]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V524*/ meltfptr[523]); MELT_LOCATION ("warmelt-genobj.melt:263:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V527*/ meltfptr[526]); MELT_LOCATION ("warmelt-genobj.melt:263:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V527*/ meltfptr[526], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:263:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V529*/ meltfptr[528])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V529*/ meltfptr[528])))); ((meltobject_ptr_t) ( /*_.VALDATA___V529*/ meltfptr[528]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V530*/ meltfptr[529]); MELT_LOCATION ("warmelt-genobj.melt:263:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V529*/ meltfptr[528])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V529*/ meltfptr[528])))); ((meltobject_ptr_t) ( /*_.VALDATA___V529*/ meltfptr[528]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V524*/ meltfptr[523]); MELT_LOCATION ("warmelt-genobj.melt:263:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V529*/ meltfptr[528]); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_6 */ void meltmod__warmelt_genobj__initialmeltchunk_7 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-genobj.melt:263:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V529*/ meltfptr[528], "new static instance"); /*putupl#290 */ melt_assertmsg ("putupl #290 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V531*/ meltfptr[530])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #290 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V531*/ meltfptr[530])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V531*/ meltfptr[530]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#291 */ melt_assertmsg ("putupl #291 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V531*/ meltfptr[530])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #291 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V531*/ meltfptr[530])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V531*/ meltfptr[530]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V507*/ meltfptr[506]); /*putupl#292 */ melt_assertmsg ("putupl #292 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V531*/ meltfptr[530])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #292 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V531*/ meltfptr[530])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V531*/ meltfptr[530]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V509*/ meltfptr[508]); /*putupl#293 */ melt_assertmsg ("putupl #293 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V531*/ meltfptr[530])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #293 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V531*/ meltfptr[530])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V531*/ meltfptr[530]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V527*/ meltfptr[526]); /*putupl#294 */ melt_assertmsg ("putupl #294 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V531*/ meltfptr[530])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #294 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V531*/ meltfptr[530])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V531*/ meltfptr[530]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V529*/ meltfptr[528]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V531*/ meltfptr[530]); MELT_LOCATION ("warmelt-genobj.melt:263:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V524*/ meltfptr[523])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V524*/ meltfptr[523])))); ((meltobject_ptr_t) ( /*_.VALDATA___V524*/ meltfptr[523]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V531*/ meltfptr[530]); MELT_LOCATION ("warmelt-genobj.melt:263:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V524*/ meltfptr[523]); MELT_LOCATION ("warmelt-genobj.melt:263:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V524*/ meltfptr[523], "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"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V534*/ meltfptr[533]); melt_dbgtrace_written_object ( /*_.VALDATA___V534*/ meltfptr[533], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V536*/ meltfptr[535])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V536*/ meltfptr[535])))); ((meltobject_ptr_t) ( /*_.VALDATA___V536*/ meltfptr[535]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V537*/ meltfptr[536]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V536*/ meltfptr[535]); melt_dbgtrace_written_object ( /*_.VALDATA___V536*/ meltfptr[535], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:271:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V538*/ meltfptr[537])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V538*/ meltfptr[537])))); ((meltobject_ptr_t) ( /*_.VALDATA___V538*/ meltfptr[537]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V539*/ meltfptr[538]); MELT_LOCATION ("warmelt-genobj.melt:271:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V538*/ meltfptr[537])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V538*/ meltfptr[537])))); ((meltobject_ptr_t) ( /*_.VALDATA___V538*/ meltfptr[537]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V504*/ meltfptr[503]); /*putupl#295 */ melt_assertmsg ("putupl #295 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V540*/ meltfptr[539])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #295 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V540*/ meltfptr[539])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V540*/ meltfptr[539]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#296 */ melt_assertmsg ("putupl #296 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V540*/ meltfptr[539])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #296 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V540*/ meltfptr[539])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V540*/ meltfptr[539]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#297 */ melt_assertmsg ("putupl #297 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V540*/ meltfptr[539])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #297 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V540*/ meltfptr[539])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V540*/ meltfptr[539]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#298 */ melt_assertmsg ("putupl #298 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V540*/ meltfptr[539])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #298 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V540*/ meltfptr[539])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V540*/ meltfptr[539]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V504*/ meltfptr[503]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V540*/ meltfptr[539]); MELT_LOCATION ("warmelt-genobj.melt:271:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V538*/ meltfptr[537])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V538*/ meltfptr[537])))); ((meltobject_ptr_t) ( /*_.VALDATA___V538*/ meltfptr[537]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V540*/ meltfptr[539]); MELT_LOCATION ("warmelt-genobj.melt:271:/ 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-genobj.melt:271:/ 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___V538*/ meltfptr[537]); MELT_LOCATION ("warmelt-genobj.melt:271:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V541*/ meltfptr[540]); MELT_LOCATION ("warmelt-genobj.melt:271:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V541*/ meltfptr[540], "new static instance"); /*putupl#299 */ melt_assertmsg ("putupl #299 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V543*/ meltfptr[542])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #299 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___V403*/ meltfptr[402]); /*putupl#300 */ melt_assertmsg ("putupl #300 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V543*/ meltfptr[542])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #300 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___V507*/ meltfptr[506]); /*putupl#301 */ melt_assertmsg ("putupl #301 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V543*/ meltfptr[542])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #301 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___V509*/ meltfptr[508]); /*putupl#302 */ melt_assertmsg ("putupl #302 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V543*/ meltfptr[542])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #302 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-genobj.melt:271:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V538*/ meltfptr[537])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V538*/ meltfptr[537])))); ((meltobject_ptr_t) ( /*_.VALDATA___V538*/ meltfptr[537]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V543*/ meltfptr[542]); MELT_LOCATION ("warmelt-genobj.melt:271:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V538*/ meltfptr[537]); MELT_LOCATION ("warmelt-genobj.melt:271:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V538*/ meltfptr[537], "new static instance"); /*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"); MELT_LOCATION ("warmelt-genobj.melt:279:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-genobj.melt:279:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V548*/ meltfptr[547])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V548*/ meltfptr[547])))); ((meltobject_ptr_t) ( /*_.VALDATA___V548*/ meltfptr[547]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V504*/ meltfptr[503]); /*putupl#303 */ melt_assertmsg ("putupl #303 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V550*/ meltfptr[549])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #303 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V550*/ meltfptr[549])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V550*/ meltfptr[549]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#304 */ melt_assertmsg ("putupl #304 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V550*/ meltfptr[549])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #304 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V550*/ meltfptr[549])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V550*/ meltfptr[549]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#305 */ melt_assertmsg ("putupl #305 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V550*/ meltfptr[549])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #305 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V550*/ meltfptr[549])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V550*/ meltfptr[549]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#306 */ melt_assertmsg ("putupl #306 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V550*/ meltfptr[549])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #306 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V550*/ meltfptr[549])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V550*/ meltfptr[549]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V504*/ meltfptr[503]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V550*/ meltfptr[549]); MELT_LOCATION ("warmelt-genobj.melt:279:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V548*/ meltfptr[547])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V548*/ meltfptr[547])))); ((meltobject_ptr_t) ( /*_.VALDATA___V548*/ meltfptr[547]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V550*/ meltfptr[549]); MELT_LOCATION ("warmelt-genobj.melt:279:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V551*/ meltfptr[550])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V551*/ meltfptr[550])))); ((meltobject_ptr_t) ( /*_.VALDATA___V551*/ meltfptr[550]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V552*/ meltfptr[551]); MELT_LOCATION ("warmelt-genobj.melt:279:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V551*/ meltfptr[550])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V551*/ meltfptr[550])))); ((meltobject_ptr_t) ( /*_.VALDATA___V551*/ meltfptr[550]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V548*/ meltfptr[547]); MELT_LOCATION ("warmelt-genobj.melt:279:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V551*/ meltfptr[550]); MELT_LOCATION ("warmelt-genobj.melt:279:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V551*/ meltfptr[550], "new static instance"); /*putupl#307 */ melt_assertmsg ("putupl #307 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V553*/ meltfptr[552])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #307 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V553*/ meltfptr[552])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V553*/ meltfptr[552]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#308 */ melt_assertmsg ("putupl #308 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V553*/ meltfptr[552])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #308 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V553*/ meltfptr[552])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V553*/ meltfptr[552]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V507*/ meltfptr[506]); /*putupl#309 */ melt_assertmsg ("putupl #309 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V553*/ meltfptr[552])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #309 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V553*/ meltfptr[552])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V553*/ meltfptr[552]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V509*/ meltfptr[508]); /*putupl#310 */ melt_assertmsg ("putupl #310 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V553*/ meltfptr[552])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #310 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V553*/ meltfptr[552])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V553*/ meltfptr[552]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V551*/ meltfptr[550]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V553*/ meltfptr[552]); MELT_LOCATION ("warmelt-genobj.melt:279:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V548*/ meltfptr[547])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V548*/ meltfptr[547])))); ((meltobject_ptr_t) ( /*_.VALDATA___V548*/ meltfptr[547]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V553*/ meltfptr[552]); MELT_LOCATION ("warmelt-genobj.melt:279:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V548*/ meltfptr[547]); MELT_LOCATION ("warmelt-genobj.melt:279:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V548*/ meltfptr[547], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V554*/ meltfptr[553])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V554*/ meltfptr[553])))); ((meltobject_ptr_t) ( /*_.VALDATA___V554*/ meltfptr[553]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V555*/ meltfptr[554]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V554*/ meltfptr[553]); melt_dbgtrace_written_object ( /*_.VALDATA___V554*/ meltfptr[553], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V556*/ meltfptr[555])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V556*/ meltfptr[555])))); ((meltobject_ptr_t) ( /*_.VALDATA___V556*/ meltfptr[555]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V557*/ meltfptr[556]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V556*/ meltfptr[555]); melt_dbgtrace_written_object ( /*_.VALDATA___V556*/ meltfptr[555], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:287:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557])))); ((meltobject_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V559*/ meltfptr[558]); MELT_LOCATION ("warmelt-genobj.melt:287:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557])))); ((meltobject_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V504*/ meltfptr[503]); /*putupl#311 */ melt_assertmsg ("putupl #311 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V560*/ meltfptr[559])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #311 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V560*/ meltfptr[559])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V560*/ meltfptr[559]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#312 */ melt_assertmsg ("putupl #312 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V560*/ meltfptr[559])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #312 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V560*/ meltfptr[559])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V560*/ meltfptr[559]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#313 */ melt_assertmsg ("putupl #313 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V560*/ meltfptr[559])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #313 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V560*/ meltfptr[559])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V560*/ meltfptr[559]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#314 */ melt_assertmsg ("putupl #314 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V560*/ meltfptr[559])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #314 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V560*/ meltfptr[559])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V560*/ meltfptr[559]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V504*/ meltfptr[503]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V560*/ meltfptr[559]); MELT_LOCATION ("warmelt-genobj.melt:287:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557])))); ((meltobject_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V560*/ meltfptr[559]); MELT_LOCATION ("warmelt-genobj.melt:287:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V561*/ meltfptr[560])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V561*/ meltfptr[560])))); ((meltobject_ptr_t) ( /*_.VALDATA___V561*/ meltfptr[560]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V562*/ meltfptr[561]); MELT_LOCATION ("warmelt-genobj.melt:287:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V561*/ meltfptr[560])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V561*/ meltfptr[560])))); ((meltobject_ptr_t) ( /*_.VALDATA___V561*/ meltfptr[560]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557]); MELT_LOCATION ("warmelt-genobj.melt:287:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V561*/ meltfptr[560]); MELT_LOCATION ("warmelt-genobj.melt:287:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V561*/ meltfptr[560], "new static instance"); /*putupl#315 */ melt_assertmsg ("putupl #315 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V563*/ meltfptr[562])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #315 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V563*/ meltfptr[562])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V563*/ meltfptr[562]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#316 */ melt_assertmsg ("putupl #316 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V563*/ meltfptr[562])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #316 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V563*/ meltfptr[562])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V563*/ meltfptr[562]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V507*/ meltfptr[506]); /*putupl#317 */ melt_assertmsg ("putupl #317 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V563*/ meltfptr[562])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #317 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V563*/ meltfptr[562])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V563*/ meltfptr[562]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V509*/ meltfptr[508]); /*putupl#318 */ melt_assertmsg ("putupl #318 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V563*/ meltfptr[562])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #318 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V563*/ meltfptr[562])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V563*/ meltfptr[562]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V561*/ meltfptr[560]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V563*/ meltfptr[562]); MELT_LOCATION ("warmelt-genobj.melt:287:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557])))); ((meltobject_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V563*/ meltfptr[562]); MELT_LOCATION ("warmelt-genobj.melt:287:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V558*/ meltfptr[557]); MELT_LOCATION ("warmelt-genobj.melt:287:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V558*/ meltfptr[557], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___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"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V566*/ meltfptr[565]); melt_dbgtrace_written_object ( /*_.VALDATA___V566*/ meltfptr[565], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:293:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V568*/ meltfptr[567])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V568*/ meltfptr[567])))); ((meltobject_ptr_t) ( /*_.VALDATA___V568*/ meltfptr[567]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V569*/ meltfptr[568]); MELT_LOCATION ("warmelt-genobj.melt:293:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V568*/ meltfptr[567])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V568*/ meltfptr[567])))); ((meltobject_ptr_t) ( /*_.VALDATA___V568*/ meltfptr[567]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#319 */ melt_assertmsg ("putupl #319 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V570*/ meltfptr[569])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #319 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V570*/ meltfptr[569])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V570*/ meltfptr[569]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#320 */ melt_assertmsg ("putupl #320 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V570*/ meltfptr[569])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #320 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V570*/ meltfptr[569])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V570*/ meltfptr[569]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#321 */ melt_assertmsg ("putupl #321 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V570*/ meltfptr[569])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #321 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V570*/ meltfptr[569])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V570*/ meltfptr[569]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V570*/ meltfptr[569]); MELT_LOCATION ("warmelt-genobj.melt:293:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V568*/ meltfptr[567])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V568*/ meltfptr[567])))); ((meltobject_ptr_t) ( /*_.VALDATA___V568*/ meltfptr[567]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V570*/ meltfptr[569]); MELT_LOCATION ("warmelt-genobj.melt:293:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V571*/ meltfptr[570])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V571*/ meltfptr[570])))); ((meltobject_ptr_t) ( /*_.VALDATA___V571*/ meltfptr[570]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V572*/ meltfptr[571]); MELT_LOCATION ("warmelt-genobj.melt:293:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V571*/ meltfptr[570])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V571*/ meltfptr[570])))); ((meltobject_ptr_t) ( /*_.VALDATA___V571*/ meltfptr[570]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V568*/ meltfptr[567]); MELT_LOCATION ("warmelt-genobj.melt:293:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V571*/ meltfptr[570]); MELT_LOCATION ("warmelt-genobj.melt:293:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V571*/ meltfptr[570], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:293:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V573*/ meltfptr[572])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V573*/ meltfptr[572])))); ((meltobject_ptr_t) ( /*_.VALDATA___V573*/ meltfptr[572]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V574*/ meltfptr[573]); MELT_LOCATION ("warmelt-genobj.melt:293:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V573*/ meltfptr[572])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V573*/ meltfptr[572])))); ((meltobject_ptr_t) ( /*_.VALDATA___V573*/ meltfptr[572]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V568*/ meltfptr[567]); MELT_LOCATION ("warmelt-genobj.melt:293:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V573*/ meltfptr[572]); MELT_LOCATION ("warmelt-genobj.melt:293:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V573*/ meltfptr[572], "new static instance"); /*putupl#322 */ melt_assertmsg ("putupl #322 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V575*/ meltfptr[574])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #322 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V575*/ meltfptr[574])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V575*/ meltfptr[574]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#323 */ melt_assertmsg ("putupl #323 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V575*/ meltfptr[574])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #323 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V575*/ meltfptr[574])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V575*/ meltfptr[574]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V571*/ meltfptr[570]); /*putupl#324 */ melt_assertmsg ("putupl #324 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V575*/ meltfptr[574])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #324 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V575*/ meltfptr[574])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V575*/ meltfptr[574]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V573*/ meltfptr[572]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V575*/ meltfptr[574]); MELT_LOCATION ("warmelt-genobj.melt:293:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V568*/ meltfptr[567])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V568*/ meltfptr[567])))); ((meltobject_ptr_t) ( /*_.VALDATA___V568*/ meltfptr[567]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V575*/ meltfptr[574]); MELT_LOCATION ("warmelt-genobj.melt:293:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V568*/ meltfptr[567]); MELT_LOCATION ("warmelt-genobj.melt:293:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V568*/ meltfptr[567], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V576*/ meltfptr[575])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V576*/ meltfptr[575])))); ((meltobject_ptr_t) ( /*_.VALDATA___V576*/ meltfptr[575]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V577*/ meltfptr[576]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V576*/ meltfptr[575]); melt_dbgtrace_written_object ( /*_.VALDATA___V576*/ meltfptr[575], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V578*/ meltfptr[577])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V578*/ meltfptr[577])))); ((meltobject_ptr_t) ( /*_.VALDATA___V578*/ meltfptr[577]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V579*/ meltfptr[578]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V578*/ meltfptr[577]); melt_dbgtrace_written_object ( /*_.VALDATA___V578*/ meltfptr[577], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V580*/ meltfptr[579])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V580*/ meltfptr[579])))); ((meltobject_ptr_t) ( /*_.VALDATA___V580*/ meltfptr[579]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V581*/ meltfptr[580]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V580*/ meltfptr[579]); melt_dbgtrace_written_object ( /*_.VALDATA___V580*/ meltfptr[579], "new static instance"); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_7 */ void meltmod__warmelt_genobj__initialmeltchunk_8 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-genobj.melt:300:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V582*/ meltfptr[581])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V582*/ meltfptr[581])))); ((meltobject_ptr_t) ( /*_.VALDATA___V582*/ meltfptr[581]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V583*/ meltfptr[582]); MELT_LOCATION ("warmelt-genobj.melt:300:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V582*/ meltfptr[581])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V582*/ meltfptr[581])))); ((meltobject_ptr_t) ( /*_.VALDATA___V582*/ meltfptr[581]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#325 */ melt_assertmsg ("putupl #325 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V584*/ meltfptr[583])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #325 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V584*/ meltfptr[583])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V584*/ meltfptr[583]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#326 */ melt_assertmsg ("putupl #326 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V584*/ meltfptr[583])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #326 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V584*/ meltfptr[583])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V584*/ meltfptr[583]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#327 */ melt_assertmsg ("putupl #327 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V584*/ meltfptr[583])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #327 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V584*/ meltfptr[583])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V584*/ meltfptr[583]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V584*/ meltfptr[583]); MELT_LOCATION ("warmelt-genobj.melt:300:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V582*/ meltfptr[581])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V582*/ meltfptr[581])))); ((meltobject_ptr_t) ( /*_.VALDATA___V582*/ meltfptr[581]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V584*/ meltfptr[583]); MELT_LOCATION ("warmelt-genobj.melt:300:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V585*/ meltfptr[584])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V585*/ meltfptr[584])))); ((meltobject_ptr_t) ( /*_.VALDATA___V585*/ meltfptr[584]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V586*/ meltfptr[585]); MELT_LOCATION ("warmelt-genobj.melt:300:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V585*/ meltfptr[584])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V585*/ meltfptr[584])))); ((meltobject_ptr_t) ( /*_.VALDATA___V585*/ meltfptr[584]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V582*/ meltfptr[581]); MELT_LOCATION ("warmelt-genobj.melt:300:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V585*/ meltfptr[584]); MELT_LOCATION ("warmelt-genobj.melt:300:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V585*/ meltfptr[584], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:300:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V587*/ meltfptr[586])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V587*/ meltfptr[586])))); ((meltobject_ptr_t) ( /*_.VALDATA___V587*/ meltfptr[586]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V588*/ meltfptr[587]); MELT_LOCATION ("warmelt-genobj.melt:300:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V587*/ meltfptr[586])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V587*/ meltfptr[586])))); ((meltobject_ptr_t) ( /*_.VALDATA___V587*/ meltfptr[586]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V582*/ meltfptr[581]); MELT_LOCATION ("warmelt-genobj.melt:300:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V587*/ meltfptr[586]); MELT_LOCATION ("warmelt-genobj.melt:300:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V587*/ meltfptr[586], "new static instance"); /*putupl#328 */ melt_assertmsg ("putupl #328 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V589*/ meltfptr[588])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #328 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V589*/ meltfptr[588])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V589*/ meltfptr[588]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#329 */ melt_assertmsg ("putupl #329 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V589*/ meltfptr[588])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #329 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V589*/ meltfptr[588])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V589*/ meltfptr[588]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V585*/ meltfptr[584]); /*putupl#330 */ melt_assertmsg ("putupl #330 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V589*/ meltfptr[588])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #330 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V589*/ meltfptr[588])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V589*/ meltfptr[588]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V587*/ meltfptr[586]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V589*/ meltfptr[588]); MELT_LOCATION ("warmelt-genobj.melt:300:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V582*/ meltfptr[581])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V582*/ meltfptr[581])))); ((meltobject_ptr_t) ( /*_.VALDATA___V582*/ meltfptr[581]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V589*/ meltfptr[588]); MELT_LOCATION ("warmelt-genobj.melt:300:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V582*/ meltfptr[581]); MELT_LOCATION ("warmelt-genobj.melt:300:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V582*/ meltfptr[581], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V590*/ meltfptr[589]); melt_dbgtrace_written_object ( /*_.VALDATA___V590*/ meltfptr[589], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V592*/ meltfptr[591])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V592*/ meltfptr[591])))); ((meltobject_ptr_t) ( /*_.VALDATA___V592*/ meltfptr[591]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V593*/ meltfptr[592]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V592*/ meltfptr[591]); melt_dbgtrace_written_object ( /*_.VALDATA___V592*/ meltfptr[591], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V594*/ meltfptr[593])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V594*/ meltfptr[593])))); ((meltobject_ptr_t) ( /*_.VALDATA___V594*/ meltfptr[593]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V595*/ meltfptr[594]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V594*/ meltfptr[593]); melt_dbgtrace_written_object ( /*_.VALDATA___V594*/ meltfptr[593], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:307:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V596*/ meltfptr[595])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V596*/ meltfptr[595])))); ((meltobject_ptr_t) ( /*_.VALDATA___V596*/ meltfptr[595]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V597*/ meltfptr[596]); MELT_LOCATION ("warmelt-genobj.melt:307:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V596*/ meltfptr[595])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V596*/ meltfptr[595])))); ((meltobject_ptr_t) ( /*_.VALDATA___V596*/ meltfptr[595]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V504*/ meltfptr[503]); /*putupl#331 */ melt_assertmsg ("putupl #331 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V598*/ meltfptr[597])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #331 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V598*/ meltfptr[597])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V598*/ meltfptr[597]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#332 */ melt_assertmsg ("putupl #332 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V598*/ meltfptr[597])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #332 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V598*/ meltfptr[597])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V598*/ meltfptr[597]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#333 */ melt_assertmsg ("putupl #333 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V598*/ meltfptr[597])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #333 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V598*/ meltfptr[597])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V598*/ meltfptr[597]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#334 */ melt_assertmsg ("putupl #334 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V598*/ meltfptr[597])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #334 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V598*/ meltfptr[597])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V598*/ meltfptr[597]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V504*/ meltfptr[503]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V598*/ meltfptr[597]); MELT_LOCATION ("warmelt-genobj.melt:307:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V596*/ meltfptr[595])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V596*/ meltfptr[595])))); ((meltobject_ptr_t) ( /*_.VALDATA___V596*/ meltfptr[595]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V598*/ meltfptr[597]); MELT_LOCATION ("warmelt-genobj.melt:307:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V599*/ meltfptr[598])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V599*/ meltfptr[598])))); ((meltobject_ptr_t) ( /*_.VALDATA___V599*/ meltfptr[598]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V600*/ meltfptr[599]); MELT_LOCATION ("warmelt-genobj.melt:307:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V599*/ meltfptr[598])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V599*/ meltfptr[598])))); ((meltobject_ptr_t) ( /*_.VALDATA___V599*/ meltfptr[598]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V596*/ meltfptr[595]); MELT_LOCATION ("warmelt-genobj.melt:307:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V599*/ meltfptr[598]); MELT_LOCATION ("warmelt-genobj.melt:307:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V599*/ meltfptr[598], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:307:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V601*/ meltfptr[600])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V601*/ meltfptr[600])))); ((meltobject_ptr_t) ( /*_.VALDATA___V601*/ meltfptr[600]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V602*/ meltfptr[601]); MELT_LOCATION ("warmelt-genobj.melt:307:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V601*/ meltfptr[600])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V601*/ meltfptr[600])))); ((meltobject_ptr_t) ( /*_.VALDATA___V601*/ meltfptr[600]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V596*/ meltfptr[595]); MELT_LOCATION ("warmelt-genobj.melt:307:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V601*/ meltfptr[600]); MELT_LOCATION ("warmelt-genobj.melt:307:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V601*/ meltfptr[600], "new static instance"); /*putupl#335 */ melt_assertmsg ("putupl #335 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V603*/ meltfptr[602])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #335 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V603*/ meltfptr[602])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V603*/ meltfptr[602]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#336 */ melt_assertmsg ("putupl #336 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V603*/ meltfptr[602])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #336 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V603*/ meltfptr[602])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V603*/ meltfptr[602]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V507*/ meltfptr[506]); /*putupl#337 */ melt_assertmsg ("putupl #337 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V603*/ meltfptr[602])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #337 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V603*/ meltfptr[602])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V603*/ meltfptr[602]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V509*/ meltfptr[508]); /*putupl#338 */ melt_assertmsg ("putupl #338 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V603*/ meltfptr[602])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #338 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V603*/ meltfptr[602])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V603*/ meltfptr[602]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V599*/ meltfptr[598]); /*putupl#339 */ melt_assertmsg ("putupl #339 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V603*/ meltfptr[602])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #339 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V603*/ meltfptr[602])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V603*/ meltfptr[602]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V601*/ meltfptr[600]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V603*/ meltfptr[602]); MELT_LOCATION ("warmelt-genobj.melt:307:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V596*/ meltfptr[595])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V596*/ meltfptr[595])))); ((meltobject_ptr_t) ( /*_.VALDATA___V596*/ meltfptr[595]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V603*/ meltfptr[602]); MELT_LOCATION ("warmelt-genobj.melt:307:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V596*/ meltfptr[595]); MELT_LOCATION ("warmelt-genobj.melt:307:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V596*/ meltfptr[595], "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"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V608*/ meltfptr[607]); melt_dbgtrace_written_object ( /*_.VALDATA___V608*/ meltfptr[607], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:314:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V610*/ meltfptr[609])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V610*/ meltfptr[609])))); ((meltobject_ptr_t) ( /*_.VALDATA___V610*/ meltfptr[609]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V611*/ meltfptr[610]); MELT_LOCATION ("warmelt-genobj.melt:314:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V610*/ meltfptr[609])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V610*/ meltfptr[609])))); ((meltobject_ptr_t) ( /*_.VALDATA___V610*/ meltfptr[609]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#340 */ melt_assertmsg ("putupl #340 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V612*/ meltfptr[611])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #340 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V612*/ meltfptr[611])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V612*/ meltfptr[611]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#341 */ melt_assertmsg ("putupl #341 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V612*/ meltfptr[611])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #341 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V612*/ meltfptr[611])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V612*/ meltfptr[611]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#342 */ melt_assertmsg ("putupl #342 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V612*/ meltfptr[611])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #342 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V612*/ meltfptr[611])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V612*/ meltfptr[611]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V612*/ meltfptr[611]); MELT_LOCATION ("warmelt-genobj.melt:314:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V610*/ meltfptr[609])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V610*/ meltfptr[609])))); ((meltobject_ptr_t) ( /*_.VALDATA___V610*/ meltfptr[609]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V612*/ meltfptr[611]); MELT_LOCATION ("warmelt-genobj.melt:314:/ 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-genobj.melt:314:/ 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___V610*/ meltfptr[609]); MELT_LOCATION ("warmelt-genobj.melt:314:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V613*/ meltfptr[612]); MELT_LOCATION ("warmelt-genobj.melt:314:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V613*/ meltfptr[612], "new static instance"); /*putupl#343 */ melt_assertmsg ("putupl #343 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V615*/ meltfptr[614])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #343 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V615*/ meltfptr[614])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V615*/ meltfptr[614]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#344 */ melt_assertmsg ("putupl #344 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V615*/ meltfptr[614])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #344 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V615*/ meltfptr[614])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V615*/ meltfptr[614]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V613*/ meltfptr[612]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V615*/ meltfptr[614]); MELT_LOCATION ("warmelt-genobj.melt:314:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V610*/ meltfptr[609])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V610*/ meltfptr[609])))); ((meltobject_ptr_t) ( /*_.VALDATA___V610*/ meltfptr[609]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V615*/ meltfptr[614]); MELT_LOCATION ("warmelt-genobj.melt:314:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V610*/ meltfptr[609]); MELT_LOCATION ("warmelt-genobj.melt:314:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V610*/ meltfptr[609], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V616*/ meltfptr[615])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V616*/ meltfptr[615])))); ((meltobject_ptr_t) ( /*_.VALDATA___V616*/ meltfptr[615]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V617*/ meltfptr[616]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V616*/ meltfptr[615]); melt_dbgtrace_written_object ( /*_.VALDATA___V616*/ meltfptr[615], "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"); MELT_LOCATION ("warmelt-genobj.melt:320:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-genobj.melt:320:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V620*/ meltfptr[619])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V620*/ meltfptr[619])))); ((meltobject_ptr_t) ( /*_.VALDATA___V620*/ meltfptr[619]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#345 */ melt_assertmsg ("putupl #345 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V622*/ meltfptr[621])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #345 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V622*/ meltfptr[621])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V622*/ meltfptr[621]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#346 */ melt_assertmsg ("putupl #346 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V622*/ meltfptr[621])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #346 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V622*/ meltfptr[621])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V622*/ meltfptr[621]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#347 */ melt_assertmsg ("putupl #347 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V622*/ meltfptr[621])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #347 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V622*/ meltfptr[621])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V622*/ meltfptr[621]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V622*/ meltfptr[621]); MELT_LOCATION ("warmelt-genobj.melt:320:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V620*/ meltfptr[619])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V620*/ meltfptr[619])))); ((meltobject_ptr_t) ( /*_.VALDATA___V620*/ meltfptr[619]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V622*/ meltfptr[621]); MELT_LOCATION ("warmelt-genobj.melt:320:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V623*/ meltfptr[622])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V623*/ meltfptr[622])))); ((meltobject_ptr_t) ( /*_.VALDATA___V623*/ meltfptr[622]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V624*/ meltfptr[623]); MELT_LOCATION ("warmelt-genobj.melt:320:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V623*/ meltfptr[622])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V623*/ meltfptr[622])))); ((meltobject_ptr_t) ( /*_.VALDATA___V623*/ meltfptr[622]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V620*/ meltfptr[619]); MELT_LOCATION ("warmelt-genobj.melt:320:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V623*/ meltfptr[622]); MELT_LOCATION ("warmelt-genobj.melt:320:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V623*/ meltfptr[622], "new static instance"); /*putupl#348 */ melt_assertmsg ("putupl #348 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V625*/ meltfptr[624])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #348 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V625*/ meltfptr[624])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V625*/ meltfptr[624]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#349 */ melt_assertmsg ("putupl #349 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V625*/ meltfptr[624])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #349 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V625*/ meltfptr[624])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V625*/ meltfptr[624]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V623*/ meltfptr[622]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V625*/ meltfptr[624]); MELT_LOCATION ("warmelt-genobj.melt:320:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V620*/ meltfptr[619])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V620*/ meltfptr[619])))); ((meltobject_ptr_t) ( /*_.VALDATA___V620*/ meltfptr[619]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V625*/ meltfptr[624]); MELT_LOCATION ("warmelt-genobj.melt:320:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V620*/ meltfptr[619]); MELT_LOCATION ("warmelt-genobj.melt:320:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V620*/ meltfptr[619], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V626*/ meltfptr[625]); melt_dbgtrace_written_object ( /*_.VALDATA___V626*/ meltfptr[625], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V628*/ meltfptr[627])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V628*/ meltfptr[627])))); ((meltobject_ptr_t) ( /*_.VALDATA___V628*/ meltfptr[627]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V629*/ meltfptr[628]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V628*/ meltfptr[627]); melt_dbgtrace_written_object ( /*_.VALDATA___V628*/ meltfptr[627], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:327:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V630*/ meltfptr[629])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V630*/ meltfptr[629])))); ((meltobject_ptr_t) ( /*_.VALDATA___V630*/ meltfptr[629]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V631*/ meltfptr[630]); MELT_LOCATION ("warmelt-genobj.melt:327:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V630*/ meltfptr[629])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V630*/ meltfptr[629])))); ((meltobject_ptr_t) ( /*_.VALDATA___V630*/ meltfptr[629]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V504*/ meltfptr[503]); /*putupl#350 */ melt_assertmsg ("putupl #350 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V632*/ meltfptr[631])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #350 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V632*/ meltfptr[631])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V632*/ meltfptr[631]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#351 */ melt_assertmsg ("putupl #351 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V632*/ meltfptr[631])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #351 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V632*/ meltfptr[631])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V632*/ meltfptr[631]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#352 */ melt_assertmsg ("putupl #352 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V632*/ meltfptr[631])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #352 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V632*/ meltfptr[631])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V632*/ meltfptr[631]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#353 */ melt_assertmsg ("putupl #353 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V632*/ meltfptr[631])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #353 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V632*/ meltfptr[631])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V632*/ meltfptr[631]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V504*/ meltfptr[503]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V632*/ meltfptr[631]); MELT_LOCATION ("warmelt-genobj.melt:327:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V630*/ meltfptr[629])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V630*/ meltfptr[629])))); ((meltobject_ptr_t) ( /*_.VALDATA___V630*/ meltfptr[629]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V632*/ meltfptr[631]); MELT_LOCATION ("warmelt-genobj.melt:327:/ 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-genobj.melt:327:/ 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___V630*/ meltfptr[629]); MELT_LOCATION ("warmelt-genobj.melt:327:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V633*/ meltfptr[632]); MELT_LOCATION ("warmelt-genobj.melt:327:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V633*/ meltfptr[632], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:327:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V635*/ meltfptr[634])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V635*/ meltfptr[634])))); ((meltobject_ptr_t) ( /*_.VALDATA___V635*/ meltfptr[634]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V636*/ meltfptr[635]); MELT_LOCATION ("warmelt-genobj.melt:327:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V635*/ meltfptr[634])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V635*/ meltfptr[634])))); ((meltobject_ptr_t) ( /*_.VALDATA___V635*/ meltfptr[634]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V630*/ meltfptr[629]); MELT_LOCATION ("warmelt-genobj.melt:327:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V635*/ meltfptr[634]); MELT_LOCATION ("warmelt-genobj.melt:327:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V635*/ meltfptr[634], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:327:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V637*/ meltfptr[636])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V637*/ meltfptr[636])))); ((meltobject_ptr_t) ( /*_.VALDATA___V637*/ meltfptr[636]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V638*/ meltfptr[637]); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_8 */ void meltmod__warmelt_genobj__initialmeltchunk_9 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-genobj.melt:327:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V637*/ meltfptr[636])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V637*/ meltfptr[636])))); ((meltobject_ptr_t) ( /*_.VALDATA___V637*/ meltfptr[636]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V630*/ meltfptr[629]); MELT_LOCATION ("warmelt-genobj.melt:327:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V637*/ meltfptr[636]); MELT_LOCATION ("warmelt-genobj.melt:327:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V637*/ meltfptr[636], "new static instance"); /*putupl#354 */ melt_assertmsg ("putupl #354 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V639*/ meltfptr[638])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #354 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V639*/ meltfptr[638])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V639*/ meltfptr[638]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#355 */ melt_assertmsg ("putupl #355 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V639*/ meltfptr[638])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #355 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V639*/ meltfptr[638])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V639*/ meltfptr[638]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V507*/ meltfptr[506]); /*putupl#356 */ melt_assertmsg ("putupl #356 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V639*/ meltfptr[638])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #356 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V639*/ meltfptr[638])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V639*/ meltfptr[638]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V509*/ meltfptr[508]); /*putupl#357 */ melt_assertmsg ("putupl #357 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V639*/ meltfptr[638])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #357 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V639*/ meltfptr[638])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V639*/ meltfptr[638]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V633*/ meltfptr[632]); /*putupl#358 */ melt_assertmsg ("putupl #358 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V639*/ meltfptr[638])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #358 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V639*/ meltfptr[638])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V639*/ meltfptr[638]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V635*/ meltfptr[634]); /*putupl#359 */ melt_assertmsg ("putupl #359 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V639*/ meltfptr[638])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #359 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V639*/ meltfptr[638])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V639*/ meltfptr[638]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V637*/ meltfptr[636]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V639*/ meltfptr[638]); MELT_LOCATION ("warmelt-genobj.melt:327:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V630*/ meltfptr[629])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V630*/ meltfptr[629])))); ((meltobject_ptr_t) ( /*_.VALDATA___V630*/ meltfptr[629]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V639*/ meltfptr[638]); MELT_LOCATION ("warmelt-genobj.melt:327:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V630*/ meltfptr[629]); MELT_LOCATION ("warmelt-genobj.melt:327:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V630*/ meltfptr[629], "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"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V644*/ meltfptr[643]); melt_dbgtrace_written_object ( /*_.VALDATA___V644*/ meltfptr[643], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V646*/ meltfptr[645])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V646*/ meltfptr[645])))); ((meltobject_ptr_t) ( /*_.VALDATA___V646*/ meltfptr[645]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V647*/ meltfptr[646]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V646*/ meltfptr[645]); melt_dbgtrace_written_object ( /*_.VALDATA___V646*/ meltfptr[645], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:335:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V648*/ meltfptr[647])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V648*/ meltfptr[647])))); ((meltobject_ptr_t) ( /*_.VALDATA___V648*/ meltfptr[647]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V649*/ meltfptr[648]); MELT_LOCATION ("warmelt-genobj.melt:335:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V648*/ meltfptr[647])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V648*/ meltfptr[647])))); ((meltobject_ptr_t) ( /*_.VALDATA___V648*/ meltfptr[647]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#360 */ melt_assertmsg ("putupl #360 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #360 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#361 */ melt_assertmsg ("putupl #361 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #361 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#362 */ melt_assertmsg ("putupl #362 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #362 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V650*/ meltfptr[649]); MELT_LOCATION ("warmelt-genobj.melt:335:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V648*/ meltfptr[647])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V648*/ meltfptr[647])))); ((meltobject_ptr_t) ( /*_.VALDATA___V648*/ meltfptr[647]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V650*/ meltfptr[649]); MELT_LOCATION ("warmelt-genobj.melt:335:/ 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-genobj.melt:335:/ 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___V648*/ meltfptr[647]); MELT_LOCATION ("warmelt-genobj.melt:335:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V651*/ meltfptr[650]); MELT_LOCATION ("warmelt-genobj.melt:335:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V651*/ meltfptr[650], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:335:/ 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-genobj.melt:335:/ 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___V648*/ meltfptr[647]); MELT_LOCATION ("warmelt-genobj.melt:335:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V653*/ meltfptr[652]); MELT_LOCATION ("warmelt-genobj.melt:335:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V653*/ meltfptr[652], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:335:/ 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-genobj.melt:335:/ 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___V648*/ meltfptr[647]); MELT_LOCATION ("warmelt-genobj.melt:335:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V655*/ meltfptr[654]); MELT_LOCATION ("warmelt-genobj.melt:335:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V655*/ meltfptr[654], "new static instance"); /*putupl#363 */ melt_assertmsg ("putupl #363 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V657*/ meltfptr[656])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #363 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V657*/ meltfptr[656])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V657*/ meltfptr[656]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#364 */ melt_assertmsg ("putupl #364 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V657*/ meltfptr[656])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #364 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V657*/ meltfptr[656])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V657*/ meltfptr[656]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V651*/ meltfptr[650]); /*putupl#365 */ melt_assertmsg ("putupl #365 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V657*/ meltfptr[656])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #365 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V657*/ meltfptr[656])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V657*/ meltfptr[656]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V653*/ meltfptr[652]); /*putupl#366 */ melt_assertmsg ("putupl #366 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V657*/ meltfptr[656])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #366 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V657*/ meltfptr[656])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V657*/ meltfptr[656]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V655*/ meltfptr[654]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V657*/ meltfptr[656]); MELT_LOCATION ("warmelt-genobj.melt:335:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V648*/ meltfptr[647])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V648*/ meltfptr[647])))); ((meltobject_ptr_t) ( /*_.VALDATA___V648*/ meltfptr[647]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V657*/ meltfptr[656]); MELT_LOCATION ("warmelt-genobj.melt:335:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V648*/ meltfptr[647]); MELT_LOCATION ("warmelt-genobj.melt:335:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V648*/ meltfptr[647], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V658*/ meltfptr[657])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V658*/ meltfptr[657])))); ((meltobject_ptr_t) ( /*_.VALDATA___V658*/ meltfptr[657]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V659*/ meltfptr[658]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V658*/ meltfptr[657]); melt_dbgtrace_written_object ( /*_.VALDATA___V658*/ meltfptr[657], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V660*/ meltfptr[659])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V660*/ meltfptr[659])))); ((meltobject_ptr_t) ( /*_.VALDATA___V660*/ meltfptr[659]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V661*/ meltfptr[660]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V660*/ meltfptr[659]); melt_dbgtrace_written_object ( /*_.VALDATA___V660*/ meltfptr[659], "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"); MELT_LOCATION ("warmelt-genobj.melt:343:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-genobj.melt:343:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V666*/ meltfptr[665])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V666*/ meltfptr[665])))); ((meltobject_ptr_t) ( /*_.VALDATA___V666*/ meltfptr[665]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#367 */ melt_assertmsg ("putupl #367 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V668*/ meltfptr[667])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #367 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V668*/ meltfptr[667])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V668*/ meltfptr[667]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#368 */ melt_assertmsg ("putupl #368 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V668*/ meltfptr[667])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #368 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V668*/ meltfptr[667])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V668*/ meltfptr[667]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#369 */ melt_assertmsg ("putupl #369 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V668*/ meltfptr[667])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #369 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V668*/ meltfptr[667])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V668*/ meltfptr[667]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V668*/ meltfptr[667]); MELT_LOCATION ("warmelt-genobj.melt:343:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V666*/ meltfptr[665])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V666*/ meltfptr[665])))); ((meltobject_ptr_t) ( /*_.VALDATA___V666*/ meltfptr[665]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V668*/ meltfptr[667]); MELT_LOCATION ("warmelt-genobj.melt:343:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V669*/ meltfptr[668])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V669*/ meltfptr[668])))); ((meltobject_ptr_t) ( /*_.VALDATA___V669*/ meltfptr[668]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V670*/ meltfptr[669]); MELT_LOCATION ("warmelt-genobj.melt:343:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V669*/ meltfptr[668])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V669*/ meltfptr[668])))); ((meltobject_ptr_t) ( /*_.VALDATA___V669*/ meltfptr[668]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V666*/ meltfptr[665]); MELT_LOCATION ("warmelt-genobj.melt:343:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V669*/ meltfptr[668]); MELT_LOCATION ("warmelt-genobj.melt:343:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V669*/ meltfptr[668], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:343:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V671*/ meltfptr[670])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V671*/ meltfptr[670])))); ((meltobject_ptr_t) ( /*_.VALDATA___V671*/ meltfptr[670]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V672*/ meltfptr[671]); MELT_LOCATION ("warmelt-genobj.melt:343:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V671*/ meltfptr[670])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V671*/ meltfptr[670])))); ((meltobject_ptr_t) ( /*_.VALDATA___V671*/ meltfptr[670]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V666*/ meltfptr[665]); MELT_LOCATION ("warmelt-genobj.melt:343:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V671*/ meltfptr[670]); MELT_LOCATION ("warmelt-genobj.melt:343:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V671*/ meltfptr[670], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:343:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V673*/ meltfptr[672])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V673*/ meltfptr[672])))); ((meltobject_ptr_t) ( /*_.VALDATA___V673*/ meltfptr[672]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V674*/ meltfptr[673]); MELT_LOCATION ("warmelt-genobj.melt:343:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V673*/ meltfptr[672])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V673*/ meltfptr[672])))); ((meltobject_ptr_t) ( /*_.VALDATA___V673*/ meltfptr[672]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V666*/ meltfptr[665]); MELT_LOCATION ("warmelt-genobj.melt:343:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V673*/ meltfptr[672]); MELT_LOCATION ("warmelt-genobj.melt:343:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V673*/ meltfptr[672], "new static instance"); /*putupl#370 */ melt_assertmsg ("putupl #370 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V675*/ meltfptr[674])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #370 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V675*/ meltfptr[674])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V675*/ meltfptr[674]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#371 */ melt_assertmsg ("putupl #371 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V675*/ meltfptr[674])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #371 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V675*/ meltfptr[674])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V675*/ meltfptr[674]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V669*/ meltfptr[668]); /*putupl#372 */ melt_assertmsg ("putupl #372 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V675*/ meltfptr[674])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #372 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V675*/ meltfptr[674])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V675*/ meltfptr[674]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V671*/ meltfptr[670]); /*putupl#373 */ melt_assertmsg ("putupl #373 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V675*/ meltfptr[674])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #373 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V675*/ meltfptr[674])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V675*/ meltfptr[674]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V673*/ meltfptr[672]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V675*/ meltfptr[674]); MELT_LOCATION ("warmelt-genobj.melt:343:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V666*/ meltfptr[665])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V666*/ meltfptr[665])))); ((meltobject_ptr_t) ( /*_.VALDATA___V666*/ meltfptr[665]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V675*/ meltfptr[674]); MELT_LOCATION ("warmelt-genobj.melt:343:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V666*/ meltfptr[665]); MELT_LOCATION ("warmelt-genobj.melt:343:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V666*/ meltfptr[665], "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"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V678*/ meltfptr[677]); melt_dbgtrace_written_object ( /*_.VALDATA___V678*/ meltfptr[677], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V680*/ meltfptr[679])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V680*/ meltfptr[679])))); ((meltobject_ptr_t) ( /*_.VALDATA___V680*/ meltfptr[679]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V681*/ meltfptr[680]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V680*/ meltfptr[679]); melt_dbgtrace_written_object ( /*_.VALDATA___V680*/ meltfptr[679], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V682*/ meltfptr[681])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V682*/ meltfptr[681])))); ((meltobject_ptr_t) ( /*_.VALDATA___V682*/ meltfptr[681]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V683*/ meltfptr[682]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V682*/ meltfptr[681]); melt_dbgtrace_written_object ( /*_.VALDATA___V682*/ meltfptr[681], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:352:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-genobj.melt:352:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V684*/ meltfptr[683])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V684*/ meltfptr[683])))); ((meltobject_ptr_t) ( /*_.VALDATA___V684*/ meltfptr[683]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#374 */ melt_assertmsg ("putupl #374 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V686*/ meltfptr[685])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #374 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V686*/ meltfptr[685])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V686*/ meltfptr[685]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#375 */ melt_assertmsg ("putupl #375 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V686*/ meltfptr[685])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #375 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V686*/ meltfptr[685])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V686*/ meltfptr[685]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#376 */ melt_assertmsg ("putupl #376 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V686*/ meltfptr[685])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #376 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V686*/ meltfptr[685])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V686*/ meltfptr[685]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V686*/ meltfptr[685]); MELT_LOCATION ("warmelt-genobj.melt:352:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V684*/ meltfptr[683])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V684*/ meltfptr[683])))); ((meltobject_ptr_t) ( /*_.VALDATA___V684*/ meltfptr[683]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V686*/ meltfptr[685]); MELT_LOCATION ("warmelt-genobj.melt:352:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V687*/ meltfptr[686])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V687*/ meltfptr[686])))); ((meltobject_ptr_t) ( /*_.VALDATA___V687*/ meltfptr[686]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V688*/ meltfptr[687]); MELT_LOCATION ("warmelt-genobj.melt:352:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V687*/ meltfptr[686])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V687*/ meltfptr[686])))); ((meltobject_ptr_t) ( /*_.VALDATA___V687*/ meltfptr[686]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V684*/ meltfptr[683]); MELT_LOCATION ("warmelt-genobj.melt:352:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V687*/ meltfptr[686]); MELT_LOCATION ("warmelt-genobj.melt:352:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V687*/ meltfptr[686], "new static instance"); /*putupl#377 */ melt_assertmsg ("putupl #377 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V689*/ meltfptr[688])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #377 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V689*/ meltfptr[688])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V689*/ meltfptr[688]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#378 */ melt_assertmsg ("putupl #378 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V689*/ meltfptr[688])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #378 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V689*/ meltfptr[688])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V689*/ meltfptr[688]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V687*/ meltfptr[686]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V689*/ meltfptr[688]); MELT_LOCATION ("warmelt-genobj.melt:352:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V684*/ meltfptr[683])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V684*/ meltfptr[683])))); ((meltobject_ptr_t) ( /*_.VALDATA___V684*/ meltfptr[683]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V689*/ meltfptr[688]); MELT_LOCATION ("warmelt-genobj.melt:352:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V684*/ meltfptr[683]); MELT_LOCATION ("warmelt-genobj.melt:352:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V684*/ meltfptr[683], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V690*/ meltfptr[689]); melt_dbgtrace_written_object ( /*_.VALDATA___V690*/ meltfptr[689], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V692*/ meltfptr[691])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V692*/ meltfptr[691])))); ((meltobject_ptr_t) ( /*_.VALDATA___V692*/ meltfptr[691]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V693*/ meltfptr[692]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V692*/ meltfptr[691]); melt_dbgtrace_written_object ( /*_.VALDATA___V692*/ meltfptr[691], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:358:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V694*/ meltfptr[693])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V694*/ meltfptr[693])))); ((meltobject_ptr_t) ( /*_.VALDATA___V694*/ meltfptr[693]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V695*/ meltfptr[694]); MELT_LOCATION ("warmelt-genobj.melt:358:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V694*/ meltfptr[693])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V694*/ meltfptr[693])))); ((meltobject_ptr_t) ( /*_.VALDATA___V694*/ meltfptr[693]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V684*/ meltfptr[683]); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_9 */ void meltmod__warmelt_genobj__initialmeltchunk_10 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*putupl#379*/ melt_assertmsg ("putupl #379 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V696*/ meltfptr[695])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #379 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V696*/ meltfptr[695])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V696*/ meltfptr[695]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#380 */ melt_assertmsg ("putupl #380 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V696*/ meltfptr[695])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #380 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V696*/ meltfptr[695])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V696*/ meltfptr[695]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#381 */ melt_assertmsg ("putupl #381 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V696*/ meltfptr[695])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #381 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V696*/ meltfptr[695])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V696*/ meltfptr[695]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#382 */ melt_assertmsg ("putupl #382 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V696*/ meltfptr[695])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #382 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V696*/ meltfptr[695])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V696*/ meltfptr[695]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V684*/ meltfptr[683]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V696*/ meltfptr[695]); MELT_LOCATION ("warmelt-genobj.melt:358:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V694*/ meltfptr[693])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V694*/ meltfptr[693])))); ((meltobject_ptr_t) ( /*_.VALDATA___V694*/ meltfptr[693]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V696*/ meltfptr[695]); /*putupl#383 */ melt_assertmsg ("putupl #383 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V697*/ meltfptr[696])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #383 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V697*/ meltfptr[696])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V697*/ meltfptr[696]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#384 */ melt_assertmsg ("putupl #384 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V697*/ meltfptr[696])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #384 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V697*/ meltfptr[696])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V697*/ meltfptr[696]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V687*/ meltfptr[686]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V697*/ meltfptr[696]); MELT_LOCATION ("warmelt-genobj.melt:358:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V694*/ meltfptr[693])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V694*/ meltfptr[693])))); ((meltobject_ptr_t) ( /*_.VALDATA___V694*/ meltfptr[693]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V697*/ meltfptr[696]); MELT_LOCATION ("warmelt-genobj.melt:358:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V694*/ meltfptr[693]); MELT_LOCATION ("warmelt-genobj.melt:358:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V694*/ meltfptr[693], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V698*/ meltfptr[697])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V698*/ meltfptr[697])))); ((meltobject_ptr_t) ( /*_.VALDATA___V698*/ meltfptr[697]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V699*/ meltfptr[698]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V698*/ meltfptr[697]); melt_dbgtrace_written_object ( /*_.VALDATA___V698*/ meltfptr[697], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:363:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V700*/ meltfptr[699])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V700*/ meltfptr[699])))); ((meltobject_ptr_t) ( /*_.VALDATA___V700*/ meltfptr[699]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V701*/ meltfptr[700]); MELT_LOCATION ("warmelt-genobj.melt:363:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V700*/ meltfptr[699])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V700*/ meltfptr[699])))); ((meltobject_ptr_t) ( /*_.VALDATA___V700*/ meltfptr[699]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V684*/ meltfptr[683]); /*putupl#385 */ melt_assertmsg ("putupl #385 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V702*/ meltfptr[701])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #385 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V702*/ meltfptr[701])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V702*/ meltfptr[701]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#386 */ melt_assertmsg ("putupl #386 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V702*/ meltfptr[701])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #386 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V702*/ meltfptr[701])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V702*/ meltfptr[701]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#387 */ melt_assertmsg ("putupl #387 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V702*/ meltfptr[701])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #387 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V702*/ meltfptr[701])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V702*/ meltfptr[701]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#388 */ melt_assertmsg ("putupl #388 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V702*/ meltfptr[701])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #388 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V702*/ meltfptr[701])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V702*/ meltfptr[701]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V684*/ meltfptr[683]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V702*/ meltfptr[701]); MELT_LOCATION ("warmelt-genobj.melt:363:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V700*/ meltfptr[699])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V700*/ meltfptr[699])))); ((meltobject_ptr_t) ( /*_.VALDATA___V700*/ meltfptr[699]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V702*/ meltfptr[701]); /*putupl#389 */ melt_assertmsg ("putupl #389 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V703*/ meltfptr[702])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #389 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V703*/ meltfptr[702])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V703*/ meltfptr[702]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#390 */ melt_assertmsg ("putupl #390 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V703*/ meltfptr[702])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #390 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V703*/ meltfptr[702])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V703*/ meltfptr[702]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V687*/ meltfptr[686]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V703*/ meltfptr[702]); MELT_LOCATION ("warmelt-genobj.melt:363:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V700*/ meltfptr[699])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V700*/ meltfptr[699])))); ((meltobject_ptr_t) ( /*_.VALDATA___V700*/ meltfptr[699]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V703*/ meltfptr[702]); MELT_LOCATION ("warmelt-genobj.melt:363:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V700*/ meltfptr[699]); MELT_LOCATION ("warmelt-genobj.melt:363:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V700*/ meltfptr[699], "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"); MELT_LOCATION ("warmelt-genobj.melt:369:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-genobj.melt:369:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V706*/ meltfptr[705])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V706*/ meltfptr[705])))); ((meltobject_ptr_t) ( /*_.VALDATA___V706*/ meltfptr[705]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#391 */ melt_assertmsg ("putupl #391 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V708*/ meltfptr[707])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #391 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V708*/ meltfptr[707])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V708*/ meltfptr[707]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#392 */ melt_assertmsg ("putupl #392 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V708*/ meltfptr[707])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #392 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V708*/ meltfptr[707])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V708*/ meltfptr[707]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#393 */ melt_assertmsg ("putupl #393 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V708*/ meltfptr[707])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #393 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V708*/ meltfptr[707])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V708*/ meltfptr[707]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V708*/ meltfptr[707]); MELT_LOCATION ("warmelt-genobj.melt:369:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V706*/ meltfptr[705])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V706*/ meltfptr[705])))); ((meltobject_ptr_t) ( /*_.VALDATA___V706*/ meltfptr[705]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V708*/ meltfptr[707]); MELT_LOCATION ("warmelt-genobj.melt:369:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V709*/ meltfptr[708])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V709*/ meltfptr[708])))); ((meltobject_ptr_t) ( /*_.VALDATA___V709*/ meltfptr[708]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V710*/ meltfptr[709]); MELT_LOCATION ("warmelt-genobj.melt:369:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V709*/ meltfptr[708])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V709*/ meltfptr[708])))); ((meltobject_ptr_t) ( /*_.VALDATA___V709*/ meltfptr[708]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V706*/ meltfptr[705]); MELT_LOCATION ("warmelt-genobj.melt:369:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V709*/ meltfptr[708]); MELT_LOCATION ("warmelt-genobj.melt:369:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V709*/ meltfptr[708], "new static instance"); /*putupl#394 */ melt_assertmsg ("putupl #394 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V711*/ meltfptr[710])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #394 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V711*/ meltfptr[710])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V711*/ meltfptr[710]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#395 */ melt_assertmsg ("putupl #395 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V711*/ meltfptr[710])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #395 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V711*/ meltfptr[710])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V711*/ meltfptr[710]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V709*/ meltfptr[708]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V711*/ meltfptr[710]); MELT_LOCATION ("warmelt-genobj.melt:369:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V706*/ meltfptr[705])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V706*/ meltfptr[705])))); ((meltobject_ptr_t) ( /*_.VALDATA___V706*/ meltfptr[705]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V711*/ meltfptr[710]); MELT_LOCATION ("warmelt-genobj.melt:369:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V706*/ meltfptr[705]); MELT_LOCATION ("warmelt-genobj.melt:369:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V706*/ meltfptr[705], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V712*/ meltfptr[711])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V712*/ meltfptr[711])))); ((meltobject_ptr_t) ( /*_.VALDATA___V712*/ meltfptr[711]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V713*/ meltfptr[712]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V712*/ meltfptr[711]); melt_dbgtrace_written_object ( /*_.VALDATA___V712*/ meltfptr[711], "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"); MELT_LOCATION ("warmelt-genobj.melt:375:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-genobj.melt:375:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V716*/ meltfptr[715])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V716*/ meltfptr[715])))); ((meltobject_ptr_t) ( /*_.VALDATA___V716*/ meltfptr[715]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V706*/ meltfptr[705]); /*putupl#396 */ melt_assertmsg ("putupl #396 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V718*/ meltfptr[717])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #396 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V718*/ meltfptr[717])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V718*/ meltfptr[717]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#397 */ melt_assertmsg ("putupl #397 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V718*/ meltfptr[717])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #397 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V718*/ meltfptr[717])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V718*/ meltfptr[717]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#398 */ melt_assertmsg ("putupl #398 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V718*/ meltfptr[717])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #398 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V718*/ meltfptr[717])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V718*/ meltfptr[717]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#399 */ melt_assertmsg ("putupl #399 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V718*/ meltfptr[717])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #399 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V718*/ meltfptr[717])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V718*/ meltfptr[717]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V706*/ meltfptr[705]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V718*/ meltfptr[717]); MELT_LOCATION ("warmelt-genobj.melt:375:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V716*/ meltfptr[715])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V716*/ meltfptr[715])))); ((meltobject_ptr_t) ( /*_.VALDATA___V716*/ meltfptr[715]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V718*/ meltfptr[717]); /*putupl#400 */ melt_assertmsg ("putupl #400 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V719*/ meltfptr[718])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #400 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V719*/ meltfptr[718])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V719*/ meltfptr[718]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#401 */ melt_assertmsg ("putupl #401 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V719*/ meltfptr[718])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #401 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V719*/ meltfptr[718])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V719*/ meltfptr[718]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V709*/ meltfptr[708]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V719*/ meltfptr[718]); MELT_LOCATION ("warmelt-genobj.melt:375:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V716*/ meltfptr[715])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V716*/ meltfptr[715])))); ((meltobject_ptr_t) ( /*_.VALDATA___V716*/ meltfptr[715]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V719*/ meltfptr[718]); MELT_LOCATION ("warmelt-genobj.melt:375:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V716*/ meltfptr[715]); MELT_LOCATION ("warmelt-genobj.melt:375:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V716*/ meltfptr[715], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V720*/ meltfptr[719])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V720*/ meltfptr[719])))); ((meltobject_ptr_t) ( /*_.VALDATA___V720*/ meltfptr[719]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V721*/ meltfptr[720]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V720*/ meltfptr[719]); melt_dbgtrace_written_object ( /*_.VALDATA___V720*/ meltfptr[719], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:380:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V722*/ meltfptr[721])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V722*/ meltfptr[721])))); ((meltobject_ptr_t) ( /*_.VALDATA___V722*/ meltfptr[721]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V723*/ meltfptr[722]); MELT_LOCATION ("warmelt-genobj.melt:380:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V722*/ meltfptr[721])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V722*/ meltfptr[721])))); ((meltobject_ptr_t) ( /*_.VALDATA___V722*/ meltfptr[721]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V706*/ meltfptr[705]); /*putupl#402 */ melt_assertmsg ("putupl #402 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V724*/ meltfptr[723])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #402 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V724*/ meltfptr[723])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V724*/ meltfptr[723]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#403 */ melt_assertmsg ("putupl #403 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V724*/ meltfptr[723])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #403 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V724*/ meltfptr[723])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V724*/ meltfptr[723]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#404 */ melt_assertmsg ("putupl #404 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V724*/ meltfptr[723])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #404 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V724*/ meltfptr[723])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V724*/ meltfptr[723]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#405 */ melt_assertmsg ("putupl #405 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V724*/ meltfptr[723])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #405 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V724*/ meltfptr[723])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V724*/ meltfptr[723]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V706*/ meltfptr[705]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V724*/ meltfptr[723]); MELT_LOCATION ("warmelt-genobj.melt:380:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V722*/ meltfptr[721])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V722*/ meltfptr[721])))); ((meltobject_ptr_t) ( /*_.VALDATA___V722*/ meltfptr[721]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V724*/ meltfptr[723]); /*putupl#406 */ melt_assertmsg ("putupl #406 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V725*/ meltfptr[724])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #406 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) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#407 */ melt_assertmsg ("putupl #407 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V725*/ meltfptr[724])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #407 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___V709*/ meltfptr[708]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V725*/ meltfptr[724]); MELT_LOCATION ("warmelt-genobj.melt:380:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V722*/ meltfptr[721])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V722*/ meltfptr[721])))); ((meltobject_ptr_t) ( /*_.VALDATA___V722*/ meltfptr[721]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V725*/ meltfptr[724]); MELT_LOCATION ("warmelt-genobj.melt:380:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V722*/ meltfptr[721]); MELT_LOCATION ("warmelt-genobj.melt:380:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V722*/ meltfptr[721], "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"); MELT_LOCATION ("warmelt-genobj.melt:386:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V728*/ meltfptr[727])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V728*/ meltfptr[727])))); ((meltobject_ptr_t) ( /*_.VALDATA___V728*/ meltfptr[727]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V729*/ meltfptr[728]); MELT_LOCATION ("warmelt-genobj.melt:386:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V728*/ meltfptr[727])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V728*/ meltfptr[727])))); ((meltobject_ptr_t) ( /*_.VALDATA___V728*/ meltfptr[727]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V426*/ meltfptr[425]); /*putupl#408 */ melt_assertmsg ("putupl #408 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V730*/ meltfptr[729])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #408 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V730*/ meltfptr[729])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V730*/ meltfptr[729]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#409 */ melt_assertmsg ("putupl #409 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V730*/ meltfptr[729])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #409 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V730*/ meltfptr[729])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V730*/ meltfptr[729]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#410 */ melt_assertmsg ("putupl #410 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V730*/ meltfptr[729])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #410 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V730*/ meltfptr[729])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V730*/ meltfptr[729]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#411 */ melt_assertmsg ("putupl #411 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V730*/ meltfptr[729])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #411 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V730*/ meltfptr[729])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V730*/ meltfptr[729]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V426*/ meltfptr[425]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V730*/ meltfptr[729]); MELT_LOCATION ("warmelt-genobj.melt:386:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V728*/ meltfptr[727])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V728*/ meltfptr[727])))); ((meltobject_ptr_t) ( /*_.VALDATA___V728*/ meltfptr[727]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V730*/ meltfptr[729]); MELT_LOCATION ("warmelt-genobj.melt:386:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V731*/ meltfptr[730])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V731*/ meltfptr[730])))); ((meltobject_ptr_t) ( /*_.VALDATA___V731*/ meltfptr[730]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V732*/ meltfptr[731]); MELT_LOCATION ("warmelt-genobj.melt:386:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V731*/ meltfptr[730])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V731*/ meltfptr[730])))); ((meltobject_ptr_t) ( /*_.VALDATA___V731*/ meltfptr[730]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V728*/ meltfptr[727]); MELT_LOCATION ("warmelt-genobj.melt:386:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V731*/ meltfptr[730]); MELT_LOCATION ("warmelt-genobj.melt:386:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V731*/ meltfptr[730], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:386:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V733*/ meltfptr[732])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V733*/ meltfptr[732])))); ((meltobject_ptr_t) ( /*_.VALDATA___V733*/ meltfptr[732]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V734*/ meltfptr[733]); MELT_LOCATION ("warmelt-genobj.melt:386:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V733*/ meltfptr[732])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V733*/ meltfptr[732])))); ((meltobject_ptr_t) ( /*_.VALDATA___V733*/ meltfptr[732]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V728*/ meltfptr[727]); MELT_LOCATION ("warmelt-genobj.melt:386:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V733*/ meltfptr[732]); MELT_LOCATION ("warmelt-genobj.melt:386:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V733*/ meltfptr[732], "new static instance"); /*putupl#412 */ melt_assertmsg ("putupl #412 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V735*/ meltfptr[734])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #412 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V735*/ meltfptr[734])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V735*/ meltfptr[734]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#413 */ melt_assertmsg ("putupl #413 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V735*/ meltfptr[734])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #413 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V735*/ meltfptr[734])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V735*/ meltfptr[734]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V429*/ meltfptr[428]); /*putupl#414 */ melt_assertmsg ("putupl #414 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V735*/ meltfptr[734])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #414 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V735*/ meltfptr[734])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V735*/ meltfptr[734]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V731*/ meltfptr[730]); /*putupl#415 */ melt_assertmsg ("putupl #415 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V735*/ meltfptr[734])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #415 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V735*/ meltfptr[734])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V735*/ meltfptr[734]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V733*/ meltfptr[732]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V735*/ meltfptr[734]); MELT_LOCATION ("warmelt-genobj.melt:386:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V728*/ meltfptr[727])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V728*/ meltfptr[727])))); ((meltobject_ptr_t) ( /*_.VALDATA___V728*/ meltfptr[727]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V735*/ meltfptr[734]); MELT_LOCATION ("warmelt-genobj.melt:386:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V728*/ meltfptr[727]); MELT_LOCATION ("warmelt-genobj.melt:386:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V728*/ meltfptr[727], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V736*/ meltfptr[735])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V736*/ meltfptr[735])))); ((meltobject_ptr_t) ( /*_.VALDATA___V736*/ meltfptr[735]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V737*/ meltfptr[736]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V736*/ meltfptr[735]); melt_dbgtrace_written_object ( /*_.VALDATA___V736*/ meltfptr[735], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V738*/ meltfptr[737])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V738*/ meltfptr[737])))); ((meltobject_ptr_t) ( /*_.VALDATA___V738*/ meltfptr[737]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V739*/ meltfptr[738]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V738*/ meltfptr[737]); melt_dbgtrace_written_object ( /*_.VALDATA___V738*/ meltfptr[737], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V740*/ meltfptr[739])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V740*/ meltfptr[739])))); ((meltobject_ptr_t) ( /*_.VALDATA___V740*/ meltfptr[739]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V741*/ meltfptr[740]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V740*/ meltfptr[739]); melt_dbgtrace_written_object ( /*_.VALDATA___V740*/ meltfptr[739], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:393:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-genobj.melt:393:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V742*/ meltfptr[741])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V742*/ meltfptr[741])))); ((meltobject_ptr_t) ( /*_.VALDATA___V742*/ meltfptr[741]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V728*/ meltfptr[727]); /*putupl#416 */ melt_assertmsg ("putupl #416 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V744*/ meltfptr[743])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #416 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V744*/ meltfptr[743])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V744*/ meltfptr[743]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#417 */ melt_assertmsg ("putupl #417 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V744*/ meltfptr[743])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #417 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V744*/ meltfptr[743])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V744*/ meltfptr[743]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#418 */ melt_assertmsg ("putupl #418 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V744*/ meltfptr[743])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #418 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V744*/ meltfptr[743])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V744*/ meltfptr[743]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#419 */ melt_assertmsg ("putupl #419 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V744*/ meltfptr[743])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #419 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V744*/ meltfptr[743])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V744*/ meltfptr[743]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V426*/ meltfptr[425]); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_10 */ void meltmod__warmelt_genobj__initialmeltchunk_11 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*putupl#420*/ melt_assertmsg ("putupl #420 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V744*/ meltfptr[743])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #420 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V744*/ meltfptr[743])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V744*/ meltfptr[743]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V728*/ meltfptr[727]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V744*/ meltfptr[743]); MELT_LOCATION ("warmelt-genobj.melt:393:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V742*/ meltfptr[741])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V742*/ meltfptr[741])))); ((meltobject_ptr_t) ( /*_.VALDATA___V742*/ meltfptr[741]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V744*/ meltfptr[743]); MELT_LOCATION ("warmelt-genobj.melt:393:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V745*/ meltfptr[744])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V745*/ meltfptr[744])))); ((meltobject_ptr_t) ( /*_.VALDATA___V745*/ meltfptr[744]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V746*/ meltfptr[745]); MELT_LOCATION ("warmelt-genobj.melt:393:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V745*/ meltfptr[744])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V745*/ meltfptr[744])))); ((meltobject_ptr_t) ( /*_.VALDATA___V745*/ meltfptr[744]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V742*/ meltfptr[741]); MELT_LOCATION ("warmelt-genobj.melt:393:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V745*/ meltfptr[744]); MELT_LOCATION ("warmelt-genobj.melt:393:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V745*/ meltfptr[744], "new static instance"); /*putupl#421 */ melt_assertmsg ("putupl #421 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V747*/ meltfptr[746])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #421 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V747*/ meltfptr[746])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V747*/ meltfptr[746]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#422 */ melt_assertmsg ("putupl #422 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V747*/ meltfptr[746])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #422 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V747*/ meltfptr[746])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V747*/ meltfptr[746]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V429*/ meltfptr[428]); /*putupl#423 */ melt_assertmsg ("putupl #423 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V747*/ meltfptr[746])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #423 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V747*/ meltfptr[746])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V747*/ meltfptr[746]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V731*/ meltfptr[730]); /*putupl#424 */ melt_assertmsg ("putupl #424 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V747*/ meltfptr[746])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #424 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V747*/ meltfptr[746])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V747*/ meltfptr[746]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V733*/ meltfptr[732]); /*putupl#425 */ melt_assertmsg ("putupl #425 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V747*/ meltfptr[746])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #425 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V747*/ meltfptr[746])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V747*/ meltfptr[746]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V745*/ meltfptr[744]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V747*/ meltfptr[746]); MELT_LOCATION ("warmelt-genobj.melt:393:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V742*/ meltfptr[741])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V742*/ meltfptr[741])))); ((meltobject_ptr_t) ( /*_.VALDATA___V742*/ meltfptr[741]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V747*/ meltfptr[746]); MELT_LOCATION ("warmelt-genobj.melt:393:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V742*/ meltfptr[741]); MELT_LOCATION ("warmelt-genobj.melt:393:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V742*/ meltfptr[741], "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"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V750*/ meltfptr[749]); melt_dbgtrace_written_object ( /*_.VALDATA___V750*/ meltfptr[749], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:399:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V752*/ meltfptr[751])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V752*/ meltfptr[751])))); ((meltobject_ptr_t) ( /*_.VALDATA___V752*/ meltfptr[751]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V753*/ meltfptr[752]); MELT_LOCATION ("warmelt-genobj.melt:399:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V752*/ meltfptr[751])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V752*/ meltfptr[751])))); ((meltobject_ptr_t) ( /*_.VALDATA___V752*/ meltfptr[751]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V426*/ meltfptr[425]); /*putupl#426 */ melt_assertmsg ("putupl #426 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V754*/ meltfptr[753])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #426 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V754*/ meltfptr[753])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V754*/ meltfptr[753]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#427 */ melt_assertmsg ("putupl #427 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V754*/ meltfptr[753])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #427 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V754*/ meltfptr[753])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V754*/ meltfptr[753]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#428 */ melt_assertmsg ("putupl #428 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V754*/ meltfptr[753])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #428 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V754*/ meltfptr[753])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V754*/ meltfptr[753]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#429 */ melt_assertmsg ("putupl #429 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V754*/ meltfptr[753])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #429 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V754*/ meltfptr[753])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V754*/ meltfptr[753]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V426*/ meltfptr[425]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V754*/ meltfptr[753]); MELT_LOCATION ("warmelt-genobj.melt:399:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V752*/ meltfptr[751])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V752*/ meltfptr[751])))); ((meltobject_ptr_t) ( /*_.VALDATA___V752*/ meltfptr[751]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V754*/ meltfptr[753]); MELT_LOCATION ("warmelt-genobj.melt:399:/ 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-genobj.melt:399:/ 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___V752*/ meltfptr[751]); MELT_LOCATION ("warmelt-genobj.melt:399:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V755*/ meltfptr[754]); MELT_LOCATION ("warmelt-genobj.melt:399:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V755*/ meltfptr[754], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:399:/ 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-genobj.melt:399:/ 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___V752*/ meltfptr[751]); MELT_LOCATION ("warmelt-genobj.melt:399:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V757*/ meltfptr[756]); MELT_LOCATION ("warmelt-genobj.melt:399:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V757*/ meltfptr[756], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:399:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V759*/ meltfptr[758])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V759*/ meltfptr[758])))); ((meltobject_ptr_t) ( /*_.VALDATA___V759*/ meltfptr[758]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V760*/ meltfptr[759]); MELT_LOCATION ("warmelt-genobj.melt:399:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V759*/ meltfptr[758])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V759*/ meltfptr[758])))); ((meltobject_ptr_t) ( /*_.VALDATA___V759*/ meltfptr[758]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V752*/ meltfptr[751]); MELT_LOCATION ("warmelt-genobj.melt:399:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V759*/ meltfptr[758]); MELT_LOCATION ("warmelt-genobj.melt:399:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V759*/ meltfptr[758], "new static instance"); /*putupl#430 */ melt_assertmsg ("putupl #430 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V761*/ meltfptr[760])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #430 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V761*/ meltfptr[760])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V761*/ meltfptr[760]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#431 */ melt_assertmsg ("putupl #431 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V761*/ meltfptr[760])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #431 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V761*/ meltfptr[760])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V761*/ meltfptr[760]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V429*/ meltfptr[428]); /*putupl#432 */ melt_assertmsg ("putupl #432 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V761*/ meltfptr[760])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #432 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V761*/ meltfptr[760])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V761*/ meltfptr[760]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V755*/ meltfptr[754]); /*putupl#433 */ melt_assertmsg ("putupl #433 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V761*/ meltfptr[760])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #433 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V761*/ meltfptr[760])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V761*/ meltfptr[760]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V757*/ meltfptr[756]); /*putupl#434 */ melt_assertmsg ("putupl #434 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V761*/ meltfptr[760])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #434 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V761*/ meltfptr[760])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V761*/ meltfptr[760]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V759*/ meltfptr[758]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V761*/ meltfptr[760]); MELT_LOCATION ("warmelt-genobj.melt:399:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V752*/ meltfptr[751])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V752*/ meltfptr[751])))); ((meltobject_ptr_t) ( /*_.VALDATA___V752*/ meltfptr[751]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V761*/ meltfptr[760]); MELT_LOCATION ("warmelt-genobj.melt:399:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V752*/ meltfptr[751]); MELT_LOCATION ("warmelt-genobj.melt:399:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V752*/ meltfptr[751], "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"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V768*/ meltfptr[767]); melt_dbgtrace_written_object ( /*_.VALDATA___V768*/ meltfptr[767], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:407:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V770*/ meltfptr[769])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V770*/ meltfptr[769])))); ((meltobject_ptr_t) ( /*_.VALDATA___V770*/ meltfptr[769]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V771*/ meltfptr[770]); MELT_LOCATION ("warmelt-genobj.melt:407:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V770*/ meltfptr[769])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V770*/ meltfptr[769])))); ((meltobject_ptr_t) ( /*_.VALDATA___V770*/ meltfptr[769]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V752*/ meltfptr[751]); /*putupl#435 */ melt_assertmsg ("putupl #435 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V772*/ meltfptr[771])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #435 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V772*/ meltfptr[771])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V772*/ meltfptr[771]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#436 */ melt_assertmsg ("putupl #436 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V772*/ meltfptr[771])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #436 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V772*/ meltfptr[771])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V772*/ meltfptr[771]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#437 */ melt_assertmsg ("putupl #437 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V772*/ meltfptr[771])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #437 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V772*/ meltfptr[771])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V772*/ meltfptr[771]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#438 */ melt_assertmsg ("putupl #438 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V772*/ meltfptr[771])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #438 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V772*/ meltfptr[771])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V772*/ meltfptr[771]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V426*/ meltfptr[425]); /*putupl#439 */ melt_assertmsg ("putupl #439 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V772*/ meltfptr[771])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #439 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V772*/ meltfptr[771])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V772*/ meltfptr[771]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V752*/ meltfptr[751]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V772*/ meltfptr[771]); MELT_LOCATION ("warmelt-genobj.melt:407:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V770*/ meltfptr[769])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V770*/ meltfptr[769])))); ((meltobject_ptr_t) ( /*_.VALDATA___V770*/ meltfptr[769]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V772*/ meltfptr[771]); MELT_LOCATION ("warmelt-genobj.melt:407:/ 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-genobj.melt:407:/ 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___V770*/ meltfptr[769]); MELT_LOCATION ("warmelt-genobj.melt:407:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V773*/ meltfptr[772]); MELT_LOCATION ("warmelt-genobj.melt:407:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V773*/ meltfptr[772], "new static instance"); /*putupl#440 */ melt_assertmsg ("putupl #440 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V775*/ meltfptr[774])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #440 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) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#441 */ melt_assertmsg ("putupl #441 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V775*/ meltfptr[774])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #441 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___V429*/ meltfptr[428]); /*putupl#442 */ melt_assertmsg ("putupl #442 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V775*/ meltfptr[774])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #442 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___V755*/ meltfptr[754]); /*putupl#443 */ melt_assertmsg ("putupl #443 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V775*/ meltfptr[774])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #443 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___V757*/ meltfptr[756]); /*putupl#444 */ melt_assertmsg ("putupl #444 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V775*/ meltfptr[774])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #444 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___V759*/ meltfptr[758]); /*putupl#445 */ melt_assertmsg ("putupl #445 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V775*/ meltfptr[774])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #445 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-genobj.melt:407:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V770*/ meltfptr[769])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V770*/ meltfptr[769])))); ((meltobject_ptr_t) ( /*_.VALDATA___V770*/ meltfptr[769]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V775*/ meltfptr[774]); MELT_LOCATION ("warmelt-genobj.melt:407:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V770*/ meltfptr[769]); MELT_LOCATION ("warmelt-genobj.melt:407:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V770*/ meltfptr[769], "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"); MELT_LOCATION ("warmelt-genobj.melt:413:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-genobj.melt:413:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V780*/ meltfptr[779])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V780*/ meltfptr[779])))); ((meltobject_ptr_t) ( /*_.VALDATA___V780*/ meltfptr[779]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V426*/ meltfptr[425]); /*putupl#446 */ melt_assertmsg ("putupl #446 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V782*/ meltfptr[781])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #446 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V782*/ meltfptr[781])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V782*/ meltfptr[781]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#447 */ melt_assertmsg ("putupl #447 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V782*/ meltfptr[781])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #447 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V782*/ meltfptr[781])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V782*/ meltfptr[781]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#448 */ melt_assertmsg ("putupl #448 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V782*/ meltfptr[781])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #448 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V782*/ meltfptr[781])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V782*/ meltfptr[781]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#449 */ melt_assertmsg ("putupl #449 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V782*/ meltfptr[781])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #449 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V782*/ meltfptr[781])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V782*/ meltfptr[781]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V426*/ meltfptr[425]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V782*/ meltfptr[781]); MELT_LOCATION ("warmelt-genobj.melt:413:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V780*/ meltfptr[779])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V780*/ meltfptr[779])))); ((meltobject_ptr_t) ( /*_.VALDATA___V780*/ meltfptr[779]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V782*/ meltfptr[781]); MELT_LOCATION ("warmelt-genobj.melt:413:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V783*/ meltfptr[782])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V783*/ meltfptr[782])))); ((meltobject_ptr_t) ( /*_.VALDATA___V783*/ meltfptr[782]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V784*/ meltfptr[783]); MELT_LOCATION ("warmelt-genobj.melt:413:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V783*/ meltfptr[782])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V783*/ meltfptr[782])))); ((meltobject_ptr_t) ( /*_.VALDATA___V783*/ meltfptr[782]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V780*/ meltfptr[779]); MELT_LOCATION ("warmelt-genobj.melt:413:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V783*/ meltfptr[782]); MELT_LOCATION ("warmelt-genobj.melt:413:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V783*/ meltfptr[782], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:413:/ 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-genobj.melt:413:/ 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___V780*/ meltfptr[779]); MELT_LOCATION ("warmelt-genobj.melt:413:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V785*/ meltfptr[784]); MELT_LOCATION ("warmelt-genobj.melt:413:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V785*/ meltfptr[784], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:413:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V787*/ meltfptr[786])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V787*/ meltfptr[786])))); ((meltobject_ptr_t) ( /*_.VALDATA___V787*/ meltfptr[786]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V788*/ meltfptr[787]); MELT_LOCATION ("warmelt-genobj.melt:413:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V787*/ meltfptr[786])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V787*/ meltfptr[786])))); ((meltobject_ptr_t) ( /*_.VALDATA___V787*/ meltfptr[786]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V780*/ meltfptr[779]); MELT_LOCATION ("warmelt-genobj.melt:413:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V787*/ meltfptr[786]); MELT_LOCATION ("warmelt-genobj.melt:413:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V787*/ meltfptr[786], "new static instance"); /*putupl#450 */ melt_assertmsg ("putupl #450 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V789*/ meltfptr[788])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #450 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V789*/ meltfptr[788])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V789*/ meltfptr[788]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#451 */ melt_assertmsg ("putupl #451 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V789*/ meltfptr[788])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #451 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V789*/ meltfptr[788])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V789*/ meltfptr[788]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V429*/ meltfptr[428]); /*putupl#452 */ melt_assertmsg ("putupl #452 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V789*/ meltfptr[788])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #452 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V789*/ meltfptr[788])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V789*/ meltfptr[788]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V783*/ meltfptr[782]); /*putupl#453 */ melt_assertmsg ("putupl #453 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V789*/ meltfptr[788])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #453 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V789*/ meltfptr[788])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V789*/ meltfptr[788]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V785*/ meltfptr[784]); /*putupl#454 */ melt_assertmsg ("putupl #454 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V789*/ meltfptr[788])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #454 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V789*/ meltfptr[788])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V789*/ meltfptr[788]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V787*/ meltfptr[786]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V789*/ meltfptr[788]); MELT_LOCATION ("warmelt-genobj.melt:413:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V780*/ meltfptr[779])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V780*/ meltfptr[779])))); ((meltobject_ptr_t) ( /*_.VALDATA___V780*/ meltfptr[779]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V789*/ meltfptr[788]); MELT_LOCATION ("warmelt-genobj.melt:413:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V780*/ meltfptr[779]); MELT_LOCATION ("warmelt-genobj.melt:413:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V780*/ meltfptr[779], "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"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V792*/ meltfptr[791]); melt_dbgtrace_written_object ( /*_.VALDATA___V792*/ meltfptr[791], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V794*/ meltfptr[793])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V794*/ meltfptr[793])))); ((meltobject_ptr_t) ( /*_.VALDATA___V794*/ meltfptr[793]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V795*/ meltfptr[794]); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_11 */ void meltmod__warmelt_genobj__initialmeltchunk_12 (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___V794*/ meltfptr[793]); melt_dbgtrace_written_object ( /*_.VALDATA___V794*/ meltfptr[793], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V796*/ meltfptr[795])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V796*/ meltfptr[795])))); ((meltobject_ptr_t) ( /*_.VALDATA___V796*/ meltfptr[795]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V797*/ meltfptr[796]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V796*/ meltfptr[795]); melt_dbgtrace_written_object ( /*_.VALDATA___V796*/ meltfptr[795], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:424:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V798*/ meltfptr[797])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V798*/ meltfptr[797])))); ((meltobject_ptr_t) ( /*_.VALDATA___V798*/ meltfptr[797]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V799*/ meltfptr[798]); MELT_LOCATION ("warmelt-genobj.melt:424:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V798*/ meltfptr[797])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V798*/ meltfptr[797])))); ((meltobject_ptr_t) ( /*_.VALDATA___V798*/ meltfptr[797]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#455 */ melt_assertmsg ("putupl #455 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V800*/ meltfptr[799])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #455 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V800*/ meltfptr[799])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V800*/ meltfptr[799]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#456 */ melt_assertmsg ("putupl #456 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V800*/ meltfptr[799])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #456 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V800*/ meltfptr[799])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V800*/ meltfptr[799]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#457 */ melt_assertmsg ("putupl #457 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V800*/ meltfptr[799])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #457 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V800*/ meltfptr[799])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V800*/ meltfptr[799]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V800*/ meltfptr[799]); MELT_LOCATION ("warmelt-genobj.melt:424:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V798*/ meltfptr[797])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V798*/ meltfptr[797])))); ((meltobject_ptr_t) ( /*_.VALDATA___V798*/ meltfptr[797]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V800*/ meltfptr[799]); MELT_LOCATION ("warmelt-genobj.melt:424:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V801*/ meltfptr[800])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V801*/ meltfptr[800])))); ((meltobject_ptr_t) ( /*_.VALDATA___V801*/ meltfptr[800]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V802*/ meltfptr[801]); MELT_LOCATION ("warmelt-genobj.melt:424:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V801*/ meltfptr[800])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V801*/ meltfptr[800])))); ((meltobject_ptr_t) ( /*_.VALDATA___V801*/ meltfptr[800]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V798*/ meltfptr[797]); MELT_LOCATION ("warmelt-genobj.melt:424:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V801*/ meltfptr[800]); MELT_LOCATION ("warmelt-genobj.melt:424:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V801*/ meltfptr[800], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:424:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V803*/ meltfptr[802])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V803*/ meltfptr[802])))); ((meltobject_ptr_t) ( /*_.VALDATA___V803*/ meltfptr[802]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V804*/ meltfptr[803]); MELT_LOCATION ("warmelt-genobj.melt:424:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V803*/ meltfptr[802])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V803*/ meltfptr[802])))); ((meltobject_ptr_t) ( /*_.VALDATA___V803*/ meltfptr[802]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V798*/ meltfptr[797]); MELT_LOCATION ("warmelt-genobj.melt:424:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V803*/ meltfptr[802]); MELT_LOCATION ("warmelt-genobj.melt:424:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V803*/ meltfptr[802], "new static instance"); /*putupl#458 */ melt_assertmsg ("putupl #458 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V805*/ meltfptr[804])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #458 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V805*/ meltfptr[804])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V805*/ meltfptr[804]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#459 */ melt_assertmsg ("putupl #459 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V805*/ meltfptr[804])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #459 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V805*/ meltfptr[804])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V805*/ meltfptr[804]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V801*/ meltfptr[800]); /*putupl#460 */ melt_assertmsg ("putupl #460 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V805*/ meltfptr[804])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #460 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V805*/ meltfptr[804])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V805*/ meltfptr[804]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V803*/ meltfptr[802]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V805*/ meltfptr[804]); MELT_LOCATION ("warmelt-genobj.melt:424:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V798*/ meltfptr[797])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V798*/ meltfptr[797])))); ((meltobject_ptr_t) ( /*_.VALDATA___V798*/ meltfptr[797]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V805*/ meltfptr[804]); MELT_LOCATION ("warmelt-genobj.melt:424:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V798*/ meltfptr[797]); MELT_LOCATION ("warmelt-genobj.melt:424:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V798*/ meltfptr[797], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V806*/ meltfptr[805]); melt_dbgtrace_written_object ( /*_.VALDATA___V806*/ meltfptr[805], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V808*/ meltfptr[807])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V808*/ meltfptr[807])))); ((meltobject_ptr_t) ( /*_.VALDATA___V808*/ meltfptr[807]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V809*/ meltfptr[808]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V808*/ meltfptr[807]); melt_dbgtrace_written_object ( /*_.VALDATA___V808*/ meltfptr[807], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V810*/ meltfptr[809])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V810*/ meltfptr[809])))); ((meltobject_ptr_t) ( /*_.VALDATA___V810*/ meltfptr[809]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V811*/ meltfptr[810]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V810*/ meltfptr[809]); melt_dbgtrace_written_object ( /*_.VALDATA___V810*/ meltfptr[809], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:432:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-genobj.melt:432:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V812*/ meltfptr[811])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V812*/ meltfptr[811])))); ((meltobject_ptr_t) ( /*_.VALDATA___V812*/ meltfptr[811]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V426*/ meltfptr[425]); /*putupl#461 */ melt_assertmsg ("putupl #461 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V814*/ meltfptr[813])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #461 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V814*/ meltfptr[813])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V814*/ meltfptr[813]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#462 */ melt_assertmsg ("putupl #462 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V814*/ meltfptr[813])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #462 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V814*/ meltfptr[813])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V814*/ meltfptr[813]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#463 */ melt_assertmsg ("putupl #463 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V814*/ meltfptr[813])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #463 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V814*/ meltfptr[813])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V814*/ meltfptr[813]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#464 */ melt_assertmsg ("putupl #464 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V814*/ meltfptr[813])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #464 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V814*/ meltfptr[813])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V814*/ meltfptr[813]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V426*/ meltfptr[425]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V814*/ meltfptr[813]); MELT_LOCATION ("warmelt-genobj.melt:432:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V812*/ meltfptr[811])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V812*/ meltfptr[811])))); ((meltobject_ptr_t) ( /*_.VALDATA___V812*/ meltfptr[811]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V814*/ meltfptr[813]); MELT_LOCATION ("warmelt-genobj.melt:432:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V815*/ meltfptr[814])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V815*/ meltfptr[814])))); ((meltobject_ptr_t) ( /*_.VALDATA___V815*/ meltfptr[814]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V816*/ meltfptr[815]); MELT_LOCATION ("warmelt-genobj.melt:432:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V815*/ meltfptr[814])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V815*/ meltfptr[814])))); ((meltobject_ptr_t) ( /*_.VALDATA___V815*/ meltfptr[814]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V812*/ meltfptr[811]); MELT_LOCATION ("warmelt-genobj.melt:432:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V815*/ meltfptr[814]); MELT_LOCATION ("warmelt-genobj.melt:432:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V815*/ meltfptr[814], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:432:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V817*/ meltfptr[816])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V817*/ meltfptr[816])))); ((meltobject_ptr_t) ( /*_.VALDATA___V817*/ meltfptr[816]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V818*/ meltfptr[817]); MELT_LOCATION ("warmelt-genobj.melt:432:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V817*/ meltfptr[816])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V817*/ meltfptr[816])))); ((meltobject_ptr_t) ( /*_.VALDATA___V817*/ meltfptr[816]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V812*/ meltfptr[811]); MELT_LOCATION ("warmelt-genobj.melt:432:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V817*/ meltfptr[816]); MELT_LOCATION ("warmelt-genobj.melt:432:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V817*/ meltfptr[816], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:432:/ 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-genobj.melt:432:/ 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___V812*/ meltfptr[811]); MELT_LOCATION ("warmelt-genobj.melt:432:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V819*/ meltfptr[818]); MELT_LOCATION ("warmelt-genobj.melt:432:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V819*/ meltfptr[818], "new static instance"); /*putupl#465 */ melt_assertmsg ("putupl #465 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V821*/ meltfptr[820])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #465 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V821*/ meltfptr[820])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V821*/ meltfptr[820]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#466 */ melt_assertmsg ("putupl #466 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V821*/ meltfptr[820])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #466 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V821*/ meltfptr[820])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V821*/ meltfptr[820]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V429*/ meltfptr[428]); /*putupl#467 */ melt_assertmsg ("putupl #467 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V821*/ meltfptr[820])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #467 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V821*/ meltfptr[820])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V821*/ meltfptr[820]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V815*/ meltfptr[814]); /*putupl#468 */ melt_assertmsg ("putupl #468 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V821*/ meltfptr[820])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #468 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V821*/ meltfptr[820])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V821*/ meltfptr[820]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V817*/ meltfptr[816]); /*putupl#469 */ melt_assertmsg ("putupl #469 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V821*/ meltfptr[820])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #469 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V821*/ meltfptr[820])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V821*/ meltfptr[820]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V819*/ meltfptr[818]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V821*/ meltfptr[820]); MELT_LOCATION ("warmelt-genobj.melt:432:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V812*/ meltfptr[811])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V812*/ meltfptr[811])))); ((meltobject_ptr_t) ( /*_.VALDATA___V812*/ meltfptr[811]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V821*/ meltfptr[820]); MELT_LOCATION ("warmelt-genobj.melt:432:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V812*/ meltfptr[811]); MELT_LOCATION ("warmelt-genobj.melt:432:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V812*/ meltfptr[811], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V822*/ meltfptr[821])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V822*/ meltfptr[821])))); ((meltobject_ptr_t) ( /*_.VALDATA___V822*/ meltfptr[821]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V823*/ meltfptr[822]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V822*/ meltfptr[821]); melt_dbgtrace_written_object ( /*_.VALDATA___V822*/ meltfptr[821], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V824*/ meltfptr[823])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V824*/ meltfptr[823])))); ((meltobject_ptr_t) ( /*_.VALDATA___V824*/ meltfptr[823]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V825*/ meltfptr[824]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V824*/ meltfptr[823]); melt_dbgtrace_written_object ( /*_.VALDATA___V824*/ meltfptr[823], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V826*/ meltfptr[825])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V826*/ meltfptr[825])))); ((meltobject_ptr_t) ( /*_.VALDATA___V826*/ meltfptr[825]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V827*/ meltfptr[826]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V826*/ meltfptr[825]); melt_dbgtrace_written_object ( /*_.VALDATA___V826*/ meltfptr[825], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V828*/ meltfptr[827])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V828*/ meltfptr[827])))); ((meltobject_ptr_t) ( /*_.VALDATA___V828*/ meltfptr[827]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V829*/ meltfptr[828]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V828*/ meltfptr[827]); melt_dbgtrace_written_object ( /*_.VALDATA___V828*/ meltfptr[827], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:440:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V830*/ meltfptr[829])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V830*/ meltfptr[829])))); ((meltobject_ptr_t) ( /*_.VALDATA___V830*/ meltfptr[829]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V831*/ meltfptr[830]); MELT_LOCATION ("warmelt-genobj.melt:440:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V830*/ meltfptr[829])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V830*/ meltfptr[829])))); ((meltobject_ptr_t) ( /*_.VALDATA___V830*/ meltfptr[829]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#470 */ melt_assertmsg ("putupl #470 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V832*/ meltfptr[831])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #470 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V832*/ meltfptr[831])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V832*/ meltfptr[831]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#471 */ melt_assertmsg ("putupl #471 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V832*/ meltfptr[831])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #471 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V832*/ meltfptr[831])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V832*/ meltfptr[831]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#472 */ melt_assertmsg ("putupl #472 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V832*/ meltfptr[831])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #472 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V832*/ meltfptr[831])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V832*/ meltfptr[831]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V832*/ meltfptr[831]); MELT_LOCATION ("warmelt-genobj.melt:440:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V830*/ meltfptr[829])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V830*/ meltfptr[829])))); ((meltobject_ptr_t) ( /*_.VALDATA___V830*/ meltfptr[829]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V832*/ meltfptr[831]); MELT_LOCATION ("warmelt-genobj.melt:440:/ 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-genobj.melt:440:/ 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___V830*/ meltfptr[829]); MELT_LOCATION ("warmelt-genobj.melt:440:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V833*/ meltfptr[832]); MELT_LOCATION ("warmelt-genobj.melt:440:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V833*/ meltfptr[832], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:440:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V835*/ meltfptr[834])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V835*/ meltfptr[834])))); ((meltobject_ptr_t) ( /*_.VALDATA___V835*/ meltfptr[834]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V836*/ meltfptr[835]); MELT_LOCATION ("warmelt-genobj.melt:440:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V835*/ meltfptr[834])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V835*/ meltfptr[834])))); ((meltobject_ptr_t) ( /*_.VALDATA___V835*/ meltfptr[834]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V830*/ meltfptr[829]); MELT_LOCATION ("warmelt-genobj.melt:440:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V835*/ meltfptr[834]); MELT_LOCATION ("warmelt-genobj.melt:440:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V835*/ meltfptr[834], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:440:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V837*/ meltfptr[836])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V837*/ meltfptr[836])))); ((meltobject_ptr_t) ( /*_.VALDATA___V837*/ meltfptr[836]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V838*/ meltfptr[837]); MELT_LOCATION ("warmelt-genobj.melt:440:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V837*/ meltfptr[836])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V837*/ meltfptr[836])))); ((meltobject_ptr_t) ( /*_.VALDATA___V837*/ meltfptr[836]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V830*/ meltfptr[829]); MELT_LOCATION ("warmelt-genobj.melt:440:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V837*/ meltfptr[836]); MELT_LOCATION ("warmelt-genobj.melt:440:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V837*/ meltfptr[836], "new static instance"); /*putupl#473 */ melt_assertmsg ("putupl #473 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V839*/ meltfptr[838])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #473 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V839*/ meltfptr[838])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V839*/ meltfptr[838]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#474 */ melt_assertmsg ("putupl #474 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V839*/ meltfptr[838])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #474 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V839*/ meltfptr[838])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V839*/ meltfptr[838]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V833*/ meltfptr[832]); /*putupl#475 */ melt_assertmsg ("putupl #475 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V839*/ meltfptr[838])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #475 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V839*/ meltfptr[838])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V839*/ meltfptr[838]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V835*/ meltfptr[834]); /*putupl#476 */ melt_assertmsg ("putupl #476 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V839*/ meltfptr[838])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #476 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V839*/ meltfptr[838])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V839*/ meltfptr[838]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V837*/ meltfptr[836]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V839*/ meltfptr[838]); MELT_LOCATION ("warmelt-genobj.melt:440:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V830*/ meltfptr[829])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V830*/ meltfptr[829])))); ((meltobject_ptr_t) ( /*_.VALDATA___V830*/ meltfptr[829]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V839*/ meltfptr[838]); MELT_LOCATION ("warmelt-genobj.melt:440:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V830*/ meltfptr[829]); MELT_LOCATION ("warmelt-genobj.melt:440:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V830*/ meltfptr[829], "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"); MELT_LOCATION ("warmelt-genobj.melt:449:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V848*/ meltfptr[847])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V848*/ meltfptr[847])))); ((meltobject_ptr_t) ( /*_.VALDATA___V848*/ meltfptr[847]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V849*/ meltfptr[848]); MELT_LOCATION ("warmelt-genobj.melt:449:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V848*/ meltfptr[847])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V848*/ meltfptr[847])))); ((meltobject_ptr_t) ( /*_.VALDATA___V848*/ meltfptr[847]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#477 */ melt_assertmsg ("putupl #477 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V850*/ meltfptr[849])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #477 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V850*/ meltfptr[849])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V850*/ meltfptr[849]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#478 */ melt_assertmsg ("putupl #478 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V850*/ meltfptr[849])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #478 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V850*/ meltfptr[849])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V850*/ meltfptr[849]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#479 */ melt_assertmsg ("putupl #479 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V850*/ meltfptr[849])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #479 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V850*/ meltfptr[849])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V850*/ meltfptr[849]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V850*/ meltfptr[849]); MELT_LOCATION ("warmelt-genobj.melt:449:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V848*/ meltfptr[847])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V848*/ meltfptr[847])))); ((meltobject_ptr_t) ( /*_.VALDATA___V848*/ meltfptr[847]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V850*/ meltfptr[849]); MELT_LOCATION ("warmelt-genobj.melt:449:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V851*/ meltfptr[850])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V851*/ meltfptr[850])))); ((meltobject_ptr_t) ( /*_.VALDATA___V851*/ meltfptr[850]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V852*/ meltfptr[851]); MELT_LOCATION ("warmelt-genobj.melt:449:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V851*/ meltfptr[850])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V851*/ meltfptr[850])))); ((meltobject_ptr_t) ( /*_.VALDATA___V851*/ meltfptr[850]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V848*/ meltfptr[847]); MELT_LOCATION ("warmelt-genobj.melt:449:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V851*/ meltfptr[850]); MELT_LOCATION ("warmelt-genobj.melt:449:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V851*/ meltfptr[850], "new static instance"); /*putupl#480 */ melt_assertmsg ("putupl #480 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V853*/ meltfptr[852])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #480 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V853*/ meltfptr[852])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V853*/ meltfptr[852]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_12 */ void meltmod__warmelt_genobj__initialmeltchunk_13 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*putupl#481*/ melt_assertmsg ("putupl #481 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V853*/ meltfptr[852])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #481 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V853*/ meltfptr[852])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V853*/ meltfptr[852]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V851*/ meltfptr[850]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V853*/ meltfptr[852]); MELT_LOCATION ("warmelt-genobj.melt:449:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V848*/ meltfptr[847])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V848*/ meltfptr[847])))); ((meltobject_ptr_t) ( /*_.VALDATA___V848*/ meltfptr[847]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V853*/ meltfptr[852]); MELT_LOCATION ("warmelt-genobj.melt:449:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V848*/ meltfptr[847]); MELT_LOCATION ("warmelt-genobj.melt:449:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V848*/ meltfptr[847], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V854*/ meltfptr[853]); melt_dbgtrace_written_object ( /*_.VALDATA___V854*/ meltfptr[853], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V856*/ meltfptr[855])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V856*/ meltfptr[855])))); ((meltobject_ptr_t) ( /*_.VALDATA___V856*/ meltfptr[855]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V857*/ meltfptr[856]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V856*/ meltfptr[855]); melt_dbgtrace_written_object ( /*_.VALDATA___V856*/ meltfptr[855], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:454:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-genobj.melt:454:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V858*/ meltfptr[857])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V858*/ meltfptr[857])))); ((meltobject_ptr_t) ( /*_.VALDATA___V858*/ meltfptr[857]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V848*/ meltfptr[847]); /*putupl#482 */ melt_assertmsg ("putupl #482 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V860*/ meltfptr[859])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #482 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V860*/ meltfptr[859])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V860*/ meltfptr[859]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#483 */ melt_assertmsg ("putupl #483 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V860*/ meltfptr[859])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #483 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V860*/ meltfptr[859])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V860*/ meltfptr[859]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#484 */ melt_assertmsg ("putupl #484 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V860*/ meltfptr[859])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #484 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V860*/ meltfptr[859])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V860*/ meltfptr[859]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#485 */ melt_assertmsg ("putupl #485 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V860*/ meltfptr[859])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #485 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V860*/ meltfptr[859])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V860*/ meltfptr[859]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V848*/ meltfptr[847]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V860*/ meltfptr[859]); MELT_LOCATION ("warmelt-genobj.melt:454:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V858*/ meltfptr[857])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V858*/ meltfptr[857])))); ((meltobject_ptr_t) ( /*_.VALDATA___V858*/ meltfptr[857]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V860*/ meltfptr[859]); MELT_LOCATION ("warmelt-genobj.melt:454:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V861*/ meltfptr[860])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V861*/ meltfptr[860])))); ((meltobject_ptr_t) ( /*_.VALDATA___V861*/ meltfptr[860]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V862*/ meltfptr[861]); MELT_LOCATION ("warmelt-genobj.melt:454:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V861*/ meltfptr[860])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V861*/ meltfptr[860])))); ((meltobject_ptr_t) ( /*_.VALDATA___V861*/ meltfptr[860]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V858*/ meltfptr[857]); MELT_LOCATION ("warmelt-genobj.melt:454:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V861*/ meltfptr[860]); MELT_LOCATION ("warmelt-genobj.melt:454:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V861*/ meltfptr[860], "new static instance"); /*putupl#486 */ melt_assertmsg ("putupl #486 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V863*/ meltfptr[862])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #486 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___V403*/ meltfptr[402]); /*putupl#487 */ melt_assertmsg ("putupl #487 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V863*/ meltfptr[862])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #487 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___V851*/ meltfptr[850]); /*putupl#488 */ melt_assertmsg ("putupl #488 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V863*/ meltfptr[862])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #488 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___V861*/ meltfptr[860]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V863*/ meltfptr[862]); MELT_LOCATION ("warmelt-genobj.melt:454:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V858*/ meltfptr[857])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V858*/ meltfptr[857])))); ((meltobject_ptr_t) ( /*_.VALDATA___V858*/ meltfptr[857]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V863*/ meltfptr[862]); MELT_LOCATION ("warmelt-genobj.melt:454:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V858*/ meltfptr[857]); MELT_LOCATION ("warmelt-genobj.melt:454:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V858*/ meltfptr[857], "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"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V866*/ meltfptr[865]); melt_dbgtrace_written_object ( /*_.VALDATA___V866*/ meltfptr[865], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:459:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V868*/ meltfptr[867])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V868*/ meltfptr[867])))); ((meltobject_ptr_t) ( /*_.VALDATA___V868*/ meltfptr[867]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V869*/ meltfptr[868]); MELT_LOCATION ("warmelt-genobj.melt:459:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V868*/ meltfptr[867])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V868*/ meltfptr[867])))); ((meltobject_ptr_t) ( /*_.VALDATA___V868*/ meltfptr[867]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V848*/ meltfptr[847]); /*putupl#489 */ melt_assertmsg ("putupl #489 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V870*/ meltfptr[869])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #489 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V870*/ meltfptr[869])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V870*/ meltfptr[869]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#490 */ melt_assertmsg ("putupl #490 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V870*/ meltfptr[869])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #490 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V870*/ meltfptr[869])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V870*/ meltfptr[869]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#491 */ melt_assertmsg ("putupl #491 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V870*/ meltfptr[869])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #491 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V870*/ meltfptr[869])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V870*/ meltfptr[869]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#492 */ melt_assertmsg ("putupl #492 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V870*/ meltfptr[869])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #492 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V870*/ meltfptr[869])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V870*/ meltfptr[869]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V848*/ meltfptr[847]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V870*/ meltfptr[869]); MELT_LOCATION ("warmelt-genobj.melt:459:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V868*/ meltfptr[867])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V868*/ meltfptr[867])))); ((meltobject_ptr_t) ( /*_.VALDATA___V868*/ meltfptr[867]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V870*/ meltfptr[869]); MELT_LOCATION ("warmelt-genobj.melt:459:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V871*/ meltfptr[870])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V871*/ meltfptr[870])))); ((meltobject_ptr_t) ( /*_.VALDATA___V871*/ meltfptr[870]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V872*/ meltfptr[871]); MELT_LOCATION ("warmelt-genobj.melt:459:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V871*/ meltfptr[870])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V871*/ meltfptr[870])))); ((meltobject_ptr_t) ( /*_.VALDATA___V871*/ meltfptr[870]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V868*/ meltfptr[867]); MELT_LOCATION ("warmelt-genobj.melt:459:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V871*/ meltfptr[870]); MELT_LOCATION ("warmelt-genobj.melt:459:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V871*/ meltfptr[870], "new static instance"); /*putupl#493 */ melt_assertmsg ("putupl #493 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V873*/ meltfptr[872])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #493 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V873*/ meltfptr[872])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V873*/ meltfptr[872]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#494 */ melt_assertmsg ("putupl #494 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V873*/ meltfptr[872])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #494 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V873*/ meltfptr[872])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V873*/ meltfptr[872]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V851*/ meltfptr[850]); /*putupl#495 */ melt_assertmsg ("putupl #495 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V873*/ meltfptr[872])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #495 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V873*/ meltfptr[872])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V873*/ meltfptr[872]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V871*/ meltfptr[870]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V873*/ meltfptr[872]); MELT_LOCATION ("warmelt-genobj.melt:459:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V868*/ meltfptr[867])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V868*/ meltfptr[867])))); ((meltobject_ptr_t) ( /*_.VALDATA___V868*/ meltfptr[867]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V873*/ meltfptr[872]); MELT_LOCATION ("warmelt-genobj.melt:459:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V868*/ meltfptr[867]); MELT_LOCATION ("warmelt-genobj.melt:459:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V868*/ meltfptr[867], "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"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V876*/ meltfptr[875]); melt_dbgtrace_written_object ( /*_.VALDATA___V876*/ meltfptr[875], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:465:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V878*/ meltfptr[877])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V878*/ meltfptr[877])))); ((meltobject_ptr_t) ( /*_.VALDATA___V878*/ meltfptr[877]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V879*/ meltfptr[878]); MELT_LOCATION ("warmelt-genobj.melt:465:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V878*/ meltfptr[877])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V878*/ meltfptr[877])))); ((meltobject_ptr_t) ( /*_.VALDATA___V878*/ meltfptr[877]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#496 */ melt_assertmsg ("putupl #496 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V880*/ meltfptr[879])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #496 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V880*/ meltfptr[879])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V880*/ meltfptr[879]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#497 */ melt_assertmsg ("putupl #497 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V880*/ meltfptr[879])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #497 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V880*/ meltfptr[879])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V880*/ meltfptr[879]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#498 */ melt_assertmsg ("putupl #498 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V880*/ meltfptr[879])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #498 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V880*/ meltfptr[879])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V880*/ meltfptr[879]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V880*/ meltfptr[879]); MELT_LOCATION ("warmelt-genobj.melt:465:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V878*/ meltfptr[877])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V878*/ meltfptr[877])))); ((meltobject_ptr_t) ( /*_.VALDATA___V878*/ meltfptr[877]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V880*/ meltfptr[879]); MELT_LOCATION ("warmelt-genobj.melt:465:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V881*/ meltfptr[880])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V881*/ meltfptr[880])))); ((meltobject_ptr_t) ( /*_.VALDATA___V881*/ meltfptr[880]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V882*/ meltfptr[881]); MELT_LOCATION ("warmelt-genobj.melt:465:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V881*/ meltfptr[880])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V881*/ meltfptr[880])))); ((meltobject_ptr_t) ( /*_.VALDATA___V881*/ meltfptr[880]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V878*/ meltfptr[877]); MELT_LOCATION ("warmelt-genobj.melt:465:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V881*/ meltfptr[880]); MELT_LOCATION ("warmelt-genobj.melt:465:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V881*/ meltfptr[880], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:465:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V883*/ meltfptr[882])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V883*/ meltfptr[882])))); ((meltobject_ptr_t) ( /*_.VALDATA___V883*/ meltfptr[882]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V884*/ meltfptr[883]); MELT_LOCATION ("warmelt-genobj.melt:465:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V883*/ meltfptr[882])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V883*/ meltfptr[882])))); ((meltobject_ptr_t) ( /*_.VALDATA___V883*/ meltfptr[882]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V878*/ meltfptr[877]); MELT_LOCATION ("warmelt-genobj.melt:465:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V883*/ meltfptr[882]); MELT_LOCATION ("warmelt-genobj.melt:465:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V883*/ meltfptr[882], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:465:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V885*/ meltfptr[884])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V885*/ meltfptr[884])))); ((meltobject_ptr_t) ( /*_.VALDATA___V885*/ meltfptr[884]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V886*/ meltfptr[885]); MELT_LOCATION ("warmelt-genobj.melt:465:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V885*/ meltfptr[884])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V885*/ meltfptr[884])))); ((meltobject_ptr_t) ( /*_.VALDATA___V885*/ meltfptr[884]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V878*/ meltfptr[877]); MELT_LOCATION ("warmelt-genobj.melt:465:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V885*/ meltfptr[884]); MELT_LOCATION ("warmelt-genobj.melt:465:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V885*/ meltfptr[884], "new static instance"); /*putupl#499 */ melt_assertmsg ("putupl #499 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V887*/ meltfptr[886])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #499 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V887*/ meltfptr[886])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V887*/ meltfptr[886]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#500 */ melt_assertmsg ("putupl #500 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V887*/ meltfptr[886])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #500 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V887*/ meltfptr[886])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V887*/ meltfptr[886]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V881*/ meltfptr[880]); /*putupl#501 */ melt_assertmsg ("putupl #501 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V887*/ meltfptr[886])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #501 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V887*/ meltfptr[886])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V887*/ meltfptr[886]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V883*/ meltfptr[882]); /*putupl#502 */ melt_assertmsg ("putupl #502 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V887*/ meltfptr[886])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #502 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V887*/ meltfptr[886])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V887*/ meltfptr[886]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V885*/ meltfptr[884]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V887*/ meltfptr[886]); MELT_LOCATION ("warmelt-genobj.melt:465:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V878*/ meltfptr[877])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V878*/ meltfptr[877])))); ((meltobject_ptr_t) ( /*_.VALDATA___V878*/ meltfptr[877]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V887*/ meltfptr[886]); MELT_LOCATION ("warmelt-genobj.melt:465:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V878*/ meltfptr[877]); MELT_LOCATION ("warmelt-genobj.melt:465:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V878*/ meltfptr[877], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V888*/ meltfptr[887]); melt_dbgtrace_written_object ( /*_.VALDATA___V888*/ meltfptr[887], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V890*/ meltfptr[889])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V890*/ meltfptr[889])))); ((meltobject_ptr_t) ( /*_.VALDATA___V890*/ meltfptr[889]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V891*/ meltfptr[890]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V890*/ meltfptr[889]); melt_dbgtrace_written_object ( /*_.VALDATA___V890*/ meltfptr[889], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V892*/ meltfptr[891])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V892*/ meltfptr[891])))); ((meltobject_ptr_t) ( /*_.VALDATA___V892*/ meltfptr[891]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V893*/ meltfptr[892]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V892*/ meltfptr[891]); melt_dbgtrace_written_object ( /*_.VALDATA___V892*/ meltfptr[891], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V894*/ meltfptr[893])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V894*/ meltfptr[893])))); ((meltobject_ptr_t) ( /*_.VALDATA___V894*/ meltfptr[893]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V895*/ meltfptr[894]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V894*/ meltfptr[893]); melt_dbgtrace_written_object ( /*_.VALDATA___V894*/ meltfptr[893], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:473:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V896*/ meltfptr[895])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V896*/ meltfptr[895])))); ((meltobject_ptr_t) ( /*_.VALDATA___V896*/ meltfptr[895]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V897*/ meltfptr[896]); MELT_LOCATION ("warmelt-genobj.melt:473:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V896*/ meltfptr[895])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V896*/ meltfptr[895])))); ((meltobject_ptr_t) ( /*_.VALDATA___V896*/ meltfptr[895]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#503 */ melt_assertmsg ("putupl #503 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V898*/ meltfptr[897])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #503 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V898*/ meltfptr[897])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V898*/ meltfptr[897]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#504 */ melt_assertmsg ("putupl #504 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V898*/ meltfptr[897])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #504 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V898*/ meltfptr[897])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V898*/ meltfptr[897]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#505 */ melt_assertmsg ("putupl #505 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V898*/ meltfptr[897])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #505 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V898*/ meltfptr[897])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V898*/ meltfptr[897]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V898*/ meltfptr[897]); MELT_LOCATION ("warmelt-genobj.melt:473:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V896*/ meltfptr[895])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V896*/ meltfptr[895])))); ((meltobject_ptr_t) ( /*_.VALDATA___V896*/ meltfptr[895]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V898*/ meltfptr[897]); MELT_LOCATION ("warmelt-genobj.melt:473:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V899*/ meltfptr[898])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V899*/ meltfptr[898])))); ((meltobject_ptr_t) ( /*_.VALDATA___V899*/ meltfptr[898]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V900*/ meltfptr[899]); MELT_LOCATION ("warmelt-genobj.melt:473:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V899*/ meltfptr[898])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V899*/ meltfptr[898])))); ((meltobject_ptr_t) ( /*_.VALDATA___V899*/ meltfptr[898]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V896*/ meltfptr[895]); MELT_LOCATION ("warmelt-genobj.melt:473:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V899*/ meltfptr[898]); MELT_LOCATION ("warmelt-genobj.melt:473:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V899*/ meltfptr[898], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:473:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V901*/ meltfptr[900])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V901*/ meltfptr[900])))); ((meltobject_ptr_t) ( /*_.VALDATA___V901*/ meltfptr[900]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V902*/ meltfptr[901]); MELT_LOCATION ("warmelt-genobj.melt:473:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V901*/ meltfptr[900])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V901*/ meltfptr[900])))); ((meltobject_ptr_t) ( /*_.VALDATA___V901*/ meltfptr[900]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V896*/ meltfptr[895]); MELT_LOCATION ("warmelt-genobj.melt:473:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V901*/ meltfptr[900]); MELT_LOCATION ("warmelt-genobj.melt:473:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V901*/ meltfptr[900], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:473:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V903*/ meltfptr[902])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V903*/ meltfptr[902])))); ((meltobject_ptr_t) ( /*_.VALDATA___V903*/ meltfptr[902]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V904*/ meltfptr[903]); MELT_LOCATION ("warmelt-genobj.melt:473:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V903*/ meltfptr[902])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V903*/ meltfptr[902])))); ((meltobject_ptr_t) ( /*_.VALDATA___V903*/ meltfptr[902]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V896*/ meltfptr[895]); MELT_LOCATION ("warmelt-genobj.melt:473:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V903*/ meltfptr[902]); MELT_LOCATION ("warmelt-genobj.melt:473:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V903*/ meltfptr[902], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:473:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V905*/ meltfptr[904])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V905*/ meltfptr[904])))); ((meltobject_ptr_t) ( /*_.VALDATA___V905*/ meltfptr[904]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V906*/ meltfptr[905]); MELT_LOCATION ("warmelt-genobj.melt:473:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V905*/ meltfptr[904])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V905*/ meltfptr[904])))); ((meltobject_ptr_t) ( /*_.VALDATA___V905*/ meltfptr[904]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V896*/ meltfptr[895]); MELT_LOCATION ("warmelt-genobj.melt:473:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V905*/ meltfptr[904]); MELT_LOCATION ("warmelt-genobj.melt:473:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V905*/ meltfptr[904], "new static instance"); /*putupl#506 */ melt_assertmsg ("putupl #506 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V907*/ meltfptr[906])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #506 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V907*/ meltfptr[906])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V907*/ meltfptr[906]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#507 */ melt_assertmsg ("putupl #507 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V907*/ meltfptr[906])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #507 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V907*/ meltfptr[906])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V907*/ meltfptr[906]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V899*/ meltfptr[898]); /*putupl#508 */ melt_assertmsg ("putupl #508 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V907*/ meltfptr[906])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #508 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V907*/ meltfptr[906])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V907*/ meltfptr[906]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V901*/ meltfptr[900]); /*putupl#509 */ melt_assertmsg ("putupl #509 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V907*/ meltfptr[906])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #509 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V907*/ meltfptr[906])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V907*/ meltfptr[906]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V903*/ meltfptr[902]); /*putupl#510 */ melt_assertmsg ("putupl #510 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V907*/ meltfptr[906])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #510 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V907*/ meltfptr[906])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V907*/ meltfptr[906]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V905*/ meltfptr[904]); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_13 */ void meltmod__warmelt_genobj__initialmeltchunk_14 (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___V907*/ meltfptr[906]); MELT_LOCATION ("warmelt-genobj.melt:473:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V896*/ meltfptr[895])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V896*/ meltfptr[895])))); ((meltobject_ptr_t) ( /*_.VALDATA___V896*/ meltfptr[895]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V907*/ meltfptr[906]); MELT_LOCATION ("warmelt-genobj.melt:473:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V896*/ meltfptr[895]); MELT_LOCATION ("warmelt-genobj.melt:473:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V896*/ meltfptr[895], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V908*/ meltfptr[907])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V908*/ meltfptr[907])))); ((meltobject_ptr_t) ( /*_.VALDATA___V908*/ meltfptr[907]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V909*/ meltfptr[908]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V908*/ meltfptr[907]); melt_dbgtrace_written_object ( /*_.VALDATA___V908*/ meltfptr[907], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V910*/ meltfptr[909])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V910*/ meltfptr[909])))); ((meltobject_ptr_t) ( /*_.VALDATA___V910*/ meltfptr[909]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V911*/ meltfptr[910]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V910*/ meltfptr[909]); melt_dbgtrace_written_object ( /*_.VALDATA___V910*/ meltfptr[909], "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"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V916*/ meltfptr[915]); melt_dbgtrace_written_object ( /*_.VALDATA___V916*/ meltfptr[915], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:483:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V918*/ meltfptr[917])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V918*/ meltfptr[917])))); ((meltobject_ptr_t) ( /*_.VALDATA___V918*/ meltfptr[917]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V919*/ meltfptr[918]); MELT_LOCATION ("warmelt-genobj.melt:483:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V918*/ meltfptr[917])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V918*/ meltfptr[917])))); ((meltobject_ptr_t) ( /*_.VALDATA___V918*/ meltfptr[917]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V426*/ meltfptr[425]); /*putupl#511 */ melt_assertmsg ("putupl #511 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V920*/ meltfptr[919])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #511 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V920*/ meltfptr[919])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V920*/ meltfptr[919]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#512 */ melt_assertmsg ("putupl #512 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V920*/ meltfptr[919])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #512 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V920*/ meltfptr[919])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V920*/ meltfptr[919]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#513 */ melt_assertmsg ("putupl #513 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V920*/ meltfptr[919])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #513 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V920*/ meltfptr[919])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V920*/ meltfptr[919]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#514 */ melt_assertmsg ("putupl #514 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V920*/ meltfptr[919])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #514 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V920*/ meltfptr[919])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V920*/ meltfptr[919]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V426*/ meltfptr[425]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V920*/ meltfptr[919]); MELT_LOCATION ("warmelt-genobj.melt:483:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V918*/ meltfptr[917])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V918*/ meltfptr[917])))); ((meltobject_ptr_t) ( /*_.VALDATA___V918*/ meltfptr[917]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V920*/ meltfptr[919]); MELT_LOCATION ("warmelt-genobj.melt:483:/ 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-genobj.melt:483:/ 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___V918*/ meltfptr[917]); MELT_LOCATION ("warmelt-genobj.melt:483:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V921*/ meltfptr[920]); MELT_LOCATION ("warmelt-genobj.melt:483:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V921*/ meltfptr[920], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:483:/ 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-genobj.melt:483:/ 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___V918*/ meltfptr[917]); MELT_LOCATION ("warmelt-genobj.melt:483:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V923*/ meltfptr[922]); MELT_LOCATION ("warmelt-genobj.melt:483:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V923*/ meltfptr[922], "new static instance"); /*putupl#515 */ melt_assertmsg ("putupl #515 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V925*/ meltfptr[924])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #515 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V925*/ meltfptr[924])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V925*/ meltfptr[924]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#516 */ melt_assertmsg ("putupl #516 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V925*/ meltfptr[924])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #516 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V925*/ meltfptr[924])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V925*/ meltfptr[924]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V429*/ meltfptr[428]); /*putupl#517 */ melt_assertmsg ("putupl #517 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V925*/ meltfptr[924])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #517 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V925*/ meltfptr[924])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V925*/ meltfptr[924]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V921*/ meltfptr[920]); /*putupl#518 */ melt_assertmsg ("putupl #518 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V925*/ meltfptr[924])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #518 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V925*/ meltfptr[924])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V925*/ meltfptr[924]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V923*/ meltfptr[922]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V925*/ meltfptr[924]); MELT_LOCATION ("warmelt-genobj.melt:483:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V918*/ meltfptr[917])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V918*/ meltfptr[917])))); ((meltobject_ptr_t) ( /*_.VALDATA___V918*/ meltfptr[917]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V925*/ meltfptr[924]); MELT_LOCATION ("warmelt-genobj.melt:483:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V918*/ meltfptr[917]); MELT_LOCATION ("warmelt-genobj.melt:483:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V918*/ meltfptr[917], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V926*/ meltfptr[925])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V926*/ meltfptr[925])))); ((meltobject_ptr_t) ( /*_.VALDATA___V926*/ meltfptr[925]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V927*/ meltfptr[926]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V926*/ meltfptr[925]); melt_dbgtrace_written_object ( /*_.VALDATA___V926*/ meltfptr[925], "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"); /*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"); MELT_LOCATION ("warmelt-genobj.melt:490:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-genobj.melt:490:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V932*/ meltfptr[931])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V932*/ meltfptr[931])))); ((meltobject_ptr_t) ( /*_.VALDATA___V932*/ meltfptr[931]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#519 */ melt_assertmsg ("putupl #519 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V934*/ meltfptr[933])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #519 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V934*/ meltfptr[933])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V934*/ meltfptr[933]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#520 */ melt_assertmsg ("putupl #520 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V934*/ meltfptr[933])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #520 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V934*/ meltfptr[933])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V934*/ meltfptr[933]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#521 */ melt_assertmsg ("putupl #521 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V934*/ meltfptr[933])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #521 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V934*/ meltfptr[933])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V934*/ meltfptr[933]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V934*/ meltfptr[933]); MELT_LOCATION ("warmelt-genobj.melt:490:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V932*/ meltfptr[931])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V932*/ meltfptr[931])))); ((meltobject_ptr_t) ( /*_.VALDATA___V932*/ meltfptr[931]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V934*/ meltfptr[933]); MELT_LOCATION ("warmelt-genobj.melt:490:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V935*/ meltfptr[934])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V935*/ meltfptr[934])))); ((meltobject_ptr_t) ( /*_.VALDATA___V935*/ meltfptr[934]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V936*/ meltfptr[935]); MELT_LOCATION ("warmelt-genobj.melt:490:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V935*/ meltfptr[934])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V935*/ meltfptr[934])))); ((meltobject_ptr_t) ( /*_.VALDATA___V935*/ meltfptr[934]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V932*/ meltfptr[931]); MELT_LOCATION ("warmelt-genobj.melt:490:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V935*/ meltfptr[934]); MELT_LOCATION ("warmelt-genobj.melt:490:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V935*/ meltfptr[934], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:490:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V937*/ meltfptr[936])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V937*/ meltfptr[936])))); ((meltobject_ptr_t) ( /*_.VALDATA___V937*/ meltfptr[936]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V938*/ meltfptr[937]); MELT_LOCATION ("warmelt-genobj.melt:490:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V937*/ meltfptr[936])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V937*/ meltfptr[936])))); ((meltobject_ptr_t) ( /*_.VALDATA___V937*/ meltfptr[936]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V932*/ meltfptr[931]); MELT_LOCATION ("warmelt-genobj.melt:490:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V937*/ meltfptr[936]); MELT_LOCATION ("warmelt-genobj.melt:490:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V937*/ meltfptr[936], "new static instance"); /*putupl#522 */ melt_assertmsg ("putupl #522 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V939*/ meltfptr[938])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #522 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V939*/ meltfptr[938])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V939*/ meltfptr[938]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#523 */ melt_assertmsg ("putupl #523 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V939*/ meltfptr[938])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #523 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V939*/ meltfptr[938])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V939*/ meltfptr[938]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V935*/ meltfptr[934]); /*putupl#524 */ melt_assertmsg ("putupl #524 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V939*/ meltfptr[938])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #524 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V939*/ meltfptr[938])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V939*/ meltfptr[938]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V937*/ meltfptr[936]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V939*/ meltfptr[938]); MELT_LOCATION ("warmelt-genobj.melt:490:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V932*/ meltfptr[931])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V932*/ meltfptr[931])))); ((meltobject_ptr_t) ( /*_.VALDATA___V932*/ meltfptr[931]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V939*/ meltfptr[938]); MELT_LOCATION ("warmelt-genobj.melt:490:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V932*/ meltfptr[931]); MELT_LOCATION ("warmelt-genobj.melt:490:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V932*/ meltfptr[931], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V940*/ meltfptr[939])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V940*/ meltfptr[939])))); ((meltobject_ptr_t) ( /*_.VALDATA___V940*/ meltfptr[939]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V941*/ meltfptr[940]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V940*/ meltfptr[939]); melt_dbgtrace_written_object ( /*_.VALDATA___V940*/ meltfptr[939], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V942*/ meltfptr[941])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V942*/ meltfptr[941])))); ((meltobject_ptr_t) ( /*_.VALDATA___V942*/ meltfptr[941]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V943*/ meltfptr[942]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V942*/ meltfptr[941]); melt_dbgtrace_written_object ( /*_.VALDATA___V942*/ meltfptr[941], "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"); MELT_LOCATION ("warmelt-genobj.melt:497:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-genobj.melt:497:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V946*/ meltfptr[945])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V946*/ meltfptr[945])))); ((meltobject_ptr_t) ( /*_.VALDATA___V946*/ meltfptr[945]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#525 */ melt_assertmsg ("putupl #525 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V948*/ meltfptr[947])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #525 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V948*/ meltfptr[947])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V948*/ meltfptr[947]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#526 */ melt_assertmsg ("putupl #526 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V948*/ meltfptr[947])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #526 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V948*/ meltfptr[947])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V948*/ meltfptr[947]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#527 */ melt_assertmsg ("putupl #527 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V948*/ meltfptr[947])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #527 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V948*/ meltfptr[947])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V948*/ meltfptr[947]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V948*/ meltfptr[947]); MELT_LOCATION ("warmelt-genobj.melt:497:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V946*/ meltfptr[945])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V946*/ meltfptr[945])))); ((meltobject_ptr_t) ( /*_.VALDATA___V946*/ meltfptr[945]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V948*/ meltfptr[947]); MELT_LOCATION ("warmelt-genobj.melt:497:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V949*/ meltfptr[948])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V949*/ meltfptr[948])))); ((meltobject_ptr_t) ( /*_.VALDATA___V949*/ meltfptr[948]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V950*/ meltfptr[949]); MELT_LOCATION ("warmelt-genobj.melt:497:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V949*/ meltfptr[948])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V949*/ meltfptr[948])))); ((meltobject_ptr_t) ( /*_.VALDATA___V949*/ meltfptr[948]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V946*/ meltfptr[945]); MELT_LOCATION ("warmelt-genobj.melt:497:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V949*/ meltfptr[948]); MELT_LOCATION ("warmelt-genobj.melt:497:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V949*/ meltfptr[948], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:497:/ 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-genobj.melt:497:/ 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___V946*/ meltfptr[945]); MELT_LOCATION ("warmelt-genobj.melt:497:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V951*/ meltfptr[950]); MELT_LOCATION ("warmelt-genobj.melt:497:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V951*/ meltfptr[950], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:497:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V953*/ meltfptr[952])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V953*/ meltfptr[952])))); ((meltobject_ptr_t) ( /*_.VALDATA___V953*/ meltfptr[952]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V954*/ meltfptr[953]); MELT_LOCATION ("warmelt-genobj.melt:497:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V953*/ meltfptr[952])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V953*/ meltfptr[952])))); ((meltobject_ptr_t) ( /*_.VALDATA___V953*/ meltfptr[952]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V946*/ meltfptr[945]); MELT_LOCATION ("warmelt-genobj.melt:497:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V953*/ meltfptr[952]); MELT_LOCATION ("warmelt-genobj.melt:497:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V953*/ meltfptr[952], "new static instance"); /*putupl#528 */ melt_assertmsg ("putupl #528 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V955*/ meltfptr[954])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #528 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V955*/ meltfptr[954])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V955*/ meltfptr[954]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#529 */ melt_assertmsg ("putupl #529 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V955*/ meltfptr[954])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #529 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V955*/ meltfptr[954])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V955*/ meltfptr[954]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V949*/ meltfptr[948]); /*putupl#530 */ melt_assertmsg ("putupl #530 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V955*/ meltfptr[954])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #530 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V955*/ meltfptr[954])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V955*/ meltfptr[954]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V951*/ meltfptr[950]); /*putupl#531 */ melt_assertmsg ("putupl #531 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V955*/ meltfptr[954])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #531 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V955*/ meltfptr[954])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V955*/ meltfptr[954]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V953*/ meltfptr[952]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V955*/ meltfptr[954]); MELT_LOCATION ("warmelt-genobj.melt:497:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V946*/ meltfptr[945])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V946*/ meltfptr[945])))); ((meltobject_ptr_t) ( /*_.VALDATA___V946*/ meltfptr[945]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V955*/ meltfptr[954]); MELT_LOCATION ("warmelt-genobj.melt:497:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V946*/ meltfptr[945]); MELT_LOCATION ("warmelt-genobj.melt:497:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V946*/ meltfptr[945], "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"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V958*/ meltfptr[957]); melt_dbgtrace_written_object ( /*_.VALDATA___V958*/ meltfptr[957], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V960*/ meltfptr[959])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V960*/ meltfptr[959])))); ((meltobject_ptr_t) ( /*_.VALDATA___V960*/ meltfptr[959]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V961*/ meltfptr[960]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V960*/ meltfptr[959]); melt_dbgtrace_written_object ( /*_.VALDATA___V960*/ meltfptr[959], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V962*/ meltfptr[961])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V962*/ meltfptr[961])))); ((meltobject_ptr_t) ( /*_.VALDATA___V962*/ meltfptr[961]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V963*/ meltfptr[962]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V962*/ meltfptr[961]); melt_dbgtrace_written_object ( /*_.VALDATA___V962*/ meltfptr[961], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:505:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V964*/ meltfptr[963])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V964*/ meltfptr[963])))); ((meltobject_ptr_t) ( /*_.VALDATA___V964*/ meltfptr[963]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V965*/ meltfptr[964]); MELT_LOCATION ("warmelt-genobj.melt:505:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V964*/ meltfptr[963])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V964*/ meltfptr[963])))); ((meltobject_ptr_t) ( /*_.VALDATA___V964*/ meltfptr[963]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V946*/ meltfptr[945]); /*putupl#532 */ melt_assertmsg ("putupl #532 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V966*/ meltfptr[965])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #532 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V966*/ meltfptr[965])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V966*/ meltfptr[965]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#533 */ melt_assertmsg ("putupl #533 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V966*/ meltfptr[965])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #533 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V966*/ meltfptr[965])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V966*/ meltfptr[965]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#534 */ melt_assertmsg ("putupl #534 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V966*/ meltfptr[965])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #534 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V966*/ meltfptr[965])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V966*/ meltfptr[965]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#535 */ melt_assertmsg ("putupl #535 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V966*/ meltfptr[965])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #535 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V966*/ meltfptr[965])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V966*/ meltfptr[965]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V946*/ meltfptr[945]); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_14 */ void meltmod__warmelt_genobj__initialmeltchunk_15 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*touch:INITUP_*/ meltgc_touch ( /*_.VALTUP___V966*/ meltfptr[965]); MELT_LOCATION ("warmelt-genobj.melt:505:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V964*/ meltfptr[963])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V964*/ meltfptr[963])))); ((meltobject_ptr_t) ( /*_.VALDATA___V964*/ meltfptr[963]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V966*/ meltfptr[965]); /*putupl#536 */ melt_assertmsg ("putupl #536 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V967*/ meltfptr[966])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #536 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V967*/ meltfptr[966])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V967*/ meltfptr[966]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#537 */ melt_assertmsg ("putupl #537 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V967*/ meltfptr[966])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #537 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V967*/ meltfptr[966])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V967*/ meltfptr[966]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V949*/ meltfptr[948]); /*putupl#538 */ melt_assertmsg ("putupl #538 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V967*/ meltfptr[966])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #538 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V967*/ meltfptr[966])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V967*/ meltfptr[966]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V951*/ meltfptr[950]); /*putupl#539 */ melt_assertmsg ("putupl #539 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V967*/ meltfptr[966])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #539 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V967*/ meltfptr[966])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V967*/ meltfptr[966]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V953*/ meltfptr[952]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V967*/ meltfptr[966]); MELT_LOCATION ("warmelt-genobj.melt:505:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V964*/ meltfptr[963])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V964*/ meltfptr[963])))); ((meltobject_ptr_t) ( /*_.VALDATA___V964*/ meltfptr[963]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V967*/ meltfptr[966]); MELT_LOCATION ("warmelt-genobj.melt:505:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V964*/ meltfptr[963]); MELT_LOCATION ("warmelt-genobj.melt:505:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V964*/ meltfptr[963], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V968*/ meltfptr[967]); melt_dbgtrace_written_object ( /*_.VALDATA___V968*/ meltfptr[967], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:511:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V970*/ meltfptr[969])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V970*/ meltfptr[969])))); ((meltobject_ptr_t) ( /*_.VALDATA___V970*/ meltfptr[969]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V971*/ meltfptr[970]); MELT_LOCATION ("warmelt-genobj.melt:511:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V970*/ meltfptr[969])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V970*/ meltfptr[969])))); ((meltobject_ptr_t) ( /*_.VALDATA___V970*/ meltfptr[969]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#540 */ melt_assertmsg ("putupl #540 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V972*/ meltfptr[971])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #540 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V972*/ meltfptr[971])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V972*/ meltfptr[971]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#541 */ melt_assertmsg ("putupl #541 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V972*/ meltfptr[971])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #541 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V972*/ meltfptr[971])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V972*/ meltfptr[971]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#542 */ melt_assertmsg ("putupl #542 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V972*/ meltfptr[971])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #542 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V972*/ meltfptr[971])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V972*/ meltfptr[971]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V972*/ meltfptr[971]); MELT_LOCATION ("warmelt-genobj.melt:511:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V970*/ meltfptr[969])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V970*/ meltfptr[969])))); ((meltobject_ptr_t) ( /*_.VALDATA___V970*/ meltfptr[969]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V972*/ meltfptr[971]); MELT_LOCATION ("warmelt-genobj.melt:511:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V973*/ meltfptr[972])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V973*/ meltfptr[972])))); ((meltobject_ptr_t) ( /*_.VALDATA___V973*/ meltfptr[972]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V974*/ meltfptr[973]); MELT_LOCATION ("warmelt-genobj.melt:511:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V973*/ meltfptr[972])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V973*/ meltfptr[972])))); ((meltobject_ptr_t) ( /*_.VALDATA___V973*/ meltfptr[972]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V970*/ meltfptr[969]); MELT_LOCATION ("warmelt-genobj.melt:511:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V973*/ meltfptr[972]); MELT_LOCATION ("warmelt-genobj.melt:511:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V973*/ meltfptr[972], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:511:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V975*/ meltfptr[974])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V975*/ meltfptr[974])))); ((meltobject_ptr_t) ( /*_.VALDATA___V975*/ meltfptr[974]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V976*/ meltfptr[975]); MELT_LOCATION ("warmelt-genobj.melt:511:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V975*/ meltfptr[974])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V975*/ meltfptr[974])))); ((meltobject_ptr_t) ( /*_.VALDATA___V975*/ meltfptr[974]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V970*/ meltfptr[969]); MELT_LOCATION ("warmelt-genobj.melt:511:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V975*/ meltfptr[974]); MELT_LOCATION ("warmelt-genobj.melt:511:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V975*/ meltfptr[974], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:511:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V977*/ meltfptr[976])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V977*/ meltfptr[976])))); ((meltobject_ptr_t) ( /*_.VALDATA___V977*/ meltfptr[976]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V978*/ meltfptr[977]); MELT_LOCATION ("warmelt-genobj.melt:511:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V977*/ meltfptr[976])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V977*/ meltfptr[976])))); ((meltobject_ptr_t) ( /*_.VALDATA___V977*/ meltfptr[976]))->obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V970*/ meltfptr[969]); MELT_LOCATION ("warmelt-genobj.melt:511:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V977*/ meltfptr[976]); MELT_LOCATION ("warmelt-genobj.melt:511:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V977*/ meltfptr[976], "new static instance"); /*putupl#543 */ melt_assertmsg ("putupl #543 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V979*/ meltfptr[978])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #543 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V979*/ meltfptr[978])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V979*/ meltfptr[978]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#544 */ melt_assertmsg ("putupl #544 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V979*/ meltfptr[978])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #544 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V979*/ meltfptr[978])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V979*/ meltfptr[978]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V973*/ meltfptr[972]); /*putupl#545 */ melt_assertmsg ("putupl #545 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V979*/ meltfptr[978])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #545 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V979*/ meltfptr[978])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V979*/ meltfptr[978]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V975*/ meltfptr[974]); /*putupl#546 */ melt_assertmsg ("putupl #546 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V979*/ meltfptr[978])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #546 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V979*/ meltfptr[978])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V979*/ meltfptr[978]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V977*/ meltfptr[976]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V979*/ meltfptr[978]); MELT_LOCATION ("warmelt-genobj.melt:511:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V970*/ meltfptr[969])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V970*/ meltfptr[969])))); ((meltobject_ptr_t) ( /*_.VALDATA___V970*/ meltfptr[969]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V979*/ meltfptr[978]); MELT_LOCATION ("warmelt-genobj.melt:511:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V970*/ meltfptr[969]); MELT_LOCATION ("warmelt-genobj.melt:511:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V970*/ meltfptr[969], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V980*/ meltfptr[979])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V980*/ meltfptr[979])))); ((meltobject_ptr_t) ( /*_.VALDATA___V980*/ meltfptr[979]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V981*/ meltfptr[980]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V980*/ meltfptr[979]); melt_dbgtrace_written_object ( /*_.VALDATA___V980*/ meltfptr[979], "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"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V984*/ meltfptr[983]); melt_dbgtrace_written_object ( /*_.VALDATA___V984*/ meltfptr[983], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V986*/ meltfptr[985])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V986*/ meltfptr[985])))); ((meltobject_ptr_t) ( /*_.VALDATA___V986*/ meltfptr[985]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V987*/ meltfptr[986]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V986*/ meltfptr[985]); melt_dbgtrace_written_object ( /*_.VALDATA___V986*/ meltfptr[985], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:519:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V988*/ meltfptr[987])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V988*/ meltfptr[987])))); ((meltobject_ptr_t) ( /*_.VALDATA___V988*/ meltfptr[987]))->obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V989*/ meltfptr[988]); MELT_LOCATION ("warmelt-genobj.melt:519:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V988*/ meltfptr[987])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V988*/ meltfptr[987])))); ((meltobject_ptr_t) ( /*_.VALDATA___V988*/ meltfptr[987]))->obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V970*/ meltfptr[969]); /*putupl#547 */ melt_assertmsg ("putupl #547 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V990*/ meltfptr[989])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #547 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V990*/ meltfptr[989])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V990*/ meltfptr[989]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#548 */ melt_assertmsg ("putupl #548 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V990*/ meltfptr[989])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #548 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V990*/ meltfptr[989])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V990*/ meltfptr[989]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#549 */ melt_assertmsg ("putupl #549 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V990*/ meltfptr[989])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #549 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V990*/ meltfptr[989])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V990*/ meltfptr[989]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); /*putupl#550 */ melt_assertmsg ("putupl #550 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V990*/ meltfptr[989])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #550 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V990*/ meltfptr[989])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V990*/ meltfptr[989]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V970*/ meltfptr[969]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V990*/ meltfptr[989]); MELT_LOCATION ("warmelt-genobj.melt:519:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V988*/ meltfptr[987])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V988*/ meltfptr[987])))); ((meltobject_ptr_t) ( /*_.VALDATA___V988*/ meltfptr[987]))->obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V990*/ meltfptr[989]); /*putupl#551 */ melt_assertmsg ("putupl #551 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V991*/ meltfptr[990])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #551 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V991*/ meltfptr[990])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V991*/ meltfptr[990]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V403*/ meltfptr[402]); /*putupl#552 */ melt_assertmsg ("putupl #552 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V991*/ meltfptr[990])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #552 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V991*/ meltfptr[990])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V991*/ meltfptr[990]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V973*/ meltfptr[972]); /*putupl#553 */ melt_assertmsg ("putupl #553 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V991*/ meltfptr[990])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #553 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V991*/ meltfptr[990])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V991*/ meltfptr[990]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V975*/ meltfptr[974]); /*putupl#554 */ melt_assertmsg ("putupl #554 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V991*/ meltfptr[990])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #554 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V991*/ meltfptr[990])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V991*/ meltfptr[990]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V977*/ meltfptr[976]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V991*/ meltfptr[990]); MELT_LOCATION ("warmelt-genobj.melt:519:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V988*/ meltfptr[987])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V988*/ meltfptr[987])))); ((meltobject_ptr_t) ( /*_.VALDATA___V988*/ meltfptr[987]))->obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V991*/ meltfptr[990]); MELT_LOCATION ("warmelt-genobj.melt:519:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V988*/ meltfptr[987]); MELT_LOCATION ("warmelt-genobj.melt:519:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V988*/ meltfptr[987], "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-genobj.melt:525:/ 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-genobj.melt:525:/ 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___V400*/ meltfptr[399]); /*putupl#555 */ melt_assertmsg ("putupl #555 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V996*/ meltfptr[995])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #555 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) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#556 */ melt_assertmsg ("putupl #556 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V996*/ meltfptr[995])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #556 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) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#557 */ melt_assertmsg ("putupl #557 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V996*/ meltfptr[995])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #557 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___V400*/ meltfptr[399]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V996*/ meltfptr[995]); MELT_LOCATION ("warmelt-genobj.melt:525:/ 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-genobj.melt:525:/ 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-genobj.melt:525:/ 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-genobj.melt:525:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V997*/ meltfptr[996]); MELT_LOCATION ("warmelt-genobj.melt:525:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V997*/ meltfptr[996], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:525:/ 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-genobj.melt:525:/ 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-genobj.melt:525:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V999*/ meltfptr[998]); MELT_LOCATION ("warmelt-genobj.melt:525:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V999*/ meltfptr[998], "new static instance"); /*putupl#558 */ melt_assertmsg ("putupl #558 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1001*/ meltfptr[1000])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #558 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___V403*/ meltfptr[402]); /*putupl#559 */ melt_assertmsg ("putupl #559 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1001*/ meltfptr[1000])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #559 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___V997*/ meltfptr[996]); /*putupl#560 */ melt_assertmsg ("putupl #560 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1001*/ meltfptr[1000])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #560 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___V999*/ meltfptr[998]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1001*/ meltfptr[1000]); MELT_LOCATION ("warmelt-genobj.melt:525:/ 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-genobj.melt:525:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V994*/ meltfptr[993]); MELT_LOCATION ("warmelt-genobj.melt:525:/ 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-genobj.melt:532:/ 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-genobj.melt:532:/ 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___V400*/ meltfptr[399]); /*putupl#561 */ melt_assertmsg ("putupl #561 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1010*/ meltfptr[1009])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #561 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) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), 5))), (0)))); /*putupl#562 */ melt_assertmsg ("putupl #562 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1010*/ meltfptr[1009])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #562 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) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]); /*putupl#563 */ melt_assertmsg ("putupl #563 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1010*/ meltfptr[1009])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #563 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___V400*/ meltfptr[399]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1010*/ meltfptr[1009]); MELT_LOCATION ("warmelt-genobj.melt:532:/ 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-genobj.melt:532:/ 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-genobj.melt:532:/ 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-genobj.melt:532:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1011*/ meltfptr[1010]); MELT_LOCATION ("warmelt-genobj.melt:532:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1011*/ meltfptr[1010], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:532:/ 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-genobj.melt:532:/ 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-genobj.melt:532:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1013*/ meltfptr[1012]); MELT_LOCATION ("warmelt-genobj.melt:532:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1013*/ meltfptr[1012], "new static instance"); /*putupl#564 */ melt_assertmsg ("putupl #564 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1015*/ meltfptr[1014])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #564 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___V403*/ meltfptr[402]); /*putupl#565 */ melt_assertmsg ("putupl #565 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1015*/ meltfptr[1014])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #565 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#566 */ melt_assertmsg ("putupl #566 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1015*/ meltfptr[1014])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #566 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-genobj.melt:532:/ 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-genobj.melt:532:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1008*/ meltfptr[1007]); MELT_LOCATION ("warmelt-genobj.melt:532:/ 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]); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_15 */ void meltmod__warmelt_genobj__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___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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1020*/ meltfptr[1019]); melt_dbgtrace_written_object ( /*_.VALDATA___V1020*/ meltfptr[1019], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1022*/ meltfptr[1021]); melt_dbgtrace_written_object ( /*_.VALDATA___V1022*/ meltfptr[1021], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:540:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1024*/ meltfptr[1023])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1024*/ meltfptr[1023])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1024*/ meltfptr[1023]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1025*/ meltfptr[1024]); MELT_LOCATION ("warmelt-genobj.melt:540:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1024*/ meltfptr[1023])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1024*/ meltfptr[1023])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1024*/ meltfptr[1023]))-> obj_vartab[4] = (melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]); /*putupl#567 */ melt_assertmsg ("putupl #567 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1026*/ meltfptr[1025])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #567 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1026*/ meltfptr[1025])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1026*/ meltfptr[1025]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]), 5))), (0)))); /*putupl#568 */ melt_assertmsg ("putupl #568 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1026*/ meltfptr[1025])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #568 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1026*/ meltfptr[1025])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1026*/ meltfptr[1025]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]), 5))), (1)))); /*putupl#569 */ melt_assertmsg ("putupl #569 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1026*/ meltfptr[1025])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #569 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1026*/ meltfptr[1025])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1026*/ meltfptr[1025]))->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1026*/ meltfptr[1025]); MELT_LOCATION ("warmelt-genobj.melt:540:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1024*/ meltfptr[1023])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1024*/ meltfptr[1023])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1024*/ meltfptr[1023]))-> obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1026*/ meltfptr[1025]); MELT_LOCATION ("warmelt-genobj.melt:540:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1027*/ meltfptr[1026])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1027*/ meltfptr[1026])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1027*/ meltfptr[1026]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1028*/ meltfptr[1027]); MELT_LOCATION ("warmelt-genobj.melt:540:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1027*/ meltfptr[1026])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1027*/ meltfptr[1026])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1027*/ meltfptr[1026]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1024*/ meltfptr[1023]); MELT_LOCATION ("warmelt-genobj.melt:540:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1027*/ meltfptr[1026]); MELT_LOCATION ("warmelt-genobj.melt:540:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1027*/ meltfptr[1026], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:540:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1029*/ meltfptr[1028])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1029*/ meltfptr[1028])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1029*/ meltfptr[1028]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1030*/ meltfptr[1029]); MELT_LOCATION ("warmelt-genobj.melt:540:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1029*/ meltfptr[1028])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1029*/ meltfptr[1028])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1029*/ meltfptr[1028]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1024*/ meltfptr[1023]); MELT_LOCATION ("warmelt-genobj.melt:540:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1029*/ meltfptr[1028]); MELT_LOCATION ("warmelt-genobj.melt:540:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1029*/ meltfptr[1028], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:540:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1031*/ meltfptr[1030])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1031*/ meltfptr[1030])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1031*/ meltfptr[1030]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1032*/ meltfptr[1031]); MELT_LOCATION ("warmelt-genobj.melt:540:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1031*/ meltfptr[1030])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1031*/ meltfptr[1030])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1031*/ meltfptr[1030]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1024*/ meltfptr[1023]); MELT_LOCATION ("warmelt-genobj.melt:540:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1031*/ meltfptr[1030]); MELT_LOCATION ("warmelt-genobj.melt:540:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1031*/ meltfptr[1030], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:540:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1033*/ meltfptr[1032])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1033*/ meltfptr[1032])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1033*/ meltfptr[1032]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1034*/ meltfptr[1033]); MELT_LOCATION ("warmelt-genobj.melt:540:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1033*/ meltfptr[1032])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1033*/ meltfptr[1032])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1033*/ meltfptr[1032]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1024*/ meltfptr[1023]); MELT_LOCATION ("warmelt-genobj.melt:540:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1033*/ meltfptr[1032]); MELT_LOCATION ("warmelt-genobj.melt:540:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1033*/ meltfptr[1032], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:540:/ 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-genobj.melt:540:/ 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___V1024*/ meltfptr[1023]); MELT_LOCATION ("warmelt-genobj.melt:540:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1035*/ meltfptr[1034]); MELT_LOCATION ("warmelt-genobj.melt:540:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1035*/ meltfptr[1034], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:540:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1037*/ meltfptr[1036])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1037*/ meltfptr[1036])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1037*/ meltfptr[1036]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1038*/ meltfptr[1037]); MELT_LOCATION ("warmelt-genobj.melt:540:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1037*/ meltfptr[1036])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1037*/ meltfptr[1036])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1037*/ meltfptr[1036]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1024*/ meltfptr[1023]); MELT_LOCATION ("warmelt-genobj.melt:540:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1037*/ meltfptr[1036]); MELT_LOCATION ("warmelt-genobj.melt:540:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1037*/ meltfptr[1036], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:540:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1039*/ meltfptr[1038])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1039*/ meltfptr[1038])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1039*/ meltfptr[1038]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1040*/ meltfptr[1039]); MELT_LOCATION ("warmelt-genobj.melt:540:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1039*/ meltfptr[1038])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1039*/ meltfptr[1038])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1039*/ meltfptr[1038]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1024*/ meltfptr[1023]); MELT_LOCATION ("warmelt-genobj.melt:540:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1039*/ meltfptr[1038]); MELT_LOCATION ("warmelt-genobj.melt:540:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1039*/ meltfptr[1038], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:540:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1041*/ meltfptr[1040])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1041*/ meltfptr[1040])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1041*/ meltfptr[1040]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1042*/ meltfptr[1041]); MELT_LOCATION ("warmelt-genobj.melt:540:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1041*/ meltfptr[1040])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1041*/ meltfptr[1040])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1041*/ meltfptr[1040]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1024*/ meltfptr[1023]); MELT_LOCATION ("warmelt-genobj.melt:540:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1041*/ meltfptr[1040]); MELT_LOCATION ("warmelt-genobj.melt:540:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1041*/ meltfptr[1040], "new static instance"); /*putupl#570 */ melt_assertmsg ("putupl #570 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1043*/ meltfptr[1042])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #570 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1043*/ meltfptr[1042])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1043*/ meltfptr[1042]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]), 6))), (0)))); /*putupl#571 */ melt_assertmsg ("putupl #571 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1043*/ meltfptr[1042])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #571 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1043*/ meltfptr[1042])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1043*/ meltfptr[1042]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]), 6))), (1)))); /*putupl#572 */ melt_assertmsg ("putupl #572 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1043*/ meltfptr[1042])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #572 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1043*/ meltfptr[1042])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1043*/ meltfptr[1042]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1027*/ meltfptr[1026]); /*putupl#573 */ melt_assertmsg ("putupl #573 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1043*/ meltfptr[1042])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #573 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1043*/ meltfptr[1042])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1043*/ meltfptr[1042]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1029*/ meltfptr[1028]); /*putupl#574 */ melt_assertmsg ("putupl #574 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1043*/ meltfptr[1042])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #574 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1043*/ meltfptr[1042])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1043*/ meltfptr[1042]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V1031*/ meltfptr[1030]); /*putupl#575 */ melt_assertmsg ("putupl #575 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1043*/ meltfptr[1042])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #575 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1043*/ meltfptr[1042])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1043*/ meltfptr[1042]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1033*/ meltfptr[1032]); /*putupl#576 */ melt_assertmsg ("putupl #576 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1043*/ meltfptr[1042])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #576 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1043*/ meltfptr[1042])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1043*/ meltfptr[1042]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1035*/ meltfptr[1034]); /*putupl#577 */ melt_assertmsg ("putupl #577 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1043*/ meltfptr[1042])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #577 checkoff", (7 >= 0 && 7 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1043*/ meltfptr[1042])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1043*/ meltfptr[1042]))->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V1037*/ meltfptr[1036]); /*putupl#578 */ melt_assertmsg ("putupl #578 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1043*/ meltfptr[1042])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #578 checkoff", (8 >= 0 && 8 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1043*/ meltfptr[1042])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1043*/ meltfptr[1042]))->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V1039*/ meltfptr[1038]); /*putupl#579 */ melt_assertmsg ("putupl #579 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1043*/ meltfptr[1042])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #579 checkoff", (9 >= 0 && 9 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1043*/ meltfptr[1042])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1043*/ meltfptr[1042]))->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V1041*/ meltfptr[1040]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1043*/ meltfptr[1042]); MELT_LOCATION ("warmelt-genobj.melt:540:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1024*/ meltfptr[1023])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1024*/ meltfptr[1023])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1024*/ meltfptr[1023]))-> obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1043*/ meltfptr[1042]); MELT_LOCATION ("warmelt-genobj.melt:540:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1024*/ meltfptr[1023]); MELT_LOCATION ("warmelt-genobj.melt:540:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1024*/ meltfptr[1023], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1044*/ meltfptr[1043])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1044*/ meltfptr[1043])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1044*/ meltfptr[1043]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1045*/ meltfptr[1044]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1044*/ meltfptr[1043]); melt_dbgtrace_written_object ( /*_.VALDATA___V1044*/ meltfptr[1043], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1046*/ meltfptr[1045])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1046*/ meltfptr[1045])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1046*/ meltfptr[1045]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1047*/ meltfptr[1046]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1046*/ meltfptr[1045]); melt_dbgtrace_written_object ( /*_.VALDATA___V1046*/ meltfptr[1045], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1048*/ meltfptr[1047])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1048*/ meltfptr[1047])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1048*/ meltfptr[1047]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1049*/ meltfptr[1048]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1048*/ meltfptr[1047]); melt_dbgtrace_written_object ( /*_.VALDATA___V1048*/ meltfptr[1047], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1050*/ meltfptr[1049])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1050*/ meltfptr[1049])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1050*/ meltfptr[1049]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1051*/ meltfptr[1050]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1050*/ meltfptr[1049]); melt_dbgtrace_written_object ( /*_.VALDATA___V1050*/ meltfptr[1049], "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"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1060*/ meltfptr[1059]); melt_dbgtrace_written_object ( /*_.VALDATA___V1060*/ meltfptr[1059], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:556:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1062*/ meltfptr[1061])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1062*/ meltfptr[1061])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1062*/ meltfptr[1061]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1063*/ meltfptr[1062]); MELT_LOCATION ("warmelt-genobj.melt:556:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1062*/ meltfptr[1061])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1062*/ meltfptr[1061])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1062*/ meltfptr[1061]))-> obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V1024*/ meltfptr[1023]); /*putupl#580 */ melt_assertmsg ("putupl #580 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1064*/ meltfptr[1063])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #580 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1064*/ meltfptr[1063])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1064*/ meltfptr[1063]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]), 5))), (0)))); /*putupl#581 */ melt_assertmsg ("putupl #581 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1064*/ meltfptr[1063])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #581 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1064*/ meltfptr[1063])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1064*/ meltfptr[1063]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]), 5))), (1)))); /*putupl#582 */ melt_assertmsg ("putupl #582 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1064*/ meltfptr[1063])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #582 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1064*/ meltfptr[1063])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1064*/ meltfptr[1063]))->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]); /*putupl#583 */ melt_assertmsg ("putupl #583 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1064*/ meltfptr[1063])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #583 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1064*/ meltfptr[1063])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1064*/ meltfptr[1063]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1024*/ meltfptr[1023]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1064*/ meltfptr[1063]); MELT_LOCATION ("warmelt-genobj.melt:556:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1062*/ meltfptr[1061])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1062*/ meltfptr[1061])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1062*/ meltfptr[1061]))-> obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1064*/ meltfptr[1063]); MELT_LOCATION ("warmelt-genobj.melt:556:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1065*/ meltfptr[1064])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1065*/ meltfptr[1064])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1065*/ meltfptr[1064]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1066*/ meltfptr[1065]); MELT_LOCATION ("warmelt-genobj.melt:556:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1065*/ meltfptr[1064])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1065*/ meltfptr[1064])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1065*/ meltfptr[1064]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1062*/ meltfptr[1061]); MELT_LOCATION ("warmelt-genobj.melt:556:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1065*/ meltfptr[1064]); MELT_LOCATION ("warmelt-genobj.melt:556:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1065*/ meltfptr[1064], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:556:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1067*/ meltfptr[1066])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1067*/ meltfptr[1066])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1067*/ meltfptr[1066]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1068*/ meltfptr[1067]); MELT_LOCATION ("warmelt-genobj.melt:556:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1067*/ meltfptr[1066])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1067*/ meltfptr[1066])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1067*/ meltfptr[1066]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1062*/ meltfptr[1061]); MELT_LOCATION ("warmelt-genobj.melt:556:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1067*/ meltfptr[1066]); MELT_LOCATION ("warmelt-genobj.melt:556:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1067*/ meltfptr[1066], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:556:/ 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-genobj.melt:556:/ 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___V1062*/ meltfptr[1061]); MELT_LOCATION ("warmelt-genobj.melt:556:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1069*/ meltfptr[1068]); MELT_LOCATION ("warmelt-genobj.melt:556:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1069*/ meltfptr[1068], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:556:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1071*/ meltfptr[1070])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1071*/ meltfptr[1070])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1071*/ meltfptr[1070]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1072*/ meltfptr[1071]); MELT_LOCATION ("warmelt-genobj.melt:556:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1071*/ meltfptr[1070])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1071*/ meltfptr[1070])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1071*/ meltfptr[1070]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1062*/ meltfptr[1061]); MELT_LOCATION ("warmelt-genobj.melt:556:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1071*/ meltfptr[1070]); MELT_LOCATION ("warmelt-genobj.melt:556:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1071*/ meltfptr[1070], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:556:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1073*/ meltfptr[1072])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1073*/ meltfptr[1072])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1073*/ meltfptr[1072]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1074*/ meltfptr[1073]); MELT_LOCATION ("warmelt-genobj.melt:556:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1073*/ meltfptr[1072])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1073*/ meltfptr[1072])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1073*/ meltfptr[1072]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1062*/ meltfptr[1061]); MELT_LOCATION ("warmelt-genobj.melt:556:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1073*/ meltfptr[1072]); MELT_LOCATION ("warmelt-genobj.melt:556:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1073*/ meltfptr[1072], "new static instance"); /*putupl#584 */ melt_assertmsg ("putupl #584 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #584 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]), 6))), (0)))); /*putupl#585 */ melt_assertmsg ("putupl #585 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #585 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]), 6))), (1)))); /*putupl#586 */ melt_assertmsg ("putupl #586 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #586 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1027*/ meltfptr[1026]); /*putupl#587 */ melt_assertmsg ("putupl #587 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #587 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1029*/ meltfptr[1028]); /*putupl#588 */ melt_assertmsg ("putupl #588 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #588 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V1031*/ meltfptr[1030]); /*putupl#589 */ melt_assertmsg ("putupl #589 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #589 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1033*/ meltfptr[1032]); /*putupl#590 */ melt_assertmsg ("putupl #590 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #590 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1035*/ meltfptr[1034]); /*putupl#591 */ melt_assertmsg ("putupl #591 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #591 checkoff", (7 >= 0 && 7 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074]))->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V1037*/ meltfptr[1036]); /*putupl#592 */ melt_assertmsg ("putupl #592 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #592 checkoff", (8 >= 0 && 8 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074]))->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V1039*/ meltfptr[1038]); /*putupl#593 */ melt_assertmsg ("putupl #593 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #593 checkoff", (9 >= 0 && 9 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074]))->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V1041*/ meltfptr[1040]); /*putupl#594 */ melt_assertmsg ("putupl #594 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #594 checkoff", (10 >= 0 && 10 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074]))->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V1065*/ meltfptr[1064]); /*putupl#595 */ melt_assertmsg ("putupl #595 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #595 checkoff", (11 >= 0 && 11 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074]))->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V1067*/ meltfptr[1066]); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_16 */ void meltmod__warmelt_genobj__initialmeltchunk_17 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*putupl#596*/ melt_assertmsg ("putupl #596 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #596 checkoff", (12 >= 0 && 12 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074]))->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V1069*/ meltfptr[1068]); /*putupl#597 */ melt_assertmsg ("putupl #597 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #597 checkoff", (13 >= 0 && 13 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074]))->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V1071*/ meltfptr[1070]); /*putupl#598 */ melt_assertmsg ("putupl #598 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #598 checkoff", (14 >= 0 && 14 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074]))->tabval[14] = (melt_ptr_t) ( /*_.VALDATA___V1073*/ meltfptr[1072]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1075*/ meltfptr[1074]); MELT_LOCATION ("warmelt-genobj.melt:556:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1062*/ meltfptr[1061])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1062*/ meltfptr[1061])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1062*/ meltfptr[1061]))-> obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1075*/ meltfptr[1074]); MELT_LOCATION ("warmelt-genobj.melt:556:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1062*/ meltfptr[1061]); MELT_LOCATION ("warmelt-genobj.melt:556:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1062*/ meltfptr[1061], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1076*/ meltfptr[1075]); melt_dbgtrace_written_object ( /*_.VALDATA___V1076*/ meltfptr[1075], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1078*/ meltfptr[1077])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1078*/ meltfptr[1077])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1078*/ meltfptr[1077]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1079*/ meltfptr[1078]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1078*/ meltfptr[1077]); melt_dbgtrace_written_object ( /*_.VALDATA___V1078*/ meltfptr[1077], "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"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1082*/ meltfptr[1081]); melt_dbgtrace_written_object ( /*_.VALDATA___V1082*/ meltfptr[1081], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1084*/ meltfptr[1083])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1084*/ meltfptr[1083])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1084*/ meltfptr[1083]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1085*/ meltfptr[1084]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1084*/ meltfptr[1083]); melt_dbgtrace_written_object ( /*_.VALDATA___V1084*/ meltfptr[1083], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1086*/ meltfptr[1085])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1086*/ meltfptr[1085])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1086*/ meltfptr[1085]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1087*/ meltfptr[1086]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1086*/ meltfptr[1085]); melt_dbgtrace_written_object ( /*_.VALDATA___V1086*/ meltfptr[1085], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:566:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1088*/ meltfptr[1087])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1088*/ meltfptr[1087])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1088*/ meltfptr[1087]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1089*/ meltfptr[1088]); MELT_LOCATION ("warmelt-genobj.melt:566:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1088*/ meltfptr[1087])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1088*/ meltfptr[1087])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1088*/ meltfptr[1087]))-> obj_vartab[4] = (melt_ptr_t) ( /*_.VALDATA___V1024*/ meltfptr[1023]); /*putupl#599 */ melt_assertmsg ("putupl #599 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1090*/ meltfptr[1089])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #599 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1090*/ meltfptr[1089])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1090*/ meltfptr[1089]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]), 5))), (0)))); /*putupl#600 */ melt_assertmsg ("putupl #600 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1090*/ meltfptr[1089])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #600 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1090*/ meltfptr[1089])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1090*/ meltfptr[1089]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]), 5))), (1)))); /*putupl#601 */ melt_assertmsg ("putupl #601 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1090*/ meltfptr[1089])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #601 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1090*/ meltfptr[1089])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1090*/ meltfptr[1089]))->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]); /*putupl#602 */ melt_assertmsg ("putupl #602 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1090*/ meltfptr[1089])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #602 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1090*/ meltfptr[1089])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1090*/ meltfptr[1089]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1024*/ meltfptr[1023]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1090*/ meltfptr[1089]); MELT_LOCATION ("warmelt-genobj.melt:566:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1088*/ meltfptr[1087])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1088*/ meltfptr[1087])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1088*/ meltfptr[1087]))-> obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1090*/ meltfptr[1089]); MELT_LOCATION ("warmelt-genobj.melt:566:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1091*/ meltfptr[1090])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1091*/ meltfptr[1090])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1091*/ meltfptr[1090]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1092*/ meltfptr[1091]); MELT_LOCATION ("warmelt-genobj.melt:566:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1091*/ meltfptr[1090])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1091*/ meltfptr[1090])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1091*/ meltfptr[1090]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1088*/ meltfptr[1087]); MELT_LOCATION ("warmelt-genobj.melt:566:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1091*/ meltfptr[1090]); MELT_LOCATION ("warmelt-genobj.melt:566:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1091*/ meltfptr[1090], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:566:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1093*/ meltfptr[1092])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1093*/ meltfptr[1092])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1093*/ meltfptr[1092]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1094*/ meltfptr[1093]); MELT_LOCATION ("warmelt-genobj.melt:566:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1093*/ meltfptr[1092])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1093*/ meltfptr[1092])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1093*/ meltfptr[1092]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1088*/ meltfptr[1087]); MELT_LOCATION ("warmelt-genobj.melt:566:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1093*/ meltfptr[1092]); MELT_LOCATION ("warmelt-genobj.melt:566:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1093*/ meltfptr[1092], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:566:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1095*/ meltfptr[1094])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1095*/ meltfptr[1094])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1095*/ meltfptr[1094]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1096*/ meltfptr[1095]); MELT_LOCATION ("warmelt-genobj.melt:566:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1095*/ meltfptr[1094])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1095*/ meltfptr[1094])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1095*/ meltfptr[1094]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1088*/ meltfptr[1087]); MELT_LOCATION ("warmelt-genobj.melt:566:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1095*/ meltfptr[1094]); MELT_LOCATION ("warmelt-genobj.melt:566:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1095*/ meltfptr[1094], "new static instance"); /*putupl#603 */ melt_assertmsg ("putupl #603 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #603 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]), 6))), (0)))); /*putupl#604 */ melt_assertmsg ("putupl #604 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #604 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096]))->tabval[1] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]), 6))), (1)))); /*putupl#605 */ melt_assertmsg ("putupl #605 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #605 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1027*/ meltfptr[1026]); /*putupl#606 */ melt_assertmsg ("putupl #606 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #606 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1029*/ meltfptr[1028]); /*putupl#607 */ melt_assertmsg ("putupl #607 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #607 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V1031*/ meltfptr[1030]); /*putupl#608 */ melt_assertmsg ("putupl #608 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #608 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1033*/ meltfptr[1032]); /*putupl#609 */ melt_assertmsg ("putupl #609 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #609 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1035*/ meltfptr[1034]); /*putupl#610 */ melt_assertmsg ("putupl #610 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #610 checkoff", (7 >= 0 && 7 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096]))->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V1037*/ meltfptr[1036]); /*putupl#611 */ melt_assertmsg ("putupl #611 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #611 checkoff", (8 >= 0 && 8 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096]))->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V1039*/ meltfptr[1038]); /*putupl#612 */ melt_assertmsg ("putupl #612 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #612 checkoff", (9 >= 0 && 9 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096]))->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V1041*/ meltfptr[1040]); /*putupl#613 */ melt_assertmsg ("putupl #613 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #613 checkoff", (10 >= 0 && 10 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096]))->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V1091*/ meltfptr[1090]); /*putupl#614 */ melt_assertmsg ("putupl #614 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #614 checkoff", (11 >= 0 && 11 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096]))->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V1093*/ meltfptr[1092]); /*putupl#615 */ melt_assertmsg ("putupl #615 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #615 checkoff", (12 >= 0 && 12 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096]))->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V1095*/ meltfptr[1094]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1097*/ meltfptr[1096]); MELT_LOCATION ("warmelt-genobj.melt:566:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1088*/ meltfptr[1087])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1088*/ meltfptr[1087])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1088*/ meltfptr[1087]))-> obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1097*/ meltfptr[1096]); MELT_LOCATION ("warmelt-genobj.melt:566:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1088*/ meltfptr[1087]); MELT_LOCATION ("warmelt-genobj.melt:566:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1088*/ meltfptr[1087], "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"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1100*/ meltfptr[1099]); melt_dbgtrace_written_object ( /*_.VALDATA___V1100*/ meltfptr[1099], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1102*/ meltfptr[1101])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1102*/ meltfptr[1101])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1102*/ meltfptr[1101]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1103*/ meltfptr[1102]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1102*/ meltfptr[1101]); melt_dbgtrace_written_object ( /*_.VALDATA___V1102*/ meltfptr[1101], "new static instance"); /*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-genobj.melt:575:/ 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-genobj.melt:575:/ 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___V1088*/ meltfptr[1087]); /*putupl#616 */ melt_assertmsg ("putupl #616 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1108*/ meltfptr[1107])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #616 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) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]), 5))), (0)))); /*putupl#617 */ melt_assertmsg ("putupl #617 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1108*/ meltfptr[1107])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #617 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) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]), 5))), (1)))); /*putupl#618 */ melt_assertmsg ("putupl #618 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1108*/ meltfptr[1107])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #618 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) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]); /*putupl#619 */ melt_assertmsg ("putupl #619 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1108*/ meltfptr[1107])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #619 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___V1024*/ meltfptr[1023]); /*putupl#620 */ melt_assertmsg ("putupl #620 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1108*/ meltfptr[1107])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #620 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1108*/ meltfptr[1107])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1108*/ meltfptr[1107]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V1088*/ meltfptr[1087]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1108*/ meltfptr[1107]); MELT_LOCATION ("warmelt-genobj.melt:575:/ 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-genobj.melt:575:/ 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-genobj.melt:575:/ 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-genobj.melt:575:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1109*/ meltfptr[1108]); MELT_LOCATION ("warmelt-genobj.melt:575:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1109*/ meltfptr[1108], "new static instance"); /*putupl#621 */ melt_assertmsg ("putupl #621 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #621 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) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]), 6))), (0)))); /*putupl#622 */ melt_assertmsg ("putupl #622 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #622 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) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]), 6))), (1)))); /*putupl#623 */ melt_assertmsg ("putupl #623 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #623 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___V1027*/ meltfptr[1026]); /*putupl#624 */ melt_assertmsg ("putupl #624 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #624 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___V1029*/ meltfptr[1028]); /*putupl#625 */ melt_assertmsg ("putupl #625 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #625 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___V1031*/ meltfptr[1030]); /*putupl#626 */ melt_assertmsg ("putupl #626 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #626 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1033*/ meltfptr[1032]); /*putupl#627 */ melt_assertmsg ("putupl #627 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #627 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1035*/ meltfptr[1034]); /*putupl#628 */ melt_assertmsg ("putupl #628 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #628 checkoff", (7 >= 0 && 7 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110]))->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V1037*/ meltfptr[1036]); /*putupl#629 */ melt_assertmsg ("putupl #629 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #629 checkoff", (8 >= 0 && 8 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110]))->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V1039*/ meltfptr[1038]); /*putupl#630 */ melt_assertmsg ("putupl #630 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #630 checkoff", (9 >= 0 && 9 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110]))->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V1041*/ meltfptr[1040]); /*putupl#631 */ melt_assertmsg ("putupl #631 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #631 checkoff", (10 >= 0 && 10 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110]))->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V1091*/ meltfptr[1090]); /*putupl#632 */ melt_assertmsg ("putupl #632 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #632 checkoff", (11 >= 0 && 11 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110]))->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V1093*/ meltfptr[1092]); /*putupl#633 */ melt_assertmsg ("putupl #633 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #633 checkoff", (12 >= 0 && 12 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110]))->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V1095*/ meltfptr[1094]); /*putupl#634 */ melt_assertmsg ("putupl #634 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #634 checkoff", (13 >= 0 && 13 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1111*/ meltfptr[1110]))->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V1109*/ meltfptr[1108]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1111*/ meltfptr[1110]); MELT_LOCATION ("warmelt-genobj.melt:575:/ 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-genobj.melt:575:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1106*/ meltfptr[1105]); MELT_LOCATION ("warmelt-genobj.melt:575:/ 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-genobj.melt:582:/ 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-genobj.melt:582:/ 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___V1088*/ meltfptr[1087]); /*putupl#635 */ melt_assertmsg ("putupl #635 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1118*/ meltfptr[1117])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #635 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) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]), 5))), (0)))); /*putupl#636 */ melt_assertmsg ("putupl #636 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1118*/ meltfptr[1117])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #636 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) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]), 5))), (1)))); /*putupl#637 */ melt_assertmsg ("putupl #637 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1118*/ meltfptr[1117])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #637 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) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]); /*putupl#638 */ melt_assertmsg ("putupl #638 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1118*/ meltfptr[1117])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #638 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___V1024*/ meltfptr[1023]); /*putupl#639 */ melt_assertmsg ("putupl #639 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1118*/ meltfptr[1117])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #639 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1118*/ meltfptr[1117])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1118*/ meltfptr[1117]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V1088*/ meltfptr[1087]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1118*/ meltfptr[1117]); MELT_LOCATION ("warmelt-genobj.melt:582:/ 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-genobj.melt:582:/ 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-genobj.melt:582:/ 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-genobj.melt:582:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1119*/ meltfptr[1118]); MELT_LOCATION ("warmelt-genobj.melt:582:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1119*/ meltfptr[1118], "new static instance"); /*putupl#640 */ melt_assertmsg ("putupl #640 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #640 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) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]), 6))), (0)))); /*putupl#641 */ melt_assertmsg ("putupl #641 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #641 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) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]), 6))), (1)))); /*putupl#642 */ melt_assertmsg ("putupl #642 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #642 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___V1027*/ meltfptr[1026]); /*putupl#643 */ melt_assertmsg ("putupl #643 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #643 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___V1029*/ meltfptr[1028]); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_17 */ void meltmod__warmelt_genobj__initialmeltchunk_18 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*putupl#644*/ melt_assertmsg ("putupl #644 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #644 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___V1031*/ meltfptr[1030]); /*putupl#645 */ melt_assertmsg ("putupl #645 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #645 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1033*/ meltfptr[1032]); /*putupl#646 */ melt_assertmsg ("putupl #646 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #646 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1035*/ meltfptr[1034]); /*putupl#647 */ melt_assertmsg ("putupl #647 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #647 checkoff", (7 >= 0 && 7 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120]))->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V1037*/ meltfptr[1036]); /*putupl#648 */ melt_assertmsg ("putupl #648 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #648 checkoff", (8 >= 0 && 8 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120]))->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V1039*/ meltfptr[1038]); /*putupl#649 */ melt_assertmsg ("putupl #649 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #649 checkoff", (9 >= 0 && 9 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120]))->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V1041*/ meltfptr[1040]); /*putupl#650 */ melt_assertmsg ("putupl #650 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #650 checkoff", (10 >= 0 && 10 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120]))->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V1091*/ meltfptr[1090]); /*putupl#651 */ melt_assertmsg ("putupl #651 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #651 checkoff", (11 >= 0 && 11 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120]))->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V1093*/ meltfptr[1092]); /*putupl#652 */ melt_assertmsg ("putupl #652 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #652 checkoff", (12 >= 0 && 12 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120]))->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V1095*/ meltfptr[1094]); /*putupl#653 */ melt_assertmsg ("putupl #653 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #653 checkoff", (13 >= 0 && 13 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1121*/ meltfptr[1120]))->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V1119*/ meltfptr[1118]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1121*/ meltfptr[1120]); MELT_LOCATION ("warmelt-genobj.melt:582:/ 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-genobj.melt:582:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1116*/ meltfptr[1115]); MELT_LOCATION ("warmelt-genobj.melt:582:/ 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"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1126*/ meltfptr[1125]); melt_dbgtrace_written_object ( /*_.VALDATA___V1126*/ meltfptr[1125], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:674:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_959__MAKE_OBJLOCATEDEXP#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1128*/ meltfptr[1127])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:674:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_959__MAKE_OBJLOCATEDEXP#1", NULL != ( /*_.DISCR_MIXED_INTEGER__V10*/ meltfptr[9])); ((meltroutine_ptr_t) /*_.VALROUT___V1128*/ meltfptr[1127])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_MIXED_INTEGER__V10*/ meltfptr[9]); MELT_LOCATION ("warmelt-genobj.melt:674:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_959__MAKE_OBJLOCATEDEXP#2", NULL != ( /*_.DISCR_MIXED_LOCATION__V11*/ meltfptr[10])); ((meltroutine_ptr_t) /*_.VALROUT___V1128*/ meltfptr[1127])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_MIXED_LOCATION__V11*/ meltfptr[10]); MELT_LOCATION ("warmelt-genobj.melt:674:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_959__MAKE_OBJLOCATEDEXP#3", NULL != ( /*_.CLASS_CTYPE__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1128*/ meltfptr[1127])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-genobj.melt:674:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_959__MAKE_OBJLOCATEDEXP#4", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1128*/ meltfptr[1127])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:674:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_959__MAKE_OBJLOCATEDEXP#5", NULL != ( /*_.DISCR_CONSTANT_INTEGER__V14*/ meltfptr[13])); ((meltroutine_ptr_t) /*_.VALROUT___V1128*/ meltfptr[1127])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_CONSTANT_INTEGER__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-genobj.melt:674:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_959__MAKE_OBJLOCATEDEXP#6", NULL != ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1128*/ meltfptr[1127])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-genobj.melt:674:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_959__MAKE_OBJLOCATEDEXP#7", NULL != ( /*_.LIST_APPEND2LIST__V16*/ meltfptr[15])); ((meltroutine_ptr_t) /*_.VALROUT___V1128*/ meltfptr[1127])->tabval[7] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V16*/ meltfptr[15]); MELT_LOCATION ("warmelt-genobj.melt:674:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V372*/ meltfptr[371]); ((meltroutine_ptr_t) /*_.VALROUT___V1128*/ meltfptr[1127])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V372*/ meltfptr[371]); MELT_LOCATION ("warmelt-genobj.melt:674:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_959__MAKE_OBJLOCATEDEXP#9", NULL != ( /*_.LIST_TO_MULTIPLE__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1128*/ meltfptr[1127])->tabval[9] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-genobj.melt:674:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_959__MAKE_OBJLOCATEDEXP#10", NULL != ( /*_.DISCR_MULTIPLE__V18*/ meltfptr[17])); ((meltroutine_ptr_t) /*_.VALROUT___V1128*/ meltfptr[1127])->tabval[10] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V18*/ meltfptr[17]); MELT_LOCATION ("warmelt-genobj.melt:674:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1128*/ meltfptr[1127]); /*putclosurout#1 */ melt_assertmsg ("putclosrout#1 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1129*/ meltfptr[1128])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#1 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1129*/ meltfptr[1128])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1128*/ meltfptr[1127]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1129*/ meltfptr[1128]); /*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"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1132*/ meltfptr[1131]); melt_dbgtrace_written_object ( /*_.VALDATA___V1132*/ meltfptr[1131], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1134*/ meltfptr[1133])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1134*/ meltfptr[1133])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1134*/ meltfptr[1133]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1135*/ meltfptr[1134]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1134*/ meltfptr[1133]); melt_dbgtrace_written_object ( /*_.VALDATA___V1134*/ meltfptr[1133], "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"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1138*/ meltfptr[1137]); melt_dbgtrace_written_object ( /*_.VALDATA___V1138*/ meltfptr[1137], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1140*/ meltfptr[1139])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1140*/ meltfptr[1139])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1140*/ meltfptr[1139]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1141*/ meltfptr[1140]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1140*/ meltfptr[1139]); melt_dbgtrace_written_object ( /*_.VALDATA___V1140*/ meltfptr[1139], "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"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1144*/ meltfptr[1143]); melt_dbgtrace_written_object ( /*_.VALDATA___V1144*/ meltfptr[1143], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1146*/ meltfptr[1145])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1146*/ meltfptr[1145])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1146*/ meltfptr[1145]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1147*/ meltfptr[1146]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1146*/ meltfptr[1145]); melt_dbgtrace_written_object ( /*_.VALDATA___V1146*/ meltfptr[1145], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1148*/ meltfptr[1147])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1148*/ meltfptr[1147])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1148*/ meltfptr[1147]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1149*/ meltfptr[1148]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1148*/ meltfptr[1147]); melt_dbgtrace_written_object ( /*_.VALDATA___V1148*/ meltfptr[1147], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:720:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1150*/ meltfptr[1149])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_981__MAKE_OBJCOMPUTE#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1150*/ meltfptr[1149])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:720:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1150*/ meltfptr[1149])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_981__MAKE_OBJCOMPUTE#1", NULL != ( /*_.DISCR_MIXED_LOCATION__V11*/ meltfptr[10])); ((meltroutine_ptr_t) /*_.VALROUT___V1150*/ meltfptr[1149])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_MIXED_LOCATION__V11*/ meltfptr[10]); MELT_LOCATION ("warmelt-genobj.melt:720:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1150*/ meltfptr[1149])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_981__MAKE_OBJCOMPUTE#2", NULL != ( /*_.CLASS_CTYPE__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1150*/ meltfptr[1149])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-genobj.melt:720:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1150*/ meltfptr[1149])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_981__MAKE_OBJCOMPUTE#3", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1150*/ meltfptr[1149])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:720:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1150*/ meltfptr[1149])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_981__MAKE_OBJCOMPUTE#4", NULL != ( /*_.DISCR_CONSTANT_INTEGER__V14*/ meltfptr[13])); ((meltroutine_ptr_t) /*_.VALROUT___V1150*/ meltfptr[1149])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_CONSTANT_INTEGER__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-genobj.melt:720:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1150*/ meltfptr[1149])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_981__MAKE_OBJCOMPUTE#5", NULL != ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1150*/ meltfptr[1149])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-genobj.melt:720:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1150*/ meltfptr[1149])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_981__MAKE_OBJCOMPUTE#6", NULL != ( /*_.LIST_APPEND2LIST__V16*/ meltfptr[15])); ((meltroutine_ptr_t) /*_.VALROUT___V1150*/ meltfptr[1149])->tabval[6] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V16*/ meltfptr[15]); MELT_LOCATION ("warmelt-genobj.melt:720:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1150*/ meltfptr[1149])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V436*/ meltfptr[435]); ((meltroutine_ptr_t) /*_.VALROUT___V1150*/ meltfptr[1149])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V436*/ meltfptr[435]); MELT_LOCATION ("warmelt-genobj.melt:720:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1150*/ meltfptr[1149])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_981__MAKE_OBJCOMPUTE#8", NULL != ( /*_.LIST_TO_MULTIPLE__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1150*/ meltfptr[1149])->tabval[8] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-genobj.melt:720:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1150*/ meltfptr[1149])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_981__MAKE_OBJCOMPUTE#9", NULL != ( /*_.DISCR_MULTIPLE__V18*/ meltfptr[17])); ((meltroutine_ptr_t) /*_.VALROUT___V1150*/ meltfptr[1149])->tabval[9] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V18*/ meltfptr[17]); MELT_LOCATION ("warmelt-genobj.melt:720:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1150*/ meltfptr[1149]); /*putclosurout#2 */ melt_assertmsg ("putclosrout#2 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1151*/ meltfptr[1150])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#2 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1150*/ meltfptr[1149])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1151*/ meltfptr[1150])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1150*/ meltfptr[1149]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1151*/ meltfptr[1150]); MELT_LOCATION ("warmelt-genobj.melt:767:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1152*/ meltfptr[1151])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_983__MAKE_OBJEXPANDPUREVAL#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1152*/ meltfptr[1151])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:767:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1152*/ meltfptr[1151])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_983__MAKE_OBJEXPANDPUREVAL#1", NULL != ( /*_.DISCR_MIXED_LOCATION__V11*/ meltfptr[10])); ((meltroutine_ptr_t) /*_.VALROUT___V1152*/ meltfptr[1151])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_MIXED_LOCATION__V11*/ meltfptr[10]); MELT_LOCATION ("warmelt-genobj.melt:767:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1152*/ meltfptr[1151])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_983__MAKE_OBJEXPANDPUREVAL#2", NULL != ( /*_.CLASS_CTYPE__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1152*/ meltfptr[1151])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-genobj.melt:767:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1152*/ meltfptr[1151])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_983__MAKE_OBJEXPANDPUREVAL#3", NULL != ( /*_.CTYPE_VOID__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1152*/ meltfptr[1151])->tabval[3] = (melt_ptr_t) ( /*_.CTYPE_VOID__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-genobj.melt:767:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1152*/ meltfptr[1151])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_983__MAKE_OBJEXPANDPUREVAL#4", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1152*/ meltfptr[1151])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:767:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1152*/ meltfptr[1151])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_983__MAKE_OBJEXPANDPUREVAL#5", NULL != ( /*_.DISCR_CONSTANT_INTEGER__V14*/ meltfptr[13])); ((meltroutine_ptr_t) /*_.VALROUT___V1152*/ meltfptr[1151])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_CONSTANT_INTEGER__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-genobj.melt:767:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1152*/ meltfptr[1151])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_983__MAKE_OBJEXPANDPUREVAL#6", NULL != ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1152*/ meltfptr[1151])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-genobj.melt:767:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1152*/ meltfptr[1151])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_983__MAKE_OBJEXPANDPUREVAL#7", NULL != ( /*_.LIST_APPEND2LIST__V16*/ meltfptr[15])); ((meltroutine_ptr_t) /*_.VALROUT___V1152*/ meltfptr[1151])->tabval[7] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V16*/ meltfptr[15]); MELT_LOCATION ("warmelt-genobj.melt:767:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1152*/ meltfptr[1151])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V248*/ meltfptr[247]); ((meltroutine_ptr_t) /*_.VALROUT___V1152*/ meltfptr[1151])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V248*/ meltfptr[247]); MELT_LOCATION ("warmelt-genobj.melt:767:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1152*/ meltfptr[1151])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_983__MAKE_OBJEXPANDPUREVAL#9", NULL != ( /*_.LIST_TO_MULTIPLE__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1152*/ meltfptr[1151])->tabval[9] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-genobj.melt:767:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1152*/ meltfptr[1151])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_983__MAKE_OBJEXPANDPUREVAL#10", NULL != ( /*_.DISCR_MULTIPLE__V18*/ meltfptr[17])); ((meltroutine_ptr_t) /*_.VALROUT___V1152*/ meltfptr[1151])->tabval[10] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V18*/ meltfptr[17]); MELT_LOCATION ("warmelt-genobj.melt:767:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1152*/ meltfptr[1151]); /*putclosurout#3 */ melt_assertmsg ("putclosrout#3 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1153*/ meltfptr[1152])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#3 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1152*/ meltfptr[1151])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1153*/ meltfptr[1152])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1152*/ meltfptr[1151]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1153*/ meltfptr[1152]); /*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"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1158*/ meltfptr[1157]); melt_dbgtrace_written_object ( /*_.VALDATA___V1158*/ meltfptr[1157], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1160*/ meltfptr[1159])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1160*/ meltfptr[1159])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1160*/ meltfptr[1159]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1161*/ meltfptr[1160]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1160*/ meltfptr[1159]); melt_dbgtrace_written_object ( /*_.VALDATA___V1160*/ meltfptr[1159], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:819:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1162*/ meltfptr[1161])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1162*/ meltfptr[1161])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1162*/ meltfptr[1161]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1160*/ meltfptr[1159]); MELT_LOCATION ("warmelt-genobj.melt:819:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1162*/ meltfptr[1161])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1162*/ meltfptr[1161])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1162*/ meltfptr[1161]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-genobj.melt:819:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1162*/ meltfptr[1161]); MELT_LOCATION ("warmelt-genobj.melt:819:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1162*/ meltfptr[1161], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1163*/ meltfptr[1162]); melt_dbgtrace_written_object ( /*_.VALDATA___V1163*/ meltfptr[1162], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:819:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1165*/ meltfptr[1164])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1165*/ meltfptr[1164])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1165*/ meltfptr[1164]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1163*/ meltfptr[1162]); MELT_LOCATION ("warmelt-genobj.melt:819:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1165*/ meltfptr[1164])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1165*/ meltfptr[1164])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1165*/ meltfptr[1164]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-genobj.melt:819:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1165*/ meltfptr[1164]); MELT_LOCATION ("warmelt-genobj.melt:819:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1165*/ meltfptr[1164], "new static instance"); /*putupl#654 */ melt_assertmsg ("putupl #654 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1166*/ meltfptr[1165])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #654 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1166*/ meltfptr[1165])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1166*/ meltfptr[1165]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V1162*/ meltfptr[1161]); /*putupl#655 */ melt_assertmsg ("putupl #655 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1166*/ meltfptr[1165])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #655 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1166*/ meltfptr[1165])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1166*/ meltfptr[1165]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1165*/ meltfptr[1164]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1166*/ meltfptr[1165]); MELT_LOCATION ("warmelt-genobj.melt:819:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1167*/ meltfptr[1166])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1167*/ meltfptr[1166])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1167*/ meltfptr[1166]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1168*/ meltfptr[1167]); MELT_LOCATION ("warmelt-genobj.melt:819:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1167*/ meltfptr[1166]); MELT_LOCATION ("warmelt-genobj.melt:819:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1167*/ meltfptr[1166], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1169*/ meltfptr[1168])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1169*/ meltfptr[1168])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1169*/ meltfptr[1168]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1170*/ meltfptr[1169]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1169*/ meltfptr[1168]); melt_dbgtrace_written_object ( /*_.VALDATA___V1169*/ meltfptr[1168], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:830:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1171*/ meltfptr[1170])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1171*/ meltfptr[1170])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1171*/ meltfptr[1170]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1172*/ meltfptr[1171]); MELT_LOCATION ("warmelt-genobj.melt:830:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1171*/ meltfptr[1170]); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_18 */ void meltmod__warmelt_genobj__initialmeltchunk_19 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-genobj.melt:830:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1171*/ meltfptr[1170], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1173*/ meltfptr[1172])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1173*/ meltfptr[1172])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1173*/ meltfptr[1172]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1174*/ meltfptr[1173]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1173*/ meltfptr[1172]); melt_dbgtrace_written_object ( /*_.VALDATA___V1173*/ meltfptr[1172], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:841:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1175*/ meltfptr[1174])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1175*/ meltfptr[1174])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1175*/ meltfptr[1174]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1160*/ meltfptr[1159]); MELT_LOCATION ("warmelt-genobj.melt:841:/ 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) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-genobj.melt:841:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1175*/ meltfptr[1174]); MELT_LOCATION ("warmelt-genobj.melt:841:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1175*/ meltfptr[1174], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1176*/ meltfptr[1175])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1176*/ meltfptr[1175])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1176*/ meltfptr[1175]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1177*/ meltfptr[1176]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1176*/ meltfptr[1175]); melt_dbgtrace_written_object ( /*_.VALDATA___V1176*/ meltfptr[1175], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:841:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1178*/ meltfptr[1177])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1178*/ meltfptr[1177])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1178*/ meltfptr[1177]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1176*/ meltfptr[1175]); MELT_LOCATION ("warmelt-genobj.melt:841:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1178*/ meltfptr[1177])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1178*/ meltfptr[1177])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1178*/ meltfptr[1177]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-genobj.melt:841:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1178*/ meltfptr[1177]); MELT_LOCATION ("warmelt-genobj.melt:841:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1178*/ meltfptr[1177], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1179*/ meltfptr[1178])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1179*/ meltfptr[1178])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1179*/ meltfptr[1178]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1180*/ meltfptr[1179]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1179*/ meltfptr[1178]); melt_dbgtrace_written_object ( /*_.VALDATA___V1179*/ meltfptr[1178], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:841:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1181*/ meltfptr[1180])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1181*/ meltfptr[1180])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1181*/ meltfptr[1180]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1179*/ meltfptr[1178]); MELT_LOCATION ("warmelt-genobj.melt:841:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1181*/ meltfptr[1180])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1181*/ meltfptr[1180])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1181*/ meltfptr[1180]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-genobj.melt:841:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1181*/ meltfptr[1180]); MELT_LOCATION ("warmelt-genobj.melt:841:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1181*/ meltfptr[1180], "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"); MELT_LOCATION ("warmelt-genobj.melt:841:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1184*/ meltfptr[1183])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1184*/ meltfptr[1183])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1184*/ meltfptr[1183]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1182*/ meltfptr[1181]); MELT_LOCATION ("warmelt-genobj.melt:841:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1184*/ meltfptr[1183])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1184*/ meltfptr[1183])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1184*/ meltfptr[1183]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_LONG)))); MELT_LOCATION ("warmelt-genobj.melt:841:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1184*/ meltfptr[1183]); MELT_LOCATION ("warmelt-genobj.melt:841:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1184*/ meltfptr[1183], "new static instance"); /*putupl#656 */ melt_assertmsg ("putupl #656 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1185*/ meltfptr[1184])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #656 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1185*/ meltfptr[1184])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1185*/ meltfptr[1184]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V1175*/ meltfptr[1174]); /*putupl#657 */ melt_assertmsg ("putupl #657 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1185*/ meltfptr[1184])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #657 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1185*/ meltfptr[1184])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1185*/ meltfptr[1184]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1178*/ meltfptr[1177]); /*putupl#658 */ melt_assertmsg ("putupl #658 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1185*/ meltfptr[1184])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #658 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1185*/ meltfptr[1184])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1185*/ meltfptr[1184]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1181*/ meltfptr[1180]); /*putupl#659 */ melt_assertmsg ("putupl #659 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1185*/ meltfptr[1184])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #659 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1185*/ meltfptr[1184])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1185*/ meltfptr[1184]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1184*/ meltfptr[1183]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1185*/ meltfptr[1184]); MELT_LOCATION ("warmelt-genobj.melt:841:/ 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-genobj.melt:841:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1186*/ meltfptr[1185]); MELT_LOCATION ("warmelt-genobj.melt:841:/ 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___V1188*/ meltfptr[1187])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1188*/ meltfptr[1187])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1188*/ meltfptr[1187]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1189*/ meltfptr[1188]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1188*/ meltfptr[1187]); melt_dbgtrace_written_object ( /*_.VALDATA___V1188*/ meltfptr[1187], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:852:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1190*/ meltfptr[1189])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1190*/ meltfptr[1189])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1190*/ meltfptr[1189]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1160*/ meltfptr[1159]); MELT_LOCATION ("warmelt-genobj.melt:852:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1190*/ meltfptr[1189])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1190*/ meltfptr[1189])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1190*/ meltfptr[1189]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-genobj.melt:852:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1190*/ meltfptr[1189]); MELT_LOCATION ("warmelt-genobj.melt:852:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1190*/ meltfptr[1189], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:852:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1191*/ meltfptr[1190])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1191*/ meltfptr[1190])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1191*/ meltfptr[1190]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1179*/ meltfptr[1178]); MELT_LOCATION ("warmelt-genobj.melt:852:/ 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) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-genobj.melt:852:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1191*/ meltfptr[1190]); MELT_LOCATION ("warmelt-genobj.melt:852:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1191*/ meltfptr[1190], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1192*/ meltfptr[1191])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1192*/ meltfptr[1191])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1192*/ meltfptr[1191]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1193*/ meltfptr[1192]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1192*/ meltfptr[1191]); melt_dbgtrace_written_object ( /*_.VALDATA___V1192*/ meltfptr[1191], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:852:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1194*/ meltfptr[1193])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1194*/ meltfptr[1193])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1194*/ meltfptr[1193]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1192*/ meltfptr[1191]); MELT_LOCATION ("warmelt-genobj.melt:852:/ initchunk"); /*^putslot */ /*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) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-genobj.melt:852:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1194*/ meltfptr[1193]); MELT_LOCATION ("warmelt-genobj.melt:852:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1194*/ meltfptr[1193], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:852:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1195*/ meltfptr[1194])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1195*/ meltfptr[1194])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1195*/ meltfptr[1194]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1182*/ meltfptr[1181]); MELT_LOCATION ("warmelt-genobj.melt:852:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1195*/ meltfptr[1194])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1195*/ meltfptr[1194])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1195*/ meltfptr[1194]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_LONG)))); MELT_LOCATION ("warmelt-genobj.melt:852:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1195*/ meltfptr[1194]); MELT_LOCATION ("warmelt-genobj.melt:852:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1195*/ meltfptr[1194], "new static instance"); /*putupl#660 */ melt_assertmsg ("putupl #660 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1196*/ meltfptr[1195])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #660 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1196*/ meltfptr[1195])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1196*/ meltfptr[1195]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V1190*/ meltfptr[1189]); /*putupl#661 */ melt_assertmsg ("putupl #661 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1196*/ meltfptr[1195])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #661 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1196*/ meltfptr[1195])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1196*/ meltfptr[1195]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1191*/ meltfptr[1190]); /*putupl#662 */ melt_assertmsg ("putupl #662 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1196*/ meltfptr[1195])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #662 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1196*/ meltfptr[1195])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1196*/ meltfptr[1195]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1194*/ meltfptr[1193]); /*putupl#663 */ melt_assertmsg ("putupl #663 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1196*/ meltfptr[1195])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #663 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1196*/ meltfptr[1195])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1196*/ meltfptr[1195]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1195*/ meltfptr[1194]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1196*/ meltfptr[1195]); MELT_LOCATION ("warmelt-genobj.melt:852:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1197*/ meltfptr[1196])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1197*/ meltfptr[1196])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1197*/ meltfptr[1196]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1198*/ meltfptr[1197]); MELT_LOCATION ("warmelt-genobj.melt:852:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1197*/ meltfptr[1196]); MELT_LOCATION ("warmelt-genobj.melt:852:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1197*/ meltfptr[1196], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1199*/ meltfptr[1198])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1199*/ meltfptr[1198])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1199*/ meltfptr[1198]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1200*/ meltfptr[1199]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1199*/ meltfptr[1198]); melt_dbgtrace_written_object ( /*_.VALDATA___V1199*/ meltfptr[1198], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:863:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1201*/ meltfptr[1200])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1201*/ meltfptr[1200])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1201*/ meltfptr[1200]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1160*/ meltfptr[1159]); MELT_LOCATION ("warmelt-genobj.melt:863:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1201*/ meltfptr[1200])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1201*/ meltfptr[1200])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1201*/ meltfptr[1200]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-genobj.melt:863:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1201*/ meltfptr[1200]); MELT_LOCATION ("warmelt-genobj.melt:863:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1201*/ meltfptr[1200], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:863:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1202*/ meltfptr[1201])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1202*/ meltfptr[1201])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1202*/ meltfptr[1201]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1163*/ meltfptr[1162]); MELT_LOCATION ("warmelt-genobj.melt:863:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1202*/ meltfptr[1201])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1202*/ meltfptr[1201])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1202*/ meltfptr[1201]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-genobj.melt:863:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1202*/ meltfptr[1201]); MELT_LOCATION ("warmelt-genobj.melt:863:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1202*/ meltfptr[1201], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1203*/ meltfptr[1202])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1203*/ meltfptr[1202])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1203*/ meltfptr[1202]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1204*/ meltfptr[1203]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1203*/ meltfptr[1202]); melt_dbgtrace_written_object ( /*_.VALDATA___V1203*/ meltfptr[1202], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:863:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1205*/ meltfptr[1204])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1205*/ meltfptr[1204])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1205*/ meltfptr[1204]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1203*/ meltfptr[1202]); MELT_LOCATION ("warmelt-genobj.melt:863:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1205*/ meltfptr[1204])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1205*/ meltfptr[1204])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1205*/ meltfptr[1204]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-genobj.melt:863:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1205*/ meltfptr[1204]); MELT_LOCATION ("warmelt-genobj.melt:863:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1205*/ meltfptr[1204], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:863:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1206*/ meltfptr[1205])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1206*/ meltfptr[1205])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1206*/ meltfptr[1205]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1182*/ meltfptr[1181]); MELT_LOCATION ("warmelt-genobj.melt:863:/ initchunk"); /*^putslot */ /*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) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_LONG)))); MELT_LOCATION ("warmelt-genobj.melt:863:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1206*/ meltfptr[1205]); MELT_LOCATION ("warmelt-genobj.melt:863:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1206*/ meltfptr[1205], "new static instance"); /*putupl#664 */ melt_assertmsg ("putupl #664 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1207*/ meltfptr[1206])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #664 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1207*/ meltfptr[1206])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1207*/ meltfptr[1206]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V1201*/ meltfptr[1200]); /*putupl#665 */ melt_assertmsg ("putupl #665 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1207*/ meltfptr[1206])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #665 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1207*/ meltfptr[1206])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1207*/ meltfptr[1206]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1202*/ meltfptr[1201]); /*putupl#666 */ melt_assertmsg ("putupl #666 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1207*/ meltfptr[1206])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #666 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1207*/ meltfptr[1206])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1207*/ meltfptr[1206]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1205*/ meltfptr[1204]); /*putupl#667 */ melt_assertmsg ("putupl #667 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1207*/ meltfptr[1206])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #667 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1207*/ meltfptr[1206])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1207*/ meltfptr[1206]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1206*/ meltfptr[1205]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1207*/ meltfptr[1206]); MELT_LOCATION ("warmelt-genobj.melt:863:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-genobj.melt:863:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1208*/ meltfptr[1207]); MELT_LOCATION ("warmelt-genobj.melt:863:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1208*/ meltfptr[1207], "new static instance"); /*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:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1210*/ meltfptr[1209]); melt_dbgtrace_written_object ( /*_.VALDATA___V1210*/ meltfptr[1209], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:879:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1212*/ meltfptr[1211])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1043__COMPILOBJ_CATCHALL_NREP#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1212*/ meltfptr[1211])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:879:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1212*/ meltfptr[1211]); /*putclosurout#4 */ melt_assertmsg ("putclosrout#4 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1213*/ meltfptr[1212])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#4 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1212*/ meltfptr[1211])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1213*/ meltfptr[1212])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1212*/ meltfptr[1211]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1213*/ meltfptr[1212]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1214*/ meltfptr[1213])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1214*/ meltfptr[1213])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1214*/ meltfptr[1213]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1215*/ meltfptr[1214]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1214*/ meltfptr[1213]); melt_dbgtrace_written_object ( /*_.VALDATA___V1214*/ meltfptr[1213], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1216*/ meltfptr[1215])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1216*/ meltfptr[1215])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1216*/ meltfptr[1215]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1217*/ meltfptr[1216]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1216*/ meltfptr[1215]); melt_dbgtrace_written_object ( /*_.VALDATA___V1216*/ meltfptr[1215], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1218*/ meltfptr[1217])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1218*/ meltfptr[1217])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1218*/ meltfptr[1217]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1219*/ meltfptr[1218]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1218*/ meltfptr[1217]); melt_dbgtrace_written_object ( /*_.VALDATA___V1218*/ meltfptr[1217], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:889:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1220*/ meltfptr[1219])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1051__PUTOBJDEST_CATCHALL_OBJCODE#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1220*/ meltfptr[1219])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:889:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1220*/ meltfptr[1219]); /*putclosurout#5 */ melt_assertmsg ("putclosrout#5 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1221*/ meltfptr[1220])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#5 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1220*/ meltfptr[1219])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1221*/ meltfptr[1220])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1220*/ meltfptr[1219]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1221*/ meltfptr[1220]); MELT_LOCATION ("warmelt-genobj.melt:900:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1222*/ meltfptr[1221])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1053__PUTOBJDEST_CATCHALL_ANYDISCR#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1222*/ meltfptr[1221])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:900:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1222*/ meltfptr[1221]); /*putclosurout#6 */ melt_assertmsg ("putclosrout#6 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1223*/ meltfptr[1222])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#6 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1222*/ meltfptr[1221])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1223*/ meltfptr[1222])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1222*/ meltfptr[1221]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1223*/ meltfptr[1222]); /*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-genobj.melt:911:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1226*/ meltfptr[1225])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V174*/ meltfptr[173]); ((meltroutine_ptr_t) /*_.VALROUT___V1226*/ meltfptr[1225])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173]); MELT_LOCATION ("warmelt-genobj.melt:911:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1226*/ meltfptr[1225]); /*putclosurout#7 */ melt_assertmsg ("putclosrout#7 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1227*/ meltfptr[1226])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#7 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1226*/ meltfptr[1225])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1227*/ meltfptr[1226])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1226*/ meltfptr[1225]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1227*/ meltfptr[1226]); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_19 */ void meltmod__warmelt_genobj__initialmeltchunk_20 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*putslot*/ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___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-genobj.melt:921:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1230*/ meltfptr[1229])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1061__GECTYP_OBJNIL#0", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1230*/ meltfptr[1229])->tabval[0] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:921:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1230*/ meltfptr[1229]); /*putclosurout#8 */ melt_assertmsg ("putclosrout#8 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1231*/ meltfptr[1230])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#8 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1230*/ meltfptr[1229])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1231*/ meltfptr[1230])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1230*/ meltfptr[1229]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1231*/ meltfptr[1230]); /*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-genobj.melt:927:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1234*/ meltfptr[1233])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1065__GECTYP_OBJINITSTRING#0", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1234*/ meltfptr[1233])->tabval[0] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:927:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1234*/ meltfptr[1233]); /*putclosurout#9 */ melt_assertmsg ("putclosrout#9 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1235*/ meltfptr[1234])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#9 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1234*/ meltfptr[1233])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1235*/ meltfptr[1234])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1234*/ meltfptr[1233]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1235*/ meltfptr[1234]); MELT_LOCATION ("warmelt-genobj.melt:933:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1236*/ meltfptr[1235])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1067__DBGOUT_ROUTINEOBJ#0", NULL != ( /*_.DBGOUT_NAMEDOBJECT_METHOD__V27*/ meltfptr[26])); ((meltroutine_ptr_t) /*_.VALROUT___V1236*/ meltfptr[1235])->tabval[0] = (melt_ptr_t) ( /*_.DBGOUT_NAMEDOBJECT_METHOD__V27*/ meltfptr[26]); MELT_LOCATION ("warmelt-genobj.melt:933:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1236*/ meltfptr[1235]); /*putclosurout#10 */ melt_assertmsg ("putclosrout#10 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1237*/ meltfptr[1236])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#10 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1236*/ meltfptr[1235])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1237*/ meltfptr[1236])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1236*/ meltfptr[1235]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1237*/ meltfptr[1236]); /*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"); /*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-genobj.melt:941:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1242*/ meltfptr[1241])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V426*/ meltfptr[425]); ((meltroutine_ptr_t) /*_.VALROUT___V1242*/ meltfptr[1241])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V426*/ meltfptr[425]); MELT_LOCATION ("warmelt-genobj.melt:941:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1242*/ meltfptr[1241])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1073__PUTOBJDEST_OBJDESTINSTR#1", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1242*/ meltfptr[1241])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:941:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1242*/ meltfptr[1241])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1073__PUTOBJDEST_OBJDESTINSTR#2", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1242*/ meltfptr[1241])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:941:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1242*/ meltfptr[1241]); /*putclosurout#11 */ melt_assertmsg ("putclosrout#11 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1243*/ meltfptr[1242])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#11 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1242*/ meltfptr[1241])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1243*/ meltfptr[1242])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1242*/ meltfptr[1241]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1243*/ meltfptr[1242]); MELT_LOCATION ("warmelt-genobj.melt:977:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1244*/ meltfptr[1243])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V488*/ meltfptr[487]); ((meltroutine_ptr_t) /*_.VALROUT___V1244*/ meltfptr[1243])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V488*/ meltfptr[487]); MELT_LOCATION ("warmelt-genobj.melt:977:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1244*/ meltfptr[1243]); /*putclosurout#12 */ melt_assertmsg ("putclosrout#12 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1245*/ meltfptr[1244])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#12 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1244*/ meltfptr[1243])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1245*/ meltfptr[1244])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1244*/ meltfptr[1243]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1245*/ meltfptr[1244]); MELT_LOCATION ("warmelt-genobj.melt:985:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1246*/ meltfptr[1245])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1077__VARIADIC_IDSTR#0", NULL != ( /*_.AS_NULL__V29*/ meltfptr[28])); ((meltroutine_ptr_t) /*_.VALROUT___V1246*/ meltfptr[1245])->tabval[0] = (melt_ptr_t) ( /*_.AS_NULL__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-genobj.melt:985:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1246*/ meltfptr[1245])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1077__VARIADIC_IDSTR#1", NULL != ( /*_.CLASS_CLONED_SYMBOL__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V1246*/ meltfptr[1245])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-genobj.melt:985:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1246*/ meltfptr[1245])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1077__VARIADIC_IDSTR#2", NULL != ( /*_.INTEGERBOX_OF__V31*/ meltfptr[30])); ((meltroutine_ptr_t) /*_.VALROUT___V1246*/ meltfptr[1245])->tabval[2] = (melt_ptr_t) ( /*_.INTEGERBOX_OF__V31*/ meltfptr[30]); MELT_LOCATION ("warmelt-genobj.melt:985:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1246*/ meltfptr[1245])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1077__VARIADIC_IDSTR#3", NULL != ( /*_.DISCR_STRBUF__V32*/ meltfptr[31])); ((meltroutine_ptr_t) /*_.VALROUT___V1246*/ meltfptr[1245])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-genobj.melt:985:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1246*/ meltfptr[1245])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1077__VARIADIC_IDSTR#4", NULL != ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1246*/ meltfptr[1245])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-genobj.melt:985:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1246*/ meltfptr[1245])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1077__VARIADIC_IDSTR#5", NULL != ( /*_.CLASS_SYMBOL__V33*/ meltfptr[32])); ((meltroutine_ptr_t) /*_.VALROUT___V1246*/ meltfptr[1245])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V33*/ meltfptr[32]); MELT_LOCATION ("warmelt-genobj.melt:985:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1246*/ meltfptr[1245])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1077__VARIADIC_IDSTR#6", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1246*/ meltfptr[1245])->tabval[6] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:985:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1246*/ meltfptr[1245]); /*putclosurout#13 */ melt_assertmsg ("putclosrout#13 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1247*/ meltfptr[1246])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#13 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1246*/ meltfptr[1245])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1247*/ meltfptr[1246])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1246*/ meltfptr[1245]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1247*/ meltfptr[1246]); /*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"); /*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"); /*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"); /*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"); /*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-genobj.melt:1017:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1258*/ meltfptr[1257])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1247*/ meltfptr[1246]); ((meltroutine_ptr_t) /*_.VALROUT___V1258*/ meltfptr[1257])->tabval[0] = (melt_ptr_t) ( /*_.VALCLO___V1247*/ meltfptr[1246]); MELT_LOCATION ("warmelt-genobj.melt:1017:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1258*/ meltfptr[1257]); /*putclosurout#14 */ melt_assertmsg ("putclosrout#14 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1259*/ meltfptr[1258])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#14 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1258*/ meltfptr[1257])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1259*/ meltfptr[1258])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1258*/ meltfptr[1257]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1259*/ meltfptr[1258]); MELT_LOCATION ("warmelt-genobj.melt:1021:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1260*/ meltfptr[1259])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1247*/ meltfptr[1246]); ((meltroutine_ptr_t) /*_.VALROUT___V1260*/ meltfptr[1259])->tabval[0] = (melt_ptr_t) ( /*_.VALCLO___V1247*/ meltfptr[1246]); MELT_LOCATION ("warmelt-genobj.melt:1021:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1260*/ meltfptr[1259]); /*putclosurout#15 */ melt_assertmsg ("putclosrout#15 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1261*/ meltfptr[1260])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#15 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1260*/ meltfptr[1259])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1261*/ meltfptr[1260])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1260*/ meltfptr[1259]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1261*/ meltfptr[1260]); MELT_LOCATION ("warmelt-genobj.melt:1030:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1262*/ meltfptr[1261])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1093__COMPILE2OBJ_PROCEDURE#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1262*/ meltfptr[1261])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:1030:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1262*/ meltfptr[1261])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1093__COMPILE2OBJ_PROCEDURE#1", NULL != ( /*_.CLASS_NREP_ROUTPROC__V34*/ meltfptr[33])); ((meltroutine_ptr_t) /*_.VALROUT___V1262*/ meltfptr[1261])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_ROUTPROC__V34*/ meltfptr[33]); MELT_LOCATION ("warmelt-genobj.melt:1030:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1262*/ meltfptr[1261])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1093__COMPILE2OBJ_PROCEDURE#2", NULL != ( /*_.CLASS_MODULE_CONTEXT__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1262*/ meltfptr[1261])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_MODULE_CONTEXT__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-genobj.melt:1030:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1262*/ meltfptr[1261])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1093__COMPILE2OBJ_PROCEDURE#3", NULL != ( /*_.DISCR_STRBUF__V32*/ meltfptr[31])); ((meltroutine_ptr_t) /*_.VALROUT___V1262*/ meltfptr[1261])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-genobj.melt:1030:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1262*/ meltfptr[1261])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1093__COMPILE2OBJ_PROCEDURE#4", NULL != ( /*_.CLASS_NREP_DEFUNROUTPROC__V36*/ meltfptr[35])); ((meltroutine_ptr_t) /*_.VALROUT___V1262*/ meltfptr[1261])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_NREP_DEFUNROUTPROC__V36*/ meltfptr[35]); MELT_LOCATION ("warmelt-genobj.melt:1030:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1262*/ meltfptr[1261])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1093__COMPILE2OBJ_PROCEDURE#5", NULL != ( /*_.CLASS_NAMED__V8*/ meltfptr[7])); ((meltroutine_ptr_t) /*_.VALROUT___V1262*/ meltfptr[1261])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-genobj.melt:1030:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1262*/ meltfptr[1261])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1093__COMPILE2OBJ_PROCEDURE#6", NULL != ( /*_.CLASS_CLONED_SYMBOL__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V1262*/ meltfptr[1261])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-genobj.melt:1030:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1262*/ meltfptr[1261])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1093__COMPILE2OBJ_PROCEDURE#7", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1262*/ meltfptr[1261])->tabval[7] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:1030:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1262*/ meltfptr[1261])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1062*/ meltfptr[1061]); ((meltroutine_ptr_t) /*_.VALROUT___V1262*/ meltfptr[1261])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V1062*/ meltfptr[1061]); MELT_LOCATION ("warmelt-genobj.melt:1030:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1262*/ meltfptr[1261])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1093__COMPILE2OBJ_PROCEDURE#9", NULL != ( /*_.DISCR_STRING__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1262*/ meltfptr[1261])->tabval[9] = (melt_ptr_t) ( /*_.DISCR_STRING__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-genobj.melt:1030:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1262*/ meltfptr[1261])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1093__COMPILE2OBJ_PROCEDURE#10", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1262*/ meltfptr[1261])->tabval[10] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:1030:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1262*/ meltfptr[1261])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1093__COMPILE2OBJ_PROCEDURE#11", NULL != ( /*_.DISCR_CONSTANT_INTEGER__V14*/ meltfptr[13])); ((meltroutine_ptr_t) /*_.VALROUT___V1262*/ meltfptr[1261])->tabval[11] = (melt_ptr_t) ( /*_.DISCR_CONSTANT_INTEGER__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-genobj.melt:1030:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1262*/ meltfptr[1261])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1093__COMPILE2OBJ_PROCEDURE#12", NULL != ( /*_.DISCR_MAP_OBJECTS__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V1262*/ meltfptr[1261])->tabval[12] = (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-genobj.melt:1030:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1262*/ meltfptr[1261])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1093__COMPILE2OBJ_PROCEDURE#13", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1262*/ meltfptr[1261])->tabval[13] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:1837:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1264*/ meltfptr[1263])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1226__GET_FREE_OBJLOCPTR#0", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1264*/ meltfptr[1263])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:1837:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1264*/ meltfptr[1263])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1226__GET_FREE_OBJLOCPTR#1", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1264*/ meltfptr[1263])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:1837:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1264*/ meltfptr[1263])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1024*/ meltfptr[1023]); ((meltroutine_ptr_t) /*_.VALROUT___V1264*/ meltfptr[1263])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1024*/ meltfptr[1023]); MELT_LOCATION ("warmelt-genobj.melt:1837:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1264*/ meltfptr[1263])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V190*/ meltfptr[189]); ((meltroutine_ptr_t) /*_.VALROUT___V1264*/ meltfptr[1263])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189]); MELT_LOCATION ("warmelt-genobj.melt:1837:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1264*/ meltfptr[1263])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1226__GET_FREE_OBJLOCPTR#4", NULL != ( /*_.DISCR_STRBUF__V32*/ meltfptr[31])); ((meltroutine_ptr_t) /*_.VALROUT___V1264*/ meltfptr[1263])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-genobj.melt:1837:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1264*/ meltfptr[1263])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1226__GET_FREE_OBJLOCPTR#5", NULL != ( /*_.CLASS_NAMED__V8*/ meltfptr[7])); ((meltroutine_ptr_t) /*_.VALROUT___V1264*/ meltfptr[1263])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-genobj.melt:1837:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1264*/ meltfptr[1263])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1226__GET_FREE_OBJLOCPTR#6", NULL != ( /*_.DISCR_STRING__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1264*/ meltfptr[1263])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_STRING__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-genobj.melt:1837:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1264*/ meltfptr[1263])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1226__GET_FREE_OBJLOCPTR#7", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1264*/ meltfptr[1263])->tabval[7] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:1837:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1264*/ meltfptr[1263])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1226__GET_FREE_OBJLOCPTR#8", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1264*/ meltfptr[1263])->tabval[8] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:1837:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1264*/ meltfptr[1263]); /*putclosurout#16 */ melt_assertmsg ("putclosrout#16 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1263*/ meltfptr[1262])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#16 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1264*/ meltfptr[1263])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1263*/ meltfptr[1262])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1264*/ meltfptr[1263]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1263*/ meltfptr[1262]); MELT_LOCATION ("warmelt-genobj.melt:1030:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1262*/ meltfptr[1261])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1263*/ meltfptr[1262]); ((meltroutine_ptr_t) /*_.VALROUT___V1262*/ meltfptr[1261])->tabval[14] = (melt_ptr_t) ( /*_.VALCLO___V1263*/ meltfptr[1262]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1265*/ meltfptr[1264])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1265*/ meltfptr[1264])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1265*/ meltfptr[1264]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1266*/ meltfptr[1265]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1265*/ meltfptr[1264]); melt_dbgtrace_written_object ( /*_.VALDATA___V1265*/ meltfptr[1264], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:1030:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1262*/ meltfptr[1261])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1093__COMPILE2OBJ_PROCEDURE#15", NULL != ( /*_.VALDATA___V1265*/ meltfptr[1264])); ((meltroutine_ptr_t) /*_.VALROUT___V1262*/ meltfptr[1261])->tabval[15] = (melt_ptr_t) ( /*_.VALDATA___V1265*/ meltfptr[1264]); MELT_LOCATION ("warmelt-genobj.melt:1030:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1262*/ meltfptr[1261])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1093__COMPILE2OBJ_PROCEDURE#16", NULL != ( /*_.MULTIPLE_MAP__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V1262*/ meltfptr[1261])->tabval[16] = (melt_ptr_t) ( /*_.MULTIPLE_MAP__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-genobj.melt:1030:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1262*/ meltfptr[1261])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1093__COMPILE2OBJ_PROCEDURE#17", NULL != ( /*_.CLASS_FORMAL_BINDING__V42*/ meltfptr[41])); ((meltroutine_ptr_t) /*_.VALROUT___V1262*/ meltfptr[1261])->tabval[17] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V42*/ meltfptr[41]); MELT_LOCATION ("warmelt-genobj.melt:1030:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1262*/ meltfptr[1261])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1093__COMPILE2OBJ_PROCEDURE#18", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1262*/ meltfptr[1261])->tabval[18] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:1030:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1262*/ meltfptr[1261])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1263*/ meltfptr[1262]); ((meltroutine_ptr_t) /*_.VALROUT___V1262*/ meltfptr[1261])->tabval[19] = (melt_ptr_t) ( /*_.VALCLO___V1263*/ meltfptr[1262]); MELT_LOCATION ("warmelt-genobj.melt:1030:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1262*/ meltfptr[1261])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1093__COMPILE2OBJ_PROCEDURE#20", NULL != ( /*_.CTYPE_LONG__V43*/ meltfptr[42])); ((meltroutine_ptr_t) /*_.VALROUT___V1262*/ meltfptr[1261])->tabval[20] = (melt_ptr_t) ( /*_.CTYPE_LONG__V43*/ meltfptr[42]); MELT_LOCATION ("warmelt-genobj.melt:1886:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1268*/ meltfptr[1267])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1228__GET_FREE_OBJLOCLONG#0", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1268*/ meltfptr[1267])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:1886:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1268*/ meltfptr[1267])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1228__GET_FREE_OBJLOCLONG#1", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1268*/ meltfptr[1267])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:1886:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1268*/ meltfptr[1267])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1024*/ meltfptr[1023]); ((meltroutine_ptr_t) /*_.VALROUT___V1268*/ meltfptr[1267])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1024*/ meltfptr[1023]); MELT_LOCATION ("warmelt-genobj.melt:1886:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1268*/ meltfptr[1267])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V190*/ meltfptr[189]); ((meltroutine_ptr_t) /*_.VALROUT___V1268*/ meltfptr[1267])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189]); MELT_LOCATION ("warmelt-genobj.melt:1886:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1268*/ meltfptr[1267])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1228__GET_FREE_OBJLOCLONG#4", NULL != ( /*_.DISCR_STRBUF__V32*/ meltfptr[31])); ((meltroutine_ptr_t) /*_.VALROUT___V1268*/ meltfptr[1267])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-genobj.melt:1886:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1268*/ meltfptr[1267])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1228__GET_FREE_OBJLOCLONG#5", NULL != ( /*_.CLASS_NAMED__V8*/ meltfptr[7])); ((meltroutine_ptr_t) /*_.VALROUT___V1268*/ meltfptr[1267])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-genobj.melt:1886:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1268*/ meltfptr[1267])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1228__GET_FREE_OBJLOCLONG#6", NULL != ( /*_.CTYPE_LONG__V43*/ meltfptr[42])); ((meltroutine_ptr_t) /*_.VALROUT___V1268*/ meltfptr[1267])->tabval[6] = (melt_ptr_t) ( /*_.CTYPE_LONG__V43*/ meltfptr[42]); MELT_LOCATION ("warmelt-genobj.melt:1886:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1268*/ meltfptr[1267])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1228__GET_FREE_OBJLOCLONG#7", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1268*/ meltfptr[1267])->tabval[7] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:1886:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1268*/ meltfptr[1267])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1228__GET_FREE_OBJLOCLONG#8", NULL != ( /*_.DISCR_STRING__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1268*/ meltfptr[1267])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_STRING__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-genobj.melt:1886:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1268*/ meltfptr[1267]); /*putclosurout#17 */ melt_assertmsg ("putclosrout#17 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1267*/ meltfptr[1266])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#17 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1268*/ meltfptr[1267])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1267*/ meltfptr[1266])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1268*/ meltfptr[1267]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1267*/ meltfptr[1266]); MELT_LOCATION ("warmelt-genobj.melt:1030:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1262*/ meltfptr[1261])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1267*/ meltfptr[1266]); ((meltroutine_ptr_t) /*_.VALROUT___V1262*/ meltfptr[1261])->tabval[21] = (melt_ptr_t) ( /*_.VALCLO___V1267*/ meltfptr[1266]); MELT_LOCATION ("warmelt-genobj.melt:1929:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1270*/ meltfptr[1269])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1230__GET_FREE_OBJLOCTYPED#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1270*/ meltfptr[1269])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:1929:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1270*/ meltfptr[1269])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1230__GET_FREE_OBJLOCTYPED#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1270*/ meltfptr[1269])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:1929:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1270*/ meltfptr[1269])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1230__GET_FREE_OBJLOCTYPED#2", NULL != ( /*_.CLASS_CTYPE__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1270*/ meltfptr[1269])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-genobj.melt:1929:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1270*/ meltfptr[1269])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1230__GET_FREE_OBJLOCTYPED#3", NULL != ( /*_.CTYPE_LONG__V43*/ meltfptr[42])); ((meltroutine_ptr_t) /*_.VALROUT___V1270*/ meltfptr[1269])->tabval[3] = (melt_ptr_t) ( /*_.CTYPE_LONG__V43*/ meltfptr[42]); MELT_LOCATION ("warmelt-genobj.melt:1929:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1270*/ meltfptr[1269])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1267*/ meltfptr[1266]); ((meltroutine_ptr_t) /*_.VALROUT___V1270*/ meltfptr[1269])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V1267*/ meltfptr[1266]); MELT_LOCATION ("warmelt-genobj.melt:1929:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1270*/ meltfptr[1269])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1230__GET_FREE_OBJLOCTYPED#5", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1270*/ meltfptr[1269])->tabval[5] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:1929:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1270*/ meltfptr[1269])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1263*/ meltfptr[1262]); ((meltroutine_ptr_t) /*_.VALROUT___V1270*/ meltfptr[1269])->tabval[6] = (melt_ptr_t) ( /*_.VALCLO___V1263*/ meltfptr[1262]); MELT_LOCATION ("warmelt-genobj.melt:1929:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1270*/ meltfptr[1269])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1230__GET_FREE_OBJLOCTYPED#7", NULL != ( /*_.CTYPE_VOID__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1270*/ meltfptr[1269])->tabval[7] = (melt_ptr_t) ( /*_.CTYPE_VOID__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-genobj.melt:1929:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1270*/ meltfptr[1269])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1024*/ meltfptr[1023]); ((meltroutine_ptr_t) /*_.VALROUT___V1270*/ meltfptr[1269])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V1024*/ meltfptr[1023]); MELT_LOCATION ("warmelt-genobj.melt:1929:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1270*/ meltfptr[1269])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1230__GET_FREE_OBJLOCTYPED#9", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1270*/ meltfptr[1269])->tabval[9] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:1929:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1270*/ meltfptr[1269])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V190*/ meltfptr[189]); ((meltroutine_ptr_t) /*_.VALROUT___V1270*/ meltfptr[1269])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189]); MELT_LOCATION ("warmelt-genobj.melt:1929:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1270*/ meltfptr[1269])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1230__GET_FREE_OBJLOCTYPED#11", NULL != ( /*_.DISCR_STRBUF__V32*/ meltfptr[31])); ((meltroutine_ptr_t) /*_.VALROUT___V1270*/ meltfptr[1269])->tabval[11] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V32*/ meltfptr[31]); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_20 */ void meltmod__warmelt_genobj__initialmeltchunk_21 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-genobj.melt:1929:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1270*/ meltfptr[1269])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1230__GET_FREE_OBJLOCTYPED#12", NULL != ( /*_.CLASS_NAMED__V8*/ meltfptr[7])); ((meltroutine_ptr_t) /*_.VALROUT___V1270*/ meltfptr[1269])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-genobj.melt:1929:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1270*/ meltfptr[1269])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1230__GET_FREE_OBJLOCTYPED#13", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1270*/ meltfptr[1269])->tabval[13] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:1929:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1270*/ meltfptr[1269])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1230__GET_FREE_OBJLOCTYPED#14", NULL != ( /*_.DISCR_STRING__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1270*/ meltfptr[1269])->tabval[14] = (melt_ptr_t) ( /*_.DISCR_STRING__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-genobj.melt:1929:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1270*/ meltfptr[1269]); /*putclosurout#18 */ melt_assertmsg ("putclosrout#18 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1269*/ meltfptr[1268])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#18 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1270*/ meltfptr[1269])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1269*/ meltfptr[1268])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1270*/ meltfptr[1269]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1269*/ meltfptr[1268]); MELT_LOCATION ("warmelt-genobj.melt:1030:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1262*/ meltfptr[1261])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1269*/ meltfptr[1268]); ((meltroutine_ptr_t) /*_.VALROUT___V1262*/ meltfptr[1261])->tabval[22] = (melt_ptr_t) ( /*_.VALCLO___V1269*/ meltfptr[1268]); MELT_LOCATION ("warmelt-genobj.melt:1030:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1262*/ meltfptr[1261])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V464*/ meltfptr[463]); ((meltroutine_ptr_t) /*_.VALROUT___V1262*/ meltfptr[1261])->tabval[23] = (melt_ptr_t) ( /*_.VALDATA___V464*/ meltfptr[463]); MELT_LOCATION ("warmelt-genobj.melt:1030:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1262*/ meltfptr[1261])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V450*/ meltfptr[449]); ((meltroutine_ptr_t) /*_.VALROUT___V1262*/ meltfptr[1261])->tabval[24] = (melt_ptr_t) ( /*_.VALDATA___V450*/ meltfptr[449]); MELT_LOCATION ("warmelt-genobj.melt:1030:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1262*/ meltfptr[1261])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1093__COMPILE2OBJ_PROCEDURE#25", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1262*/ meltfptr[1261])->tabval[25] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:1111:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1271*/ meltfptr[1270])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1113__LAMBDA_#0", NULL != ( /*_.CLASS_FORMAL_BINDING__V42*/ meltfptr[41])); ((meltroutine_ptr_t) /*_.VALROUT___V1271*/ meltfptr[1270])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V42*/ meltfptr[41]); MELT_LOCATION ("warmelt-genobj.melt:1111:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1271*/ meltfptr[1270])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1113__LAMBDA_#1", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1271*/ meltfptr[1270])->tabval[1] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:1111:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1271*/ meltfptr[1270])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1263*/ meltfptr[1262]); ((meltroutine_ptr_t) /*_.VALROUT___V1271*/ meltfptr[1270])->tabval[2] = (melt_ptr_t) ( /*_.VALCLO___V1263*/ meltfptr[1262]); MELT_LOCATION ("warmelt-genobj.melt:1111:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1271*/ meltfptr[1270])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1113__LAMBDA_#3", NULL != ( /*_.CTYPE_LONG__V43*/ meltfptr[42])); ((meltroutine_ptr_t) /*_.VALROUT___V1271*/ meltfptr[1270])->tabval[3] = (melt_ptr_t) ( /*_.CTYPE_LONG__V43*/ meltfptr[42]); MELT_LOCATION ("warmelt-genobj.melt:1111:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1271*/ meltfptr[1270])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1267*/ meltfptr[1266]); ((meltroutine_ptr_t) /*_.VALROUT___V1271*/ meltfptr[1270])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V1267*/ meltfptr[1266]); MELT_LOCATION ("warmelt-genobj.melt:1111:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1271*/ meltfptr[1270])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1269*/ meltfptr[1268]); ((meltroutine_ptr_t) /*_.VALROUT___V1271*/ meltfptr[1270])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1269*/ meltfptr[1268]); MELT_LOCATION ("warmelt-genobj.melt:1111:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1271*/ meltfptr[1270])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V464*/ meltfptr[463]); ((meltroutine_ptr_t) /*_.VALROUT___V1271*/ meltfptr[1270])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V464*/ meltfptr[463]); MELT_LOCATION ("warmelt-genobj.melt:1111:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1271*/ meltfptr[1270])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V450*/ meltfptr[449]); ((meltroutine_ptr_t) /*_.VALROUT___V1271*/ meltfptr[1270])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V450*/ meltfptr[449]); MELT_LOCATION ("warmelt-genobj.melt:1111:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1271*/ meltfptr[1270])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1113__LAMBDA_#8", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1271*/ meltfptr[1270])->tabval[8] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:1111:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1271*/ meltfptr[1270]); MELT_LOCATION ("warmelt-genobj.melt:1030:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1262*/ meltfptr[1261])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1093__COMPILE2OBJ_PROCEDURE#26", NULL != ( /*_.VALROUT___V1271*/ meltfptr[1270])); ((meltroutine_ptr_t) /*_.VALROUT___V1262*/ meltfptr[1261])->tabval[26] = (melt_ptr_t) ( /*_.VALROUT___V1271*/ meltfptr[1270]); MELT_LOCATION ("warmelt-genobj.melt:1030:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1262*/ meltfptr[1261])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1093__COMPILE2OBJ_PROCEDURE#27", NULL != ( /*_.DISCR_MULTIPLE__V18*/ meltfptr[17])); ((meltroutine_ptr_t) /*_.VALROUT___V1262*/ meltfptr[1261])->tabval[27] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V18*/ meltfptr[17]); MELT_LOCATION ("warmelt-genobj.melt:1030:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1262*/ meltfptr[1261])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1093__COMPILE2OBJ_PROCEDURE#28", NULL != ( /*_.CLASS_NREP__V22*/ meltfptr[21])); ((meltroutine_ptr_t) /*_.VALROUT___V1262*/ meltfptr[1261])->tabval[28] = (melt_ptr_t) ( /*_.CLASS_NREP__V22*/ meltfptr[21]); MELT_LOCATION ("warmelt-genobj.melt:1030:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1262*/ meltfptr[1261])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1093__COMPILE2OBJ_PROCEDURE#29", NULL != ( /*_.LIST_EVERY__V44*/ meltfptr[43])); ((meltroutine_ptr_t) /*_.VALROUT___V1262*/ meltfptr[1261])->tabval[29] = (melt_ptr_t) ( /*_.LIST_EVERY__V44*/ meltfptr[43]); MELT_LOCATION ("warmelt-genobj.melt:1030:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1262*/ meltfptr[1261])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1093__COMPILE2OBJ_PROCEDURE#30", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1262*/ meltfptr[1261])->tabval[30] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:1164:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1272*/ meltfptr[1271])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1120__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1272*/ meltfptr[1271])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:1164:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1272*/ meltfptr[1271]); MELT_LOCATION ("warmelt-genobj.melt:1030:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1262*/ meltfptr[1261])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1093__COMPILE2OBJ_PROCEDURE#31", NULL != ( /*_.VALROUT___V1272*/ meltfptr[1271])); ((meltroutine_ptr_t) /*_.VALROUT___V1262*/ meltfptr[1261])->tabval[31] = (melt_ptr_t) ( /*_.VALROUT___V1272*/ meltfptr[1271]); MELT_LOCATION ("warmelt-genobj.melt:1030:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1262*/ meltfptr[1261])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1093__COMPILE2OBJ_PROCEDURE#32", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1262*/ meltfptr[1261])->tabval[32] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:1030:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1262*/ meltfptr[1261]); /*putclosurout#19 */ melt_assertmsg ("putclosrout#19 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1273*/ meltfptr[1272])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#19 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1262*/ meltfptr[1261])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1273*/ meltfptr[1272])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1262*/ meltfptr[1261]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1273*/ meltfptr[1272]); /*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"); /*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"); /*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"); /*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"); /*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"); /*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"); /*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"); /*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"); /*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"); /*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"); /*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"); /*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-genobj.melt:1183:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1298*/ meltfptr[1297])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1298*/ meltfptr[1297])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1298*/ meltfptr[1297]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1299*/ meltfptr[1298])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1299*/ meltfptr[1298])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1299*/ meltfptr[1298]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1300*/ meltfptr[1299]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1299*/ meltfptr[1298]); melt_dbgtrace_written_object ( /*_.VALDATA___V1299*/ meltfptr[1298], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:1183:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1298*/ meltfptr[1297])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1298*/ meltfptr[1297])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1298*/ meltfptr[1297]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALDATA___V1299*/ meltfptr[1298]); MELT_LOCATION ("warmelt-genobj.melt:1183:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1298*/ meltfptr[1297]); MELT_LOCATION ("warmelt-genobj.melt:1183:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1298*/ meltfptr[1297], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:1188:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1301*/ meltfptr[1300])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V410*/ meltfptr[409]); ((meltroutine_ptr_t) /*_.VALROUT___V1301*/ meltfptr[1300])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V410*/ meltfptr[409]); MELT_LOCATION ("warmelt-genobj.melt:1188:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1301*/ meltfptr[1300]); /*putclosurout#20 */ melt_assertmsg ("putclosrout#20 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1302*/ meltfptr[1301])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#20 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1301*/ meltfptr[1300])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1302*/ meltfptr[1301])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1301*/ meltfptr[1300]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1302*/ meltfptr[1301]); MELT_LOCATION ("warmelt-genobj.melt:1190:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1303*/ meltfptr[1302])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V410*/ meltfptr[409]); ((meltroutine_ptr_t) /*_.VALROUT___V1303*/ meltfptr[1302])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V410*/ meltfptr[409]); MELT_LOCATION ("warmelt-genobj.melt:1190:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1303*/ meltfptr[1302])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1128__APPEND_COMMENTCONST#1", NULL != ( /*_.DISCR_STRING__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1303*/ meltfptr[1302])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_STRING__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-genobj.melt:1190:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1303*/ meltfptr[1302]); /*putclosurout#21 */ melt_assertmsg ("putclosrout#21 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1304*/ meltfptr[1303])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#21 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1303*/ meltfptr[1302])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1304*/ meltfptr[1303])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1303*/ meltfptr[1302]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1304*/ meltfptr[1303]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#1", NULL != ( /*_.CLASS_NREP_INITPROC__V45*/ meltfptr[44])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_INITPROC__V45*/ meltfptr[44]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#2", NULL != ( /*_.CLASS_MODULE_CONTEXT__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_MODULE_CONTEXT__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#3", NULL != ( /*_.DISCR_MAP_OBJECTS__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#4", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1106*/ meltfptr[1105]); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1106*/ meltfptr[1105]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#6", NULL != ( /*_.VALSTR___V1306*/ meltfptr[1305])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[6] = (melt_ptr_t) ( /*_.VALSTR___V1306*/ meltfptr[1305]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#7", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[7] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#8", NULL != ( /*_.CLASS_INITIAL_GENERATION_CONTEXT__V46*/ meltfptr[45])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_INITIAL_GENERATION_CONTEXT__V46*/ meltfptr[45]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#9", NULL != ( /*_.LIST_MAP__V47*/ meltfptr[46])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[9] = (melt_ptr_t) ( /*_.LIST_MAP__V47*/ meltfptr[46]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#10", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[10] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:1245:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1307*/ meltfptr[1306])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1139__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1307*/ meltfptr[1306])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:1245:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1307*/ meltfptr[1306]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#11", NULL != ( /*_.VALROUT___V1307*/ meltfptr[1306])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[11] = (melt_ptr_t) ( /*_.VALROUT___V1307*/ meltfptr[1306]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1263*/ meltfptr[1262]); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[12] = (melt_ptr_t) ( /*_.VALCLO___V1263*/ meltfptr[1262]); /*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-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#13", NULL != ( /*_.VALDATA___V1308*/ meltfptr[1307])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[13] = (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-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#14", NULL != ( /*_.VALDATA___V1310*/ meltfptr[1309])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[14] = (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-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#15", NULL != ( /*_.VALDATA___V1312*/ meltfptr[1311])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[15] = (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-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#16", NULL != ( /*_.VALDATA___V1314*/ meltfptr[1313])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[16] = (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-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#17", NULL != ( /*_.VALDATA___V1316*/ meltfptr[1315])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[17] = (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-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#18", NULL != ( /*_.VALDATA___V1318*/ meltfptr[1317])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[18] = (melt_ptr_t) ( /*_.VALDATA___V1318*/ meltfptr[1317]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1304*/ meltfptr[1303]); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[19] = (melt_ptr_t) ( /*_.VALCLO___V1304*/ meltfptr[1303]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#20", NULL != ( /*_.CLASS_ANY_BINDING__V48*/ meltfptr[47])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[20] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V48*/ meltfptr[47]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#21", NULL != ( /*_.CLASS_FIXED_BINDING__V49*/ meltfptr[48])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[21] = (melt_ptr_t) ( /*_.CLASS_FIXED_BINDING__V49*/ meltfptr[48]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#22", NULL != ( /*_.CLASS_NREP_SIMPLE__V50*/ meltfptr[49])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[22] = (melt_ptr_t) ( /*_.CLASS_NREP_SIMPLE__V50*/ meltfptr[49]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V918*/ meltfptr[917]); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[23] = (melt_ptr_t) ( /*_.VALDATA___V918*/ meltfptr[917]); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_21 */ void meltmod__warmelt_genobj__initialmeltchunk_22 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1298*/ meltfptr[1297]); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[24] = (melt_ptr_t) ( /*_.VALDATA___V1298*/ meltfptr[1297]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#25", NULL != ( /*_.SYSDATA_CONT_FRESH_ENV__V51*/ meltfptr[50])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[25] = (melt_ptr_t) ( /*_.SYSDATA_CONT_FRESH_ENV__V51*/ meltfptr[50]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1151*/ meltfptr[1150]); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[26] = (melt_ptr_t) ( /*_.VALCLO___V1151*/ meltfptr[1150]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#27", NULL != ( /*_.CTYPE_VOID__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[27] = (melt_ptr_t) ( /*_.CTYPE_VOID__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V728*/ meltfptr[727]); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[28] = (melt_ptr_t) ( /*_.VALDATA___V728*/ meltfptr[727]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V538*/ meltfptr[537]); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[29] = (melt_ptr_t) ( /*_.VALDATA___V538*/ meltfptr[537]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#30", NULL != ( /*_.DISCR_STRING__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[30] = (melt_ptr_t) ( /*_.DISCR_STRING__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V648*/ meltfptr[647]); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[31] = (melt_ptr_t) ( /*_.VALDATA___V648*/ meltfptr[647]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V362*/ meltfptr[361]); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[32] = (melt_ptr_t) ( /*_.VALDATA___V362*/ meltfptr[361]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#33", NULL != ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[33] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#34", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[34] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#35", NULL != ( /*_.CLASS_NREP_IMPORTEDVAL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[35] = (melt_ptr_t) ( /*_.CLASS_NREP_IMPORTEDVAL__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1263*/ meltfptr[1262]); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[36] = (melt_ptr_t) ( /*_.VALCLO___V1263*/ meltfptr[1262]); MELT_LOCATION ("warmelt-genobj.melt:1348:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1320*/ meltfptr[1319])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1160__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1320*/ meltfptr[1319])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:1348:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1320*/ meltfptr[1319])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1160__LAMBDA_#1", NULL != ( /*_.CLASS_NREP_IMPORTEDVAL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1320*/ meltfptr[1319])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_IMPORTEDVAL__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-genobj.melt:1348:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1320*/ meltfptr[1319])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1263*/ meltfptr[1262]); ((meltroutine_ptr_t) /*_.VALROUT___V1320*/ meltfptr[1319])->tabval[2] = (melt_ptr_t) ( /*_.VALCLO___V1263*/ meltfptr[1262]); MELT_LOCATION ("warmelt-genobj.melt:1348:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1320*/ meltfptr[1319]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#37", NULL != ( /*_.VALROUT___V1320*/ meltfptr[1319])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[37] = (melt_ptr_t) ( /*_.VALROUT___V1320*/ meltfptr[1319]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V436*/ meltfptr[435]); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[38] = (melt_ptr_t) ( /*_.VALDATA___V436*/ meltfptr[435]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#39", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[39] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#40", NULL != ( /*_.LIST_TO_MULTIPLE__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[40] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#41", NULL != ( /*_.DISCR_MULTIPLE__V18*/ meltfptr[17])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[41] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V18*/ meltfptr[17]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#42", NULL != ( /*_.CLASS_NREP_BOUND_DATA__V53*/ meltfptr[52])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[42] = (melt_ptr_t) ( /*_.CLASS_NREP_BOUND_DATA__V53*/ meltfptr[52]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#43", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[43] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:1380:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1321*/ meltfptr[1320])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1163__LAMBDA_#0", NULL != ( /*_.CLASS_NREP_BOUND_DATA__V53*/ meltfptr[52])); ((meltroutine_ptr_t) /*_.VALROUT___V1321*/ meltfptr[1320])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_BOUND_DATA__V53*/ meltfptr[52]); MELT_LOCATION ("warmelt-genobj.melt:1380:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1321*/ meltfptr[1320])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1163__LAMBDA_#1", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1321*/ meltfptr[1320])->tabval[1] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:1380:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1321*/ meltfptr[1320]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#44", NULL != ( /*_.VALROUT___V1321*/ meltfptr[1320])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[44] = (melt_ptr_t) ( /*_.VALROUT___V1321*/ meltfptr[1320]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#45", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[45] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#46", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[46] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:1393:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1322*/ meltfptr[1321])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1166__LAMBDA_#0", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1322*/ meltfptr[1321])->tabval[0] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:1393:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1322*/ meltfptr[1321])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1166__LAMBDA_#1", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1322*/ meltfptr[1321])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:1393:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1322*/ meltfptr[1321]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#47", NULL != ( /*_.VALROUT___V1322*/ meltfptr[1321])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[47] = (melt_ptr_t) ( /*_.VALROUT___V1322*/ meltfptr[1321]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#48", NULL != ( /*_.MULTIPLE_EVERY__V54*/ meltfptr[53])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[48] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V54*/ meltfptr[53]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V288*/ meltfptr[287]); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[49] = (melt_ptr_t) ( /*_.VALDATA___V288*/ meltfptr[287]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#50", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[50] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#51", NULL != ( /*_.CLASS_NREP_DATAKEYWORD__V55*/ meltfptr[54])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[51] = (melt_ptr_t) ( /*_.CLASS_NREP_DATAKEYWORD__V55*/ meltfptr[54]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V722*/ meltfptr[721]); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[52] = (melt_ptr_t) ( /*_.VALDATA___V722*/ meltfptr[721]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#53", NULL != ( /*_.CLASS_NREP_DATASYMBOL__V56*/ meltfptr[55])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[53] = (melt_ptr_t) ( /*_.CLASS_NREP_DATASYMBOL__V56*/ meltfptr[55]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V716*/ meltfptr[715]); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[54] = (melt_ptr_t) ( /*_.VALDATA___V716*/ meltfptr[715]); MELT_LOCATION ("warmelt-genobj.melt:1402:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1323*/ meltfptr[1322])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V288*/ meltfptr[287]); ((meltroutine_ptr_t) /*_.VALROUT___V1323*/ meltfptr[1322])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V288*/ meltfptr[287]); MELT_LOCATION ("warmelt-genobj.melt:1402:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1323*/ meltfptr[1322])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1169__LAMBDA_#1", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1323*/ meltfptr[1322])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:1402:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1323*/ meltfptr[1322])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1169__LAMBDA_#2", NULL != ( /*_.CLASS_NREP_DATAKEYWORD__V55*/ meltfptr[54])); ((meltroutine_ptr_t) /*_.VALROUT___V1323*/ meltfptr[1322])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NREP_DATAKEYWORD__V55*/ meltfptr[54]); MELT_LOCATION ("warmelt-genobj.melt:1402:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1323*/ meltfptr[1322])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V722*/ meltfptr[721]); ((meltroutine_ptr_t) /*_.VALROUT___V1323*/ meltfptr[1322])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V722*/ meltfptr[721]); MELT_LOCATION ("warmelt-genobj.melt:1402:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1323*/ meltfptr[1322])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1169__LAMBDA_#4", NULL != ( /*_.CLASS_NREP_DATASYMBOL__V56*/ meltfptr[55])); ((meltroutine_ptr_t) /*_.VALROUT___V1323*/ meltfptr[1322])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_NREP_DATASYMBOL__V56*/ meltfptr[55]); MELT_LOCATION ("warmelt-genobj.melt:1402:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1323*/ meltfptr[1322])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V716*/ meltfptr[715]); ((meltroutine_ptr_t) /*_.VALROUT___V1323*/ meltfptr[1322])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V716*/ meltfptr[715]); MELT_LOCATION ("warmelt-genobj.melt:1402:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1323*/ meltfptr[1322]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#55", NULL != ( /*_.VALROUT___V1323*/ meltfptr[1322])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[55] = (melt_ptr_t) ( /*_.VALROUT___V1323*/ meltfptr[1322]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#56", NULL != ( /*_.SYSDATA_VALUE_IMPORTER__V57*/ meltfptr[56])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[56] = (melt_ptr_t) ( /*_.SYSDATA_VALUE_IMPORTER__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#57", NULL != ( /*_.LIST_EVERY__V44*/ meltfptr[43])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[57] = (melt_ptr_t) ( /*_.LIST_EVERY__V44*/ meltfptr[43]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#58", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[58] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#59", NULL != ( /*_.CLASS_NREP_IMPORTEDVAL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[59] = (melt_ptr_t) ( /*_.CLASS_NREP_IMPORTEDVAL__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#60", NULL != ( /*_.CLASS_NAMED__V8*/ meltfptr[7])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[60] = (melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#61", NULL != ( /*_.CLASS_MODULE_CONTEXT__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[61] = (melt_ptr_t) ( /*_.CLASS_MODULE_CONTEXT__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#62", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[62] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V728*/ meltfptr[727]); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[63] = (melt_ptr_t) ( /*_.VALDATA___V728*/ meltfptr[727]); MELT_LOCATION ("warmelt-genobj.melt:1440:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1324*/ meltfptr[1323])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1176__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1324*/ meltfptr[1323])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:1440:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1324*/ meltfptr[1323])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1176__LAMBDA_#1", NULL != ( /*_.CLASS_NREP_IMPORTEDVAL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1324*/ meltfptr[1323])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_IMPORTEDVAL__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-genobj.melt:1440:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1324*/ meltfptr[1323])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1176__LAMBDA_#2", NULL != ( /*_.CLASS_NAMED__V8*/ meltfptr[7])); ((meltroutine_ptr_t) /*_.VALROUT___V1324*/ meltfptr[1323])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-genobj.melt:1440:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1324*/ meltfptr[1323])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1176__LAMBDA_#3", NULL != ( /*_.CLASS_MODULE_CONTEXT__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1324*/ meltfptr[1323])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_MODULE_CONTEXT__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-genobj.melt:1440:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1324*/ meltfptr[1323])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1176__LAMBDA_#4", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1324*/ meltfptr[1323])->tabval[4] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:1440:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1324*/ meltfptr[1323])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V728*/ meltfptr[727]); ((meltroutine_ptr_t) /*_.VALROUT___V1324*/ meltfptr[1323])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V728*/ meltfptr[727]); MELT_LOCATION ("warmelt-genobj.melt:1440:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1324*/ meltfptr[1323]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#64", NULL != ( /*_.VALROUT___V1324*/ meltfptr[1323])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[64] = (melt_ptr_t) ( /*_.VALROUT___V1324*/ meltfptr[1323]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#65", NULL != ( /*_.VALROUT___V1325*/ meltfptr[1324])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[65] = (melt_ptr_t) ( /*_.VALROUT___V1325*/ meltfptr[1324]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V288*/ meltfptr[287]); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[66] = (melt_ptr_t) ( /*_.VALDATA___V288*/ meltfptr[287]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#67", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[67] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#68", NULL != ( /*_.CLASS_NREP_DATAKEYWORD__V55*/ meltfptr[54])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[68] = (melt_ptr_t) ( /*_.CLASS_NREP_DATAKEYWORD__V55*/ meltfptr[54]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V700*/ meltfptr[699]); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[69] = (melt_ptr_t) ( /*_.VALDATA___V700*/ meltfptr[699]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#70", NULL != ( /*_.CLASS_NREP_DATASYMBOL__V56*/ meltfptr[55])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[70] = (melt_ptr_t) ( /*_.CLASS_NREP_DATASYMBOL__V56*/ meltfptr[55]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V694*/ meltfptr[693]); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[71] = (melt_ptr_t) ( /*_.VALDATA___V694*/ meltfptr[693]); MELT_LOCATION ("warmelt-genobj.melt:1473:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1326*/ meltfptr[1325])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V288*/ meltfptr[287]); ((meltroutine_ptr_t) /*_.VALROUT___V1326*/ meltfptr[1325])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V288*/ meltfptr[287]); MELT_LOCATION ("warmelt-genobj.melt:1473:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1326*/ meltfptr[1325])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1178__LAMBDA_#1", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1326*/ meltfptr[1325])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:1473:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1326*/ meltfptr[1325])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1178__LAMBDA_#2", NULL != ( /*_.CLASS_NREP_DATAKEYWORD__V55*/ meltfptr[54])); ((meltroutine_ptr_t) /*_.VALROUT___V1326*/ meltfptr[1325])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NREP_DATAKEYWORD__V55*/ meltfptr[54]); MELT_LOCATION ("warmelt-genobj.melt:1473:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1326*/ meltfptr[1325])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V700*/ meltfptr[699]); ((meltroutine_ptr_t) /*_.VALROUT___V1326*/ meltfptr[1325])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V700*/ meltfptr[699]); MELT_LOCATION ("warmelt-genobj.melt:1473:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1326*/ meltfptr[1325])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1178__LAMBDA_#4", NULL != ( /*_.CLASS_NREP_DATASYMBOL__V56*/ meltfptr[55])); ((meltroutine_ptr_t) /*_.VALROUT___V1326*/ meltfptr[1325])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_NREP_DATASYMBOL__V56*/ meltfptr[55]); MELT_LOCATION ("warmelt-genobj.melt:1473:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1326*/ meltfptr[1325])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V694*/ meltfptr[693]); ((meltroutine_ptr_t) /*_.VALROUT___V1326*/ meltfptr[1325])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V694*/ meltfptr[693]); MELT_LOCATION ("warmelt-genobj.melt:1473:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1326*/ meltfptr[1325]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1130__COMPILE2OBJ_INITPROC#72", NULL != ( /*_.VALROUT___V1326*/ meltfptr[1325])); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[72] = (melt_ptr_t) ( /*_.VALROUT___V1326*/ meltfptr[1325]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1171*/ meltfptr[1170]); ((meltroutine_ptr_t) /*_.VALROUT___V1305*/ meltfptr[1304])->tabval[73] = (melt_ptr_t) ( /*_.VALDATA___V1171*/ meltfptr[1170]); MELT_LOCATION ("warmelt-genobj.melt:1197:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1305*/ meltfptr[1304]); /*putclosurout#22 */ melt_assertmsg ("putclosrout#22 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1327*/ meltfptr[1326])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#22 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1327*/ meltfptr[1326])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1305*/ meltfptr[1304]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1327*/ meltfptr[1326]); /*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"); /*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"); /*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"); /*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"); /*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"); /*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"); /*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"); /*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"); /*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"); /*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"); /*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"); /*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"); /*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-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#1", NULL != ( /*_.CLASS_NREP_INITEXTENDPROC__V58*/ meltfptr[57])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_INITEXTENDPROC__V58*/ meltfptr[57]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#2", NULL != ( /*_.CLASS_RUNNING_EXTENSION_MODULE_CONTEXT__V59*/ meltfptr[58])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_RUNNING_EXTENSION_MODULE_CONTEXT__V59*/ meltfptr[58]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#3", NULL != ( /*_.DISCR_MAP_OBJECTS__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#4", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_22 */ void meltmod__warmelt_genobj__initialmeltchunk_23 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#5", NULL != ( /*_.CLASS_NREP_ANYPROC__V60*/ meltfptr[59])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NREP_ANYPROC__V60*/ meltfptr[59]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#6", NULL != ( /*_.CLASS_MODULE_CONTEXT__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_MODULE_CONTEXT__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1116*/ meltfptr[1115]); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V1116*/ meltfptr[1115]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#8", NULL != ( /*_.VALSTR___V1355*/ meltfptr[1354])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[8] = (melt_ptr_t) ( /*_.VALSTR___V1355*/ meltfptr[1354]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#9", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[9] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#10", NULL != ( /*_.CLASS_EXTENSION_GENERATION_CONTEXT__V61*/ meltfptr[60])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_EXTENSION_GENERATION_CONTEXT__V61*/ meltfptr[60]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#11", NULL != ( /*_.LIST_MAP__V47*/ meltfptr[46])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[11] = (melt_ptr_t) ( /*_.LIST_MAP__V47*/ meltfptr[46]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#12", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[12] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:1569:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1356*/ meltfptr[1355])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1190__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1356*/ meltfptr[1355])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:1569:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1356*/ meltfptr[1355]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#13", NULL != ( /*_.VALROUT___V1356*/ meltfptr[1355])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[13] = (melt_ptr_t) ( /*_.VALROUT___V1356*/ meltfptr[1355]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1263*/ meltfptr[1262]); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[14] = (melt_ptr_t) ( /*_.VALCLO___V1263*/ meltfptr[1262]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1357*/ meltfptr[1356])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1357*/ meltfptr[1356])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1357*/ meltfptr[1356]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1358*/ meltfptr[1357]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1357*/ meltfptr[1356]); melt_dbgtrace_written_object ( /*_.VALDATA___V1357*/ meltfptr[1356], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#15", NULL != ( /*_.VALDATA___V1357*/ meltfptr[1356])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[15] = (melt_ptr_t) ( /*_.VALDATA___V1357*/ meltfptr[1356]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#16", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[16] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1024*/ meltfptr[1023]); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[17] = (melt_ptr_t) ( /*_.VALDATA___V1024*/ meltfptr[1023]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1359*/ meltfptr[1358])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1359*/ meltfptr[1358])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1359*/ meltfptr[1358]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1360*/ meltfptr[1359]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1359*/ meltfptr[1358]); melt_dbgtrace_written_object ( /*_.VALDATA___V1359*/ meltfptr[1358], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#18", NULL != ( /*_.VALDATA___V1359*/ meltfptr[1358])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[18] = (melt_ptr_t) ( /*_.VALDATA___V1359*/ meltfptr[1358]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#19", NULL != ( /*_.CLASS_INITIAL_GENERATION_CONTEXT__V46*/ meltfptr[45])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[19] = (melt_ptr_t) ( /*_.CLASS_INITIAL_GENERATION_CONTEXT__V46*/ meltfptr[45]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1361*/ meltfptr[1360])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1361*/ meltfptr[1360])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1361*/ meltfptr[1360]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1362*/ meltfptr[1361]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1361*/ meltfptr[1360]); melt_dbgtrace_written_object ( /*_.VALDATA___V1361*/ meltfptr[1360], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#20", NULL != ( /*_.VALDATA___V1361*/ meltfptr[1360])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[20] = (melt_ptr_t) ( /*_.VALDATA___V1361*/ meltfptr[1360]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1363*/ meltfptr[1362])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1363*/ meltfptr[1362])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1363*/ meltfptr[1362]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1364*/ meltfptr[1363]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1363*/ meltfptr[1362]); melt_dbgtrace_written_object ( /*_.VALDATA___V1363*/ meltfptr[1362], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#21", NULL != ( /*_.VALDATA___V1363*/ meltfptr[1362])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[21] = (melt_ptr_t) ( /*_.VALDATA___V1363*/ meltfptr[1362]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1365*/ meltfptr[1364])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1365*/ meltfptr[1364])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1365*/ meltfptr[1364]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1366*/ meltfptr[1365]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1365*/ meltfptr[1364]); melt_dbgtrace_written_object ( /*_.VALDATA___V1365*/ meltfptr[1364], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#22", NULL != ( /*_.VALDATA___V1365*/ meltfptr[1364])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[22] = (melt_ptr_t) ( /*_.VALDATA___V1365*/ meltfptr[1364]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#23", NULL != ( /*_.CLASS_NREP_INITPROC__V45*/ meltfptr[44])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[23] = (melt_ptr_t) ( /*_.CLASS_NREP_INITPROC__V45*/ meltfptr[44]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1304*/ meltfptr[1303]); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[24] = (melt_ptr_t) ( /*_.VALCLO___V1304*/ meltfptr[1303]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#25", NULL != ( /*_.CLASS_ANY_BINDING__V48*/ meltfptr[47])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[25] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V48*/ meltfptr[47]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#26", NULL != ( /*_.CLASS_FIXED_BINDING__V49*/ meltfptr[48])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[26] = (melt_ptr_t) ( /*_.CLASS_FIXED_BINDING__V49*/ meltfptr[48]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#27", NULL != ( /*_.CLASS_NREP_SIMPLE__V50*/ meltfptr[49])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[27] = (melt_ptr_t) ( /*_.CLASS_NREP_SIMPLE__V50*/ meltfptr[49]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#28", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[28] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#29", NULL != ( /*_.CLASS_NREP_LITERALNAMEDVALUE__V62*/ meltfptr[61])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[29] = (melt_ptr_t) ( /*_.CLASS_NREP_LITERALNAMEDVALUE__V62*/ meltfptr[61]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#30", NULL != ( /*_.CLASS_NREP_LITERALVALUE__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[30] = (melt_ptr_t) ( /*_.CLASS_NREP_LITERALVALUE__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#31", NULL != ( /*_.CLASS_LITERAL_VALUE__V64*/ meltfptr[63])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[31] = (melt_ptr_t) ( /*_.CLASS_LITERAL_VALUE__V64*/ meltfptr[63]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1263*/ meltfptr[1262]); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[32] = (melt_ptr_t) ( /*_.VALCLO___V1263*/ meltfptr[1262]); MELT_LOCATION ("warmelt-genobj.melt:1640:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1367*/ meltfptr[1366])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1201__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1367*/ meltfptr[1366])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:1640:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1367*/ meltfptr[1366])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1201__LAMBDA_#1", NULL != ( /*_.CLASS_NREP_LITERALNAMEDVALUE__V62*/ meltfptr[61])); ((meltroutine_ptr_t) /*_.VALROUT___V1367*/ meltfptr[1366])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_LITERALNAMEDVALUE__V62*/ meltfptr[61]); MELT_LOCATION ("warmelt-genobj.melt:1640:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1367*/ meltfptr[1366])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1201__LAMBDA_#2", NULL != ( /*_.CLASS_NREP_LITERALVALUE__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V1367*/ meltfptr[1366])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NREP_LITERALVALUE__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-genobj.melt:1640:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1367*/ meltfptr[1366])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1201__LAMBDA_#3", NULL != ( /*_.CLASS_LITERAL_VALUE__V64*/ meltfptr[63])); ((meltroutine_ptr_t) /*_.VALROUT___V1367*/ meltfptr[1366])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_LITERAL_VALUE__V64*/ meltfptr[63]); MELT_LOCATION ("warmelt-genobj.melt:1640:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1367*/ meltfptr[1366])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1263*/ meltfptr[1262]); ((meltroutine_ptr_t) /*_.VALROUT___V1367*/ meltfptr[1366])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V1263*/ meltfptr[1262]); MELT_LOCATION ("warmelt-genobj.melt:1640:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1367*/ meltfptr[1366]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#33", NULL != ( /*_.VALROUT___V1367*/ meltfptr[1366])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[33] = (melt_ptr_t) ( /*_.VALROUT___V1367*/ meltfptr[1366]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1129*/ meltfptr[1128]); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[34] = (melt_ptr_t) ( /*_.VALCLO___V1129*/ meltfptr[1128]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#35", NULL != ( /*_.CTYPE_VOID__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[35] = (melt_ptr_t) ( /*_.CTYPE_VOID__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V918*/ meltfptr[917]); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[36] = (melt_ptr_t) ( /*_.VALDATA___V918*/ meltfptr[917]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#37", NULL != ( /*_.REFERENCED_VALUE__V65*/ meltfptr[64])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[37] = (melt_ptr_t) ( /*_.REFERENCED_VALUE__V65*/ meltfptr[64]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#38", NULL != ( /*_.ENV_PREV__V66*/ meltfptr[65])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[38] = (melt_ptr_t) ( /*_.ENV_PREV__V66*/ meltfptr[65]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#39", NULL != ( /*_.LIST_TO_MULTIPLE__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[39] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#40", NULL != ( /*_.DISCR_MULTIPLE__V18*/ meltfptr[17])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[40] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V18*/ meltfptr[17]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#41", NULL != ( /*_.CLASS_NREP_BOUND_DATA__V53*/ meltfptr[52])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[41] = (melt_ptr_t) ( /*_.CLASS_NREP_BOUND_DATA__V53*/ meltfptr[52]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#42", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[42] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:1704:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1368*/ meltfptr[1367])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1212__LAMBDA_#0", NULL != ( /*_.CLASS_NREP_BOUND_DATA__V53*/ meltfptr[52])); ((meltroutine_ptr_t) /*_.VALROUT___V1368*/ meltfptr[1367])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_BOUND_DATA__V53*/ meltfptr[52]); MELT_LOCATION ("warmelt-genobj.melt:1704:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1368*/ meltfptr[1367])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1212__LAMBDA_#1", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1368*/ meltfptr[1367])->tabval[1] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:1704:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1368*/ meltfptr[1367]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#43", NULL != ( /*_.VALROUT___V1368*/ meltfptr[1367])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[43] = (melt_ptr_t) ( /*_.VALROUT___V1368*/ meltfptr[1367]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1088*/ meltfptr[1087]); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[44] = (melt_ptr_t) ( /*_.VALDATA___V1088*/ meltfptr[1087]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#45", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[45] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#46", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[46] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:1718:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1369*/ meltfptr[1368])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1213__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1369*/ meltfptr[1368])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:1718:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1369*/ meltfptr[1368])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1213__LAMBDA_#1", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1369*/ meltfptr[1368])->tabval[1] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:1718:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1369*/ meltfptr[1368]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#47", NULL != ( /*_.VALROUT___V1369*/ meltfptr[1368])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[47] = (melt_ptr_t) ( /*_.VALROUT___V1369*/ meltfptr[1368]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#48", NULL != ( /*_.MULTIPLE_EVERY__V54*/ meltfptr[53])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[48] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V54*/ meltfptr[53]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V288*/ meltfptr[287]); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[49] = (melt_ptr_t) ( /*_.VALDATA___V288*/ meltfptr[287]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#50", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[50] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#51", NULL != ( /*_.CLASS_NREP_DATAKEYWORD__V55*/ meltfptr[54])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[51] = (melt_ptr_t) ( /*_.CLASS_NREP_DATAKEYWORD__V55*/ meltfptr[54]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V722*/ meltfptr[721]); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[52] = (melt_ptr_t) ( /*_.VALDATA___V722*/ meltfptr[721]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#53", NULL != ( /*_.CLASS_NREP_DATASYMBOL__V56*/ meltfptr[55])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[53] = (melt_ptr_t) ( /*_.CLASS_NREP_DATASYMBOL__V56*/ meltfptr[55]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V716*/ meltfptr[715]); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[54] = (melt_ptr_t) ( /*_.VALDATA___V716*/ meltfptr[715]); MELT_LOCATION ("warmelt-genobj.melt:1729:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1370*/ meltfptr[1369])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V288*/ meltfptr[287]); ((meltroutine_ptr_t) /*_.VALROUT___V1370*/ meltfptr[1369])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V288*/ meltfptr[287]); MELT_LOCATION ("warmelt-genobj.melt:1729:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1370*/ meltfptr[1369])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1214__LAMBDA_#1", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1370*/ meltfptr[1369])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:1729:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1370*/ meltfptr[1369])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1214__LAMBDA_#2", NULL != ( /*_.CLASS_NREP_DATAKEYWORD__V55*/ meltfptr[54])); ((meltroutine_ptr_t) /*_.VALROUT___V1370*/ meltfptr[1369])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NREP_DATAKEYWORD__V55*/ meltfptr[54]); MELT_LOCATION ("warmelt-genobj.melt:1729:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1370*/ meltfptr[1369])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V722*/ meltfptr[721]); ((meltroutine_ptr_t) /*_.VALROUT___V1370*/ meltfptr[1369])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V722*/ meltfptr[721]); MELT_LOCATION ("warmelt-genobj.melt:1729:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1370*/ meltfptr[1369])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1214__LAMBDA_#4", NULL != ( /*_.CLASS_NREP_DATASYMBOL__V56*/ meltfptr[55])); ((meltroutine_ptr_t) /*_.VALROUT___V1370*/ meltfptr[1369])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_NREP_DATASYMBOL__V56*/ meltfptr[55]); MELT_LOCATION ("warmelt-genobj.melt:1729:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1370*/ meltfptr[1369])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V716*/ meltfptr[715]); ((meltroutine_ptr_t) /*_.VALROUT___V1370*/ meltfptr[1369])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V716*/ meltfptr[715]); MELT_LOCATION ("warmelt-genobj.melt:1729:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1370*/ meltfptr[1369]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#55", NULL != ( /*_.VALROUT___V1370*/ meltfptr[1369])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[55] = (melt_ptr_t) ( /*_.VALROUT___V1370*/ meltfptr[1369]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#56", NULL != ( /*_.LIST_EVERY__V44*/ meltfptr[43])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[56] = (melt_ptr_t) ( /*_.LIST_EVERY__V44*/ meltfptr[43]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#57", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[57] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#58", NULL != ( /*_.CLASS_NREP_LITERALNAMEDVALUE__V62*/ meltfptr[61])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[58] = (melt_ptr_t) ( /*_.CLASS_NREP_LITERALNAMEDVALUE__V62*/ meltfptr[61]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#59", NULL != ( /*_.CLASS_NREP_LITERALVALUE__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[59] = (melt_ptr_t) ( /*_.CLASS_NREP_LITERALVALUE__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#60", NULL != ( /*_.CLASS_LITERAL_VALUE__V64*/ meltfptr[63])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[60] = (melt_ptr_t) ( /*_.CLASS_LITERAL_VALUE__V64*/ meltfptr[63]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#61", NULL != ( /*_.CLASS_MODULE_CONTEXT__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[61] = (melt_ptr_t) ( /*_.CLASS_MODULE_CONTEXT__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1151*/ meltfptr[1150]); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[62] = (melt_ptr_t) ( /*_.VALCLO___V1151*/ meltfptr[1150]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#63", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[63] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1171*/ meltfptr[1170]); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[64] = (melt_ptr_t) ( /*_.VALDATA___V1171*/ meltfptr[1170]); MELT_LOCATION ("warmelt-genobj.melt:1759:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1371*/ meltfptr[1370])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1215__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1371*/ meltfptr[1370])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:1759:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1371*/ meltfptr[1370])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1215__LAMBDA_#1", NULL != ( /*_.CLASS_NREP_LITERALNAMEDVALUE__V62*/ meltfptr[61])); ((meltroutine_ptr_t) /*_.VALROUT___V1371*/ meltfptr[1370])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_LITERALNAMEDVALUE__V62*/ meltfptr[61]); MELT_LOCATION ("warmelt-genobj.melt:1759:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1371*/ meltfptr[1370])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1215__LAMBDA_#2", NULL != ( /*_.CLASS_NREP_LITERALVALUE__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V1371*/ meltfptr[1370])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NREP_LITERALVALUE__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-genobj.melt:1759:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1371*/ meltfptr[1370])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1215__LAMBDA_#3", NULL != ( /*_.CLASS_LITERAL_VALUE__V64*/ meltfptr[63])); ((meltroutine_ptr_t) /*_.VALROUT___V1371*/ meltfptr[1370])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_LITERAL_VALUE__V64*/ meltfptr[63]); MELT_LOCATION ("warmelt-genobj.melt:1759:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1371*/ meltfptr[1370])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1215__LAMBDA_#4", NULL != ( /*_.CLASS_MODULE_CONTEXT__V35*/ meltfptr[34])); ((meltroutine_ptr_t) /*_.VALROUT___V1371*/ meltfptr[1370])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_MODULE_CONTEXT__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-genobj.melt:1759:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1371*/ meltfptr[1370])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1151*/ meltfptr[1150]); ((meltroutine_ptr_t) /*_.VALROUT___V1371*/ meltfptr[1370])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1151*/ meltfptr[1150]); MELT_LOCATION ("warmelt-genobj.melt:1759:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1371*/ meltfptr[1370])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1215__LAMBDA_#6", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1371*/ meltfptr[1370])->tabval[6] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:1759:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1371*/ meltfptr[1370])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1171*/ meltfptr[1170]); ((meltroutine_ptr_t) /*_.VALROUT___V1371*/ meltfptr[1370])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V1171*/ meltfptr[1170]); MELT_LOCATION ("warmelt-genobj.melt:1759:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1371*/ meltfptr[1370]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#65", NULL != ( /*_.VALROUT___V1371*/ meltfptr[1370])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[65] = (melt_ptr_t) ( /*_.VALROUT___V1371*/ meltfptr[1370]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#66", NULL != ( /*_.CLASS_NREP_ROUTPROC__V34*/ meltfptr[33])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[66] = (melt_ptr_t) ( /*_.CLASS_NREP_ROUTPROC__V34*/ meltfptr[33]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1179__COMPILE2OBJ_INITEXTENDPROC#67", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[67] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V184*/ meltfptr[183]); ((meltroutine_ptr_t) /*_.VALROUT___V1354*/ meltfptr[1353])->tabval[68] = (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]); MELT_LOCATION ("warmelt-genobj.melt:1517:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1354*/ meltfptr[1353]); /*putclosurout#23 */ melt_assertmsg ("putclosrout#23 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1372*/ meltfptr[1371])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#23 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1372*/ meltfptr[1371])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1354*/ meltfptr[1353]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1372*/ meltfptr[1371]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1373*/ meltfptr[1372])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1373*/ meltfptr[1372])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1373*/ meltfptr[1372]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1374*/ meltfptr[1373]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1373*/ meltfptr[1372]); melt_dbgtrace_written_object ( /*_.VALDATA___V1373*/ meltfptr[1372], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1375*/ meltfptr[1374])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1375*/ meltfptr[1374])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1375*/ meltfptr[1374]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1376*/ meltfptr[1375]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1375*/ meltfptr[1374]); melt_dbgtrace_written_object ( /*_.VALDATA___V1375*/ meltfptr[1374], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1377*/ meltfptr[1376])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1377*/ meltfptr[1376])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1377*/ meltfptr[1376]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1378*/ meltfptr[1377]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1377*/ meltfptr[1376]); melt_dbgtrace_written_object ( /*_.VALDATA___V1377*/ meltfptr[1376], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1379*/ meltfptr[1378])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1379*/ meltfptr[1378])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1379*/ meltfptr[1378]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1380*/ meltfptr[1379]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1379*/ meltfptr[1378]); melt_dbgtrace_written_object ( /*_.VALDATA___V1379*/ meltfptr[1378], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1381*/ meltfptr[1380])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1381*/ meltfptr[1380])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1381*/ meltfptr[1380]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1382*/ meltfptr[1381]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1381*/ meltfptr[1380]); melt_dbgtrace_written_object ( /*_.VALDATA___V1381*/ meltfptr[1380], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1383*/ meltfptr[1382])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1383*/ meltfptr[1382])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1383*/ meltfptr[1382]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1384*/ meltfptr[1383]); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_23 */ void meltmod__warmelt_genobj__initialmeltchunk_24 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*touch:VALUEDATA_*/ meltgc_touch ( /*_.VALDATA___V1383*/ meltfptr[1382]); melt_dbgtrace_written_object ( /*_.VALDATA___V1383*/ meltfptr[1382], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1385*/ meltfptr[1384])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1385*/ meltfptr[1384])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1385*/ meltfptr[1384]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1386*/ meltfptr[1385]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1385*/ meltfptr[1384]); melt_dbgtrace_written_object ( /*_.VALDATA___V1385*/ meltfptr[1384], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1387*/ meltfptr[1386])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1387*/ meltfptr[1386])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1387*/ meltfptr[1386]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1388*/ meltfptr[1387]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1387*/ meltfptr[1386]); melt_dbgtrace_written_object ( /*_.VALDATA___V1387*/ meltfptr[1386], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1389*/ meltfptr[1388])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1389*/ meltfptr[1388])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1389*/ meltfptr[1388]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1390*/ meltfptr[1389]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1389*/ meltfptr[1388]); melt_dbgtrace_written_object ( /*_.VALDATA___V1389*/ meltfptr[1388], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1391*/ meltfptr[1390])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1391*/ meltfptr[1390])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1391*/ meltfptr[1390]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1392*/ meltfptr[1391]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1391*/ meltfptr[1390]); melt_dbgtrace_written_object ( /*_.VALDATA___V1391*/ meltfptr[1390], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1393*/ meltfptr[1392])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1393*/ meltfptr[1392])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1393*/ meltfptr[1392]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1394*/ meltfptr[1393]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1393*/ meltfptr[1392]); melt_dbgtrace_written_object ( /*_.VALDATA___V1393*/ meltfptr[1392], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1395*/ meltfptr[1394])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1395*/ meltfptr[1394])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1395*/ meltfptr[1394]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1396*/ meltfptr[1395]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1395*/ meltfptr[1394]); melt_dbgtrace_written_object ( /*_.VALDATA___V1395*/ meltfptr[1394], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1397*/ meltfptr[1396])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1397*/ meltfptr[1396])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1397*/ meltfptr[1396]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1398*/ meltfptr[1397]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1397*/ meltfptr[1396]); melt_dbgtrace_written_object ( /*_.VALDATA___V1397*/ meltfptr[1396], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1399*/ meltfptr[1398])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1399*/ meltfptr[1398])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1399*/ meltfptr[1398]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1400*/ meltfptr[1399]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1399*/ meltfptr[1398]); melt_dbgtrace_written_object ( /*_.VALDATA___V1399*/ meltfptr[1398], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:1989:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1401*/ meltfptr[1400])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1232__DISPOSE_OBJLOC#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1401*/ meltfptr[1400])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:1989:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1401*/ meltfptr[1400])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V190*/ meltfptr[189]); ((meltroutine_ptr_t) /*_.VALROUT___V1401*/ meltfptr[1400])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189]); MELT_LOCATION ("warmelt-genobj.melt:1989:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1401*/ meltfptr[1400])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1232__DISPOSE_OBJLOC#2", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1401*/ meltfptr[1400])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:1989:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1401*/ meltfptr[1400])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1232__DISPOSE_OBJLOC#3", NULL != ( /*_.CTYPE_VOID__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1401*/ meltfptr[1400])->tabval[3] = (melt_ptr_t) ( /*_.CTYPE_VOID__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-genobj.melt:1989:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1401*/ meltfptr[1400])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1232__DISPOSE_OBJLOC#4", NULL != ( /*_.CLASS_CTYPE__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1401*/ meltfptr[1400])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-genobj.melt:1989:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1401*/ meltfptr[1400])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1232__DISPOSE_OBJLOC#5", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1401*/ meltfptr[1400])->tabval[5] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:1989:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1401*/ meltfptr[1400])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1232__DISPOSE_OBJLOC#6", NULL != ( /*_.CTYPE_LONG__V43*/ meltfptr[42])); ((meltroutine_ptr_t) /*_.VALROUT___V1401*/ meltfptr[1400])->tabval[6] = (melt_ptr_t) ( /*_.CTYPE_LONG__V43*/ meltfptr[42]); MELT_LOCATION ("warmelt-genobj.melt:1989:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1401*/ meltfptr[1400])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1024*/ meltfptr[1023]); ((meltroutine_ptr_t) /*_.VALROUT___V1401*/ meltfptr[1400])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V1024*/ meltfptr[1023]); MELT_LOCATION ("warmelt-genobj.melt:1989:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1401*/ meltfptr[1400]); /*putclosurout#24 */ melt_assertmsg ("putclosrout#24 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1402*/ meltfptr[1401])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#24 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1401*/ meltfptr[1400])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1402*/ meltfptr[1401])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1401*/ meltfptr[1400]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1402*/ meltfptr[1401]); MELT_LOCATION ("warmelt-genobj.melt:2020:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1403*/ meltfptr[1402])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1234__DISPOSE_BND_OBJ#0", NULL != ( /*_.CLASS_ANY_BINDING__V48*/ meltfptr[47])); ((meltroutine_ptr_t) /*_.VALROUT___V1403*/ meltfptr[1402])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V48*/ meltfptr[47]); MELT_LOCATION ("warmelt-genobj.melt:2020:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1403*/ meltfptr[1402])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1234__DISPOSE_BND_OBJ#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1403*/ meltfptr[1402])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:2020:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1403*/ meltfptr[1402])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1234__DISPOSE_BND_OBJ#2", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1403*/ meltfptr[1402])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:2020:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1403*/ meltfptr[1402])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1234__DISPOSE_BND_OBJ#3", NULL != ( /*_.CLASS_LET_BINDING__V67*/ meltfptr[66])); ((meltroutine_ptr_t) /*_.VALROUT___V1403*/ meltfptr[1402])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_LET_BINDING__V67*/ meltfptr[66]); MELT_LOCATION ("warmelt-genobj.melt:2020:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1403*/ meltfptr[1402])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1234__DISPOSE_BND_OBJ#4", NULL != ( /*_.CTYPE_VOID__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1403*/ meltfptr[1402])->tabval[4] = (melt_ptr_t) ( /*_.CTYPE_VOID__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-genobj.melt:2020:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1403*/ meltfptr[1402])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V190*/ meltfptr[189]); ((meltroutine_ptr_t) /*_.VALROUT___V1403*/ meltfptr[1402])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189]); MELT_LOCATION ("warmelt-genobj.melt:2020:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1403*/ meltfptr[1402])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1402*/ meltfptr[1401]); ((meltroutine_ptr_t) /*_.VALROUT___V1403*/ meltfptr[1402])->tabval[6] = (melt_ptr_t) ( /*_.VALCLO___V1402*/ meltfptr[1401]); MELT_LOCATION ("warmelt-genobj.melt:2020:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1403*/ meltfptr[1402]); /*putclosurout#25 */ melt_assertmsg ("putclosrout#25 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1404*/ meltfptr[1403])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#25 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1403*/ meltfptr[1402])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1404*/ meltfptr[1403])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1403*/ meltfptr[1402]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1404*/ meltfptr[1403]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1405*/ meltfptr[1404])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1405*/ meltfptr[1404])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1405*/ meltfptr[1404]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1406*/ meltfptr[1405]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1405*/ meltfptr[1404]); melt_dbgtrace_written_object ( /*_.VALDATA___V1405*/ meltfptr[1404], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:2041:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1407*/ meltfptr[1406])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1238__COMPILOBJ_NREP_CHUNK#0", NULL != ( /*_.CLASS_NREP_CHUNK__V68*/ meltfptr[67])); ((meltroutine_ptr_t) /*_.VALROUT___V1407*/ meltfptr[1406])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_CHUNK__V68*/ meltfptr[67]); MELT_LOCATION ("warmelt-genobj.melt:2041:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1407*/ meltfptr[1406])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1238__COMPILOBJ_NREP_CHUNK#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1407*/ meltfptr[1406])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:2041:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1407*/ meltfptr[1406])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1238__COMPILOBJ_NREP_CHUNK#2", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1407*/ meltfptr[1406])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:2041:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1407*/ meltfptr[1406])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1238__COMPILOBJ_NREP_CHUNK#3", NULL != ( /*_.CLASS_NAMED__V8*/ meltfptr[7])); ((meltroutine_ptr_t) /*_.VALROUT___V1407*/ meltfptr[1406])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-genobj.melt:2041:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1407*/ meltfptr[1406])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1238__COMPILOBJ_NREP_CHUNK#4", NULL != ( /*_.CLASS_CTYPE__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1407*/ meltfptr[1406])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-genobj.melt:2041:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1407*/ meltfptr[1406])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1238__COMPILOBJ_NREP_CHUNK#5", NULL != ( /*_.MULTIPLE_MAP__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V1407*/ meltfptr[1406])->tabval[5] = (melt_ptr_t) ( /*_.MULTIPLE_MAP__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-genobj.melt:2041:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1407*/ meltfptr[1406])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1238__COMPILOBJ_NREP_CHUNK#6", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1407*/ meltfptr[1406])->tabval[6] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:2041:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1407*/ meltfptr[1406])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1238__COMPILOBJ_NREP_CHUNK#7", NULL != ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1407*/ meltfptr[1406])->tabval[7] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-genobj.melt:2041:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1407*/ meltfptr[1406])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1238__COMPILOBJ_NREP_CHUNK#8", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1407*/ meltfptr[1406])->tabval[8] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:2055:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1408*/ meltfptr[1407])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1242__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1408*/ meltfptr[1407])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:2055:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1408*/ meltfptr[1407])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1242__LAMBDA_#1", NULL != ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1408*/ meltfptr[1407])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-genobj.melt:2055:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1408*/ meltfptr[1407])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1242__LAMBDA_#2", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1408*/ meltfptr[1407])->tabval[2] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:2055:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1408*/ meltfptr[1407]); MELT_LOCATION ("warmelt-genobj.melt:2041:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1407*/ meltfptr[1406])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1238__COMPILOBJ_NREP_CHUNK#9", NULL != ( /*_.VALROUT___V1408*/ meltfptr[1407])); ((meltroutine_ptr_t) /*_.VALROUT___V1407*/ meltfptr[1406])->tabval[9] = (melt_ptr_t) ( /*_.VALROUT___V1408*/ meltfptr[1407]); MELT_LOCATION ("warmelt-genobj.melt:2041:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1407*/ meltfptr[1406])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V372*/ meltfptr[371]); ((meltroutine_ptr_t) /*_.VALROUT___V1407*/ meltfptr[1406])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V372*/ meltfptr[371]); MELT_LOCATION ("warmelt-genobj.melt:2041:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1407*/ meltfptr[1406])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V362*/ meltfptr[361]); ((meltroutine_ptr_t) /*_.VALROUT___V1407*/ meltfptr[1406])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V362*/ meltfptr[361]); MELT_LOCATION ("warmelt-genobj.melt:2041:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1407*/ meltfptr[1406]); /*putclosurout#26 */ melt_assertmsg ("putclosrout#26 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1409*/ meltfptr[1408])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#26 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1407*/ meltfptr[1406])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1409*/ meltfptr[1408])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1407*/ meltfptr[1406]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1409*/ meltfptr[1408]); /*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-genobj.melt:2080:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1412*/ meltfptr[1411])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1243__GETCTYPE_TYPEXPR#0", NULL != ( /*_.CLASS_NREP_TYPED_EXPRESSION__V69*/ meltfptr[68])); ((meltroutine_ptr_t) /*_.VALROUT___V1412*/ meltfptr[1411])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_TYPED_EXPRESSION__V69*/ meltfptr[68]); MELT_LOCATION ("warmelt-genobj.melt:2080:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1412*/ meltfptr[1411]); /*putclosurout#27 */ melt_assertmsg ("putclosrout#27 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1413*/ meltfptr[1412])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#27 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1412*/ meltfptr[1411])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1413*/ meltfptr[1412])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1412*/ meltfptr[1411]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1413*/ meltfptr[1412]); /*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-genobj.melt:2086:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1416*/ meltfptr[1415])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1247__COMPILOBJ_NREP_NIL#0", NULL != ( /*_.CLASS_NREP_NIL__V70*/ meltfptr[69])); ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_NIL__V70*/ meltfptr[69]); MELT_LOCATION ("warmelt-genobj.melt:2086:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1416*/ meltfptr[1415])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1247__COMPILOBJ_NREP_NIL#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:2086:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1416*/ meltfptr[1415])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V242*/ meltfptr[241]); ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V242*/ meltfptr[241]); MELT_LOCATION ("warmelt-genobj.melt:2086:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1416*/ meltfptr[1415])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1247__COMPILOBJ_NREP_NIL#3", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1416*/ meltfptr[1415])->tabval[3] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:2086:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1416*/ meltfptr[1415]); /*putclosurout#28 */ melt_assertmsg ("putclosrout#28 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1417*/ meltfptr[1416])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#28 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1416*/ meltfptr[1415])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1417*/ meltfptr[1416])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1416*/ meltfptr[1415]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1417*/ meltfptr[1416]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1418*/ meltfptr[1417])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1418*/ meltfptr[1417])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1418*/ meltfptr[1417]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1419*/ meltfptr[1418]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1418*/ meltfptr[1417]); melt_dbgtrace_written_object ( /*_.VALDATA___V1418*/ meltfptr[1417], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:2097:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1420*/ meltfptr[1419])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1251__COMPILOBJ_NREP_COMMENT#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1420*/ meltfptr[1419])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:2097:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1420*/ meltfptr[1419])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1251__COMPILOBJ_NREP_COMMENT#1", NULL != ( /*_.CLASS_NREP_COMMENT__V71*/ meltfptr[70])); ((meltroutine_ptr_t) /*_.VALROUT___V1420*/ meltfptr[1419])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_COMMENT__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-genobj.melt:2097:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1420*/ meltfptr[1419])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1251__COMPILOBJ_NREP_COMMENT#2", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1420*/ meltfptr[1419])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:2097:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1420*/ meltfptr[1419])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1251__COMPILOBJ_NREP_COMMENT#3", NULL != ( /*_.DISCR_STRBUF__V32*/ meltfptr[31])); ((meltroutine_ptr_t) /*_.VALROUT___V1420*/ meltfptr[1419])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-genobj.melt:2097:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1420*/ meltfptr[1419])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1251__COMPILOBJ_NREP_COMMENT#4", NULL != ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1420*/ meltfptr[1419])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-genobj.melt:2097:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1420*/ meltfptr[1419])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V436*/ meltfptr[435]); ((meltroutine_ptr_t) /*_.VALROUT___V1420*/ meltfptr[1419])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V436*/ meltfptr[435]); MELT_LOCATION ("warmelt-genobj.melt:2097:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1420*/ meltfptr[1419])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1251__COMPILOBJ_NREP_COMMENT#6", NULL != ( /*_.CTYPE_VOID__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1420*/ meltfptr[1419])->tabval[6] = (melt_ptr_t) ( /*_.CTYPE_VOID__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-genobj.melt:2097:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1420*/ meltfptr[1419]); /*putclosurout#29 */ melt_assertmsg ("putclosrout#29 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1421*/ meltfptr[1420])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#29 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1420*/ meltfptr[1419])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1421*/ meltfptr[1420])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1420*/ meltfptr[1419]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1421*/ meltfptr[1420]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1422*/ meltfptr[1421])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1422*/ meltfptr[1421])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1422*/ meltfptr[1421]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1423*/ meltfptr[1422]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1422*/ meltfptr[1421]); melt_dbgtrace_written_object ( /*_.VALDATA___V1422*/ meltfptr[1421], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:2121:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1424*/ meltfptr[1423])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1255__COMPILOBJ_NREP_LOCSYMOCC#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1424*/ meltfptr[1423])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:2121:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1424*/ meltfptr[1423])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1255__COMPILOBJ_NREP_LOCSYMOCC#1", NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V72*/ meltfptr[71])); ((meltroutine_ptr_t) /*_.VALROUT___V1424*/ meltfptr[1423])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V72*/ meltfptr[71]); MELT_LOCATION ("warmelt-genobj.melt:2121:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1424*/ meltfptr[1423])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1255__COMPILOBJ_NREP_LOCSYMOCC#2", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1424*/ meltfptr[1423])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:2121:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1424*/ meltfptr[1423])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1255__COMPILOBJ_NREP_LOCSYMOCC#3", NULL != ( /*_.CTYPE_VOID__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1424*/ meltfptr[1423])->tabval[3] = (melt_ptr_t) ( /*_.CTYPE_VOID__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-genobj.melt:2121:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1424*/ meltfptr[1423])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V190*/ meltfptr[189]); ((meltroutine_ptr_t) /*_.VALROUT___V1424*/ meltfptr[1423])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189]); MELT_LOCATION ("warmelt-genobj.melt:2121:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1424*/ meltfptr[1423]); /*putclosurout#30 */ melt_assertmsg ("putclosrout#30 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1425*/ meltfptr[1424])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#30 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1424*/ meltfptr[1423])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1425*/ meltfptr[1424])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1424*/ meltfptr[1423]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1425*/ meltfptr[1424]); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1426*/ meltfptr[1425]); melt_dbgtrace_written_object ( /*_.VALDATA___V1426*/ meltfptr[1425], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:2149:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1428*/ meltfptr[1427])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1259__COMPILOBJ_NREP_CLOSEDOCC#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1428*/ meltfptr[1427])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:2149:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1428*/ meltfptr[1427])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1259__COMPILOBJ_NREP_CLOSEDOCC#1", NULL != ( /*_.CLASS_NREP_CLOSEDOCC__V73*/ meltfptr[72])); ((meltroutine_ptr_t) /*_.VALROUT___V1428*/ meltfptr[1427])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_CLOSEDOCC__V73*/ meltfptr[72]); MELT_LOCATION ("warmelt-genobj.melt:2149:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1428*/ meltfptr[1427])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1259__COMPILOBJ_NREP_CLOSEDOCC#2", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1428*/ meltfptr[1427])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:2149:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1428*/ meltfptr[1427])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1259__COMPILOBJ_NREP_CLOSEDOCC#3", NULL != ( /*_.CLASS_NREP_ROUTPROC__V34*/ meltfptr[33])); ((meltroutine_ptr_t) /*_.VALROUT___V1428*/ meltfptr[1427])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NREP_ROUTPROC__V34*/ meltfptr[33]); MELT_LOCATION ("warmelt-genobj.melt:2149:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1428*/ meltfptr[1427])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V208*/ meltfptr[207]); ((meltroutine_ptr_t) /*_.VALROUT___V1428*/ meltfptr[1427])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V208*/ meltfptr[207]); MELT_LOCATION ("warmelt-genobj.melt:2149:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1428*/ meltfptr[1427])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1259__COMPILOBJ_NREP_CLOSEDOCC#5", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1428*/ meltfptr[1427])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:2149:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1428*/ meltfptr[1427])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1259__COMPILOBJ_NREP_CLOSEDOCC#6", NULL != ( /*_.CLASS_CTYPE__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1428*/ meltfptr[1427])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-genobj.melt:2149:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1428*/ meltfptr[1427]); /*putclosurout#31 */ melt_assertmsg ("putclosrout#31 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1429*/ meltfptr[1428])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#31 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1428*/ meltfptr[1427])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1429*/ meltfptr[1428])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1428*/ meltfptr[1427]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1429*/ meltfptr[1428]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1430*/ meltfptr[1429])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1430*/ meltfptr[1429])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1430*/ meltfptr[1429]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1431*/ meltfptr[1430]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1430*/ meltfptr[1429]); melt_dbgtrace_written_object ( /*_.VALDATA___V1430*/ meltfptr[1429], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:2199:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1432*/ meltfptr[1431])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1263__COMPILOBJ_NREP_CONSTOCC#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1432*/ meltfptr[1431])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:2199:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1432*/ meltfptr[1431])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1263__COMPILOBJ_NREP_CONSTOCC#1", NULL != ( /*_.CLASS_NREP_CONSTOCC__V74*/ meltfptr[73])); ((meltroutine_ptr_t) /*_.VALROUT___V1432*/ meltfptr[1431])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_CONSTOCC__V74*/ meltfptr[73]); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_24 */ void meltmod__warmelt_genobj__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-genobj.melt:2199:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1432*/ meltfptr[1431])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1263__COMPILOBJ_NREP_CONSTOCC#2", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1432*/ meltfptr[1431])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:2199:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1432*/ meltfptr[1431])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1263__COMPILOBJ_NREP_CONSTOCC#3", NULL != ( /*_.CLASS_NREP_ROUTPROC__V34*/ meltfptr[33])); ((meltroutine_ptr_t) /*_.VALROUT___V1432*/ meltfptr[1431])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NREP_ROUTPROC__V34*/ meltfptr[33]); MELT_LOCATION ("warmelt-genobj.melt:2199:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1432*/ meltfptr[1431])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V226*/ meltfptr[225]); ((meltroutine_ptr_t) /*_.VALROUT___V1432*/ meltfptr[1431])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V226*/ meltfptr[225]); MELT_LOCATION ("warmelt-genobj.melt:2199:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1432*/ meltfptr[1431])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1263__COMPILOBJ_NREP_CONSTOCC#5", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1432*/ meltfptr[1431])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:2199:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1432*/ meltfptr[1431])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1263__COMPILOBJ_NREP_CONSTOCC#6", NULL != ( /*_.CLASS_CTYPE__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1432*/ meltfptr[1431])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-genobj.melt:2199:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1432*/ meltfptr[1431]); /*putclosurout#32 */ melt_assertmsg ("putclosrout#32 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1433*/ meltfptr[1432])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#32 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1432*/ meltfptr[1431])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1433*/ meltfptr[1432])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1432*/ meltfptr[1431]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1433*/ meltfptr[1432]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1434*/ meltfptr[1433])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1434*/ meltfptr[1433])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1434*/ meltfptr[1433]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1435*/ meltfptr[1434]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1434*/ meltfptr[1433]); melt_dbgtrace_written_object ( /*_.VALDATA___V1434*/ meltfptr[1433], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:2247:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1436*/ meltfptr[1435])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1267__COMPILOBJ_NREP_IMPORTEDVAL#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1436*/ meltfptr[1435])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:2247:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1436*/ meltfptr[1435])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1267__COMPILOBJ_NREP_IMPORTEDVAL#1", NULL != ( /*_.CLASS_INITIAL_GENERATION_CONTEXT__V46*/ meltfptr[45])); ((meltroutine_ptr_t) /*_.VALROUT___V1436*/ meltfptr[1435])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_INITIAL_GENERATION_CONTEXT__V46*/ meltfptr[45]); MELT_LOCATION ("warmelt-genobj.melt:2247:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1436*/ meltfptr[1435])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1267__COMPILOBJ_NREP_IMPORTEDVAL#2", NULL != ( /*_.CLASS_NREP_IMPORTEDVAL__V52*/ meltfptr[51])); ((meltroutine_ptr_t) /*_.VALROUT___V1436*/ meltfptr[1435])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NREP_IMPORTEDVAL__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-genobj.melt:2247:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1436*/ meltfptr[1435])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1267__COMPILOBJ_NREP_IMPORTEDVAL#3", NULL != ( /*_.CLASS_SYMBOL__V33*/ meltfptr[32])); ((meltroutine_ptr_t) /*_.VALROUT___V1436*/ meltfptr[1435])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V33*/ meltfptr[32]); MELT_LOCATION ("warmelt-genobj.melt:2247:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1436*/ meltfptr[1435])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V190*/ meltfptr[189]); ((meltroutine_ptr_t) /*_.VALROUT___V1436*/ meltfptr[1435])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189]); MELT_LOCATION ("warmelt-genobj.melt:2247:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1436*/ meltfptr[1435]); /*putclosurout#33 */ melt_assertmsg ("putclosrout#33 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1437*/ meltfptr[1436])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#33 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1436*/ meltfptr[1435])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1437*/ meltfptr[1436])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1436*/ meltfptr[1435]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1437*/ meltfptr[1436]); MELT_LOCATION ("warmelt-genobj.melt:2263:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1438*/ meltfptr[1437])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1269__COMPILOBJ_NREP_LITERALVALUE#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:2263:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1438*/ meltfptr[1437])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1269__COMPILOBJ_NREP_LITERALVALUE#1", NULL != ( /*_.CLASS_NREP_LITERALVALUE__V63*/ meltfptr[62])); ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_LITERALVALUE__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-genobj.melt:2263:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1438*/ meltfptr[1437])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1269__COMPILOBJ_NREP_LITERALVALUE#2", NULL != ( /*_.CLASS_LITERAL_VALUE__V64*/ meltfptr[63])); ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_LITERAL_VALUE__V64*/ meltfptr[63]); MELT_LOCATION ("warmelt-genobj.melt:2263:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1438*/ meltfptr[1437])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1269__COMPILOBJ_NREP_LITERALVALUE#3", NULL != ( /*_.CLASS_EXTENSION_GENERATION_CONTEXT__V61*/ meltfptr[60])); ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_EXTENSION_GENERATION_CONTEXT__V61*/ meltfptr[60]); MELT_LOCATION ("warmelt-genobj.melt:2263:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1438*/ meltfptr[1437])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1269__COMPILOBJ_NREP_LITERALVALUE#4", NULL != ( /*_.CLASS_NREP__V22*/ meltfptr[21])); ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_NREP__V22*/ meltfptr[21]); MELT_LOCATION ("warmelt-genobj.melt:2263:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1438*/ meltfptr[1437])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1153*/ meltfptr[1152]); ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1153*/ meltfptr[1152]); MELT_LOCATION ("warmelt-genobj.melt:2263:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1438*/ meltfptr[1437])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1269__COMPILOBJ_NREP_LITERALVALUE#6", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[6] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:2263:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1438*/ meltfptr[1437])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1269__COMPILOBJ_NREP_LITERALVALUE#7", NULL != ( /*_.STRING4OUT__V75*/ meltfptr[74])); ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[7] = (melt_ptr_t) ( /*_.STRING4OUT__V75*/ meltfptr[74]); MELT_LOCATION ("warmelt-genobj.melt:2263:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1438*/ meltfptr[1437])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1269__COMPILOBJ_NREP_LITERALVALUE#8", NULL != ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1438*/ meltfptr[1437])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-genobj.melt:2263:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1438*/ meltfptr[1437]); /*putclosurout#34 */ melt_assertmsg ("putclosrout#34 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1439*/ meltfptr[1438])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#34 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1438*/ meltfptr[1437])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1439*/ meltfptr[1438])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1438*/ meltfptr[1437]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1439*/ meltfptr[1438]); /*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-genobj.melt:2290:/ 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_1273__COMPILOBJ_NREP_DEFINEDCONSTANT#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1442*/ meltfptr[1441])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:2290:/ 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_1273__COMPILOBJ_NREP_DEFINEDCONSTANT#1", NULL != ( /*_.CLASS_INITIAL_GENERATION_CONTEXT__V46*/ meltfptr[45])); ((meltroutine_ptr_t) /*_.VALROUT___V1442*/ meltfptr[1441])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_INITIAL_GENERATION_CONTEXT__V46*/ meltfptr[45]); MELT_LOCATION ("warmelt-genobj.melt:2290:/ 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_1273__COMPILOBJ_NREP_DEFINEDCONSTANT#2", NULL != ( /*_.CLASS_NREP_DEFINED_CONSTANT__V76*/ meltfptr[75])); ((meltroutine_ptr_t) /*_.VALROUT___V1442*/ meltfptr[1441])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NREP_DEFINED_CONSTANT__V76*/ meltfptr[75]); MELT_LOCATION ("warmelt-genobj.melt:2290:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1442*/ meltfptr[1441]); /*putclosurout#35 */ melt_assertmsg ("putclosrout#35 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1443*/ meltfptr[1442])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#35 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"); MELT_LOCATION ("warmelt-genobj.melt:2309:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1446*/ meltfptr[1445])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1277__COMPILOBJ_NREP_QUASICONSTANT#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:2309:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1446*/ meltfptr[1445])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1277__COMPILOBJ_NREP_QUASICONSTANT#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:2309:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1446*/ meltfptr[1445])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1277__COMPILOBJ_NREP_QUASICONSTANT#2", NULL != ( /*_.CLASS_NREP_QUASICONSTANT__V77*/ meltfptr[76])); ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NREP_QUASICONSTANT__V77*/ meltfptr[76]); MELT_LOCATION ("warmelt-genobj.melt:2309:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1446*/ meltfptr[1445])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1277__COMPILOBJ_NREP_QUASICONSTANT#3", NULL != ( /*_.CLASS_NREP_ROUTPROC__V34*/ meltfptr[33])); ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NREP_ROUTPROC__V34*/ meltfptr[33]); MELT_LOCATION ("warmelt-genobj.melt:2309:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1446*/ meltfptr[1445])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1277__COMPILOBJ_NREP_QUASICONSTANT#4", NULL != ( /*_.DISCR_STRBUF__V32*/ meltfptr[31])); ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-genobj.melt:2309:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1446*/ meltfptr[1445])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1277__COMPILOBJ_NREP_QUASICONSTANT#5", NULL != ( /*_.CLASS_NAMED__V8*/ meltfptr[7])); ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-genobj.melt:2309:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1446*/ meltfptr[1445])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V226*/ meltfptr[225]); ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V226*/ meltfptr[225]); MELT_LOCATION ("warmelt-genobj.melt:2309:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1446*/ meltfptr[1445])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1277__COMPILOBJ_NREP_QUASICONSTANT#7", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[7] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:2309:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1446*/ meltfptr[1445])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1277__COMPILOBJ_NREP_QUASICONSTANT#8", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:2309:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1446*/ meltfptr[1445])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1277__COMPILOBJ_NREP_QUASICONSTANT#9", NULL != ( /*_.DISCR_STRING__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[9] = (melt_ptr_t) ( /*_.DISCR_STRING__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-genobj.melt:2309:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1446*/ meltfptr[1445])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1277__COMPILOBJ_NREP_QUASICONSTANT#10", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1446*/ meltfptr[1445])->tabval[10] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:2309:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1446*/ meltfptr[1445]); /*putclosurout#36 */ melt_assertmsg ("putclosrout#36 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1447*/ meltfptr[1446])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#36 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1446*/ meltfptr[1445])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1447*/ meltfptr[1446])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1446*/ meltfptr[1445]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1447*/ meltfptr[1446]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1448*/ meltfptr[1447])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1448*/ meltfptr[1447])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1448*/ meltfptr[1447]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1449*/ meltfptr[1448]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1448*/ meltfptr[1447]); melt_dbgtrace_written_object ( /*_.VALDATA___V1448*/ meltfptr[1447], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:2368:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1450*/ meltfptr[1449])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1281__COMPILOBJ_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1450*/ meltfptr[1449])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:2368:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1450*/ meltfptr[1449])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1281__COMPILOBJ_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER#1", NULL != ( /*_.CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V78*/ meltfptr[77])); ((meltroutine_ptr_t) /*_.VALROUT___V1450*/ meltfptr[1449])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V78*/ meltfptr[77]); MELT_LOCATION ("warmelt-genobj.melt:2368:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1450*/ meltfptr[1449])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1447*/ meltfptr[1446]); ((meltroutine_ptr_t) /*_.VALROUT___V1450*/ meltfptr[1449])->tabval[2] = (melt_ptr_t) ( /*_.VALCLO___V1447*/ meltfptr[1446]); MELT_LOCATION ("warmelt-genobj.melt:2368:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1450*/ meltfptr[1449])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1281__COMPILOBJ_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER#3", NULL != ( /*_.DISCR_STRBUF__V32*/ meltfptr[31])); ((meltroutine_ptr_t) /*_.VALROUT___V1450*/ meltfptr[1449])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-genobj.melt:2368:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1450*/ meltfptr[1449])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1281__COMPILOBJ_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER#4", NULL != ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1450*/ meltfptr[1449])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-genobj.melt:2368:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1450*/ meltfptr[1449])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V372*/ meltfptr[371]); ((meltroutine_ptr_t) /*_.VALROUT___V1450*/ meltfptr[1449])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V372*/ meltfptr[371]); MELT_LOCATION ("warmelt-genobj.melt:2368:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1450*/ meltfptr[1449])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1281__COMPILOBJ_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER#6", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1450*/ meltfptr[1449])->tabval[6] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:2368:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1450*/ meltfptr[1449]); /*putclosurout#37 */ melt_assertmsg ("putclosrout#37 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1451*/ meltfptr[1450])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#37 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1450*/ meltfptr[1449])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1451*/ meltfptr[1450])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1450*/ meltfptr[1449]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1451*/ meltfptr[1450]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1452*/ meltfptr[1451])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1452*/ meltfptr[1451])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1452*/ meltfptr[1451]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1453*/ meltfptr[1452]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1452*/ meltfptr[1451]); melt_dbgtrace_written_object ( /*_.VALDATA___V1452*/ meltfptr[1451], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:2396:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1454*/ meltfptr[1453])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1285__COMPILOBJ_NREP_FOREVER#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1454*/ meltfptr[1453])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:2396:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1454*/ meltfptr[1453])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1285__COMPILOBJ_NREP_FOREVER#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1454*/ meltfptr[1453])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:2396:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1454*/ meltfptr[1453])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1285__COMPILOBJ_NREP_FOREVER#2", NULL != ( /*_.CLASS_NREP_FOREVER__V79*/ meltfptr[78])); ((meltroutine_ptr_t) /*_.VALROUT___V1454*/ meltfptr[1453])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NREP_FOREVER__V79*/ meltfptr[78]); MELT_LOCATION ("warmelt-genobj.melt:2396:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1454*/ meltfptr[1453])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1263*/ meltfptr[1262]); ((meltroutine_ptr_t) /*_.VALROUT___V1454*/ meltfptr[1453])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V1263*/ meltfptr[1262]); MELT_LOCATION ("warmelt-genobj.melt:2396:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1454*/ meltfptr[1453])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1285__COMPILOBJ_NREP_FOREVER#4", NULL != ( /*_.CLASS_LABEL_BINDING__V80*/ meltfptr[79])); ((meltroutine_ptr_t) /*_.VALROUT___V1454*/ meltfptr[1453])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_LABEL_BINDING__V80*/ meltfptr[79]); MELT_LOCATION ("warmelt-genobj.melt:2396:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1454*/ meltfptr[1453])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V190*/ meltfptr[189]); ((meltroutine_ptr_t) /*_.VALROUT___V1454*/ meltfptr[1453])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189]); MELT_LOCATION ("warmelt-genobj.melt:2396:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1454*/ meltfptr[1453])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1285__COMPILOBJ_NREP_FOREVER#6", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1454*/ meltfptr[1453])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:2396:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1454*/ meltfptr[1453])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V596*/ meltfptr[595]); ((meltroutine_ptr_t) /*_.VALROUT___V1454*/ meltfptr[1453])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V596*/ meltfptr[595]); MELT_LOCATION ("warmelt-genobj.melt:2396:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1454*/ meltfptr[1453])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1285__COMPILOBJ_NREP_FOREVER#8", NULL != ( /*_.CLASS_CLONED_SYMBOL__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V1454*/ meltfptr[1453])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-genobj.melt:2396:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1454*/ meltfptr[1453])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1285__COMPILOBJ_NREP_FOREVER#9", NULL != ( /*_.MULTIPLE_EVERY__V54*/ meltfptr[53])); ((meltroutine_ptr_t) /*_.VALROUT___V1454*/ meltfptr[1453])->tabval[9] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V54*/ meltfptr[53]); MELT_LOCATION ("warmelt-genobj.melt:2396:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1454*/ meltfptr[1453])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1285__COMPILOBJ_NREP_FOREVER#10", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1454*/ meltfptr[1453])->tabval[10] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:2425:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1291__LAMBDA_#0", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1455*/ meltfptr[1454])->tabval[0] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:2425:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1455*/ meltfptr[1454]); MELT_LOCATION ("warmelt-genobj.melt:2396:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1454*/ meltfptr[1453])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1285__COMPILOBJ_NREP_FOREVER#11", NULL != ( /*_.VALROUT___V1455*/ meltfptr[1454])); ((meltroutine_ptr_t) /*_.VALROUT___V1454*/ meltfptr[1453])->tabval[11] = (melt_ptr_t) ( /*_.VALROUT___V1455*/ meltfptr[1454]); MELT_LOCATION ("warmelt-genobj.melt:2396:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1454*/ meltfptr[1453]); /*putclosurout#38 */ melt_assertmsg ("putclosrout#38 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1456*/ meltfptr[1455])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#38 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1454*/ meltfptr[1453])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1456*/ meltfptr[1455])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1454*/ meltfptr[1453]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1456*/ meltfptr[1455]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1457*/ meltfptr[1456])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1457*/ meltfptr[1456])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1457*/ meltfptr[1456]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1458*/ meltfptr[1457]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1457*/ meltfptr[1456]); melt_dbgtrace_written_object ( /*_.VALDATA___V1457*/ meltfptr[1456], "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-genobj.melt:2436:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1461*/ meltfptr[1460])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1292__COMPILOBJ_NREP_EXIT#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1461*/ meltfptr[1460])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:2436:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1461*/ meltfptr[1460])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1292__COMPILOBJ_NREP_EXIT#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1461*/ meltfptr[1460])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:2436:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1461*/ meltfptr[1460])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1292__COMPILOBJ_NREP_EXIT#2", NULL != ( /*_.CLASS_NREP_EXIT__V81*/ meltfptr[80])); ((meltroutine_ptr_t) /*_.VALROUT___V1461*/ meltfptr[1460])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NREP_EXIT__V81*/ meltfptr[80]); MELT_LOCATION ("warmelt-genobj.melt:2436:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1461*/ meltfptr[1460])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1292__COMPILOBJ_NREP_EXIT#3", NULL != ( /*_.CLASS_LABEL_BINDING__V80*/ meltfptr[79])); ((meltroutine_ptr_t) /*_.VALROUT___V1461*/ meltfptr[1460])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_LABEL_BINDING__V80*/ meltfptr[79]); MELT_LOCATION ("warmelt-genobj.melt:2436:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1461*/ meltfptr[1460])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1292__COMPILOBJ_NREP_EXIT#4", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1461*/ meltfptr[1460])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:2436:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1461*/ meltfptr[1460])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1292__COMPILOBJ_NREP_EXIT#5", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1461*/ meltfptr[1460])->tabval[5] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:2436:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1461*/ meltfptr[1460])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V518*/ meltfptr[517]); ((meltroutine_ptr_t) /*_.VALROUT___V1461*/ meltfptr[1460])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V518*/ meltfptr[517]); MELT_LOCATION ("warmelt-genobj.melt:2436:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1461*/ meltfptr[1460])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V610*/ meltfptr[609]); ((meltroutine_ptr_t) /*_.VALROUT___V1461*/ meltfptr[1460])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V610*/ meltfptr[609]); MELT_LOCATION ("warmelt-genobj.melt:2436:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1461*/ meltfptr[1460])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V436*/ meltfptr[435]); ((meltroutine_ptr_t) /*_.VALROUT___V1461*/ meltfptr[1460])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V436*/ meltfptr[435]); MELT_LOCATION ("warmelt-genobj.melt:2436:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1461*/ meltfptr[1460])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1292__COMPILOBJ_NREP_EXIT#9", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1461*/ meltfptr[1460])->tabval[9] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:2436:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1461*/ meltfptr[1460]); /*putclosurout#39 */ melt_assertmsg ("putclosrout#39 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1462*/ meltfptr[1461])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#39 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1461*/ meltfptr[1460])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1462*/ meltfptr[1461])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1461*/ meltfptr[1460]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1462*/ meltfptr[1461]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1463*/ meltfptr[1462])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1463*/ meltfptr[1462])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1463*/ meltfptr[1462]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1464*/ meltfptr[1463]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1463*/ meltfptr[1462]); melt_dbgtrace_written_object ( /*_.VALDATA___V1463*/ meltfptr[1462], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:2477:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1465*/ meltfptr[1464])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1296__COMPILOBJ_NREP_AGAIN#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1465*/ meltfptr[1464])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:2477:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1465*/ meltfptr[1464])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1296__COMPILOBJ_NREP_AGAIN#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1465*/ meltfptr[1464])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:2477:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1465*/ meltfptr[1464])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1296__COMPILOBJ_NREP_AGAIN#2", NULL != ( /*_.CLASS_NREP_AGAIN__V82*/ meltfptr[81])); ((meltroutine_ptr_t) /*_.VALROUT___V1465*/ meltfptr[1464])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NREP_AGAIN__V82*/ meltfptr[81]); MELT_LOCATION ("warmelt-genobj.melt:2477:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1465*/ meltfptr[1464])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V620*/ meltfptr[619]); ((meltroutine_ptr_t) /*_.VALROUT___V1465*/ meltfptr[1464])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V620*/ meltfptr[619]); MELT_LOCATION ("warmelt-genobj.melt:2477:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1465*/ meltfptr[1464])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1296__COMPILOBJ_NREP_AGAIN#4", NULL != ( /*_.CLASS_LABEL_BINDING__V80*/ meltfptr[79])); ((meltroutine_ptr_t) /*_.VALROUT___V1465*/ meltfptr[1464])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_LABEL_BINDING__V80*/ meltfptr[79]); MELT_LOCATION ("warmelt-genobj.melt:2477:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1465*/ meltfptr[1464]); /*putclosurout#40 */ melt_assertmsg ("putclosrout#40 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1466*/ meltfptr[1465])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#40 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1465*/ meltfptr[1464])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1466*/ meltfptr[1465])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1465*/ meltfptr[1464]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1466*/ meltfptr[1465]); /*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) ( /*_.VALSTR___V1468*/ meltfptr[1467]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1467*/ meltfptr[1466]); melt_dbgtrace_written_object ( /*_.VALDATA___V1467*/ meltfptr[1466], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:2498:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1469*/ meltfptr[1468])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1300__COMPILOBJ_DISCRANY#0", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1469*/ meltfptr[1468])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:2498:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1469*/ meltfptr[1468]); /*putclosurout#41 */ melt_assertmsg ("putclosrout#41 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1470*/ meltfptr[1469])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#41 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1469*/ meltfptr[1468])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1470*/ meltfptr[1469])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1469*/ meltfptr[1468]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1470*/ meltfptr[1469]); MELT_LOCATION ("warmelt-genobj.melt:2505:/ 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_1302__COMPILOBJ_NREP_LET#0", NULL != ( /*_.CLASS_NREP_LET__V83*/ meltfptr[82])); ((meltroutine_ptr_t) /*_.VALROUT___V1471*/ meltfptr[1470])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_LET__V83*/ meltfptr[82]); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_25 */ void meltmod__warmelt_genobj__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-genobj.melt:2505:/ 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_1302__COMPILOBJ_NREP_LET#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1471*/ meltfptr[1470])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:2505:/ 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_1302__COMPILOBJ_NREP_LET#2", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1471*/ meltfptr[1470])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:2505:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1471*/ meltfptr[1470])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V518*/ meltfptr[517]); ((meltroutine_ptr_t) /*_.VALROUT___V1471*/ meltfptr[1470])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V518*/ meltfptr[517]); MELT_LOCATION ("warmelt-genobj.melt:2505:/ 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_1302__COMPILOBJ_NREP_LET#4", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1471*/ meltfptr[1470])->tabval[4] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:2505:/ 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_1302__COMPILOBJ_NREP_LET#5", NULL != ( /*_.MULTIPLE_EVERY__V54*/ meltfptr[53])); ((meltroutine_ptr_t) /*_.VALROUT___V1471*/ meltfptr[1470])->tabval[5] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V54*/ meltfptr[53]); MELT_LOCATION ("warmelt-genobj.melt:2505:/ 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_1302__COMPILOBJ_NREP_LET#6", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1471*/ meltfptr[1470])->tabval[6] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:2505:/ 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_1302__COMPILOBJ_NREP_LET#7", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V84*/ meltfptr[83])); ((meltroutine_ptr_t) /*_.VALROUT___V1471*/ meltfptr[1470])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V84*/ meltfptr[83]); MELT_LOCATION ("warmelt-genobj.melt:2505:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1471*/ meltfptr[1470])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1269*/ meltfptr[1268]); ((meltroutine_ptr_t) /*_.VALROUT___V1471*/ meltfptr[1470])->tabval[8] = (melt_ptr_t) ( /*_.VALCLO___V1269*/ meltfptr[1268]); MELT_LOCATION ("warmelt-genobj.melt:2505:/ 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_1302__COMPILOBJ_NREP_LET#9", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1471*/ meltfptr[1470])->tabval[9] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:2505:/ 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_1302__COMPILOBJ_NREP_LET#10", NULL != ( /*_.CLASS_SEXPR__V85*/ meltfptr[84])); ((meltroutine_ptr_t) /*_.VALROUT___V1471*/ meltfptr[1470])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_SEXPR__V85*/ meltfptr[84]); MELT_LOCATION ("warmelt-genobj.melt:2505:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1471*/ meltfptr[1470])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1171*/ meltfptr[1170]); ((meltroutine_ptr_t) /*_.VALROUT___V1471*/ meltfptr[1470])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V1171*/ meltfptr[1170]); MELT_LOCATION ("warmelt-genobj.melt:2505:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1471*/ meltfptr[1470])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V494*/ meltfptr[493]); ((meltroutine_ptr_t) /*_.VALROUT___V1471*/ meltfptr[1470])->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493]); MELT_LOCATION ("warmelt-genobj.melt:2526:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1472*/ meltfptr[1471])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1306__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1472*/ meltfptr[1471])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:2526:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1472*/ meltfptr[1471])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1306__LAMBDA_#1", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V84*/ meltfptr[83])); ((meltroutine_ptr_t) /*_.VALROUT___V1472*/ meltfptr[1471])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V84*/ meltfptr[83]); MELT_LOCATION ("warmelt-genobj.melt:2526:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1472*/ meltfptr[1471])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1269*/ meltfptr[1268]); ((meltroutine_ptr_t) /*_.VALROUT___V1472*/ meltfptr[1471])->tabval[2] = (melt_ptr_t) ( /*_.VALCLO___V1269*/ meltfptr[1268]); MELT_LOCATION ("warmelt-genobj.melt:2526:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1472*/ meltfptr[1471])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1306__LAMBDA_#3", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1472*/ meltfptr[1471])->tabval[3] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:2526:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1472*/ meltfptr[1471])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1306__LAMBDA_#4", NULL != ( /*_.CLASS_SEXPR__V85*/ meltfptr[84])); ((meltroutine_ptr_t) /*_.VALROUT___V1472*/ meltfptr[1471])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_SEXPR__V85*/ meltfptr[84]); MELT_LOCATION ("warmelt-genobj.melt:2526:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1472*/ meltfptr[1471])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1171*/ meltfptr[1170]); ((meltroutine_ptr_t) /*_.VALROUT___V1472*/ meltfptr[1471])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1171*/ meltfptr[1170]); MELT_LOCATION ("warmelt-genobj.melt:2526:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1472*/ meltfptr[1471])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V494*/ meltfptr[493]); ((meltroutine_ptr_t) /*_.VALROUT___V1472*/ meltfptr[1471])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493]); MELT_LOCATION ("warmelt-genobj.melt:2526:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1472*/ meltfptr[1471]); MELT_LOCATION ("warmelt-genobj.melt:2505:/ 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_1302__COMPILOBJ_NREP_LET#13", NULL != ( /*_.VALROUT___V1472*/ meltfptr[1471])); ((meltroutine_ptr_t) /*_.VALROUT___V1471*/ meltfptr[1470])->tabval[13] = (melt_ptr_t) ( /*_.VALROUT___V1472*/ meltfptr[1471]); MELT_LOCATION ("warmelt-genobj.melt:2505:/ 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_1302__COMPILOBJ_NREP_LET#14", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1471*/ meltfptr[1470])->tabval[14] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:2505:/ 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_1302__COMPILOBJ_NREP_LET#15", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1471*/ meltfptr[1470])->tabval[15] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:2569:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1473*/ meltfptr[1472])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1311__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1473*/ meltfptr[1472])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:2569:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1473*/ meltfptr[1472])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1311__LAMBDA_#1", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1473*/ meltfptr[1472])->tabval[1] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:2569:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1473*/ meltfptr[1472]); MELT_LOCATION ("warmelt-genobj.melt:2505:/ 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_1302__COMPILOBJ_NREP_LET#16", NULL != ( /*_.VALROUT___V1473*/ meltfptr[1472])); ((meltroutine_ptr_t) /*_.VALROUT___V1471*/ meltfptr[1470])->tabval[16] = (melt_ptr_t) ( /*_.VALROUT___V1473*/ meltfptr[1472]); MELT_LOCATION ("warmelt-genobj.melt:2505:/ 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_1302__COMPILOBJ_NREP_LET#17", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1471*/ meltfptr[1470])->tabval[17] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:2505:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1471*/ meltfptr[1470])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1404*/ meltfptr[1403]); ((meltroutine_ptr_t) /*_.VALROUT___V1471*/ meltfptr[1470])->tabval[18] = (melt_ptr_t) ( /*_.VALCLO___V1404*/ meltfptr[1403]); MELT_LOCATION ("warmelt-genobj.melt:2582:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1474*/ meltfptr[1473])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1312__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1474*/ meltfptr[1473])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:2582:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1474*/ meltfptr[1473])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1404*/ meltfptr[1403]); ((meltroutine_ptr_t) /*_.VALROUT___V1474*/ meltfptr[1473])->tabval[1] = (melt_ptr_t) ( /*_.VALCLO___V1404*/ meltfptr[1403]); MELT_LOCATION ("warmelt-genobj.melt:2582:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1474*/ meltfptr[1473]); MELT_LOCATION ("warmelt-genobj.melt:2505:/ 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_1302__COMPILOBJ_NREP_LET#19", NULL != ( /*_.VALROUT___V1474*/ meltfptr[1473])); ((meltroutine_ptr_t) /*_.VALROUT___V1471*/ meltfptr[1470])->tabval[19] = (melt_ptr_t) ( /*_.VALROUT___V1474*/ meltfptr[1473]); MELT_LOCATION ("warmelt-genobj.melt:2505:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1471*/ meltfptr[1470]); /*putclosurout#42 */ melt_assertmsg ("putclosrout#42 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1475*/ meltfptr[1474])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#42 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1471*/ meltfptr[1470])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1475*/ meltfptr[1474])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1471*/ meltfptr[1470]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1475*/ meltfptr[1474]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1476*/ meltfptr[1475])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1476*/ meltfptr[1475])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1476*/ meltfptr[1475]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1477*/ meltfptr[1476]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1476*/ meltfptr[1475]); melt_dbgtrace_written_object ( /*_.VALDATA___V1476*/ meltfptr[1475], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1478*/ meltfptr[1477])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1478*/ meltfptr[1477])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1478*/ meltfptr[1477]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1479*/ meltfptr[1478]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1478*/ meltfptr[1477]); melt_dbgtrace_written_object ( /*_.VALDATA___V1478*/ meltfptr[1477], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1480*/ meltfptr[1479])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1480*/ meltfptr[1479])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1480*/ meltfptr[1479]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1481*/ meltfptr[1480]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1480*/ meltfptr[1479]); melt_dbgtrace_written_object ( /*_.VALDATA___V1480*/ meltfptr[1479], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1482*/ meltfptr[1481])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1482*/ meltfptr[1481])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1482*/ meltfptr[1481]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1483*/ meltfptr[1482]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1482*/ meltfptr[1481]); melt_dbgtrace_written_object ( /*_.VALDATA___V1482*/ meltfptr[1481], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:2598:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1484*/ meltfptr[1483])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1484*/ meltfptr[1483])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1484*/ meltfptr[1483]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1160*/ meltfptr[1159]); MELT_LOCATION ("warmelt-genobj.melt:2598:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1484*/ meltfptr[1483])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1484*/ meltfptr[1483])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1484*/ meltfptr[1483]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-genobj.melt:2598:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1484*/ meltfptr[1483]); MELT_LOCATION ("warmelt-genobj.melt:2598:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1484*/ meltfptr[1483], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1485*/ meltfptr[1484])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1485*/ meltfptr[1484])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1485*/ meltfptr[1484]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1486*/ meltfptr[1485]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1485*/ meltfptr[1484]); melt_dbgtrace_written_object ( /*_.VALDATA___V1485*/ meltfptr[1484], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:2598:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1487*/ meltfptr[1486])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1487*/ meltfptr[1486])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1487*/ meltfptr[1486]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1485*/ meltfptr[1484]); MELT_LOCATION ("warmelt-genobj.melt:2598:/ initchunk"); /*^putslot */ /*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) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-genobj.melt:2598:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1487*/ meltfptr[1486]); MELT_LOCATION ("warmelt-genobj.melt:2598:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1487*/ meltfptr[1486], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1488*/ meltfptr[1487])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1488*/ meltfptr[1487])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1488*/ meltfptr[1487]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1489*/ meltfptr[1488]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1488*/ meltfptr[1487]); melt_dbgtrace_written_object ( /*_.VALDATA___V1488*/ meltfptr[1487], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:2598:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1490*/ meltfptr[1489])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1490*/ meltfptr[1489])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1490*/ meltfptr[1489]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1488*/ meltfptr[1487]); MELT_LOCATION ("warmelt-genobj.melt:2598:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1490*/ meltfptr[1489])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1490*/ meltfptr[1489])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1490*/ meltfptr[1489]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-genobj.melt:2598:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1490*/ meltfptr[1489]); MELT_LOCATION ("warmelt-genobj.melt:2598:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1490*/ meltfptr[1489], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1491*/ meltfptr[1490]); melt_dbgtrace_written_object ( /*_.VALDATA___V1491*/ meltfptr[1490], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:2598:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1493*/ meltfptr[1492])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1493*/ meltfptr[1492])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1493*/ meltfptr[1492]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-genobj.melt:2598:/ initchunk"); /*^putslot */ /*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) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-genobj.melt:2598:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1493*/ meltfptr[1492]); MELT_LOCATION ("warmelt-genobj.melt:2598:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1493*/ meltfptr[1492], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1494*/ meltfptr[1493])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1494*/ meltfptr[1493])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1494*/ meltfptr[1493]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1495*/ meltfptr[1494]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1494*/ meltfptr[1493]); melt_dbgtrace_written_object ( /*_.VALDATA___V1494*/ meltfptr[1493], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:2598:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1496*/ meltfptr[1495])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1496*/ meltfptr[1495])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1496*/ meltfptr[1495]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1494*/ meltfptr[1493]); MELT_LOCATION ("warmelt-genobj.melt:2598:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1496*/ meltfptr[1495])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1496*/ meltfptr[1495])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1496*/ meltfptr[1495]))-> obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-genobj.melt:2598:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1496*/ meltfptr[1495]); MELT_LOCATION ("warmelt-genobj.melt:2598:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1496*/ meltfptr[1495], "new static instance"); /*putupl#668 */ melt_assertmsg ("putupl #668 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1497*/ meltfptr[1496])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #668 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1497*/ meltfptr[1496])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1497*/ meltfptr[1496]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V1484*/ meltfptr[1483]); /*putupl#669 */ melt_assertmsg ("putupl #669 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1497*/ meltfptr[1496])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #669 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1497*/ meltfptr[1496])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1497*/ meltfptr[1496]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1487*/ meltfptr[1486]); /*putupl#670 */ melt_assertmsg ("putupl #670 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1497*/ meltfptr[1496])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #670 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1497*/ meltfptr[1496])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1497*/ meltfptr[1496]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1490*/ meltfptr[1489]); /*putupl#671 */ melt_assertmsg ("putupl #671 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1497*/ meltfptr[1496])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #671 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1497*/ meltfptr[1496])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1497*/ meltfptr[1496]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1493*/ meltfptr[1492]); /*putupl#672 */ melt_assertmsg ("putupl #672 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1497*/ meltfptr[1496])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #672 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1497*/ meltfptr[1496])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1497*/ meltfptr[1496]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V1496*/ meltfptr[1495]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1497*/ meltfptr[1496]); MELT_LOCATION ("warmelt-genobj.melt:2598:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1498*/ meltfptr[1497])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1498*/ meltfptr[1497])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1498*/ meltfptr[1497]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1499*/ meltfptr[1498]); MELT_LOCATION ("warmelt-genobj.melt:2598:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1498*/ meltfptr[1497]); MELT_LOCATION ("warmelt-genobj.melt:2598:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1498*/ meltfptr[1497], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:2607:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1500*/ meltfptr[1499])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1331__FAIL_COMPILETRECFILL#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1500*/ meltfptr[1499])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:2607:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1500*/ meltfptr[1499])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1331__FAIL_COMPILETRECFILL#1", NULL != ( /*_.CLASS_NAMED__V8*/ meltfptr[7])); ((meltroutine_ptr_t) /*_.VALROUT___V1500*/ meltfptr[1499])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-genobj.melt:2607:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1500*/ meltfptr[1499]); /*putclosurout#43 */ melt_assertmsg ("putclosrout#43 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1501*/ meltfptr[1500])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#43 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1500*/ meltfptr[1499])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1501*/ meltfptr[1500])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1500*/ meltfptr[1499]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1501*/ meltfptr[1500]); MELT_LOCATION ("warmelt-genobj.melt:2618:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1502*/ meltfptr[1501])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1333__COMPILETREC_LAMBDA#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1502*/ meltfptr[1501])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:2618:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1502*/ meltfptr[1501])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1333__COMPILETREC_LAMBDA#1", NULL != ( /*_.CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING__V86*/ meltfptr[85])); ((meltroutine_ptr_t) /*_.VALROUT___V1502*/ meltfptr[1501])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING__V86*/ meltfptr[85]); MELT_LOCATION ("warmelt-genobj.melt:2618:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1502*/ meltfptr[1501])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V190*/ meltfptr[189]); ((meltroutine_ptr_t) /*_.VALROUT___V1502*/ meltfptr[1501])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189]); MELT_LOCATION ("warmelt-genobj.melt:2618:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1502*/ meltfptr[1501])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1333__COMPILETREC_LAMBDA#3", NULL != ( /*_.CLASS_NORMAL_CONSTRUCTOR_BINDING__V87*/ meltfptr[86])); ((meltroutine_ptr_t) /*_.VALROUT___V1502*/ meltfptr[1501])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTOR_BINDING__V87*/ meltfptr[86]); MELT_LOCATION ("warmelt-genobj.melt:2618:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1502*/ meltfptr[1501])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V994*/ meltfptr[993]); ((meltroutine_ptr_t) /*_.VALROUT___V1502*/ meltfptr[1501])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V994*/ meltfptr[993]); MELT_LOCATION ("warmelt-genobj.melt:2618:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1502*/ meltfptr[1501])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1333__COMPILETREC_LAMBDA#5", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1502*/ meltfptr[1501])->tabval[5] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:2618:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1502*/ meltfptr[1501])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V932*/ meltfptr[931]); ((meltroutine_ptr_t) /*_.VALROUT___V1502*/ meltfptr[1501])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V932*/ meltfptr[931]); MELT_LOCATION ("warmelt-genobj.melt:2618:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1502*/ meltfptr[1501])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V400*/ meltfptr[399]); ((meltroutine_ptr_t) /*_.VALROUT___V1502*/ meltfptr[1501])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); MELT_LOCATION ("warmelt-genobj.melt:2618:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1502*/ meltfptr[1501])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V184*/ meltfptr[183]); ((meltroutine_ptr_t) /*_.VALROUT___V1502*/ meltfptr[1501])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]); MELT_LOCATION ("warmelt-genobj.melt:2618:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1502*/ meltfptr[1501])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V946*/ meltfptr[945]); ((meltroutine_ptr_t) /*_.VALROUT___V1502*/ meltfptr[1501])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V946*/ meltfptr[945]); MELT_LOCATION ("warmelt-genobj.melt:2618:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1502*/ meltfptr[1501])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1333__COMPILETREC_LAMBDA#10", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1502*/ meltfptr[1501])->tabval[10] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:2618:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1502*/ meltfptr[1501]); /*putclosurout#44 */ melt_assertmsg ("putclosrout#44 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1503*/ meltfptr[1502])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#44 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1502*/ meltfptr[1501])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1503*/ meltfptr[1502])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1502*/ meltfptr[1501]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1503*/ meltfptr[1502]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1504*/ meltfptr[1503])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1504*/ meltfptr[1503])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1504*/ meltfptr[1503]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1505*/ meltfptr[1504]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1504*/ meltfptr[1503]); melt_dbgtrace_written_object ( /*_.VALDATA___V1504*/ meltfptr[1503], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1506*/ meltfptr[1505])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1506*/ meltfptr[1505])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1506*/ meltfptr[1505]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1507*/ meltfptr[1506]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1506*/ meltfptr[1505]); melt_dbgtrace_written_object ( /*_.VALDATA___V1506*/ meltfptr[1505], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:2677:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1508*/ meltfptr[1507])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1339__COMPILETREC_TUPLE#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1508*/ meltfptr[1507])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:2677:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1508*/ meltfptr[1507])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1339__COMPILETREC_TUPLE#1", NULL != ( /*_.CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING__V88*/ meltfptr[87])); ((meltroutine_ptr_t) /*_.VALROUT___V1508*/ meltfptr[1507])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING__V88*/ meltfptr[87]); MELT_LOCATION ("warmelt-genobj.melt:2677:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1508*/ meltfptr[1507])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V190*/ meltfptr[189]); ((meltroutine_ptr_t) /*_.VALROUT___V1508*/ meltfptr[1507])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189]); MELT_LOCATION ("warmelt-genobj.melt:2677:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1508*/ meltfptr[1507])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1339__COMPILETREC_TUPLE#3", NULL != ( /*_.CLASS_NORMAL_CONSTRUCTOR_BINDING__V87*/ meltfptr[86])); ((meltroutine_ptr_t) /*_.VALROUT___V1508*/ meltfptr[1507])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTOR_BINDING__V87*/ meltfptr[86]); MELT_LOCATION ("warmelt-genobj.melt:2677:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1508*/ meltfptr[1507])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V994*/ meltfptr[993]); ((meltroutine_ptr_t) /*_.VALROUT___V1508*/ meltfptr[1507])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V994*/ meltfptr[993]); MELT_LOCATION ("warmelt-genobj.melt:2677:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1508*/ meltfptr[1507])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1339__COMPILETREC_TUPLE#5", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1508*/ meltfptr[1507])->tabval[5] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:2677:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1508*/ meltfptr[1507])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V830*/ meltfptr[829]); ((meltroutine_ptr_t) /*_.VALROUT___V1508*/ meltfptr[1507])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V830*/ meltfptr[829]); MELT_LOCATION ("warmelt-genobj.melt:2677:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1508*/ meltfptr[1507])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1339__COMPILETREC_TUPLE#7", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1508*/ meltfptr[1507])->tabval[7] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:2677:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1508*/ meltfptr[1507])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V400*/ meltfptr[399]); ((meltroutine_ptr_t) /*_.VALROUT___V1508*/ meltfptr[1507])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); MELT_LOCATION ("warmelt-genobj.melt:2677:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1508*/ meltfptr[1507])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V184*/ meltfptr[183]); ((meltroutine_ptr_t) /*_.VALROUT___V1508*/ meltfptr[1507])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]); MELT_LOCATION ("warmelt-genobj.melt:2677:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1508*/ meltfptr[1507]); /*putclosurout#45 */ melt_assertmsg ("putclosrout#45 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1509*/ meltfptr[1508])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#45 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1508*/ meltfptr[1507])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1509*/ meltfptr[1508])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1508*/ meltfptr[1507]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1509*/ meltfptr[1508]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1510*/ meltfptr[1509])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1510*/ meltfptr[1509])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1510*/ meltfptr[1509]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1511*/ meltfptr[1510]); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_26 */ void meltmod__warmelt_genobj__initialmeltchunk_27 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*touch:VALUEDATA_*/ meltgc_touch ( /*_.VALDATA___V1510*/ meltfptr[1509]); melt_dbgtrace_written_object ( /*_.VALDATA___V1510*/ meltfptr[1509], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:2720:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1512*/ meltfptr[1511])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1343__COMPILETREC_PAIR#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1512*/ meltfptr[1511])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:2720:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1512*/ meltfptr[1511])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1343__COMPILETREC_PAIR#1", NULL != ( /*_.CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING__V89*/ meltfptr[88])); ((meltroutine_ptr_t) /*_.VALROUT___V1512*/ meltfptr[1511])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING__V89*/ meltfptr[88]); MELT_LOCATION ("warmelt-genobj.melt:2720:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1512*/ meltfptr[1511])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V190*/ meltfptr[189]); ((meltroutine_ptr_t) /*_.VALROUT___V1512*/ meltfptr[1511])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189]); MELT_LOCATION ("warmelt-genobj.melt:2720:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1512*/ meltfptr[1511])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1343__COMPILETREC_PAIR#3", NULL != ( /*_.CLASS_NORMAL_CONSTRUCTOR_BINDING__V87*/ meltfptr[86])); ((meltroutine_ptr_t) /*_.VALROUT___V1512*/ meltfptr[1511])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTOR_BINDING__V87*/ meltfptr[86]); MELT_LOCATION ("warmelt-genobj.melt:2720:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1512*/ meltfptr[1511])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1343__COMPILETREC_PAIR#4", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1512*/ meltfptr[1511])->tabval[4] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:2720:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1512*/ meltfptr[1511])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V858*/ meltfptr[857]); ((meltroutine_ptr_t) /*_.VALROUT___V1512*/ meltfptr[1511])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V858*/ meltfptr[857]); MELT_LOCATION ("warmelt-genobj.melt:2720:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1512*/ meltfptr[1511])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V868*/ meltfptr[867]); ((meltroutine_ptr_t) /*_.VALROUT___V1512*/ meltfptr[1511])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V868*/ meltfptr[867]); MELT_LOCATION ("warmelt-genobj.melt:2720:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1512*/ meltfptr[1511])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V994*/ meltfptr[993]); ((meltroutine_ptr_t) /*_.VALROUT___V1512*/ meltfptr[1511])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V994*/ meltfptr[993]); MELT_LOCATION ("warmelt-genobj.melt:2720:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1512*/ meltfptr[1511])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V400*/ meltfptr[399]); ((meltroutine_ptr_t) /*_.VALROUT___V1512*/ meltfptr[1511])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); MELT_LOCATION ("warmelt-genobj.melt:2720:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1512*/ meltfptr[1511])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V184*/ meltfptr[183]); ((meltroutine_ptr_t) /*_.VALROUT___V1512*/ meltfptr[1511])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]); MELT_LOCATION ("warmelt-genobj.melt:2720:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1512*/ meltfptr[1511]); /*putclosurout#46 */ melt_assertmsg ("putclosrout#46 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1513*/ meltfptr[1512])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#46 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1512*/ meltfptr[1511])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1513*/ meltfptr[1512])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1512*/ meltfptr[1511]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1513*/ meltfptr[1512]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1514*/ meltfptr[1513])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1514*/ meltfptr[1513])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1514*/ meltfptr[1513]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1515*/ meltfptr[1514]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1514*/ meltfptr[1513]); melt_dbgtrace_written_object ( /*_.VALDATA___V1514*/ meltfptr[1513], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:2760:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1516*/ meltfptr[1515])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1347__COMPILETREC_LIST#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1516*/ meltfptr[1515])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:2760:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1516*/ meltfptr[1515])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1347__COMPILETREC_LIST#1", NULL != ( /*_.CLASS_NORMAL_CONSTRUCTED_LIST_BINDING__V90*/ meltfptr[89])); ((meltroutine_ptr_t) /*_.VALROUT___V1516*/ meltfptr[1515])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_LIST_BINDING__V90*/ meltfptr[89]); MELT_LOCATION ("warmelt-genobj.melt:2760:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1516*/ meltfptr[1515])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V190*/ meltfptr[189]); ((meltroutine_ptr_t) /*_.VALROUT___V1516*/ meltfptr[1515])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189]); MELT_LOCATION ("warmelt-genobj.melt:2760:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1516*/ meltfptr[1515])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1347__COMPILETREC_LIST#3", NULL != ( /*_.CLASS_NORMAL_CONSTRUCTOR_BINDING__V87*/ meltfptr[86])); ((meltroutine_ptr_t) /*_.VALROUT___V1516*/ meltfptr[1515])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTOR_BINDING__V87*/ meltfptr[86]); MELT_LOCATION ("warmelt-genobj.melt:2760:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1516*/ meltfptr[1515])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1347__COMPILETREC_LIST#4", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1516*/ meltfptr[1515])->tabval[4] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:2760:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1516*/ meltfptr[1515])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V878*/ meltfptr[877]); ((meltroutine_ptr_t) /*_.VALROUT___V1516*/ meltfptr[1515])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V878*/ meltfptr[877]); MELT_LOCATION ("warmelt-genobj.melt:2760:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1516*/ meltfptr[1515])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V994*/ meltfptr[993]); ((meltroutine_ptr_t) /*_.VALROUT___V1516*/ meltfptr[1515])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V994*/ meltfptr[993]); MELT_LOCATION ("warmelt-genobj.melt:2760:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1516*/ meltfptr[1515])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V400*/ meltfptr[399]); ((meltroutine_ptr_t) /*_.VALROUT___V1516*/ meltfptr[1515])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); MELT_LOCATION ("warmelt-genobj.melt:2760:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1516*/ meltfptr[1515])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V184*/ meltfptr[183]); ((meltroutine_ptr_t) /*_.VALROUT___V1516*/ meltfptr[1515])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]); MELT_LOCATION ("warmelt-genobj.melt:2760:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1516*/ meltfptr[1515]); /*putclosurout#47 */ melt_assertmsg ("putclosrout#47 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1517*/ meltfptr[1516])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#47 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1516*/ meltfptr[1515])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1517*/ meltfptr[1516])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1516*/ meltfptr[1515]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1517*/ meltfptr[1516]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1518*/ meltfptr[1517])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1518*/ meltfptr[1517])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1518*/ meltfptr[1517]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1519*/ meltfptr[1518]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1518*/ meltfptr[1517]); melt_dbgtrace_written_object ( /*_.VALDATA___V1518*/ meltfptr[1517], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:2801:/ 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_1351__COMPILETREC_INSTANCE#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1520*/ meltfptr[1519])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:2801:/ 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_1351__COMPILETREC_INSTANCE#1", NULL != ( /*_.CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING__V91*/ meltfptr[90])); ((meltroutine_ptr_t) /*_.VALROUT___V1520*/ meltfptr[1519])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING__V91*/ meltfptr[90]); MELT_LOCATION ("warmelt-genobj.melt:2801:/ 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___V190*/ meltfptr[189]); ((meltroutine_ptr_t) /*_.VALROUT___V1520*/ meltfptr[1519])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189]); MELT_LOCATION ("warmelt-genobj.melt:2801:/ 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_1351__COMPILETREC_INSTANCE#3", NULL != ( /*_.CLASS_NORMAL_CONSTRUCTOR_BINDING__V87*/ meltfptr[86])); ((meltroutine_ptr_t) /*_.VALROUT___V1520*/ meltfptr[1519])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTOR_BINDING__V87*/ meltfptr[86]); MELT_LOCATION ("warmelt-genobj.melt:2801:/ 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___V994*/ meltfptr[993]); ((meltroutine_ptr_t) /*_.VALROUT___V1520*/ meltfptr[1519])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V994*/ meltfptr[993]); MELT_LOCATION ("warmelt-genobj.melt:2801:/ 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_1351__COMPILETREC_INSTANCE#5", NULL != ( /*_.CLASS_VALUE_BINDING__V92*/ meltfptr[91])); ((meltroutine_ptr_t) /*_.VALROUT___V1520*/ meltfptr[1519])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_VALUE_BINDING__V92*/ meltfptr[91]); MELT_LOCATION ("warmelt-genobj.melt:2801:/ 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_1351__COMPILETREC_INSTANCE#6", NULL != ( /*_.CLASS_CLASS_BINDING__V93*/ meltfptr[92])); ((meltroutine_ptr_t) /*_.VALROUT___V1520*/ meltfptr[1519])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_CLASS_BINDING__V93*/ meltfptr[92]); MELT_LOCATION ("warmelt-genobj.melt:2801:/ 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_1351__COMPILETREC_INSTANCE#7", NULL != ( /*_.CLASS_CLASS__V94*/ meltfptr[93])); ((meltroutine_ptr_t) /*_.VALROUT___V1520*/ meltfptr[1519])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_CLASS__V94*/ meltfptr[93]); MELT_LOCATION ("warmelt-genobj.melt:2801:/ 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_1351__COMPILETREC_INSTANCE#8", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1520*/ meltfptr[1519])->tabval[8] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:2801:/ 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___V400*/ meltfptr[399]); ((meltroutine_ptr_t) /*_.VALROUT___V1520*/ meltfptr[1519])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); MELT_LOCATION ("warmelt-genobj.melt:2801:/ 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___V184*/ meltfptr[183]); ((meltroutine_ptr_t) /*_.VALROUT___V1520*/ meltfptr[1519])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]); MELT_LOCATION ("warmelt-genobj.melt:2801:/ 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___V896*/ meltfptr[895]); ((meltroutine_ptr_t) /*_.VALROUT___V1520*/ meltfptr[1519])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V896*/ meltfptr[895]); MELT_LOCATION ("warmelt-genobj.melt:2801:/ 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_1351__COMPILETREC_INSTANCE#12", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1520*/ meltfptr[1519])->tabval[12] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:2801:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1520*/ meltfptr[1519]); /*putclosurout#48 */ melt_assertmsg ("putclosrout#48 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1521*/ meltfptr[1520])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#48 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1520*/ meltfptr[1519])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1521*/ meltfptr[1520])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1520*/ meltfptr[1519]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1521*/ meltfptr[1520]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1522*/ meltfptr[1521])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1522*/ meltfptr[1521])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1522*/ meltfptr[1521]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1523*/ meltfptr[1522]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1522*/ meltfptr[1521]); melt_dbgtrace_written_object ( /*_.VALDATA___V1522*/ meltfptr[1521], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1524*/ meltfptr[1523])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1524*/ meltfptr[1523])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1524*/ meltfptr[1523]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1525*/ meltfptr[1524]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1524*/ meltfptr[1523]); melt_dbgtrace_written_object ( /*_.VALDATA___V1524*/ meltfptr[1523], "new static instance"); /*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-genobj.melt:2856:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1530*/ meltfptr[1529])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1361__COMPILOBJ_NREP_LETREC#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1530*/ meltfptr[1529])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:2856:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1530*/ meltfptr[1529])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1361__COMPILOBJ_NREP_LETREC#1", NULL != ( /*_.CLASS_NREP_LETREC__V95*/ meltfptr[94])); ((meltroutine_ptr_t) /*_.VALROUT___V1530*/ meltfptr[1529])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_LETREC__V95*/ meltfptr[94]); MELT_LOCATION ("warmelt-genobj.melt:2856:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1530*/ meltfptr[1529])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1361__COMPILOBJ_NREP_LETREC#2", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1530*/ meltfptr[1529])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:2856:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1530*/ meltfptr[1529])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1361__COMPILOBJ_NREP_LETREC#3", NULL != ( /*_.DISCR_MULTIPLE__V18*/ meltfptr[17])); ((meltroutine_ptr_t) /*_.VALROUT___V1530*/ meltfptr[1529])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V18*/ meltfptr[17]); MELT_LOCATION ("warmelt-genobj.melt:2856:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1530*/ meltfptr[1529])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1361__COMPILOBJ_NREP_LETREC#4", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1530*/ meltfptr[1529])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:2856:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1530*/ meltfptr[1529])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1024*/ meltfptr[1023]); ((meltroutine_ptr_t) /*_.VALROUT___V1530*/ meltfptr[1529])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1024*/ meltfptr[1023]); MELT_LOCATION ("warmelt-genobj.melt:2856:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1530*/ meltfptr[1529])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1361__COMPILOBJ_NREP_LETREC#6", NULL != ( /*_.DISCR_STRBUF__V32*/ meltfptr[31])); ((meltroutine_ptr_t) /*_.VALROUT___V1530*/ meltfptr[1529])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-genobj.melt:2856:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1530*/ meltfptr[1529])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1361__COMPILOBJ_NREP_LETREC#7", NULL != ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1530*/ meltfptr[1529])->tabval[7] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-genobj.melt:2856:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1530*/ meltfptr[1529])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V524*/ meltfptr[523]); ((meltroutine_ptr_t) /*_.VALROUT___V1530*/ meltfptr[1529])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V524*/ meltfptr[523]); MELT_LOCATION ("warmelt-genobj.melt:2856:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1530*/ meltfptr[1529])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1361__COMPILOBJ_NREP_LETREC#9", NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V72*/ meltfptr[71])); ((meltroutine_ptr_t) /*_.VALROUT___V1530*/ meltfptr[1529])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V72*/ meltfptr[71]); MELT_LOCATION ("warmelt-genobj.melt:2856:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1530*/ meltfptr[1529])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1269*/ meltfptr[1268]); ((meltroutine_ptr_t) /*_.VALROUT___V1530*/ meltfptr[1529])->tabval[10] = (melt_ptr_t) ( /*_.VALCLO___V1269*/ meltfptr[1268]); MELT_LOCATION ("warmelt-genobj.melt:2856:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1530*/ meltfptr[1529])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1361__COMPILOBJ_NREP_LETREC#11", NULL != ( /*_.CLASS_NREP_SYMOCC__V96*/ meltfptr[95])); ((meltroutine_ptr_t) /*_.VALROUT___V1530*/ meltfptr[1529])->tabval[11] = (melt_ptr_t) ( /*_.CLASS_NREP_SYMOCC__V96*/ meltfptr[95]); MELT_LOCATION ("warmelt-genobj.melt:2856:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1530*/ meltfptr[1529])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1361__COMPILOBJ_NREP_LETREC#12", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1530*/ meltfptr[1529])->tabval[12] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:2856:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1530*/ meltfptr[1529])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V494*/ meltfptr[493]); ((meltroutine_ptr_t) /*_.VALROUT___V1530*/ meltfptr[1529])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493]); MELT_LOCATION ("warmelt-genobj.melt:2856:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1530*/ meltfptr[1529])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1361__COMPILOBJ_NREP_LETREC#14", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1530*/ meltfptr[1529])->tabval[14] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:2856:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1530*/ meltfptr[1529])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1361__COMPILOBJ_NREP_LETREC#15", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V84*/ meltfptr[83])); ((meltroutine_ptr_t) /*_.VALROUT___V1530*/ meltfptr[1529])->tabval[15] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V84*/ meltfptr[83]); MELT_LOCATION ("warmelt-genobj.melt:2856:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1530*/ meltfptr[1529])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V190*/ meltfptr[189]); ((meltroutine_ptr_t) /*_.VALROUT___V1530*/ meltfptr[1529])->tabval[16] = (melt_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189]); MELT_LOCATION ("warmelt-genobj.melt:2856:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1530*/ meltfptr[1529])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1171*/ meltfptr[1170]); ((meltroutine_ptr_t) /*_.VALROUT___V1530*/ meltfptr[1529])->tabval[17] = (melt_ptr_t) ( /*_.VALDATA___V1171*/ meltfptr[1170]); MELT_LOCATION ("warmelt-genobj.melt:2856:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1530*/ meltfptr[1529])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V400*/ meltfptr[399]); ((meltroutine_ptr_t) /*_.VALROUT___V1530*/ meltfptr[1529])->tabval[18] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); MELT_LOCATION ("warmelt-genobj.melt:2856:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1530*/ meltfptr[1529])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V184*/ meltfptr[183]); ((meltroutine_ptr_t) /*_.VALROUT___V1530*/ meltfptr[1529])->tabval[19] = (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]); MELT_LOCATION ("warmelt-genobj.melt:2856:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1530*/ meltfptr[1529])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1498*/ meltfptr[1497]); ((meltroutine_ptr_t) /*_.VALROUT___V1530*/ meltfptr[1529])->tabval[20] = (melt_ptr_t) ( /*_.VALDATA___V1498*/ meltfptr[1497]); MELT_LOCATION ("warmelt-genobj.melt:2856:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1530*/ meltfptr[1529])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1361__COMPILOBJ_NREP_LETREC#21", NULL != ( /*_.CTYPE_VOID__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1530*/ meltfptr[1529])->tabval[21] = (melt_ptr_t) ( /*_.CTYPE_VOID__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-genobj.melt:2856:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1530*/ meltfptr[1529])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1402*/ meltfptr[1401]); ((meltroutine_ptr_t) /*_.VALROUT___V1530*/ meltfptr[1529])->tabval[22] = (melt_ptr_t) ( /*_.VALCLO___V1402*/ meltfptr[1401]); MELT_LOCATION ("warmelt-genobj.melt:2856:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1530*/ meltfptr[1529]); /*putclosurout#49 */ melt_assertmsg ("putclosrout#49 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1531*/ meltfptr[1530])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#49 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1530*/ meltfptr[1529])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1531*/ meltfptr[1530])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1530*/ meltfptr[1529]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1531*/ meltfptr[1530]); /*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) ( /*_.VALSTR___V1533*/ meltfptr[1532]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1532*/ meltfptr[1531]); melt_dbgtrace_written_object ( /*_.VALDATA___V1532*/ meltfptr[1531], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1534*/ meltfptr[1533])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1534*/ meltfptr[1533])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1534*/ meltfptr[1533]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1535*/ meltfptr[1534]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1534*/ meltfptr[1533]); melt_dbgtrace_written_object ( /*_.VALDATA___V1534*/ meltfptr[1533], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:3070:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1536*/ meltfptr[1535])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1367__COMPILOBJ_NREP_CITERATION#0", NULL != ( /*_.CLASS_NREP_CITERATION__V97*/ meltfptr[96])); ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_CITERATION__V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-genobj.melt:3070:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1536*/ meltfptr[1535])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1367__COMPILOBJ_NREP_CITERATION#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:3070:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1536*/ meltfptr[1535])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1367__COMPILOBJ_NREP_CITERATION#2", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:3070:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1536*/ meltfptr[1535])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1367__COMPILOBJ_NREP_CITERATION#3", NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V72*/ meltfptr[71])); ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V72*/ meltfptr[71]); MELT_LOCATION ("warmelt-genobj.melt:3070:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1536*/ meltfptr[1535])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1367__COMPILOBJ_NREP_CITERATION#4", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V84*/ meltfptr[83])); ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V84*/ meltfptr[83]); MELT_LOCATION ("warmelt-genobj.melt:3070:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1536*/ meltfptr[1535])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1269*/ meltfptr[1268]); ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1269*/ meltfptr[1268]); MELT_LOCATION ("warmelt-genobj.melt:3070:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1536*/ meltfptr[1535])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1367__COMPILOBJ_NREP_CITERATION#6", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:3070:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1536*/ meltfptr[1535])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V630*/ meltfptr[629]); ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V630*/ meltfptr[629]); MELT_LOCATION ("warmelt-genobj.melt:3070:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1536*/ meltfptr[1535])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1367__COMPILOBJ_NREP_CITERATION#8", NULL != ( /*_.CLASS_CITERATOR__V98*/ meltfptr[97])); ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_CITERATOR__V98*/ meltfptr[97]); MELT_LOCATION ("warmelt-genobj.melt:3070:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1536*/ meltfptr[1535])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1367__COMPILOBJ_NREP_CITERATION#9", NULL != ( /*_.MULTIPLE_EVERY__V54*/ meltfptr[53])); ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[9] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V54*/ meltfptr[53]); MELT_LOCATION ("warmelt-genobj.melt:3070:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1536*/ meltfptr[1535])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1367__COMPILOBJ_NREP_CITERATION#10", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[10] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:3070:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1536*/ meltfptr[1535])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1367__COMPILOBJ_NREP_CITERATION#11", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V84*/ meltfptr[83])); ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[11] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V84*/ meltfptr[83]); MELT_LOCATION ("warmelt-genobj.melt:3070:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1536*/ meltfptr[1535])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1269*/ meltfptr[1268]); ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[12] = (melt_ptr_t) ( /*_.VALCLO___V1269*/ meltfptr[1268]); MELT_LOCATION ("warmelt-genobj.melt:3070:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1536*/ meltfptr[1535])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1367__COMPILOBJ_NREP_CITERATION#13", NULL != ( /*_.CTYPE_VOID__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[13] = (melt_ptr_t) ( /*_.CTYPE_VOID__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-genobj.melt:3070:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1536*/ meltfptr[1535])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V494*/ meltfptr[493]); ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[14] = (melt_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493]); MELT_LOCATION ("warmelt-genobj.melt:3109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1537*/ meltfptr[1536])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1373__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1537*/ meltfptr[1536])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:3109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1537*/ meltfptr[1536])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1373__LAMBDA_#1", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V84*/ meltfptr[83])); ((meltroutine_ptr_t) /*_.VALROUT___V1537*/ meltfptr[1536])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V84*/ meltfptr[83]); MELT_LOCATION ("warmelt-genobj.melt:3109:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1537*/ meltfptr[1536])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1269*/ meltfptr[1268]); ((meltroutine_ptr_t) /*_.VALROUT___V1537*/ meltfptr[1536])->tabval[2] = (melt_ptr_t) ( /*_.VALCLO___V1269*/ meltfptr[1268]); MELT_LOCATION ("warmelt-genobj.melt:3109:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1537*/ meltfptr[1536])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1373__LAMBDA_#3", NULL != ( /*_.CTYPE_VOID__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1537*/ meltfptr[1536])->tabval[3] = (melt_ptr_t) ( /*_.CTYPE_VOID__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-genobj.melt:3109:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1537*/ meltfptr[1536])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V494*/ meltfptr[493]); ((meltroutine_ptr_t) /*_.VALROUT___V1537*/ meltfptr[1536])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493]); MELT_LOCATION ("warmelt-genobj.melt:3109:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1537*/ meltfptr[1536]); MELT_LOCATION ("warmelt-genobj.melt:3070:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1536*/ meltfptr[1535])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1367__COMPILOBJ_NREP_CITERATION#15", NULL != ( /*_.VALROUT___V1537*/ meltfptr[1536])); ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[15] = (melt_ptr_t) ( /*_.VALROUT___V1537*/ meltfptr[1536]); MELT_LOCATION ("warmelt-genobj.melt:3070:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1536*/ meltfptr[1535])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1367__COMPILOBJ_NREP_CITERATION#16", NULL != ( /*_.DISCR_STRBUF__V32*/ meltfptr[31])); ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[16] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-genobj.melt:3070:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1536*/ meltfptr[1535])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1367__COMPILOBJ_NREP_CITERATION#17", NULL != ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[17] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-genobj.melt:3070:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1536*/ meltfptr[1535])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1367__COMPILOBJ_NREP_CITERATION#18", NULL != ( /*_.MULTIPLE_MAP__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[18] = (melt_ptr_t) ( /*_.MULTIPLE_MAP__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-genobj.melt:3070:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1536*/ meltfptr[1535])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1367__COMPILOBJ_NREP_CITERATION#19", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[19] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:3144:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1538*/ meltfptr[1537])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1374__LAMBDA_#0", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1538*/ meltfptr[1537])->tabval[0] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:3144:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1538*/ meltfptr[1537]); MELT_LOCATION ("warmelt-genobj.melt:3070:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1536*/ meltfptr[1535])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1367__COMPILOBJ_NREP_CITERATION#20", NULL != ( /*_.VALROUT___V1538*/ meltfptr[1537])); ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[20] = (melt_ptr_t) ( /*_.VALROUT___V1538*/ meltfptr[1537]); MELT_LOCATION ("warmelt-genobj.melt:3070:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1536*/ meltfptr[1535])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1367__COMPILOBJ_NREP_CITERATION#21", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[21] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:3154:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1539*/ meltfptr[1538])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1375__LAMBDA_#0", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1539*/ meltfptr[1538])->tabval[0] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:3154:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1539*/ meltfptr[1538]); MELT_LOCATION ("warmelt-genobj.melt:3070:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1536*/ meltfptr[1535])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1367__COMPILOBJ_NREP_CITERATION#22", NULL != ( /*_.VALROUT___V1539*/ meltfptr[1538])); ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[22] = (melt_ptr_t) ( /*_.VALROUT___V1539*/ meltfptr[1538]); MELT_LOCATION ("warmelt-genobj.melt:3070:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1536*/ meltfptr[1535])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1367__COMPILOBJ_NREP_CITERATION#23", NULL != ( /*_.LIST_EVERY__V44*/ meltfptr[43])); ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[23] = (melt_ptr_t) ( /*_.LIST_EVERY__V44*/ meltfptr[43]); MELT_LOCATION ("warmelt-genobj.melt:3070:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1536*/ meltfptr[1535])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1367__COMPILOBJ_NREP_CITERATION#24", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V84*/ meltfptr[83])); ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[24] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V84*/ meltfptr[83]); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_27 */ void meltmod__warmelt_genobj__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-genobj.melt:3070:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1536*/ meltfptr[1535])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1269*/ meltfptr[1268]); ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[25] = (melt_ptr_t) ( /*_.VALCLO___V1269*/ meltfptr[1268]); MELT_LOCATION ("warmelt-genobj.melt:3070:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1536*/ meltfptr[1535])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1367__COMPILOBJ_NREP_CITERATION#26", NULL != ( /*_.CTYPE_VOID__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[26] = (melt_ptr_t) ( /*_.CTYPE_VOID__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-genobj.melt:3070:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1536*/ meltfptr[1535])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V494*/ meltfptr[493]); ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[27] = (melt_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493]); MELT_LOCATION ("warmelt-genobj.melt:3070:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1536*/ meltfptr[1535])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1367__COMPILOBJ_NREP_CITERATION#28", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[28] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:3070:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1536*/ meltfptr[1535])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1171*/ meltfptr[1170]); ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[29] = (melt_ptr_t) ( /*_.VALDATA___V1171*/ meltfptr[1170]); MELT_LOCATION ("warmelt-genobj.melt:3168:/ 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_1376__LAMBDA_#0", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V84*/ meltfptr[83])); ((meltroutine_ptr_t) /*_.VALROUT___V1540*/ meltfptr[1539])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V84*/ meltfptr[83]); MELT_LOCATION ("warmelt-genobj.melt:3168:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1540*/ meltfptr[1539])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1269*/ meltfptr[1268]); ((meltroutine_ptr_t) /*_.VALROUT___V1540*/ meltfptr[1539])->tabval[1] = (melt_ptr_t) ( /*_.VALCLO___V1269*/ meltfptr[1268]); MELT_LOCATION ("warmelt-genobj.melt:3168:/ 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_1376__LAMBDA_#2", NULL != ( /*_.CTYPE_VOID__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1540*/ meltfptr[1539])->tabval[2] = (melt_ptr_t) ( /*_.CTYPE_VOID__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-genobj.melt:3168:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1540*/ meltfptr[1539])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V494*/ meltfptr[493]); ((meltroutine_ptr_t) /*_.VALROUT___V1540*/ meltfptr[1539])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493]); MELT_LOCATION ("warmelt-genobj.melt:3168:/ 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_1376__LAMBDA_#4", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1540*/ meltfptr[1539])->tabval[4] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:3168:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1540*/ meltfptr[1539])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1171*/ meltfptr[1170]); ((meltroutine_ptr_t) /*_.VALROUT___V1540*/ meltfptr[1539])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1171*/ meltfptr[1170]); MELT_LOCATION ("warmelt-genobj.melt:3168:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1540*/ meltfptr[1539]); MELT_LOCATION ("warmelt-genobj.melt:3070:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1536*/ meltfptr[1535])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1367__COMPILOBJ_NREP_CITERATION#30", NULL != ( /*_.VALROUT___V1540*/ meltfptr[1539])); ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[30] = (melt_ptr_t) ( /*_.VALROUT___V1540*/ meltfptr[1539]); MELT_LOCATION ("warmelt-genobj.melt:3070:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1536*/ meltfptr[1535])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1367__COMPILOBJ_NREP_CITERATION#31", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[31] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:3199:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1541*/ meltfptr[1540])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1377__LAMBDA_#0", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1541*/ meltfptr[1540])->tabval[0] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:3199:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1541*/ meltfptr[1540]); MELT_LOCATION ("warmelt-genobj.melt:3070:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1536*/ meltfptr[1535])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1367__COMPILOBJ_NREP_CITERATION#32", NULL != ( /*_.VALROUT___V1541*/ meltfptr[1540])); ((meltroutine_ptr_t) /*_.VALROUT___V1536*/ meltfptr[1535])->tabval[32] = (melt_ptr_t) ( /*_.VALROUT___V1541*/ meltfptr[1540]); MELT_LOCATION ("warmelt-genobj.melt:3070:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1536*/ meltfptr[1535]); /*putclosurout#50 */ melt_assertmsg ("putclosrout#50 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1542*/ meltfptr[1541])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#50 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1536*/ meltfptr[1535])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1542*/ meltfptr[1541])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1536*/ meltfptr[1535]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1542*/ meltfptr[1541]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1543*/ meltfptr[1542])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1543*/ meltfptr[1542])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1543*/ meltfptr[1542]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1544*/ meltfptr[1543]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1543*/ meltfptr[1542]); melt_dbgtrace_written_object ( /*_.VALDATA___V1543*/ meltfptr[1542], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1545*/ meltfptr[1544])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1545*/ meltfptr[1544])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1545*/ meltfptr[1544]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1546*/ meltfptr[1545]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1545*/ meltfptr[1544]); melt_dbgtrace_written_object ( /*_.VALDATA___V1545*/ meltfptr[1544], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:3212:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1547*/ meltfptr[1546])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1378__COMPILOBJ_NREP_SETQ#0", NULL != ( /*_.CLASS_NREP_SETQ__V99*/ meltfptr[98])); ((meltroutine_ptr_t) /*_.VALROUT___V1547*/ meltfptr[1546])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_SETQ__V99*/ meltfptr[98]); MELT_LOCATION ("warmelt-genobj.melt:3212:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1547*/ meltfptr[1546])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1378__COMPILOBJ_NREP_SETQ#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1547*/ meltfptr[1546])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:3212:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1547*/ meltfptr[1546])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1378__COMPILOBJ_NREP_SETQ#2", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1547*/ meltfptr[1546])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:3212:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1547*/ meltfptr[1546])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1378__COMPILOBJ_NREP_SETQ#3", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1547*/ meltfptr[1546])->tabval[3] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:3212:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1547*/ meltfptr[1546])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1171*/ meltfptr[1170]); ((meltroutine_ptr_t) /*_.VALROUT___V1547*/ meltfptr[1546])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V1171*/ meltfptr[1170]); MELT_LOCATION ("warmelt-genobj.melt:3212:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1547*/ meltfptr[1546])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V400*/ meltfptr[399]); ((meltroutine_ptr_t) /*_.VALROUT___V1547*/ meltfptr[1546])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); MELT_LOCATION ("warmelt-genobj.melt:3212:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1547*/ meltfptr[1546]); /*putclosurout#51 */ melt_assertmsg ("putclosrout#51 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1548*/ meltfptr[1547])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#51 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1547*/ meltfptr[1546])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1548*/ meltfptr[1547])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1547*/ meltfptr[1546]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1548*/ meltfptr[1547]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1549*/ meltfptr[1548])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1549*/ meltfptr[1548])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1549*/ meltfptr[1548]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1550*/ meltfptr[1549]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1549*/ meltfptr[1548]); melt_dbgtrace_written_object ( /*_.VALDATA___V1549*/ meltfptr[1548], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:3239:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1551*/ meltfptr[1550])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1382__COMPILOBJ_NREP_PROGN#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1551*/ meltfptr[1550])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:3239:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1551*/ meltfptr[1550])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1382__COMPILOBJ_NREP_PROGN#1", NULL != ( /*_.CLASS_NREP_PROGN__V100*/ meltfptr[99])); ((meltroutine_ptr_t) /*_.VALROUT___V1551*/ meltfptr[1550])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_PROGN__V100*/ meltfptr[99]); MELT_LOCATION ("warmelt-genobj.melt:3239:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1551*/ meltfptr[1550])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1382__COMPILOBJ_NREP_PROGN#2", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1551*/ meltfptr[1550])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:3239:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1551*/ meltfptr[1550])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1382__COMPILOBJ_NREP_PROGN#3", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1551*/ meltfptr[1550])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:3239:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1551*/ meltfptr[1550])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V518*/ meltfptr[517]); ((meltroutine_ptr_t) /*_.VALROUT___V1551*/ meltfptr[1550])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V518*/ meltfptr[517]); MELT_LOCATION ("warmelt-genobj.melt:3239:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1551*/ meltfptr[1550])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1382__COMPILOBJ_NREP_PROGN#5", NULL != ( /*_.MULTIPLE_EVERY__V54*/ meltfptr[53])); ((meltroutine_ptr_t) /*_.VALROUT___V1551*/ meltfptr[1550])->tabval[5] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V54*/ meltfptr[53]); MELT_LOCATION ("warmelt-genobj.melt:3239:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1551*/ meltfptr[1550])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1382__COMPILOBJ_NREP_PROGN#6", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1551*/ meltfptr[1550])->tabval[6] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:3255:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1552*/ meltfptr[1551])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1386__LAMBDA_#0", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1552*/ meltfptr[1551])->tabval[0] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:3255:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1552*/ meltfptr[1551]); MELT_LOCATION ("warmelt-genobj.melt:3239:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1551*/ meltfptr[1550])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1382__COMPILOBJ_NREP_PROGN#7", NULL != ( /*_.VALROUT___V1552*/ meltfptr[1551])); ((meltroutine_ptr_t) /*_.VALROUT___V1551*/ meltfptr[1550])->tabval[7] = (melt_ptr_t) ( /*_.VALROUT___V1552*/ meltfptr[1551]); MELT_LOCATION ("warmelt-genobj.melt:3239:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1551*/ meltfptr[1550])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1382__COMPILOBJ_NREP_PROGN#8", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1551*/ meltfptr[1550])->tabval[8] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:3239:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1551*/ meltfptr[1550]); /*putclosurout#52 */ melt_assertmsg ("putclosrout#52 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1553*/ meltfptr[1552])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#52 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1551*/ meltfptr[1550])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1553*/ meltfptr[1552])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1551*/ meltfptr[1550]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1553*/ meltfptr[1552]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1554*/ meltfptr[1553])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1554*/ meltfptr[1553])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1554*/ meltfptr[1553]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1555*/ meltfptr[1554]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1554*/ meltfptr[1553]); melt_dbgtrace_written_object ( /*_.VALDATA___V1554*/ meltfptr[1553], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:3267:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1556*/ meltfptr[1555])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1387__COMPILOBJ_NREP_MULTACC#0", NULL != ( /*_.CLASS_NREP_MULTACC__V101*/ meltfptr[100])); ((meltroutine_ptr_t) /*_.VALROUT___V1556*/ meltfptr[1555])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_MULTACC__V101*/ meltfptr[100]); MELT_LOCATION ("warmelt-genobj.melt:3267:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1556*/ meltfptr[1555])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1387__COMPILOBJ_NREP_MULTACC#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1556*/ meltfptr[1555])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:3267:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1556*/ meltfptr[1555])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1387__COMPILOBJ_NREP_MULTACC#2", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1556*/ meltfptr[1555])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:3267:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1556*/ meltfptr[1555])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1387__COMPILOBJ_NREP_MULTACC#3", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1556*/ meltfptr[1555])->tabval[3] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:3267:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1556*/ meltfptr[1555])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1387__COMPILOBJ_NREP_MULTACC#4", NULL != ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1556*/ meltfptr[1555])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-genobj.melt:3267:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1556*/ meltfptr[1555])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V362*/ meltfptr[361]); ((meltroutine_ptr_t) /*_.VALROUT___V1556*/ meltfptr[1555])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V362*/ meltfptr[361]); MELT_LOCATION ("warmelt-genobj.melt:3267:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1556*/ meltfptr[1555])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1387__COMPILOBJ_NREP_MULTACC#6", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1556*/ meltfptr[1555])->tabval[6] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:3267:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1556*/ meltfptr[1555])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1387__COMPILOBJ_NREP_MULTACC#7", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1556*/ meltfptr[1555])->tabval[7] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:3278:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1557*/ meltfptr[1556])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1391__LAMBDA_#0", NULL != ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1557*/ meltfptr[1556])->tabval[0] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-genobj.melt:3278:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1557*/ meltfptr[1556])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V362*/ meltfptr[361]); ((meltroutine_ptr_t) /*_.VALROUT___V1557*/ meltfptr[1556])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V362*/ meltfptr[361]); MELT_LOCATION ("warmelt-genobj.melt:3278:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1557*/ meltfptr[1556])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1391__LAMBDA_#2", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1557*/ meltfptr[1556])->tabval[2] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:3278:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1557*/ meltfptr[1556])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1391__LAMBDA_#3", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1557*/ meltfptr[1556])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:3278:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1557*/ meltfptr[1556]); MELT_LOCATION ("warmelt-genobj.melt:3267:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1556*/ meltfptr[1555])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1387__COMPILOBJ_NREP_MULTACC#8", NULL != ( /*_.VALROUT___V1557*/ meltfptr[1556])); ((meltroutine_ptr_t) /*_.VALROUT___V1556*/ meltfptr[1555])->tabval[8] = (melt_ptr_t) ( /*_.VALROUT___V1557*/ meltfptr[1556]); MELT_LOCATION ("warmelt-genobj.melt:3267:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1556*/ meltfptr[1555])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V308*/ meltfptr[307]); ((meltroutine_ptr_t) /*_.VALROUT___V1556*/ meltfptr[1555])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V308*/ meltfptr[307]); MELT_LOCATION ("warmelt-genobj.melt:3267:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1556*/ meltfptr[1555]); /*putclosurout#53 */ melt_assertmsg ("putclosrout#53 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1558*/ meltfptr[1557])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#53 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1556*/ meltfptr[1555])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1558*/ meltfptr[1557])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1556*/ meltfptr[1555]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1558*/ meltfptr[1557]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1559*/ meltfptr[1558])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1559*/ meltfptr[1558])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1559*/ meltfptr[1558]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1560*/ meltfptr[1559]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1559*/ meltfptr[1558]); melt_dbgtrace_written_object ( /*_.VALDATA___V1559*/ meltfptr[1558], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:3318:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1561*/ meltfptr[1560])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1392__COMPILOBJ_NREP_FIELDACC#0", NULL != ( /*_.CLASS_NREP_FIELDACC__V102*/ meltfptr[101])); ((meltroutine_ptr_t) /*_.VALROUT___V1561*/ meltfptr[1560])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_FIELDACC__V102*/ meltfptr[101]); MELT_LOCATION ("warmelt-genobj.melt:3318:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1561*/ meltfptr[1560])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1392__COMPILOBJ_NREP_FIELDACC#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1561*/ meltfptr[1560])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:3318:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1561*/ meltfptr[1560])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1392__COMPILOBJ_NREP_FIELDACC#2", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1561*/ meltfptr[1560])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:3318:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1561*/ meltfptr[1560])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1392__COMPILOBJ_NREP_FIELDACC#3", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1561*/ meltfptr[1560])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:3318:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1561*/ meltfptr[1560])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1392__COMPILOBJ_NREP_FIELDACC#4", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1561*/ meltfptr[1560])->tabval[4] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:3318:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1561*/ meltfptr[1560])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1392__COMPILOBJ_NREP_FIELDACC#5", NULL != ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1561*/ meltfptr[1560])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-genobj.melt:3318:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1561*/ meltfptr[1560])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V362*/ meltfptr[361]); ((meltroutine_ptr_t) /*_.VALROUT___V1561*/ meltfptr[1560])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V362*/ meltfptr[361]); MELT_LOCATION ("warmelt-genobj.melt:3318:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1561*/ meltfptr[1560])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1392__COMPILOBJ_NREP_FIELDACC#7", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1561*/ meltfptr[1560])->tabval[7] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:3318:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1561*/ meltfptr[1560])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1392__COMPILOBJ_NREP_FIELDACC#8", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1561*/ meltfptr[1560])->tabval[8] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:3331:/ 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_1396__LAMBDA_#0", NULL != ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1562*/ meltfptr[1561])->tabval[0] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-genobj.melt:3331:/ 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___V362*/ meltfptr[361]); ((meltroutine_ptr_t) /*_.VALROUT___V1562*/ meltfptr[1561])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V362*/ meltfptr[361]); MELT_LOCATION ("warmelt-genobj.melt:3331:/ 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_1396__LAMBDA_#2", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1562*/ meltfptr[1561])->tabval[2] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:3331:/ 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_1396__LAMBDA_#3", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1562*/ meltfptr[1561])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:3331:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1562*/ meltfptr[1561]); MELT_LOCATION ("warmelt-genobj.melt:3318:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1561*/ meltfptr[1560])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1392__COMPILOBJ_NREP_FIELDACC#9", NULL != ( /*_.VALROUT___V1562*/ meltfptr[1561])); ((meltroutine_ptr_t) /*_.VALROUT___V1561*/ meltfptr[1560])->tabval[9] = (melt_ptr_t) ( /*_.VALROUT___V1562*/ meltfptr[1561]); MELT_LOCATION ("warmelt-genobj.melt:3318:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1561*/ meltfptr[1560])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1392__COMPILOBJ_NREP_FIELDACC#10", NULL != ( /*_.CLASS_FIELD__V103*/ meltfptr[102])); ((meltroutine_ptr_t) /*_.VALROUT___V1561*/ meltfptr[1560])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_FIELD__V103*/ meltfptr[102]); MELT_LOCATION ("warmelt-genobj.melt:3318:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1561*/ meltfptr[1560])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V288*/ meltfptr[287]); ((meltroutine_ptr_t) /*_.VALROUT___V1561*/ meltfptr[1560])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V288*/ meltfptr[287]); MELT_LOCATION ("warmelt-genobj.melt:3318:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1561*/ meltfptr[1560])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1392__COMPILOBJ_NREP_FIELDACC#12", NULL != ( /*_.CLASS_NREP_DATAINSTANCE__V104*/ meltfptr[103])); ((meltroutine_ptr_t) /*_.VALROUT___V1561*/ meltfptr[1560])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_NREP_DATAINSTANCE__V104*/ meltfptr[103]); MELT_LOCATION ("warmelt-genobj.melt:3318:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1561*/ meltfptr[1560])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1392__COMPILOBJ_NREP_FIELDACC#13", NULL != ( /*_.CLASS_NREP_BOUND_DATA__V53*/ meltfptr[52])); ((meltroutine_ptr_t) /*_.VALROUT___V1561*/ meltfptr[1560])->tabval[13] = (melt_ptr_t) ( /*_.CLASS_NREP_BOUND_DATA__V53*/ meltfptr[52]); MELT_LOCATION ("warmelt-genobj.melt:3318:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1561*/ meltfptr[1560]); /*putclosurout#54 */ melt_assertmsg ("putclosrout#54 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1563*/ meltfptr[1562])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#54 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1561*/ meltfptr[1560])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1563*/ meltfptr[1562])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1561*/ meltfptr[1560]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1563*/ meltfptr[1562]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1564*/ meltfptr[1563])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1564*/ meltfptr[1563])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1564*/ meltfptr[1563]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1565*/ meltfptr[1564]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1564*/ meltfptr[1563]); melt_dbgtrace_written_object ( /*_.VALDATA___V1564*/ meltfptr[1563], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1566*/ meltfptr[1565])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1566*/ meltfptr[1565])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1566*/ meltfptr[1565]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1567*/ meltfptr[1566]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1566*/ meltfptr[1565]); melt_dbgtrace_written_object ( /*_.VALDATA___V1566*/ meltfptr[1565], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1568*/ meltfptr[1567])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1568*/ meltfptr[1567])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1568*/ meltfptr[1567]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1569*/ meltfptr[1568]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1568*/ meltfptr[1567]); melt_dbgtrace_written_object ( /*_.VALDATA___V1568*/ meltfptr[1567], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:3372:/ 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_1401__COMPILOBJ_NREP_UNSAFE_GET_FIELD#0", NULL != ( /*_.CLASS_NREP_UNSAFE_GET_FIELD__V105*/ meltfptr[104])); ((meltroutine_ptr_t) /*_.VALROUT___V1570*/ meltfptr[1569])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_UNSAFE_GET_FIELD__V105*/ meltfptr[104]); MELT_LOCATION ("warmelt-genobj.melt:3372:/ 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_1401__COMPILOBJ_NREP_UNSAFE_GET_FIELD#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1570*/ meltfptr[1569])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:3372:/ 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_1401__COMPILOBJ_NREP_UNSAFE_GET_FIELD#2", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1570*/ meltfptr[1569])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:3372:/ 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_1401__COMPILOBJ_NREP_UNSAFE_GET_FIELD#3", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1570*/ meltfptr[1569])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:3372:/ 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_1401__COMPILOBJ_NREP_UNSAFE_GET_FIELD#4", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1570*/ meltfptr[1569])->tabval[4] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:3372:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1570*/ meltfptr[1569])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V918*/ meltfptr[917]); ((meltroutine_ptr_t) /*_.VALROUT___V1570*/ meltfptr[1569])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V918*/ meltfptr[917]); MELT_LOCATION ("warmelt-genobj.melt:3372:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1570*/ meltfptr[1569]); /*putclosurout#55 */ melt_assertmsg ("putclosrout#55 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1571*/ meltfptr[1570])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#55 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1570*/ meltfptr[1569])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1571*/ meltfptr[1570])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1570*/ meltfptr[1569]); /*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"); MELT_LOCATION ("warmelt-genobj.melt:3394:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1574*/ meltfptr[1573])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1405__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS#0", NULL != ( /*_.CLASS_NREP_UNSAFE_PUT_FIELDS__V106*/ meltfptr[105])); ((meltroutine_ptr_t) /*_.VALROUT___V1574*/ meltfptr[1573])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_UNSAFE_PUT_FIELDS__V106*/ meltfptr[105]); MELT_LOCATION ("warmelt-genobj.melt:3394:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1574*/ meltfptr[1573])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1405__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1574*/ meltfptr[1573])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:3394:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1574*/ meltfptr[1573])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1405__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS#2", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1574*/ meltfptr[1573])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:3394:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1574*/ meltfptr[1573])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1405__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS#3", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1574*/ meltfptr[1573])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:3394:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1574*/ meltfptr[1573])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V518*/ meltfptr[517]); ((meltroutine_ptr_t) /*_.VALROUT___V1574*/ meltfptr[1573])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V518*/ meltfptr[517]); MELT_LOCATION ("warmelt-genobj.melt:3394:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1574*/ meltfptr[1573])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1405__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS#5", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1574*/ meltfptr[1573])->tabval[5] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:3394:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1574*/ meltfptr[1573])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1405__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS#6", NULL != ( /*_.MULTIPLE_EVERY__V54*/ meltfptr[53])); ((meltroutine_ptr_t) /*_.VALROUT___V1574*/ meltfptr[1573])->tabval[6] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V54*/ meltfptr[53]); MELT_LOCATION ("warmelt-genobj.melt:3394:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1574*/ meltfptr[1573])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1405__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS#7", NULL != ( /*_.CLASS_NREP_FIELDASSIGN__V107*/ meltfptr[106])); ((meltroutine_ptr_t) /*_.VALROUT___V1574*/ meltfptr[1573])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_NREP_FIELDASSIGN__V107*/ meltfptr[106]); MELT_LOCATION ("warmelt-genobj.melt:3394:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1574*/ meltfptr[1573])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1405__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS#8", NULL != ( /*_.CLASS_FIELD__V103*/ meltfptr[102])); ((meltroutine_ptr_t) /*_.VALROUT___V1574*/ meltfptr[1573])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_FIELD__V103*/ meltfptr[102]); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_28 */ void meltmod__warmelt_genobj__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-genobj.melt:3394:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1574*/ meltfptr[1573])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1405__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS#9", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1574*/ meltfptr[1573])->tabval[9] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:3394:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1574*/ meltfptr[1573])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V896*/ meltfptr[895]); ((meltroutine_ptr_t) /*_.VALROUT___V1574*/ meltfptr[1573])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V896*/ meltfptr[895]); MELT_LOCATION ("warmelt-genobj.melt:3394:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1574*/ meltfptr[1573])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1405__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS#11", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1574*/ meltfptr[1573])->tabval[11] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:3394:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1574*/ meltfptr[1573])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1405__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS#12", NULL != ( /*_.CLASS_NREP__V22*/ meltfptr[21])); ((meltroutine_ptr_t) /*_.VALROUT___V1574*/ meltfptr[1573])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_NREP__V22*/ meltfptr[21]); MELT_LOCATION ("warmelt-genobj.melt:3411:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1575*/ meltfptr[1574])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1409__LAMBDA_#0", NULL != ( /*_.CLASS_NREP_FIELDASSIGN__V107*/ meltfptr[106])); ((meltroutine_ptr_t) /*_.VALROUT___V1575*/ meltfptr[1574])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_FIELDASSIGN__V107*/ meltfptr[106]); MELT_LOCATION ("warmelt-genobj.melt:3411:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1575*/ meltfptr[1574])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1409__LAMBDA_#1", NULL != ( /*_.CLASS_FIELD__V103*/ meltfptr[102])); ((meltroutine_ptr_t) /*_.VALROUT___V1575*/ meltfptr[1574])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_FIELD__V103*/ meltfptr[102]); MELT_LOCATION ("warmelt-genobj.melt:3411:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1575*/ meltfptr[1574])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1409__LAMBDA_#2", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1575*/ meltfptr[1574])->tabval[2] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:3411:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1575*/ meltfptr[1574])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V896*/ meltfptr[895]); ((meltroutine_ptr_t) /*_.VALROUT___V1575*/ meltfptr[1574])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V896*/ meltfptr[895]); MELT_LOCATION ("warmelt-genobj.melt:3411:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1575*/ meltfptr[1574])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1409__LAMBDA_#4", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1575*/ meltfptr[1574])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:3411:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1575*/ meltfptr[1574])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1409__LAMBDA_#5", NULL != ( /*_.CLASS_NREP__V22*/ meltfptr[21])); ((meltroutine_ptr_t) /*_.VALROUT___V1575*/ meltfptr[1574])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NREP__V22*/ meltfptr[21]); MELT_LOCATION ("warmelt-genobj.melt:3411:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1575*/ meltfptr[1574]); MELT_LOCATION ("warmelt-genobj.melt:3394:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1574*/ meltfptr[1573])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1405__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS#13", NULL != ( /*_.VALROUT___V1575*/ meltfptr[1574])); ((meltroutine_ptr_t) /*_.VALROUT___V1574*/ meltfptr[1573])->tabval[13] = (melt_ptr_t) ( /*_.VALROUT___V1575*/ meltfptr[1574]); MELT_LOCATION ("warmelt-genobj.melt:3394:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1574*/ meltfptr[1573])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V994*/ meltfptr[993]); ((meltroutine_ptr_t) /*_.VALROUT___V1574*/ meltfptr[1573])->tabval[14] = (melt_ptr_t) ( /*_.VALDATA___V994*/ meltfptr[993]); MELT_LOCATION ("warmelt-genobj.melt:3394:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1574*/ meltfptr[1573])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V798*/ meltfptr[797]); ((meltroutine_ptr_t) /*_.VALROUT___V1574*/ meltfptr[1573])->tabval[15] = (melt_ptr_t) ( /*_.VALDATA___V798*/ meltfptr[797]); MELT_LOCATION ("warmelt-genobj.melt:3394:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1574*/ meltfptr[1573])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1405__COMPILOBJ_NREP_UNSAFE_PUT_FIELDS#16", NULL != ( /*_.VALSTR___V1576*/ meltfptr[1575])); ((meltroutine_ptr_t) /*_.VALROUT___V1574*/ meltfptr[1573])->tabval[16] = (melt_ptr_t) ( /*_.VALSTR___V1576*/ meltfptr[1575]); MELT_LOCATION ("warmelt-genobj.melt:3394:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1574*/ meltfptr[1573]); /*putclosurout#56 */ melt_assertmsg ("putclosrout#56 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1577*/ meltfptr[1576])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#56 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1574*/ meltfptr[1573])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1577*/ meltfptr[1576])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1574*/ meltfptr[1573]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1577*/ meltfptr[1576]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1578*/ meltfptr[1577])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1578*/ meltfptr[1577])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1578*/ meltfptr[1577]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1579*/ meltfptr[1578]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1578*/ meltfptr[1577]); melt_dbgtrace_written_object ( /*_.VALDATA___V1578*/ meltfptr[1577], "new static instance"); /*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"); MELT_LOCATION ("warmelt-genobj.melt:3446:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1582*/ meltfptr[1581])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1413__COMPILOBJ_NREP_CHECKSIGNAL#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1582*/ meltfptr[1581])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:3446:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1582*/ meltfptr[1581])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1413__COMPILOBJ_NREP_CHECKSIGNAL#1", NULL != ( /*_.CLASS_NREP_CHECKSIGNAL__V108*/ meltfptr[107])); ((meltroutine_ptr_t) /*_.VALROUT___V1582*/ meltfptr[1581])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_CHECKSIGNAL__V108*/ meltfptr[107]); MELT_LOCATION ("warmelt-genobj.melt:3446:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1582*/ meltfptr[1581])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V420*/ meltfptr[419]); ((meltroutine_ptr_t) /*_.VALROUT___V1582*/ meltfptr[1581])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V420*/ meltfptr[419]); MELT_LOCATION ("warmelt-genobj.melt:3446:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1582*/ meltfptr[1581]); /*putclosurout#57 */ melt_assertmsg ("putclosrout#57 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1583*/ meltfptr[1582])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#57 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1582*/ meltfptr[1581])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1583*/ meltfptr[1582])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1582*/ meltfptr[1581]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1583*/ meltfptr[1582]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1584*/ meltfptr[1583])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1584*/ meltfptr[1583])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1584*/ meltfptr[1583]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1585*/ meltfptr[1584]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1584*/ meltfptr[1583]); melt_dbgtrace_written_object ( /*_.VALDATA___V1584*/ meltfptr[1583], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:3462:/ 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_1417__COMPILOBJ_NREP_UNSAFE_NTH_COMPONENT#0", NULL != ( /*_.CLASS_NREP_UNSAFE_NTH_COMPONENT__V109*/ meltfptr[108])); ((meltroutine_ptr_t) /*_.VALROUT___V1586*/ meltfptr[1585])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_UNSAFE_NTH_COMPONENT__V109*/ meltfptr[108]); MELT_LOCATION ("warmelt-genobj.melt:3462:/ 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_1417__COMPILOBJ_NREP_UNSAFE_NTH_COMPONENT#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1586*/ meltfptr[1585])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:3462:/ 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_1417__COMPILOBJ_NREP_UNSAFE_NTH_COMPONENT#2", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1586*/ meltfptr[1585])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:3462:/ 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_1417__COMPILOBJ_NREP_UNSAFE_NTH_COMPONENT#3", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1586*/ meltfptr[1585])->tabval[3] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:3462:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1586*/ meltfptr[1585])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1151*/ meltfptr[1150]); ((meltroutine_ptr_t) /*_.VALROUT___V1586*/ meltfptr[1585])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V1151*/ meltfptr[1150]); MELT_LOCATION ("warmelt-genobj.melt:3462:/ 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_1417__COMPILOBJ_NREP_UNSAFE_NTH_COMPONENT#5", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1586*/ meltfptr[1585])->tabval[5] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:3462:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1586*/ meltfptr[1585]); /*putclosurout#58 */ melt_assertmsg ("putclosrout#58 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1587*/ meltfptr[1586])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#58 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1586*/ meltfptr[1585])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1587*/ meltfptr[1586])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1586*/ meltfptr[1585]); /*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"); MELT_LOCATION ("warmelt-genobj.melt:3481:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1590*/ meltfptr[1589])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1421__COMPILOBJ_NREP_APPLY#0", NULL != ( /*_.CLASS_NREP_APPLY__V110*/ meltfptr[109])); ((meltroutine_ptr_t) /*_.VALROUT___V1590*/ meltfptr[1589])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_APPLY__V110*/ meltfptr[109]); MELT_LOCATION ("warmelt-genobj.melt:3481:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1590*/ meltfptr[1589])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1421__COMPILOBJ_NREP_APPLY#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1590*/ meltfptr[1589])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:3481:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1590*/ meltfptr[1589])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1421__COMPILOBJ_NREP_APPLY#2", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1590*/ meltfptr[1589])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:3481:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1590*/ meltfptr[1589])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1421__COMPILOBJ_NREP_APPLY#3", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1590*/ meltfptr[1589])->tabval[3] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:3481:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1590*/ meltfptr[1589])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1421__COMPILOBJ_NREP_APPLY#4", NULL != ( /*_.MULTIPLE_MAP__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V1590*/ meltfptr[1589])->tabval[4] = (melt_ptr_t) ( /*_.MULTIPLE_MAP__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-genobj.melt:3481:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1590*/ meltfptr[1589])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1421__COMPILOBJ_NREP_APPLY#5", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1590*/ meltfptr[1589])->tabval[5] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:3481:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1590*/ meltfptr[1589])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V400*/ meltfptr[399]); ((meltroutine_ptr_t) /*_.VALROUT___V1590*/ meltfptr[1589])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); MELT_LOCATION ("warmelt-genobj.melt:3492:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1591*/ meltfptr[1590])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1425__LAMBDA_#0", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1591*/ meltfptr[1590])->tabval[0] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:3492:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1591*/ meltfptr[1590])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V400*/ meltfptr[399]); ((meltroutine_ptr_t) /*_.VALROUT___V1591*/ meltfptr[1590])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); MELT_LOCATION ("warmelt-genobj.melt:3492:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1591*/ meltfptr[1590]); MELT_LOCATION ("warmelt-genobj.melt:3481:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1590*/ meltfptr[1589])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1421__COMPILOBJ_NREP_APPLY#7", NULL != ( /*_.VALROUT___V1591*/ meltfptr[1590])); ((meltroutine_ptr_t) /*_.VALROUT___V1590*/ meltfptr[1589])->tabval[7] = (melt_ptr_t) ( /*_.VALROUT___V1591*/ meltfptr[1590]); MELT_LOCATION ("warmelt-genobj.melt:3481:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1590*/ meltfptr[1589])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1421__COMPILOBJ_NREP_APPLY#8", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1590*/ meltfptr[1589])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:3481:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1590*/ meltfptr[1589])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V728*/ meltfptr[727]); ((meltroutine_ptr_t) /*_.VALROUT___V1590*/ meltfptr[1589])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V728*/ meltfptr[727]); MELT_LOCATION ("warmelt-genobj.melt:3481:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1590*/ meltfptr[1589]); /*putclosurout#59 */ melt_assertmsg ("putclosrout#59 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1592*/ meltfptr[1591])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#59 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1590*/ meltfptr[1589])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1592*/ meltfptr[1591])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1590*/ meltfptr[1589]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1592*/ meltfptr[1591]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1593*/ meltfptr[1592])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1593*/ meltfptr[1592])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1593*/ meltfptr[1592]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1594*/ meltfptr[1593]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1593*/ meltfptr[1592]); melt_dbgtrace_written_object ( /*_.VALDATA___V1593*/ meltfptr[1592], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:3512:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1595*/ meltfptr[1594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1426__COMPILOBJ_NREP_MULTIAPPLY#0", NULL != ( /*_.CLASS_NREP_MULTIAPPLY__V111*/ meltfptr[110])); ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_MULTIAPPLY__V111*/ meltfptr[110]); MELT_LOCATION ("warmelt-genobj.melt:3512:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1595*/ meltfptr[1594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1426__COMPILOBJ_NREP_MULTIAPPLY#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:3512:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1595*/ meltfptr[1594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1426__COMPILOBJ_NREP_MULTIAPPLY#2", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:3512:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1595*/ meltfptr[1594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1426__COMPILOBJ_NREP_MULTIAPPLY#3", NULL != ( /*_.MULTIPLE_MAP__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[3] = (melt_ptr_t) ( /*_.MULTIPLE_MAP__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-genobj.melt:3512:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1595*/ meltfptr[1594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1426__COMPILOBJ_NREP_MULTIAPPLY#4", NULL != ( /*_.CLASS_FORMAL_BINDING__V42*/ meltfptr[41])); ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V42*/ meltfptr[41]); MELT_LOCATION ("warmelt-genobj.melt:3512:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1595*/ meltfptr[1594])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1269*/ meltfptr[1268]); ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1269*/ meltfptr[1268]); MELT_LOCATION ("warmelt-genobj.melt:3512:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1595*/ meltfptr[1594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1426__COMPILOBJ_NREP_MULTIAPPLY#6", NULL != ( /*_.CLASS_CTYPE__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-genobj.melt:3526:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1596*/ meltfptr[1595])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1430__LAMBDA_#0", NULL != ( /*_.CLASS_FORMAL_BINDING__V42*/ meltfptr[41])); ((meltroutine_ptr_t) /*_.VALROUT___V1596*/ meltfptr[1595])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V42*/ meltfptr[41]); MELT_LOCATION ("warmelt-genobj.melt:3526:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1596*/ meltfptr[1595])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1269*/ meltfptr[1268]); ((meltroutine_ptr_t) /*_.VALROUT___V1596*/ meltfptr[1595])->tabval[1] = (melt_ptr_t) ( /*_.VALCLO___V1269*/ meltfptr[1268]); MELT_LOCATION ("warmelt-genobj.melt:3526:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1596*/ meltfptr[1595])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1430__LAMBDA_#2", NULL != ( /*_.CLASS_CTYPE__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1596*/ meltfptr[1595])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-genobj.melt:3526:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1596*/ meltfptr[1595]); MELT_LOCATION ("warmelt-genobj.melt:3512:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1595*/ meltfptr[1594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1426__COMPILOBJ_NREP_MULTIAPPLY#7", NULL != ( /*_.VALROUT___V1596*/ meltfptr[1595])); ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[7] = (melt_ptr_t) ( /*_.VALROUT___V1596*/ meltfptr[1595]); MELT_LOCATION ("warmelt-genobj.melt:3512:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1595*/ meltfptr[1594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1426__COMPILOBJ_NREP_MULTIAPPLY#8", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:3512:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1595*/ meltfptr[1594])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V518*/ meltfptr[517]); ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V518*/ meltfptr[517]); MELT_LOCATION ("warmelt-genobj.melt:3512:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1595*/ meltfptr[1594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1426__COMPILOBJ_NREP_MULTIAPPLY#10", NULL != ( /*_.DISCR_MULTIPLE__V18*/ meltfptr[17])); ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[10] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V18*/ meltfptr[17]); MELT_LOCATION ("warmelt-genobj.melt:3512:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1595*/ meltfptr[1594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1426__COMPILOBJ_NREP_MULTIAPPLY#11", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[11] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:3512:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1595*/ meltfptr[1594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1426__COMPILOBJ_NREP_MULTIAPPLY#12", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[12] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:3550:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1597*/ meltfptr[1596])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1431__LAMBDA_#0", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1597*/ meltfptr[1596])->tabval[0] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:3550:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1597*/ meltfptr[1596]); MELT_LOCATION ("warmelt-genobj.melt:3512:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1595*/ meltfptr[1594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1426__COMPILOBJ_NREP_MULTIAPPLY#13", NULL != ( /*_.VALROUT___V1597*/ meltfptr[1596])); ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[13] = (melt_ptr_t) ( /*_.VALROUT___V1597*/ meltfptr[1596]); MELT_LOCATION ("warmelt-genobj.melt:3512:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1595*/ meltfptr[1594])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V742*/ meltfptr[741]); ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[14] = (melt_ptr_t) ( /*_.VALDATA___V742*/ meltfptr[741]); MELT_LOCATION ("warmelt-genobj.melt:3512:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1595*/ meltfptr[1594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1426__COMPILOBJ_NREP_MULTIAPPLY#15", NULL != ( /*_.MULTIPLE_EVERY__V54*/ meltfptr[53])); ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[15] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V54*/ meltfptr[53]); MELT_LOCATION ("warmelt-genobj.melt:3512:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1595*/ meltfptr[1594])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V400*/ meltfptr[399]); ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[16] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); MELT_LOCATION ("warmelt-genobj.melt:3512:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1595*/ meltfptr[1594])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V184*/ meltfptr[183]); ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[17] = (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]); MELT_LOCATION ("warmelt-genobj.melt:3564:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1598*/ meltfptr[1597])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V400*/ meltfptr[399]); ((meltroutine_ptr_t) /*_.VALROUT___V1598*/ meltfptr[1597])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); MELT_LOCATION ("warmelt-genobj.melt:3564:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1598*/ meltfptr[1597])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V184*/ meltfptr[183]); ((meltroutine_ptr_t) /*_.VALROUT___V1598*/ meltfptr[1597])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]); MELT_LOCATION ("warmelt-genobj.melt:3564:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1598*/ meltfptr[1597]); MELT_LOCATION ("warmelt-genobj.melt:3512:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1595*/ meltfptr[1594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1426__COMPILOBJ_NREP_MULTIAPPLY#18", NULL != ( /*_.VALROUT___V1598*/ meltfptr[1597])); ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[18] = (melt_ptr_t) ( /*_.VALROUT___V1598*/ meltfptr[1597]); MELT_LOCATION ("warmelt-genobj.melt:3512:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1595*/ meltfptr[1594])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V494*/ meltfptr[493]); ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[19] = (melt_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493]); MELT_LOCATION ("warmelt-genobj.melt:3574:/ 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___V494*/ meltfptr[493]); ((meltroutine_ptr_t) /*_.VALROUT___V1599*/ meltfptr[1598])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493]); MELT_LOCATION ("warmelt-genobj.melt:3574:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1599*/ meltfptr[1598]); MELT_LOCATION ("warmelt-genobj.melt:3512:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1595*/ meltfptr[1594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1426__COMPILOBJ_NREP_MULTIAPPLY#20", NULL != ( /*_.VALROUT___V1599*/ meltfptr[1598])); ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[20] = (melt_ptr_t) ( /*_.VALROUT___V1599*/ meltfptr[1598]); MELT_LOCATION ("warmelt-genobj.melt:3512:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1595*/ meltfptr[1594])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1404*/ meltfptr[1403]); ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[21] = (melt_ptr_t) ( /*_.VALCLO___V1404*/ meltfptr[1403]); MELT_LOCATION ("warmelt-genobj.melt:3585:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1600*/ meltfptr[1599])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1404*/ meltfptr[1403]); ((meltroutine_ptr_t) /*_.VALROUT___V1600*/ meltfptr[1599])->tabval[0] = (melt_ptr_t) ( /*_.VALCLO___V1404*/ meltfptr[1403]); MELT_LOCATION ("warmelt-genobj.melt:3585:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1600*/ meltfptr[1599]); MELT_LOCATION ("warmelt-genobj.melt:3512:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1595*/ meltfptr[1594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1426__COMPILOBJ_NREP_MULTIAPPLY#22", NULL != ( /*_.VALROUT___V1600*/ meltfptr[1599])); ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[22] = (melt_ptr_t) ( /*_.VALROUT___V1600*/ meltfptr[1599]); MELT_LOCATION ("warmelt-genobj.melt:3512:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1595*/ meltfptr[1594]); /*putclosurout#60 */ melt_assertmsg ("putclosrout#60 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1601*/ meltfptr[1600])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#60 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1595*/ meltfptr[1594])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1601*/ meltfptr[1600])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1595*/ meltfptr[1594]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1601*/ meltfptr[1600]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1602*/ meltfptr[1601])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1602*/ meltfptr[1601])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1602*/ meltfptr[1601]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1603*/ meltfptr[1602]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1602*/ meltfptr[1601]); melt_dbgtrace_written_object ( /*_.VALDATA___V1602*/ meltfptr[1601], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:3594:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1604*/ meltfptr[1603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1435__COMPILOBJ_NREP_MSEND#0", NULL != ( /*_.CLASS_NREP_MSEND__V112*/ meltfptr[111])); ((meltroutine_ptr_t) /*_.VALROUT___V1604*/ meltfptr[1603])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_MSEND__V112*/ meltfptr[111]); MELT_LOCATION ("warmelt-genobj.melt:3594:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1604*/ meltfptr[1603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1435__COMPILOBJ_NREP_MSEND#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1604*/ meltfptr[1603])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:3594:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1604*/ meltfptr[1603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1435__COMPILOBJ_NREP_MSEND#2", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1604*/ meltfptr[1603])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:3594:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1604*/ meltfptr[1603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1435__COMPILOBJ_NREP_MSEND#3", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1604*/ meltfptr[1603])->tabval[3] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:3594:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1604*/ meltfptr[1603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1435__COMPILOBJ_NREP_MSEND#4", NULL != ( /*_.MULTIPLE_MAP__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V1604*/ meltfptr[1603])->tabval[4] = (melt_ptr_t) ( /*_.MULTIPLE_MAP__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-genobj.melt:3594:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1604*/ meltfptr[1603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1435__COMPILOBJ_NREP_MSEND#5", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1604*/ meltfptr[1603])->tabval[5] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:3594:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1604*/ meltfptr[1603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1435__COMPILOBJ_NREP_MSEND#6", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1604*/ meltfptr[1603])->tabval[6] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:3608:/ 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_1439__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1605*/ meltfptr[1604])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:3608:/ 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_1439__LAMBDA_#1", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1605*/ meltfptr[1604])->tabval[1] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:3608:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1605*/ meltfptr[1604]); MELT_LOCATION ("warmelt-genobj.melt:3594:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1604*/ meltfptr[1603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1435__COMPILOBJ_NREP_MSEND#7", NULL != ( /*_.VALROUT___V1605*/ meltfptr[1604])); ((meltroutine_ptr_t) /*_.VALROUT___V1604*/ meltfptr[1603])->tabval[7] = (melt_ptr_t) ( /*_.VALROUT___V1605*/ meltfptr[1604]); MELT_LOCATION ("warmelt-genobj.melt:3594:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1604*/ meltfptr[1603])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V752*/ meltfptr[751]); ((meltroutine_ptr_t) /*_.VALROUT___V1604*/ meltfptr[1603])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V752*/ meltfptr[751]); MELT_LOCATION ("warmelt-genobj.melt:3594:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1604*/ meltfptr[1603])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1435__COMPILOBJ_NREP_MSEND#9", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1604*/ meltfptr[1603])->tabval[9] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:3594:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1604*/ meltfptr[1603]); /*putclosurout#61 */ melt_assertmsg ("putclosrout#61 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1606*/ meltfptr[1605])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#61 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1604*/ meltfptr[1603])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1606*/ meltfptr[1605])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1604*/ meltfptr[1603]); /*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"); MELT_LOCATION ("warmelt-genobj.melt:3634:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1609*/ meltfptr[1608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1440__COMPILOBJ_NREP_MULTIMSEND#0", NULL != ( /*_.CLASS_NREP_MULTIMSEND__V113*/ meltfptr[112])); ((meltroutine_ptr_t) /*_.VALROUT___V1609*/ meltfptr[1608])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_MULTIMSEND__V113*/ meltfptr[112]); MELT_LOCATION ("warmelt-genobj.melt:3634:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1609*/ meltfptr[1608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1440__COMPILOBJ_NREP_MULTIMSEND#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1609*/ meltfptr[1608])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:3634:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1609*/ meltfptr[1608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1440__COMPILOBJ_NREP_MULTIMSEND#2", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1609*/ meltfptr[1608])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_29 */ void meltmod__warmelt_genobj__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-genobj.melt:3634:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1609*/ meltfptr[1608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1440__COMPILOBJ_NREP_MULTIMSEND#3", NULL != ( /*_.MULTIPLE_MAP__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V1609*/ meltfptr[1608])->tabval[3] = (melt_ptr_t) ( /*_.MULTIPLE_MAP__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-genobj.melt:3634:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1609*/ meltfptr[1608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1440__COMPILOBJ_NREP_MULTIMSEND#4", NULL != ( /*_.CLASS_FORMAL_BINDING__V42*/ meltfptr[41])); ((meltroutine_ptr_t) /*_.VALROUT___V1609*/ meltfptr[1608])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V42*/ meltfptr[41]); MELT_LOCATION ("warmelt-genobj.melt:3634:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1609*/ meltfptr[1608])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1269*/ meltfptr[1268]); ((meltroutine_ptr_t) /*_.VALROUT___V1609*/ meltfptr[1608])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1269*/ meltfptr[1268]); MELT_LOCATION ("warmelt-genobj.melt:3634:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1609*/ meltfptr[1608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1440__COMPILOBJ_NREP_MULTIMSEND#6", NULL != ( /*_.CLASS_CTYPE__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1609*/ meltfptr[1608])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-genobj.melt:3649:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1610*/ meltfptr[1609])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1444__LAMBDA_#0", NULL != ( /*_.CLASS_FORMAL_BINDING__V42*/ meltfptr[41])); ((meltroutine_ptr_t) /*_.VALROUT___V1610*/ meltfptr[1609])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V42*/ meltfptr[41]); MELT_LOCATION ("warmelt-genobj.melt:3649:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1610*/ meltfptr[1609])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1269*/ meltfptr[1268]); ((meltroutine_ptr_t) /*_.VALROUT___V1610*/ meltfptr[1609])->tabval[1] = (melt_ptr_t) ( /*_.VALCLO___V1269*/ meltfptr[1268]); MELT_LOCATION ("warmelt-genobj.melt:3649:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1610*/ meltfptr[1609])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1444__LAMBDA_#2", NULL != ( /*_.CLASS_CTYPE__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1610*/ meltfptr[1609])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-genobj.melt:3649:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1610*/ meltfptr[1609]); MELT_LOCATION ("warmelt-genobj.melt:3634:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1609*/ meltfptr[1608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1440__COMPILOBJ_NREP_MULTIMSEND#7", NULL != ( /*_.VALROUT___V1610*/ meltfptr[1609])); ((meltroutine_ptr_t) /*_.VALROUT___V1609*/ meltfptr[1608])->tabval[7] = (melt_ptr_t) ( /*_.VALROUT___V1610*/ meltfptr[1609]); MELT_LOCATION ("warmelt-genobj.melt:3634:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1609*/ meltfptr[1608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1440__COMPILOBJ_NREP_MULTIMSEND#8", NULL != ( /*_.DISCR_MULTIPLE__V18*/ meltfptr[17])); ((meltroutine_ptr_t) /*_.VALROUT___V1609*/ meltfptr[1608])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V18*/ meltfptr[17]); MELT_LOCATION ("warmelt-genobj.melt:3634:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1609*/ meltfptr[1608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1440__COMPILOBJ_NREP_MULTIMSEND#9", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1609*/ meltfptr[1608])->tabval[9] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:3634:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1609*/ meltfptr[1608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1440__COMPILOBJ_NREP_MULTIMSEND#10", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1609*/ meltfptr[1608])->tabval[10] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:3634:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1609*/ meltfptr[1608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1440__COMPILOBJ_NREP_MULTIMSEND#11", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1609*/ meltfptr[1608])->tabval[11] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:3669:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1611*/ meltfptr[1610])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1445__LAMBDA_#0", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1611*/ meltfptr[1610])->tabval[0] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:3669:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1611*/ meltfptr[1610]); MELT_LOCATION ("warmelt-genobj.melt:3634:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1609*/ meltfptr[1608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1440__COMPILOBJ_NREP_MULTIMSEND#12", NULL != ( /*_.VALROUT___V1611*/ meltfptr[1610])); ((meltroutine_ptr_t) /*_.VALROUT___V1609*/ meltfptr[1608])->tabval[12] = (melt_ptr_t) ( /*_.VALROUT___V1611*/ meltfptr[1610]); MELT_LOCATION ("warmelt-genobj.melt:3634:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1609*/ meltfptr[1608])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V518*/ meltfptr[517]); ((meltroutine_ptr_t) /*_.VALROUT___V1609*/ meltfptr[1608])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V518*/ meltfptr[517]); MELT_LOCATION ("warmelt-genobj.melt:3634:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1609*/ meltfptr[1608])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V770*/ meltfptr[769]); ((meltroutine_ptr_t) /*_.VALROUT___V1609*/ meltfptr[1608])->tabval[14] = (melt_ptr_t) ( /*_.VALDATA___V770*/ meltfptr[769]); MELT_LOCATION ("warmelt-genobj.melt:3634:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1609*/ meltfptr[1608])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V400*/ meltfptr[399]); ((meltroutine_ptr_t) /*_.VALROUT___V1609*/ meltfptr[1608])->tabval[15] = (melt_ptr_t) ( /*_.VALDATA___V400*/ meltfptr[399]); MELT_LOCATION ("warmelt-genobj.melt:3634:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1609*/ meltfptr[1608])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V184*/ meltfptr[183]); ((meltroutine_ptr_t) /*_.VALROUT___V1609*/ meltfptr[1608])->tabval[16] = (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]); MELT_LOCATION ("warmelt-genobj.melt:3634:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1609*/ meltfptr[1608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1440__COMPILOBJ_NREP_MULTIMSEND#17", NULL != ( /*_.MULTIPLE_EVERY__V54*/ meltfptr[53])); ((meltroutine_ptr_t) /*_.VALROUT___V1609*/ meltfptr[1608])->tabval[17] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V54*/ meltfptr[53]); MELT_LOCATION ("warmelt-genobj.melt:3634:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1609*/ meltfptr[1608])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V494*/ meltfptr[493]); ((meltroutine_ptr_t) /*_.VALROUT___V1609*/ meltfptr[1608])->tabval[18] = (melt_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493]); MELT_LOCATION ("warmelt-genobj.melt:3701:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1612*/ meltfptr[1611])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V494*/ meltfptr[493]); ((meltroutine_ptr_t) /*_.VALROUT___V1612*/ meltfptr[1611])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493]); MELT_LOCATION ("warmelt-genobj.melt:3701:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1612*/ meltfptr[1611]); MELT_LOCATION ("warmelt-genobj.melt:3634:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1609*/ meltfptr[1608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1440__COMPILOBJ_NREP_MULTIMSEND#19", NULL != ( /*_.VALROUT___V1612*/ meltfptr[1611])); ((meltroutine_ptr_t) /*_.VALROUT___V1609*/ meltfptr[1608])->tabval[19] = (melt_ptr_t) ( /*_.VALROUT___V1612*/ meltfptr[1611]); MELT_LOCATION ("warmelt-genobj.melt:3634:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1609*/ meltfptr[1608])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1404*/ meltfptr[1403]); ((meltroutine_ptr_t) /*_.VALROUT___V1609*/ meltfptr[1608])->tabval[20] = (melt_ptr_t) ( /*_.VALCLO___V1404*/ meltfptr[1403]); MELT_LOCATION ("warmelt-genobj.melt:3711:/ 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___V1404*/ meltfptr[1403]); ((meltroutine_ptr_t) /*_.VALROUT___V1613*/ meltfptr[1612])->tabval[0] = (melt_ptr_t) ( /*_.VALCLO___V1404*/ meltfptr[1403]); MELT_LOCATION ("warmelt-genobj.melt:3711:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1613*/ meltfptr[1612]); MELT_LOCATION ("warmelt-genobj.melt:3634:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1609*/ meltfptr[1608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1440__COMPILOBJ_NREP_MULTIMSEND#21", NULL != ( /*_.VALROUT___V1613*/ meltfptr[1612])); ((meltroutine_ptr_t) /*_.VALROUT___V1609*/ meltfptr[1608])->tabval[21] = (melt_ptr_t) ( /*_.VALROUT___V1613*/ meltfptr[1612]); MELT_LOCATION ("warmelt-genobj.melt:3634:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1609*/ meltfptr[1608]); /*putclosurout#62 */ melt_assertmsg ("putclosrout#62 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1614*/ meltfptr[1613])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#62 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1609*/ meltfptr[1608])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1614*/ meltfptr[1613])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1609*/ meltfptr[1608]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1614*/ meltfptr[1613]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1615*/ meltfptr[1614])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1615*/ meltfptr[1614])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1615*/ meltfptr[1614]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1616*/ meltfptr[1615]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1615*/ meltfptr[1614]); melt_dbgtrace_written_object ( /*_.VALDATA___V1615*/ meltfptr[1614], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:3721:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1617*/ meltfptr[1616])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1448__COMPILOBJ_ANY_BINDING#0", NULL != ( /*_.CLASS_ANY_BINDING__V48*/ meltfptr[47])); ((meltroutine_ptr_t) /*_.VALROUT___V1617*/ meltfptr[1616])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V48*/ meltfptr[47]); MELT_LOCATION ("warmelt-genobj.melt:3721:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1617*/ meltfptr[1616])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1448__COMPILOBJ_ANY_BINDING#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1617*/ meltfptr[1616])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:3721:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1617*/ meltfptr[1616])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1448__COMPILOBJ_ANY_BINDING#2", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1617*/ meltfptr[1616])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:3721:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1617*/ meltfptr[1616]); /*putclosurout#63 */ melt_assertmsg ("putclosrout#63 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1618*/ meltfptr[1617])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#63 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1617*/ meltfptr[1616])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1618*/ meltfptr[1617])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1617*/ meltfptr[1616]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1618*/ meltfptr[1617]); MELT_LOCATION ("warmelt-genobj.melt:3734:/ 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_1450__COMPILOBJ_VALUE_BINDING#0", NULL != ( /*_.CLASS_VALUE_BINDING__V92*/ meltfptr[91])); ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_VALUE_BINDING__V92*/ meltfptr[91]); MELT_LOCATION ("warmelt-genobj.melt:3734:/ 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_1450__COMPILOBJ_VALUE_BINDING#1", NULL != ( /*_.CLASS_INITIAL_GENERATION_CONTEXT__V46*/ meltfptr[45])); ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_INITIAL_GENERATION_CONTEXT__V46*/ meltfptr[45]); MELT_LOCATION ("warmelt-genobj.melt:3734:/ 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_1450__COMPILOBJ_VALUE_BINDING#2", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:3734:/ 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_1450__COMPILOBJ_VALUE_BINDING#3", NULL != ( /*_.CLASS_ANY_BINDING__V48*/ meltfptr[47])); ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V48*/ meltfptr[47]); MELT_LOCATION ("warmelt-genobj.melt:3734:/ 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___V190*/ meltfptr[189]); ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189]); MELT_LOCATION ("warmelt-genobj.melt:3734:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1619*/ meltfptr[1618]); /*putclosurout#64 */ melt_assertmsg ("putclosrout#64 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1620*/ meltfptr[1619])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#64 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]); MELT_LOCATION ("warmelt-genobj.melt:3750:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1621*/ meltfptr[1620])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1452__COMPILOBJ_FIXED_BINDING#0", NULL != ( /*_.CLASS_FIXED_BINDING__V49*/ meltfptr[48])); ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_FIXED_BINDING__V49*/ meltfptr[48]); MELT_LOCATION ("warmelt-genobj.melt:3750:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1621*/ meltfptr[1620])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1452__COMPILOBJ_FIXED_BINDING#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:3750:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1621*/ meltfptr[1620])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1452__COMPILOBJ_FIXED_BINDING#2", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:3750:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1621*/ meltfptr[1620])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1452__COMPILOBJ_FIXED_BINDING#3", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[3] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:3750:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1621*/ meltfptr[1620]); /*putclosurout#65 */ melt_assertmsg ("putclosrout#65 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1622*/ meltfptr[1621])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#65 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1621*/ meltfptr[1620])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1622*/ meltfptr[1621])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1621*/ meltfptr[1620]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1622*/ meltfptr[1621]); MELT_LOCATION ("warmelt-genobj.melt:3763:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1623*/ meltfptr[1622])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1454__COMPILOBJ_NORMAL_LET_BINDING#0", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V84*/ meltfptr[83])); ((meltroutine_ptr_t) /*_.VALROUT___V1623*/ meltfptr[1622])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V84*/ meltfptr[83]); MELT_LOCATION ("warmelt-genobj.melt:3763:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1623*/ meltfptr[1622])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1454__COMPILOBJ_NORMAL_LET_BINDING#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1623*/ meltfptr[1622])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:3763:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1623*/ meltfptr[1622])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1454__COMPILOBJ_NORMAL_LET_BINDING#2", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1623*/ meltfptr[1622])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:3763:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1623*/ meltfptr[1622])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1454__COMPILOBJ_NORMAL_LET_BINDING#3", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1623*/ meltfptr[1622])->tabval[3] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:3763:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1623*/ meltfptr[1622]); /*putclosurout#66 */ melt_assertmsg ("putclosrout#66 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1624*/ meltfptr[1623])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#66 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1623*/ meltfptr[1622])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1624*/ meltfptr[1623])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1623*/ meltfptr[1622]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1624*/ meltfptr[1623]); MELT_LOCATION ("warmelt-genobj.melt:3779:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1625*/ meltfptr[1624])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1456__COMPILOBJ_CONSLAMBDABIND#0", NULL != ( /*_.CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING__V86*/ meltfptr[85])); ((meltroutine_ptr_t) /*_.VALROUT___V1625*/ meltfptr[1624])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING__V86*/ meltfptr[85]); MELT_LOCATION ("warmelt-genobj.melt:3779:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1625*/ meltfptr[1624])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1456__COMPILOBJ_CONSLAMBDABIND#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1625*/ meltfptr[1624])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:3779:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1625*/ meltfptr[1624])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1456__COMPILOBJ_CONSLAMBDABIND#2", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1625*/ meltfptr[1624])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:3779:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1625*/ meltfptr[1624])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1456__COMPILOBJ_CONSLAMBDABIND#3", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1625*/ meltfptr[1624])->tabval[3] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:3779:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1625*/ meltfptr[1624])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1456__COMPILOBJ_CONSLAMBDABIND#4", NULL != ( /*_.DISCR_STRBUF__V32*/ meltfptr[31])); ((meltroutine_ptr_t) /*_.VALROUT___V1625*/ meltfptr[1624])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-genobj.melt:3779:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1625*/ meltfptr[1624])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1456__COMPILOBJ_CONSLAMBDABIND#5", NULL != ( /*_.CLASS_NREP_LETREC__V95*/ meltfptr[94])); ((meltroutine_ptr_t) /*_.VALROUT___V1625*/ meltfptr[1624])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NREP_LETREC__V95*/ meltfptr[94]); MELT_LOCATION ("warmelt-genobj.melt:3779:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1625*/ meltfptr[1624])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1456__COMPILOBJ_CONSLAMBDABIND#6", NULL != ( /*_.CLASS_CLONED_SYMBOL__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V1625*/ meltfptr[1624])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-genobj.melt:3779:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1625*/ meltfptr[1624])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V318*/ meltfptr[317]); ((meltroutine_ptr_t) /*_.VALROUT___V1625*/ meltfptr[1624])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V318*/ meltfptr[317]); MELT_LOCATION ("warmelt-genobj.melt:3779:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1625*/ meltfptr[1624])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1456__COMPILOBJ_CONSLAMBDABIND#8", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1625*/ meltfptr[1624])->tabval[8] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:3779:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1625*/ meltfptr[1624])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1456__COMPILOBJ_CONSLAMBDABIND#9", NULL != ( /*_.DISCR_STRING__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1625*/ meltfptr[1624])->tabval[9] = (melt_ptr_t) ( /*_.DISCR_STRING__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-genobj.melt:3779:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1625*/ meltfptr[1624]); /*putclosurout#67 */ melt_assertmsg ("putclosrout#67 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1626*/ meltfptr[1625])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#67 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1625*/ meltfptr[1624])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1626*/ meltfptr[1625])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1625*/ meltfptr[1624]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1626*/ meltfptr[1625]); MELT_LOCATION ("warmelt-genobj.melt:3824:/ 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_1458__COMPILOBJ_CONSTUPLEBIND#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1627*/ meltfptr[1626])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:3824:/ 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_1458__COMPILOBJ_CONSTUPLEBIND#1", NULL != ( /*_.CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING__V88*/ meltfptr[87])); ((meltroutine_ptr_t) /*_.VALROUT___V1627*/ meltfptr[1626])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING__V88*/ meltfptr[87]); MELT_LOCATION ("warmelt-genobj.melt:3824:/ 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_1458__COMPILOBJ_CONSTUPLEBIND#2", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1627*/ meltfptr[1626])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:3824:/ 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_1458__COMPILOBJ_CONSTUPLEBIND#3", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1627*/ meltfptr[1626])->tabval[3] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:3824:/ 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_1458__COMPILOBJ_CONSTUPLEBIND#4", NULL != ( /*_.DISCR_STRBUF__V32*/ meltfptr[31])); ((meltroutine_ptr_t) /*_.VALROUT___V1627*/ meltfptr[1626])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-genobj.melt:3824:/ 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_1458__COMPILOBJ_CONSTUPLEBIND#5", NULL != ( /*_.CLASS_NREP_LETREC__V95*/ meltfptr[94])); ((meltroutine_ptr_t) /*_.VALROUT___V1627*/ meltfptr[1626])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NREP_LETREC__V95*/ meltfptr[94]); MELT_LOCATION ("warmelt-genobj.melt:3824:/ 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_1458__COMPILOBJ_CONSTUPLEBIND#6", NULL != ( /*_.CLASS_CLONED_SYMBOL__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V1627*/ meltfptr[1626])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-genobj.melt:3824:/ 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_1458__COMPILOBJ_CONSTUPLEBIND#7", NULL != ( /*_.DISCR_MULTIPLE__V18*/ meltfptr[17])); ((meltroutine_ptr_t) /*_.VALROUT___V1627*/ meltfptr[1626])->tabval[7] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V18*/ meltfptr[17]); MELT_LOCATION ("warmelt-genobj.melt:3824:/ 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___V308*/ meltfptr[307]); ((meltroutine_ptr_t) /*_.VALROUT___V1627*/ meltfptr[1626])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V308*/ meltfptr[307]); MELT_LOCATION ("warmelt-genobj.melt:3824:/ 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_1458__COMPILOBJ_CONSTUPLEBIND#9", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1627*/ meltfptr[1626])->tabval[9] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:3824:/ 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_1458__COMPILOBJ_CONSTUPLEBIND#10", NULL != ( /*_.DISCR_STRING__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1627*/ meltfptr[1626])->tabval[10] = (melt_ptr_t) ( /*_.DISCR_STRING__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-genobj.melt:3824:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1627*/ meltfptr[1626]); /*putclosurout#68 */ melt_assertmsg ("putclosrout#68 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1628*/ meltfptr[1627])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#68 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1627*/ meltfptr[1626])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1628*/ meltfptr[1627])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1627*/ meltfptr[1626]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1628*/ meltfptr[1627]); MELT_LOCATION ("warmelt-genobj.melt:3868:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1629*/ meltfptr[1628])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1460__COMPILOBJ_CONSPAIRBIND#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1629*/ meltfptr[1628])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:3868:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1629*/ meltfptr[1628])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1460__COMPILOBJ_CONSPAIRBIND#1", NULL != ( /*_.CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING__V89*/ meltfptr[88])); ((meltroutine_ptr_t) /*_.VALROUT___V1629*/ meltfptr[1628])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING__V89*/ meltfptr[88]); MELT_LOCATION ("warmelt-genobj.melt:3868:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1629*/ meltfptr[1628])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1460__COMPILOBJ_CONSPAIRBIND#2", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1629*/ meltfptr[1628])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:3868:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1629*/ meltfptr[1628])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1460__COMPILOBJ_CONSPAIRBIND#3", NULL != ( /*_.CLASS_NREP_LETREC__V95*/ meltfptr[94])); ((meltroutine_ptr_t) /*_.VALROUT___V1629*/ meltfptr[1628])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NREP_LETREC__V95*/ meltfptr[94]); MELT_LOCATION ("warmelt-genobj.melt:3868:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1629*/ meltfptr[1628])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1460__COMPILOBJ_CONSPAIRBIND#4", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1629*/ meltfptr[1628])->tabval[4] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:3868:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1629*/ meltfptr[1628])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1460__COMPILOBJ_CONSPAIRBIND#5", NULL != ( /*_.DISCR_STRBUF__V32*/ meltfptr[31])); ((meltroutine_ptr_t) /*_.VALROUT___V1629*/ meltfptr[1628])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-genobj.melt:3868:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1629*/ meltfptr[1628])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1460__COMPILOBJ_CONSPAIRBIND#6", NULL != ( /*_.CLASS_CLONED_SYMBOL__V30*/ meltfptr[29])); ((meltroutine_ptr_t) /*_.VALROUT___V1629*/ meltfptr[1628])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-genobj.melt:3868:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1629*/ meltfptr[1628])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V344*/ meltfptr[343]); ((meltroutine_ptr_t) /*_.VALROUT___V1629*/ meltfptr[1628])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]); MELT_LOCATION ("warmelt-genobj.melt:3868:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1629*/ meltfptr[1628])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1460__COMPILOBJ_CONSPAIRBIND#8", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1629*/ meltfptr[1628])->tabval[8] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:3868:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1629*/ meltfptr[1628])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1460__COMPILOBJ_CONSPAIRBIND#9", NULL != ( /*_.DISCR_STRING__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1629*/ meltfptr[1628])->tabval[9] = (melt_ptr_t) ( /*_.DISCR_STRING__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-genobj.melt:3868:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1629*/ meltfptr[1628]); /*putclosurout#69 */ melt_assertmsg ("putclosrout#69 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1630*/ meltfptr[1629])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#69 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1629*/ meltfptr[1628])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1630*/ meltfptr[1629])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1629*/ meltfptr[1628]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1630*/ meltfptr[1629]); MELT_LOCATION ("warmelt-genobj.melt:3907:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1631*/ meltfptr[1630])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1462__COMPILOBJ_CONSLISTBIND#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1631*/ meltfptr[1630])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:3907:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1631*/ meltfptr[1630])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1462__COMPILOBJ_CONSLISTBIND#1", NULL != ( /*_.CLASS_NORMAL_CONSTRUCTED_LIST_BINDING__V90*/ meltfptr[89])); ((meltroutine_ptr_t) /*_.VALROUT___V1631*/ meltfptr[1630])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_LIST_BINDING__V90*/ meltfptr[89]); MELT_LOCATION ("warmelt-genobj.melt:3907:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1631*/ meltfptr[1630])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1462__COMPILOBJ_CONSLISTBIND#2", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1631*/ meltfptr[1630])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:3907:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1631*/ meltfptr[1630])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1462__COMPILOBJ_CONSLISTBIND#3", NULL != ( /*_.CLASS_NREP_LETREC__V95*/ meltfptr[94])); ((meltroutine_ptr_t) /*_.VALROUT___V1631*/ meltfptr[1630])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NREP_LETREC__V95*/ meltfptr[94]); MELT_LOCATION ("warmelt-genobj.melt:3907:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1631*/ meltfptr[1630])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1462__COMPILOBJ_CONSLISTBIND#4", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1631*/ meltfptr[1630])->tabval[4] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:3907:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1631*/ meltfptr[1630])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1462__COMPILOBJ_CONSLISTBIND#5", NULL != ( /*_.DISCR_STRBUF__V32*/ meltfptr[31])); ((meltroutine_ptr_t) /*_.VALROUT___V1631*/ meltfptr[1630])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-genobj.melt:3907:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1631*/ meltfptr[1630])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V350*/ meltfptr[349]); ((meltroutine_ptr_t) /*_.VALROUT___V1631*/ meltfptr[1630])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]); MELT_LOCATION ("warmelt-genobj.melt:3907:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1631*/ meltfptr[1630])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1462__COMPILOBJ_CONSLISTBIND#7", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1631*/ meltfptr[1630])->tabval[7] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:3907:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1631*/ meltfptr[1630])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1462__COMPILOBJ_CONSLISTBIND#8", NULL != ( /*_.DISCR_STRING__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1631*/ meltfptr[1630])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_STRING__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-genobj.melt:3907:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1631*/ meltfptr[1630]); /*putclosurout#70 */ melt_assertmsg ("putclosrout#70 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1632*/ meltfptr[1631])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#70 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1631*/ meltfptr[1630])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1632*/ meltfptr[1631])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1631*/ meltfptr[1630]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1632*/ meltfptr[1631]); MELT_LOCATION ("warmelt-genobj.melt:3943:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1633*/ meltfptr[1632])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1464__COMPILOBJ_CONSINSTANCEBIND#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1633*/ meltfptr[1632])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:3943:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1633*/ meltfptr[1632])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1464__COMPILOBJ_CONSINSTANCEBIND#1", NULL != ( /*_.CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING__V91*/ meltfptr[90])); ((meltroutine_ptr_t) /*_.VALROUT___V1633*/ meltfptr[1632])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING__V91*/ meltfptr[90]); MELT_LOCATION ("warmelt-genobj.melt:3943:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1633*/ meltfptr[1632])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1464__COMPILOBJ_CONSINSTANCEBIND#2", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1633*/ meltfptr[1632])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:3943:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1633*/ meltfptr[1632])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1464__COMPILOBJ_CONSINSTANCEBIND#3", NULL != ( /*_.DISCR_STRBUF__V32*/ meltfptr[31])); ((meltroutine_ptr_t) /*_.VALROUT___V1633*/ meltfptr[1632])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-genobj.melt:3943:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1633*/ meltfptr[1632])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1464__COMPILOBJ_CONSINSTANCEBIND#4", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1633*/ meltfptr[1632])->tabval[4] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:3943:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1633*/ meltfptr[1632])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1464__COMPILOBJ_CONSINSTANCEBIND#5", NULL != ( /*_.CLASS_NREP_LETREC__V95*/ meltfptr[94])); ((meltroutine_ptr_t) /*_.VALROUT___V1633*/ meltfptr[1632])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NREP_LETREC__V95*/ meltfptr[94]); MELT_LOCATION ("warmelt-genobj.melt:3943:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1633*/ meltfptr[1632])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1464__COMPILOBJ_CONSINSTANCEBIND#6", NULL != ( /*_.CLASS_VALUE_BINDING__V92*/ meltfptr[91])); ((meltroutine_ptr_t) /*_.VALROUT___V1633*/ meltfptr[1632])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_VALUE_BINDING__V92*/ meltfptr[91]); MELT_LOCATION ("warmelt-genobj.melt:3943:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1633*/ meltfptr[1632])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1464__COMPILOBJ_CONSINSTANCEBIND#7", NULL != ( /*_.CLASS_CLASS_BINDING__V93*/ meltfptr[92])); ((meltroutine_ptr_t) /*_.VALROUT___V1633*/ meltfptr[1632])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_CLASS_BINDING__V93*/ meltfptr[92]); MELT_LOCATION ("warmelt-genobj.melt:3943:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1633*/ meltfptr[1632])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V288*/ meltfptr[287]); ((meltroutine_ptr_t) /*_.VALROUT___V1633*/ meltfptr[1632])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V288*/ meltfptr[287]); MELT_LOCATION ("warmelt-genobj.melt:3943:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1633*/ meltfptr[1632])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1464__COMPILOBJ_CONSINSTANCEBIND#9", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1633*/ meltfptr[1632])->tabval[9] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:3943:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1633*/ meltfptr[1632])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1464__COMPILOBJ_CONSINSTANCEBIND#10", NULL != ( /*_.DISCR_STRING__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1633*/ meltfptr[1632])->tabval[10] = (melt_ptr_t) ( /*_.DISCR_STRING__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-genobj.melt:3943:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1633*/ meltfptr[1632])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1464__COMPILOBJ_CONSINSTANCEBIND#11", NULL != ( /*_.CLASS_CLASS__V94*/ meltfptr[93])); ((meltroutine_ptr_t) /*_.VALROUT___V1633*/ meltfptr[1632])->tabval[11] = (melt_ptr_t) ( /*_.CLASS_CLASS__V94*/ meltfptr[93]); MELT_LOCATION ("warmelt-genobj.melt:3943:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1633*/ meltfptr[1632]); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_30 */ void meltmod__warmelt_genobj__initialmeltchunk_31 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*putclosurout#71*/ melt_assertmsg ("putclosrout#71 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1634*/ meltfptr[1633])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#71 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1633*/ meltfptr[1632])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1634*/ meltfptr[1633])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1633*/ meltfptr[1632]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1634*/ meltfptr[1633]); MELT_LOCATION ("warmelt-genobj.melt:3988:/ 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___V174*/ meltfptr[173]); ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173]); MELT_LOCATION ("warmelt-genobj.melt:3988:/ 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___V184*/ meltfptr[183]); ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]); MELT_LOCATION ("warmelt-genobj.melt:3988:/ 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_1466__PUTOBJDEST_OBJVALUE#2", NULL != ( /*_.CTYPE_VOID__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[2] = (melt_ptr_t) ( /*_.CTYPE_VOID__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-genobj.melt:3988:/ 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_1466__PUTOBJDEST_OBJVALUE#3", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:3988:/ 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___V518*/ meltfptr[517]); ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V518*/ meltfptr[517]); MELT_LOCATION ("warmelt-genobj.melt:3988:/ 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___V494*/ meltfptr[493]); ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493]); MELT_LOCATION ("warmelt-genobj.melt:3988:/ 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_1466__PUTOBJDEST_OBJVALUE#6", NULL != ( /*_.CLASS_CTYPE__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-genobj.melt:3988:/ 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___V436*/ meltfptr[435]); ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V436*/ meltfptr[435]); MELT_LOCATION ("warmelt-genobj.melt:3988:/ 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_1466__PUTOBJDEST_OBJVALUE#8", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[8] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:3988:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1635*/ meltfptr[1634]); /*putclosurout#72 */ melt_assertmsg ("putclosrout#72 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1636*/ meltfptr[1635])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#72 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1635*/ meltfptr[1634])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1636*/ meltfptr[1635])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1635*/ meltfptr[1634]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1636*/ meltfptr[1635]); MELT_LOCATION ("warmelt-genobj.melt:4053:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1637*/ meltfptr[1636])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1468__PUTOBJDEST_INTEGER#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1637*/ meltfptr[1636])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:4053:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1637*/ meltfptr[1636])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V190*/ meltfptr[189]); ((meltroutine_ptr_t) /*_.VALROUT___V1637*/ meltfptr[1636])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189]); MELT_LOCATION ("warmelt-genobj.melt:4053:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1637*/ meltfptr[1636])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V184*/ meltfptr[183]); ((meltroutine_ptr_t) /*_.VALROUT___V1637*/ meltfptr[1636])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]); MELT_LOCATION ("warmelt-genobj.melt:4053:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1637*/ meltfptr[1636])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1468__PUTOBJDEST_INTEGER#3", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1637*/ meltfptr[1636])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:4053:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1637*/ meltfptr[1636])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V174*/ meltfptr[173]); ((meltroutine_ptr_t) /*_.VALROUT___V1637*/ meltfptr[1636])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173]); MELT_LOCATION ("warmelt-genobj.melt:4053:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1637*/ meltfptr[1636])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V436*/ meltfptr[435]); ((meltroutine_ptr_t) /*_.VALROUT___V1637*/ meltfptr[1636])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V436*/ meltfptr[435]); MELT_LOCATION ("warmelt-genobj.melt:4053:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1637*/ meltfptr[1636])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1468__PUTOBJDEST_INTEGER#6", NULL != ( /*_.CTYPE_LONG__V43*/ meltfptr[42])); ((meltroutine_ptr_t) /*_.VALROUT___V1637*/ meltfptr[1636])->tabval[6] = (melt_ptr_t) ( /*_.CTYPE_LONG__V43*/ meltfptr[42]); MELT_LOCATION ("warmelt-genobj.melt:4053:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1637*/ meltfptr[1636]); /*putclosurout#73 */ melt_assertmsg ("putclosrout#73 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1638*/ meltfptr[1637])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#73 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1637*/ meltfptr[1636])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1638*/ meltfptr[1637])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1637*/ meltfptr[1636]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1638*/ meltfptr[1637]); MELT_LOCATION ("warmelt-genobj.melt:4080:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1639*/ meltfptr[1638])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V184*/ meltfptr[183]); ((meltroutine_ptr_t) /*_.VALROUT___V1639*/ meltfptr[1638])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]); MELT_LOCATION ("warmelt-genobj.melt:4080:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1639*/ meltfptr[1638])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1470__PUTOBJDEST_STRING#1", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1639*/ meltfptr[1638])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:4080:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1639*/ meltfptr[1638])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1470__PUTOBJDEST_STRING#2", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1639*/ meltfptr[1638])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:4080:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1639*/ meltfptr[1638])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V436*/ meltfptr[435]); ((meltroutine_ptr_t) /*_.VALROUT___V1639*/ meltfptr[1638])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V436*/ meltfptr[435]); MELT_LOCATION ("warmelt-genobj.melt:4080:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1639*/ meltfptr[1638])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1470__PUTOBJDEST_STRING#4", NULL != ( /*_.CTYPE_CSTRING__V114*/ meltfptr[113])); ((meltroutine_ptr_t) /*_.VALROUT___V1639*/ meltfptr[1638])->tabval[4] = (melt_ptr_t) ( /*_.CTYPE_CSTRING__V114*/ meltfptr[113]); MELT_LOCATION ("warmelt-genobj.melt:4080:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1639*/ meltfptr[1638]); /*putclosurout#74 */ melt_assertmsg ("putclosrout#74 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1640*/ meltfptr[1639])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#74 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1639*/ meltfptr[1638])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1640*/ meltfptr[1639])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1639*/ meltfptr[1638]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1640*/ meltfptr[1639]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1641*/ meltfptr[1640])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1641*/ meltfptr[1640])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1641*/ meltfptr[1640]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1642*/ meltfptr[1641]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1641*/ meltfptr[1640]); melt_dbgtrace_written_object ( /*_.VALDATA___V1641*/ meltfptr[1640], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:4103:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1643*/ meltfptr[1642])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V184*/ meltfptr[183]); ((meltroutine_ptr_t) /*_.VALROUT___V1643*/ meltfptr[1642])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]); MELT_LOCATION ("warmelt-genobj.melt:4103:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1643*/ meltfptr[1642])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1474__PUTOBJDEST_NULL#1", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1643*/ meltfptr[1642])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:4103:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1643*/ meltfptr[1642])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1474__PUTOBJDEST_NULL#2", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1643*/ meltfptr[1642])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:4103:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1643*/ meltfptr[1642])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V436*/ meltfptr[435]); ((meltroutine_ptr_t) /*_.VALROUT___V1643*/ meltfptr[1642])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V436*/ meltfptr[435]); MELT_LOCATION ("warmelt-genobj.melt:4103:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1643*/ meltfptr[1642])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1474__PUTOBJDEST_NULL#4", NULL != ( /*_.CTYPE_LONG__V43*/ meltfptr[42])); ((meltroutine_ptr_t) /*_.VALROUT___V1643*/ meltfptr[1642])->tabval[4] = (melt_ptr_t) ( /*_.CTYPE_LONG__V43*/ meltfptr[42]); MELT_LOCATION ("warmelt-genobj.melt:4103:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1643*/ meltfptr[1642])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1474__PUTOBJDEST_NULL#5", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1643*/ meltfptr[1642])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:4103:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1643*/ meltfptr[1642]); /*putclosurout#75 */ melt_assertmsg ("putclosrout#75 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1644*/ meltfptr[1643])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#75 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1643*/ meltfptr[1642])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1644*/ meltfptr[1643])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1643*/ meltfptr[1642]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1644*/ meltfptr[1643]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1645*/ meltfptr[1644])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1645*/ meltfptr[1644])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1645*/ meltfptr[1644]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1646*/ meltfptr[1645]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1645*/ meltfptr[1644]); melt_dbgtrace_written_object ( /*_.VALDATA___V1645*/ meltfptr[1644], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:4128:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1647*/ meltfptr[1646])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V504*/ meltfptr[503]); ((meltroutine_ptr_t) /*_.VALROUT___V1647*/ meltfptr[1646])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V504*/ meltfptr[503]); MELT_LOCATION ("warmelt-genobj.melt:4128:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1647*/ meltfptr[1646])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V184*/ meltfptr[183]); ((meltroutine_ptr_t) /*_.VALROUT___V1647*/ meltfptr[1646])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]); MELT_LOCATION ("warmelt-genobj.melt:4128:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1647*/ meltfptr[1646])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1171*/ meltfptr[1170]); ((meltroutine_ptr_t) /*_.VALROUT___V1647*/ meltfptr[1646])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1171*/ meltfptr[1170]); MELT_LOCATION ("warmelt-genobj.melt:4128:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1647*/ meltfptr[1646]); /*putclosurout#76 */ melt_assertmsg ("putclosrout#76 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1648*/ meltfptr[1647])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#76 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1647*/ meltfptr[1646])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1648*/ meltfptr[1647])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1647*/ meltfptr[1646]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1648*/ meltfptr[1647]); MELT_LOCATION ("warmelt-genobj.melt:4153:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1649*/ meltfptr[1648])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V548*/ meltfptr[547]); ((meltroutine_ptr_t) /*_.VALROUT___V1649*/ meltfptr[1648])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V548*/ meltfptr[547]); MELT_LOCATION ("warmelt-genobj.melt:4153:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1649*/ meltfptr[1648])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1480__PUTOBJDEST_OBJMULTIBLOCK#1", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1649*/ meltfptr[1648])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:4153:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1649*/ meltfptr[1648])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1171*/ meltfptr[1170]); ((meltroutine_ptr_t) /*_.VALROUT___V1649*/ meltfptr[1648])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1171*/ meltfptr[1170]); MELT_LOCATION ("warmelt-genobj.melt:4153:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1649*/ meltfptr[1648]); /*putclosurout#77 */ melt_assertmsg ("putclosrout#77 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1650*/ meltfptr[1649])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#77 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1649*/ meltfptr[1648])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1650*/ meltfptr[1649])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1649*/ meltfptr[1648]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1650*/ meltfptr[1649]); MELT_LOCATION ("warmelt-genobj.melt:4166:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1651*/ meltfptr[1650])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V596*/ meltfptr[595]); ((meltroutine_ptr_t) /*_.VALROUT___V1651*/ meltfptr[1650])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V596*/ meltfptr[595]); MELT_LOCATION ("warmelt-genobj.melt:4166:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1651*/ meltfptr[1650])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V184*/ meltfptr[183]); ((meltroutine_ptr_t) /*_.VALROUT___V1651*/ meltfptr[1650])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]); MELT_LOCATION ("warmelt-genobj.melt:4166:/ 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_1482__PUTOBJDEST_OBJLOOP#2", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1651*/ meltfptr[1650])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:4166:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1651*/ meltfptr[1650])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V436*/ meltfptr[435]); ((meltroutine_ptr_t) /*_.VALROUT___V1651*/ meltfptr[1650])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V436*/ meltfptr[435]); MELT_LOCATION ("warmelt-genobj.melt:4166:/ 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_1482__PUTOBJDEST_OBJLOOP#4", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1651*/ meltfptr[1650])->tabval[4] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:4166:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1651*/ meltfptr[1650])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V190*/ meltfptr[189]); ((meltroutine_ptr_t) /*_.VALROUT___V1651*/ meltfptr[1650])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189]); MELT_LOCATION ("warmelt-genobj.melt:4166:/ 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_1482__PUTOBJDEST_OBJLOOP#6", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1651*/ meltfptr[1650])->tabval[6] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:4166:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1651*/ meltfptr[1650]); /*putclosurout#78 */ melt_assertmsg ("putclosrout#78 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1652*/ meltfptr[1651])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#78 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1651*/ meltfptr[1650])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1652*/ meltfptr[1651])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1651*/ meltfptr[1650]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1652*/ meltfptr[1651]); MELT_LOCATION ("warmelt-genobj.melt:4191:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1653*/ meltfptr[1652])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V610*/ meltfptr[609]); ((meltroutine_ptr_t) /*_.VALROUT___V1653*/ meltfptr[1652])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V610*/ meltfptr[609]); MELT_LOCATION ("warmelt-genobj.melt:4191:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1653*/ meltfptr[1652])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V184*/ meltfptr[183]); ((meltroutine_ptr_t) /*_.VALROUT___V1653*/ meltfptr[1652])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]); MELT_LOCATION ("warmelt-genobj.melt:4191:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1653*/ meltfptr[1652]); /*putclosurout#79 */ melt_assertmsg ("putclosrout#79 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1654*/ meltfptr[1653])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#79 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1653*/ meltfptr[1652])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1654*/ meltfptr[1653])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1653*/ meltfptr[1652]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1654*/ meltfptr[1653]); MELT_LOCATION ("warmelt-genobj.melt:4201:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1655*/ meltfptr[1654])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1486__COMPILOBJ_NREP_IF#0", NULL != ( /*_.CLASS_NREP_IF__V116*/ meltfptr[115])); ((meltroutine_ptr_t) /*_.VALROUT___V1655*/ meltfptr[1654])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_IF__V116*/ meltfptr[115]); MELT_LOCATION ("warmelt-genobj.melt:4201:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1655*/ meltfptr[1654])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1486__COMPILOBJ_NREP_IF#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1655*/ meltfptr[1654])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:4201:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1655*/ meltfptr[1654])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1486__COMPILOBJ_NREP_IF#2", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1655*/ meltfptr[1654])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:4201:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1655*/ meltfptr[1654])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1486__COMPILOBJ_NREP_IF#3", NULL != ( /*_.CLASS_CTYPE__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1655*/ meltfptr[1654])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-genobj.melt:4201:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1655*/ meltfptr[1654])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1486__COMPILOBJ_NREP_IF#4", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1655*/ meltfptr[1654])->tabval[4] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:4201:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1655*/ meltfptr[1654])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1486__COMPILOBJ_NREP_IF#5", NULL != ( /*_.CLASS_NREP_NIL__V70*/ meltfptr[69])); ((meltroutine_ptr_t) /*_.VALROUT___V1655*/ meltfptr[1654])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NREP_NIL__V70*/ meltfptr[69]); MELT_LOCATION ("warmelt-genobj.melt:4201:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1655*/ meltfptr[1654])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V648*/ meltfptr[647]); ((meltroutine_ptr_t) /*_.VALROUT___V1655*/ meltfptr[1654])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V648*/ meltfptr[647]); MELT_LOCATION ("warmelt-genobj.melt:4201:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1655*/ meltfptr[1654]); /*putclosurout#80 */ melt_assertmsg ("putclosrout#80 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1656*/ meltfptr[1655])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#80 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1655*/ meltfptr[1654])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1656*/ meltfptr[1655])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1655*/ meltfptr[1654]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1656*/ meltfptr[1655]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1657*/ meltfptr[1656])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1657*/ meltfptr[1656])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1657*/ meltfptr[1656]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1658*/ meltfptr[1657]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1657*/ meltfptr[1656]); melt_dbgtrace_written_object ( /*_.VALDATA___V1657*/ meltfptr[1656], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:4233:/ 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_1490__COMPILOBJ_NREP_IFISA#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1659*/ meltfptr[1658])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:4233:/ 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_1490__COMPILOBJ_NREP_IFISA#1", NULL != ( /*_.CLASS_NREP_IFISA__V117*/ meltfptr[116])); ((meltroutine_ptr_t) /*_.VALROUT___V1659*/ meltfptr[1658])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_IFISA__V117*/ meltfptr[116]); MELT_LOCATION ("warmelt-genobj.melt:4233:/ 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_1490__COMPILOBJ_NREP_IFISA#2", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1659*/ meltfptr[1658])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:4233:/ 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_1490__COMPILOBJ_NREP_IFISA#3", NULL != ( /*_.CLASS_NREP_IFTESTVALUE__V118*/ meltfptr[117])); ((meltroutine_ptr_t) /*_.VALROUT___V1659*/ meltfptr[1658])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NREP_IFTESTVALUE__V118*/ meltfptr[117]); MELT_LOCATION ("warmelt-genobj.melt:4233:/ 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_1490__COMPILOBJ_NREP_IFISA#4", NULL != ( /*_.CLASS_CTYPE__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1659*/ meltfptr[1658])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-genobj.melt:4233:/ 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_1490__COMPILOBJ_NREP_IFISA#5", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1659*/ meltfptr[1658])->tabval[5] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:4233:/ 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_1490__COMPILOBJ_NREP_IFISA#6", NULL != ( /*_.CLASS_NREP_NIL__V70*/ meltfptr[69])); ((meltroutine_ptr_t) /*_.VALROUT___V1659*/ meltfptr[1658])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_NREP_NIL__V70*/ meltfptr[69]); MELT_LOCATION ("warmelt-genobj.melt:4233:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1659*/ meltfptr[1658])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1129*/ meltfptr[1128]); ((meltroutine_ptr_t) /*_.VALROUT___V1659*/ meltfptr[1658])->tabval[7] = (melt_ptr_t) ( /*_.VALCLO___V1129*/ meltfptr[1128]); MELT_LOCATION ("warmelt-genobj.melt:4233:/ 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_1490__COMPILOBJ_NREP_IFISA#8", NULL != ( /*_.CTYPE_LONG__V43*/ meltfptr[42])); ((meltroutine_ptr_t) /*_.VALROUT___V1659*/ meltfptr[1658])->tabval[8] = (melt_ptr_t) ( /*_.CTYPE_LONG__V43*/ meltfptr[42]); MELT_LOCATION ("warmelt-genobj.melt:4233:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1659*/ meltfptr[1658])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V648*/ meltfptr[647]); ((meltroutine_ptr_t) /*_.VALROUT___V1659*/ meltfptr[1658])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V648*/ meltfptr[647]); MELT_LOCATION ("warmelt-genobj.melt:4233:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1659*/ meltfptr[1658]); /*putclosurout#81 */ melt_assertmsg ("putclosrout#81 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1660*/ meltfptr[1659])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#81 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1659*/ meltfptr[1658])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1660*/ meltfptr[1659])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1659*/ meltfptr[1658]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1660*/ meltfptr[1659]); /*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"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1663*/ meltfptr[1662])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1663*/ meltfptr[1662])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1663*/ meltfptr[1662]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1664*/ meltfptr[1663]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1663*/ meltfptr[1662]); melt_dbgtrace_written_object ( /*_.VALDATA___V1663*/ meltfptr[1662], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:4267:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1665*/ meltfptr[1664])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1496__COMPILOBJ_NREP_IFTUPLESIZED#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1665*/ meltfptr[1664])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:4267:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1665*/ meltfptr[1664])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1496__COMPILOBJ_NREP_IFTUPLESIZED#1", NULL != ( /*_.CLASS_NREP_IFTUPLESIZED__V119*/ meltfptr[118])); ((meltroutine_ptr_t) /*_.VALROUT___V1665*/ meltfptr[1664])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_IFTUPLESIZED__V119*/ meltfptr[118]); MELT_LOCATION ("warmelt-genobj.melt:4267:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1665*/ meltfptr[1664])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1496__COMPILOBJ_NREP_IFTUPLESIZED#2", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1665*/ meltfptr[1664])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:4267:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1665*/ meltfptr[1664])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1496__COMPILOBJ_NREP_IFTUPLESIZED#3", NULL != ( /*_.CLASS_NREP_IFTESTVALUE__V118*/ meltfptr[117])); ((meltroutine_ptr_t) /*_.VALROUT___V1665*/ meltfptr[1664])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NREP_IFTESTVALUE__V118*/ meltfptr[117]); MELT_LOCATION ("warmelt-genobj.melt:4267:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1665*/ meltfptr[1664])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1496__COMPILOBJ_NREP_IFTUPLESIZED#4", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1665*/ meltfptr[1664])->tabval[4] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:4267:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1665*/ meltfptr[1664])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1129*/ meltfptr[1128]); ((meltroutine_ptr_t) /*_.VALROUT___V1665*/ meltfptr[1664])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1129*/ meltfptr[1128]); MELT_LOCATION ("warmelt-genobj.melt:4267:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1665*/ meltfptr[1664])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1496__COMPILOBJ_NREP_IFTUPLESIZED#6", NULL != ( /*_.CTYPE_LONG__V43*/ meltfptr[42])); ((meltroutine_ptr_t) /*_.VALROUT___V1665*/ meltfptr[1664])->tabval[6] = (melt_ptr_t) ( /*_.CTYPE_LONG__V43*/ meltfptr[42]); MELT_LOCATION ("warmelt-genobj.melt:4267:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1665*/ meltfptr[1664])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V648*/ meltfptr[647]); ((meltroutine_ptr_t) /*_.VALROUT___V1665*/ meltfptr[1664])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V648*/ meltfptr[647]); MELT_LOCATION ("warmelt-genobj.melt:4267:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1665*/ meltfptr[1664]); /*putclosurout#82 */ melt_assertmsg ("putclosrout#82 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1666*/ meltfptr[1665])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#82 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1665*/ meltfptr[1664])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1666*/ meltfptr[1665])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1665*/ meltfptr[1664]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1666*/ meltfptr[1665]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1667*/ meltfptr[1666])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1667*/ meltfptr[1666])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1667*/ meltfptr[1666]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1668*/ meltfptr[1667]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1667*/ meltfptr[1666]); melt_dbgtrace_written_object ( /*_.VALDATA___V1667*/ meltfptr[1666], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:4299:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1669*/ meltfptr[1668])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1500__COMPILOBJ_NREP_IFVARIADIC#0", NULL != ( /*_.CLASS_NREP_IFVARIADIC__V120*/ meltfptr[119])); ((meltroutine_ptr_t) /*_.VALROUT___V1669*/ meltfptr[1668])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_IFVARIADIC__V120*/ meltfptr[119]); MELT_LOCATION ("warmelt-genobj.melt:4299:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1669*/ meltfptr[1668])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1500__COMPILOBJ_NREP_IFVARIADIC#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1669*/ meltfptr[1668])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:4299:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1669*/ meltfptr[1668])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1500__COMPILOBJ_NREP_IFVARIADIC#2", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1669*/ meltfptr[1668])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:4299:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1669*/ meltfptr[1668])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1500__COMPILOBJ_NREP_IFVARIADIC#3", NULL != ( /*_.CLASS_SYMBOL__V33*/ meltfptr[32])); ((meltroutine_ptr_t) /*_.VALROUT___V1669*/ meltfptr[1668])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V33*/ meltfptr[32]); MELT_LOCATION ("warmelt-genobj.melt:4299:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1669*/ meltfptr[1668])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1259*/ meltfptr[1258]); ((meltroutine_ptr_t) /*_.VALROUT___V1669*/ meltfptr[1668])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V1259*/ meltfptr[1258]); MELT_LOCATION ("warmelt-genobj.melt:4299:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1669*/ meltfptr[1668])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1261*/ meltfptr[1260]); ((meltroutine_ptr_t) /*_.VALROUT___V1669*/ meltfptr[1668])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1261*/ meltfptr[1260]); MELT_LOCATION ("warmelt-genobj.melt:4299:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1669*/ meltfptr[1668])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1500__COMPILOBJ_NREP_IFVARIADIC#6", NULL != ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1669*/ meltfptr[1668])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-genobj.melt:4299:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1669*/ meltfptr[1668])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1500__COMPILOBJ_NREP_IFVARIADIC#7", NULL != ( /*_.DISCR_CONSTANT_INTEGER__V14*/ meltfptr[13])); ((meltroutine_ptr_t) /*_.VALROUT___V1669*/ meltfptr[1668])->tabval[7] = (melt_ptr_t) ( /*_.DISCR_CONSTANT_INTEGER__V14*/ meltfptr[13]); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_31 */ void meltmod__warmelt_genobj__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-genobj.melt:4299:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1669*/ meltfptr[1668])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1500__COMPILOBJ_NREP_IFVARIADIC#8", NULL != ( /*_.CLASS_CTYPE__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1669*/ meltfptr[1668])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-genobj.melt:4299:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1669*/ meltfptr[1668])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V362*/ meltfptr[361]); ((meltroutine_ptr_t) /*_.VALROUT___V1669*/ meltfptr[1668])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V362*/ meltfptr[361]); MELT_LOCATION ("warmelt-genobj.melt:4299:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1669*/ meltfptr[1668])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1500__COMPILOBJ_NREP_IFVARIADIC#10", NULL != ( /*_.LIST_TO_MULTIPLE__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1669*/ meltfptr[1668])->tabval[10] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-genobj.melt:4299:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1669*/ meltfptr[1668])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1500__COMPILOBJ_NREP_IFVARIADIC#11", NULL != ( /*_.DISCR_MULTIPLE__V18*/ meltfptr[17])); ((meltroutine_ptr_t) /*_.VALROUT___V1669*/ meltfptr[1668])->tabval[11] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V18*/ meltfptr[17]); MELT_LOCATION ("warmelt-genobj.melt:4299:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1669*/ meltfptr[1668])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1500__COMPILOBJ_NREP_IFVARIADIC#12", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1669*/ meltfptr[1668])->tabval[12] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:4299:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1669*/ meltfptr[1668])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V648*/ meltfptr[647]); ((meltroutine_ptr_t) /*_.VALROUT___V1669*/ meltfptr[1668])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V648*/ meltfptr[647]); MELT_LOCATION ("warmelt-genobj.melt:4299:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1669*/ meltfptr[1668]); /*putclosurout#83 */ melt_assertmsg ("putclosrout#83 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1670*/ meltfptr[1669])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#83 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1669*/ meltfptr[1668])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1670*/ meltfptr[1669])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1669*/ meltfptr[1668]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1670*/ meltfptr[1669]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1671*/ meltfptr[1670])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1671*/ meltfptr[1670])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1671*/ meltfptr[1670]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1672*/ meltfptr[1671]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1671*/ meltfptr[1670]); melt_dbgtrace_written_object ( /*_.VALDATA___V1671*/ meltfptr[1670], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:4385:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1673*/ meltfptr[1672])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1504__GETCTYPE_IFVARIADIC#0", NULL != ( /*_.CLASS_NREP_IFVARIADIC__V120*/ meltfptr[119])); ((meltroutine_ptr_t) /*_.VALROUT___V1673*/ meltfptr[1672])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_IFVARIADIC__V120*/ meltfptr[119]); MELT_LOCATION ("warmelt-genobj.melt:4385:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1673*/ meltfptr[1672])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1504__GETCTYPE_IFVARIADIC#1", NULL != ( /*_.CTYPE_VOID__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1673*/ meltfptr[1672])->tabval[1] = (melt_ptr_t) ( /*_.CTYPE_VOID__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-genobj.melt:4385:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1673*/ meltfptr[1672]); /*putclosurout#84 */ melt_assertmsg ("putclosrout#84 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1674*/ meltfptr[1673])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#84 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1673*/ meltfptr[1672])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1674*/ meltfptr[1673])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1673*/ meltfptr[1672]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1674*/ meltfptr[1673]); MELT_LOCATION ("warmelt-genobj.melt:4393:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1675*/ meltfptr[1674])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1506__COMPILOBJ_NREP_VARIADIC_ARGUMENT#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1675*/ meltfptr[1674])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:4393:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1675*/ meltfptr[1674])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1506__COMPILOBJ_NREP_VARIADIC_ARGUMENT#1", NULL != ( /*_.CLASS_NREP_VARIADIC_ARGUMENT__V121*/ meltfptr[120])); ((meltroutine_ptr_t) /*_.VALROUT___V1675*/ meltfptr[1674])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_VARIADIC_ARGUMENT__V121*/ meltfptr[120]); MELT_LOCATION ("warmelt-genobj.melt:4393:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1675*/ meltfptr[1674])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1506__COMPILOBJ_NREP_VARIADIC_ARGUMENT#2", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1675*/ meltfptr[1674])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:4393:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1675*/ meltfptr[1674])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1259*/ meltfptr[1258]); ((meltroutine_ptr_t) /*_.VALROUT___V1675*/ meltfptr[1674])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V1259*/ meltfptr[1258]); MELT_LOCATION ("warmelt-genobj.melt:4393:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1675*/ meltfptr[1674])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1261*/ meltfptr[1260]); ((meltroutine_ptr_t) /*_.VALROUT___V1675*/ meltfptr[1674])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V1261*/ meltfptr[1260]); MELT_LOCATION ("warmelt-genobj.melt:4393:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1675*/ meltfptr[1674])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1506__COMPILOBJ_NREP_VARIADIC_ARGUMENT#5", NULL != ( /*_.CLASS_CTYPE__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1675*/ meltfptr[1674])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-genobj.melt:4393:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1675*/ meltfptr[1674])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1506__COMPILOBJ_NREP_VARIADIC_ARGUMENT#6", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1675*/ meltfptr[1674])->tabval[6] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:4393:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1675*/ meltfptr[1674])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1506__COMPILOBJ_NREP_VARIADIC_ARGUMENT#7", NULL != ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1675*/ meltfptr[1674])->tabval[7] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-genobj.melt:4393:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1675*/ meltfptr[1674])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V436*/ meltfptr[435]); ((meltroutine_ptr_t) /*_.VALROUT___V1675*/ meltfptr[1674])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V436*/ meltfptr[435]); MELT_LOCATION ("warmelt-genobj.melt:4393:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1675*/ meltfptr[1674]); /*putclosurout#85 */ melt_assertmsg ("putclosrout#85 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1676*/ meltfptr[1675])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#85 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1675*/ meltfptr[1674])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1676*/ meltfptr[1675])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1675*/ meltfptr[1674]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1676*/ meltfptr[1675]); /*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-genobj.melt:4441:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1679*/ meltfptr[1678])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1510__COMPILOBJ_NREP_CONSUMEVARIADIC#0", NULL != ( /*_.CLASS_NREP_CONSUME_VARIADIC__V122*/ meltfptr[121])); ((meltroutine_ptr_t) /*_.VALROUT___V1679*/ meltfptr[1678])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_CONSUME_VARIADIC__V122*/ meltfptr[121]); MELT_LOCATION ("warmelt-genobj.melt:4441:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1679*/ meltfptr[1678])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1510__COMPILOBJ_NREP_CONSUMEVARIADIC#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1679*/ meltfptr[1678])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:4441:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1679*/ meltfptr[1678])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1510__COMPILOBJ_NREP_CONSUMEVARIADIC#2", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1679*/ meltfptr[1678])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:4441:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1679*/ meltfptr[1678])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1510__COMPILOBJ_NREP_CONSUMEVARIADIC#3", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1679*/ meltfptr[1678])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:4441:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1679*/ meltfptr[1678])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1259*/ meltfptr[1258]); ((meltroutine_ptr_t) /*_.VALROUT___V1679*/ meltfptr[1678])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V1259*/ meltfptr[1258]); MELT_LOCATION ("warmelt-genobj.melt:4441:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1679*/ meltfptr[1678])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1261*/ meltfptr[1260]); ((meltroutine_ptr_t) /*_.VALROUT___V1679*/ meltfptr[1678])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1261*/ meltfptr[1260]); MELT_LOCATION ("warmelt-genobj.melt:4441:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1679*/ meltfptr[1678])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1510__COMPILOBJ_NREP_CONSUMEVARIADIC#6", NULL != ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1679*/ meltfptr[1678])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-genobj.melt:4441:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1679*/ meltfptr[1678])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1510__COMPILOBJ_NREP_CONSUMEVARIADIC#7", NULL != ( /*_.CLASS_CTYPE__V12*/ meltfptr[11])); ((meltroutine_ptr_t) /*_.VALROUT___V1679*/ meltfptr[1678])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-genobj.melt:4441:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1679*/ meltfptr[1678])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1510__COMPILOBJ_NREP_CONSUMEVARIADIC#8", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1679*/ meltfptr[1678])->tabval[8] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:4441:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1679*/ meltfptr[1678])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1510__COMPILOBJ_NREP_CONSUMEVARIADIC#9", NULL != ( /*_.CLASS_NAMED__V8*/ meltfptr[7])); ((meltroutine_ptr_t) /*_.VALROUT___V1679*/ meltfptr[1678])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-genobj.melt:4441:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1679*/ meltfptr[1678])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1510__COMPILOBJ_NREP_CONSUMEVARIADIC#10", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1679*/ meltfptr[1678])->tabval[10] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:4441:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1679*/ meltfptr[1678])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1510__COMPILOBJ_NREP_CONSUMEVARIADIC#11", NULL != ( /*_.LIST_TO_MULTIPLE__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1679*/ meltfptr[1678])->tabval[11] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-genobj.melt:4441:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1679*/ meltfptr[1678])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V436*/ meltfptr[435]); ((meltroutine_ptr_t) /*_.VALROUT___V1679*/ meltfptr[1678])->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V436*/ meltfptr[435]); MELT_LOCATION ("warmelt-genobj.melt:4441:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1679*/ meltfptr[1678])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1510__COMPILOBJ_NREP_CONSUMEVARIADIC#13", NULL != ( /*_.CTYPE_VOID__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1679*/ meltfptr[1678])->tabval[13] = (melt_ptr_t) ( /*_.CTYPE_VOID__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-genobj.melt:4441:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1679*/ meltfptr[1678]); /*putclosurout#86 */ melt_assertmsg ("putclosrout#86 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1680*/ meltfptr[1679])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#86 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1679*/ meltfptr[1678])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1680*/ meltfptr[1679])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1679*/ meltfptr[1678]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1680*/ meltfptr[1679]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1681*/ meltfptr[1680])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1681*/ meltfptr[1680])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1681*/ meltfptr[1680]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1682*/ meltfptr[1681]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1681*/ meltfptr[1680]); melt_dbgtrace_written_object ( /*_.VALDATA___V1681*/ meltfptr[1680], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:4479:/ 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___V648*/ meltfptr[647]); ((meltroutine_ptr_t) /*_.VALROUT___V1683*/ meltfptr[1682])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V648*/ meltfptr[647]); MELT_LOCATION ("warmelt-genobj.melt:4479:/ 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___V184*/ meltfptr[183]); ((meltroutine_ptr_t) /*_.VALROUT___V1683*/ meltfptr[1682])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]); MELT_LOCATION ("warmelt-genobj.melt:4479:/ 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___V1171*/ meltfptr[1170]); ((meltroutine_ptr_t) /*_.VALROUT___V1683*/ meltfptr[1682])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1171*/ meltfptr[1170]); MELT_LOCATION ("warmelt-genobj.melt:4479:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1683*/ meltfptr[1682]); /*putclosurout#87 */ melt_assertmsg ("putclosrout#87 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1684*/ meltfptr[1683])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#87 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1683*/ meltfptr[1682])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1684*/ meltfptr[1683])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1683*/ meltfptr[1682]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1684*/ meltfptr[1683]); MELT_LOCATION ("warmelt-genobj.melt:4496:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1685*/ meltfptr[1684])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1516__COMPILOBJ_NREP_CPPIF#0", NULL != ( /*_.CLASS_NREP_CPPIF__V123*/ meltfptr[122])); ((meltroutine_ptr_t) /*_.VALROUT___V1685*/ meltfptr[1684])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_CPPIF__V123*/ meltfptr[122]); MELT_LOCATION ("warmelt-genobj.melt:4496:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1685*/ meltfptr[1684])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1516__COMPILOBJ_NREP_CPPIF#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1685*/ meltfptr[1684])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:4496:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1685*/ meltfptr[1684])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1516__COMPILOBJ_NREP_CPPIF#2", NULL != ( /*_.CLASS_SYMBOL__V33*/ meltfptr[32])); ((meltroutine_ptr_t) /*_.VALROUT___V1685*/ meltfptr[1684])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V33*/ meltfptr[32]); MELT_LOCATION ("warmelt-genobj.melt:4496:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1685*/ meltfptr[1684])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1516__COMPILOBJ_NREP_CPPIF#3", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1685*/ meltfptr[1684])->tabval[3] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:4496:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1685*/ meltfptr[1684])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V666*/ meltfptr[665]); ((meltroutine_ptr_t) /*_.VALROUT___V1685*/ meltfptr[1684])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V666*/ meltfptr[665]); MELT_LOCATION ("warmelt-genobj.melt:4496:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1685*/ meltfptr[1684]); /*putclosurout#88 */ melt_assertmsg ("putclosrout#88 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1686*/ meltfptr[1685])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#88 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1685*/ meltfptr[1684])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1686*/ meltfptr[1685])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1685*/ meltfptr[1684]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1686*/ meltfptr[1685]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1687*/ meltfptr[1686])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1687*/ meltfptr[1686])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1687*/ meltfptr[1686]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1688*/ meltfptr[1687]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1687*/ meltfptr[1686]); melt_dbgtrace_written_object ( /*_.VALDATA___V1687*/ meltfptr[1686], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:4522:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1689*/ meltfptr[1688])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V666*/ meltfptr[665]); ((meltroutine_ptr_t) /*_.VALROUT___V1689*/ meltfptr[1688])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V666*/ meltfptr[665]); MELT_LOCATION ("warmelt-genobj.melt:4522:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1689*/ meltfptr[1688])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V184*/ meltfptr[183]); ((meltroutine_ptr_t) /*_.VALROUT___V1689*/ meltfptr[1688])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V184*/ meltfptr[183]); MELT_LOCATION ("warmelt-genobj.melt:4522:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1689*/ meltfptr[1688])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1171*/ meltfptr[1170]); ((meltroutine_ptr_t) /*_.VALROUT___V1689*/ meltfptr[1688])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1171*/ meltfptr[1170]); MELT_LOCATION ("warmelt-genobj.melt:4522:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1689*/ meltfptr[1688]); /*putclosurout#89 */ melt_assertmsg ("putclosrout#89 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1690*/ meltfptr[1689])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#89 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1689*/ meltfptr[1688])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1690*/ meltfptr[1689])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1689*/ meltfptr[1688]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1690*/ meltfptr[1689]); MELT_LOCATION ("warmelt-genobj.melt:4539:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1691*/ meltfptr[1690])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1522__COMPILOBJ_NREP_RETURN#0", NULL != ( /*_.CLASS_NREP_RETURN__V124*/ meltfptr[123])); ((meltroutine_ptr_t) /*_.VALROUT___V1691*/ meltfptr[1690])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_RETURN__V124*/ meltfptr[123]); MELT_LOCATION ("warmelt-genobj.melt:4539:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1691*/ meltfptr[1690])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1522__COMPILOBJ_NREP_RETURN#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1691*/ meltfptr[1690])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:4539:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1691*/ meltfptr[1690])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1522__COMPILOBJ_NREP_RETURN#2", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1691*/ meltfptr[1690])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:4539:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1691*/ meltfptr[1690])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1522__COMPILOBJ_NREP_RETURN#3", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1691*/ meltfptr[1690])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:4539:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1691*/ meltfptr[1690])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V518*/ meltfptr[517]); ((meltroutine_ptr_t) /*_.VALROUT___V1691*/ meltfptr[1690])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V518*/ meltfptr[517]); MELT_LOCATION ("warmelt-genobj.melt:4539:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1691*/ meltfptr[1690])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1522__COMPILOBJ_NREP_RETURN#5", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1691*/ meltfptr[1690])->tabval[5] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:4539:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1691*/ meltfptr[1690])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1024*/ meltfptr[1023]); ((meltroutine_ptr_t) /*_.VALROUT___V1691*/ meltfptr[1690])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1024*/ meltfptr[1023]); MELT_LOCATION ("warmelt-genobj.melt:4539:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1691*/ meltfptr[1690])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1171*/ meltfptr[1170]); ((meltroutine_ptr_t) /*_.VALROUT___V1691*/ meltfptr[1690])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V1171*/ meltfptr[1170]); MELT_LOCATION ("warmelt-genobj.melt:4539:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1691*/ meltfptr[1690])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1088*/ meltfptr[1087]); ((meltroutine_ptr_t) /*_.VALROUT___V1691*/ meltfptr[1690])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V1088*/ meltfptr[1087]); MELT_LOCATION ("warmelt-genobj.melt:4539:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1691*/ meltfptr[1690])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V474*/ meltfptr[473]); ((meltroutine_ptr_t) /*_.VALROUT___V1691*/ meltfptr[1690])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V474*/ meltfptr[473]); MELT_LOCATION ("warmelt-genobj.melt:4539:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1691*/ meltfptr[1690])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1522__COMPILOBJ_NREP_RETURN#10", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1691*/ meltfptr[1690])->tabval[10] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:4539:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1691*/ meltfptr[1690])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1129*/ meltfptr[1128]); ((meltroutine_ptr_t) /*_.VALROUT___V1691*/ meltfptr[1690])->tabval[11] = (melt_ptr_t) ( /*_.VALCLO___V1129*/ meltfptr[1128]); MELT_LOCATION ("warmelt-genobj.melt:4539:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1691*/ meltfptr[1690])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1522__COMPILOBJ_NREP_RETURN#12", NULL != ( /*_.CTYPE_VOID__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1691*/ meltfptr[1690])->tabval[12] = (melt_ptr_t) ( /*_.CTYPE_VOID__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-genobj.melt:4539:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1691*/ meltfptr[1690])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V488*/ meltfptr[487]); ((meltroutine_ptr_t) /*_.VALROUT___V1691*/ meltfptr[1690])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V488*/ meltfptr[487]); MELT_LOCATION ("warmelt-genobj.melt:4539:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1691*/ meltfptr[1690]); /*putclosurout#90 */ melt_assertmsg ("putclosrout#90 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1692*/ meltfptr[1691])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#90 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1691*/ meltfptr[1690])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1692*/ meltfptr[1691])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1691*/ meltfptr[1690]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1692*/ meltfptr[1691]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1693*/ meltfptr[1692])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1693*/ meltfptr[1692])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1693*/ meltfptr[1692]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1694*/ meltfptr[1693]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1693*/ meltfptr[1692]); melt_dbgtrace_written_object ( /*_.VALDATA___V1693*/ meltfptr[1692], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:4605:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1695*/ meltfptr[1694])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1526__LAMBDA_#0", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1695*/ meltfptr[1694])->tabval[0] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:4605:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___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-genobj.melt:4607:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1698*/ meltfptr[1697])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1698*/ meltfptr[1697])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1698*/ meltfptr[1697]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1699*/ meltfptr[1698])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1699*/ meltfptr[1698])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1699*/ meltfptr[1698]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1700*/ meltfptr[1699]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1699*/ meltfptr[1698]); melt_dbgtrace_written_object ( /*_.VALDATA___V1699*/ meltfptr[1698], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:4607:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1698*/ meltfptr[1697])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1698*/ meltfptr[1697])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1698*/ meltfptr[1697]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALDATA___V1699*/ meltfptr[1698]); MELT_LOCATION ("warmelt-genobj.melt:4607:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1698*/ meltfptr[1697]); MELT_LOCATION ("warmelt-genobj.melt:4607:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1698*/ meltfptr[1697], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:4613:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1701*/ meltfptr[1700])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1532__COMPILOBJ_NREP_LAMBDA#0", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1701*/ meltfptr[1700])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:4613:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1701*/ meltfptr[1700])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1532__COMPILOBJ_NREP_LAMBDA#1", NULL != ( /*_.CLASS_NREP_LAMBDA__V125*/ meltfptr[124])); ((meltroutine_ptr_t) /*_.VALROUT___V1701*/ meltfptr[1700])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_LAMBDA__V125*/ meltfptr[124]); MELT_LOCATION ("warmelt-genobj.melt:4613:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1701*/ meltfptr[1700])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1532__COMPILOBJ_NREP_LAMBDA#2", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1701*/ meltfptr[1700])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:4613:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1701*/ meltfptr[1700])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1532__COMPILOBJ_NREP_LAMBDA#3", NULL != ( /*_.CLASS_NREP_ROUTPROC__V34*/ meltfptr[33])); ((meltroutine_ptr_t) /*_.VALROUT___V1701*/ meltfptr[1700])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NREP_ROUTPROC__V34*/ meltfptr[33]); MELT_LOCATION ("warmelt-genobj.melt:4613:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1701*/ meltfptr[1700])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1263*/ meltfptr[1262]); ((meltroutine_ptr_t) /*_.VALROUT___V1701*/ meltfptr[1700])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V1263*/ meltfptr[1262]); MELT_LOCATION ("warmelt-genobj.melt:4613:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1701*/ meltfptr[1700])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1532__COMPILOBJ_NREP_LAMBDA#5", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1701*/ meltfptr[1700])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:4613:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1701*/ meltfptr[1700])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V518*/ meltfptr[517]); ((meltroutine_ptr_t) /*_.VALROUT___V1701*/ meltfptr[1700])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V518*/ meltfptr[517]); MELT_LOCATION ("warmelt-genobj.melt:4613:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1701*/ meltfptr[1700])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V812*/ meltfptr[811]); ((meltroutine_ptr_t) /*_.VALROUT___V1701*/ meltfptr[1700])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V812*/ meltfptr[811]); MELT_LOCATION ("warmelt-genobj.melt:4613:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1701*/ meltfptr[1700])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1698*/ meltfptr[1697]); ((meltroutine_ptr_t) /*_.VALROUT___V1701*/ meltfptr[1700])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V1698*/ meltfptr[1697]); MELT_LOCATION ("warmelt-genobj.melt:4613:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1701*/ meltfptr[1700])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1532__COMPILOBJ_NREP_LAMBDA#9", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1701*/ meltfptr[1700])->tabval[9] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:4613:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1701*/ meltfptr[1700])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1532__COMPILOBJ_NREP_LAMBDA#10", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1701*/ meltfptr[1700])->tabval[10] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:4613:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1701*/ meltfptr[1700])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1532__COMPILOBJ_NREP_LAMBDA#11", NULL != ( /*_.MULTIPLE_EVERY__V54*/ meltfptr[53])); ((meltroutine_ptr_t) /*_.VALROUT___V1701*/ meltfptr[1700])->tabval[11] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V54*/ meltfptr[53]); MELT_LOCATION ("warmelt-genobj.melt:4613:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1701*/ meltfptr[1700])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V946*/ meltfptr[945]); ((meltroutine_ptr_t) /*_.VALROUT___V1701*/ meltfptr[1700])->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V946*/ meltfptr[945]); MELT_LOCATION ("warmelt-genobj.melt:4613:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1701*/ meltfptr[1700])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1532__COMPILOBJ_NREP_LAMBDA#13", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1701*/ meltfptr[1700])->tabval[13] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:4613:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1701*/ meltfptr[1700])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1532__COMPILOBJ_NREP_LAMBDA#14", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1701*/ meltfptr[1700])->tabval[14] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:4649:/ 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___V946*/ meltfptr[945]); ((meltroutine_ptr_t) /*_.VALROUT___V1702*/ meltfptr[1701])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V946*/ meltfptr[945]); MELT_LOCATION ("warmelt-genobj.melt:4649:/ 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_1536__LAMBDA_#1", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1702*/ meltfptr[1701])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:4649:/ 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_1536__LAMBDA_#2", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1702*/ meltfptr[1701])->tabval[2] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:4649:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1702*/ meltfptr[1701]); MELT_LOCATION ("warmelt-genobj.melt:4613:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1701*/ meltfptr[1700])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1532__COMPILOBJ_NREP_LAMBDA#15", NULL != ( /*_.VALROUT___V1702*/ meltfptr[1701])); ((meltroutine_ptr_t) /*_.VALROUT___V1701*/ meltfptr[1700])->tabval[15] = (melt_ptr_t) ( /*_.VALROUT___V1702*/ meltfptr[1701]); MELT_LOCATION ("warmelt-genobj.melt:4613:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1701*/ meltfptr[1700]); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_32 */ void meltmod__warmelt_genobj__initialmeltchunk_33 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*putclosurout#91*/ melt_assertmsg ("putclosrout#91 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1703*/ meltfptr[1702])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#91 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1701*/ meltfptr[1700])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1703*/ meltfptr[1702])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1701*/ meltfptr[1700]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1703*/ meltfptr[1702]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1704*/ meltfptr[1703])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1704*/ meltfptr[1703])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1704*/ meltfptr[1703]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1705*/ meltfptr[1704]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1704*/ meltfptr[1703]); melt_dbgtrace_written_object ( /*_.VALDATA___V1704*/ meltfptr[1703], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:4665:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1706*/ meltfptr[1705])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1537__COMPILOBJ_NREP_MAKEINST#0", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1706*/ meltfptr[1705])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:4665:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1706*/ meltfptr[1705])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1537__COMPILOBJ_NREP_MAKEINST#1", NULL != ( /*_.CLASS_NREP_INSTANCE__V126*/ meltfptr[125])); ((meltroutine_ptr_t) /*_.VALROUT___V1706*/ meltfptr[1705])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_INSTANCE__V126*/ meltfptr[125]); MELT_LOCATION ("warmelt-genobj.melt:4665:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1706*/ meltfptr[1705])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1537__COMPILOBJ_NREP_MAKEINST#2", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1706*/ meltfptr[1705])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:4665:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1706*/ meltfptr[1705])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1537__COMPILOBJ_NREP_MAKEINST#3", NULL != ( /*_.CLASS_CLASS__V94*/ meltfptr[93])); ((meltroutine_ptr_t) /*_.VALROUT___V1706*/ meltfptr[1705])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_CLASS__V94*/ meltfptr[93]); MELT_LOCATION ("warmelt-genobj.melt:4665:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1706*/ meltfptr[1705])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1537__COMPILOBJ_NREP_MAKEINST#4", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1706*/ meltfptr[1705])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:4665:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1706*/ meltfptr[1705])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1263*/ meltfptr[1262]); ((meltroutine_ptr_t) /*_.VALROUT___V1706*/ meltfptr[1705])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1263*/ meltfptr[1262]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1707*/ meltfptr[1706])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1707*/ meltfptr[1706])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1707*/ meltfptr[1706]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1708*/ meltfptr[1707]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1707*/ meltfptr[1706]); melt_dbgtrace_written_object ( /*_.VALDATA___V1707*/ meltfptr[1706], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:4665:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1706*/ meltfptr[1705])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1537__COMPILOBJ_NREP_MAKEINST#6", NULL != ( /*_.VALDATA___V1707*/ meltfptr[1706])); ((meltroutine_ptr_t) /*_.VALROUT___V1706*/ meltfptr[1705])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1707*/ meltfptr[1706]); MELT_LOCATION ("warmelt-genobj.melt:4665:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1706*/ meltfptr[1705])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1537__COMPILOBJ_NREP_MAKEINST#7", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1706*/ meltfptr[1705])->tabval[7] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:4665:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1706*/ meltfptr[1705])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V518*/ meltfptr[517]); ((meltroutine_ptr_t) /*_.VALROUT___V1706*/ meltfptr[1705])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V518*/ meltfptr[517]); MELT_LOCATION ("warmelt-genobj.melt:4665:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1706*/ meltfptr[1705])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V780*/ meltfptr[779]); ((meltroutine_ptr_t) /*_.VALROUT___V1706*/ meltfptr[1705])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V780*/ meltfptr[779]); MELT_LOCATION ("warmelt-genobj.melt:4665:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1706*/ meltfptr[1705])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1537__COMPILOBJ_NREP_MAKEINST#10", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1706*/ meltfptr[1705])->tabval[10] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:4665:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1706*/ meltfptr[1705])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1537__COMPILOBJ_NREP_MAKEINST#11", NULL != ( /*_.MULTIPLE_EVERY__V54*/ meltfptr[53])); ((meltroutine_ptr_t) /*_.VALROUT___V1706*/ meltfptr[1705])->tabval[11] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V54*/ meltfptr[53]); MELT_LOCATION ("warmelt-genobj.melt:4665:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1706*/ meltfptr[1705])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1537__COMPILOBJ_NREP_MAKEINST#12", NULL != ( /*_.CLASS_NREP_FIELDASSIGN__V107*/ meltfptr[106])); ((meltroutine_ptr_t) /*_.VALROUT___V1706*/ meltfptr[1705])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_NREP_FIELDASSIGN__V107*/ meltfptr[106]); MELT_LOCATION ("warmelt-genobj.melt:4665:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1706*/ meltfptr[1705])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1537__COMPILOBJ_NREP_MAKEINST#13", NULL != ( /*_.CLASS_FIELD__V103*/ meltfptr[102])); ((meltroutine_ptr_t) /*_.VALROUT___V1706*/ meltfptr[1705])->tabval[13] = (melt_ptr_t) ( /*_.CLASS_FIELD__V103*/ meltfptr[102]); MELT_LOCATION ("warmelt-genobj.melt:4665:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1706*/ meltfptr[1705])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1537__COMPILOBJ_NREP_MAKEINST#14", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1706*/ meltfptr[1705])->tabval[14] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:4665:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1706*/ meltfptr[1705])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1537__COMPILOBJ_NREP_MAKEINST#15", NULL != ( /*_.CLASS_NREP__V22*/ meltfptr[21])); ((meltroutine_ptr_t) /*_.VALROUT___V1706*/ meltfptr[1705])->tabval[15] = (melt_ptr_t) ( /*_.CLASS_NREP__V22*/ meltfptr[21]); MELT_LOCATION ("warmelt-genobj.melt:4665:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1706*/ meltfptr[1705])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V896*/ meltfptr[895]); ((meltroutine_ptr_t) /*_.VALROUT___V1706*/ meltfptr[1705])->tabval[16] = (melt_ptr_t) ( /*_.VALDATA___V896*/ meltfptr[895]); MELT_LOCATION ("warmelt-genobj.melt:4665:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1706*/ meltfptr[1705])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1537__COMPILOBJ_NREP_MAKEINST#17", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1706*/ meltfptr[1705])->tabval[17] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:4695:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1709*/ meltfptr[1708])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1543__LAMBDA_#0", NULL != ( /*_.CLASS_NREP_FIELDASSIGN__V107*/ meltfptr[106])); ((meltroutine_ptr_t) /*_.VALROUT___V1709*/ meltfptr[1708])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_FIELDASSIGN__V107*/ meltfptr[106]); MELT_LOCATION ("warmelt-genobj.melt:4695:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1709*/ meltfptr[1708])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1543__LAMBDA_#1", NULL != ( /*_.CLASS_FIELD__V103*/ meltfptr[102])); ((meltroutine_ptr_t) /*_.VALROUT___V1709*/ meltfptr[1708])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_FIELD__V103*/ meltfptr[102]); MELT_LOCATION ("warmelt-genobj.melt:4695:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1709*/ meltfptr[1708])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1543__LAMBDA_#2", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1709*/ meltfptr[1708])->tabval[2] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:4695:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1709*/ meltfptr[1708])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1543__LAMBDA_#3", NULL != ( /*_.CLASS_NREP__V22*/ meltfptr[21])); ((meltroutine_ptr_t) /*_.VALROUT___V1709*/ meltfptr[1708])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NREP__V22*/ meltfptr[21]); MELT_LOCATION ("warmelt-genobj.melt:4695:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1709*/ meltfptr[1708])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V896*/ meltfptr[895]); ((meltroutine_ptr_t) /*_.VALROUT___V1709*/ meltfptr[1708])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V896*/ meltfptr[895]); MELT_LOCATION ("warmelt-genobj.melt:4695:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1709*/ meltfptr[1708])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1543__LAMBDA_#5", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1709*/ meltfptr[1708])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:4695:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1709*/ meltfptr[1708]); MELT_LOCATION ("warmelt-genobj.melt:4665:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1706*/ meltfptr[1705])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1537__COMPILOBJ_NREP_MAKEINST#18", NULL != ( /*_.VALROUT___V1709*/ meltfptr[1708])); ((meltroutine_ptr_t) /*_.VALROUT___V1706*/ meltfptr[1705])->tabval[18] = (melt_ptr_t) ( /*_.VALROUT___V1709*/ meltfptr[1708]); MELT_LOCATION ("warmelt-genobj.melt:4665:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1706*/ meltfptr[1705])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V798*/ meltfptr[797]); ((meltroutine_ptr_t) /*_.VALROUT___V1706*/ meltfptr[1705])->tabval[19] = (melt_ptr_t) ( /*_.VALDATA___V798*/ meltfptr[797]); MELT_LOCATION ("warmelt-genobj.melt:4665:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1706*/ meltfptr[1705])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1537__COMPILOBJ_NREP_MAKEINST#20", NULL != ( /*_.VALSTR___V1710*/ meltfptr[1709])); ((meltroutine_ptr_t) /*_.VALROUT___V1706*/ meltfptr[1705])->tabval[20] = (melt_ptr_t) ( /*_.VALSTR___V1710*/ meltfptr[1709]); MELT_LOCATION ("warmelt-genobj.melt:4665:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1706*/ meltfptr[1705]); /*putclosurout#92 */ melt_assertmsg ("putclosrout#92 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1711*/ meltfptr[1710])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#92 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1706*/ meltfptr[1705])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1711*/ meltfptr[1710])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1706*/ meltfptr[1705]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1711*/ meltfptr[1710]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1712*/ meltfptr[1711])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1712*/ meltfptr[1711])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1712*/ meltfptr[1711]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1713*/ meltfptr[1712]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1712*/ meltfptr[1711]); melt_dbgtrace_written_object ( /*_.VALDATA___V1712*/ meltfptr[1711], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:4733:/ 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_1545__COMPILOBJ_ROUTPROC#0", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1714*/ meltfptr[1713])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:4733:/ 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_1545__COMPILOBJ_ROUTPROC#1", NULL != ( /*_.CLASS_NREP_ROUTPROC__V34*/ meltfptr[33])); ((meltroutine_ptr_t) /*_.VALROUT___V1714*/ meltfptr[1713])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_ROUTPROC__V34*/ meltfptr[33]); MELT_LOCATION ("warmelt-genobj.melt:4733:/ 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_1545__COMPILOBJ_ROUTPROC#2", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1714*/ meltfptr[1713])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:4733:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1714*/ meltfptr[1713]); /*putclosurout#93 */ melt_assertmsg ("putclosrout#93 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1715*/ meltfptr[1714])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#93 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1714*/ meltfptr[1713])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1715*/ meltfptr[1714])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1714*/ meltfptr[1713]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1715*/ meltfptr[1714]); MELT_LOCATION ("warmelt-genobj.melt:4742:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1716*/ meltfptr[1715])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1547__COMPILOBJ_PREDEF#0", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1716*/ meltfptr[1715])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:4742:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1716*/ meltfptr[1715])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V232*/ meltfptr[231]); ((meltroutine_ptr_t) /*_.VALROUT___V1716*/ meltfptr[1715])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V232*/ meltfptr[231]); MELT_LOCATION ("warmelt-genobj.melt:4742:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1716*/ meltfptr[1715])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1547__COMPILOBJ_PREDEF#2", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1716*/ meltfptr[1715])->tabval[2] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:4742:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1716*/ meltfptr[1715]); /*putclosurout#94 */ melt_assertmsg ("putclosrout#94 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1717*/ meltfptr[1716])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#94 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1716*/ meltfptr[1715])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1717*/ meltfptr[1716])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1716*/ meltfptr[1715]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1717*/ meltfptr[1716]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1718*/ meltfptr[1717])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1718*/ meltfptr[1717])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1718*/ meltfptr[1717]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1719*/ meltfptr[1718]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1718*/ meltfptr[1717]); melt_dbgtrace_written_object ( /*_.VALDATA___V1718*/ meltfptr[1717], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:4758:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1720*/ meltfptr[1719])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1551__COMPIL_DATA_AND_SLOTS_FILL#0", NULL != ( /*_.CLASS_NREP_BOUND_DATA__V53*/ meltfptr[52])); ((meltroutine_ptr_t) /*_.VALROUT___V1720*/ meltfptr[1719])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_BOUND_DATA__V53*/ meltfptr[52]); MELT_LOCATION ("warmelt-genobj.melt:4758:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1720*/ meltfptr[1719])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V288*/ meltfptr[287]); ((meltroutine_ptr_t) /*_.VALROUT___V1720*/ meltfptr[1719])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V288*/ meltfptr[287]); MELT_LOCATION ("warmelt-genobj.melt:4758:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1720*/ meltfptr[1719])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V174*/ meltfptr[173]); ((meltroutine_ptr_t) /*_.VALROUT___V1720*/ meltfptr[1719])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173]); MELT_LOCATION ("warmelt-genobj.melt:4758:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1720*/ meltfptr[1719])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1088*/ meltfptr[1087]); ((meltroutine_ptr_t) /*_.VALROUT___V1720*/ meltfptr[1719])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1088*/ meltfptr[1087]); MELT_LOCATION ("warmelt-genobj.melt:4758:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1720*/ meltfptr[1719])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1551__COMPIL_DATA_AND_SLOTS_FILL#4", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1720*/ meltfptr[1719])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:4758:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1720*/ meltfptr[1719])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1551__COMPIL_DATA_AND_SLOTS_FILL#5", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1720*/ meltfptr[1719])->tabval[5] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:4758:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1720*/ meltfptr[1719])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1551__COMPIL_DATA_AND_SLOTS_FILL#6", NULL != ( /*_.CLASS_NREP_DATAINSTANCE__V104*/ meltfptr[103])); ((meltroutine_ptr_t) /*_.VALROUT___V1720*/ meltfptr[1719])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_NREP_DATAINSTANCE__V104*/ meltfptr[103]); MELT_LOCATION ("warmelt-genobj.melt:4758:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1720*/ meltfptr[1719])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1263*/ meltfptr[1262]); ((meltroutine_ptr_t) /*_.VALROUT___V1720*/ meltfptr[1719])->tabval[7] = (melt_ptr_t) ( /*_.VALCLO___V1263*/ meltfptr[1262]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1721*/ meltfptr[1720])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1721*/ meltfptr[1720])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1721*/ meltfptr[1720]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1722*/ meltfptr[1721]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1721*/ meltfptr[1720]); melt_dbgtrace_written_object ( /*_.VALDATA___V1721*/ meltfptr[1720], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:4758:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1720*/ meltfptr[1719])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1551__COMPIL_DATA_AND_SLOTS_FILL#8", NULL != ( /*_.VALDATA___V1721*/ meltfptr[1720])); ((meltroutine_ptr_t) /*_.VALROUT___V1720*/ meltfptr[1719])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V1721*/ meltfptr[1720]); /*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-genobj.melt:4758:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1720*/ meltfptr[1719])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1551__COMPIL_DATA_AND_SLOTS_FILL#9", NULL != ( /*_.VALDATA___V1723*/ meltfptr[1722])); ((meltroutine_ptr_t) /*_.VALROUT___V1720*/ meltfptr[1719])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V1723*/ meltfptr[1722]); MELT_LOCATION ("warmelt-genobj.melt:4758:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1720*/ meltfptr[1719])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1551__COMPIL_DATA_AND_SLOTS_FILL#10", NULL != ( /*_.DISCR_MULTIPLE__V18*/ meltfptr[17])); ((meltroutine_ptr_t) /*_.VALROUT___V1720*/ meltfptr[1719])->tabval[10] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V18*/ meltfptr[17]); MELT_LOCATION ("warmelt-genobj.melt:4758:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1720*/ meltfptr[1719])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1551__COMPIL_DATA_AND_SLOTS_FILL#11", NULL != ( /*_.CLASS_SYMBOL__V33*/ meltfptr[32])); ((meltroutine_ptr_t) /*_.VALROUT___V1720*/ meltfptr[1719])->tabval[11] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V33*/ meltfptr[32]); MELT_LOCATION ("warmelt-genobj.melt:4758:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1720*/ meltfptr[1719])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V362*/ meltfptr[361]); ((meltroutine_ptr_t) /*_.VALROUT___V1720*/ meltfptr[1719])->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V362*/ meltfptr[361]); MELT_LOCATION ("warmelt-genobj.melt:4758:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1720*/ meltfptr[1719])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1551__COMPIL_DATA_AND_SLOTS_FILL#13", NULL != ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1720*/ meltfptr[1719])->tabval[13] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-genobj.melt:4758:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1720*/ meltfptr[1719])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1551__COMPIL_DATA_AND_SLOTS_FILL#14", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1720*/ meltfptr[1719])->tabval[14] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:4758:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1720*/ meltfptr[1719])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V538*/ meltfptr[537]); ((meltroutine_ptr_t) /*_.VALROUT___V1720*/ meltfptr[1719])->tabval[15] = (melt_ptr_t) ( /*_.VALDATA___V538*/ meltfptr[537]); MELT_LOCATION ("warmelt-genobj.melt:4758:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1720*/ meltfptr[1719])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1551__COMPIL_DATA_AND_SLOTS_FILL#16", NULL != ( /*_.VALSTR___V1725*/ meltfptr[1724])); ((meltroutine_ptr_t) /*_.VALROUT___V1720*/ meltfptr[1719])->tabval[16] = (melt_ptr_t) ( /*_.VALSTR___V1725*/ meltfptr[1724]); MELT_LOCATION ("warmelt-genobj.melt:4758:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1720*/ meltfptr[1719])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V648*/ meltfptr[647]); ((meltroutine_ptr_t) /*_.VALROUT___V1720*/ meltfptr[1719])->tabval[17] = (melt_ptr_t) ( /*_.VALDATA___V648*/ meltfptr[647]); MELT_LOCATION ("warmelt-genobj.melt:4758:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1720*/ meltfptr[1719])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1551__COMPIL_DATA_AND_SLOTS_FILL#18", NULL != ( /*_.MULTIPLE_EVERY__V54*/ meltfptr[53])); ((meltroutine_ptr_t) /*_.VALROUT___V1720*/ meltfptr[1719])->tabval[18] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V54*/ meltfptr[53]); MELT_LOCATION ("warmelt-genobj.melt:4758:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1720*/ meltfptr[1719])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1551__COMPIL_DATA_AND_SLOTS_FILL#19", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V84*/ meltfptr[83])); ((meltroutine_ptr_t) /*_.VALROUT___V1720*/ meltfptr[1719])->tabval[19] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V84*/ meltfptr[83]); MELT_LOCATION ("warmelt-genobj.melt:4758:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1720*/ meltfptr[1719])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1269*/ meltfptr[1268]); ((meltroutine_ptr_t) /*_.VALROUT___V1720*/ meltfptr[1719])->tabval[20] = (melt_ptr_t) ( /*_.VALCLO___V1269*/ meltfptr[1268]); MELT_LOCATION ("warmelt-genobj.melt:4758:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1720*/ meltfptr[1719])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1551__COMPIL_DATA_AND_SLOTS_FILL#21", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1720*/ meltfptr[1719])->tabval[21] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:4758:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1720*/ meltfptr[1719])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1171*/ meltfptr[1170]); ((meltroutine_ptr_t) /*_.VALROUT___V1720*/ meltfptr[1719])->tabval[22] = (melt_ptr_t) ( /*_.VALDATA___V1171*/ meltfptr[1170]); MELT_LOCATION ("warmelt-genobj.melt:4829:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1726*/ meltfptr[1725])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1558__LAMBDA_#0", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V84*/ meltfptr[83])); ((meltroutine_ptr_t) /*_.VALROUT___V1726*/ meltfptr[1725])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V84*/ meltfptr[83]); MELT_LOCATION ("warmelt-genobj.melt:4829:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1726*/ meltfptr[1725])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1269*/ meltfptr[1268]); ((meltroutine_ptr_t) /*_.VALROUT___V1726*/ meltfptr[1725])->tabval[1] = (melt_ptr_t) ( /*_.VALCLO___V1269*/ meltfptr[1268]); MELT_LOCATION ("warmelt-genobj.melt:4829:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1726*/ meltfptr[1725])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1558__LAMBDA_#2", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1726*/ meltfptr[1725])->tabval[2] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:4829:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1726*/ meltfptr[1725])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1171*/ meltfptr[1170]); ((meltroutine_ptr_t) /*_.VALROUT___V1726*/ meltfptr[1725])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1171*/ meltfptr[1170]); MELT_LOCATION ("warmelt-genobj.melt:4829:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1726*/ meltfptr[1725]); MELT_LOCATION ("warmelt-genobj.melt:4758:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1720*/ meltfptr[1719])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1551__COMPIL_DATA_AND_SLOTS_FILL#23", NULL != ( /*_.VALROUT___V1726*/ meltfptr[1725])); ((meltroutine_ptr_t) /*_.VALROUT___V1720*/ meltfptr[1719])->tabval[23] = (melt_ptr_t) ( /*_.VALROUT___V1726*/ meltfptr[1725]); MELT_LOCATION ("warmelt-genobj.melt:4758:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1720*/ meltfptr[1719])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1551__COMPIL_DATA_AND_SLOTS_FILL#24", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1720*/ meltfptr[1719])->tabval[24] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:4758:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1720*/ meltfptr[1719])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1551__COMPIL_DATA_AND_SLOTS_FILL#25", NULL != ( /*_.CLASS_NREP__V22*/ meltfptr[21])); ((meltroutine_ptr_t) /*_.VALROUT___V1720*/ meltfptr[1719])->tabval[25] = (melt_ptr_t) ( /*_.CLASS_NREP__V22*/ meltfptr[21]); MELT_LOCATION ("warmelt-genobj.melt:4758:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1720*/ meltfptr[1719])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1551__COMPIL_DATA_AND_SLOTS_FILL#26", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1720*/ meltfptr[1719])->tabval[26] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:4758:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1720*/ meltfptr[1719])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V896*/ meltfptr[895]); ((meltroutine_ptr_t) /*_.VALROUT___V1720*/ meltfptr[1719])->tabval[27] = (melt_ptr_t) ( /*_.VALDATA___V896*/ meltfptr[895]); MELT_LOCATION ("warmelt-genobj.melt:4847:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1727*/ meltfptr[1726])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1559__LAMBDA_#0", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1727*/ meltfptr[1726])->tabval[0] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:4847:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1727*/ meltfptr[1726])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1559__LAMBDA_#1", NULL != ( /*_.CLASS_NREP__V22*/ meltfptr[21])); ((meltroutine_ptr_t) /*_.VALROUT___V1727*/ meltfptr[1726])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP__V22*/ meltfptr[21]); MELT_LOCATION ("warmelt-genobj.melt:4847:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1727*/ meltfptr[1726])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1559__LAMBDA_#2", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1727*/ meltfptr[1726])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:4847:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1727*/ meltfptr[1726])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V896*/ meltfptr[895]); ((meltroutine_ptr_t) /*_.VALROUT___V1727*/ meltfptr[1726])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V896*/ meltfptr[895]); MELT_LOCATION ("warmelt-genobj.melt:4847:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1727*/ meltfptr[1726]); MELT_LOCATION ("warmelt-genobj.melt:4758:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1720*/ meltfptr[1719])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1551__COMPIL_DATA_AND_SLOTS_FILL#28", NULL != ( /*_.VALROUT___V1727*/ meltfptr[1726])); ((meltroutine_ptr_t) /*_.VALROUT___V1720*/ meltfptr[1719])->tabval[28] = (melt_ptr_t) ( /*_.VALROUT___V1727*/ meltfptr[1726]); MELT_LOCATION ("warmelt-genobj.melt:4758:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1720*/ meltfptr[1719])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V994*/ meltfptr[993]); ((meltroutine_ptr_t) /*_.VALROUT___V1720*/ meltfptr[1719])->tabval[29] = (melt_ptr_t) ( /*_.VALDATA___V994*/ meltfptr[993]); MELT_LOCATION ("warmelt-genobj.melt:4758:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1720*/ meltfptr[1719])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V798*/ meltfptr[797]); ((meltroutine_ptr_t) /*_.VALROUT___V1720*/ meltfptr[1719])->tabval[30] = (melt_ptr_t) ( /*_.VALDATA___V798*/ meltfptr[797]); MELT_LOCATION ("warmelt-genobj.melt:4758:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1720*/ meltfptr[1719])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1551__COMPIL_DATA_AND_SLOTS_FILL#31", NULL != ( /*_.VALSTR___V1728*/ meltfptr[1727])); ((meltroutine_ptr_t) /*_.VALROUT___V1720*/ meltfptr[1719])->tabval[31] = (melt_ptr_t) ( /*_.VALSTR___V1728*/ meltfptr[1727]); MELT_LOCATION ("warmelt-genobj.melt:4758:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1720*/ meltfptr[1719])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V494*/ meltfptr[493]); ((meltroutine_ptr_t) /*_.VALROUT___V1720*/ meltfptr[1719])->tabval[32] = (melt_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493]); MELT_LOCATION ("warmelt-genobj.melt:4880:/ 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___V494*/ meltfptr[493]); ((meltroutine_ptr_t) /*_.VALROUT___V1729*/ meltfptr[1728])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493]); MELT_LOCATION ("warmelt-genobj.melt:4880:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1729*/ meltfptr[1728]); MELT_LOCATION ("warmelt-genobj.melt:4758:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1720*/ meltfptr[1719])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1551__COMPIL_DATA_AND_SLOTS_FILL#33", NULL != ( /*_.VALROUT___V1729*/ meltfptr[1728])); ((meltroutine_ptr_t) /*_.VALROUT___V1720*/ meltfptr[1719])->tabval[33] = (melt_ptr_t) ( /*_.VALROUT___V1729*/ meltfptr[1728]); MELT_LOCATION ("warmelt-genobj.melt:4758:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1720*/ meltfptr[1719]); /*putclosurout#95 */ melt_assertmsg ("putclosrout#95 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1730*/ meltfptr[1729])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#95 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1720*/ meltfptr[1719])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1730*/ meltfptr[1729])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1720*/ meltfptr[1719]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1730*/ meltfptr[1729]); MELT_LOCATION ("warmelt-genobj.melt:4902:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1731*/ meltfptr[1730])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1562__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL#0", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1731*/ meltfptr[1730])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:4902:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1731*/ meltfptr[1730])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1562__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL#1", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1731*/ meltfptr[1730])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:4902:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1731*/ meltfptr[1730])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1562__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL#2", NULL != ( /*_.MULTIPLE_EVERY__V54*/ meltfptr[53])); ((meltroutine_ptr_t) /*_.VALROUT___V1731*/ meltfptr[1730])->tabval[2] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V54*/ meltfptr[53]); MELT_LOCATION ("warmelt-genobj.melt:4902:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1731*/ meltfptr[1730])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1404*/ meltfptr[1403]); ((meltroutine_ptr_t) /*_.VALROUT___V1731*/ meltfptr[1730])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V1404*/ meltfptr[1403]); MELT_LOCATION ("warmelt-genobj.melt:4907:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1732*/ meltfptr[1731])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1404*/ meltfptr[1403]); ((meltroutine_ptr_t) /*_.VALROUT___V1732*/ meltfptr[1731])->tabval[0] = (melt_ptr_t) ( /*_.VALCLO___V1404*/ meltfptr[1403]); MELT_LOCATION ("warmelt-genobj.melt:4907:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1732*/ meltfptr[1731]); MELT_LOCATION ("warmelt-genobj.melt:4902:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1731*/ meltfptr[1730])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1562__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL#4", NULL != ( /*_.VALROUT___V1732*/ meltfptr[1731])); ((meltroutine_ptr_t) /*_.VALROUT___V1731*/ meltfptr[1730])->tabval[4] = (melt_ptr_t) ( /*_.VALROUT___V1732*/ meltfptr[1731]); MELT_LOCATION ("warmelt-genobj.melt:4902:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1731*/ meltfptr[1730]); /*putclosurout#96 */ melt_assertmsg ("putclosrout#96 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1733*/ meltfptr[1732])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#96 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1731*/ meltfptr[1730])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1733*/ meltfptr[1732])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1731*/ meltfptr[1730]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1733*/ meltfptr[1732]); MELT_LOCATION ("warmelt-genobj.melt:4910:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1734*/ meltfptr[1733])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1565__COMPILOBJ_DATASYMBOL#0", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1734*/ meltfptr[1733])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:4910:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1734*/ meltfptr[1733])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1565__COMPILOBJ_DATASYMBOL#1", NULL != ( /*_.CLASS_NREP_DATASYMBOL__V56*/ meltfptr[55])); ((meltroutine_ptr_t) /*_.VALROUT___V1734*/ meltfptr[1733])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_DATASYMBOL__V56*/ meltfptr[55]); MELT_LOCATION ("warmelt-genobj.melt:4910:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1734*/ meltfptr[1733])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1565__COMPILOBJ_DATASYMBOL#2", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1734*/ meltfptr[1733])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:4910:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1734*/ meltfptr[1733])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1088*/ meltfptr[1087]); ((meltroutine_ptr_t) /*_.VALROUT___V1734*/ meltfptr[1733])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1088*/ meltfptr[1087]); MELT_LOCATION ("warmelt-genobj.melt:4910:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1734*/ meltfptr[1733])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1565__COMPILOBJ_DATASYMBOL#4", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1734*/ meltfptr[1733])->tabval[4] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:4910:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1734*/ meltfptr[1733])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V302*/ meltfptr[301]); ((meltroutine_ptr_t) /*_.VALROUT___V1734*/ meltfptr[1733])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V302*/ meltfptr[301]); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_33 */ void meltmod__warmelt_genobj__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-genobj.melt:4910:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1734*/ meltfptr[1733])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1565__COMPILOBJ_DATASYMBOL#6", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1734*/ meltfptr[1733])->tabval[6] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:4910:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1734*/ meltfptr[1733])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1565__COMPILOBJ_DATASYMBOL#7", NULL != ( /*_.DISCR_STRBUF__V32*/ meltfptr[31])); ((meltroutine_ptr_t) /*_.VALROUT___V1734*/ meltfptr[1733])->tabval[7] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-genobj.melt:4910:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1734*/ meltfptr[1733])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1565__COMPILOBJ_DATASYMBOL#8", NULL != ( /*_.DISCR_STRING__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1734*/ meltfptr[1733])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_STRING__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-genobj.melt:4910:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1734*/ meltfptr[1733])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1730*/ meltfptr[1729]); ((meltroutine_ptr_t) /*_.VALROUT___V1734*/ meltfptr[1733])->tabval[9] = (melt_ptr_t) ( /*_.VALCLO___V1730*/ meltfptr[1729]); MELT_LOCATION ("warmelt-genobj.melt:4910:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1734*/ meltfptr[1733]); /*putclosurout#97 */ melt_assertmsg ("putclosrout#97 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1735*/ meltfptr[1734])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#97 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1734*/ meltfptr[1733])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1735*/ meltfptr[1734])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1734*/ meltfptr[1733]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1735*/ meltfptr[1734]); MELT_LOCATION ("warmelt-genobj.melt:4961:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1736*/ meltfptr[1735])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1567__COMPILOBJ_DATAINSTANCE#0", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1736*/ meltfptr[1735])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:4961:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1736*/ meltfptr[1735])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1567__COMPILOBJ_DATAINSTANCE#1", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1736*/ meltfptr[1735])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:4961:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1736*/ meltfptr[1735])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1088*/ meltfptr[1087]); ((meltroutine_ptr_t) /*_.VALROUT___V1736*/ meltfptr[1735])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1088*/ meltfptr[1087]); MELT_LOCATION ("warmelt-genobj.melt:4961:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1736*/ meltfptr[1735])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1567__COMPILOBJ_DATAINSTANCE#3", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1736*/ meltfptr[1735])->tabval[3] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:4961:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1736*/ meltfptr[1735])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V302*/ meltfptr[301]); ((meltroutine_ptr_t) /*_.VALROUT___V1736*/ meltfptr[1735])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V302*/ meltfptr[301]); MELT_LOCATION ("warmelt-genobj.melt:4961:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1736*/ meltfptr[1735])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1567__COMPILOBJ_DATAINSTANCE#5", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1736*/ meltfptr[1735])->tabval[5] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:4961:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1736*/ meltfptr[1735])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V288*/ meltfptr[287]); ((meltroutine_ptr_t) /*_.VALROUT___V1736*/ meltfptr[1735])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V288*/ meltfptr[287]); MELT_LOCATION ("warmelt-genobj.melt:4961:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1736*/ meltfptr[1735])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1567__COMPILOBJ_DATAINSTANCE#7", NULL != ( /*_.DISCR_STRBUF__V32*/ meltfptr[31])); ((meltroutine_ptr_t) /*_.VALROUT___V1736*/ meltfptr[1735])->tabval[7] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-genobj.melt:4961:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1736*/ meltfptr[1735])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1567__COMPILOBJ_DATAINSTANCE#8", NULL != ( /*_.DISCR_STRING__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1736*/ meltfptr[1735])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_STRING__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-genobj.melt:4961:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1736*/ meltfptr[1735])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1730*/ meltfptr[1729]); ((meltroutine_ptr_t) /*_.VALROUT___V1736*/ meltfptr[1735])->tabval[9] = (melt_ptr_t) ( /*_.VALCLO___V1730*/ meltfptr[1729]); MELT_LOCATION ("warmelt-genobj.melt:4961:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1736*/ meltfptr[1735]); /*putclosurout#98 */ melt_assertmsg ("putclosrout#98 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1737*/ meltfptr[1736])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#98 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1736*/ meltfptr[1735])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1737*/ meltfptr[1736])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1736*/ meltfptr[1735]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1737*/ meltfptr[1736]); MELT_LOCATION ("warmelt-genobj.melt:5038:/ 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_1569__COMPILOBJ_DATATUPLE#0", NULL != ( /*_.CLASS_NREP_DATATUPLE__V128*/ meltfptr[127])); ((meltroutine_ptr_t) /*_.VALROUT___V1738*/ meltfptr[1737])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_DATATUPLE__V128*/ meltfptr[127]); MELT_LOCATION ("warmelt-genobj.melt:5038:/ 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_1569__COMPILOBJ_DATATUPLE#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1738*/ meltfptr[1737])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:5038:/ 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_1569__COMPILOBJ_DATATUPLE#2", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1738*/ meltfptr[1737])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:5038:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1738*/ meltfptr[1737])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1088*/ meltfptr[1087]); ((meltroutine_ptr_t) /*_.VALROUT___V1738*/ meltfptr[1737])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1088*/ meltfptr[1087]); MELT_LOCATION ("warmelt-genobj.melt:5038:/ 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_1569__COMPILOBJ_DATATUPLE#4", NULL != ( /*_.MULTIPLE_MAP__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V1738*/ meltfptr[1737])->tabval[4] = (melt_ptr_t) ( /*_.MULTIPLE_MAP__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-genobj.melt:5038:/ 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_1569__COMPILOBJ_DATATUPLE#5", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1738*/ meltfptr[1737])->tabval[5] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:5055:/ 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_1573__LAMBDA_#0", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1739*/ meltfptr[1738])->tabval[0] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:5055:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1739*/ meltfptr[1738]); MELT_LOCATION ("warmelt-genobj.melt:5038:/ 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_1569__COMPILOBJ_DATATUPLE#6", NULL != ( /*_.VALROUT___V1739*/ meltfptr[1738])); ((meltroutine_ptr_t) /*_.VALROUT___V1738*/ meltfptr[1737])->tabval[6] = (melt_ptr_t) ( /*_.VALROUT___V1739*/ meltfptr[1738]); MELT_LOCATION ("warmelt-genobj.melt:5038:/ 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_1569__COMPILOBJ_DATATUPLE#7", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1738*/ meltfptr[1737])->tabval[7] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:5038:/ 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_1569__COMPILOBJ_DATATUPLE#8", NULL != ( /*_.DISCR_STRBUF__V32*/ meltfptr[31])); ((meltroutine_ptr_t) /*_.VALROUT___V1738*/ meltfptr[1737])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-genobj.melt:5038:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1738*/ meltfptr[1737])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1263*/ meltfptr[1262]); ((meltroutine_ptr_t) /*_.VALROUT___V1738*/ meltfptr[1737])->tabval[9] = (melt_ptr_t) ( /*_.VALCLO___V1263*/ meltfptr[1262]); /*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-genobj.melt:5038:/ 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_1569__COMPILOBJ_DATATUPLE#10", NULL != ( /*_.VALDATA___V1740*/ meltfptr[1739])); ((meltroutine_ptr_t) /*_.VALROUT___V1738*/ meltfptr[1737])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V1740*/ meltfptr[1739]); /*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-genobj.melt:5038:/ 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_1569__COMPILOBJ_DATATUPLE#11", NULL != ( /*_.VALDATA___V1742*/ meltfptr[1741])); ((meltroutine_ptr_t) /*_.VALROUT___V1738*/ meltfptr[1737])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V1742*/ meltfptr[1741]); MELT_LOCATION ("warmelt-genobj.melt:5038:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1738*/ meltfptr[1737])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V308*/ meltfptr[307]); ((meltroutine_ptr_t) /*_.VALROUT___V1738*/ meltfptr[1737])->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V308*/ meltfptr[307]); MELT_LOCATION ("warmelt-genobj.melt:5038:/ 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_1569__COMPILOBJ_DATATUPLE#13", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1738*/ meltfptr[1737])->tabval[13] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:5038:/ 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_1569__COMPILOBJ_DATATUPLE#14", NULL != ( /*_.DISCR_STRING__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1738*/ meltfptr[1737])->tabval[14] = (melt_ptr_t) ( /*_.DISCR_STRING__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-genobj.melt:5038:/ 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_1569__COMPILOBJ_DATATUPLE#15", NULL != ( /*_.MULTIPLE_EVERY__V54*/ meltfptr[53])); ((meltroutine_ptr_t) /*_.VALROUT___V1738*/ meltfptr[1737])->tabval[15] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V54*/ meltfptr[53]); MELT_LOCATION ("warmelt-genobj.melt:5038:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1738*/ meltfptr[1737])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V830*/ meltfptr[829]); ((meltroutine_ptr_t) /*_.VALROUT___V1738*/ meltfptr[1737])->tabval[16] = (melt_ptr_t) ( /*_.VALDATA___V830*/ meltfptr[829]); MELT_LOCATION ("warmelt-genobj.melt:5038:/ 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_1569__COMPILOBJ_DATATUPLE#17", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1738*/ meltfptr[1737])->tabval[17] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:5083:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1744*/ meltfptr[1743])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V830*/ meltfptr[829]); ((meltroutine_ptr_t) /*_.VALROUT___V1744*/ meltfptr[1743])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V830*/ meltfptr[829]); MELT_LOCATION ("warmelt-genobj.melt:5083:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1744*/ meltfptr[1743])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1578__LAMBDA_#1", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1744*/ meltfptr[1743])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:5083:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1744*/ meltfptr[1743]); MELT_LOCATION ("warmelt-genobj.melt:5038:/ 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_1569__COMPILOBJ_DATATUPLE#18", NULL != ( /*_.VALROUT___V1744*/ meltfptr[1743])); ((meltroutine_ptr_t) /*_.VALROUT___V1738*/ meltfptr[1737])->tabval[18] = (melt_ptr_t) ( /*_.VALROUT___V1744*/ meltfptr[1743]); MELT_LOCATION ("warmelt-genobj.melt:5038:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1738*/ meltfptr[1737])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V994*/ meltfptr[993]); ((meltroutine_ptr_t) /*_.VALROUT___V1738*/ meltfptr[1737])->tabval[19] = (melt_ptr_t) ( /*_.VALDATA___V994*/ meltfptr[993]); MELT_LOCATION ("warmelt-genobj.melt:5038:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1738*/ meltfptr[1737]); /*putclosurout#99 */ melt_assertmsg ("putclosrout#99 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1745*/ meltfptr[1744])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#99 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1738*/ meltfptr[1737])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1745*/ meltfptr[1744])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1738*/ meltfptr[1737]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1745*/ meltfptr[1744]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1746*/ meltfptr[1745])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1746*/ meltfptr[1745])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1746*/ meltfptr[1745]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1747*/ meltfptr[1746]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1746*/ meltfptr[1745]); melt_dbgtrace_written_object ( /*_.VALDATA___V1746*/ meltfptr[1745], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:5108:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1748*/ meltfptr[1747])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1579__COMPILOBJ_DATASTRING#0", NULL != ( /*_.CLASS_NREP_DATASTRING__V129*/ meltfptr[128])); ((meltroutine_ptr_t) /*_.VALROUT___V1748*/ meltfptr[1747])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_DATASTRING__V129*/ meltfptr[128]); MELT_LOCATION ("warmelt-genobj.melt:5108:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1748*/ meltfptr[1747])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1579__COMPILOBJ_DATASTRING#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1748*/ meltfptr[1747])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:5108:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1748*/ meltfptr[1747])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1088*/ meltfptr[1087]); ((meltroutine_ptr_t) /*_.VALROUT___V1748*/ meltfptr[1747])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1088*/ meltfptr[1087]); MELT_LOCATION ("warmelt-genobj.melt:5108:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1748*/ meltfptr[1747])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1579__COMPILOBJ_DATASTRING#3", NULL != ( /*_.DISCR_STRBUF__V32*/ meltfptr[31])); ((meltroutine_ptr_t) /*_.VALROUT___V1748*/ meltfptr[1747])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-genobj.melt:5108:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1748*/ meltfptr[1747])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1579__COMPILOBJ_DATASTRING#4", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1748*/ meltfptr[1747])->tabval[4] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:5108:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1748*/ meltfptr[1747])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1263*/ meltfptr[1262]); ((meltroutine_ptr_t) /*_.VALROUT___V1748*/ meltfptr[1747])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1263*/ meltfptr[1262]); /*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-genobj.melt:5108:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1748*/ meltfptr[1747])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1579__COMPILOBJ_DATASTRING#6", NULL != ( /*_.VALDATA___V1749*/ meltfptr[1748])); ((meltroutine_ptr_t) /*_.VALROUT___V1748*/ meltfptr[1747])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1749*/ meltfptr[1748]); MELT_LOCATION ("warmelt-genobj.melt:5108:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1748*/ meltfptr[1747])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V338*/ meltfptr[337]); ((meltroutine_ptr_t) /*_.VALROUT___V1748*/ meltfptr[1747])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V338*/ meltfptr[337]); MELT_LOCATION ("warmelt-genobj.melt:5108:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1748*/ meltfptr[1747])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1579__COMPILOBJ_DATASTRING#8", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1748*/ meltfptr[1747])->tabval[8] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:5108:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1748*/ meltfptr[1747])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1579__COMPILOBJ_DATASTRING#9", NULL != ( /*_.DISCR_STRING__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1748*/ meltfptr[1747])->tabval[9] = (melt_ptr_t) ( /*_.DISCR_STRING__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-genobj.melt:5108:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1748*/ meltfptr[1747]); /*putclosurout#100 */ melt_assertmsg ("putclosrout#100 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1751*/ meltfptr[1750])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#100 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1748*/ meltfptr[1747])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1751*/ meltfptr[1750])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1748*/ meltfptr[1747]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1751*/ meltfptr[1750]); /*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-genobj.melt:5153:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1754*/ meltfptr[1753])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1585__COMPILOBJ_DATABOXEDINTEGER#0", NULL != ( /*_.CLASS_NREP_DATABOXEDINTEGER__V130*/ meltfptr[129])); ((meltroutine_ptr_t) /*_.VALROUT___V1754*/ meltfptr[1753])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_DATABOXEDINTEGER__V130*/ meltfptr[129]); MELT_LOCATION ("warmelt-genobj.melt:5153:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1754*/ meltfptr[1753])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1585__COMPILOBJ_DATABOXEDINTEGER#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1754*/ meltfptr[1753])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:5153:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1754*/ meltfptr[1753])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1088*/ meltfptr[1087]); ((meltroutine_ptr_t) /*_.VALROUT___V1754*/ meltfptr[1753])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1088*/ meltfptr[1087]); MELT_LOCATION ("warmelt-genobj.melt:5153:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1754*/ meltfptr[1753])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1585__COMPILOBJ_DATABOXEDINTEGER#3", NULL != ( /*_.DISCR_STRBUF__V32*/ meltfptr[31])); ((meltroutine_ptr_t) /*_.VALROUT___V1754*/ meltfptr[1753])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-genobj.melt:5153:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1754*/ meltfptr[1753])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1585__COMPILOBJ_DATABOXEDINTEGER#4", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1754*/ meltfptr[1753])->tabval[4] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:5153:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1754*/ meltfptr[1753])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1263*/ meltfptr[1262]); ((meltroutine_ptr_t) /*_.VALROUT___V1754*/ meltfptr[1753])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1263*/ meltfptr[1262]); /*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-genobj.melt:5153:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1754*/ meltfptr[1753])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1585__COMPILOBJ_DATABOXEDINTEGER#6", NULL != ( /*_.VALDATA___V1755*/ meltfptr[1754])); ((meltroutine_ptr_t) /*_.VALROUT___V1754*/ meltfptr[1753])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1755*/ meltfptr[1754]); MELT_LOCATION ("warmelt-genobj.melt:5153:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1754*/ meltfptr[1753])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V356*/ meltfptr[355]); ((meltroutine_ptr_t) /*_.VALROUT___V1754*/ meltfptr[1753])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V356*/ meltfptr[355]); MELT_LOCATION ("warmelt-genobj.melt:5153:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1754*/ meltfptr[1753])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1585__COMPILOBJ_DATABOXEDINTEGER#8", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1754*/ meltfptr[1753])->tabval[8] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:5153:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1754*/ meltfptr[1753])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1585__COMPILOBJ_DATABOXEDINTEGER#9", NULL != ( /*_.DISCR_STRING__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1754*/ meltfptr[1753])->tabval[9] = (melt_ptr_t) ( /*_.DISCR_STRING__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-genobj.melt:5153:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1754*/ meltfptr[1753]); /*putclosurout#101 */ melt_assertmsg ("putclosrout#101 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1757*/ meltfptr[1756])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#101 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1754*/ meltfptr[1753])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1757*/ meltfptr[1756])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1754*/ meltfptr[1753]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1757*/ meltfptr[1756]); /*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-genobj.melt:5198:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1760*/ meltfptr[1759])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1591__COMPILOBJ_DATACLOSURE#0", NULL != ( /*_.CLASS_NREP_DATACLOSURE__V131*/ meltfptr[130])); ((meltroutine_ptr_t) /*_.VALROUT___V1760*/ meltfptr[1759])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_DATACLOSURE__V131*/ meltfptr[130]); MELT_LOCATION ("warmelt-genobj.melt:5198:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1760*/ meltfptr[1759])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1591__COMPILOBJ_DATACLOSURE#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1760*/ meltfptr[1759])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:5198:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1760*/ meltfptr[1759])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1591__COMPILOBJ_DATACLOSURE#2", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1760*/ meltfptr[1759])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:5198:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1760*/ meltfptr[1759])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1088*/ meltfptr[1087]); ((meltroutine_ptr_t) /*_.VALROUT___V1760*/ meltfptr[1759])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1088*/ meltfptr[1087]); MELT_LOCATION ("warmelt-genobj.melt:5198:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1760*/ meltfptr[1759])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1591__COMPILOBJ_DATACLOSURE#4", NULL != ( /*_.DISCR_STRBUF__V32*/ meltfptr[31])); ((meltroutine_ptr_t) /*_.VALROUT___V1760*/ meltfptr[1759])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-genobj.melt:5198:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1760*/ meltfptr[1759])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1591__COMPILOBJ_DATACLOSURE#5", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1760*/ meltfptr[1759])->tabval[5] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:5198:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1760*/ meltfptr[1759])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1263*/ meltfptr[1262]); ((meltroutine_ptr_t) /*_.VALROUT___V1760*/ meltfptr[1759])->tabval[6] = (melt_ptr_t) ( /*_.VALCLO___V1263*/ meltfptr[1262]); /*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-genobj.melt:5198:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1760*/ meltfptr[1759])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1591__COMPILOBJ_DATACLOSURE#7", NULL != ( /*_.VALDATA___V1761*/ meltfptr[1760])); ((meltroutine_ptr_t) /*_.VALROUT___V1760*/ meltfptr[1759])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V1761*/ meltfptr[1760]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1763*/ meltfptr[1762])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1763*/ meltfptr[1762])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1763*/ meltfptr[1762]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1764*/ meltfptr[1763]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1763*/ meltfptr[1762]); melt_dbgtrace_written_object ( /*_.VALDATA___V1763*/ meltfptr[1762], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:5198:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1760*/ meltfptr[1759])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1591__COMPILOBJ_DATACLOSURE#8", NULL != ( /*_.VALDATA___V1763*/ meltfptr[1762])); ((meltroutine_ptr_t) /*_.VALROUT___V1760*/ meltfptr[1759])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V1763*/ meltfptr[1762]); MELT_LOCATION ("warmelt-genobj.melt:5198:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1760*/ meltfptr[1759])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1591__COMPILOBJ_DATACLOSURE#9", NULL != ( /*_.CLASS_NREP_ROUTPROC__V34*/ meltfptr[33])); ((meltroutine_ptr_t) /*_.VALROUT___V1760*/ meltfptr[1759])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_NREP_ROUTPROC__V34*/ meltfptr[33]); MELT_LOCATION ("warmelt-genobj.melt:5198:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1760*/ meltfptr[1759])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V318*/ meltfptr[317]); ((meltroutine_ptr_t) /*_.VALROUT___V1760*/ meltfptr[1759])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V318*/ meltfptr[317]); MELT_LOCATION ("warmelt-genobj.melt:5198:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1760*/ meltfptr[1759])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1591__COMPILOBJ_DATACLOSURE#11", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1760*/ meltfptr[1759])->tabval[11] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:5198:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1760*/ meltfptr[1759])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1591__COMPILOBJ_DATACLOSURE#12", NULL != ( /*_.DISCR_STRING__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1760*/ meltfptr[1759])->tabval[12] = (melt_ptr_t) ( /*_.DISCR_STRING__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-genobj.melt:5198:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1760*/ meltfptr[1759])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1591__COMPILOBJ_DATACLOSURE#13", NULL != ( /*_.CLASS_NREP_DATAROUTINE__V132*/ meltfptr[131])); ((meltroutine_ptr_t) /*_.VALROUT___V1760*/ meltfptr[1759])->tabval[13] = (melt_ptr_t) ( /*_.CLASS_NREP_DATAROUTINE__V132*/ meltfptr[131]); MELT_LOCATION ("warmelt-genobj.melt:5198:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1760*/ meltfptr[1759])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V932*/ meltfptr[931]); ((meltroutine_ptr_t) /*_.VALROUT___V1760*/ meltfptr[1759])->tabval[14] = (melt_ptr_t) ( /*_.VALDATA___V932*/ meltfptr[931]); MELT_LOCATION ("warmelt-genobj.melt:5198:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1760*/ meltfptr[1759])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1591__COMPILOBJ_DATACLOSURE#15", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1760*/ meltfptr[1759])->tabval[15] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:5198:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1760*/ meltfptr[1759])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1062*/ meltfptr[1061]); ((meltroutine_ptr_t) /*_.VALROUT___V1760*/ meltfptr[1759])->tabval[16] = (melt_ptr_t) ( /*_.VALDATA___V1062*/ meltfptr[1061]); MELT_LOCATION ("warmelt-genobj.melt:5198:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1760*/ meltfptr[1759])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1591__COMPILOBJ_DATACLOSURE#17", NULL != ( /*_.MULTIPLE_EVERY__V54*/ meltfptr[53])); ((meltroutine_ptr_t) /*_.VALROUT___V1760*/ meltfptr[1759])->tabval[17] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V54*/ meltfptr[53]); MELT_LOCATION ("warmelt-genobj.melt:5198:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1760*/ meltfptr[1759])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1591__COMPILOBJ_DATACLOSURE#18", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1760*/ meltfptr[1759])->tabval[18] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:5198:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1760*/ meltfptr[1759])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V946*/ meltfptr[945]); ((meltroutine_ptr_t) /*_.VALROUT___V1760*/ meltfptr[1759])->tabval[19] = (melt_ptr_t) ( /*_.VALDATA___V946*/ meltfptr[945]); MELT_LOCATION ("warmelt-genobj.melt:5198:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1760*/ meltfptr[1759])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1591__COMPILOBJ_DATACLOSURE#20", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1760*/ meltfptr[1759])->tabval[20] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:5261:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1765*/ meltfptr[1764])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1601__LAMBDA_#0", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1765*/ meltfptr[1764])->tabval[0] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:5261:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1765*/ meltfptr[1764])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V946*/ meltfptr[945]); ((meltroutine_ptr_t) /*_.VALROUT___V1765*/ meltfptr[1764])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V946*/ meltfptr[945]); MELT_LOCATION ("warmelt-genobj.melt:5261:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1765*/ meltfptr[1764])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1601__LAMBDA_#2", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1765*/ meltfptr[1764])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:5261:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1765*/ meltfptr[1764]); MELT_LOCATION ("warmelt-genobj.melt:5198:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1760*/ meltfptr[1759])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1591__COMPILOBJ_DATACLOSURE#21", NULL != ( /*_.VALROUT___V1765*/ meltfptr[1764])); ((meltroutine_ptr_t) /*_.VALROUT___V1760*/ meltfptr[1759])->tabval[21] = (melt_ptr_t) ( /*_.VALROUT___V1765*/ meltfptr[1764]); MELT_LOCATION ("warmelt-genobj.melt:5198:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1760*/ meltfptr[1759])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V994*/ meltfptr[993]); ((meltroutine_ptr_t) /*_.VALROUT___V1760*/ meltfptr[1759])->tabval[22] = (melt_ptr_t) ( /*_.VALDATA___V994*/ meltfptr[993]); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_34 */ void meltmod__warmelt_genobj__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-genobj.melt:5198:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1760*/ meltfptr[1759]); /*putclosurout#102 */ melt_assertmsg ("putclosrout#102 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1766*/ meltfptr[1765])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#102 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1760*/ meltfptr[1759])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1766*/ meltfptr[1765])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1760*/ meltfptr[1759]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1766*/ meltfptr[1765]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1767*/ meltfptr[1766])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1767*/ meltfptr[1766])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1767*/ meltfptr[1766]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1768*/ meltfptr[1767]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1767*/ meltfptr[1766]); melt_dbgtrace_written_object ( /*_.VALDATA___V1767*/ meltfptr[1766], "new static instance"); /*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"); MELT_LOCATION ("warmelt-genobj.melt:5285:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1771*/ meltfptr[1770])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1602__COMPILOBJ_DATAROUTINE#0", NULL != ( /*_.CLASS_NREP_DATAROUTINE__V132*/ meltfptr[131])); ((meltroutine_ptr_t) /*_.VALROUT___V1771*/ meltfptr[1770])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_DATAROUTINE__V132*/ meltfptr[131]); MELT_LOCATION ("warmelt-genobj.melt:5285:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1771*/ meltfptr[1770])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1602__COMPILOBJ_DATAROUTINE#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1771*/ meltfptr[1770])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:5285:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1771*/ meltfptr[1770])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1088*/ meltfptr[1087]); ((meltroutine_ptr_t) /*_.VALROUT___V1771*/ meltfptr[1770])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1088*/ meltfptr[1087]); MELT_LOCATION ("warmelt-genobj.melt:5285:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1771*/ meltfptr[1770])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1263*/ meltfptr[1262]); ((meltroutine_ptr_t) /*_.VALROUT___V1771*/ meltfptr[1770])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V1263*/ meltfptr[1262]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1772*/ meltfptr[1771])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1772*/ meltfptr[1771])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1772*/ meltfptr[1771]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1773*/ meltfptr[1772]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1772*/ meltfptr[1771]); melt_dbgtrace_written_object ( /*_.VALDATA___V1772*/ meltfptr[1771], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:5285:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1771*/ meltfptr[1770])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1602__COMPILOBJ_DATAROUTINE#4", NULL != ( /*_.VALDATA___V1772*/ meltfptr[1771])); ((meltroutine_ptr_t) /*_.VALROUT___V1771*/ meltfptr[1770])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V1772*/ meltfptr[1771]); MELT_LOCATION ("warmelt-genobj.melt:5285:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1771*/ meltfptr[1770])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1602__COMPILOBJ_DATAROUTINE#5", NULL != ( /*_.CLASS_NREP__V22*/ meltfptr[21])); ((meltroutine_ptr_t) /*_.VALROUT___V1771*/ meltfptr[1770])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NREP__V22*/ meltfptr[21]); MELT_LOCATION ("warmelt-genobj.melt:5285:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1771*/ meltfptr[1770])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1602__COMPILOBJ_DATAROUTINE#6", NULL != ( /*_.DISCR_STRBUF__V32*/ meltfptr[31])); ((meltroutine_ptr_t) /*_.VALROUT___V1771*/ meltfptr[1770])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-genobj.melt:5285:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1771*/ meltfptr[1770])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1602__COMPILOBJ_DATAROUTINE#7", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1771*/ meltfptr[1770])->tabval[7] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:5285:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1771*/ meltfptr[1770])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V328*/ meltfptr[327]); ((meltroutine_ptr_t) /*_.VALROUT___V1771*/ meltfptr[1770])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V328*/ meltfptr[327]); MELT_LOCATION ("warmelt-genobj.melt:5285:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1771*/ meltfptr[1770])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1602__COMPILOBJ_DATAROUTINE#9", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1771*/ meltfptr[1770])->tabval[9] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:5285:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1771*/ meltfptr[1770])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1602__COMPILOBJ_DATAROUTINE#10", NULL != ( /*_.DISCR_STRING__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1771*/ meltfptr[1770])->tabval[10] = (melt_ptr_t) ( /*_.DISCR_STRING__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-genobj.melt:5285:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1771*/ meltfptr[1770])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1602__COMPILOBJ_DATAROUTINE#11", NULL != ( /*_.CLASS_NREP_ROUTPROC__V34*/ meltfptr[33])); ((meltroutine_ptr_t) /*_.VALROUT___V1771*/ meltfptr[1770])->tabval[11] = (melt_ptr_t) ( /*_.CLASS_NREP_ROUTPROC__V34*/ meltfptr[33]); MELT_LOCATION ("warmelt-genobj.melt:5285:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1771*/ meltfptr[1770])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1602__COMPILOBJ_DATAROUTINE#12", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1771*/ meltfptr[1770])->tabval[12] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1774*/ meltfptr[1773])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1774*/ meltfptr[1773])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1774*/ meltfptr[1773]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1775*/ meltfptr[1774]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1774*/ meltfptr[1773]); melt_dbgtrace_written_object ( /*_.VALDATA___V1774*/ meltfptr[1773], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:5285:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1771*/ meltfptr[1770])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1602__COMPILOBJ_DATAROUTINE#13", NULL != ( /*_.VALDATA___V1774*/ meltfptr[1773])); ((meltroutine_ptr_t) /*_.VALROUT___V1771*/ meltfptr[1770])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V1774*/ meltfptr[1773]); MELT_LOCATION ("warmelt-genobj.melt:5285:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1771*/ meltfptr[1770])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1602__COMPILOBJ_DATAROUTINE#14", NULL != ( /*_.LIST_EVERY__V44*/ meltfptr[43])); ((meltroutine_ptr_t) /*_.VALROUT___V1771*/ meltfptr[1770])->tabval[14] = (melt_ptr_t) ( /*_.LIST_EVERY__V44*/ meltfptr[43]); MELT_LOCATION ("warmelt-genobj.melt:5285:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1771*/ meltfptr[1770])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1602__COMPILOBJ_DATAROUTINE#15", NULL != ( /*_.CLASS_NREP_CONSTOCC__V74*/ meltfptr[73])); ((meltroutine_ptr_t) /*_.VALROUT___V1771*/ meltfptr[1770])->tabval[15] = (melt_ptr_t) ( /*_.CLASS_NREP_CONSTOCC__V74*/ meltfptr[73]); MELT_LOCATION ("warmelt-genobj.melt:5285:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1771*/ meltfptr[1770])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1602__COMPILOBJ_DATAROUTINE#16", NULL != ( /*_.CLASS_ANY_BINDING__V48*/ meltfptr[47])); ((meltroutine_ptr_t) /*_.VALROUT___V1771*/ meltfptr[1770])->tabval[16] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V48*/ meltfptr[47]); MELT_LOCATION ("warmelt-genobj.melt:5285:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1771*/ meltfptr[1770])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1602__COMPILOBJ_DATAROUTINE#17", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1771*/ meltfptr[1770])->tabval[17] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:5285:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1771*/ meltfptr[1770])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1602__COMPILOBJ_DATAROUTINE#18", NULL != ( /*_.CLASS_FIXED_BINDING__V49*/ meltfptr[48])); ((meltroutine_ptr_t) /*_.VALROUT___V1771*/ meltfptr[1770])->tabval[18] = (melt_ptr_t) ( /*_.CLASS_FIXED_BINDING__V49*/ meltfptr[48]); MELT_LOCATION ("warmelt-genobj.melt:5285:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1771*/ meltfptr[1770])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V988*/ meltfptr[987]); ((meltroutine_ptr_t) /*_.VALROUT___V1771*/ meltfptr[1770])->tabval[19] = (melt_ptr_t) ( /*_.VALDATA___V988*/ meltfptr[987]); MELT_LOCATION ("warmelt-genobj.melt:5285:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1771*/ meltfptr[1770])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1602__COMPILOBJ_DATAROUTINE#20", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1771*/ meltfptr[1770])->tabval[20] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:5285:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1771*/ meltfptr[1770])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V970*/ meltfptr[969]); ((meltroutine_ptr_t) /*_.VALROUT___V1771*/ meltfptr[1770])->tabval[21] = (melt_ptr_t) ( /*_.VALDATA___V970*/ meltfptr[969]); MELT_LOCATION ("warmelt-genobj.melt:5285:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1771*/ meltfptr[1770])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1602__COMPILOBJ_DATAROUTINE#22", NULL != ( /*_.CLASS_NREP_QUASIDATA__V133*/ meltfptr[132])); ((meltroutine_ptr_t) /*_.VALROUT___V1771*/ meltfptr[1770])->tabval[22] = (melt_ptr_t) ( /*_.CLASS_NREP_QUASIDATA__V133*/ meltfptr[132]); MELT_LOCATION ("warmelt-genobj.melt:5342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1776*/ meltfptr[1775])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1608__LAMBDA_#0", NULL != ( /*_.CLASS_NREP_CONSTOCC__V74*/ meltfptr[73])); ((meltroutine_ptr_t) /*_.VALROUT___V1776*/ meltfptr[1775])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_CONSTOCC__V74*/ meltfptr[73]); MELT_LOCATION ("warmelt-genobj.melt:5342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1776*/ meltfptr[1775])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1608__LAMBDA_#1", NULL != ( /*_.CLASS_ANY_BINDING__V48*/ meltfptr[47])); ((meltroutine_ptr_t) /*_.VALROUT___V1776*/ meltfptr[1775])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V48*/ meltfptr[47]); MELT_LOCATION ("warmelt-genobj.melt:5342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1776*/ meltfptr[1775])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1608__LAMBDA_#2", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1776*/ meltfptr[1775])->tabval[2] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:5342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1776*/ meltfptr[1775])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1608__LAMBDA_#3", NULL != ( /*_.CLASS_FIXED_BINDING__V49*/ meltfptr[48])); ((meltroutine_ptr_t) /*_.VALROUT___V1776*/ meltfptr[1775])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_FIXED_BINDING__V49*/ meltfptr[48]); MELT_LOCATION ("warmelt-genobj.melt:5342:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1776*/ meltfptr[1775])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V988*/ meltfptr[987]); ((meltroutine_ptr_t) /*_.VALROUT___V1776*/ meltfptr[1775])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V988*/ meltfptr[987]); MELT_LOCATION ("warmelt-genobj.melt:5342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1776*/ meltfptr[1775])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1608__LAMBDA_#5", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1776*/ meltfptr[1775])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:5342:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1776*/ meltfptr[1775])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V970*/ meltfptr[969]); ((meltroutine_ptr_t) /*_.VALROUT___V1776*/ meltfptr[1775])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V970*/ meltfptr[969]); MELT_LOCATION ("warmelt-genobj.melt:5342:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1776*/ meltfptr[1775])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1608__LAMBDA_#7", NULL != ( /*_.CLASS_NREP_QUASIDATA__V133*/ meltfptr[132])); ((meltroutine_ptr_t) /*_.VALROUT___V1776*/ meltfptr[1775])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_NREP_QUASIDATA__V133*/ meltfptr[132]); MELT_LOCATION ("warmelt-genobj.melt:5342:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1776*/ meltfptr[1775]); MELT_LOCATION ("warmelt-genobj.melt:5285:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1771*/ meltfptr[1770])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1602__COMPILOBJ_DATAROUTINE#23", NULL != ( /*_.VALROUT___V1776*/ meltfptr[1775])); ((meltroutine_ptr_t) /*_.VALROUT___V1771*/ meltfptr[1770])->tabval[23] = (melt_ptr_t) ( /*_.VALROUT___V1776*/ meltfptr[1775]); MELT_LOCATION ("warmelt-genobj.melt:5285:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1771*/ meltfptr[1770])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V994*/ meltfptr[993]); ((meltroutine_ptr_t) /*_.VALROUT___V1771*/ meltfptr[1770])->tabval[24] = (melt_ptr_t) ( /*_.VALDATA___V994*/ meltfptr[993]); MELT_LOCATION ("warmelt-genobj.melt:5285:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1771*/ meltfptr[1770])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1602__COMPILOBJ_DATAROUTINE#25", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1771*/ meltfptr[1770])->tabval[25] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:5285:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1771*/ meltfptr[1770]); /*putclosurout#103 */ melt_assertmsg ("putclosrout#103 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1777*/ meltfptr[1776])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#103 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1771*/ meltfptr[1770])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1777*/ meltfptr[1776])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1771*/ meltfptr[1770]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1777*/ meltfptr[1776]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1778*/ meltfptr[1777])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1778*/ meltfptr[1777])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1778*/ meltfptr[1777]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1779*/ meltfptr[1778]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1778*/ meltfptr[1777]); melt_dbgtrace_written_object ( /*_.VALDATA___V1778*/ meltfptr[1777], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:5403:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1780*/ meltfptr[1779])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1611__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER#0", NULL != ( /*_.CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V134*/ meltfptr[133])); ((meltroutine_ptr_t) /*_.VALROUT___V1780*/ meltfptr[1779])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V134*/ meltfptr[133]); MELT_LOCATION ("warmelt-genobj.melt:5403:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1780*/ meltfptr[1779])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1611__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER#1", NULL != ( /*_.CLASS_INITIAL_GENERATION_CONTEXT__V46*/ meltfptr[45])); ((meltroutine_ptr_t) /*_.VALROUT___V1780*/ meltfptr[1779])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_INITIAL_GENERATION_CONTEXT__V46*/ meltfptr[45]); MELT_LOCATION ("warmelt-genobj.melt:5403:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1780*/ meltfptr[1779]); /*putclosurout#104 */ melt_assertmsg ("putclosrout#104 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1781*/ meltfptr[1780])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#104 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1780*/ meltfptr[1779])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1781*/ meltfptr[1780])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1780*/ meltfptr[1779]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1781*/ meltfptr[1780]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1782*/ meltfptr[1781])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1782*/ meltfptr[1781])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1782*/ meltfptr[1781]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1783*/ meltfptr[1782]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1782*/ meltfptr[1781]); melt_dbgtrace_written_object ( /*_.VALDATA___V1782*/ meltfptr[1781], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:5413:/ 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_1615__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT#0", NULL != ( /*_.CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT__V135*/ meltfptr[134])); ((meltroutine_ptr_t) /*_.VALROUT___V1784*/ meltfptr[1783])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT__V135*/ meltfptr[134]); MELT_LOCATION ("warmelt-genobj.melt:5413:/ 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_1615__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT#1", NULL != ( /*_.CLASS_INITIAL_GENERATION_CONTEXT__V46*/ meltfptr[45])); ((meltroutine_ptr_t) /*_.VALROUT___V1784*/ meltfptr[1783])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_INITIAL_GENERATION_CONTEXT__V46*/ meltfptr[45]); MELT_LOCATION ("warmelt-genobj.melt:5413:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1784*/ meltfptr[1783]); /*putclosurout#105 */ melt_assertmsg ("putclosrout#105 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1785*/ meltfptr[1784])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#105 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1784*/ meltfptr[1783])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1785*/ meltfptr[1784])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1784*/ meltfptr[1783]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1785*/ meltfptr[1784]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1786*/ meltfptr[1785])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1786*/ meltfptr[1785])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1786*/ meltfptr[1785]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1787*/ meltfptr[1786]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1786*/ meltfptr[1785]); melt_dbgtrace_written_object ( /*_.VALDATA___V1786*/ meltfptr[1785], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:5423:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1788*/ meltfptr[1787])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1619__COMPILOBJ_NREP_STORE_PREDEFINED#0", NULL != ( /*_.CLASS_NREP_STORE_PREDEFINED__V136*/ meltfptr[135])); ((meltroutine_ptr_t) /*_.VALROUT___V1788*/ meltfptr[1787])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_STORE_PREDEFINED__V136*/ meltfptr[135]); MELT_LOCATION ("warmelt-genobj.melt:5423:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1788*/ meltfptr[1787])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1619__COMPILOBJ_NREP_STORE_PREDEFINED#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1788*/ meltfptr[1787])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:5423:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1788*/ meltfptr[1787])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1619__COMPILOBJ_NREP_STORE_PREDEFINED#2", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1788*/ meltfptr[1787])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:5423:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1788*/ meltfptr[1787])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1619__COMPILOBJ_NREP_STORE_PREDEFINED#3", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1788*/ meltfptr[1787])->tabval[3] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:5423:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1788*/ meltfptr[1787])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1619__COMPILOBJ_NREP_STORE_PREDEFINED#4", NULL != ( /*_.CLASS_SYMBOL__V33*/ meltfptr[32])); ((meltroutine_ptr_t) /*_.VALROUT___V1788*/ meltfptr[1787])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V33*/ meltfptr[32]); MELT_LOCATION ("warmelt-genobj.melt:5423:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1788*/ meltfptr[1787])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1619__COMPILOBJ_NREP_STORE_PREDEFINED#5", NULL != ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1788*/ meltfptr[1787])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-genobj.melt:5423:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1788*/ meltfptr[1787])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1619__COMPILOBJ_NREP_STORE_PREDEFINED#6", NULL != ( /*_.CLASS_NAMED__V8*/ meltfptr[7])); ((meltroutine_ptr_t) /*_.VALROUT___V1788*/ meltfptr[1787])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-genobj.melt:5423:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1788*/ meltfptr[1787])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1151*/ meltfptr[1150]); ((meltroutine_ptr_t) /*_.VALROUT___V1788*/ meltfptr[1787])->tabval[7] = (melt_ptr_t) ( /*_.VALCLO___V1151*/ meltfptr[1150]); MELT_LOCATION ("warmelt-genobj.melt:5423:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1788*/ meltfptr[1787])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1619__COMPILOBJ_NREP_STORE_PREDEFINED#8", NULL != ( /*_.CTYPE_VOID__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1788*/ meltfptr[1787])->tabval[8] = (melt_ptr_t) ( /*_.CTYPE_VOID__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-genobj.melt:5423:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1788*/ meltfptr[1787]); /*putclosurout#106 */ melt_assertmsg ("putclosrout#106 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1789*/ meltfptr[1788])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#106 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1788*/ meltfptr[1787])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1789*/ meltfptr[1788])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1788*/ meltfptr[1787]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1789*/ meltfptr[1788]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1790*/ meltfptr[1789])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1790*/ meltfptr[1789])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1790*/ meltfptr[1789]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1791*/ meltfptr[1790]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1790*/ meltfptr[1789]); melt_dbgtrace_written_object ( /*_.VALDATA___V1790*/ meltfptr[1789], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:5462:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1792*/ meltfptr[1791])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1623__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#0", NULL != ( /*_.CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V137*/ meltfptr[136])); ((meltroutine_ptr_t) /*_.VALROUT___V1792*/ meltfptr[1791])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V137*/ meltfptr[136]); MELT_LOCATION ("warmelt-genobj.melt:5462:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1792*/ meltfptr[1791])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1623__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#1", NULL != ( /*_.CLASS_INITIAL_GENERATION_CONTEXT__V46*/ meltfptr[45])); ((meltroutine_ptr_t) /*_.VALROUT___V1792*/ meltfptr[1791])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_INITIAL_GENERATION_CONTEXT__V46*/ meltfptr[45]); MELT_LOCATION ("warmelt-genobj.melt:5462:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1792*/ meltfptr[1791])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1623__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#2", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1792*/ meltfptr[1791])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:5462:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1792*/ meltfptr[1791])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1623__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#3", NULL != ( /*_.DISCR_STRBUF__V32*/ meltfptr[31])); ((meltroutine_ptr_t) /*_.VALROUT___V1792*/ meltfptr[1791])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-genobj.melt:5462:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1792*/ meltfptr[1791])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1623__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#4", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1792*/ meltfptr[1791])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:5462:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1792*/ meltfptr[1791])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V538*/ meltfptr[537]); ((meltroutine_ptr_t) /*_.VALROUT___V1792*/ meltfptr[1791])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V538*/ meltfptr[537]); MELT_LOCATION ("warmelt-genobj.melt:5462:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1792*/ meltfptr[1791])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1623__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#6", NULL != ( /*_.DISCR_STRING__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1792*/ meltfptr[1791])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_STRING__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-genobj.melt:5462:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1792*/ meltfptr[1791])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1623__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#7", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1792*/ meltfptr[1791])->tabval[7] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:5462:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1792*/ meltfptr[1791])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1062*/ meltfptr[1061]); ((meltroutine_ptr_t) /*_.VALROUT___V1792*/ meltfptr[1791])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V1062*/ meltfptr[1061]); MELT_LOCATION ("warmelt-genobj.melt:5462:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1792*/ meltfptr[1791])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1623__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#9", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1792*/ meltfptr[1791])->tabval[9] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:5462:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1792*/ meltfptr[1791])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V328*/ meltfptr[327]); ((meltroutine_ptr_t) /*_.VALROUT___V1792*/ meltfptr[1791])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V328*/ meltfptr[327]); MELT_LOCATION ("warmelt-genobj.melt:5462:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1792*/ meltfptr[1791])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1623__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#11", NULL != ( /*_.LIST_EVERY__V44*/ meltfptr[43])); ((meltroutine_ptr_t) /*_.VALROUT___V1792*/ meltfptr[1791])->tabval[11] = (melt_ptr_t) ( /*_.LIST_EVERY__V44*/ meltfptr[43]); MELT_LOCATION ("warmelt-genobj.melt:5462:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1792*/ meltfptr[1791])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1623__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#12", NULL != ( /*_.CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V134*/ meltfptr[133])); ((meltroutine_ptr_t) /*_.VALROUT___V1792*/ meltfptr[1791])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V134*/ meltfptr[133]); MELT_LOCATION ("warmelt-genobj.melt:5462:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1792*/ meltfptr[1791])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V970*/ meltfptr[969]); ((meltroutine_ptr_t) /*_.VALROUT___V1792*/ meltfptr[1791])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V970*/ meltfptr[969]); MELT_LOCATION ("warmelt-genobj.melt:5462:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1792*/ meltfptr[1791])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1623__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#14", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1792*/ meltfptr[1791])->tabval[14] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:5462:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1792*/ meltfptr[1791])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V994*/ meltfptr[993]); ((meltroutine_ptr_t) /*_.VALROUT___V1792*/ meltfptr[1791])->tabval[15] = (melt_ptr_t) ( /*_.VALDATA___V994*/ meltfptr[993]); MELT_LOCATION ("warmelt-genobj.melt:5462:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1792*/ meltfptr[1791])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V436*/ meltfptr[435]); ((meltroutine_ptr_t) /*_.VALROUT___V1792*/ meltfptr[1791])->tabval[16] = (melt_ptr_t) ( /*_.VALDATA___V436*/ meltfptr[435]); MELT_LOCATION ("warmelt-genobj.melt:5462:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1792*/ meltfptr[1791])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1623__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#17", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1792*/ meltfptr[1791])->tabval[17] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:5507:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1793*/ meltfptr[1792])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1627__LAMBDA_#0", NULL != ( /*_.CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V134*/ meltfptr[133])); ((meltroutine_ptr_t) /*_.VALROUT___V1793*/ meltfptr[1792])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V134*/ meltfptr[133]); MELT_LOCATION ("warmelt-genobj.melt:5507:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1793*/ meltfptr[1792])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V970*/ meltfptr[969]); ((meltroutine_ptr_t) /*_.VALROUT___V1793*/ meltfptr[1792])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V970*/ meltfptr[969]); MELT_LOCATION ("warmelt-genobj.melt:5507:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1793*/ meltfptr[1792])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1627__LAMBDA_#2", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1793*/ meltfptr[1792])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:5507:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1793*/ meltfptr[1792])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V994*/ meltfptr[993]); ((meltroutine_ptr_t) /*_.VALROUT___V1793*/ meltfptr[1792])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V994*/ meltfptr[993]); MELT_LOCATION ("warmelt-genobj.melt:5507:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1793*/ meltfptr[1792])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1627__LAMBDA_#4", NULL != ( /*_.VALSTR___V1794*/ meltfptr[1793])); ((meltroutine_ptr_t) /*_.VALROUT___V1793*/ meltfptr[1792])->tabval[4] = (melt_ptr_t) ( /*_.VALSTR___V1794*/ meltfptr[1793]); MELT_LOCATION ("warmelt-genobj.melt:5507:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1793*/ meltfptr[1792])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V436*/ meltfptr[435]); ((meltroutine_ptr_t) /*_.VALROUT___V1793*/ meltfptr[1792])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V436*/ meltfptr[435]); MELT_LOCATION ("warmelt-genobj.melt:5507:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1793*/ meltfptr[1792])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1627__LAMBDA_#6", NULL != ( /*_.CTYPE_VALUE__V26*/ meltfptr[25])); ((meltroutine_ptr_t) /*_.VALROUT___V1793*/ meltfptr[1792])->tabval[6] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-genobj.melt:5507:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1793*/ meltfptr[1792]); MELT_LOCATION ("warmelt-genobj.melt:5462:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1792*/ meltfptr[1791])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1623__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER#18", NULL != ( /*_.VALROUT___V1793*/ meltfptr[1792])); ((meltroutine_ptr_t) /*_.VALROUT___V1792*/ meltfptr[1791])->tabval[18] = (melt_ptr_t) ( /*_.VALROUT___V1793*/ meltfptr[1792]); MELT_LOCATION ("warmelt-genobj.melt:5462:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1792*/ meltfptr[1791]); /*putclosurout#107 */ melt_assertmsg ("putclosrout#107 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1795*/ meltfptr[1794])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#107 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1792*/ meltfptr[1791])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1795*/ meltfptr[1794])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1792*/ meltfptr[1791]); /*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-genobj.melt:5552:/ 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_1629__COMPILOBJ_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:5552:/ 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_1629__COMPILOBJ_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER#1", NULL != ( /*_.CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER__V138*/ meltfptr[137])); ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER__V138*/ meltfptr[137]); MELT_LOCATION ("warmelt-genobj.melt:5552:/ 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_1629__COMPILOBJ_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER#2", NULL != ( /*_.CLASS_EXTENSION_GENERATION_CONTEXT__V61*/ meltfptr[60])); ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_EXTENSION_GENERATION_CONTEXT__V61*/ meltfptr[60]); MELT_LOCATION ("warmelt-genobj.melt:5552:/ 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_1629__COMPILOBJ_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER#3", NULL != ( /*_.CLASS_NREP__V22*/ meltfptr[21])); ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NREP__V22*/ meltfptr[21]); MELT_LOCATION ("warmelt-genobj.melt:5552:/ 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_1629__COMPILOBJ_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER#4", NULL != ( /*_.CLASS_INITIAL_GENERATION_CONTEXT__V46*/ meltfptr[45])); ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_INITIAL_GENERATION_CONTEXT__V46*/ meltfptr[45]); MELT_LOCATION ("warmelt-genobj.melt:5552:/ 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_1629__COMPILOBJ_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER#5", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:5552:/ 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_1629__COMPILOBJ_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER#6", NULL != ( /*_.DISCR_STRBUF__V32*/ meltfptr[31])); ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-genobj.melt:5552:/ 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___V1263*/ meltfptr[1262]); ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[7] = (melt_ptr_t) ( /*_.VALCLO___V1263*/ meltfptr[1262]); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_35 */ void meltmod__warmelt_genobj__initialmeltchunk_36 (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___V1799*/ meltfptr[1798])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1799*/ meltfptr[1798])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1799*/ meltfptr[1798]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1800*/ meltfptr[1799]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1799*/ meltfptr[1798]); melt_dbgtrace_written_object ( /*_.VALDATA___V1799*/ meltfptr[1798], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:5552:/ 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_1629__COMPILOBJ_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER#8", NULL != ( /*_.VALDATA___V1799*/ meltfptr[1798])); ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V1799*/ meltfptr[1798]); MELT_LOCATION ("warmelt-genobj.melt:5552:/ 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___V538*/ meltfptr[537]); ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V538*/ meltfptr[537]); MELT_LOCATION ("warmelt-genobj.melt:5552:/ 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_1629__COMPILOBJ_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER#10", NULL != ( /*_.ADD2OUT__V139*/ meltfptr[138])); ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[10] = (melt_ptr_t) ( /*_.ADD2OUT__V139*/ meltfptr[138]); MELT_LOCATION ("warmelt-genobj.melt:5552:/ 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_1629__COMPILOBJ_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER#11", NULL != ( /*_.DISCR_STRING__V37*/ meltfptr[36])); ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[11] = (melt_ptr_t) ( /*_.DISCR_STRING__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-genobj.melt:5552:/ 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___V1129*/ meltfptr[1128]); ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[12] = (melt_ptr_t) ( /*_.VALCLO___V1129*/ meltfptr[1128]); MELT_LOCATION ("warmelt-genobj.melt:5552:/ 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_1629__COMPILOBJ_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER#13", NULL != ( /*_.CTYPE_VOID__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[13] = (melt_ptr_t) ( /*_.CTYPE_VOID__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-genobj.melt:5552:/ 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___V1062*/ meltfptr[1061]); ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[14] = (melt_ptr_t) ( /*_.VALDATA___V1062*/ meltfptr[1061]); MELT_LOCATION ("warmelt-genobj.melt:5552:/ 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_1629__COMPILOBJ_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER#15", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[15] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:5552:/ 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_1629__COMPILOBJ_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER#16", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[16] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:5552:/ 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___V328*/ meltfptr[327]); ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[17] = (melt_ptr_t) ( /*_.VALDATA___V328*/ meltfptr[327]); MELT_LOCATION ("warmelt-genobj.melt:5552:/ 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_1629__COMPILOBJ_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER#18", NULL != ( /*_.LIST_EVERY__V44*/ meltfptr[43])); ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[18] = (melt_ptr_t) ( /*_.LIST_EVERY__V44*/ meltfptr[43]); MELT_LOCATION ("warmelt-genobj.melt:5552:/ 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_1629__COMPILOBJ_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER#19", NULL != ( /*_.CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V134*/ meltfptr[133])); ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[19] = (melt_ptr_t) ( /*_.CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V134*/ meltfptr[133]); MELT_LOCATION ("warmelt-genobj.melt:5552:/ 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___V970*/ meltfptr[969]); ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[20] = (melt_ptr_t) ( /*_.VALDATA___V970*/ meltfptr[969]); MELT_LOCATION ("warmelt-genobj.melt:5552:/ 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_1629__COMPILOBJ_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER#21", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[21] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:5552:/ 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___V994*/ meltfptr[993]); ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[22] = (melt_ptr_t) ( /*_.VALDATA___V994*/ meltfptr[993]); MELT_LOCATION ("warmelt-genobj.melt:5612:/ 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_1637__LAMBDA_#0", NULL != ( /*_.CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V134*/ meltfptr[133])); ((meltroutine_ptr_t) /*_.VALROUT___V1801*/ meltfptr[1800])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V134*/ meltfptr[133]); MELT_LOCATION ("warmelt-genobj.melt:5612:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1801*/ meltfptr[1800])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V970*/ meltfptr[969]); ((meltroutine_ptr_t) /*_.VALROUT___V1801*/ meltfptr[1800])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V970*/ meltfptr[969]); MELT_LOCATION ("warmelt-genobj.melt:5612:/ 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_1637__LAMBDA_#2", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1801*/ meltfptr[1800])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:5612:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1801*/ meltfptr[1800])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V994*/ meltfptr[993]); ((meltroutine_ptr_t) /*_.VALROUT___V1801*/ meltfptr[1800])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V994*/ meltfptr[993]); MELT_LOCATION ("warmelt-genobj.melt:5612:/ 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_1637__LAMBDA_#4", NULL != ( /*_.VALSTR___V1802*/ meltfptr[1801])); ((meltroutine_ptr_t) /*_.VALROUT___V1801*/ meltfptr[1800])->tabval[4] = (melt_ptr_t) ( /*_.VALSTR___V1802*/ meltfptr[1801]); MELT_LOCATION ("warmelt-genobj.melt:5612:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1801*/ meltfptr[1800]); MELT_LOCATION ("warmelt-genobj.melt:5552:/ 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_1629__COMPILOBJ_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER#23", NULL != ( /*_.VALROUT___V1801*/ meltfptr[1800])); ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[23] = (melt_ptr_t) ( /*_.VALROUT___V1801*/ meltfptr[1800]); MELT_LOCATION ("warmelt-genobj.melt:5552:/ 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___V494*/ meltfptr[493]); ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[24] = (melt_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493]); MELT_LOCATION ("warmelt-genobj.melt:5552:/ 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___V1402*/ meltfptr[1401]); ((meltroutine_ptr_t) /*_.VALROUT___V1798*/ meltfptr[1797])->tabval[25] = (melt_ptr_t) ( /*_.VALCLO___V1402*/ meltfptr[1401]); MELT_LOCATION ("warmelt-genobj.melt:5552:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1798*/ meltfptr[1797]); /*putclosurout#108 */ melt_assertmsg ("putclosrout#108 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1803*/ meltfptr[1802])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#108 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1798*/ meltfptr[1797])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1803*/ meltfptr[1802])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1798*/ meltfptr[1797]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1803*/ meltfptr[1802]); /*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"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1806*/ meltfptr[1805])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1806*/ meltfptr[1805])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1806*/ meltfptr[1805]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1807*/ meltfptr[1806]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1806*/ meltfptr[1805]); melt_dbgtrace_written_object ( /*_.VALDATA___V1806*/ meltfptr[1805], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1808*/ meltfptr[1807])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1808*/ meltfptr[1807])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1808*/ meltfptr[1807]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1809*/ meltfptr[1808]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1808*/ meltfptr[1807]); melt_dbgtrace_written_object ( /*_.VALDATA___V1808*/ meltfptr[1807], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:5657:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1810*/ meltfptr[1809])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1810*/ meltfptr[1809])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1810*/ meltfptr[1809]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1811*/ meltfptr[1810]); MELT_LOCATION ("warmelt-genobj.melt:5657:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1810*/ meltfptr[1809]); MELT_LOCATION ("warmelt-genobj.melt:5657:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1810*/ meltfptr[1809], "new static instance"); /*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"); /*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-genobj.melt:5661:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1816*/ meltfptr[1815])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1816*/ meltfptr[1815])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1816*/ meltfptr[1815]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1817*/ meltfptr[1816]); MELT_LOCATION ("warmelt-genobj.melt:5661:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1816*/ meltfptr[1815])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1816*/ meltfptr[1815])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1816*/ meltfptr[1815]))-> obj_vartab[4] = (melt_ptr_t) ( /*_.CLASS_PROPED__V140*/ meltfptr[139]); /*putupl#673 */ melt_assertmsg ("putupl #673 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1818*/ meltfptr[1817])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #673 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1818*/ meltfptr[1817])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1818*/ meltfptr[1817]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_PROPED__V140*/ meltfptr[139]), 5))), (0)))); /*putupl#674 */ melt_assertmsg ("putupl #674 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1818*/ meltfptr[1817])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #674 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1818*/ meltfptr[1817])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1818*/ meltfptr[1817]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_PROPED__V140*/ meltfptr[139]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1818*/ meltfptr[1817]); MELT_LOCATION ("warmelt-genobj.melt:5661:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1816*/ meltfptr[1815])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1816*/ meltfptr[1815])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1816*/ meltfptr[1815]))-> obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1818*/ meltfptr[1817]); MELT_LOCATION ("warmelt-genobj.melt:5661:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1819*/ meltfptr[1818])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1819*/ meltfptr[1818])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1819*/ meltfptr[1818]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1820*/ meltfptr[1819]); MELT_LOCATION ("warmelt-genobj.melt:5661:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1819*/ meltfptr[1818])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1819*/ meltfptr[1818])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1819*/ meltfptr[1818]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1816*/ meltfptr[1815]); MELT_LOCATION ("warmelt-genobj.melt:5661:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1819*/ meltfptr[1818]); MELT_LOCATION ("warmelt-genobj.melt:5661:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1819*/ meltfptr[1818], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:5661:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1821*/ meltfptr[1820])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1821*/ meltfptr[1820])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1821*/ meltfptr[1820]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1822*/ meltfptr[1821]); MELT_LOCATION ("warmelt-genobj.melt:5661:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1821*/ meltfptr[1820])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1821*/ meltfptr[1820])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1821*/ meltfptr[1820]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1816*/ meltfptr[1815]); MELT_LOCATION ("warmelt-genobj.melt:5661:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1821*/ meltfptr[1820]); MELT_LOCATION ("warmelt-genobj.melt:5661:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1821*/ meltfptr[1820], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:5661:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1823*/ meltfptr[1822])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1823*/ meltfptr[1822])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1823*/ meltfptr[1822]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1824*/ meltfptr[1823]); MELT_LOCATION ("warmelt-genobj.melt:5661:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1823*/ meltfptr[1822])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1823*/ meltfptr[1822])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1823*/ meltfptr[1822]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1816*/ meltfptr[1815]); MELT_LOCATION ("warmelt-genobj.melt:5661:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1823*/ meltfptr[1822]); MELT_LOCATION ("warmelt-genobj.melt:5661:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1823*/ meltfptr[1822], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:5661:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1825*/ meltfptr[1824])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1825*/ meltfptr[1824])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1825*/ meltfptr[1824]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1826*/ meltfptr[1825]); MELT_LOCATION ("warmelt-genobj.melt:5661:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1825*/ meltfptr[1824])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1825*/ meltfptr[1824])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1825*/ meltfptr[1824]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1816*/ meltfptr[1815]); MELT_LOCATION ("warmelt-genobj.melt:5661:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1825*/ meltfptr[1824]); MELT_LOCATION ("warmelt-genobj.melt:5661:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1825*/ meltfptr[1824], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:5661:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1827*/ meltfptr[1826])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1827*/ meltfptr[1826])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1827*/ meltfptr[1826]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1828*/ meltfptr[1827]); MELT_LOCATION ("warmelt-genobj.melt:5661:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1827*/ meltfptr[1826])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1827*/ meltfptr[1826])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1827*/ meltfptr[1826]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1816*/ meltfptr[1815]); MELT_LOCATION ("warmelt-genobj.melt:5661:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1827*/ meltfptr[1826]); MELT_LOCATION ("warmelt-genobj.melt:5661:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1827*/ meltfptr[1826], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:5661:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1829*/ meltfptr[1828])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1829*/ meltfptr[1828])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1829*/ meltfptr[1828]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1830*/ meltfptr[1829]); MELT_LOCATION ("warmelt-genobj.melt:5661:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1829*/ meltfptr[1828])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1829*/ meltfptr[1828])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1829*/ meltfptr[1828]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1816*/ meltfptr[1815]); MELT_LOCATION ("warmelt-genobj.melt:5661:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1829*/ meltfptr[1828]); MELT_LOCATION ("warmelt-genobj.melt:5661:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1829*/ meltfptr[1828], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:5661:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1831*/ meltfptr[1830])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1831*/ meltfptr[1830])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1831*/ meltfptr[1830]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1832*/ meltfptr[1831]); MELT_LOCATION ("warmelt-genobj.melt:5661:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1831*/ meltfptr[1830])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1831*/ meltfptr[1830])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1831*/ meltfptr[1830]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1816*/ meltfptr[1815]); MELT_LOCATION ("warmelt-genobj.melt:5661:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1831*/ meltfptr[1830]); MELT_LOCATION ("warmelt-genobj.melt:5661:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1831*/ meltfptr[1830], "new static instance"); /*putupl#675 */ melt_assertmsg ("putupl #675 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1833*/ meltfptr[1832])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #675 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1833*/ meltfptr[1832])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1833*/ meltfptr[1832]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_PROPED__V140*/ meltfptr[139]), 6))), (0)))); /*putupl#676 */ melt_assertmsg ("putupl #676 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1833*/ meltfptr[1832])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #676 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1833*/ meltfptr[1832])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1833*/ meltfptr[1832]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1819*/ meltfptr[1818]); /*putupl#677 */ melt_assertmsg ("putupl #677 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1833*/ meltfptr[1832])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #677 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1833*/ meltfptr[1832])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1833*/ meltfptr[1832]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1821*/ meltfptr[1820]); /*putupl#678 */ melt_assertmsg ("putupl #678 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1833*/ meltfptr[1832])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #678 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1833*/ meltfptr[1832])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1833*/ meltfptr[1832]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1823*/ meltfptr[1822]); /*putupl#679 */ melt_assertmsg ("putupl #679 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1833*/ meltfptr[1832])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #679 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1833*/ meltfptr[1832])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1833*/ meltfptr[1832]))->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V1825*/ meltfptr[1824]); /*putupl#680 */ melt_assertmsg ("putupl #680 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1833*/ meltfptr[1832])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #680 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1833*/ meltfptr[1832])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1833*/ meltfptr[1832]))->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V1827*/ meltfptr[1826]); /*putupl#681 */ melt_assertmsg ("putupl #681 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1833*/ meltfptr[1832])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #681 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1833*/ meltfptr[1832])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1833*/ meltfptr[1832]))->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1829*/ meltfptr[1828]); /*putupl#682 */ melt_assertmsg ("putupl #682 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1833*/ meltfptr[1832])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #682 checkoff", (7 >= 0 && 7 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1833*/ meltfptr[1832])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1833*/ meltfptr[1832]))->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V1831*/ meltfptr[1830]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1833*/ meltfptr[1832]); MELT_LOCATION ("warmelt-genobj.melt:5661:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1816*/ meltfptr[1815])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1816*/ meltfptr[1815])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1816*/ meltfptr[1815]))-> obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1833*/ meltfptr[1832]); MELT_LOCATION ("warmelt-genobj.melt:5661:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1816*/ meltfptr[1815]); MELT_LOCATION ("warmelt-genobj.melt:5661:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1816*/ meltfptr[1815], "new static instance"); /*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) ( /*_.VALSTR___V1835*/ meltfptr[1834]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1834*/ meltfptr[1833]); melt_dbgtrace_written_object ( /*_.VALDATA___V1834*/ meltfptr[1833], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1836*/ meltfptr[1835])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1836*/ meltfptr[1835])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1836*/ meltfptr[1835]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1837*/ meltfptr[1836]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1836*/ meltfptr[1835]); melt_dbgtrace_written_object ( /*_.VALDATA___V1836*/ meltfptr[1835], "new static instance"); /*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) ( /*_.VALSTR___V1839*/ meltfptr[1838]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1838*/ meltfptr[1837]); melt_dbgtrace_written_object ( /*_.VALDATA___V1838*/ meltfptr[1837], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1840*/ meltfptr[1839])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1840*/ meltfptr[1839])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1840*/ meltfptr[1839]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1841*/ meltfptr[1840]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1840*/ meltfptr[1839]); melt_dbgtrace_written_object ( /*_.VALDATA___V1840*/ meltfptr[1839], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1842*/ meltfptr[1841])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1842*/ meltfptr[1841])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1842*/ meltfptr[1841]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1843*/ meltfptr[1842]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1842*/ meltfptr[1841]); melt_dbgtrace_written_object ( /*_.VALDATA___V1842*/ meltfptr[1841], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1844*/ meltfptr[1843])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1844*/ meltfptr[1843])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1844*/ meltfptr[1843]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1845*/ meltfptr[1844]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1844*/ meltfptr[1843]); melt_dbgtrace_written_object ( /*_.VALDATA___V1844*/ meltfptr[1843], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1846*/ meltfptr[1845])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1846*/ meltfptr[1845])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1846*/ meltfptr[1845]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1847*/ meltfptr[1846]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1846*/ meltfptr[1845]); melt_dbgtrace_written_object ( /*_.VALDATA___V1846*/ meltfptr[1845], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1848*/ meltfptr[1847])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1848*/ meltfptr[1847])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1848*/ meltfptr[1847]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1849*/ meltfptr[1848]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1848*/ meltfptr[1847]); melt_dbgtrace_written_object ( /*_.VALDATA___V1848*/ meltfptr[1847], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:5679:/ 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___V1160*/ meltfptr[1159]); MELT_LOCATION ("warmelt-genobj.melt:5679:/ 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-genobj.melt:5679:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1850*/ meltfptr[1849]); MELT_LOCATION ("warmelt-genobj.melt:5679:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1850*/ meltfptr[1849], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:5679:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1851*/ meltfptr[1850])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1851*/ meltfptr[1850])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1851*/ meltfptr[1850]))-> obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490]); MELT_LOCATION ("warmelt-genobj.melt:5679:/ initchunk"); /*^putslot */ /*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) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-genobj.melt:5679:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1851*/ meltfptr[1850]); MELT_LOCATION ("warmelt-genobj.melt:5679:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1851*/ meltfptr[1850], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1852*/ meltfptr[1851])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1852*/ meltfptr[1851])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1852*/ meltfptr[1851]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1853*/ meltfptr[1852]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1852*/ meltfptr[1851]); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_36 */ void meltmod__warmelt_genobj__initialmeltchunk_37 (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___V1852*/ meltfptr[1851], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:5679:/ 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___V1852*/ meltfptr[1851]); MELT_LOCATION ("warmelt-genobj.melt:5679:/ 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-genobj.melt:5679:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1854*/ meltfptr[1853]); MELT_LOCATION ("warmelt-genobj.melt:5679:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1854*/ meltfptr[1853], "new static instance"); /*putupl#683 */ melt_assertmsg ("putupl #683 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1855*/ meltfptr[1854])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #683 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1855*/ meltfptr[1854])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1855*/ meltfptr[1854]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V1850*/ meltfptr[1849]); /*putupl#684 */ melt_assertmsg ("putupl #684 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1855*/ meltfptr[1854])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #684 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1855*/ meltfptr[1854])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1855*/ meltfptr[1854]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1851*/ meltfptr[1850]); /*putupl#685 */ melt_assertmsg ("putupl #685 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1855*/ meltfptr[1854])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #685 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1855*/ meltfptr[1854])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1855*/ meltfptr[1854]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1854*/ meltfptr[1853]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1855*/ meltfptr[1854]); MELT_LOCATION ("warmelt-genobj.melt:5679:/ 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) ( /*_.VALSTR___V1857*/ meltfptr[1856]); MELT_LOCATION ("warmelt-genobj.melt:5679:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1856*/ meltfptr[1855]); MELT_LOCATION ("warmelt-genobj.melt:5679:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1856*/ meltfptr[1855], "new static instance"); /*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]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1858*/ meltfptr[1857]); melt_dbgtrace_written_object ( /*_.VALDATA___V1858*/ meltfptr[1857], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:5686:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1860*/ meltfptr[1859])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1860*/ meltfptr[1859])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1860*/ meltfptr[1859]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1861*/ meltfptr[1860]); MELT_LOCATION ("warmelt-genobj.melt:5686:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1860*/ meltfptr[1859])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1860*/ meltfptr[1859])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1860*/ meltfptr[1859]))-> obj_vartab[4] = (melt_ptr_t) ( /*_.CLASS_PROPED__V140*/ meltfptr[139]); /*putupl#686 */ melt_assertmsg ("putupl #686 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1862*/ meltfptr[1861])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #686 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1862*/ meltfptr[1861])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1862*/ meltfptr[1861]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_PROPED__V140*/ meltfptr[139]), 5))), (0)))); /*putupl#687 */ melt_assertmsg ("putupl #687 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1862*/ meltfptr[1861])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #687 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1862*/ meltfptr[1861])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1862*/ meltfptr[1861]))->tabval[1] = (melt_ptr_t) ( /*_.CLASS_PROPED__V140*/ meltfptr[139]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1862*/ meltfptr[1861]); MELT_LOCATION ("warmelt-genobj.melt:5686:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1860*/ meltfptr[1859])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1860*/ meltfptr[1859])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1860*/ meltfptr[1859]))-> obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1862*/ meltfptr[1861]); MELT_LOCATION ("warmelt-genobj.melt:5686:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1863*/ meltfptr[1862])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1863*/ meltfptr[1862])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1863*/ meltfptr[1862]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1864*/ meltfptr[1863]); MELT_LOCATION ("warmelt-genobj.melt:5686:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1863*/ meltfptr[1862])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1863*/ meltfptr[1862])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1863*/ meltfptr[1862]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1860*/ meltfptr[1859]); MELT_LOCATION ("warmelt-genobj.melt:5686:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1863*/ meltfptr[1862]); MELT_LOCATION ("warmelt-genobj.melt:5686:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1863*/ meltfptr[1862], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:5686:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1865*/ meltfptr[1864])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1865*/ meltfptr[1864])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1865*/ meltfptr[1864]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1866*/ meltfptr[1865]); MELT_LOCATION ("warmelt-genobj.melt:5686:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1865*/ meltfptr[1864])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1865*/ meltfptr[1864])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1865*/ meltfptr[1864]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1860*/ meltfptr[1859]); MELT_LOCATION ("warmelt-genobj.melt:5686:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1865*/ meltfptr[1864]); MELT_LOCATION ("warmelt-genobj.melt:5686:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1865*/ meltfptr[1864], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:5686:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1867*/ meltfptr[1866])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1867*/ meltfptr[1866])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1867*/ meltfptr[1866]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1868*/ meltfptr[1867]); MELT_LOCATION ("warmelt-genobj.melt:5686:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1867*/ meltfptr[1866])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1867*/ meltfptr[1866])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1867*/ meltfptr[1866]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1860*/ meltfptr[1859]); MELT_LOCATION ("warmelt-genobj.melt:5686:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1867*/ meltfptr[1866]); MELT_LOCATION ("warmelt-genobj.melt:5686:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1867*/ meltfptr[1866], "new static instance"); /*putupl#688 */ melt_assertmsg ("putupl #688 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1869*/ meltfptr[1868])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #688 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1869*/ meltfptr[1868])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1869*/ meltfptr[1868]))->tabval[0] = (melt_ptr_t) ( /*multacc */ (melt_multiple_nth (( /*fieldacc */ (melt_field_object ((melt_ptr_t) ( /*_.CLASS_PROPED__V140*/ meltfptr[139]), 6))), (0)))); /*putupl#689 */ melt_assertmsg ("putupl #689 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1869*/ meltfptr[1868])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #689 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1869*/ meltfptr[1868])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1869*/ meltfptr[1868]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1863*/ meltfptr[1862]); /*putupl#690 */ melt_assertmsg ("putupl #690 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1869*/ meltfptr[1868])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #690 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1869*/ meltfptr[1868])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1869*/ meltfptr[1868]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1865*/ meltfptr[1864]); /*putupl#691 */ melt_assertmsg ("putupl #691 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1869*/ meltfptr[1868])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #691 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1869*/ meltfptr[1868])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1869*/ meltfptr[1868]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1867*/ meltfptr[1866]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1869*/ meltfptr[1868]); MELT_LOCATION ("warmelt-genobj.melt:5686:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1860*/ meltfptr[1859])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1860*/ meltfptr[1859])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1860*/ meltfptr[1859]))-> obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1869*/ meltfptr[1868]); MELT_LOCATION ("warmelt-genobj.melt:5686:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1860*/ meltfptr[1859]); MELT_LOCATION ("warmelt-genobj.melt:5686:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1860*/ meltfptr[1859], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1870*/ meltfptr[1869])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1870*/ meltfptr[1869])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1870*/ meltfptr[1869]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1871*/ meltfptr[1870]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1870*/ meltfptr[1869]); melt_dbgtrace_written_object ( /*_.VALDATA___V1870*/ meltfptr[1869], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1872*/ meltfptr[1871])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1872*/ meltfptr[1871])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1872*/ meltfptr[1871]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1873*/ meltfptr[1872]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1872*/ meltfptr[1871]); melt_dbgtrace_written_object ( /*_.VALDATA___V1872*/ meltfptr[1871], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1874*/ meltfptr[1873])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1874*/ meltfptr[1873])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1874*/ meltfptr[1873]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1875*/ meltfptr[1874]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1874*/ meltfptr[1873]); melt_dbgtrace_written_object ( /*_.VALDATA___V1874*/ meltfptr[1873], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:5696:/ 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_1707__COMPILTST_ANYTESTER#0", NULL != ( /*_.CLASS_NORMTESTER_ANY__V141*/ meltfptr[140])); ((meltroutine_ptr_t) /*_.VALROUT___V1876*/ meltfptr[1875])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANY__V141*/ meltfptr[140]); MELT_LOCATION ("warmelt-genobj.melt:5696:/ 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_1707__COMPILTST_ANYTESTER#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1876*/ meltfptr[1875])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:5696:/ 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___V1860*/ meltfptr[1859]); ((meltroutine_ptr_t) /*_.VALROUT___V1876*/ meltfptr[1875])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1860*/ meltfptr[1859]); MELT_LOCATION ("warmelt-genobj.melt:5696:/ 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_1707__COMPILTST_ANYTESTER#3", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1876*/ meltfptr[1875])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:5696:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1876*/ meltfptr[1875]); /*putclosurout#109 */ melt_assertmsg ("putclosrout#109 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1877*/ meltfptr[1876])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#109 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]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1878*/ meltfptr[1877])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1878*/ meltfptr[1877])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1878*/ meltfptr[1877]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1879*/ meltfptr[1878]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1878*/ meltfptr[1877]); melt_dbgtrace_written_object ( /*_.VALDATA___V1878*/ meltfptr[1877], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:5710:/ 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_1711__COMPILOBJ_NREP_MATCH#0", NULL != ( /*_.CLASS_NREP_MATCH__V142*/ meltfptr[141])); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_MATCH__V142*/ meltfptr[141]); MELT_LOCATION ("warmelt-genobj.melt:5710:/ 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_1711__COMPILOBJ_NREP_MATCH#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:5710:/ 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_1711__COMPILOBJ_NREP_MATCH#2", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:5710:/ 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_1711__COMPILOBJ_NREP_MATCH#3", NULL != ( /*_.DISCR_STRBUF__V32*/ meltfptr[31])); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-genobj.melt:5710:/ 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_1711__COMPILOBJ_NREP_MATCH#4", NULL != ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-genobj.melt:5710:/ 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_1711__COMPILOBJ_NREP_MATCH#5", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:5710:/ 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___V548*/ meltfptr[547]); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V548*/ meltfptr[547]); MELT_LOCATION ("warmelt-genobj.melt:5710:/ 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___V582*/ meltfptr[581]); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V582*/ meltfptr[581]); MELT_LOCATION ("warmelt-genobj.melt:5710:/ 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_1711__COMPILOBJ_NREP_MATCH#8", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:5710:/ 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___V568*/ meltfptr[567]); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V568*/ meltfptr[567]); MELT_LOCATION ("warmelt-genobj.melt:5710:/ 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___V1860*/ meltfptr[1859]); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V1860*/ meltfptr[1859]); MELT_LOCATION ("warmelt-genobj.melt:5710:/ 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_1711__COMPILOBJ_NREP_MATCH#11", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[11] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:5710:/ 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_1711__COMPILOBJ_NREP_MATCH#12", NULL != ( /*_.CLASS_NORMTESTER_ANY__V141*/ meltfptr[140])); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANY__V141*/ meltfptr[140]); MELT_LOCATION ("warmelt-genobj.melt:5710:/ 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_1711__COMPILOBJ_NREP_MATCH#13", NULL != ( /*_.CLASS_NORMTESTER_ANYTESTER__V143*/ meltfptr[142])); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[13] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANYTESTER__V143*/ meltfptr[142]); MELT_LOCATION ("warmelt-genobj.melt:6148:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1882*/ meltfptr[1881])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1785__NORMTESTER_LABELINSTR#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1882*/ meltfptr[1881])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:6148:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1882*/ meltfptr[1881])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1785__NORMTESTER_LABELINSTR#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1882*/ meltfptr[1881])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:6148:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1882*/ meltfptr[1881])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1785__NORMTESTER_LABELINSTR#2", NULL != ( /*_.CLASS_NORMTESTER_ANY__V141*/ meltfptr[140])); ((meltroutine_ptr_t) /*_.VALROUT___V1882*/ meltfptr[1881])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANY__V141*/ meltfptr[140]); MELT_LOCATION ("warmelt-genobj.melt:6148:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1882*/ meltfptr[1881])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1785__NORMTESTER_LABELINSTR#3", NULL != ( /*_.CLASS_NREP_MATCH__V142*/ meltfptr[141])); ((meltroutine_ptr_t) /*_.VALROUT___V1882*/ meltfptr[1881])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NREP_MATCH__V142*/ meltfptr[141]); MELT_LOCATION ("warmelt-genobj.melt:6148:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1882*/ meltfptr[1881])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V568*/ meltfptr[567]); ((meltroutine_ptr_t) /*_.VALROUT___V1882*/ meltfptr[1881])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V568*/ meltfptr[567]); MELT_LOCATION ("warmelt-genobj.melt:6148:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1882*/ meltfptr[1881]); /*putclosurout#110 */ melt_assertmsg ("putclosrout#110 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1881*/ meltfptr[1880])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#110 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1882*/ meltfptr[1881])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1881*/ meltfptr[1880])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1882*/ meltfptr[1881]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1881*/ meltfptr[1880]); MELT_LOCATION ("warmelt-genobj.melt:5710:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1880*/ meltfptr[1879])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1881*/ meltfptr[1880]); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[14] = (melt_ptr_t) ( /*_.VALCLO___V1881*/ meltfptr[1880]); MELT_LOCATION ("warmelt-genobj.melt:5710:/ 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___V1856*/ meltfptr[1855]); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[15] = (melt_ptr_t) ( /*_.VALDATA___V1856*/ meltfptr[1855]); MELT_LOCATION ("warmelt-genobj.melt:5710:/ 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_1711__COMPILOBJ_NREP_MATCH#16", NULL != ( /*_.LIST_APPEND2LIST__V16*/ meltfptr[15])); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[16] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V16*/ meltfptr[15]); MELT_LOCATION ("warmelt-genobj.melt:5710:/ 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_1711__COMPILOBJ_NREP_MATCH#17", NULL != ( /*_.CLASS_NORMTESTER_SUCCESS__V144*/ meltfptr[143])); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[17] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_SUCCESS__V144*/ meltfptr[143]); MELT_LOCATION ("warmelt-genobj.melt:5710:/ 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_1711__COMPILOBJ_NREP_MATCH#18", NULL != ( /*_.MAPOBJECT_EVERY__V145*/ meltfptr[144])); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[18] = (melt_ptr_t) ( /*_.MAPOBJECT_EVERY__V145*/ meltfptr[144]); MELT_LOCATION ("warmelt-genobj.melt:5710:/ 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_1711__COMPILOBJ_NREP_MATCH#19", NULL != ( /*_.LIST_FIND__V146*/ meltfptr[145])); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[19] = (melt_ptr_t) ( /*_.LIST_FIND__V146*/ meltfptr[145]); MELT_LOCATION ("warmelt-genobj.melt:5843:/ 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_1721__LAMBDA_#0", NULL != ( /*_.LIST_FIND__V146*/ meltfptr[145])); ((meltroutine_ptr_t) /*_.VALROUT___V1883*/ meltfptr[1882])->tabval[0] = (melt_ptr_t) ( /*_.LIST_FIND__V146*/ meltfptr[145]); MELT_LOCATION ("warmelt-genobj.melt:5843:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1883*/ meltfptr[1882]); MELT_LOCATION ("warmelt-genobj.melt:5710:/ 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_1711__COMPILOBJ_NREP_MATCH#20", NULL != ( /*_.VALROUT___V1883*/ meltfptr[1882])); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[20] = (melt_ptr_t) ( /*_.VALROUT___V1883*/ meltfptr[1882]); MELT_LOCATION ("warmelt-genobj.melt:5710:/ 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_1711__COMPILOBJ_NREP_MATCH#21", NULL != ( /*_.LIST_FIND__V146*/ meltfptr[145])); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[21] = (melt_ptr_t) ( /*_.LIST_FIND__V146*/ meltfptr[145]); MELT_LOCATION ("warmelt-genobj.melt:5710:/ 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___V190*/ meltfptr[189]); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[22] = (melt_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189]); MELT_LOCATION ("warmelt-genobj.melt:5710:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1880*/ meltfptr[1879])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1402*/ meltfptr[1401]); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[23] = (melt_ptr_t) ( /*_.VALCLO___V1402*/ meltfptr[1401]); MELT_LOCATION ("warmelt-genobj.melt:5710:/ 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_1711__COMPILOBJ_NREP_MATCH#24", NULL != ( /*_.LIST_TO_MULTIPLE__V17*/ meltfptr[16])); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[24] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V17*/ meltfptr[16]); MELT_LOCATION ("warmelt-genobj.melt:5710:/ 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_1711__COMPILOBJ_NREP_MATCH#25", NULL != ( /*_.DISCR_MULTIPLE__V18*/ meltfptr[17])); ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[25] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V18*/ meltfptr[17]); MELT_LOCATION ("warmelt-genobj.melt:5710:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1880*/ meltfptr[1879]); /*putclosurout#111 */ melt_assertmsg ("putclosrout#111 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1884*/ meltfptr[1883])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#111 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1880*/ meltfptr[1879])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1884*/ meltfptr[1883])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1880*/ meltfptr[1879]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1884*/ meltfptr[1883]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1885*/ meltfptr[1884])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1885*/ meltfptr[1884])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1885*/ meltfptr[1884]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1886*/ meltfptr[1885]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1885*/ meltfptr[1884]); melt_dbgtrace_written_object ( /*_.VALDATA___V1885*/ meltfptr[1884], "new static instance"); /*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"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1893*/ meltfptr[1892])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1893*/ meltfptr[1892])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1893*/ meltfptr[1892]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1894*/ meltfptr[1893]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1893*/ meltfptr[1892]); melt_dbgtrace_written_object ( /*_.VALDATA___V1893*/ meltfptr[1892], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1895*/ meltfptr[1894])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1895*/ meltfptr[1894])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1895*/ meltfptr[1894]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1896*/ meltfptr[1895]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1895*/ meltfptr[1894]); melt_dbgtrace_written_object ( /*_.VALDATA___V1895*/ meltfptr[1894], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1897*/ meltfptr[1896])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1897*/ meltfptr[1896])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1897*/ meltfptr[1896]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1898*/ meltfptr[1897]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1897*/ meltfptr[1896]); melt_dbgtrace_written_object ( /*_.VALDATA___V1897*/ meltfptr[1896], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1899*/ meltfptr[1898])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1899*/ meltfptr[1898])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1899*/ meltfptr[1898]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1900*/ meltfptr[1899]); MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1899*/ meltfptr[1898])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1899*/ meltfptr[1898])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1899*/ meltfptr[1898]))-> obj_vartab[4] = (melt_ptr_t) ( /*_.CLASS_ROOT__V147*/ meltfptr[146]); /*putupl#692 */ melt_assertmsg ("putupl #692 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1901*/ meltfptr[1900])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #692 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1901*/ meltfptr[1900])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1901*/ meltfptr[1900]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V147*/ meltfptr[146]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1901*/ meltfptr[1900]); MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1899*/ meltfptr[1898])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1899*/ meltfptr[1898])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1899*/ meltfptr[1898]))-> obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1901*/ meltfptr[1900]); MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1902*/ meltfptr[1901])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1902*/ meltfptr[1901])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1902*/ meltfptr[1901]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1903*/ meltfptr[1902]); MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1902*/ meltfptr[1901])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1902*/ meltfptr[1901])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1902*/ meltfptr[1901]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1899*/ meltfptr[1898]); MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1902*/ meltfptr[1901]); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_37 */ void meltmod__warmelt_genobj__initialmeltchunk_38 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1902*/ meltfptr[1901], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^putslot */ /*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]); MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1904*/ meltfptr[1903])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1904*/ meltfptr[1903])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1904*/ meltfptr[1903]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1899*/ meltfptr[1898]); MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1904*/ meltfptr[1903]); MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1904*/ meltfptr[1903], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1906*/ meltfptr[1905])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1906*/ meltfptr[1905])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1906*/ meltfptr[1905]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1907*/ meltfptr[1906]); MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1906*/ meltfptr[1905])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1906*/ meltfptr[1905])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1906*/ meltfptr[1905]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1899*/ meltfptr[1898]); MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1906*/ meltfptr[1905]); MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1906*/ meltfptr[1905], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1908*/ meltfptr[1907])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1908*/ meltfptr[1907])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1908*/ meltfptr[1907]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1909*/ meltfptr[1908]); MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1908*/ meltfptr[1907])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1908*/ meltfptr[1907])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1908*/ meltfptr[1907]))-> obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1899*/ meltfptr[1898]); MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1908*/ meltfptr[1907]); MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1908*/ meltfptr[1907], "new static instance"); /*putupl#693 */ melt_assertmsg ("putupl #693 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1910*/ meltfptr[1909])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #693 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1910*/ meltfptr[1909])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1910*/ meltfptr[1909]))->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V1902*/ meltfptr[1901]); /*putupl#694 */ melt_assertmsg ("putupl #694 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1910*/ meltfptr[1909])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #694 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1910*/ meltfptr[1909])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1910*/ meltfptr[1909]))->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1904*/ meltfptr[1903]); /*putupl#695 */ melt_assertmsg ("putupl #695 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1910*/ meltfptr[1909])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #695 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1910*/ meltfptr[1909])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1910*/ meltfptr[1909]))->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1906*/ meltfptr[1905]); /*putupl#696 */ melt_assertmsg ("putupl #696 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.VALTUP___V1910*/ meltfptr[1909])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #696 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) ( /*_.VALTUP___V1910*/ meltfptr[1909])))); ((meltmultiple_ptr_t) ( /*_.VALTUP___V1910*/ meltfptr[1909]))->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1908*/ meltfptr[1907]); /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1910*/ meltfptr[1909]); MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1899*/ meltfptr[1898])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1899*/ meltfptr[1898])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1899*/ meltfptr[1898]))-> obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1910*/ meltfptr[1909]); MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1899*/ meltfptr[1898]); MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^touchobj */ melt_dbgtrace_written_object ( /*_.VALDATA___V1899*/ meltfptr[1898], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1911*/ meltfptr[1910])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1911*/ meltfptr[1910])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1911*/ meltfptr[1910]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1912*/ meltfptr[1911]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1911*/ meltfptr[1910]); melt_dbgtrace_written_object ( /*_.VALDATA___V1911*/ meltfptr[1910], "new static instance"); /*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"); /*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"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1917*/ meltfptr[1916])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1917*/ meltfptr[1916])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1917*/ meltfptr[1916]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1918*/ meltfptr[1917]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1917*/ meltfptr[1916]); melt_dbgtrace_written_object ( /*_.VALDATA___V1917*/ meltfptr[1916], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:5919:/ 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__COMPILOBJ_NREP_ALTMATCH#0", NULL != ( /*_.CLASS_NREP_ALTMATCH__V148*/ meltfptr[147])); ((meltroutine_ptr_t) /*_.VALROUT___V1919*/ meltfptr[1918])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_ALTMATCH__V148*/ meltfptr[147]); MELT_LOCATION ("warmelt-genobj.melt:5919:/ 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__COMPILOBJ_NREP_ALTMATCH#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1919*/ meltfptr[1918])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:5919:/ 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__COMPILOBJ_NREP_ALTMATCH#2", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1919*/ meltfptr[1918])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:5919:/ 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___V558*/ meltfptr[557]); ((meltroutine_ptr_t) /*_.VALROUT___V1919*/ meltfptr[1918])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V558*/ meltfptr[557]); MELT_LOCATION ("warmelt-genobj.melt:5919:/ 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__COMPILOBJ_NREP_ALTMATCH#4", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1919*/ meltfptr[1918])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:5919:/ 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__COMPILOBJ_NREP_ALTMATCH#5", NULL != ( /*_.DISCR_MAP_OBJECTS__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V1919*/ meltfptr[1918])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-genobj.melt:5919:/ 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___V1899*/ meltfptr[1898]); ((meltroutine_ptr_t) /*_.VALROUT___V1919*/ meltfptr[1918])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1899*/ meltfptr[1898]); MELT_LOCATION ("warmelt-genobj.melt:5919:/ 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__COMPILOBJ_NREP_ALTMATCH#7", NULL != ( /*_.CLASS_NREP_SYMOCC__V96*/ meltfptr[95])); ((meltroutine_ptr_t) /*_.VALROUT___V1919*/ meltfptr[1918])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_NREP_SYMOCC__V96*/ meltfptr[95]); MELT_LOCATION ("warmelt-genobj.melt:5919:/ 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___V1269*/ meltfptr[1268]); ((meltroutine_ptr_t) /*_.VALROUT___V1919*/ meltfptr[1918])->tabval[8] = (melt_ptr_t) ( /*_.VALCLO___V1269*/ meltfptr[1268]); MELT_LOCATION ("warmelt-genobj.melt:5919:/ 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___V494*/ meltfptr[493]); ((meltroutine_ptr_t) /*_.VALROUT___V1919*/ meltfptr[1918])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493]); MELT_LOCATION ("warmelt-genobj.melt:5919:/ 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__COMPILOBJ_NREP_ALTMATCH#10", NULL != ( /*_.MULTIPLE_MAP__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V1919*/ meltfptr[1918])->tabval[10] = (melt_ptr_t) ( /*_.MULTIPLE_MAP__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-genobj.melt:5919:/ 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__COMPILOBJ_NREP_ALTMATCH#11", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1919*/ meltfptr[1918])->tabval[11] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:5919:/ 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__COMPILOBJ_NREP_ALTMATCH#12", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1919*/ meltfptr[1918])->tabval[12] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:5962:/ 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_1752__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1920*/ meltfptr[1919])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:5962:/ 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_1752__LAMBDA_#1", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1920*/ meltfptr[1919])->tabval[1] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:5962:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1920*/ meltfptr[1919]); MELT_LOCATION ("warmelt-genobj.melt:5919:/ 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__COMPILOBJ_NREP_ALTMATCH#13", NULL != ( /*_.VALROUT___V1920*/ meltfptr[1919])); ((meltroutine_ptr_t) /*_.VALROUT___V1919*/ meltfptr[1918])->tabval[13] = (melt_ptr_t) ( /*_.VALROUT___V1920*/ meltfptr[1919]); MELT_LOCATION ("warmelt-genobj.melt:5919:/ 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__COMPILOBJ_NREP_ALTMATCH#14", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1919*/ meltfptr[1918])->tabval[14] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:5919:/ 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___V1402*/ meltfptr[1401]); ((meltroutine_ptr_t) /*_.VALROUT___V1919*/ meltfptr[1918])->tabval[15] = (melt_ptr_t) ( /*_.VALCLO___V1402*/ meltfptr[1401]); MELT_LOCATION ("warmelt-genobj.melt:5919:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1919*/ meltfptr[1918]); /*putclosurout#112 */ melt_assertmsg ("putclosrout#112 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1921*/ meltfptr[1920])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#112 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]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1922*/ meltfptr[1921])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1922*/ meltfptr[1921])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1922*/ meltfptr[1921]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1923*/ meltfptr[1922]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1922*/ meltfptr[1921]); melt_dbgtrace_written_object ( /*_.VALDATA___V1922*/ meltfptr[1921], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:5992:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1924*/ meltfptr[1923])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1753__COMPILOBJ_NREP_MATCHLABEL#0", NULL != ( /*_.CLASS_NREP_MATCH_LABEL__V149*/ meltfptr[148])); ((meltroutine_ptr_t) /*_.VALROUT___V1924*/ meltfptr[1923])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_MATCH_LABEL__V149*/ meltfptr[148]); MELT_LOCATION ("warmelt-genobj.melt:5992:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1924*/ meltfptr[1923])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1753__COMPILOBJ_NREP_MATCHLABEL#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1924*/ meltfptr[1923])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:5992:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1924*/ meltfptr[1923])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1753__COMPILOBJ_NREP_MATCHLABEL#2", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1924*/ meltfptr[1923])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:5992:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1924*/ meltfptr[1923])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1753__COMPILOBJ_NREP_MATCHLABEL#3", NULL != ( /*_.CLASS_NREP__V22*/ meltfptr[21])); ((meltroutine_ptr_t) /*_.VALROUT___V1924*/ meltfptr[1923])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NREP__V22*/ meltfptr[21]); MELT_LOCATION ("warmelt-genobj.melt:5992:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1924*/ meltfptr[1923])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1753__COMPILOBJ_NREP_MATCHLABEL#4", NULL != ( /*_.CLASS_MATCH_STEP_WITH_DATA__V150*/ meltfptr[149])); ((meltroutine_ptr_t) /*_.VALROUT___V1924*/ meltfptr[1923])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_MATCH_STEP_WITH_DATA__V150*/ meltfptr[149]); MELT_LOCATION ("warmelt-genobj.melt:5992:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1924*/ meltfptr[1923])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1151*/ meltfptr[1150]); ((meltroutine_ptr_t) /*_.VALROUT___V1924*/ meltfptr[1923])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1151*/ meltfptr[1150]); MELT_LOCATION ("warmelt-genobj.melt:5992:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1924*/ meltfptr[1923])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1753__COMPILOBJ_NREP_MATCHLABEL#6", NULL != ( /*_.CTYPE_VOID__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1924*/ meltfptr[1923])->tabval[6] = (melt_ptr_t) ( /*_.CTYPE_VOID__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-genobj.melt:5992:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1924*/ meltfptr[1923]); /*putclosurout#113 */ melt_assertmsg ("putclosrout#113 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1925*/ meltfptr[1924])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#113 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1924*/ meltfptr[1923])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1925*/ meltfptr[1924])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1924*/ meltfptr[1923]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1925*/ meltfptr[1924]); /*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"); MELT_LOCATION ("warmelt-genobj.melt:6019:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1930*/ meltfptr[1929])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1759__COMPILOBJ_NREP_MATCHFLAG#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1930*/ meltfptr[1929])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:6019:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1930*/ meltfptr[1929])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1759__COMPILOBJ_NREP_MATCHFLAG#1", NULL != ( /*_.CLASS_NREP_MATCH_FLAG__V151*/ meltfptr[150])); ((meltroutine_ptr_t) /*_.VALROUT___V1930*/ meltfptr[1929])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_MATCH_FLAG__V151*/ meltfptr[150]); MELT_LOCATION ("warmelt-genobj.melt:6019:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1930*/ meltfptr[1929])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1759__COMPILOBJ_NREP_MATCHFLAG#2", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1930*/ meltfptr[1929])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:6019:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1930*/ meltfptr[1929])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1899*/ meltfptr[1898]); ((meltroutine_ptr_t) /*_.VALROUT___V1930*/ meltfptr[1929])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1899*/ meltfptr[1898]); MELT_LOCATION ("warmelt-genobj.melt:6019:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1930*/ meltfptr[1929])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V382*/ meltfptr[381]); ((meltroutine_ptr_t) /*_.VALROUT___V1930*/ meltfptr[1929])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V382*/ meltfptr[381]); MELT_LOCATION ("warmelt-genobj.melt:6019:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1930*/ meltfptr[1929])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1759__COMPILOBJ_NREP_MATCHFLAG#5", NULL != ( /*_.CTYPE_LONG__V43*/ meltfptr[42])); ((meltroutine_ptr_t) /*_.VALROUT___V1930*/ meltfptr[1929])->tabval[5] = (melt_ptr_t) ( /*_.CTYPE_LONG__V43*/ meltfptr[42]); MELT_LOCATION ("warmelt-genobj.melt:6019:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1930*/ meltfptr[1929])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1759__COMPILOBJ_NREP_MATCHFLAG#6", NULL != ( /*_.CLASS_MATCH_FLAG__V152*/ meltfptr[151])); ((meltroutine_ptr_t) /*_.VALROUT___V1930*/ meltfptr[1929])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_MATCH_FLAG__V152*/ meltfptr[151]); MELT_LOCATION ("warmelt-genobj.melt:6019:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1930*/ meltfptr[1929]); /*putclosurout#114 */ melt_assertmsg ("putclosrout#114 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1931*/ meltfptr[1930])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#114 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1930*/ meltfptr[1929])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1931*/ meltfptr[1930])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1930*/ meltfptr[1929]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1931*/ meltfptr[1930]); /*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"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1934*/ meltfptr[1933])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1934*/ meltfptr[1933])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1934*/ meltfptr[1933]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1935*/ meltfptr[1934]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1934*/ meltfptr[1933]); melt_dbgtrace_written_object ( /*_.VALDATA___V1934*/ meltfptr[1933], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:6052:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1936*/ meltfptr[1935])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1765__COMPILOBJ_NREP_MATCHDATAINIT#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1936*/ meltfptr[1935])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:6052:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1936*/ meltfptr[1935])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1765__COMPILOBJ_NREP_MATCHDATAINIT#1", NULL != ( /*_.CLASS_NREP_MATCH_DATA_INITIALIZER__V153*/ meltfptr[152])); ((meltroutine_ptr_t) /*_.VALROUT___V1936*/ meltfptr[1935])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_MATCH_DATA_INITIALIZER__V153*/ meltfptr[152]); MELT_LOCATION ("warmelt-genobj.melt:6052:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1936*/ meltfptr[1935])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1765__COMPILOBJ_NREP_MATCHDATAINIT#2", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1936*/ meltfptr[1935])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:6052:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1936*/ meltfptr[1935])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1765__COMPILOBJ_NREP_MATCHDATAINIT#3", NULL != ( /*_.CLASS_NREP_MATCH_DATA_ACTION__V154*/ meltfptr[153])); ((meltroutine_ptr_t) /*_.VALROUT___V1936*/ meltfptr[1935])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NREP_MATCH_DATA_ACTION__V154*/ meltfptr[153]); MELT_LOCATION ("warmelt-genobj.melt:6052:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1936*/ meltfptr[1935])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1765__COMPILOBJ_NREP_MATCHDATAINIT#4", NULL != ( /*_.CLASS_NREP_MATCHED_DATA__V155*/ meltfptr[154])); ((meltroutine_ptr_t) /*_.VALROUT___V1936*/ meltfptr[1935])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_NREP_MATCHED_DATA__V155*/ meltfptr[154]); MELT_LOCATION ("warmelt-genobj.melt:6052:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1936*/ meltfptr[1935])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1765__COMPILOBJ_NREP_MATCHDATAINIT#5", NULL != ( /*_.CLONE_SYMBOL__V156*/ meltfptr[155])); ((meltroutine_ptr_t) /*_.VALROUT___V1936*/ meltfptr[1935])->tabval[5] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V156*/ meltfptr[155]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1937*/ meltfptr[1936])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1937*/ meltfptr[1936])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1937*/ meltfptr[1936]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1938*/ meltfptr[1937]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1937*/ meltfptr[1936]); melt_dbgtrace_written_object ( /*_.VALDATA___V1937*/ meltfptr[1936], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:6052:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1936*/ meltfptr[1935])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1765__COMPILOBJ_NREP_MATCHDATAINIT#6", NULL != ( /*_.VALDATA___V1937*/ meltfptr[1936])); ((meltroutine_ptr_t) /*_.VALROUT___V1936*/ meltfptr[1935])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1937*/ meltfptr[1936]); MELT_LOCATION ("warmelt-genobj.melt:6052:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1936*/ meltfptr[1935])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1765__COMPILOBJ_NREP_MATCHDATAINIT#7", NULL != ( /*_.CLASS_MATCHED_DATA__V157*/ meltfptr[156])); ((meltroutine_ptr_t) /*_.VALROUT___V1936*/ meltfptr[1935])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_MATCHED_DATA__V157*/ meltfptr[156]); MELT_LOCATION ("warmelt-genobj.melt:6052:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1936*/ meltfptr[1935])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1269*/ meltfptr[1268]); ((meltroutine_ptr_t) /*_.VALROUT___V1936*/ meltfptr[1935])->tabval[8] = (melt_ptr_t) ( /*_.VALCLO___V1269*/ meltfptr[1268]); MELT_LOCATION ("warmelt-genobj.melt:6052:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1936*/ meltfptr[1935])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1899*/ meltfptr[1898]); ((meltroutine_ptr_t) /*_.VALROUT___V1936*/ meltfptr[1935])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V1899*/ meltfptr[1898]); MELT_LOCATION ("warmelt-genobj.melt:6052:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1936*/ meltfptr[1935])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V494*/ meltfptr[493]); ((meltroutine_ptr_t) /*_.VALROUT___V1936*/ meltfptr[1935])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493]); MELT_LOCATION ("warmelt-genobj.melt:6052:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1936*/ meltfptr[1935]); /*putclosurout#115 */ melt_assertmsg ("putclosrout#115 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1939*/ meltfptr[1938])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#115 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1936*/ meltfptr[1935])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1939*/ meltfptr[1938])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1936*/ meltfptr[1935]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1939*/ meltfptr[1938]); /*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-genobj.melt:6093:/ 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__COMPILOBJ_NREP_MATCHEDATA#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:6093:/ 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__COMPILOBJ_NREP_MATCHEDATA#1", NULL != ( /*_.CLASS_NREP_MATCHED_DATA__V155*/ meltfptr[154])); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_MATCHED_DATA__V155*/ meltfptr[154]); MELT_LOCATION ("warmelt-genobj.melt:6093:/ 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__COMPILOBJ_NREP_MATCHEDATA#2", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:6093:/ 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___V1899*/ meltfptr[1898]); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1899*/ meltfptr[1898]); MELT_LOCATION ("warmelt-genobj.melt:6093:/ 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___V174*/ meltfptr[173]); ((meltroutine_ptr_t) /*_.VALROUT___V1950*/ meltfptr[1949])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173]); MELT_LOCATION ("warmelt-genobj.melt:6093:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1950*/ meltfptr[1949]); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_38 */ void meltmod__warmelt_genobj__initialmeltchunk_39 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*putclosurout#116*/ melt_assertmsg ("putclosrout#116 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1951*/ meltfptr[1950])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#116 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1951*/ meltfptr[1950])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1950*/ meltfptr[1949]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1951*/ meltfptr[1950]); MELT_LOCATION ("warmelt-genobj.melt:6119:/ 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_1781__COMPILOBJ_NREP_MATCHJUMP#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1952*/ meltfptr[1951])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:6119:/ 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_1781__COMPILOBJ_NREP_MATCHJUMP#1", NULL != ( /*_.CLASS_NREP_MATCH_JUMP__V158*/ meltfptr[157])); ((meltroutine_ptr_t) /*_.VALROUT___V1952*/ meltfptr[1951])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_MATCH_JUMP__V158*/ meltfptr[157]); MELT_LOCATION ("warmelt-genobj.melt:6119:/ 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_1781__COMPILOBJ_NREP_MATCHJUMP#2", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1952*/ meltfptr[1951])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:6119:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1952*/ meltfptr[1951])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1151*/ meltfptr[1150]); ((meltroutine_ptr_t) /*_.VALROUT___V1952*/ meltfptr[1951])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V1151*/ meltfptr[1150]); MELT_LOCATION ("warmelt-genobj.melt:6119:/ 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_1781__COMPILOBJ_NREP_MATCHJUMP#4", NULL != ( /*_.CTYPE_VOID__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1952*/ meltfptr[1951])->tabval[4] = (melt_ptr_t) ( /*_.CTYPE_VOID__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-genobj.melt:6119:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1952*/ meltfptr[1951]); /*putclosurout#117 */ melt_assertmsg ("putclosrout#117 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1953*/ meltfptr[1952])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#117 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1952*/ meltfptr[1951])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1953*/ meltfptr[1952])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1952*/ meltfptr[1951]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1953*/ meltfptr[1952]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1954*/ meltfptr[1953])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1954*/ meltfptr[1953])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1954*/ meltfptr[1953]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1955*/ meltfptr[1954]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1954*/ meltfptr[1953]); melt_dbgtrace_written_object ( /*_.VALDATA___V1954*/ meltfptr[1953], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:6180:/ 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_1787__NORMTESTER_GOTOINSTR#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1956*/ meltfptr[1955])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:6180:/ 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_1787__NORMTESTER_GOTOINSTR#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1956*/ meltfptr[1955])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:6180:/ 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_1787__NORMTESTER_GOTOINSTR#2", NULL != ( /*_.CLASS_NORMTESTER_ANY__V141*/ meltfptr[140])); ((meltroutine_ptr_t) /*_.VALROUT___V1956*/ meltfptr[1955])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANY__V141*/ meltfptr[140]); MELT_LOCATION ("warmelt-genobj.melt:6180:/ 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_1787__NORMTESTER_GOTOINSTR#3", NULL != ( /*_.CLASS_NREP_MATCH__V142*/ meltfptr[141])); ((meltroutine_ptr_t) /*_.VALROUT___V1956*/ meltfptr[1955])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NREP_MATCH__V142*/ meltfptr[141]); MELT_LOCATION ("warmelt-genobj.melt:6180:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1956*/ meltfptr[1955])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V582*/ meltfptr[581]); ((meltroutine_ptr_t) /*_.VALROUT___V1956*/ meltfptr[1955])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V582*/ meltfptr[581]); MELT_LOCATION ("warmelt-genobj.melt:6180:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1956*/ meltfptr[1955]); /*putclosurout#118 */ melt_assertmsg ("putclosrout#118 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1957*/ meltfptr[1956])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#118 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1956*/ meltfptr[1955])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1957*/ meltfptr[1956])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1956*/ meltfptr[1955]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1957*/ meltfptr[1956]); MELT_LOCATION ("warmelt-genobj.melt:6213:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1958*/ meltfptr[1957])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1789__ENDMATCH_GOTOINSTR#0", NULL != ( /*_.CLASS_NREP_MATCH__V142*/ meltfptr[141])); ((meltroutine_ptr_t) /*_.VALROUT___V1958*/ meltfptr[1957])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_MATCH__V142*/ meltfptr[141]); MELT_LOCATION ("warmelt-genobj.melt:6213:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1958*/ meltfptr[1957])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1789__ENDMATCH_GOTOINSTR#1", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1958*/ meltfptr[1957])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:6213:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1958*/ meltfptr[1957])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1789__ENDMATCH_GOTOINSTR#2", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1958*/ meltfptr[1957])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:6213:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1958*/ meltfptr[1957])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1789__ENDMATCH_GOTOINSTR#3", NULL != ( /*_.DISCR_STRBUF__V32*/ meltfptr[31])); ((meltroutine_ptr_t) /*_.VALROUT___V1958*/ meltfptr[1957])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-genobj.melt:6213:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1958*/ meltfptr[1957])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V582*/ meltfptr[581]); ((meltroutine_ptr_t) /*_.VALROUT___V1958*/ meltfptr[1957])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V582*/ meltfptr[581]); MELT_LOCATION ("warmelt-genobj.melt:6213:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1958*/ meltfptr[1957])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1789__ENDMATCH_GOTOINSTR#5", NULL != ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1958*/ meltfptr[1957])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-genobj.melt:6213:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1958*/ meltfptr[1957]); /*putclosurout#119 */ melt_assertmsg ("putclosrout#119 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1959*/ meltfptr[1958])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#119 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1958*/ meltfptr[1957])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1959*/ meltfptr[1958])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1958*/ meltfptr[1957]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1959*/ meltfptr[1958]); MELT_LOCATION ("warmelt-genobj.melt:6237:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1960*/ meltfptr[1959])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1791__TESTMATCH_GOTOINSTR#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1960*/ meltfptr[1959])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:6237:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1960*/ meltfptr[1959])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1791__TESTMATCH_GOTOINSTR#1", NULL != ( /*_.CLASS_NORMTESTER_ANY__V141*/ meltfptr[140])); ((meltroutine_ptr_t) /*_.VALROUT___V1960*/ meltfptr[1959])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANY__V141*/ meltfptr[140]); MELT_LOCATION ("warmelt-genobj.melt:6237:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1960*/ meltfptr[1959])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1791__TESTMATCH_GOTOINSTR#2", NULL != ( /*_.CLASS_NREP_MATCH__V142*/ meltfptr[141])); ((meltroutine_ptr_t) /*_.VALROUT___V1960*/ meltfptr[1959])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NREP_MATCH__V142*/ meltfptr[141]); MELT_LOCATION ("warmelt-genobj.melt:6237:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1960*/ meltfptr[1959])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1791__TESTMATCH_GOTOINSTR#3", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1960*/ meltfptr[1959])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:6237:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1960*/ meltfptr[1959])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1791__TESTMATCH_GOTOINSTR#4", NULL != ( /*_.DISCR_STRBUF__V32*/ meltfptr[31])); ((meltroutine_ptr_t) /*_.VALROUT___V1960*/ meltfptr[1959])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-genobj.melt:6237:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1960*/ meltfptr[1959])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V582*/ meltfptr[581]); ((meltroutine_ptr_t) /*_.VALROUT___V1960*/ meltfptr[1959])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V582*/ meltfptr[581]); MELT_LOCATION ("warmelt-genobj.melt:6237:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1960*/ meltfptr[1959])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1791__TESTMATCH_GOTOINSTR#6", NULL != ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1960*/ meltfptr[1959])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-genobj.melt:6237:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1960*/ meltfptr[1959]); /*putclosurout#120 */ melt_assertmsg ("putclosrout#120 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1961*/ meltfptr[1960])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#120 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1960*/ meltfptr[1959])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1961*/ meltfptr[1960])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1960*/ meltfptr[1959]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1961*/ meltfptr[1960]); MELT_LOCATION ("warmelt-genobj.melt:6263:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1962*/ meltfptr[1961])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1793__NORMTESTER_FREE_OBJLOC_LIST#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1962*/ meltfptr[1961])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:6263:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1962*/ meltfptr[1961])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1793__NORMTESTER_FREE_OBJLOC_LIST#1", NULL != ( /*_.CLASS_NORMTESTER_ANY__V141*/ meltfptr[140])); ((meltroutine_ptr_t) /*_.VALROUT___V1962*/ meltfptr[1961])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANY__V141*/ meltfptr[140]); MELT_LOCATION ("warmelt-genobj.melt:6263:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1962*/ meltfptr[1961])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1793__NORMTESTER_FREE_OBJLOC_LIST#2", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1962*/ meltfptr[1961])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:6263:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1962*/ meltfptr[1961])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1860*/ meltfptr[1859]); ((meltroutine_ptr_t) /*_.VALROUT___V1962*/ meltfptr[1961])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1860*/ meltfptr[1859]); MELT_LOCATION ("warmelt-genobj.melt:6263:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1962*/ meltfptr[1961])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1793__NORMTESTER_FREE_OBJLOC_LIST#4", NULL != ( /*_.LIST_MAP__V47*/ meltfptr[46])); ((meltroutine_ptr_t) /*_.VALROUT___V1962*/ meltfptr[1961])->tabval[4] = (melt_ptr_t) ( /*_.LIST_MAP__V47*/ meltfptr[46]); MELT_LOCATION ("warmelt-genobj.melt:6263:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1962*/ meltfptr[1961])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1793__NORMTESTER_FREE_OBJLOC_LIST#5", NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V72*/ meltfptr[71])); ((meltroutine_ptr_t) /*_.VALROUT___V1962*/ meltfptr[1961])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V72*/ meltfptr[71]); MELT_LOCATION ("warmelt-genobj.melt:6263:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1962*/ meltfptr[1961])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1269*/ meltfptr[1268]); ((meltroutine_ptr_t) /*_.VALROUT___V1962*/ meltfptr[1961])->tabval[6] = (melt_ptr_t) ( /*_.VALCLO___V1269*/ meltfptr[1268]); MELT_LOCATION ("warmelt-genobj.melt:6263:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1962*/ meltfptr[1961])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1793__NORMTESTER_FREE_OBJLOC_LIST#7", NULL != ( /*_.CLASS_NREP_SYMOCC__V96*/ meltfptr[95])); ((meltroutine_ptr_t) /*_.VALROUT___V1962*/ meltfptr[1961])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_NREP_SYMOCC__V96*/ meltfptr[95]); MELT_LOCATION ("warmelt-genobj.melt:6277:/ 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_1795__LAMBDA_#0", NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V72*/ meltfptr[71])); ((meltroutine_ptr_t) /*_.VALROUT___V1963*/ meltfptr[1962])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V72*/ meltfptr[71]); MELT_LOCATION ("warmelt-genobj.melt:6277:/ 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___V1269*/ meltfptr[1268]); ((meltroutine_ptr_t) /*_.VALROUT___V1963*/ meltfptr[1962])->tabval[1] = (melt_ptr_t) ( /*_.VALCLO___V1269*/ meltfptr[1268]); MELT_LOCATION ("warmelt-genobj.melt:6277:/ 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_1795__LAMBDA_#2", NULL != ( /*_.CLASS_NREP_SYMOCC__V96*/ meltfptr[95])); ((meltroutine_ptr_t) /*_.VALROUT___V1963*/ meltfptr[1962])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NREP_SYMOCC__V96*/ meltfptr[95]); MELT_LOCATION ("warmelt-genobj.melt:6277:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1963*/ meltfptr[1962]); MELT_LOCATION ("warmelt-genobj.melt:6263:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1962*/ meltfptr[1961])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1793__NORMTESTER_FREE_OBJLOC_LIST#8", NULL != ( /*_.VALROUT___V1963*/ meltfptr[1962])); ((meltroutine_ptr_t) /*_.VALROUT___V1962*/ meltfptr[1961])->tabval[8] = (melt_ptr_t) ( /*_.VALROUT___V1963*/ meltfptr[1962]); MELT_LOCATION ("warmelt-genobj.melt:6263:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1962*/ meltfptr[1961])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1793__NORMTESTER_FREE_OBJLOC_LIST#9", NULL != ( /*_.LIST_APPEND2LIST__V16*/ meltfptr[15])); ((meltroutine_ptr_t) /*_.VALROUT___V1962*/ meltfptr[1961])->tabval[9] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V16*/ meltfptr[15]); MELT_LOCATION ("warmelt-genobj.melt:6263:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1962*/ meltfptr[1961]); /*putclosurout#121 */ melt_assertmsg ("putclosrout#121 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1964*/ meltfptr[1963])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#121 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1962*/ meltfptr[1961])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1964*/ meltfptr[1963])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1962*/ meltfptr[1961]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1964*/ meltfptr[1963]); MELT_LOCATION ("warmelt-genobj.melt:6295:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1965*/ meltfptr[1964])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1796__COMPILTST_NORMTESTER_ANY#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1965*/ meltfptr[1964])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:6295:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1965*/ meltfptr[1964])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1796__COMPILTST_NORMTESTER_ANY#1", NULL != ( /*_.CLASS_NREP__V22*/ meltfptr[21])); ((meltroutine_ptr_t) /*_.VALROUT___V1965*/ meltfptr[1964])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP__V22*/ meltfptr[21]); MELT_LOCATION ("warmelt-genobj.melt:6295:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1965*/ meltfptr[1964])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1796__COMPILTST_NORMTESTER_ANY#2", NULL != ( /*_.CLASS_NAMED__V8*/ meltfptr[7])); ((meltroutine_ptr_t) /*_.VALROUT___V1965*/ meltfptr[1964])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-genobj.melt:6295:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1965*/ meltfptr[1964]); /*putclosurout#122 */ melt_assertmsg ("putclosrout#122 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1966*/ meltfptr[1965])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#122 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1965*/ meltfptr[1964])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1966*/ meltfptr[1965])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1965*/ meltfptr[1964]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1966*/ meltfptr[1965]); MELT_LOCATION ("warmelt-genobj.melt:6307:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1967*/ meltfptr[1966])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1798__COMPILTST_NORMTESTER_MATCHER#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1967*/ meltfptr[1966])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:6307:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1967*/ meltfptr[1966])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1798__COMPILTST_NORMTESTER_MATCHER#1", NULL != ( /*_.CLASS_NORMTESTER_MATCHER__V159*/ meltfptr[158])); ((meltroutine_ptr_t) /*_.VALROUT___V1967*/ meltfptr[1966])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_MATCHER__V159*/ meltfptr[158]); MELT_LOCATION ("warmelt-genobj.melt:6307:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1967*/ meltfptr[1966])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1798__COMPILTST_NORMTESTER_MATCHER#2", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1967*/ meltfptr[1966])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:6307:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1967*/ meltfptr[1966])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1860*/ meltfptr[1859]); ((meltroutine_ptr_t) /*_.VALROUT___V1967*/ meltfptr[1966])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1860*/ meltfptr[1859]); MELT_LOCATION ("warmelt-genobj.melt:6307:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1967*/ meltfptr[1966])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1957*/ meltfptr[1956]); ((meltroutine_ptr_t) /*_.VALROUT___V1967*/ meltfptr[1966])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V1957*/ meltfptr[1956]); MELT_LOCATION ("warmelt-genobj.melt:6307:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1967*/ meltfptr[1966])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1798__COMPILTST_NORMTESTER_MATCHER#5", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1967*/ meltfptr[1966])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:6307:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1967*/ meltfptr[1966])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1964*/ meltfptr[1963]); ((meltroutine_ptr_t) /*_.VALROUT___V1967*/ meltfptr[1966])->tabval[6] = (melt_ptr_t) ( /*_.VALCLO___V1964*/ meltfptr[1963]); MELT_LOCATION ("warmelt-genobj.melt:6307:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1967*/ meltfptr[1966])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1961*/ meltfptr[1960]); ((meltroutine_ptr_t) /*_.VALROUT___V1967*/ meltfptr[1966])->tabval[7] = (melt_ptr_t) ( /*_.VALCLO___V1961*/ meltfptr[1960]); MELT_LOCATION ("warmelt-genobj.melt:6307:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1967*/ meltfptr[1966])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1959*/ meltfptr[1958]); ((meltroutine_ptr_t) /*_.VALROUT___V1967*/ meltfptr[1966])->tabval[8] = (melt_ptr_t) ( /*_.VALCLO___V1959*/ meltfptr[1958]); MELT_LOCATION ("warmelt-genobj.melt:6307:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1967*/ meltfptr[1966])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V190*/ meltfptr[189]); ((meltroutine_ptr_t) /*_.VALROUT___V1967*/ meltfptr[1966])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189]); MELT_LOCATION ("warmelt-genobj.melt:6307:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1967*/ meltfptr[1966])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V494*/ meltfptr[493]); ((meltroutine_ptr_t) /*_.VALROUT___V1967*/ meltfptr[1966])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493]); MELT_LOCATION ("warmelt-genobj.melt:6307:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1967*/ meltfptr[1966])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1816*/ meltfptr[1815]); ((meltroutine_ptr_t) /*_.VALROUT___V1967*/ meltfptr[1966])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V1816*/ meltfptr[1815]); MELT_LOCATION ("warmelt-genobj.melt:6307:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1967*/ meltfptr[1966])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1798__COMPILTST_NORMTESTER_MATCHER#12", NULL != ( /*_.DISCR_INTEGER__V38*/ meltfptr[37])); ((meltroutine_ptr_t) /*_.VALROUT___V1967*/ meltfptr[1966])->tabval[12] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-genobj.melt:6307:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1967*/ meltfptr[1966])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1810*/ meltfptr[1809]); ((meltroutine_ptr_t) /*_.VALROUT___V1967*/ meltfptr[1966])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V1810*/ meltfptr[1809]); MELT_LOCATION ("warmelt-genobj.melt:6307:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1967*/ meltfptr[1966]); /*putclosurout#123 */ melt_assertmsg ("putclosrout#123 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1968*/ meltfptr[1967])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#123 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1967*/ meltfptr[1966])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1968*/ meltfptr[1967])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1967*/ meltfptr[1966]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1968*/ meltfptr[1967]); /*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"); MELT_LOCATION ("warmelt-genobj.melt:6380:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1971*/ meltfptr[1970])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1802__COMPILTST_NORMTESTER_INSTANCE#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1971*/ meltfptr[1970])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:6380:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1971*/ meltfptr[1970])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1802__COMPILTST_NORMTESTER_INSTANCE#1", NULL != ( /*_.CLASS_NORMTESTER_INSTANCE__V160*/ meltfptr[159])); ((meltroutine_ptr_t) /*_.VALROUT___V1971*/ meltfptr[1970])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_INSTANCE__V160*/ meltfptr[159]); MELT_LOCATION ("warmelt-genobj.melt:6380:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1971*/ meltfptr[1970])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1802__COMPILTST_NORMTESTER_INSTANCE#2", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1971*/ meltfptr[1970])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:6380:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1971*/ meltfptr[1970])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1860*/ meltfptr[1859]); ((meltroutine_ptr_t) /*_.VALROUT___V1971*/ meltfptr[1970])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1860*/ meltfptr[1859]); MELT_LOCATION ("warmelt-genobj.melt:6380:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1971*/ meltfptr[1970])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1802__COMPILTST_NORMTESTER_INSTANCE#4", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1971*/ meltfptr[1970])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:6380:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1971*/ meltfptr[1970])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1959*/ meltfptr[1958]); ((meltroutine_ptr_t) /*_.VALROUT___V1971*/ meltfptr[1970])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1959*/ meltfptr[1958]); MELT_LOCATION ("warmelt-genobj.melt:6380:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1971*/ meltfptr[1970])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1957*/ meltfptr[1956]); ((meltroutine_ptr_t) /*_.VALROUT___V1971*/ meltfptr[1970])->tabval[6] = (melt_ptr_t) ( /*_.VALCLO___V1957*/ meltfptr[1956]); MELT_LOCATION ("warmelt-genobj.melt:6380:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1971*/ meltfptr[1970])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1802__COMPILTST_NORMTESTER_INSTANCE#7", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1971*/ meltfptr[1970])->tabval[7] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:6380:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1971*/ meltfptr[1970])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1964*/ meltfptr[1963]); ((meltroutine_ptr_t) /*_.VALROUT___V1971*/ meltfptr[1970])->tabval[8] = (melt_ptr_t) ( /*_.VALCLO___V1964*/ meltfptr[1963]); MELT_LOCATION ("warmelt-genobj.melt:6380:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1971*/ meltfptr[1970])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V518*/ meltfptr[517]); ((meltroutine_ptr_t) /*_.VALROUT___V1971*/ meltfptr[1970])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V518*/ meltfptr[517]); MELT_LOCATION ("warmelt-genobj.melt:6380:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1971*/ meltfptr[1970])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1129*/ meltfptr[1128]); ((meltroutine_ptr_t) /*_.VALROUT___V1971*/ meltfptr[1970])->tabval[10] = (melt_ptr_t) ( /*_.VALCLO___V1129*/ meltfptr[1128]); MELT_LOCATION ("warmelt-genobj.melt:6380:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1971*/ meltfptr[1970])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1802__COMPILTST_NORMTESTER_INSTANCE#11", NULL != ( /*_.CTYPE_LONG__V43*/ meltfptr[42])); ((meltroutine_ptr_t) /*_.VALROUT___V1971*/ meltfptr[1970])->tabval[11] = (melt_ptr_t) ( /*_.CTYPE_LONG__V43*/ meltfptr[42]); MELT_LOCATION ("warmelt-genobj.melt:6380:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1971*/ meltfptr[1970])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V648*/ meltfptr[647]); ((meltroutine_ptr_t) /*_.VALROUT___V1971*/ meltfptr[1970])->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V648*/ meltfptr[647]); MELT_LOCATION ("warmelt-genobj.melt:6380:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1971*/ meltfptr[1970])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V190*/ meltfptr[189]); ((meltroutine_ptr_t) /*_.VALROUT___V1971*/ meltfptr[1970])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189]); MELT_LOCATION ("warmelt-genobj.melt:6380:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1971*/ meltfptr[1970])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V494*/ meltfptr[493]); ((meltroutine_ptr_t) /*_.VALROUT___V1971*/ meltfptr[1970])->tabval[14] = (melt_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493]); MELT_LOCATION ("warmelt-genobj.melt:6380:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1971*/ meltfptr[1970])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1802__COMPILTST_NORMTESTER_INSTANCE#15", NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V72*/ meltfptr[71])); ((meltroutine_ptr_t) /*_.VALROUT___V1971*/ meltfptr[1970])->tabval[15] = (melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V72*/ meltfptr[71]); MELT_LOCATION ("warmelt-genobj.melt:6380:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1971*/ meltfptr[1970])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1802__COMPILTST_NORMTESTER_INSTANCE#16", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V84*/ meltfptr[83])); ((meltroutine_ptr_t) /*_.VALROUT___V1971*/ meltfptr[1970])->tabval[16] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V84*/ meltfptr[83]); MELT_LOCATION ("warmelt-genobj.melt:6380:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1971*/ meltfptr[1970])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1802__COMPILTST_NORMTESTER_INSTANCE#17", NULL != ( /*_.CLASS_NREP_UNSAFE_GET_FIELD__V105*/ meltfptr[104])); ((meltroutine_ptr_t) /*_.VALROUT___V1971*/ meltfptr[1970])->tabval[17] = (melt_ptr_t) ( /*_.CLASS_NREP_UNSAFE_GET_FIELD__V105*/ meltfptr[104]); MELT_LOCATION ("warmelt-genobj.melt:6380:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1971*/ meltfptr[1970])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1171*/ meltfptr[1170]); ((meltroutine_ptr_t) /*_.VALROUT___V1971*/ meltfptr[1970])->tabval[18] = (melt_ptr_t) ( /*_.VALDATA___V1171*/ meltfptr[1170]); MELT_LOCATION ("warmelt-genobj.melt:6380:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1971*/ meltfptr[1970]); /*putclosurout#124 */ melt_assertmsg ("putclosrout#124 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1972*/ meltfptr[1971])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#124 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1971*/ meltfptr[1970])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1972*/ meltfptr[1971])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1971*/ meltfptr[1970]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1972*/ meltfptr[1971]); /*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"); MELT_LOCATION ("warmelt-genobj.melt:6480:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1975*/ meltfptr[1974])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1806__COMPILTST_NORMTESTER_TUPLE#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1975*/ meltfptr[1974])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:6480:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1975*/ meltfptr[1974])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1806__COMPILTST_NORMTESTER_TUPLE#1", NULL != ( /*_.CLASS_NORMTESTER_TUPLE__V161*/ meltfptr[160])); ((meltroutine_ptr_t) /*_.VALROUT___V1975*/ meltfptr[1974])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_TUPLE__V161*/ meltfptr[160]); MELT_LOCATION ("warmelt-genobj.melt:6480:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1975*/ meltfptr[1974])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1806__COMPILTST_NORMTESTER_TUPLE#2", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1975*/ meltfptr[1974])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:6480:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1975*/ meltfptr[1974])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1860*/ meltfptr[1859]); ((meltroutine_ptr_t) /*_.VALROUT___V1975*/ meltfptr[1974])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1860*/ meltfptr[1859]); MELT_LOCATION ("warmelt-genobj.melt:6480:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1975*/ meltfptr[1974])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1806__COMPILTST_NORMTESTER_TUPLE#4", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1975*/ meltfptr[1974])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:6480:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1975*/ meltfptr[1974])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1959*/ meltfptr[1958]); ((meltroutine_ptr_t) /*_.VALROUT___V1975*/ meltfptr[1974])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1959*/ meltfptr[1958]); MELT_LOCATION ("warmelt-genobj.melt:6480:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1975*/ meltfptr[1974])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1957*/ meltfptr[1956]); ((meltroutine_ptr_t) /*_.VALROUT___V1975*/ meltfptr[1974])->tabval[6] = (melt_ptr_t) ( /*_.VALCLO___V1957*/ meltfptr[1956]); MELT_LOCATION ("warmelt-genobj.melt:6480:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1975*/ meltfptr[1974])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1806__COMPILTST_NORMTESTER_TUPLE#7", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1975*/ meltfptr[1974])->tabval[7] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:6480:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1975*/ meltfptr[1974])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1964*/ meltfptr[1963]); ((meltroutine_ptr_t) /*_.VALROUT___V1975*/ meltfptr[1974])->tabval[8] = (melt_ptr_t) ( /*_.VALCLO___V1964*/ meltfptr[1963]); MELT_LOCATION ("warmelt-genobj.melt:6480:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1975*/ meltfptr[1974])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V518*/ meltfptr[517]); ((meltroutine_ptr_t) /*_.VALROUT___V1975*/ meltfptr[1974])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V518*/ meltfptr[517]); MELT_LOCATION ("warmelt-genobj.melt:6480:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1975*/ meltfptr[1974])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1129*/ meltfptr[1128]); ((meltroutine_ptr_t) /*_.VALROUT___V1975*/ meltfptr[1974])->tabval[10] = (melt_ptr_t) ( /*_.VALCLO___V1129*/ meltfptr[1128]); MELT_LOCATION ("warmelt-genobj.melt:6480:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1975*/ meltfptr[1974])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1806__COMPILTST_NORMTESTER_TUPLE#11", NULL != ( /*_.CTYPE_LONG__V43*/ meltfptr[42])); ((meltroutine_ptr_t) /*_.VALROUT___V1975*/ meltfptr[1974])->tabval[11] = (melt_ptr_t) ( /*_.CTYPE_LONG__V43*/ meltfptr[42]); MELT_LOCATION ("warmelt-genobj.melt:6480:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1975*/ meltfptr[1974])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V648*/ meltfptr[647]); ((meltroutine_ptr_t) /*_.VALROUT___V1975*/ meltfptr[1974])->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V648*/ meltfptr[647]); MELT_LOCATION ("warmelt-genobj.melt:6480:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1975*/ meltfptr[1974])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V190*/ meltfptr[189]); ((meltroutine_ptr_t) /*_.VALROUT___V1975*/ meltfptr[1974])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189]); MELT_LOCATION ("warmelt-genobj.melt:6480:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1975*/ meltfptr[1974])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V494*/ meltfptr[493]); ((meltroutine_ptr_t) /*_.VALROUT___V1975*/ meltfptr[1974])->tabval[14] = (melt_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493]); MELT_LOCATION ("warmelt-genobj.melt:6480:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1975*/ meltfptr[1974])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1806__COMPILTST_NORMTESTER_TUPLE#15", NULL != ( /*_.CLASS_NREP_SYMOCC__V96*/ meltfptr[95])); ((meltroutine_ptr_t) /*_.VALROUT___V1975*/ meltfptr[1974])->tabval[15] = (melt_ptr_t) ( /*_.CLASS_NREP_SYMOCC__V96*/ meltfptr[95]); MELT_LOCATION ("warmelt-genobj.melt:6480:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1975*/ meltfptr[1974])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1806__COMPILTST_NORMTESTER_TUPLE#16", NULL != ( /*_.CLASS_LET_BINDING__V67*/ meltfptr[66])); ((meltroutine_ptr_t) /*_.VALROUT___V1975*/ meltfptr[1974])->tabval[16] = (melt_ptr_t) ( /*_.CLASS_LET_BINDING__V67*/ meltfptr[66]); MELT_LOCATION ("warmelt-genobj.melt:6480:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1975*/ meltfptr[1974])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1806__COMPILTST_NORMTESTER_TUPLE#17", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V84*/ meltfptr[83])); ((meltroutine_ptr_t) /*_.VALROUT___V1975*/ meltfptr[1974])->tabval[17] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V84*/ meltfptr[83]); MELT_LOCATION ("warmelt-genobj.melt:6480:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1975*/ meltfptr[1974])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1806__COMPILTST_NORMTESTER_TUPLE#18", NULL != ( /*_.CLASS_NREP_UNSAFE_NTH_COMPONENT__V109*/ meltfptr[108])); ((meltroutine_ptr_t) /*_.VALROUT___V1975*/ meltfptr[1974])->tabval[18] = (melt_ptr_t) ( /*_.CLASS_NREP_UNSAFE_NTH_COMPONENT__V109*/ meltfptr[108]); MELT_LOCATION ("warmelt-genobj.melt:6480:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1975*/ meltfptr[1974])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1171*/ meltfptr[1170]); ((meltroutine_ptr_t) /*_.VALROUT___V1975*/ meltfptr[1974])->tabval[19] = (melt_ptr_t) ( /*_.VALDATA___V1171*/ meltfptr[1170]); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_39 */ void meltmod__warmelt_genobj__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-genobj.melt:6480:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1975*/ meltfptr[1974]); /*putclosurout#125 */ melt_assertmsg ("putclosrout#125 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1976*/ meltfptr[1975])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#125 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1975*/ meltfptr[1974])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1976*/ meltfptr[1975])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1975*/ meltfptr[1974]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1976*/ meltfptr[1975]); /*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"); MELT_LOCATION ("warmelt-genobj.melt:6579:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1979*/ meltfptr[1978])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1810__COMPILTST_NORMTESTER_SAME#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1979*/ meltfptr[1978])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:6579:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1979*/ meltfptr[1978])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1810__COMPILTST_NORMTESTER_SAME#1", NULL != ( /*_.CLASS_NORMTESTER_SAME__V162*/ meltfptr[161])); ((meltroutine_ptr_t) /*_.VALROUT___V1979*/ meltfptr[1978])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_SAME__V162*/ meltfptr[161]); MELT_LOCATION ("warmelt-genobj.melt:6579:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1979*/ meltfptr[1978])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1810__COMPILTST_NORMTESTER_SAME#2", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1979*/ meltfptr[1978])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:6579:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1979*/ meltfptr[1978])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1860*/ meltfptr[1859]); ((meltroutine_ptr_t) /*_.VALROUT___V1979*/ meltfptr[1978])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1860*/ meltfptr[1859]); MELT_LOCATION ("warmelt-genobj.melt:6579:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1979*/ meltfptr[1978])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1810__COMPILTST_NORMTESTER_SAME#4", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1979*/ meltfptr[1978])->tabval[4] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:6579:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1979*/ meltfptr[1978])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1959*/ meltfptr[1958]); ((meltroutine_ptr_t) /*_.VALROUT___V1979*/ meltfptr[1978])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1959*/ meltfptr[1958]); MELT_LOCATION ("warmelt-genobj.melt:6579:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1979*/ meltfptr[1978])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1957*/ meltfptr[1956]); ((meltroutine_ptr_t) /*_.VALROUT___V1979*/ meltfptr[1978])->tabval[6] = (melt_ptr_t) ( /*_.VALCLO___V1957*/ meltfptr[1956]); MELT_LOCATION ("warmelt-genobj.melt:6579:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1979*/ meltfptr[1978])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1964*/ meltfptr[1963]); ((meltroutine_ptr_t) /*_.VALROUT___V1979*/ meltfptr[1978])->tabval[7] = (melt_ptr_t) ( /*_.VALCLO___V1964*/ meltfptr[1963]); MELT_LOCATION ("warmelt-genobj.melt:6579:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1979*/ meltfptr[1978])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1810__COMPILTST_NORMTESTER_SAME#8", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1979*/ meltfptr[1978])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:6579:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1979*/ meltfptr[1978])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V518*/ meltfptr[517]); ((meltroutine_ptr_t) /*_.VALROUT___V1979*/ meltfptr[1978])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V518*/ meltfptr[517]); MELT_LOCATION ("warmelt-genobj.melt:6579:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1979*/ meltfptr[1978])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1129*/ meltfptr[1128]); ((meltroutine_ptr_t) /*_.VALROUT___V1979*/ meltfptr[1978])->tabval[10] = (melt_ptr_t) ( /*_.VALCLO___V1129*/ meltfptr[1128]); MELT_LOCATION ("warmelt-genobj.melt:6579:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1979*/ meltfptr[1978])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1810__COMPILTST_NORMTESTER_SAME#11", NULL != ( /*_.CTYPE_LONG__V43*/ meltfptr[42])); ((meltroutine_ptr_t) /*_.VALROUT___V1979*/ meltfptr[1978])->tabval[11] = (melt_ptr_t) ( /*_.CTYPE_LONG__V43*/ meltfptr[42]); MELT_LOCATION ("warmelt-genobj.melt:6579:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1979*/ meltfptr[1978])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V648*/ meltfptr[647]); ((meltroutine_ptr_t) /*_.VALROUT___V1979*/ meltfptr[1978])->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V648*/ meltfptr[647]); MELT_LOCATION ("warmelt-genobj.melt:6579:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1979*/ meltfptr[1978])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V190*/ meltfptr[189]); ((meltroutine_ptr_t) /*_.VALROUT___V1979*/ meltfptr[1978])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189]); MELT_LOCATION ("warmelt-genobj.melt:6579:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1979*/ meltfptr[1978])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V494*/ meltfptr[493]); ((meltroutine_ptr_t) /*_.VALROUT___V1979*/ meltfptr[1978])->tabval[14] = (melt_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493]); MELT_LOCATION ("warmelt-genobj.melt:6579:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1979*/ meltfptr[1978]); /*putclosurout#126 */ melt_assertmsg ("putclosrout#126 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1980*/ meltfptr[1979])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#126 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1979*/ meltfptr[1978])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1980*/ meltfptr[1979])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1979*/ meltfptr[1978]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1980*/ meltfptr[1979]); /*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"); MELT_LOCATION ("warmelt-genobj.melt:6647:/ 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_1814__COMPILTST_NORMTESTER_SUCCESS#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1983*/ meltfptr[1982])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:6647:/ 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_1814__COMPILTST_NORMTESTER_SUCCESS#1", NULL != ( /*_.CLASS_NORMTESTER_SUCCESS__V144*/ meltfptr[143])); ((meltroutine_ptr_t) /*_.VALROUT___V1983*/ meltfptr[1982])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_SUCCESS__V144*/ meltfptr[143]); MELT_LOCATION ("warmelt-genobj.melt:6647:/ 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_1814__COMPILTST_NORMTESTER_SUCCESS#2", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1983*/ meltfptr[1982])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:6647:/ 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___V1860*/ meltfptr[1859]); ((meltroutine_ptr_t) /*_.VALROUT___V1983*/ meltfptr[1982])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1860*/ meltfptr[1859]); MELT_LOCATION ("warmelt-genobj.melt:6647:/ 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___V1959*/ meltfptr[1958]); ((meltroutine_ptr_t) /*_.VALROUT___V1983*/ meltfptr[1982])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V1959*/ meltfptr[1958]); MELT_LOCATION ("warmelt-genobj.melt:6647:/ 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_1814__COMPILTST_NORMTESTER_SUCCESS#5", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1983*/ meltfptr[1982])->tabval[5] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:6647:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1983*/ meltfptr[1982]); /*putclosurout#127 */ melt_assertmsg ("putclosrout#127 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1984*/ meltfptr[1983])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#127 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]); MELT_LOCATION ("warmelt-genobj.melt:6678:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1985*/ meltfptr[1984])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1816__COMPILTST_NORMTESTER_ORCLEAR#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1985*/ meltfptr[1984])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:6678:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1985*/ meltfptr[1984])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1816__COMPILTST_NORMTESTER_ORCLEAR#1", NULL != ( /*_.CLASS_NORMTESTER_OR_CLEAR__V163*/ meltfptr[162])); ((meltroutine_ptr_t) /*_.VALROUT___V1985*/ meltfptr[1984])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_OR_CLEAR__V163*/ meltfptr[162]); MELT_LOCATION ("warmelt-genobj.melt:6678:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1985*/ meltfptr[1984])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1816__COMPILTST_NORMTESTER_ORCLEAR#2", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1985*/ meltfptr[1984])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:6678:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1985*/ meltfptr[1984])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1860*/ meltfptr[1859]); ((meltroutine_ptr_t) /*_.VALROUT___V1985*/ meltfptr[1984])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1860*/ meltfptr[1859]); MELT_LOCATION ("warmelt-genobj.melt:6678:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1985*/ meltfptr[1984])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1816__COMPILTST_NORMTESTER_ORCLEAR#4", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1985*/ meltfptr[1984])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:6678:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1985*/ meltfptr[1984])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1959*/ meltfptr[1958]); ((meltroutine_ptr_t) /*_.VALROUT___V1985*/ meltfptr[1984])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1959*/ meltfptr[1958]); MELT_LOCATION ("warmelt-genobj.melt:6678:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1985*/ meltfptr[1984])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1957*/ meltfptr[1956]); ((meltroutine_ptr_t) /*_.VALROUT___V1985*/ meltfptr[1984])->tabval[6] = (melt_ptr_t) ( /*_.VALCLO___V1957*/ meltfptr[1956]); MELT_LOCATION ("warmelt-genobj.melt:6678:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1985*/ meltfptr[1984])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1816__COMPILTST_NORMTESTER_ORCLEAR#7", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1985*/ meltfptr[1984])->tabval[7] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:6678:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1985*/ meltfptr[1984])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V494*/ meltfptr[493]); ((meltroutine_ptr_t) /*_.VALROUT___V1985*/ meltfptr[1984])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493]); MELT_LOCATION ("warmelt-genobj.melt:6678:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1985*/ meltfptr[1984]); /*putclosurout#128 */ melt_assertmsg ("putclosrout#128 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1986*/ meltfptr[1985])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#128 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1985*/ meltfptr[1984])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1986*/ meltfptr[1985])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1985*/ meltfptr[1984]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1986*/ meltfptr[1985]); /*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"); MELT_LOCATION ("warmelt-genobj.melt:6728:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1989*/ meltfptr[1988])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1820__COMPILTST_NORMTESTER_ORTRANSMIT#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1989*/ meltfptr[1988])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:6728:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1989*/ meltfptr[1988])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1820__COMPILTST_NORMTESTER_ORTRANSMIT#1", NULL != ( /*_.CLASS_NORMTESTER_OR_TRANSMIT__V164*/ meltfptr[163])); ((meltroutine_ptr_t) /*_.VALROUT___V1989*/ meltfptr[1988])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_OR_TRANSMIT__V164*/ meltfptr[163]); MELT_LOCATION ("warmelt-genobj.melt:6728:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1989*/ meltfptr[1988])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1820__COMPILTST_NORMTESTER_ORTRANSMIT#2", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1989*/ meltfptr[1988])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:6728:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1989*/ meltfptr[1988])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1860*/ meltfptr[1859]); ((meltroutine_ptr_t) /*_.VALROUT___V1989*/ meltfptr[1988])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1860*/ meltfptr[1859]); MELT_LOCATION ("warmelt-genobj.melt:6728:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1989*/ meltfptr[1988])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1820__COMPILTST_NORMTESTER_ORTRANSMIT#4", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1989*/ meltfptr[1988])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:6728:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1989*/ meltfptr[1988])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1959*/ meltfptr[1958]); ((meltroutine_ptr_t) /*_.VALROUT___V1989*/ meltfptr[1988])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1959*/ meltfptr[1958]); MELT_LOCATION ("warmelt-genobj.melt:6728:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1989*/ meltfptr[1988])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1957*/ meltfptr[1956]); ((meltroutine_ptr_t) /*_.VALROUT___V1989*/ meltfptr[1988])->tabval[6] = (melt_ptr_t) ( /*_.VALCLO___V1957*/ meltfptr[1956]); MELT_LOCATION ("warmelt-genobj.melt:6728:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1989*/ meltfptr[1988])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1820__COMPILTST_NORMTESTER_ORTRANSMIT#7", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1989*/ meltfptr[1988])->tabval[7] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:6728:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1989*/ meltfptr[1988])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1820__COMPILTST_NORMTESTER_ORTRANSMIT#8", NULL != ( /*_.CLASS_NREP_SYMOCC__V96*/ meltfptr[95])); ((meltroutine_ptr_t) /*_.VALROUT___V1989*/ meltfptr[1988])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_NREP_SYMOCC__V96*/ meltfptr[95]); MELT_LOCATION ("warmelt-genobj.melt:6728:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1989*/ meltfptr[1988])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V436*/ meltfptr[435]); ((meltroutine_ptr_t) /*_.VALROUT___V1989*/ meltfptr[1988])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V436*/ meltfptr[435]); MELT_LOCATION ("warmelt-genobj.melt:6728:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1989*/ meltfptr[1988]); /*putclosurout#129 */ melt_assertmsg ("putclosrout#129 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1990*/ meltfptr[1989])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#129 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1989*/ meltfptr[1988])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1990*/ meltfptr[1989])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1989*/ meltfptr[1988]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1990*/ meltfptr[1989]); /*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"); MELT_LOCATION ("warmelt-genobj.melt:6779:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1993*/ meltfptr[1992])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1824__COMPILTST_NORMTESTER_DISJUNCTION#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1993*/ meltfptr[1992])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:6779:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1993*/ meltfptr[1992])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1824__COMPILTST_NORMTESTER_DISJUNCTION#1", NULL != ( /*_.CLASS_NORMTESTER_DISJUNCTION__V165*/ meltfptr[164])); ((meltroutine_ptr_t) /*_.VALROUT___V1993*/ meltfptr[1992])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_DISJUNCTION__V165*/ meltfptr[164]); MELT_LOCATION ("warmelt-genobj.melt:6779:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1993*/ meltfptr[1992])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1824__COMPILTST_NORMTESTER_DISJUNCTION#2", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1993*/ meltfptr[1992])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:6779:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1993*/ meltfptr[1992])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1860*/ meltfptr[1859]); ((meltroutine_ptr_t) /*_.VALROUT___V1993*/ meltfptr[1992])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1860*/ meltfptr[1859]); MELT_LOCATION ("warmelt-genobj.melt:6779:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1993*/ meltfptr[1992])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1959*/ meltfptr[1958]); ((meltroutine_ptr_t) /*_.VALROUT___V1993*/ meltfptr[1992])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V1959*/ meltfptr[1958]); MELT_LOCATION ("warmelt-genobj.melt:6779:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1993*/ meltfptr[1992])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1957*/ meltfptr[1956]); ((meltroutine_ptr_t) /*_.VALROUT___V1993*/ meltfptr[1992])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1957*/ meltfptr[1956]); MELT_LOCATION ("warmelt-genobj.melt:6779:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1993*/ meltfptr[1992])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1964*/ meltfptr[1963]); ((meltroutine_ptr_t) /*_.VALROUT___V1993*/ meltfptr[1992])->tabval[6] = (melt_ptr_t) ( /*_.VALCLO___V1964*/ meltfptr[1963]); MELT_LOCATION ("warmelt-genobj.melt:6779:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1993*/ meltfptr[1992])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1824__COMPILTST_NORMTESTER_DISJUNCTION#7", NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V72*/ meltfptr[71])); ((meltroutine_ptr_t) /*_.VALROUT___V1993*/ meltfptr[1992])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V72*/ meltfptr[71]); MELT_LOCATION ("warmelt-genobj.melt:6779:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1993*/ meltfptr[1992])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1269*/ meltfptr[1268]); ((meltroutine_ptr_t) /*_.VALROUT___V1993*/ meltfptr[1992])->tabval[8] = (melt_ptr_t) ( /*_.VALCLO___V1269*/ meltfptr[1268]); MELT_LOCATION ("warmelt-genobj.melt:6779:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1993*/ meltfptr[1992]); /*putclosurout#130 */ melt_assertmsg ("putclosrout#130 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1994*/ meltfptr[1993])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#130 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1993*/ meltfptr[1992])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V1994*/ meltfptr[1993])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1993*/ meltfptr[1992]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1994*/ meltfptr[1993]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V1995*/ meltfptr[1994])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V1995*/ meltfptr[1994])))); ((meltobject_ptr_t) ( /*_.VALDATA___V1995*/ meltfptr[1994]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1996*/ meltfptr[1995]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1995*/ meltfptr[1994]); melt_dbgtrace_written_object ( /*_.VALDATA___V1995*/ meltfptr[1994], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:6819:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1828__COMPILMATCHER_CMATCHER#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1997*/ meltfptr[1996])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:6819:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1828__COMPILMATCHER_CMATCHER#1", NULL != ( /*_.CLASS_CMATCHER__V166*/ meltfptr[165])); ((meltroutine_ptr_t) /*_.VALROUT___V1997*/ meltfptr[1996])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_CMATCHER__V166*/ meltfptr[165]); MELT_LOCATION ("warmelt-genobj.melt:6819:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1816*/ meltfptr[1815]); ((meltroutine_ptr_t) /*_.VALROUT___V1997*/ meltfptr[1996])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1816*/ meltfptr[1815]); MELT_LOCATION ("warmelt-genobj.melt:6819:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1828__COMPILMATCHER_CMATCHER#3", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V1997*/ meltfptr[1996])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:6819:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1828__COMPILMATCHER_CMATCHER#4", NULL != ( /*_.DISCR_MAP_OBJECTS__V39*/ meltfptr[38])); ((meltroutine_ptr_t) /*_.VALROUT___V1997*/ meltfptr[1996])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-genobj.melt:6819:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1828__COMPILMATCHER_CMATCHER#5", NULL != ( /*_.DISCR_STRBUF__V32*/ meltfptr[31])); ((meltroutine_ptr_t) /*_.VALROUT___V1997*/ meltfptr[1996])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-genobj.melt:6819:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1828__COMPILMATCHER_CMATCHER#6", NULL != ( /*_.CLASS_NAMED__V8*/ meltfptr[7])); ((meltroutine_ptr_t) /*_.VALROUT___V1997*/ meltfptr[1996])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-genobj.melt:6819:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1828__COMPILMATCHER_CMATCHER#7", NULL != ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1997*/ meltfptr[1996])->tabval[7] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-genobj.melt:6819:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1828__COMPILMATCHER_CMATCHER#8", NULL != ( /*_.CLASS_NORMTESTER_ANY__V141*/ meltfptr[140])); ((meltroutine_ptr_t) /*_.VALROUT___V1997*/ meltfptr[1996])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANY__V141*/ meltfptr[140]); MELT_LOCATION ("warmelt-genobj.melt:6819:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1828__COMPILMATCHER_CMATCHER#9", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1997*/ meltfptr[1996])->tabval[9] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:6819:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1828__COMPILMATCHER_CMATCHER#10", NULL != ( /*_.CLASS_ANY_BINDING__V48*/ meltfptr[47])); ((meltroutine_ptr_t) /*_.VALROUT___V1997*/ meltfptr[1996])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V48*/ meltfptr[47]); MELT_LOCATION ("warmelt-genobj.melt:6819:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1828__COMPILMATCHER_CMATCHER#11", NULL != ( /*_.MULTIPLE_EVERY_BOTH__V167*/ meltfptr[166])); ((meltroutine_ptr_t) /*_.VALROUT___V1997*/ meltfptr[1996])->tabval[11] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY_BOTH__V167*/ meltfptr[166]); MELT_LOCATION ("warmelt-genobj.melt:6819:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1828__COMPILMATCHER_CMATCHER#12", NULL != ( /*_.CLASS_NORMTESTER_MATCHER__V159*/ meltfptr[158])); ((meltroutine_ptr_t) /*_.VALROUT___V1997*/ meltfptr[1996])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_MATCHER__V159*/ meltfptr[158]); MELT_LOCATION ("warmelt-genobj.melt:6819:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1828__COMPILMATCHER_CMATCHER#13", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1997*/ meltfptr[1996])->tabval[13] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:6819:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1828__COMPILMATCHER_CMATCHER#14", NULL != ( /*_.CLASS_FORMAL_BINDING__V42*/ meltfptr[41])); ((meltroutine_ptr_t) /*_.VALROUT___V1997*/ meltfptr[1996])->tabval[14] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V42*/ meltfptr[41]); MELT_LOCATION ("warmelt-genobj.melt:6819:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1828__COMPILMATCHER_CMATCHER#15", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1997*/ meltfptr[1996])->tabval[15] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:6819:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1828__COMPILMATCHER_CMATCHER#16", NULL != ( /*_.CLASS_ANY_BINDING__V48*/ meltfptr[47])); ((meltroutine_ptr_t) /*_.VALROUT___V1997*/ meltfptr[1996])->tabval[16] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V48*/ meltfptr[47]); MELT_LOCATION ("warmelt-genobj.melt:6871:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1998*/ meltfptr[1997])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1834__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1998*/ meltfptr[1997])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:6871:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1998*/ meltfptr[1997])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1834__LAMBDA_#1", NULL != ( /*_.CLASS_FORMAL_BINDING__V42*/ meltfptr[41])); ((meltroutine_ptr_t) /*_.VALROUT___V1998*/ meltfptr[1997])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V42*/ meltfptr[41]); MELT_LOCATION ("warmelt-genobj.melt:6871:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1998*/ meltfptr[1997])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1834__LAMBDA_#2", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1998*/ meltfptr[1997])->tabval[2] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:6871:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1998*/ meltfptr[1997])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1834__LAMBDA_#3", NULL != ( /*_.CLASS_ANY_BINDING__V48*/ meltfptr[47])); ((meltroutine_ptr_t) /*_.VALROUT___V1998*/ meltfptr[1997])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V48*/ meltfptr[47]); MELT_LOCATION ("warmelt-genobj.melt:6871:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1998*/ meltfptr[1997]); MELT_LOCATION ("warmelt-genobj.melt:6819:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1828__COMPILMATCHER_CMATCHER#17", NULL != ( /*_.VALROUT___V1998*/ meltfptr[1997])); ((meltroutine_ptr_t) /*_.VALROUT___V1997*/ meltfptr[1996])->tabval[17] = (melt_ptr_t) ( /*_.VALROUT___V1998*/ meltfptr[1997]); MELT_LOCATION ("warmelt-genobj.melt:6819:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1828__COMPILMATCHER_CMATCHER#18", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1997*/ meltfptr[1996])->tabval[18] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:6819:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1828__COMPILMATCHER_CMATCHER#19", NULL != ( /*_.CLASS_FORMAL_BINDING__V42*/ meltfptr[41])); ((meltroutine_ptr_t) /*_.VALROUT___V1997*/ meltfptr[1996])->tabval[19] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V42*/ meltfptr[41]); MELT_LOCATION ("warmelt-genobj.melt:6819:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1828__COMPILMATCHER_CMATCHER#20", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1997*/ meltfptr[1996])->tabval[20] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:6819:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1828__COMPILMATCHER_CMATCHER#21", NULL != ( /*_.CLASS_ANY_BINDING__V48*/ meltfptr[47])); ((meltroutine_ptr_t) /*_.VALROUT___V1997*/ meltfptr[1996])->tabval[21] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V48*/ meltfptr[47]); MELT_LOCATION ("warmelt-genobj.melt:6884:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1999*/ meltfptr[1998])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1835__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V1999*/ meltfptr[1998])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:6884:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1999*/ meltfptr[1998])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1835__LAMBDA_#1", NULL != ( /*_.CLASS_FORMAL_BINDING__V42*/ meltfptr[41])); ((meltroutine_ptr_t) /*_.VALROUT___V1999*/ meltfptr[1998])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V42*/ meltfptr[41]); MELT_LOCATION ("warmelt-genobj.melt:6884:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1999*/ meltfptr[1998])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1835__LAMBDA_#2", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V1999*/ meltfptr[1998])->tabval[2] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:6884:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1999*/ meltfptr[1998])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1835__LAMBDA_#3", NULL != ( /*_.CLASS_ANY_BINDING__V48*/ meltfptr[47])); ((meltroutine_ptr_t) /*_.VALROUT___V1999*/ meltfptr[1998])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V48*/ meltfptr[47]); MELT_LOCATION ("warmelt-genobj.melt:6884:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1999*/ meltfptr[1998]); MELT_LOCATION ("warmelt-genobj.melt:6819:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1828__COMPILMATCHER_CMATCHER#22", NULL != ( /*_.VALROUT___V1999*/ meltfptr[1998])); ((meltroutine_ptr_t) /*_.VALROUT___V1997*/ meltfptr[1996])->tabval[22] = (melt_ptr_t) ( /*_.VALROUT___V1999*/ meltfptr[1998]); MELT_LOCATION ("warmelt-genobj.melt:6819:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1828__COMPILMATCHER_CMATCHER#23", NULL != ( /*_.MULTIPLE_MAP__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V1997*/ meltfptr[1996])->tabval[23] = (melt_ptr_t) ( /*_.MULTIPLE_MAP__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-genobj.melt:6819:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1828__COMPILMATCHER_CMATCHER#24", NULL != ( /*_.CLASS_SYMBOL__V33*/ meltfptr[32])); ((meltroutine_ptr_t) /*_.VALROUT___V1997*/ meltfptr[1996])->tabval[24] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V33*/ meltfptr[32]); MELT_LOCATION ("warmelt-genobj.melt:6819:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1816*/ meltfptr[1815]); ((meltroutine_ptr_t) /*_.VALROUT___V1997*/ meltfptr[1996])->tabval[25] = (melt_ptr_t) ( /*_.VALDATA___V1816*/ meltfptr[1815]); MELT_LOCATION ("warmelt-genobj.melt:6819:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1828__COMPILMATCHER_CMATCHER#26", NULL != ( /*_.CLASS_NAMED__V8*/ meltfptr[7])); ((meltroutine_ptr_t) /*_.VALROUT___V1997*/ meltfptr[1996])->tabval[26] = (melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-genobj.melt:6819:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1828__COMPILMATCHER_CMATCHER#27", NULL != ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V1997*/ meltfptr[1996])->tabval[27] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-genobj.melt:6897:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2000*/ meltfptr[1999])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1836__LAMBDA_#0", NULL != ( /*_.MULTIPLE_MAP__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V2000*/ meltfptr[1999])->tabval[0] = (melt_ptr_t) ( /*_.MULTIPLE_MAP__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-genobj.melt:6897:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2000*/ meltfptr[1999])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1836__LAMBDA_#1", NULL != ( /*_.CLASS_SYMBOL__V33*/ meltfptr[32])); ((meltroutine_ptr_t) /*_.VALROUT___V2000*/ meltfptr[1999])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V33*/ meltfptr[32]); MELT_LOCATION ("warmelt-genobj.melt:6897:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2000*/ meltfptr[1999])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1816*/ meltfptr[1815]); ((meltroutine_ptr_t) /*_.VALROUT___V2000*/ meltfptr[1999])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1816*/ meltfptr[1815]); MELT_LOCATION ("warmelt-genobj.melt:6897:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2000*/ meltfptr[1999])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1836__LAMBDA_#3", NULL != ( /*_.CLASS_NAMED__V8*/ meltfptr[7])); ((meltroutine_ptr_t) /*_.VALROUT___V2000*/ meltfptr[1999])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-genobj.melt:6897:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2000*/ meltfptr[1999])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1836__LAMBDA_#4", NULL != ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V2000*/ meltfptr[1999])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-genobj.melt:6900:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2001*/ meltfptr[2000])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1837__LAMBDA_#0", NULL != ( /*_.CLASS_SYMBOL__V33*/ meltfptr[32])); ((meltroutine_ptr_t) /*_.VALROUT___V2001*/ meltfptr[2000])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V33*/ meltfptr[32]); MELT_LOCATION ("warmelt-genobj.melt:6900:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2001*/ meltfptr[2000])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1816*/ meltfptr[1815]); ((meltroutine_ptr_t) /*_.VALROUT___V2001*/ meltfptr[2000])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1816*/ meltfptr[1815]); MELT_LOCATION ("warmelt-genobj.melt:6900:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2001*/ meltfptr[2000])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1837__LAMBDA_#2", NULL != ( /*_.CLASS_NAMED__V8*/ meltfptr[7])); ((meltroutine_ptr_t) /*_.VALROUT___V2001*/ meltfptr[2000])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_40 */ void meltmod__warmelt_genobj__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-genobj.melt:6900:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2001*/ meltfptr[2000])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1837__LAMBDA_#3", NULL != ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14])); ((meltroutine_ptr_t) /*_.VALROUT___V2001*/ meltfptr[2000])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-genobj.melt:6900:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2001*/ meltfptr[2000]); MELT_LOCATION ("warmelt-genobj.melt:6897:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2000*/ meltfptr[1999])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1836__LAMBDA_#5", NULL != ( /*_.VALROUT___V2001*/ meltfptr[2000])); ((meltroutine_ptr_t) /*_.VALROUT___V2000*/ meltfptr[1999])->tabval[5] = (melt_ptr_t) ( /*_.VALROUT___V2001*/ meltfptr[2000]); MELT_LOCATION ("warmelt-genobj.melt:6897:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2000*/ meltfptr[1999]); MELT_LOCATION ("warmelt-genobj.melt:6819:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1828__COMPILMATCHER_CMATCHER#28", NULL != ( /*_.VALROUT___V2000*/ meltfptr[1999])); ((meltroutine_ptr_t) /*_.VALROUT___V1997*/ meltfptr[1996])->tabval[28] = (melt_ptr_t) ( /*_.VALROUT___V2000*/ meltfptr[1999]); MELT_LOCATION ("warmelt-genobj.melt:6819:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V372*/ meltfptr[371]); ((meltroutine_ptr_t) /*_.VALROUT___V1997*/ meltfptr[1996])->tabval[29] = (melt_ptr_t) ( /*_.VALDATA___V372*/ meltfptr[371]); MELT_LOCATION ("warmelt-genobj.melt:6819:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1828__COMPILMATCHER_CMATCHER#30", NULL != ( /*_.CTYPE_LONG__V43*/ meltfptr[42])); ((meltroutine_ptr_t) /*_.VALROUT___V1997*/ meltfptr[1996])->tabval[30] = (melt_ptr_t) ( /*_.CTYPE_LONG__V43*/ meltfptr[42]); MELT_LOCATION ("warmelt-genobj.melt:6819:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1828__COMPILMATCHER_CMATCHER#31", NULL != ( /*_.CTYPE_VOID__V19*/ meltfptr[18])); ((meltroutine_ptr_t) /*_.VALROUT___V1997*/ meltfptr[1996])->tabval[31] = (melt_ptr_t) ( /*_.CTYPE_VOID__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-genobj.melt:6819:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1828__COMPILMATCHER_CMATCHER#32", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V1997*/ meltfptr[1996])->tabval[32] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:6819:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V518*/ meltfptr[517]); ((meltroutine_ptr_t) /*_.VALROUT___V1997*/ meltfptr[1996])->tabval[33] = (melt_ptr_t) ( /*_.VALDATA___V518*/ meltfptr[517]); MELT_LOCATION ("warmelt-genobj.melt:6819:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V648*/ meltfptr[647]); ((meltroutine_ptr_t) /*_.VALROUT___V1997*/ meltfptr[1996])->tabval[34] = (melt_ptr_t) ( /*_.VALDATA___V648*/ meltfptr[647]); MELT_LOCATION ("warmelt-genobj.melt:6819:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1828__COMPILMATCHER_CMATCHER#35", NULL != ( /*_.CLASS_FORMAL_BINDING__V42*/ meltfptr[41])); ((meltroutine_ptr_t) /*_.VALROUT___V1997*/ meltfptr[1996])->tabval[35] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V42*/ meltfptr[41]); MELT_LOCATION ("warmelt-genobj.melt:6819:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V494*/ meltfptr[493]); ((meltroutine_ptr_t) /*_.VALROUT___V1997*/ meltfptr[1996])->tabval[36] = (melt_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493]); MELT_LOCATION ("warmelt-genobj.melt:6819:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1997*/ meltfptr[1996]); /*putclosurout#131 */ melt_assertmsg ("putclosrout#131 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V2002*/ meltfptr[2001])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#131 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V2002*/ meltfptr[2001])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1997*/ meltfptr[1996]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2002*/ meltfptr[2001]); /*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"); MELT_LOCATION ("warmelt-genobj.melt:6981:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2007*/ meltfptr[2006])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1838__COMPILMATCHER_FUNMATCHER#0", NULL != ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8])); ((meltroutine_ptr_t) /*_.VALROUT___V2007*/ meltfptr[2006])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-genobj.melt:6981:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2007*/ meltfptr[2006])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1838__COMPILMATCHER_FUNMATCHER#1", NULL != ( /*_.CLASS_FUNMATCHER__V168*/ meltfptr[167])); ((meltroutine_ptr_t) /*_.VALROUT___V2007*/ meltfptr[2006])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_FUNMATCHER__V168*/ meltfptr[167]); MELT_LOCATION ("warmelt-genobj.melt:6981:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2007*/ meltfptr[2006])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V1816*/ meltfptr[1815]); ((meltroutine_ptr_t) /*_.VALROUT___V2007*/ meltfptr[2006])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1816*/ meltfptr[1815]); MELT_LOCATION ("warmelt-genobj.melt:6981:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2007*/ meltfptr[2006])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1838__COMPILMATCHER_FUNMATCHER#3", NULL != ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39])); ((meltroutine_ptr_t) /*_.VALROUT___V2007*/ meltfptr[2006])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-genobj.melt:6981:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2007*/ meltfptr[2006])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1838__COMPILMATCHER_FUNMATCHER#4", NULL != ( /*_.CLASS_NORMTESTER_MATCHER__V159*/ meltfptr[158])); ((meltroutine_ptr_t) /*_.VALROUT___V2007*/ meltfptr[2006])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_MATCHER__V159*/ meltfptr[158]); MELT_LOCATION ("warmelt-genobj.melt:6981:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2007*/ meltfptr[2006])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1838__COMPILMATCHER_FUNMATCHER#5", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V2007*/ meltfptr[2006])->tabval[5] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:6981:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2007*/ meltfptr[2006])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1838__COMPILMATCHER_FUNMATCHER#6", NULL != ( /*_.CLASS_NORMTESTER_ANY__V141*/ meltfptr[140])); ((meltroutine_ptr_t) /*_.VALROUT___V2007*/ meltfptr[2006])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANY__V141*/ meltfptr[140]); MELT_LOCATION ("warmelt-genobj.melt:6981:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2007*/ meltfptr[2006])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1838__COMPILMATCHER_FUNMATCHER#7", NULL != ( /*_.MULTIPLE_MAP__V41*/ meltfptr[40])); ((meltroutine_ptr_t) /*_.VALROUT___V2007*/ meltfptr[2006])->tabval[7] = (melt_ptr_t) ( /*_.MULTIPLE_MAP__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-genobj.melt:6981:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2007*/ meltfptr[2006])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1838__COMPILMATCHER_FUNMATCHER#8", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V2007*/ meltfptr[2006])->tabval[8] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:7005:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2008*/ meltfptr[2007])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1842__LAMBDA_#0", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V2008*/ meltfptr[2007])->tabval[0] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:7005:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2008*/ meltfptr[2007]); MELT_LOCATION ("warmelt-genobj.melt:6981:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2007*/ meltfptr[2006])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1838__COMPILMATCHER_FUNMATCHER#9", NULL != ( /*_.VALROUT___V2008*/ meltfptr[2007])); ((meltroutine_ptr_t) /*_.VALROUT___V2007*/ meltfptr[2006])->tabval[9] = (melt_ptr_t) ( /*_.VALROUT___V2008*/ meltfptr[2007]); MELT_LOCATION ("warmelt-genobj.melt:6981:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2007*/ meltfptr[2006])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1838__COMPILMATCHER_FUNMATCHER#10", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V2007*/ meltfptr[2006])->tabval[10] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:7010:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2009*/ meltfptr[2008])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1843__LAMBDA_#0", NULL != ( /*_.COMPILE_OBJ__V23*/ meltfptr[22])); ((meltroutine_ptr_t) /*_.VALROUT___V2009*/ meltfptr[2008])->tabval[0] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-genobj.melt:7010:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2009*/ meltfptr[2008]); MELT_LOCATION ("warmelt-genobj.melt:6981:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2007*/ meltfptr[2006])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1838__COMPILMATCHER_FUNMATCHER#11", NULL != ( /*_.VALROUT___V2009*/ meltfptr[2008])); ((meltroutine_ptr_t) /*_.VALROUT___V2007*/ meltfptr[2006])->tabval[11] = (melt_ptr_t) ( /*_.VALROUT___V2009*/ meltfptr[2008]); MELT_LOCATION ("warmelt-genobj.melt:6981:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2007*/ meltfptr[2006])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1263*/ meltfptr[1262]); ((meltroutine_ptr_t) /*_.VALROUT___V2007*/ meltfptr[2006])->tabval[12] = (melt_ptr_t) ( /*_.VALCLO___V1263*/ meltfptr[1262]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2010*/ meltfptr[2009])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2010*/ meltfptr[2009])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2010*/ meltfptr[2009]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2011*/ meltfptr[2010]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2010*/ meltfptr[2009]); melt_dbgtrace_written_object ( /*_.VALDATA___V2010*/ meltfptr[2009], "new static instance"); MELT_LOCATION ("warmelt-genobj.melt:6981:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2007*/ meltfptr[2006])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1838__COMPILMATCHER_FUNMATCHER#13", NULL != ( /*_.VALDATA___V2010*/ meltfptr[2009])); ((meltroutine_ptr_t) /*_.VALROUT___V2007*/ meltfptr[2006])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V2010*/ meltfptr[2009]); MELT_LOCATION ("warmelt-genobj.melt:6981:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2007*/ meltfptr[2006])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1838__COMPILMATCHER_FUNMATCHER#14", NULL != ( /*_.DISCR_MULTIPLE__V18*/ meltfptr[17])); ((meltroutine_ptr_t) /*_.VALROUT___V2007*/ meltfptr[2006])->tabval[14] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V18*/ meltfptr[17]); MELT_LOCATION ("warmelt-genobj.melt:6981:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2007*/ meltfptr[2006])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V918*/ meltfptr[917]); ((meltroutine_ptr_t) /*_.VALROUT___V2007*/ meltfptr[2006])->tabval[15] = (melt_ptr_t) ( /*_.VALDATA___V918*/ meltfptr[917]); MELT_LOCATION ("warmelt-genobj.melt:6981:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2007*/ meltfptr[2006])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1838__COMPILMATCHER_FUNMATCHER#16", NULL != ( /*_.FMATCH_MATCHF__V169*/ meltfptr[168])); ((meltroutine_ptr_t) /*_.VALROUT___V2007*/ meltfptr[2006])->tabval[16] = (melt_ptr_t) ( /*_.FMATCH_MATCHF__V169*/ meltfptr[168]); MELT_LOCATION ("warmelt-genobj.melt:6981:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2007*/ meltfptr[2006])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V742*/ meltfptr[741]); ((meltroutine_ptr_t) /*_.VALROUT___V2007*/ meltfptr[2006])->tabval[17] = (melt_ptr_t) ( /*_.VALDATA___V742*/ meltfptr[741]); MELT_LOCATION ("warmelt-genobj.melt:6981:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2007*/ meltfptr[2006])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_1838__COMPILMATCHER_FUNMATCHER#18", NULL != ( /*_.DISCR_LIST__V13*/ meltfptr[12])); ((meltroutine_ptr_t) /*_.VALROUT___V2007*/ meltfptr[2006])->tabval[18] = (melt_ptr_t) ( /*_.DISCR_LIST__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-genobj.melt:6981:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2007*/ meltfptr[2006])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V518*/ meltfptr[517]); ((meltroutine_ptr_t) /*_.VALROUT___V2007*/ meltfptr[2006])->tabval[19] = (melt_ptr_t) ( /*_.VALDATA___V518*/ meltfptr[517]); MELT_LOCATION ("warmelt-genobj.melt:6981:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2007*/ meltfptr[2006])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V648*/ meltfptr[647]); ((meltroutine_ptr_t) /*_.VALROUT___V2007*/ meltfptr[2006])->tabval[20] = (melt_ptr_t) ( /*_.VALDATA___V648*/ meltfptr[647]); MELT_LOCATION ("warmelt-genobj.melt:6981:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2007*/ meltfptr[2006])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALDATA___V494*/ meltfptr[493]); ((meltroutine_ptr_t) /*_.VALROUT___V2007*/ meltfptr[2006])->tabval[21] = (melt_ptr_t) ( /*_.VALDATA___V494*/ meltfptr[493]); MELT_LOCATION ("warmelt-genobj.melt:6981:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2007*/ meltfptr[2006])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", NULL != /*_.VALCLO___V1402*/ meltfptr[1401]); ((meltroutine_ptr_t) /*_.VALROUT___V2007*/ meltfptr[2006])->tabval[22] = (melt_ptr_t) ( /*_.VALCLO___V1402*/ meltfptr[1401]); MELT_LOCATION ("warmelt-genobj.melt:6981:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2007*/ meltfptr[2006]); /*putclosurout#132 */ melt_assertmsg ("putclosrout#132 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V2012*/ meltfptr[2011])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#132 checkrout", melt_magic_discr ((melt_ptr_t) ( /*_.VALROUT___V2007*/ meltfptr[2006])) == MELTOBMAG_ROUTINE); ((meltclosure_ptr_t) /*_.VALCLO___V2012*/ meltfptr[2011])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V2007*/ meltfptr[2006]); /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2012*/ meltfptr[2011]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2013*/ meltfptr[2012])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2013*/ meltfptr[2012])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2013*/ meltfptr[2012]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2014*/ meltfptr[2013]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2013*/ meltfptr[2012]); melt_dbgtrace_written_object ( /*_.VALDATA___V2013*/ meltfptr[2012], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) ( /*_.VALDATA___V2015*/ meltfptr[2014])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) ( /*_.VALDATA___V2015*/ meltfptr[2014])))); ((meltobject_ptr_t) ( /*_.VALDATA___V2015*/ meltfptr[2014]))-> obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2016*/ meltfptr[2015]); /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2015*/ meltfptr[2014]); melt_dbgtrace_written_object ( /*_.VALDATA___V2015*/ meltfptr[2014], "new static instance"); /**COMMENT: before toplevel body **/ ; MELT_LOCATION ("warmelt-genobj.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___V2017*/ meltfptr[2016] = /*quasi.cur.mod.env.cont cur.mod.env.cont : at very start */ /*_.CONTENV___V2*/ meltfptr[1];; } else { MELT_LOCATION ("warmelt-genobj.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__V2018*/ meltfptr[2017] = slot; }; ; /*^checksignal */ MELT_CHECK_SIGNAL (); ; /*^apply */ /*apply */ { union meltparam_un argtab[1]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_cstring = "warmelt-genobj"; /*_.FUN___V2019*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.SYSDATA_CONT_FRESH_ENV__V2018*/ meltfptr[2017]), (melt_ptr_t) ( /*_.PREVENV___V4*/ meltfptr[3]), (MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } ; /*_.OR___V2017*/ meltfptr[2016] = /*_.FUN___V2019*/ meltfptr[2018];; /*epilog */ MELT_LOCATION ("warmelt-genobj.melt:3:/ clear"); /*clear *//*_.SYSDATA_CONT_FRESH_ENV__V2018*/ meltfptr[2017] = 0; /*^clear */ /*clear *//*_.FUN___V2019*/ meltfptr[2018] = 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___V2017*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:590:/ 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___V2020*/ meltfptr[2017] = slot; }; ; /*^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_INITIAL_EXTENSION_ROUTINEOBJ */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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 : OIROUTX_EXTENDNAME */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V1106*/ meltfptr[1105]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_INITIAL_MODULE_ROUTINEOBJ */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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 : OIROUT_MODULENAME */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V1088*/ meltfptr[1087]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_INITIALROUTINEOBJ */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V1086*/ meltfptr[1085]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1091*/ meltfptr[1090]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OIROUT_DATA */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V1093*/ meltfptr[1092]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OIROUT_PROLOG */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V1100*/ meltfptr[1099]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1095*/ meltfptr[1094]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OIROUT_FILL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V1102*/ meltfptr[1101]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V620*/ meltfptr[619]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJAGAIN */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V623*/ meltfptr[622]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBAGAIN_LABEL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V626*/ meltfptr[625]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V728*/ meltfptr[727]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJAPPLY */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V731*/ meltfptr[730]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBAPP_CLOS */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V736*/ meltfptr[735]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V733*/ meltfptr[732]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBAPP_ARGS */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V738*/ meltfptr[737]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V504*/ meltfptr[503]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJANYBLOCK */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V507*/ meltfptr[506]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBLO_BODYL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V512*/ meltfptr[511]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_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 : OBLO_EPIL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V420*/ meltfptr[419]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJCHECKSIGNAL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V418*/ meltfptr[417]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V518*/ meltfptr[517]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJPLAINBLOCK */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V630*/ meltfptr[629]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJCITERBLOCK */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V628*/ meltfptr[627]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_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 : OBCITER_CITER */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V635*/ meltfptr[634]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBCITER_BEFORE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V637*/ meltfptr[636]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBCITER_AFTER */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V644*/ meltfptr[643]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V494*/ meltfptr[493]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJCLEAR */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V492*/ meltfptr[491]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_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 : OCLR_VLOC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V208*/ meltfptr[207]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJCLOCCV */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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 : OBC_OFF */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V218*/ meltfptr[217]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V213*/ meltfptr[212]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBC_PROC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V220*/ meltfptr[219]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V215*/ meltfptr[214]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBC_NAME */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V222*/ meltfptr[221]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V538*/ meltfptr[537]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJCOMMENTEDBLOCK */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V536*/ meltfptr[535]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_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 : OCOMBLO_COMMENT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V410*/ meltfptr[409]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJCOMMENTINSTR */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V413*/ meltfptr[412]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBCI_COMMENT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V416*/ meltfptr[415]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_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_OBJCOMPUTE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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 : OBCPT_EXPR */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V444*/ meltfptr[443]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_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 : OBCPT_TYPE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V446*/ meltfptr[445]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V648*/ meltfptr[647]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJCOND */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V646*/ meltfptr[645]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_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 : OBCOND_TEST */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V658*/ meltfptr[657]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_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 : OBCOND_THEN */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V660*/ meltfptr[659]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_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 : OBCOND_ELSE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V226*/ meltfptr[225]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJCONSTV */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V666*/ meltfptr[665]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJCPPIF */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V669*/ meltfptr[668]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBIFP_COND */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V676*/ meltfptr[675]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V671*/ meltfptr[670]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBIFP_THEN */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V678*/ meltfptr[677]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V673*/ meltfptr[672]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBIFP_ELSE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V680*/ meltfptr[679]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V798*/ meltfptr[797]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJDBGTRACEWRITEOBJ */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V796*/ meltfptr[795]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V801*/ meltfptr[800]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBDTW_WRITTENOBJ */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V806*/ meltfptr[805]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V803*/ meltfptr[802]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBDTW_MESSAGE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V808*/ meltfptr[807]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_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_OBJDESTINSTR */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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 : OBDI_DESTLIST */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V610*/ meltfptr[609]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJEXIT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V608*/ meltfptr[607]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_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 : OBEXIT_LABEL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V616*/ meltfptr[615]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V248*/ meltfptr[247]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJEXPANDPUREVAL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V246*/ meltfptr[245]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V251*/ meltfptr[250]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OXPURVAL_LOC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V258*/ meltfptr[257]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V253*/ meltfptr[252]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OXPURVAL_COMM */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V260*/ meltfptr[259]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V255*/ meltfptr[254]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OXPURVAL_CONT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V262*/ meltfptr[261]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V362*/ meltfptr[361]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJEXPV */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V365*/ meltfptr[364]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBX_CONT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V368*/ meltfptr[367]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V488*/ meltfptr[487]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJFINALRETURN */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V450*/ meltfptr[449]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJGETARG */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V453*/ meltfptr[452]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBARG_OBLOC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V458*/ meltfptr[457]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V455*/ meltfptr[454]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBARG_BIND */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V460*/ meltfptr[459]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V464*/ meltfptr[463]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJGETARGREST */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V462*/ meltfptr[461]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V467*/ meltfptr[466]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBARG_REST */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V706*/ meltfptr[705]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJGETNAMEDCOMMON */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V709*/ meltfptr[708]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBGNAMED_IOBJ */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V712*/ meltfptr[711]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V722*/ meltfptr[721]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJGETNAMEDKEYWORD */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V720*/ meltfptr[719]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V716*/ meltfptr[715]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJGETNAMEDSYMBOL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V918*/ meltfptr[917]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJGETSLOT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_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 : OGETSL_OBJ */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V926*/ meltfptr[925]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_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 : OGETSL_FIELD */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V582*/ meltfptr[581]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJGOTOINSTR */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V580*/ meltfptr[579]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V585*/ meltfptr[584]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBGOTO_PREFIX */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V590*/ meltfptr[589]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V587*/ meltfptr[586]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBGOTO_RANK */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V592*/ meltfptr[591]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V356*/ meltfptr[355]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJINITBOXINTEGER */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V354*/ meltfptr[353]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V318*/ meltfptr[317]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJINITCLOSURE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V316*/ meltfptr[315]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V321*/ meltfptr[320]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OICLO_ROUT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V266*/ meltfptr[265]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJINITELEM */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V269*/ meltfptr[268]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OIE_CNAME */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V271*/ meltfptr[270]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OIE_DATA */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V273*/ meltfptr[272]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OIE_DISCR */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V275*/ meltfptr[274]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OIE_LOCVAR */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V284*/ meltfptr[283]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V350*/ meltfptr[349]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJINITLIST */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V308*/ meltfptr[307]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJINITMULTIPLE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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 : OIM_TUPVAL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V314*/ meltfptr[313]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V288*/ meltfptr[287]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJINITOBJECT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V286*/ meltfptr[285]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V291*/ meltfptr[290]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OIO_PREDEF */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V296*/ meltfptr[295]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V293*/ meltfptr[292]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OIO_CLASS */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V298*/ meltfptr[297]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V344*/ meltfptr[343]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJINITPAIR */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V342*/ meltfptr[341]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V328*/ meltfptr[327]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJINITROUTINE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V326*/ meltfptr[325]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_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 : OIR_PROCROUTINE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V338*/ meltfptr[337]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJINITSTRING */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V302*/ meltfptr[301]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJINITUNIQUEOBJECT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V300*/ meltfptr[299]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V400*/ meltfptr[399]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJINSTR */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V398*/ meltfptr[397]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_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 : OBI_LOC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V684*/ meltfptr[683]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJINTERNCOMMON */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V682*/ meltfptr[681]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V687*/ meltfptr[686]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBINTERN_IOBJ */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V690*/ meltfptr[689]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V700*/ meltfptr[699]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJINTERNKEYWORD */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V698*/ meltfptr[697]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V694*/ meltfptr[693]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJINTERNSYMBOL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V692*/ meltfptr[691]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V568*/ meltfptr[567]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJLABELINSTR */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V566*/ meltfptr[565]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V571*/ meltfptr[570]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBLAB_PREFIX */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V576*/ meltfptr[575]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V573*/ meltfptr[572]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBLAB_RANK */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V578*/ meltfptr[577]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V372*/ meltfptr[371]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJLOCATEDEXPV */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V375*/ meltfptr[374]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBCX_LOC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V378*/ meltfptr[377]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V190*/ meltfptr[189]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJLOCV */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V188*/ meltfptr[187]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V193*/ meltfptr[192]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBL_OFF */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V200*/ meltfptr[199]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V195*/ meltfptr[194]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBL_PROC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V202*/ meltfptr[201]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V197*/ meltfptr[196]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBL_CNAME */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V596*/ meltfptr[595]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJLOOP */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V594*/ meltfptr[593]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V599*/ meltfptr[598]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBLOOP_LABEL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V601*/ meltfptr[600]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBLOOP_RESV */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V558*/ meltfptr[557]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJMATCHFLAGBLOCK */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V556*/ meltfptr[555]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V561*/ meltfptr[560]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OMCHFLGBLO_FLAGS */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V752*/ meltfptr[751]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJMSEND */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V750*/ meltfptr[749]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_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 : OBMSND_SEL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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 : OBMSND_RECV */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V759*/ meltfptr[758]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBMSND_ARGS */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V524*/ meltfptr[523]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJMULTIALLOCBLOCK */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V522*/ meltfptr[521]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V527*/ meltfptr[526]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OMALBLO_ALLSTRUCT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V529*/ meltfptr[528]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OMALBLO_NAME */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V534*/ meltfptr[533]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V742*/ meltfptr[741]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJMULTIAPPLY */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V740*/ meltfptr[739]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V745*/ meltfptr[744]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBMULTAPP_XRES */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V548*/ meltfptr[547]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJMULTIBLOCK */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V551*/ meltfptr[550]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OMULBLO_SUBCOMP */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V554*/ meltfptr[553]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V770*/ meltfptr[769]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJMULTIMSEND */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V768*/ meltfptr[767]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_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 : OBMULTSND_XRES */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V812*/ meltfptr[811]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJNEWCLOSURE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V810*/ meltfptr[809]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V815*/ meltfptr[814]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBNCLO_DISCR */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V822*/ meltfptr[821]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V817*/ meltfptr[816]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBNCLO_ROUT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V824*/ meltfptr[823]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_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 : OBNCLO_LEN */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V826*/ meltfptr[825]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_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_OBJNIL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V232*/ meltfptr[231]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJPREDEF */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V230*/ meltfptr[229]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V235*/ meltfptr[234]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBPREDEF */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V184*/ meltfptr[183]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJPUREVALUE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V964*/ meltfptr[963]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJPUTCLOSEDNOTNULLV */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V962*/ meltfptr[961]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V946*/ meltfptr[945]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJPUTCLOSEDV */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V949*/ meltfptr[948]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OPCLOV_CLOS */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V951*/ meltfptr[950]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OPCLOV_OFF */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V958*/ meltfptr[957]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V953*/ meltfptr[952]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OPCLOV_CVAL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V960*/ meltfptr[959]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V932*/ meltfptr[931]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJPUTCLOSUROUT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V935*/ meltfptr[934]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OPCLOR_CLOS */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V940*/ meltfptr[939]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V937*/ meltfptr[936]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OPCLOR_ROUT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V942*/ meltfptr[941]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V878*/ meltfptr[877]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJPUTLIST */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V876*/ meltfptr[875]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V881*/ meltfptr[880]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OPUTL_LIST */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V888*/ meltfptr[887]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V883*/ meltfptr[882]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OPUTL_FIRST */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V890*/ meltfptr[889]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V885*/ meltfptr[884]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OPUTL_LAST */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V892*/ meltfptr[891]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V848*/ meltfptr[847]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJPUTPAIR */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V851*/ meltfptr[850]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OPUTP_PAIR */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V854*/ meltfptr[853]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V858*/ meltfptr[857]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJPUTPAIRHEAD */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V856*/ meltfptr[855]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V861*/ meltfptr[860]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OPUTP_HEAD */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V868*/ meltfptr[867]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJPUTPAIRTAIL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V866*/ meltfptr[865]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V871*/ meltfptr[870]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OPUTP_TAIL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V970*/ meltfptr[969]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJPUTROUTCONST */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V968*/ meltfptr[967]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V973*/ meltfptr[972]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OPRCONST_ROUT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V980*/ meltfptr[979]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V975*/ meltfptr[974]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OPRCONST_OFF */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V977*/ meltfptr[976]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OPRCONST_CVAL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V984*/ meltfptr[983]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V988*/ meltfptr[987]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJPUTROUTCONSTNOTNULL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V986*/ meltfptr[985]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V896*/ meltfptr[895]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJPUTSLOT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V894*/ meltfptr[893]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V899*/ meltfptr[898]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OSLOT_ODATA */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V908*/ meltfptr[907]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V901*/ meltfptr[900]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OSLOT_OFFSET */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V910*/ meltfptr[909]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V903*/ meltfptr[902]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OSLOT_FIELD */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V905*/ meltfptr[904]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OSLOT_VALUE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V830*/ meltfptr[829]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJPUTUPLE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V828*/ meltfptr[827]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_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 : OPUTU_TUPLED */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V835*/ meltfptr[834]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OPUTU_OFFSET */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V837*/ meltfptr[836]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OPUTU_VALUE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V474*/ meltfptr[473]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJPUTXTRARESULT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V477*/ meltfptr[476]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBXRES_RANK */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V482*/ meltfptr[481]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V479*/ meltfptr[478]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBXRES_OBLOC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V484*/ meltfptr[483]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V780*/ meltfptr[779]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJRAWALLOCOBJ */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V783*/ meltfptr[782]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBRALLOBJ_CLASS */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V785*/ meltfptr[784]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBRALLOBJ_LEN */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V792*/ meltfptr[791]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V787*/ meltfptr[786]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBRALLOBJ_CLASSNAME */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V794*/ meltfptr[793]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_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_OBJSETPREDEF */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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 : OSPR_OBJECT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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 : OSPR_PREDEF */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V994*/ meltfptr[993]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJTOUCH */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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 : OTOUCH_VAL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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 : OTOUCH_COMMENT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V174*/ meltfptr[173]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJVALUE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V170*/ meltfptr[169]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V177*/ meltfptr[176]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBV_TYPE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V180*/ meltfptr[179]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1062*/ meltfptr[1061]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_PROCROUTINEOBJ */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1065*/ meltfptr[1064]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OPROUT_GETARGS */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V1076*/ meltfptr[1075]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1067*/ meltfptr[1066]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OPROUT_LOC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V1078*/ meltfptr[1077]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_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 : OPROUT_FUNAM */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V1071*/ meltfptr[1070]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OPROUT_RESTNAM */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V1082*/ meltfptr[1081]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1073*/ meltfptr[1072]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OPROUT_FILENUM */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V1084*/ meltfptr[1083]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1024*/ meltfptr[1023]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_ROUTINEOBJ */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V1027*/ meltfptr[1026]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBROUT_PROC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V1044*/ meltfptr[1043]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1029*/ meltfptr[1028]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBROUT_BODY */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V1046*/ meltfptr[1045]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1031*/ meltfptr[1030]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBROUT_NBVAL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V1048*/ meltfptr[1047]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1033*/ meltfptr[1032]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBROUT_NBLONG */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V1050*/ meltfptr[1049]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_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 : OBROUT_OTHERS */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V1037*/ meltfptr[1036]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBROUT_RETVAL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V1039*/ meltfptr[1038]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBROUT_CNTCITER */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (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___V1041*/ meltfptr[1040]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OBROUT_CNTLETREC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2020*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V1058*/ meltfptr[1057]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.VALUEXPORTER___V2020*/ meltfptr[2017] = 0; } MELT_LOCATION ("warmelt-genobj.melt:669:/ 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___V2021*/ meltfptr[2018] = slot; }; ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V518*/ meltfptr[517]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJBLOCK */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2021*/ meltfptr[2018]), (melt_ptr_t) ( /*_.VALDATA___V1124*/ meltfptr[1123]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.VALUEXPORTER___V2021*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:670:/ 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___V2022*/ meltfptr[2016] = slot; }; ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V420*/ meltfptr[419]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_OBJCHECKINTERRUPT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2022*/ meltfptr[2016]), (melt_ptr_t) ( /*_.VALDATA___V1126*/ meltfptr[1125]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.VALUEXPORTER___V2022*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:867:/ 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___V2023*/ meltfptr[2017] = slot; }; ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1153*/ meltfptr[1152]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : MAKE_OBJEXPANDPUREVAL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2023*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V1210*/ meltfptr[1209]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_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 : OUTPUT_C_CODE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2023*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V1173*/ meltfptr[1172]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1167*/ meltfptr[1166]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OUTPUT_C_DECLINIT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2023*/ meltfptr[2017]), (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___V1197*/ meltfptr[1196]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OUTPUT_C_INITIAL_FILL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2023*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V1188*/ meltfptr[1187]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1208*/ meltfptr[1207]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : OUTPUT_C_INITIAL_PREDEF */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2023*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V1199*/ meltfptr[1198]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1171*/ meltfptr[1170]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : PUT_OBJDEST */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2023*/ meltfptr[2017]), (melt_ptr_t) ( /*_.VALDATA___V1169*/ meltfptr[1168]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.VALUEXPORTER___V2023*/ meltfptr[2017] = 0; } MELT_LOCATION ("warmelt-genobj.melt:887:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1213*/ meltfptr[1212]; /*_.INSTALL_METHOD__V2024*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP__V22*/ meltfptr[21]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2024*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:897:/ 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___V1171*/ meltfptr[1170]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1221*/ meltfptr[1220]; /*_.INSTALL_METHOD__V2025*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_GENERATED_C_CODE__V7*/ meltfptr[6]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2025*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:908:/ 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___V1171*/ meltfptr[1170]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1223*/ meltfptr[1222]; /*_.INSTALL_METHOD__V2026*/ meltfptr[2017] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.DISCR_ANY_RECEIVER__V24*/ meltfptr[23]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2026*/ meltfptr[2017] = 0; } MELT_LOCATION ("warmelt-genobj.melt:914:/ 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 *) & /*_.GET_CTYPE__V25*/ meltfptr[24]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1227*/ meltfptr[1226]; /*_.INSTALL_METHOD__V2027*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2027*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:923:/ 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 *) & /*_.GET_CTYPE__V25*/ meltfptr[24]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1231*/ meltfptr[1230]; /*_.INSTALL_METHOD__V2028*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.VALDATA___V242*/ meltfptr[241]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2028*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:929:/ 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 *) & /*_.GET_CTYPE__V25*/ meltfptr[24]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1235*/ meltfptr[1234]; /*_.INSTALL_METHOD__V2029*/ meltfptr[2017] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.VALDATA___V338*/ meltfptr[337]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2029*/ meltfptr[2017] = 0; } MELT_LOCATION ("warmelt-genobj.melt:938:/ 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 *) & /*_.DBG_OUTPUT__V28*/ meltfptr[27]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1237*/ meltfptr[1236]; /*_.INSTALL_METHOD__V2030*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.VALDATA___V1024*/ meltfptr[1023]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2030*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:956:/ 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___V1171*/ meltfptr[1170]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1243*/ meltfptr[1242]; /*_.INSTALL_METHOD__V2031*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.VALDATA___V426*/ meltfptr[425]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2031*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:981:/ 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___V1171*/ meltfptr[1170]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1245*/ meltfptr[1244]; /*_.INSTALL_METHOD__V2032*/ meltfptr[2017] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.VALDATA___V488*/ meltfptr[487]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2032*/ meltfptr[2017] = 0; } MELT_LOCATION ("warmelt-genobj.melt:1826:/ 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___V2033*/ meltfptr[2018] = slot; }; ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1327*/ meltfptr[1326]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : COMPILE2OBJ_INITPROC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2033*/ meltfptr[2018]), (melt_ptr_t) ( /*_.VALDATA___V1391*/ meltfptr[1390]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union 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___V1372*/ meltfptr[1371]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : COMPILE2OBJ_INITEXTENDPROC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2033*/ meltfptr[2018]), (melt_ptr_t) ( /*_.VALDATA___V1393*/ meltfptr[1392]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union 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___V1273*/ meltfptr[1272]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : COMPILE2OBJ_PROCEDURE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2033*/ meltfptr[2018]), (melt_ptr_t) ( /*_.VALDATA___V1395*/ meltfptr[1394]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union 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___V1259*/ meltfptr[1258]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : VARIADIC_INDEX_IDSTR */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2033*/ meltfptr[2018]), (melt_ptr_t) ( /*_.VALDATA___V1397*/ meltfptr[1396]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union 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___V1261*/ meltfptr[1260]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : VARIADIC_LENGTH_IDSTR */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2033*/ meltfptr[2018]), (melt_ptr_t) ( /*_.VALDATA___V1399*/ meltfptr[1398]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.VALUEXPORTER___V2033*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:2076:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1409*/ meltfptr[1408]; /*_.INSTALL_METHOD__V2034*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_CHUNK__V68*/ meltfptr[67]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2034*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:2083:/ 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 *) & /*_.GET_CTYPE__V25*/ meltfptr[24]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1413*/ meltfptr[1412]; /*_.INSTALL_METHOD__V2035*/ meltfptr[2017] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_TYPED_EXPRESSION__V69*/ meltfptr[68]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2035*/ meltfptr[2017] = 0; } MELT_LOCATION ("warmelt-genobj.melt:2094:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1417*/ meltfptr[1416]; /*_.INSTALL_METHOD__V2036*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_NIL__V70*/ meltfptr[69]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2036*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:2117:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1421*/ meltfptr[1420]; /*_.INSTALL_METHOD__V2037*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_COMMENT__V71*/ meltfptr[70]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2037*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:2146:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1425*/ meltfptr[1424]; /*_.INSTALL_METHOD__V2038*/ meltfptr[2017] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V72*/ meltfptr[71]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2038*/ meltfptr[2017] = 0; } MELT_LOCATION ("warmelt-genobj.melt:2196:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1429*/ meltfptr[1428]; /*_.INSTALL_METHOD__V2039*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_CLOSEDOCC__V73*/ meltfptr[72]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2039*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:2244:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1433*/ meltfptr[1432]; /*_.INSTALL_METHOD__V2040*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_CONSTOCC__V74*/ meltfptr[73]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2040*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:2259:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1437*/ meltfptr[1436]; /*_.INSTALL_METHOD__V2041*/ meltfptr[2017] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_IMPORTEDVAL__V52*/ meltfptr[51]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2041*/ meltfptr[2017] = 0; } MELT_LOCATION ("warmelt-genobj.melt:2287:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1439*/ meltfptr[1438]; /*_.INSTALL_METHOD__V2042*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_LITERALVALUE__V63*/ meltfptr[62]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2042*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:2305:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1443*/ meltfptr[1442]; /*_.INSTALL_METHOD__V2043*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_DEFINED_CONSTANT__V76*/ meltfptr[75]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2043*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:2366:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1447*/ meltfptr[1446]; /*_.INSTALL_METHOD__V2044*/ meltfptr[2017] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_QUASICONSTANT__V77*/ meltfptr[76]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2044*/ meltfptr[2017] = 0; } MELT_LOCATION ("warmelt-genobj.melt:2392:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1451*/ meltfptr[1450]; /*_.INSTALL_METHOD__V2045*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V78*/ meltfptr[77]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2045*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:2432:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1456*/ meltfptr[1455]; /*_.INSTALL_METHOD__V2046*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_FOREVER__V79*/ meltfptr[78]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2046*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:2473:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1462*/ meltfptr[1461]; /*_.INSTALL_METHOD__V2047*/ meltfptr[2017] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_EXIT__V81*/ meltfptr[80]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2047*/ meltfptr[2017] = 0; } MELT_LOCATION ("warmelt-genobj.melt:2493:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1466*/ meltfptr[1465]; /*_.INSTALL_METHOD__V2048*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_AGAIN__V82*/ meltfptr[81]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2048*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:2502:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1470*/ meltfptr[1469]; /*_.INSTALL_METHOD__V2049*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.DISCR_ANY_RECEIVER__V24*/ meltfptr[23]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2049*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:2589:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1475*/ meltfptr[1474]; /*_.INSTALL_METHOD__V2050*/ meltfptr[2017] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_LET__V83*/ meltfptr[82]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2050*/ meltfptr[2017] = 0; } MELT_LOCATION ("warmelt-genobj.melt:2605:/ 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___V2051*/ meltfptr[2018] = slot; }; ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1498*/ meltfptr[1497]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : COMPILE_LETREC_FILL */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2051*/ meltfptr[2018]), (melt_ptr_t) ( /*_.VALDATA___V1482*/ meltfptr[1481]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.VALUEXPORTER___V2051*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:2614:/ 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___V1498*/ meltfptr[1497]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1501*/ meltfptr[1500]; /*_.INSTALL_METHOD__V2052*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.DISCR_ANY_RECEIVER__V24*/ meltfptr[23]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2052*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:2672:/ 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___V1498*/ meltfptr[1497]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1503*/ meltfptr[1502]; /*_.INSTALL_METHOD__V2053*/ meltfptr[2017] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING__V86*/ meltfptr[85]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2053*/ meltfptr[2017] = 0; } MELT_LOCATION ("warmelt-genobj.melt:2716:/ 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___V1498*/ meltfptr[1497]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1509*/ meltfptr[1508]; /*_.INSTALL_METHOD__V2054*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING__V88*/ meltfptr[87]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2054*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:2757:/ 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___V1498*/ meltfptr[1497]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1513*/ meltfptr[1512]; /*_.INSTALL_METHOD__V2055*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING__V89*/ meltfptr[88]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2055*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:2797:/ 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___V1498*/ meltfptr[1497]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1517*/ meltfptr[1516]; /*_.INSTALL_METHOD__V2056*/ meltfptr[2017] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_LIST_BINDING__V90*/ meltfptr[89]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2056*/ meltfptr[2017] = 0; } MELT_LOCATION ("warmelt-genobj.melt:2852:/ 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___V1498*/ meltfptr[1497]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1521*/ meltfptr[1520]; /*_.INSTALL_METHOD__V2057*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING__V91*/ meltfptr[90]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2057*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:3066:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1531*/ meltfptr[1530]; /*_.INSTALL_METHOD__V2058*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_LETREC__V95*/ meltfptr[94]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2058*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:3208:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1542*/ meltfptr[1541]; /*_.INSTALL_METHOD__V2059*/ meltfptr[2017] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_CITERATION__V97*/ meltfptr[96]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2059*/ meltfptr[2017] = 0; } MELT_LOCATION ("warmelt-genobj.melt:3234:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1548*/ meltfptr[1547]; /*_.INSTALL_METHOD__V2060*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_SETQ__V99*/ meltfptr[98]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2060*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:3264:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1553*/ meltfptr[1552]; /*_.INSTALL_METHOD__V2061*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_PROGN__V100*/ meltfptr[99]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2061*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:3314:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1558*/ meltfptr[1557]; /*_.INSTALL_METHOD__V2062*/ meltfptr[2017] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_MULTACC__V101*/ meltfptr[100]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2062*/ meltfptr[2017] = 0; } MELT_LOCATION ("warmelt-genobj.melt:3368:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1563*/ meltfptr[1562]; /*_.INSTALL_METHOD__V2063*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_FIELDACC__V102*/ meltfptr[101]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2063*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:3389:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1571*/ meltfptr[1570]; /*_.INSTALL_METHOD__V2064*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_UNSAFE_GET_FIELD__V105*/ meltfptr[104]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2064*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:3442:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1577*/ meltfptr[1576]; /*_.INSTALL_METHOD__V2065*/ meltfptr[2017] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_UNSAFE_PUT_FIELDS__V106*/ meltfptr[105]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2065*/ meltfptr[2017] = 0; } MELT_LOCATION ("warmelt-genobj.melt:3458:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1583*/ meltfptr[1582]; /*_.INSTALL_METHOD__V2066*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_CHECKSIGNAL__V108*/ meltfptr[107]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2066*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:3477:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1587*/ meltfptr[1586]; /*_.INSTALL_METHOD__V2067*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_UNSAFE_NTH_COMPONENT__V109*/ meltfptr[108]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2067*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:3509:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1592*/ meltfptr[1591]; /*_.INSTALL_METHOD__V2068*/ meltfptr[2017] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_APPLY__V110*/ meltfptr[109]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2068*/ meltfptr[2017] = 0; } MELT_LOCATION ("warmelt-genobj.melt:3589:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1601*/ meltfptr[1600]; /*_.INSTALL_METHOD__V2069*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_MULTIAPPLY__V111*/ meltfptr[110]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2069*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:3630:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1606*/ meltfptr[1605]; /*_.INSTALL_METHOD__V2070*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_MSEND__V112*/ meltfptr[111]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2070*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:3716:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1614*/ meltfptr[1613]; /*_.INSTALL_METHOD__V2071*/ meltfptr[2017] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_MULTIMSEND__V113*/ meltfptr[112]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2071*/ meltfptr[2017] = 0; } MELT_LOCATION ("warmelt-genobj.melt:3730:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1618*/ meltfptr[1617]; /*_.INSTALL_METHOD__V2072*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V48*/ meltfptr[47]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2072*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:3747:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1620*/ meltfptr[1619]; /*_.INSTALL_METHOD__V2073*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_VALUE_BINDING__V92*/ meltfptr[91]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2073*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:3760:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1622*/ meltfptr[1621]; /*_.INSTALL_METHOD__V2074*/ meltfptr[2017] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_FIXED_BINDING__V49*/ meltfptr[48]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2074*/ meltfptr[2017] = 0; } MELT_LOCATION ("warmelt-genobj.melt:3776:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1624*/ meltfptr[1623]; /*_.INSTALL_METHOD__V2075*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V84*/ meltfptr[83]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2075*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:3821:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1626*/ meltfptr[1625]; /*_.INSTALL_METHOD__V2076*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING__V86*/ meltfptr[85]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2076*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:3865:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1628*/ meltfptr[1627]; /*_.INSTALL_METHOD__V2077*/ meltfptr[2017] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING__V88*/ meltfptr[87]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2077*/ meltfptr[2017] = 0; } MELT_LOCATION ("warmelt-genobj.melt:3904:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1630*/ meltfptr[1629]; /*_.INSTALL_METHOD__V2078*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING__V89*/ meltfptr[88]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2078*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:3939:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1632*/ meltfptr[1631]; /*_.INSTALL_METHOD__V2079*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_LIST_BINDING__V90*/ meltfptr[89]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2079*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:3985:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1634*/ meltfptr[1633]; /*_.INSTALL_METHOD__V2080*/ meltfptr[2017] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING__V91*/ meltfptr[90]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2080*/ meltfptr[2017] = 0; } MELT_LOCATION ("warmelt-genobj.melt:4049:/ 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___V1171*/ meltfptr[1170]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1636*/ meltfptr[1635]; /*_.INSTALL_METHOD__V2081*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.VALDATA___V174*/ meltfptr[173]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2081*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:4074:/ 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___V1171*/ meltfptr[1170]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1638*/ meltfptr[1637]; /*_.INSTALL_METHOD__V2082*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.DISCR_INTEGER__V38*/ meltfptr[37]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2082*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:4100:/ 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___V1171*/ meltfptr[1170]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1640*/ meltfptr[1639]; /*_.INSTALL_METHOD__V2083*/ meltfptr[2017] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.DISCR_STRING__V37*/ meltfptr[36]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2083*/ meltfptr[2017] = 0; } MELT_LOCATION ("warmelt-genobj.melt:4125:/ 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___V1171*/ meltfptr[1170]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1644*/ meltfptr[1643]; /*_.INSTALL_METHOD__V2084*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.DISCR_NULL_RECEIVER__V115*/ meltfptr[114]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2084*/ meltfptr[2018] = 0; } #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_41 */ void meltmod__warmelt_genobj__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-genobj.melt:4149:/ 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___V1171*/ meltfptr[1170]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1648*/ meltfptr[1647]; /*_.INSTALL_METHOD__V2085*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.VALDATA___V504*/ meltfptr[503]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2085*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:4164:/ 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___V1171*/ meltfptr[1170]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1650*/ meltfptr[1649]; /*_.INSTALL_METHOD__V2086*/ meltfptr[2017] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.VALDATA___V548*/ meltfptr[547]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2086*/ meltfptr[2017] = 0; } MELT_LOCATION ("warmelt-genobj.melt:4187:/ 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___V1171*/ meltfptr[1170]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1652*/ meltfptr[1651]; /*_.INSTALL_METHOD__V2087*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.VALDATA___V596*/ meltfptr[595]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2087*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:4196:/ 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___V1171*/ meltfptr[1170]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1654*/ meltfptr[1653]; /*_.INSTALL_METHOD__V2088*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.VALDATA___V610*/ meltfptr[609]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2088*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:4229:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1656*/ meltfptr[1655]; /*_.INSTALL_METHOD__V2089*/ meltfptr[2017] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_IF__V116*/ meltfptr[115]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2089*/ meltfptr[2017] = 0; } MELT_LOCATION ("warmelt-genobj.melt:4263:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1660*/ meltfptr[1659]; /*_.INSTALL_METHOD__V2090*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_IFISA__V117*/ meltfptr[116]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2090*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:4296:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1666*/ meltfptr[1665]; /*_.INSTALL_METHOD__V2091*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_IFTUPLESIZED__V119*/ meltfptr[118]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2091*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:4383:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1670*/ meltfptr[1669]; /*_.INSTALL_METHOD__V2092*/ meltfptr[2017] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_IFVARIADIC__V120*/ meltfptr[119]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2092*/ meltfptr[2017] = 0; } MELT_LOCATION ("warmelt-genobj.melt:4388:/ 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 *) & /*_.GET_CTYPE__V25*/ meltfptr[24]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1674*/ meltfptr[1673]; /*_.INSTALL_METHOD__V2093*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_IFVARIADIC__V120*/ meltfptr[119]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2093*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:4437:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1676*/ meltfptr[1675]; /*_.INSTALL_METHOD__V2094*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_VARIADIC_ARGUMENT__V121*/ meltfptr[120]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2094*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:4476:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1680*/ meltfptr[1679]; /*_.INSTALL_METHOD__V2095*/ meltfptr[2017] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_CONSUME_VARIADIC__V122*/ meltfptr[121]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2095*/ meltfptr[2017] = 0; } MELT_LOCATION ("warmelt-genobj.melt:4493:/ 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___V1171*/ meltfptr[1170]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1684*/ meltfptr[1683]; /*_.INSTALL_METHOD__V2096*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.VALDATA___V648*/ meltfptr[647]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2096*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:4518:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1686*/ meltfptr[1685]; /*_.INSTALL_METHOD__V2097*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_CPPIF__V123*/ meltfptr[122]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2097*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:4536:/ 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___V1171*/ meltfptr[1170]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1690*/ meltfptr[1689]; /*_.INSTALL_METHOD__V2098*/ meltfptr[2017] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.VALDATA___V666*/ meltfptr[665]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2098*/ meltfptr[2017] = 0; } MELT_LOCATION ("warmelt-genobj.melt:4602:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1692*/ meltfptr[1691]; /*_.INSTALL_METHOD__V2099*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_RETURN__V124*/ meltfptr[123]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2099*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:4604:/ initchunk"); /*^block */ /*anyblock */ { MELT_LOCATION ("warmelt-genobj.melt:4605:/ quasiblock"); /*^newclosure */ /*newclosure *//*_.LAMBDA___V2101*/ meltfptr[2017] = (melt_ptr_t) meltgc_new_closure ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))), (meltroutine_ptr_t) ( /*_.VALROUT___V1695*/ meltfptr[1694]), (0)); ; /*_.LAMBDA___V2100*/ meltfptr[2016] = /*_.LAMBDA___V2101*/ meltfptr[2017];; MELT_LOCATION ("warmelt-genobj.melt:4604:/ 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 *) & /*_.GET_CTYPE__V25*/ meltfptr[24]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.LAMBDA___V2100*/ meltfptr[2016]; /*_.INSTALL_METHOD__V2102*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_RETURN__V124*/ meltfptr[123]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.LAMBDA___V2100*/ meltfptr[2016] = 0; /*^clear */ /*clear *//*_.INSTALL_METHOD__V2102*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:4662:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1703*/ meltfptr[1702]; /*_.INSTALL_METHOD__V2103*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_LAMBDA__V125*/ meltfptr[124]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2103*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:4729:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1711*/ meltfptr[1710]; /*_.INSTALL_METHOD__V2104*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_INSTANCE__V126*/ meltfptr[125]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2104*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:4739:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1715*/ meltfptr[1714]; /*_.INSTALL_METHOD__V2105*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_ROUTPROC__V34*/ meltfptr[33]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2105*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:4750:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1717*/ meltfptr[1716]; /*_.INSTALL_METHOD__V2106*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_PREDEF__V127*/ meltfptr[126]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2106*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:4956:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1735*/ meltfptr[1734]; /*_.INSTALL_METHOD__V2107*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_DATASYMBOL__V56*/ meltfptr[55]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2107*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:5033:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1737*/ meltfptr[1736]; /*_.INSTALL_METHOD__V2108*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_DATAINSTANCE__V104*/ meltfptr[103]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2108*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:5103:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1745*/ meltfptr[1744]; /*_.INSTALL_METHOD__V2109*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_DATATUPLE__V128*/ meltfptr[127]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2109*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:5150:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1751*/ meltfptr[1750]; /*_.INSTALL_METHOD__V2110*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_DATASTRING__V129*/ meltfptr[128]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2110*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:5194:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1757*/ meltfptr[1756]; /*_.INSTALL_METHOD__V2111*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_DATABOXEDINTEGER__V130*/ meltfptr[129]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2111*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:5280:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1766*/ meltfptr[1765]; /*_.INSTALL_METHOD__V2112*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_DATACLOSURE__V131*/ meltfptr[130]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2112*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:5400:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1777*/ meltfptr[1776]; /*_.INSTALL_METHOD__V2113*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_DATAROUTINE__V132*/ meltfptr[131]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2113*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:5409:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1781*/ meltfptr[1780]; /*_.INSTALL_METHOD__V2114*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V134*/ meltfptr[133]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2114*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:5419:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1785*/ meltfptr[1784]; /*_.INSTALL_METHOD__V2115*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT__V135*/ meltfptr[134]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2115*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:5457:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1789*/ meltfptr[1788]; /*_.INSTALL_METHOD__V2116*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_STORE_PREDEFINED__V136*/ meltfptr[135]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2116*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:5545:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1795*/ meltfptr[1794]; /*_.INSTALL_METHOD__V2117*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V137*/ meltfptr[136]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2117*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:5646:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1803*/ meltfptr[1802]; /*_.INSTALL_METHOD__V2118*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER__V138*/ meltfptr[137]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2118*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:5660:/ 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___V2119*/ meltfptr[2016] = slot; }; ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1810*/ meltfptr[1809]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : COMPILE_MATCHER */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2119*/ meltfptr[2016]), (melt_ptr_t) ( /*_.VALDATA___V1808*/ meltfptr[1807]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.VALUEXPORTER___V2119*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:5671:/ 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___V2120*/ meltfptr[2018] = slot; }; ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1816*/ meltfptr[1815]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_MATCHCOMPILCONTEXT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2120*/ meltfptr[2018]), (melt_ptr_t) ( /*_.VALDATA___V1812*/ meltfptr[1811]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1819*/ meltfptr[1818]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : MCX_LOC */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2120*/ meltfptr[2018]), (melt_ptr_t) ( /*_.VALDATA___V1834*/ meltfptr[1833]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1821*/ meltfptr[1820]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : MCX_NORMTESTER */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2120*/ meltfptr[2018]), (melt_ptr_t) ( /*_.VALDATA___V1836*/ meltfptr[1835]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1823*/ meltfptr[1822]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : MCX_GOTOTHEN */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2120*/ meltfptr[2018]), (melt_ptr_t) ( /*_.VALDATA___V1838*/ meltfptr[1837]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1825*/ meltfptr[1824]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : MCX_GOTOELSE */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2120*/ meltfptr[2018]), (melt_ptr_t) ( /*_.VALDATA___V1840*/ meltfptr[1839]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1827*/ meltfptr[1826]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : MCX_OLIST */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2120*/ meltfptr[2018]), (melt_ptr_t) ( /*_.VALDATA___V1842*/ meltfptr[1841]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1829*/ meltfptr[1828]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : MCX_SUFFIX */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2120*/ meltfptr[2018]), (melt_ptr_t) ( /*_.VALDATA___V1844*/ meltfptr[1843]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1831*/ meltfptr[1830]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : MCX_STATECOUNTER */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2120*/ meltfptr[2018]), (melt_ptr_t) ( /*_.VALDATA___V1846*/ meltfptr[1845]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.VALUEXPORTER___V2120*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:5685:/ 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___V2121*/ meltfptr[2016] = slot; }; ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1856*/ meltfptr[1855]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : COMPILE_TESTER */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2121*/ meltfptr[2016]), (melt_ptr_t) ( /*_.VALDATA___V1848*/ meltfptr[1847]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.VALUEXPORTER___V2121*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:5692:/ 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___V2122*/ meltfptr[2018] = slot; }; ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1860*/ meltfptr[1859]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_TESTERCOMPILCONTEXT */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2122*/ meltfptr[2018]), (melt_ptr_t) ( /*_.VALDATA___V1858*/ meltfptr[1857]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1863*/ meltfptr[1862]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : TCX_NRMATCH */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2122*/ meltfptr[2018]), (melt_ptr_t) ( /*_.VALDATA___V1870*/ meltfptr[1869]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1865*/ meltfptr[1864]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : TCX_FREELIST */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2122*/ meltfptr[2018]), (melt_ptr_t) ( /*_.VALDATA___V1872*/ meltfptr[1871]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1867*/ meltfptr[1866]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : TCX_NEXTEST */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2122*/ meltfptr[2018]), (melt_ptr_t) ( /*_.VALDATA___V1874*/ meltfptr[1873]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.VALUEXPORTER___V2122*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:5706:/ 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___V1856*/ meltfptr[1855]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1877*/ meltfptr[1876]; /*_.INSTALL_METHOD__V2123*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANY__V141*/ meltfptr[140]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2123*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:5900:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1884*/ meltfptr[1883]; /*_.INSTALL_METHOD__V2124*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_MATCH__V142*/ meltfptr[141]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2124*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:5916:/ 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___V2125*/ meltfptr[2016] = slot; }; ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1899*/ meltfptr[1898]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_ALTERNATE_MATCH_NREP_DATA */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2125*/ meltfptr[2016]), (melt_ptr_t) ( /*_.VALDATA___V1895*/ meltfptr[1894]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1902*/ meltfptr[1901]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : ALTMATCHN_PREV */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2125*/ meltfptr[2016]), (melt_ptr_t) ( /*_.VALDATA___V1911*/ meltfptr[1910]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1904*/ meltfptr[1903]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : ALTMATCHN_NREP */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2125*/ meltfptr[2016]), (melt_ptr_t) ( /*_.VALDATA___V1913*/ meltfptr[1912]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1906*/ meltfptr[1905]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : ALTMATCHN_FLAGMAP */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2125*/ meltfptr[2016]), (melt_ptr_t) ( /*_.VALDATA___V1915*/ meltfptr[1914]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*^apply */ /*apply */ { union meltparam_un argtab[2]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.VALDATA___V1908*/ meltfptr[1907]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : ALTMATCHN_DATAMAP */ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) ( /*_.VALUEXPORTER___V2125*/ meltfptr[2016]), (melt_ptr_t) ( /*_.VALDATA___V1917*/ meltfptr[1916]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.VALUEXPORTER___V2125*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:5988:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1921*/ meltfptr[1920]; /*_.INSTALL_METHOD__V2126*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_ALTMATCH__V148*/ meltfptr[147]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2126*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:6014:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1925*/ meltfptr[1924]; /*_.INSTALL_METHOD__V2127*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_MATCH_LABEL__V149*/ meltfptr[148]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2127*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:6049:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1931*/ meltfptr[1930]; /*_.INSTALL_METHOD__V2128*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_MATCH_FLAG__V151*/ meltfptr[150]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2128*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:6088:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1939*/ meltfptr[1938]; /*_.INSTALL_METHOD__V2129*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_MATCH_DATA_INITIALIZER__V153*/ meltfptr[152]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2129*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:6114:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1951*/ meltfptr[1950]; /*_.INSTALL_METHOD__V2130*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_MATCHED_DATA__V155*/ meltfptr[154]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2130*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:6138:/ 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 *) & /*_.COMPILE_OBJ__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1953*/ meltfptr[1952]; /*_.INSTALL_METHOD__V2131*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NREP_MATCH_JUMP__V158*/ meltfptr[157]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2131*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:6304:/ 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___V1856*/ meltfptr[1855]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1966*/ meltfptr[1965]; /*_.INSTALL_METHOD__V2132*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANY__V141*/ meltfptr[140]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2132*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:6377:/ 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___V1856*/ meltfptr[1855]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1968*/ meltfptr[1967]; /*_.INSTALL_METHOD__V2133*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NORMTESTER_MATCHER__V159*/ meltfptr[158]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2133*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:6474:/ 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___V1856*/ meltfptr[1855]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1972*/ meltfptr[1971]; /*_.INSTALL_METHOD__V2134*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NORMTESTER_INSTANCE__V160*/ meltfptr[159]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2134*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:6573:/ 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___V1856*/ meltfptr[1855]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1976*/ meltfptr[1975]; /*_.INSTALL_METHOD__V2135*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NORMTESTER_TUPLE__V161*/ meltfptr[160]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2135*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:6643:/ 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___V1856*/ meltfptr[1855]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1980*/ meltfptr[1979]; /*_.INSTALL_METHOD__V2136*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NORMTESTER_SAME__V162*/ meltfptr[161]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2136*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:6675:/ 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___V1856*/ meltfptr[1855]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1984*/ meltfptr[1983]; /*_.INSTALL_METHOD__V2137*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NORMTESTER_SUCCESS__V144*/ meltfptr[143]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2137*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:6725:/ 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___V1856*/ meltfptr[1855]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1986*/ meltfptr[1985]; /*_.INSTALL_METHOD__V2138*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NORMTESTER_OR_CLEAR__V163*/ meltfptr[162]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2138*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:6773:/ 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___V1856*/ meltfptr[1855]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1990*/ meltfptr[1989]; /*_.INSTALL_METHOD__V2139*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NORMTESTER_OR_TRANSMIT__V164*/ meltfptr[163]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2139*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:6816:/ 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___V1856*/ meltfptr[1855]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V1994*/ meltfptr[1993]; /*_.INSTALL_METHOD__V2140*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_NORMTESTER_DISJUNCTION__V165*/ meltfptr[164]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2140*/ meltfptr[2018] = 0; } MELT_LOCATION ("warmelt-genobj.melt:6973:/ 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___V1810*/ meltfptr[1809]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V2002*/ meltfptr[2001]; /*_.INSTALL_METHOD__V2141*/ meltfptr[2016] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_CMATCHER__V166*/ meltfptr[165]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2141*/ meltfptr[2016] = 0; } MELT_LOCATION ("warmelt-genobj.melt:7086:/ 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___V1810*/ meltfptr[1809]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*_.VALCLO___V2012*/ meltfptr[2011]; /*_.INSTALL_METHOD__V2142*/ meltfptr[2018] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.CLASS_FUNMATCHER__V168*/ meltfptr[167]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } ; /*epilog */ /*^clear */ /*clear *//*_.INSTALL_METHOD__V2142*/ meltfptr[2018] = 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_OBJVALUE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V170*/ meltfptr[169])); /*internsym:CLASS_GENERATED_C_CODE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V172*/ meltfptr[171])); /*internsym:OBV_TYPE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V180*/ meltfptr[179])); /*internsym:CLASS_OBJPUREVALUE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V182*/ meltfptr[181])); /*internsym:CLASS_OBJLOCV */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V188*/ meltfptr[187])); /*internsym:OBL_OFF */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V200*/ meltfptr[199])); /*internsym:OBL_PROC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V202*/ meltfptr[201])); /*internsym:OBL_CNAME */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V204*/ meltfptr[203])); /*internsym:CLASS_OBJCLOCCV */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V206*/ meltfptr[205])); /*internsym:OBC_OFF */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V218*/ meltfptr[217])); /*internsym:OBC_PROC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V220*/ meltfptr[219])); /*internsym:OBC_NAME */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V222*/ meltfptr[221])); /*internsym:CLASS_OBJCONSTV */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V224*/ meltfptr[223])); /*internsym:CLASS_OBJPREDEF */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V230*/ meltfptr[229])); /*internsym:OBPREDEF */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V238*/ meltfptr[237])); /*internsym:CLASS_OBJNIL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V240*/ meltfptr[239])); /*internsym:CLASS_OBJEXPANDPUREVAL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V246*/ meltfptr[245])); /*internsym:OXPURVAL_LOC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V258*/ meltfptr[257])); /*internsym:OXPURVAL_COMM */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V260*/ meltfptr[259])); /*internsym:OXPURVAL_CONT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V262*/ meltfptr[261])); /*internsym:CLASS_OBJINITELEM */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V264*/ meltfptr[263])); /*internsym:OIE_CNAME */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V278*/ meltfptr[277])); /*internsym:OIE_DATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V280*/ meltfptr[279])); /*internsym:OIE_DISCR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V282*/ meltfptr[281])); /*internsym:OIE_LOCVAR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V284*/ meltfptr[283])); /*internsym:CLASS_OBJINITOBJECT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V286*/ meltfptr[285])); /*internsym:OIO_PREDEF */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V296*/ meltfptr[295])); /*internsym:OIO_CLASS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V298*/ meltfptr[297])); /*internsym:CLASS_OBJINITUNIQUEOBJECT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V300*/ meltfptr[299])); /*internsym:CLASS_OBJINITMULTIPLE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V306*/ meltfptr[305])); /*internsym:OIM_TUPVAL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V314*/ meltfptr[313])); /*internsym:CLASS_OBJINITCLOSURE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V316*/ meltfptr[315])); /*internsym:OICLO_ROUT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V324*/ meltfptr[323])); /*internsym:CLASS_OBJINITROUTINE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V326*/ meltfptr[325])); /*internsym:OIR_PROCROUTINE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V334*/ meltfptr[333])); /*internsym:CLASS_OBJINITSTRING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V336*/ meltfptr[335])); /*internsym:CLASS_OBJINITPAIR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V342*/ meltfptr[341])); /*internsym:CLASS_OBJINITLIST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V348*/ meltfptr[347])); /*internsym:CLASS_OBJINITBOXINTEGER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V354*/ meltfptr[353])); /*internsym:CLASS_OBJEXPV */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V360*/ meltfptr[359])); /*internsym:OBX_CONT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V368*/ meltfptr[367])); /*internsym:CLASS_OBJLOCATEDEXPV */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V370*/ meltfptr[369])); /*internsym:OBCX_LOC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V378*/ meltfptr[377])); /*internsym:CLASS_OBJFLAG */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V380*/ meltfptr[379])); /*internsym:OBFLAG_MATCHFLAG */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V392*/ meltfptr[391])); /*internsym:OBFLAG_NAME */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V394*/ meltfptr[393])); /*internsym:OBFLAG_RANK */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V396*/ meltfptr[395])); /*internsym:CLASS_OBJINSTR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V398*/ meltfptr[397])); /*internsym:OBI_LOC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V406*/ meltfptr[405])); /*internsym:CLASS_OBJCOMMENTINSTR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V408*/ meltfptr[407])); /*internsym:OBCI_COMMENT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V416*/ meltfptr[415])); /*internsym:CLASS_OBJCHECKSIGNAL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V418*/ meltfptr[417])); /*internsym:CLASS_OBJDESTINSTR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V424*/ meltfptr[423])); /*internsym:OBDI_DESTLIST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V432*/ meltfptr[431])); /*internsym:CLASS_OBJCOMPUTE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V434*/ meltfptr[433])); /*internsym:OBCPT_EXPR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V444*/ meltfptr[443])); /*internsym:OBCPT_TYPE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V446*/ meltfptr[445])); /*internsym:CLASS_OBJGETARG */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V448*/ meltfptr[447])); /*internsym:OBARG_OBLOC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V458*/ meltfptr[457])); /*internsym:OBARG_BIND */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V460*/ meltfptr[459])); /*internsym:CLASS_OBJGETARGREST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V462*/ meltfptr[461])); /*internsym:OBARG_REST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V470*/ meltfptr[469])); /*internsym:CLASS_OBJPUTXTRARESULT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471])); /*internsym:OBXRES_RANK */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V482*/ meltfptr[481])); /*internsym:OBXRES_OBLOC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V484*/ meltfptr[483])); /*internsym:CLASS_OBJFINALRETURN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V486*/ meltfptr[485])); /*internsym:CLASS_OBJCLEAR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V492*/ meltfptr[491])); /*internsym:OCLR_VLOC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V500*/ meltfptr[499])); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_42 */ void meltmod__warmelt_genobj__initialmeltchunk_43 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*internsym:CLASS_OBJANYBLOCK*/ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V502*/ meltfptr[501])); /*internsym:OBLO_BODYL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V512*/ meltfptr[511])); /*internsym:OBLO_EPIL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V514*/ meltfptr[513])); /*internsym:CLASS_OBJPLAINBLOCK */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V516*/ meltfptr[515])); /*internsym:CLASS_OBJMULTIALLOCBLOCK */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V522*/ meltfptr[521])); /*internsym:OMALBLO_ALLSTRUCT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V532*/ meltfptr[531])); /*internsym:OMALBLO_NAME */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V534*/ meltfptr[533])); /*internsym:CLASS_OBJCOMMENTEDBLOCK */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V536*/ meltfptr[535])); /*internsym:OCOMBLO_COMMENT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V544*/ meltfptr[543])); /*internsym:CLASS_OBJMULTIBLOCK */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V546*/ meltfptr[545])); /*internsym:OMULBLO_SUBCOMP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V554*/ meltfptr[553])); /*internsym:CLASS_OBJMATCHFLAGBLOCK */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V556*/ meltfptr[555])); /*internsym:OMCHFLGBLO_FLAGS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V564*/ meltfptr[563])); /*internsym:CLASS_OBJLABELINSTR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V566*/ meltfptr[565])); /*internsym:OBLAB_PREFIX */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V576*/ meltfptr[575])); /*internsym:OBLAB_RANK */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V578*/ meltfptr[577])); /*internsym:CLASS_OBJGOTOINSTR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V580*/ meltfptr[579])); /*internsym:OBGOTO_PREFIX */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V590*/ meltfptr[589])); /*internsym:OBGOTO_RANK */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V592*/ meltfptr[591])); /*internsym:CLASS_OBJLOOP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V594*/ meltfptr[593])); /*internsym:OBLOOP_LABEL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V604*/ meltfptr[603])); /*internsym:OBLOOP_RESV */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V606*/ meltfptr[605])); /*internsym:CLASS_OBJEXIT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V608*/ meltfptr[607])); /*internsym:OBEXIT_LABEL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V616*/ meltfptr[615])); /*internsym:CLASS_OBJAGAIN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V618*/ meltfptr[617])); /*internsym:OBAGAIN_LABEL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V626*/ meltfptr[625])); /*internsym:CLASS_OBJCITERBLOCK */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V628*/ meltfptr[627])); /*internsym:OBCITER_CITER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V640*/ meltfptr[639])); /*internsym:OBCITER_BEFORE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V642*/ meltfptr[641])); /*internsym:OBCITER_AFTER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V644*/ meltfptr[643])); /*internsym:CLASS_OBJCOND */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V646*/ meltfptr[645])); /*internsym:OBCOND_TEST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V658*/ meltfptr[657])); /*internsym:OBCOND_THEN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V660*/ meltfptr[659])); /*internsym:OBCOND_ELSE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V662*/ meltfptr[661])); /*internsym:CLASS_OBJCPPIF */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V664*/ meltfptr[663])); /*internsym:OBIFP_COND */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V676*/ meltfptr[675])); /*internsym:OBIFP_THEN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V678*/ meltfptr[677])); /*internsym:OBIFP_ELSE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V680*/ meltfptr[679])); /*internsym:CLASS_OBJINTERNCOMMON */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V682*/ meltfptr[681])); /*internsym:OBINTERN_IOBJ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V690*/ meltfptr[689])); /*internsym:CLASS_OBJINTERNSYMBOL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V692*/ meltfptr[691])); /*internsym:CLASS_OBJINTERNKEYWORD */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V698*/ meltfptr[697])); /*internsym:CLASS_OBJGETNAMEDCOMMON */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V704*/ meltfptr[703])); /*internsym:OBGNAMED_IOBJ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V712*/ meltfptr[711])); /*internsym:CLASS_OBJGETNAMEDSYMBOL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V714*/ meltfptr[713])); /*internsym:CLASS_OBJGETNAMEDKEYWORD */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V720*/ meltfptr[719])); /*internsym:CLASS_OBJAPPLY */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V726*/ meltfptr[725])); /*internsym:OBAPP_CLOS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V736*/ meltfptr[735])); /*internsym:OBAPP_ARGS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V738*/ meltfptr[737])); /*internsym:CLASS_OBJMULTIAPPLY */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V740*/ meltfptr[739])); /*internsym:OBMULTAPP_XRES */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V748*/ meltfptr[747])); /*internsym:CLASS_OBJMSEND */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V750*/ meltfptr[749])); /*internsym:OBMSND_SEL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V762*/ meltfptr[761])); /*internsym:OBMSND_RECV */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V764*/ meltfptr[763])); /*internsym:OBMSND_ARGS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V766*/ meltfptr[765])); /*internsym:CLASS_OBJMULTIMSEND */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V768*/ meltfptr[767])); /*internsym:OBMULTSND_XRES */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V776*/ meltfptr[775])); /*internsym:CLASS_OBJRAWALLOCOBJ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V778*/ meltfptr[777])); /*internsym:OBRALLOBJ_CLASS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V790*/ meltfptr[789])); /*internsym:OBRALLOBJ_LEN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V792*/ meltfptr[791])); /*internsym:OBRALLOBJ_CLASSNAME */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V794*/ meltfptr[793])); /*internsym:CLASS_OBJDBGTRACEWRITEOBJ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V796*/ meltfptr[795])); /*internsym:OBDTW_WRITTENOBJ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V806*/ meltfptr[805])); /*internsym:OBDTW_MESSAGE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V808*/ meltfptr[807])); /*internsym:CLASS_OBJNEWCLOSURE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V810*/ meltfptr[809])); /*internsym:OBNCLO_DISCR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V822*/ meltfptr[821])); /*internsym:OBNCLO_ROUT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V824*/ meltfptr[823])); /*internsym:OBNCLO_LEN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V826*/ meltfptr[825])); /*internsym:CLASS_OBJPUTUPLE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V828*/ meltfptr[827])); /*internsym:OPUTU_TUPLED */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V840*/ meltfptr[839])); /*internsym:OPUTU_OFFSET */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V842*/ meltfptr[841])); /*internsym:OPUTU_VALUE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V844*/ meltfptr[843])); /*internsym:CLASS_OBJPUTPAIR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V846*/ meltfptr[845])); /*internsym:OPUTP_PAIR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V854*/ meltfptr[853])); /*internsym:CLASS_OBJPUTPAIRHEAD */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V856*/ meltfptr[855])); /*internsym:OPUTP_HEAD */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V864*/ meltfptr[863])); /*internsym:CLASS_OBJPUTPAIRTAIL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V866*/ meltfptr[865])); /*internsym:OPUTP_TAIL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V874*/ meltfptr[873])); /*internsym:CLASS_OBJPUTLIST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V876*/ meltfptr[875])); /*internsym:OPUTL_LIST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V888*/ meltfptr[887])); /*internsym:OPUTL_FIRST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V890*/ meltfptr[889])); /*internsym:OPUTL_LAST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V892*/ meltfptr[891])); /*internsym:CLASS_OBJPUTSLOT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V894*/ meltfptr[893])); /*internsym:OSLOT_ODATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V908*/ meltfptr[907])); /*internsym:OSLOT_OFFSET */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V910*/ meltfptr[909])); /*internsym:OSLOT_FIELD */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V912*/ meltfptr[911])); /*internsym:OSLOT_VALUE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V914*/ meltfptr[913])); /*internsym:CLASS_OBJGETSLOT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V916*/ meltfptr[915])); /*internsym:OGETSL_OBJ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V926*/ meltfptr[925])); /*internsym:OGETSL_FIELD */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V928*/ meltfptr[927])); /*internsym:CLASS_OBJPUTCLOSUROUT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V930*/ meltfptr[929])); /*internsym:OPCLOR_CLOS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V940*/ meltfptr[939])); /*internsym:OPCLOR_ROUT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V942*/ meltfptr[941])); /*internsym:CLASS_OBJPUTCLOSEDV */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V944*/ meltfptr[943])); /*internsym:OPCLOV_CLOS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V956*/ meltfptr[955])); /*internsym:OPCLOV_OFF */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V958*/ meltfptr[957])); /*internsym:OPCLOV_CVAL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V960*/ meltfptr[959])); /*internsym:CLASS_OBJPUTCLOSEDNOTNULLV */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V962*/ meltfptr[961])); /*internsym:CLASS_OBJPUTROUTCONST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V968*/ meltfptr[967])); /*internsym:OPRCONST_ROUT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V980*/ meltfptr[979])); /*internsym:OPRCONST_OFF */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V982*/ meltfptr[981])); /*internsym:OPRCONST_CVAL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V984*/ meltfptr[983])); /*internsym:CLASS_OBJPUTROUTCONSTNOTNULL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V986*/ meltfptr[985])); /*internsym:CLASS_OBJTOUCH */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V992*/ meltfptr[991])); /*internsym:OTOUCH_VAL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1002*/ meltfptr[1001])); /*internsym:OTOUCH_COMMENT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1004*/ meltfptr[1003])); /*internsym:CLASS_OBJSETPREDEF */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1006*/ meltfptr[1005])); /*internsym:OSPR_OBJECT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1016*/ meltfptr[1015])); /*internsym:OSPR_PREDEF */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1018*/ meltfptr[1017])); /*internsym:CLASS_ROUTINEOBJ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1020*/ meltfptr[1019])); /*internsym:CLASS_NAMED */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1022*/ meltfptr[1021])); /*internsym:OBROUT_PROC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1044*/ meltfptr[1043])); /*internsym:OBROUT_BODY */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1046*/ meltfptr[1045])); /*internsym:OBROUT_NBVAL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1048*/ meltfptr[1047])); /*internsym:OBROUT_NBLONG */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1050*/ meltfptr[1049])); /*internsym:OBROUT_OTHERS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1052*/ meltfptr[1051])); /*internsym:OBROUT_RETVAL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1054*/ meltfptr[1053])); /*internsym:OBROUT_CNTCITER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1056*/ meltfptr[1055])); /*internsym:OBROUT_CNTLETREC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1058*/ meltfptr[1057])); /*internsym:CLASS_PROCROUTINEOBJ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1060*/ meltfptr[1059])); /*internsym:OPROUT_GETARGS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1076*/ meltfptr[1075])); /*internsym:OPROUT_LOC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1078*/ meltfptr[1077])); /*internsym:OPROUT_FUNAM */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1080*/ meltfptr[1079])); /*internsym:OPROUT_RESTNAM */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1082*/ meltfptr[1081])); /*internsym:OPROUT_FILENUM */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1084*/ meltfptr[1083])); /*internsym:CLASS_INITIALROUTINEOBJ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1086*/ meltfptr[1085])); /*internsym:OIROUT_DATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1098*/ meltfptr[1097])); /*internsym:OIROUT_PROLOG */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1100*/ meltfptr[1099])); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_43 */ void meltmod__warmelt_genobj__initialmeltchunk_44 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*internsym:OIROUT_FILL*/ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1102*/ meltfptr[1101])); /*internsym:CLASS_INITIAL_MODULE_ROUTINEOBJ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1104*/ meltfptr[1103])); /*internsym:OIROUT_MODULENAME */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1112*/ meltfptr[1111])); /*internsym:CLASS_INITIAL_EXTENSION_ROUTINEOBJ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1114*/ meltfptr[1113])); /*internsym:OIROUTX_EXTENDNAME */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1122*/ meltfptr[1121])); /*internsym:CLASS_OBJBLOCK */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1124*/ meltfptr[1123])); /*internsym:CLASS_OBJCHECKINTERRUPT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1126*/ meltfptr[1125])); /*internsym:MELT_DEBUG_FUN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1130*/ meltfptr[1129])); /*internsym:DISCR_MIXED_INTEGER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1132*/ meltfptr[1131])); /*internsym:DISCR_MIXED_LOCATION */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1134*/ meltfptr[1133])); /*internsym:CLASS_CTYPE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1136*/ meltfptr[1135])); /*internsym:DISCR_LIST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1138*/ meltfptr[1137])); /*internsym:DISCR_CONSTANT_INTEGER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1140*/ meltfptr[1139])); /*internsym:DISCR_VERBATIM_STRING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1142*/ meltfptr[1141])); /*internsym:LIST_APPEND2LIST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1144*/ meltfptr[1143])); /*internsym:LIST_TO_MULTIPLE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1146*/ meltfptr[1145])); /*internsym:DISCR_MULTIPLE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1148*/ meltfptr[1147])); /*internsym:CTYPE_VOID */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1154*/ meltfptr[1153])); /*internsym:OUTPUT_C_DECLINIT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1156*/ meltfptr[1155])); /*internsym:CLASS_SELECTOR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1158*/ meltfptr[1157])); /*internsym:RECV */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1160*/ meltfptr[1159])); /*internsym:SBUF */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1163*/ meltfptr[1162])); /*internsym:PUT_OBJDEST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1169*/ meltfptr[1168])); /*internsym:OUTPUT_C_CODE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1173*/ meltfptr[1172])); /*internsym:DECLBUF */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1176*/ meltfptr[1175])); /*internsym:IMPLBUF */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1179*/ meltfptr[1178])); /*internsym:DEPTH */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1182*/ meltfptr[1181])); /*internsym:OUTPUT_C_INITIAL_FILL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1188*/ meltfptr[1187])); /*internsym:PTRSTR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1192*/ meltfptr[1191])); /*internsym:OUTPUT_C_INITIAL_PREDEF */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1199*/ meltfptr[1198])); /*internsym:PRTRSTR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1203*/ meltfptr[1202])); /*internsym:MAKE_OBJEXPANDPUREVAL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1210*/ meltfptr[1209])); /*internsym:INSTALL_METHOD */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1214*/ meltfptr[1213])); /*internsym:CLASS_NREP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1216*/ meltfptr[1215])); /*internsym:COMPILE_OBJ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1218*/ meltfptr[1217])); /*internsym:DISCR_ANY_RECEIVER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1224*/ meltfptr[1223])); /*internsym:GET_CTYPE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1228*/ meltfptr[1227])); /*internsym:CTYPE_VALUE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1232*/ meltfptr[1231])); /*internsym:DBGOUT_NAMEDOBJECT_METHOD */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1238*/ meltfptr[1237])); /*internsym:DBG_OUTPUT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1240*/ meltfptr[1239])); /*internsym:AS_NULL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1248*/ meltfptr[1247])); /*internsym:CLASS_CLONED_SYMBOL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1250*/ meltfptr[1249])); /*internsym:INTEGERBOX_OF */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1252*/ meltfptr[1251])); /*internsym:DISCR_STRBUF */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1254*/ meltfptr[1253])); /*internsym:CLASS_SYMBOL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1256*/ meltfptr[1255])); /*internsym:CLASS_NREP_ROUTPROC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1274*/ meltfptr[1273])); /*internsym:CLASS_MODULE_CONTEXT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1276*/ meltfptr[1275])); /*internsym:CLASS_NREP_DEFUNROUTPROC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1278*/ meltfptr[1277])); /*internsym:DISCR_STRING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1280*/ meltfptr[1279])); /*internsym:DISCR_INTEGER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1282*/ meltfptr[1281])); /*internsym:DISCR_MAP_OBJECTS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1284*/ meltfptr[1283])); /*internsym:CLASS_C_GENERATION_CONTEXT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1286*/ meltfptr[1285])); /*internsym:_RETVAL_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1265*/ meltfptr[1264])); /*internsym:MULTIPLE_MAP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1288*/ meltfptr[1287])); /*internsym:CLASS_FORMAL_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1290*/ meltfptr[1289])); /*internsym:CTYPE_LONG */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1292*/ meltfptr[1291])); /*internsym:LIST_EVERY */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1294*/ meltfptr[1293])); /*internsym:INITIALSYSTEMDATA_OBJPREDEF */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1296*/ meltfptr[1295])); /*internsym:INITIAL_SYSTEM_DATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1299*/ meltfptr[1298])); /*internsym:CLASS_NREP_INITPROC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1328*/ meltfptr[1327])); /*internsym:CLASS_INITIAL_GENERATION_CONTEXT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1330*/ meltfptr[1329])); /*internsym:LIST_MAP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1332*/ meltfptr[1331])); /*internsym:_RETINIT_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1308*/ meltfptr[1307])); /*internsym:_CONTENV_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1310*/ meltfptr[1309])); /*internsym:_FRESHENV_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1312*/ meltfptr[1311])); /*internsym:_PREVENV_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1314*/ meltfptr[1313])); /*internsym:_VALEXPORT_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1316*/ meltfptr[1315])); /*internsym:_VALIMPORT_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1318*/ meltfptr[1317])); /*internsym:CLASS_ANY_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1334*/ meltfptr[1333])); /*internsym:CLASS_FIXED_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1336*/ meltfptr[1335])); /*internsym:CLASS_NREP_SIMPLE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1338*/ meltfptr[1337])); /*internsym:SYSDATA_CONT_FRESH_ENV */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1340*/ meltfptr[1339])); /*internsym:CLASS_NREP_IMPORTEDVAL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1342*/ meltfptr[1341])); /*internsym:CLASS_NREP_BOUND_DATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1344*/ meltfptr[1343])); /*internsym:MULTIPLE_EVERY */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1346*/ meltfptr[1345])); /*internsym:CLASS_NREP_DATAKEYWORD */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1348*/ meltfptr[1347])); /*internsym:CLASS_NREP_DATASYMBOL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1350*/ meltfptr[1349])); /*internsym:SYSDATA_VALUE_IMPORTER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1352*/ meltfptr[1351])); /*internsym:CLASS_NREP_INITEXTENDPROC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1373*/ meltfptr[1372])); /*internsym:CLASS_RUNNING_EXTENSION_MODULE_CONTEXT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1375*/ meltfptr[1374])); /*internsym:CLASS_NREP_ANYPROC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1377*/ meltfptr[1376])); /*internsym:CLASS_EXTENSION_GENERATION_CONTEXT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1379*/ meltfptr[1378])); /*internsym:_RETRUNINIT_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1357*/ meltfptr[1356])); /*internsym:_OCURENVBOXLOC_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1359*/ meltfptr[1358])); /*internsym:_OCURENVLOC_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1361*/ meltfptr[1360])); /*internsym:_PREVENVLOC_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1363*/ meltfptr[1362])); /*internsym:_OLITVALUETUPLOC_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1365*/ meltfptr[1364])); /*internsym:CLASS_NREP_LITERALNAMEDVALUE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1381*/ meltfptr[1380])); /*internsym:CLASS_NREP_LITERALVALUE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1383*/ meltfptr[1382])); /*internsym:CLASS_LITERAL_VALUE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1385*/ meltfptr[1384])); /*internsym:REFERENCED_VALUE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1387*/ meltfptr[1386])); /*internsym:ENV_PREV */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1389*/ meltfptr[1388])); /*internsym:COMPILE2OBJ_INITPROC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1391*/ meltfptr[1390])); /*internsym:COMPILE2OBJ_INITEXTENDPROC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1393*/ meltfptr[1392])); /*internsym:COMPILE2OBJ_PROCEDURE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1395*/ meltfptr[1394])); /*internsym:VARIADIC_INDEX_IDSTR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1397*/ meltfptr[1396])); /*internsym:VARIADIC_LENGTH_IDSTR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1399*/ meltfptr[1398])); /*internsym:CLASS_LET_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1405*/ meltfptr[1404])); /*internsym:CLASS_NREP_CHUNK */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1410*/ meltfptr[1409])); /*internsym:CLASS_NREP_TYPED_EXPRESSION */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1414*/ meltfptr[1413])); /*internsym:CLASS_NREP_NIL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1418*/ meltfptr[1417])); /*internsym:CLASS_NREP_COMMENT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1422*/ meltfptr[1421])); /*internsym:CLASS_NREP_LOCSYMOCC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1426*/ meltfptr[1425])); /*internsym:CLASS_NREP_CLOSEDOCC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1430*/ meltfptr[1429])); /*internsym:CLASS_NREP_CONSTOCC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1434*/ meltfptr[1433])); /*internsym:STRING4OUT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1440*/ meltfptr[1439])); /*internsym:CLASS_NREP_DEFINED_CONSTANT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1444*/ meltfptr[1443])); /*internsym:CLASS_NREP_QUASICONSTANT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1448*/ meltfptr[1447])); /*internsym:CLASS_NREP_QUASICONST_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1452*/ meltfptr[1451])); /*internsym:CLASS_NREP_FOREVER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1457*/ meltfptr[1456])); /*internsym:CLASS_LABEL_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1459*/ meltfptr[1458])); /*internsym:CLASS_NREP_EXIT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1463*/ meltfptr[1462])); /*internsym:CLASS_NREP_AGAIN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1467*/ meltfptr[1466])); /*internsym:CLASS_NREP_LET */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1476*/ meltfptr[1475])); /*internsym:CLASS_NORMAL_LET_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1478*/ meltfptr[1477])); /*internsym:CLASS_SEXPR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1480*/ meltfptr[1479])); /*internsym:COMPILE_LETREC_FILL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1482*/ meltfptr[1481])); /*internsym:OBVA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1485*/ meltfptr[1484])); /*internsym:OBODL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1488*/ meltfptr[1487])); /*internsym:GCX */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1491*/ meltfptr[1490])); /*internsym:SLOC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1494*/ meltfptr[1493])); /*internsym:CLASS_NORMAL_CONSTRUCTED_LAMBDA_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1504*/ meltfptr[1503])); /*internsym:CLASS_NORMAL_CONSTRUCTOR_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1506*/ meltfptr[1505])); /*internsym:CLASS_NORMAL_CONSTRUCTED_TUPLE_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1510*/ meltfptr[1509])); /*internsym:CLASS_NORMAL_CONSTRUCTED_PAIR_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1514*/ meltfptr[1513])); /*internsym:CLASS_NORMAL_CONSTRUCTED_LIST_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1518*/ meltfptr[1517])); /*internsym:CLASS_NORMAL_CONSTRUCTED_INSTANCE_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1522*/ meltfptr[1521])); /*internsym:CLASS_VALUE_BINDING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1524*/ meltfptr[1523])); #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_44 */ void meltmod__warmelt_genobj__initialmeltchunk_45 (struct frame_melt_start_this_module_st *meltmeltframptr__, char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; /*internsym:CLASS_CLASS_BINDING*/ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1526*/ meltfptr[1525])); /*internsym:CLASS_CLASS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1528*/ meltfptr[1527])); /*internsym:CLASS_NREP_LETREC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1532*/ meltfptr[1531])); /*internsym:CLASS_NREP_SYMOCC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1534*/ meltfptr[1533])); /*internsym:CLASS_NREP_CITERATION */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1543*/ meltfptr[1542])); /*internsym:CLASS_CITERATOR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1545*/ meltfptr[1544])); /*internsym:CLASS_NREP_SETQ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1549*/ meltfptr[1548])); /*internsym:CLASS_NREP_PROGN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1554*/ meltfptr[1553])); /*internsym:CLASS_NREP_MULTACC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1559*/ meltfptr[1558])); /*internsym:CLASS_NREP_FIELDACC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1564*/ meltfptr[1563])); /*internsym:CLASS_FIELD */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1566*/ meltfptr[1565])); /*internsym:CLASS_NREP_DATAINSTANCE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1568*/ meltfptr[1567])); /*internsym:CLASS_NREP_UNSAFE_GET_FIELD */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1572*/ meltfptr[1571])); /*internsym:CLASS_NREP_UNSAFE_PUT_FIELDS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1578*/ meltfptr[1577])); /*internsym:CLASS_NREP_FIELDASSIGN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1580*/ meltfptr[1579])); /*internsym:CLASS_NREP_CHECKSIGNAL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1584*/ meltfptr[1583])); /*internsym:CLASS_NREP_UNSAFE_NTH_COMPONENT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1588*/ meltfptr[1587])); /*internsym:CLASS_NREP_APPLY */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1593*/ meltfptr[1592])); /*internsym:CLASS_NREP_MULTIAPPLY */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1602*/ meltfptr[1601])); /*internsym:CLASS_NREP_MSEND */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1607*/ meltfptr[1606])); /*internsym:CLASS_NREP_MULTIMSEND */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1615*/ meltfptr[1614])); /*internsym:CTYPE_CSTRING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1641*/ meltfptr[1640])); /*internsym:DISCR_NULL_RECEIVER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1645*/ meltfptr[1644])); /*internsym:CLASS_NREP_IF */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1657*/ meltfptr[1656])); /*internsym:CLASS_NREP_IFISA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1661*/ meltfptr[1660])); /*internsym:CLASS_NREP_IFTESTVALUE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1663*/ meltfptr[1662])); /*internsym:CLASS_NREP_IFTUPLESIZED */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1667*/ meltfptr[1666])); /*internsym:CLASS_NREP_IFVARIADIC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1671*/ meltfptr[1670])); /*internsym:CLASS_NREP_VARIADIC_ARGUMENT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1677*/ meltfptr[1676])); /*internsym:CLASS_NREP_CONSUME_VARIADIC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1681*/ meltfptr[1680])); /*internsym:CLASS_NREP_CPPIF */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1687*/ meltfptr[1686])); /*internsym:CLASS_NREP_RETURN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1693*/ meltfptr[1692])); /*internsym:DISCRCLOSURE_OBJPREDEF */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1696*/ meltfptr[1695])); /*internsym:DISCR_CLOSURE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1699*/ meltfptr[1698])); /*internsym:CLASS_NREP_LAMBDA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1704*/ meltfptr[1703])); /*internsym:CLASS_NREP_INSTANCE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1712*/ meltfptr[1711])); /*internsym:INST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1707*/ meltfptr[1706])); /*internsym:CLASS_NREP_PREDEF */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1718*/ meltfptr[1717])); /*internsym:_VALDATA_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1721*/ meltfptr[1720])); /*internsym:_VALUEDATA_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1723*/ meltfptr[1722])); /*internsym:CLASS_NREP_DATATUPLE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1746*/ meltfptr[1745])); /*internsym:_VALTUP_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1740*/ meltfptr[1739])); /*internsym:_INITUP_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1742*/ meltfptr[1741])); /*internsym:CLASS_NREP_DATASTRING */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1752*/ meltfptr[1751])); /*internsym:_VALSTR_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1749*/ meltfptr[1748])); /*internsym:CLASS_NREP_DATABOXEDINTEGER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1758*/ meltfptr[1757])); /*internsym:_VALBXINT_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1755*/ meltfptr[1754])); /*internsym:CLASS_NREP_DATACLOSURE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1767*/ meltfptr[1766])); /*internsym:_VALCLO_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1761*/ meltfptr[1760])); /*internsym:_DATACLOSURE_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1763*/ meltfptr[1762])); /*internsym:CLASS_NREP_DATAROUTINE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1769*/ meltfptr[1768])); /*internsym:_VALROUT_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1772*/ meltfptr[1771])); /*internsym:_IROUTVAL_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1774*/ meltfptr[1773])); /*internsym:CLASS_NREP_QUASIDATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1778*/ meltfptr[1777])); /*internsym:CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1782*/ meltfptr[1781])); /*internsym:CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1786*/ meltfptr[1785])); /*internsym:CLASS_NREP_STORE_PREDEFINED */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1790*/ meltfptr[1789])); /*internsym:CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1796*/ meltfptr[1795])); /*internsym:CLASS_NREP_CHECK_RUNNING_MODULE_ENVIRONMENT_CONTAINER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1804*/ meltfptr[1803])); /*internsym:_CURMODENV_ */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1799*/ meltfptr[1798])); /*internsym:ADD2OUT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1806*/ meltfptr[1805])); /*internsym:COMPILE_MATCHER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1808*/ meltfptr[1807])); /*internsym:CLASS_MATCHCOMPILCONTEXT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1812*/ meltfptr[1811])); /*internsym:CLASS_PROPED */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1814*/ meltfptr[1813])); /*internsym:MCX_LOC */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1834*/ meltfptr[1833])); /*internsym:MCX_NORMTESTER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1836*/ meltfptr[1835])); /*internsym:MCX_GOTOTHEN */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1838*/ meltfptr[1837])); /*internsym:MCX_GOTOELSE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1840*/ meltfptr[1839])); /*internsym:MCX_OLIST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1842*/ meltfptr[1841])); /*internsym:MCX_SUFFIX */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1844*/ meltfptr[1843])); /*internsym:MCX_STATECOUNTER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1846*/ meltfptr[1845])); /*internsym:COMPILE_TESTER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1848*/ meltfptr[1847])); /*internsym:TCX */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1852*/ meltfptr[1851])); /*internsym:CLASS_TESTERCOMPILCONTEXT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1858*/ meltfptr[1857])); /*internsym:TCX_NRMATCH */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1870*/ meltfptr[1869])); /*internsym:TCX_FREELIST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1872*/ meltfptr[1871])); /*internsym:TCX_NEXTEST */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1874*/ meltfptr[1873])); /*internsym:CLASS_NORMTESTER_ANY */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1878*/ meltfptr[1877])); /*internsym:CLASS_NREP_MATCH */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1885*/ meltfptr[1884])); /*internsym:CLASS_NORMTESTER_ANYTESTER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1887*/ meltfptr[1886])); /*internsym:CLASS_NORMTESTER_SUCCESS */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1889*/ meltfptr[1888])); /*internsym:MAPOBJECT_EVERY */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1891*/ meltfptr[1890])); /*internsym:LIST_FIND */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1893*/ meltfptr[1892])); /*internsym:CLASS_ALTERNATE_MATCH_NREP_DATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1895*/ meltfptr[1894])); /*internsym:CLASS_ROOT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1897*/ meltfptr[1896])); /*internsym:ALTMATCHN_PREV */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1911*/ meltfptr[1910])); /*internsym:ALTMATCHN_NREP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1913*/ meltfptr[1912])); /*internsym:ALTMATCHN_FLAGMAP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1915*/ meltfptr[1914])); /*internsym:ALTMATCHN_DATAMAP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1917*/ meltfptr[1916])); /*internsym:CLASS_NREP_ALTMATCH */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1922*/ meltfptr[1921])); /*internsym:CLASS_NREP_MATCH_LABEL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1926*/ meltfptr[1925])); /*internsym:CLASS_MATCH_STEP_WITH_DATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1928*/ meltfptr[1927])); /*internsym:CLASS_NREP_MATCH_FLAG */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1932*/ meltfptr[1931])); /*internsym:CLASS_MATCH_FLAG */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1934*/ meltfptr[1933])); /*internsym:CLASS_NREP_MATCH_DATA_INITIALIZER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1940*/ meltfptr[1939])); /*internsym:CLASS_NREP_MATCH_DATA_ACTION */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1942*/ meltfptr[1941])); /*internsym:CLASS_NREP_MATCHED_DATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1944*/ meltfptr[1943])); /*internsym:CLONE_SYMBOL */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1946*/ meltfptr[1945])); /*internsym:MATCHDATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1937*/ meltfptr[1936])); /*internsym:CLASS_MATCHED_DATA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1948*/ meltfptr[1947])); /*internsym:CLASS_NREP_MATCH_JUMP */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1954*/ meltfptr[1953])); /*internsym:CLASS_NORMTESTER_MATCHER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1969*/ meltfptr[1968])); /*internsym:CLASS_NORMTESTER_INSTANCE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1973*/ meltfptr[1972])); /*internsym:CLASS_NORMTESTER_TUPLE */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1977*/ meltfptr[1976])); /*internsym:CLASS_NORMTESTER_SAME */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1981*/ meltfptr[1980])); /*internsym:CLASS_NORMTESTER_OR_CLEAR */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1987*/ meltfptr[1986])); /*internsym:CLASS_NORMTESTER_OR_TRANSMIT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1991*/ meltfptr[1990])); /*internsym:CLASS_NORMTESTER_DISJUNCTION */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1995*/ meltfptr[1994])); /*internsym:CLASS_CMATCHER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2003*/ meltfptr[2002])); /*internsym:MULTIPLE_EVERY_BOTH */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2005*/ meltfptr[2004])); /*internsym:CLASS_FUNMATCHER */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2013*/ meltfptr[2012])); /*internsym:_CLOSFUNMATCH */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2010*/ meltfptr[2009])); /*internsym:FMATCH_MATCHF */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V2015*/ meltfptr[2014])); /**COMMENT: set retinit from boxloc **/ ; /*_.RETINIT___V1*/ meltfptr[0] = /* finalsetretinit */ melt_reference_value ((melt_ptr_t) ( /*_.CONTENV___V2*/ meltfptr[1])); /**COMMENT: end the initproc **/ ; #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_45 */ void meltmod__warmelt_genobj__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 */ -2830); if (!marking && melt_is_forwarding) { dbgprintf ("forward_or_mark_module_start_frame_warmelt_genobj forwarding %d pointers in frame %p", 2142, (void *) meltframptr_); for (ix = 0; ix < 2142; ix++) MELT_FORWARDED (meltframptr_->mcfr_varptr[ix]); return; } /*end forwarding */ dbgprintf ("forward_or_mark_module_start_frame_warmelt_genobj marking in frame %p", (void *) meltframptr_); for (ix = 0; ix < 2142; ix++) if (meltframptr_->mcfr_varptr[ix]) gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]); } /* end meltmod__warmelt_genobj__forward_or_mark_module_start_frame */ /* exported 133 field offsets */ MELT_EXTERN const int meltfieldoff__ALTMATCHN_DATAMAP; const int meltfieldoff__ALTMATCHN_DATAMAP = 3; /* in CLASS_ALTERNATE_MATCH_NREP_DATA */ MELT_EXTERN const int meltfieldoff__ALTMATCHN_FLAGMAP; const int meltfieldoff__ALTMATCHN_FLAGMAP = 2; /* in CLASS_ALTERNATE_MATCH_NREP_DATA */ MELT_EXTERN const int meltfieldoff__ALTMATCHN_NREP; const int meltfieldoff__ALTMATCHN_NREP = 1; /* in CLASS_ALTERNATE_MATCH_NREP_DATA */ MELT_EXTERN const int meltfieldoff__ALTMATCHN_PREV; const int meltfieldoff__ALTMATCHN_PREV = 0; /* in CLASS_ALTERNATE_MATCH_NREP_DATA */ MELT_EXTERN const int meltfieldoff__MCX_GOTOELSE; const int meltfieldoff__MCX_GOTOELSE = 4; /* in CLASS_MATCHCOMPILCONTEXT */ MELT_EXTERN const int meltfieldoff__MCX_GOTOTHEN; const int meltfieldoff__MCX_GOTOTHEN = 3; /* in CLASS_MATCHCOMPILCONTEXT */ MELT_EXTERN const int meltfieldoff__MCX_LOC; const int meltfieldoff__MCX_LOC = 1; /* in CLASS_MATCHCOMPILCONTEXT */ MELT_EXTERN const int meltfieldoff__MCX_NORMTESTER; const int meltfieldoff__MCX_NORMTESTER = 2; /* in CLASS_MATCHCOMPILCONTEXT */ MELT_EXTERN const int meltfieldoff__MCX_OLIST; const int meltfieldoff__MCX_OLIST = 5; /* in CLASS_MATCHCOMPILCONTEXT */ MELT_EXTERN const int meltfieldoff__MCX_STATECOUNTER; const int meltfieldoff__MCX_STATECOUNTER = 7; /* in CLASS_MATCHCOMPILCONTEXT */ MELT_EXTERN const int meltfieldoff__MCX_SUFFIX; const int meltfieldoff__MCX_SUFFIX = 6; /* in CLASS_MATCHCOMPILCONTEXT */ MELT_EXTERN const int meltfieldoff__OBAGAIN_LABEL; const int meltfieldoff__OBAGAIN_LABEL = 1; /* in CLASS_OBJAGAIN */ MELT_EXTERN const int meltfieldoff__OBAPP_ARGS; const int meltfieldoff__OBAPP_ARGS = 3; /* in CLASS_OBJAPPLY */ MELT_EXTERN const int meltfieldoff__OBAPP_CLOS; const int meltfieldoff__OBAPP_CLOS = 2; /* in CLASS_OBJAPPLY */ MELT_EXTERN const int meltfieldoff__OBARG_BIND; const int meltfieldoff__OBARG_BIND = 2; /* in CLASS_OBJGETARG */ MELT_EXTERN const int meltfieldoff__OBARG_OBLOC; const int meltfieldoff__OBARG_OBLOC = 1; /* in CLASS_OBJGETARG */ MELT_EXTERN const int meltfieldoff__OBARG_REST; const int meltfieldoff__OBARG_REST = 3; /* in CLASS_OBJGETARGREST */ MELT_EXTERN const int meltfieldoff__OBCITER_AFTER; const int meltfieldoff__OBCITER_AFTER = 5; /* in CLASS_OBJCITERBLOCK */ MELT_EXTERN const int meltfieldoff__OBCITER_BEFORE; const int meltfieldoff__OBCITER_BEFORE = 4; /* in CLASS_OBJCITERBLOCK */ MELT_EXTERN const int meltfieldoff__OBCITER_CITER; const int meltfieldoff__OBCITER_CITER = 3; /* in CLASS_OBJCITERBLOCK */ MELT_EXTERN const int meltfieldoff__OBCI_COMMENT; const int meltfieldoff__OBCI_COMMENT = 1; /* in CLASS_OBJCOMMENTINSTR */ MELT_EXTERN const int meltfieldoff__OBCOND_ELSE; const int meltfieldoff__OBCOND_ELSE = 3; /* in CLASS_OBJCOND */ MELT_EXTERN const int meltfieldoff__OBCOND_TEST; const int meltfieldoff__OBCOND_TEST = 1; /* in CLASS_OBJCOND */ MELT_EXTERN const int meltfieldoff__OBCOND_THEN; const int meltfieldoff__OBCOND_THEN = 2; /* in CLASS_OBJCOND */ MELT_EXTERN const int meltfieldoff__OBCPT_EXPR; const int meltfieldoff__OBCPT_EXPR = 2; /* in CLASS_OBJCOMPUTE */ MELT_EXTERN const int meltfieldoff__OBCPT_TYPE; const int meltfieldoff__OBCPT_TYPE = 3; /* in CLASS_OBJCOMPUTE */ MELT_EXTERN const int meltfieldoff__OBCX_LOC; const int meltfieldoff__OBCX_LOC = 2; /* in CLASS_OBJLOCATEDEXPV */ MELT_EXTERN const int meltfieldoff__OBC_NAME; const int meltfieldoff__OBC_NAME = 3; /* in CLASS_OBJCLOCCV */ MELT_EXTERN const int meltfieldoff__OBC_OFF; const int meltfieldoff__OBC_OFF = 1; /* in CLASS_OBJCLOCCV */ MELT_EXTERN const int meltfieldoff__OBC_PROC; const int meltfieldoff__OBC_PROC = 2; /* in CLASS_OBJCLOCCV */ MELT_EXTERN const int meltfieldoff__OBDI_DESTLIST; const int meltfieldoff__OBDI_DESTLIST = 1; /* in CLASS_OBJDESTINSTR */ MELT_EXTERN const int meltfieldoff__OBDTW_MESSAGE; const int meltfieldoff__OBDTW_MESSAGE = 2; /* in CLASS_OBJDBGTRACEWRITEOBJ */ MELT_EXTERN const int meltfieldoff__OBDTW_WRITTENOBJ; const int meltfieldoff__OBDTW_WRITTENOBJ = 1; /* in CLASS_OBJDBGTRACEWRITEOBJ */ MELT_EXTERN const int meltfieldoff__OBEXIT_LABEL; const int meltfieldoff__OBEXIT_LABEL = 1; /* in CLASS_OBJEXIT */ MELT_EXTERN const int meltfieldoff__OBGNAMED_IOBJ; const int meltfieldoff__OBGNAMED_IOBJ = 1; /* in CLASS_OBJGETNAMEDCOMMON */ MELT_EXTERN const int meltfieldoff__OBGOTO_PREFIX; const int meltfieldoff__OBGOTO_PREFIX = 1; /* in CLASS_OBJGOTOINSTR */ MELT_EXTERN const int meltfieldoff__OBGOTO_RANK; const int meltfieldoff__OBGOTO_RANK = 2; /* in CLASS_OBJGOTOINSTR */ MELT_EXTERN const int meltfieldoff__OBIFP_COND; const int meltfieldoff__OBIFP_COND = 1; /* in CLASS_OBJCPPIF */ MELT_EXTERN const int meltfieldoff__OBIFP_ELSE; const int meltfieldoff__OBIFP_ELSE = 3; /* in CLASS_OBJCPPIF */ MELT_EXTERN const int meltfieldoff__OBIFP_THEN; const int meltfieldoff__OBIFP_THEN = 2; /* in CLASS_OBJCPPIF */ MELT_EXTERN const int meltfieldoff__OBINTERN_IOBJ; const int meltfieldoff__OBINTERN_IOBJ = 1; /* in CLASS_OBJINTERNCOMMON */ MELT_EXTERN const int meltfieldoff__OBI_LOC; const int meltfieldoff__OBI_LOC = 0; /* in CLASS_OBJINSTR */ MELT_EXTERN const int meltfieldoff__OBLAB_PREFIX; const int meltfieldoff__OBLAB_PREFIX = 1; /* in CLASS_OBJLABELINSTR */ MELT_EXTERN const int meltfieldoff__OBLAB_RANK; const int meltfieldoff__OBLAB_RANK = 2; /* in CLASS_OBJLABELINSTR */ MELT_EXTERN const int meltfieldoff__OBLOOP_LABEL; const int meltfieldoff__OBLOOP_LABEL = 3; /* in CLASS_OBJLOOP */ MELT_EXTERN const int meltfieldoff__OBLOOP_RESV; const int meltfieldoff__OBLOOP_RESV = 4; /* in CLASS_OBJLOOP */ MELT_EXTERN const int meltfieldoff__OBLO_BODYL; const int meltfieldoff__OBLO_BODYL = 1; /* in CLASS_OBJANYBLOCK */ MELT_EXTERN const int meltfieldoff__OBLO_EPIL; const int meltfieldoff__OBLO_EPIL = 2; /* in CLASS_OBJANYBLOCK */ MELT_EXTERN const int meltfieldoff__OBL_CNAME; const int meltfieldoff__OBL_CNAME = 3; /* in CLASS_OBJLOCV */ MELT_EXTERN const int meltfieldoff__OBL_OFF; const int meltfieldoff__OBL_OFF = 1; /* in CLASS_OBJLOCV */ MELT_EXTERN const int meltfieldoff__OBL_PROC; const int meltfieldoff__OBL_PROC = 2; /* in CLASS_OBJLOCV */ MELT_EXTERN const int meltfieldoff__OBMSND_ARGS; const int meltfieldoff__OBMSND_ARGS = 4; /* in CLASS_OBJMSEND */ MELT_EXTERN const int meltfieldoff__OBMSND_RECV; const int meltfieldoff__OBMSND_RECV = 3; /* in CLASS_OBJMSEND */ MELT_EXTERN const int meltfieldoff__OBMSND_SEL; const int meltfieldoff__OBMSND_SEL = 2; /* in CLASS_OBJMSEND */ MELT_EXTERN const int meltfieldoff__OBMULTAPP_XRES; const int meltfieldoff__OBMULTAPP_XRES = 4; /* in CLASS_OBJMULTIAPPLY */ MELT_EXTERN const int meltfieldoff__OBMULTSND_XRES; const int meltfieldoff__OBMULTSND_XRES = 5; /* in CLASS_OBJMULTIMSEND */ MELT_EXTERN const int meltfieldoff__OBNCLO_DISCR; const int meltfieldoff__OBNCLO_DISCR = 2; /* in CLASS_OBJNEWCLOSURE */ MELT_EXTERN const int meltfieldoff__OBNCLO_LEN; const int meltfieldoff__OBNCLO_LEN = 4; /* in CLASS_OBJNEWCLOSURE */ MELT_EXTERN const int meltfieldoff__OBNCLO_ROUT; const int meltfieldoff__OBNCLO_ROUT = 3; /* in CLASS_OBJNEWCLOSURE */ MELT_EXTERN const int meltfieldoff__OBPREDEF; const int meltfieldoff__OBPREDEF = 1; /* in CLASS_OBJPREDEF */ MELT_EXTERN const int meltfieldoff__OBRALLOBJ_CLASS; const int meltfieldoff__OBRALLOBJ_CLASS = 2; /* in CLASS_OBJRAWALLOCOBJ */ MELT_EXTERN const int meltfieldoff__OBRALLOBJ_CLASSNAME; const int meltfieldoff__OBRALLOBJ_CLASSNAME = 4; /* in CLASS_OBJRAWALLOCOBJ */ MELT_EXTERN const int meltfieldoff__OBRALLOBJ_LEN; const int meltfieldoff__OBRALLOBJ_LEN = 3; /* in CLASS_OBJRAWALLOCOBJ */ MELT_EXTERN const int meltfieldoff__OBROUT_BODY; const int meltfieldoff__OBROUT_BODY = 3; /* in CLASS_ROUTINEOBJ */ MELT_EXTERN const int meltfieldoff__OBROUT_CNTCITER; const int meltfieldoff__OBROUT_CNTCITER = 8; /* in CLASS_ROUTINEOBJ */ MELT_EXTERN const int meltfieldoff__OBROUT_CNTLETREC; const int meltfieldoff__OBROUT_CNTLETREC = 9; /* in CLASS_ROUTINEOBJ */ MELT_EXTERN const int meltfieldoff__OBROUT_NBLONG; const int meltfieldoff__OBROUT_NBLONG = 5; /* in CLASS_ROUTINEOBJ */ MELT_EXTERN const int meltfieldoff__OBROUT_NBVAL; const int meltfieldoff__OBROUT_NBVAL = 4; /* in CLASS_ROUTINEOBJ */ MELT_EXTERN const int meltfieldoff__OBROUT_OTHERS; const int meltfieldoff__OBROUT_OTHERS = 6; /* in CLASS_ROUTINEOBJ */ MELT_EXTERN const int meltfieldoff__OBROUT_PROC; const int meltfieldoff__OBROUT_PROC = 2; /* in CLASS_ROUTINEOBJ */ MELT_EXTERN const int meltfieldoff__OBROUT_RETVAL; const int meltfieldoff__OBROUT_RETVAL = 7; /* in CLASS_ROUTINEOBJ */ MELT_EXTERN const int meltfieldoff__OBV_TYPE; const int meltfieldoff__OBV_TYPE = 0; /* in CLASS_OBJVALUE */ MELT_EXTERN const int meltfieldoff__OBXRES_OBLOC; const int meltfieldoff__OBXRES_OBLOC = 2; /* in CLASS_OBJPUTXTRARESULT */ MELT_EXTERN const int meltfieldoff__OBXRES_RANK; const int meltfieldoff__OBXRES_RANK = 1; /* in CLASS_OBJPUTXTRARESULT */ MELT_EXTERN const int meltfieldoff__OBX_CONT; const int meltfieldoff__OBX_CONT = 1; /* in CLASS_OBJEXPV */ MELT_EXTERN const int meltfieldoff__OCLR_VLOC; const int meltfieldoff__OCLR_VLOC = 1; /* in CLASS_OBJCLEAR */ MELT_EXTERN const int meltfieldoff__OCOMBLO_COMMENT; const int meltfieldoff__OCOMBLO_COMMENT = 3; /* in CLASS_OBJCOMMENTEDBLOCK */ MELT_EXTERN const int meltfieldoff__OGETSL_FIELD; const int meltfieldoff__OGETSL_FIELD = 3; /* in CLASS_OBJGETSLOT */ MELT_EXTERN const int meltfieldoff__OGETSL_OBJ; const int meltfieldoff__OGETSL_OBJ = 2; /* in CLASS_OBJGETSLOT */ MELT_EXTERN const int meltfieldoff__OICLO_ROUT; const int meltfieldoff__OICLO_ROUT = 5; /* in CLASS_OBJINITCLOSURE */ MELT_EXTERN const int meltfieldoff__OIE_CNAME; const int meltfieldoff__OIE_CNAME = 1; /* in CLASS_OBJINITELEM */ MELT_EXTERN const int meltfieldoff__OIE_DATA; const int meltfieldoff__OIE_DATA = 2; /* in CLASS_OBJINITELEM */ MELT_EXTERN const int meltfieldoff__OIE_DISCR; const int meltfieldoff__OIE_DISCR = 3; /* in CLASS_OBJINITELEM */ MELT_EXTERN const int meltfieldoff__OIE_LOCVAR; const int meltfieldoff__OIE_LOCVAR = 4; /* in CLASS_OBJINITELEM */ MELT_EXTERN const int meltfieldoff__OIM_TUPVAL; const int meltfieldoff__OIM_TUPVAL = 5; /* in CLASS_OBJINITMULTIPLE */ MELT_EXTERN const int meltfieldoff__OIO_CLASS; const int meltfieldoff__OIO_CLASS = 6; /* in CLASS_OBJINITOBJECT */ MELT_EXTERN const int meltfieldoff__OIO_PREDEF; const int meltfieldoff__OIO_PREDEF = 5; /* in CLASS_OBJINITOBJECT */ MELT_EXTERN const int meltfieldoff__OIROUTX_EXTENDNAME; const int meltfieldoff__OIROUTX_EXTENDNAME = 13; /* in CLASS_INITIAL_EXTENSION_ROUTINEOBJ */ MELT_EXTERN const int meltfieldoff__OIROUT_DATA; const int meltfieldoff__OIROUT_DATA = 10; /* in CLASS_INITIALROUTINEOBJ */ MELT_EXTERN const int meltfieldoff__OIROUT_FILL; const int meltfieldoff__OIROUT_FILL = 12; /* in CLASS_INITIALROUTINEOBJ */ MELT_EXTERN const int meltfieldoff__OIROUT_MODULENAME; const int meltfieldoff__OIROUT_MODULENAME = 13; /* in CLASS_INITIAL_MODULE_ROUTINEOBJ */ MELT_EXTERN const int meltfieldoff__OIROUT_PROLOG; const int meltfieldoff__OIROUT_PROLOG = 11; /* in CLASS_INITIALROUTINEOBJ */ MELT_EXTERN const int meltfieldoff__OIR_PROCROUTINE; const int meltfieldoff__OIR_PROCROUTINE = 5; /* in CLASS_OBJINITROUTINE */ MELT_EXTERN const int meltfieldoff__OMALBLO_ALLSTRUCT; const int meltfieldoff__OMALBLO_ALLSTRUCT = 3; /* in CLASS_OBJMULTIALLOCBLOCK */ MELT_EXTERN const int meltfieldoff__OMALBLO_NAME; const int meltfieldoff__OMALBLO_NAME = 4; /* in CLASS_OBJMULTIALLOCBLOCK */ MELT_EXTERN const int meltfieldoff__OMCHFLGBLO_FLAGS; const int meltfieldoff__OMCHFLGBLO_FLAGS = 3; /* in CLASS_OBJMATCHFLAGBLOCK */ MELT_EXTERN const int meltfieldoff__OMULBLO_SUBCOMP; const int meltfieldoff__OMULBLO_SUBCOMP = 3; /* in CLASS_OBJMULTIBLOCK */ MELT_EXTERN const int meltfieldoff__OPCLOR_CLOS; const int meltfieldoff__OPCLOR_CLOS = 1; /* in CLASS_OBJPUTCLOSUROUT */ MELT_EXTERN const int meltfieldoff__OPCLOR_ROUT; const int meltfieldoff__OPCLOR_ROUT = 2; /* in CLASS_OBJPUTCLOSUROUT */ MELT_EXTERN const int meltfieldoff__OPCLOV_CLOS; const int meltfieldoff__OPCLOV_CLOS = 1; /* in CLASS_OBJPUTCLOSEDV */ MELT_EXTERN const int meltfieldoff__OPCLOV_CVAL; const int meltfieldoff__OPCLOV_CVAL = 3; /* in CLASS_OBJPUTCLOSEDV */ MELT_EXTERN const int meltfieldoff__OPCLOV_OFF; const int meltfieldoff__OPCLOV_OFF = 2; /* in CLASS_OBJPUTCLOSEDV */ MELT_EXTERN const int meltfieldoff__OPRCONST_CVAL; const int meltfieldoff__OPRCONST_CVAL = 3; /* in CLASS_OBJPUTROUTCONST */ MELT_EXTERN const int meltfieldoff__OPRCONST_OFF; const int meltfieldoff__OPRCONST_OFF = 2; /* in CLASS_OBJPUTROUTCONST */ MELT_EXTERN const int meltfieldoff__OPRCONST_ROUT; const int meltfieldoff__OPRCONST_ROUT = 1; /* in CLASS_OBJPUTROUTCONST */ MELT_EXTERN const int meltfieldoff__OPROUT_FILENUM; const int meltfieldoff__OPROUT_FILENUM = 14; /* in CLASS_PROCROUTINEOBJ */ MELT_EXTERN const int meltfieldoff__OPROUT_FUNAM; const int meltfieldoff__OPROUT_FUNAM = 12; /* in CLASS_PROCROUTINEOBJ */ MELT_EXTERN const int meltfieldoff__OPROUT_GETARGS; const int meltfieldoff__OPROUT_GETARGS = 10; /* in CLASS_PROCROUTINEOBJ */ MELT_EXTERN const int meltfieldoff__OPROUT_LOC; const int meltfieldoff__OPROUT_LOC = 11; /* in CLASS_PROCROUTINEOBJ */ MELT_EXTERN const int meltfieldoff__OPROUT_RESTNAM; const int meltfieldoff__OPROUT_RESTNAM = 13; /* in CLASS_PROCROUTINEOBJ */ MELT_EXTERN const int meltfieldoff__OPUTL_FIRST; const int meltfieldoff__OPUTL_FIRST = 2; /* in CLASS_OBJPUTLIST */ MELT_EXTERN const int meltfieldoff__OPUTL_LAST; const int meltfieldoff__OPUTL_LAST = 3; /* in CLASS_OBJPUTLIST */ MELT_EXTERN const int meltfieldoff__OPUTL_LIST; const int meltfieldoff__OPUTL_LIST = 1; /* in CLASS_OBJPUTLIST */ MELT_EXTERN const int meltfieldoff__OPUTP_HEAD; const int meltfieldoff__OPUTP_HEAD = 2; /* in CLASS_OBJPUTPAIRHEAD */ MELT_EXTERN const int meltfieldoff__OPUTP_PAIR; const int meltfieldoff__OPUTP_PAIR = 1; /* in CLASS_OBJPUTPAIR */ MELT_EXTERN const int meltfieldoff__OPUTP_TAIL; const int meltfieldoff__OPUTP_TAIL = 2; /* in CLASS_OBJPUTPAIRTAIL */ MELT_EXTERN const int meltfieldoff__OPUTU_OFFSET; const int meltfieldoff__OPUTU_OFFSET = 2; /* in CLASS_OBJPUTUPLE */ MELT_EXTERN const int meltfieldoff__OPUTU_TUPLED; const int meltfieldoff__OPUTU_TUPLED = 1; /* in CLASS_OBJPUTUPLE */ MELT_EXTERN const int meltfieldoff__OPUTU_VALUE; const int meltfieldoff__OPUTU_VALUE = 3; /* in CLASS_OBJPUTUPLE */ MELT_EXTERN const int meltfieldoff__OSLOT_FIELD; const int meltfieldoff__OSLOT_FIELD = 3; /* in CLASS_OBJPUTSLOT */ MELT_EXTERN const int meltfieldoff__OSLOT_ODATA; const int meltfieldoff__OSLOT_ODATA = 1; /* in CLASS_OBJPUTSLOT */ MELT_EXTERN const int meltfieldoff__OSLOT_OFFSET; const int meltfieldoff__OSLOT_OFFSET = 2; /* in CLASS_OBJPUTSLOT */ MELT_EXTERN const int meltfieldoff__OSLOT_VALUE; const int meltfieldoff__OSLOT_VALUE = 4; /* in CLASS_OBJPUTSLOT */ MELT_EXTERN const int meltfieldoff__OSPR_OBJECT; const int meltfieldoff__OSPR_OBJECT = 1; /* in CLASS_OBJSETPREDEF */ MELT_EXTERN const int meltfieldoff__OSPR_PREDEF; const int meltfieldoff__OSPR_PREDEF = 2; /* in CLASS_OBJSETPREDEF */ MELT_EXTERN const int meltfieldoff__OTOUCH_COMMENT; const int meltfieldoff__OTOUCH_COMMENT = 2; /* in CLASS_OBJTOUCH */ MELT_EXTERN const int meltfieldoff__OTOUCH_VAL; const int meltfieldoff__OTOUCH_VAL = 1; /* in CLASS_OBJTOUCH */ MELT_EXTERN const int meltfieldoff__OXPURVAL_COMM; const int meltfieldoff__OXPURVAL_COMM = 2; /* in CLASS_OBJEXPANDPUREVAL */ MELT_EXTERN const int meltfieldoff__OXPURVAL_CONT; const int meltfieldoff__OXPURVAL_CONT = 3; /* in CLASS_OBJEXPANDPUREVAL */ MELT_EXTERN const int meltfieldoff__OXPURVAL_LOC; const int meltfieldoff__OXPURVAL_LOC = 1; /* in CLASS_OBJEXPANDPUREVAL */ MELT_EXTERN const int meltfieldoff__TCX_FREELIST; const int meltfieldoff__TCX_FREELIST = 2; /* in CLASS_TESTERCOMPILCONTEXT */ MELT_EXTERN const int meltfieldoff__TCX_NEXTEST; const int meltfieldoff__TCX_NEXTEST = 3; /* in CLASS_TESTERCOMPILCONTEXT */ MELT_EXTERN const int meltfieldoff__TCX_NRMATCH; const int meltfieldoff__TCX_NRMATCH = 1; /* in CLASS_TESTERCOMPILCONTEXT */ /* exported 79 class lengths */ MELT_EXTERN const int meltclasslen__CLASS_ALTERNATE_MATCH_NREP_DATA; const int meltclasslen__CLASS_ALTERNATE_MATCH_NREP_DATA = 4; MELT_EXTERN const int meltclasslen__CLASS_INITIALROUTINEOBJ; const int meltclasslen__CLASS_INITIALROUTINEOBJ = 13; MELT_EXTERN const int meltclasslen__CLASS_INITIAL_EXTENSION_ROUTINEOBJ; const int meltclasslen__CLASS_INITIAL_EXTENSION_ROUTINEOBJ = 14; MELT_EXTERN const int meltclasslen__CLASS_INITIAL_MODULE_ROUTINEOBJ; const int meltclasslen__CLASS_INITIAL_MODULE_ROUTINEOBJ = 14; MELT_EXTERN const int meltclasslen__CLASS_MATCHCOMPILCONTEXT; const int meltclasslen__CLASS_MATCHCOMPILCONTEXT = 8; MELT_EXTERN const int meltclasslen__CLASS_OBJAGAIN; const int meltclasslen__CLASS_OBJAGAIN = 2; MELT_EXTERN const int meltclasslen__CLASS_OBJANYBLOCK; const int meltclasslen__CLASS_OBJANYBLOCK = 3; MELT_EXTERN const int meltclasslen__CLASS_OBJAPPLY; const int meltclasslen__CLASS_OBJAPPLY = 4; MELT_EXTERN const int meltclasslen__CLASS_OBJCHECKSIGNAL; const int meltclasslen__CLASS_OBJCHECKSIGNAL = 1; MELT_EXTERN const int meltclasslen__CLASS_OBJCITERBLOCK; const int meltclasslen__CLASS_OBJCITERBLOCK = 6; MELT_EXTERN const int meltclasslen__CLASS_OBJCLEAR; const int meltclasslen__CLASS_OBJCLEAR = 2; MELT_EXTERN const int meltclasslen__CLASS_OBJCLOCCV; const int meltclasslen__CLASS_OBJCLOCCV = 4; MELT_EXTERN const int meltclasslen__CLASS_OBJCOMMENTEDBLOCK; const int meltclasslen__CLASS_OBJCOMMENTEDBLOCK = 4; MELT_EXTERN const int meltclasslen__CLASS_OBJCOMMENTINSTR; const int meltclasslen__CLASS_OBJCOMMENTINSTR = 2; MELT_EXTERN const int meltclasslen__CLASS_OBJCOMPUTE; const int meltclasslen__CLASS_OBJCOMPUTE = 4; MELT_EXTERN const int meltclasslen__CLASS_OBJCOND; const int meltclasslen__CLASS_OBJCOND = 4; MELT_EXTERN const int meltclasslen__CLASS_OBJCONSTV; const int meltclasslen__CLASS_OBJCONSTV = 4; MELT_EXTERN const int meltclasslen__CLASS_OBJCPPIF; const int meltclasslen__CLASS_OBJCPPIF = 4; MELT_EXTERN const int meltclasslen__CLASS_OBJDBGTRACEWRITEOBJ; const int meltclasslen__CLASS_OBJDBGTRACEWRITEOBJ = 3; MELT_EXTERN const int meltclasslen__CLASS_OBJDESTINSTR; const int meltclasslen__CLASS_OBJDESTINSTR = 2; MELT_EXTERN const int meltclasslen__CLASS_OBJEXIT; const int meltclasslen__CLASS_OBJEXIT = 2; MELT_EXTERN const int meltclasslen__CLASS_OBJEXPANDPUREVAL; const int meltclasslen__CLASS_OBJEXPANDPUREVAL = 4; MELT_EXTERN const int meltclasslen__CLASS_OBJEXPV; const int meltclasslen__CLASS_OBJEXPV = 2; MELT_EXTERN const int meltclasslen__CLASS_OBJFINALRETURN; const int meltclasslen__CLASS_OBJFINALRETURN = 1; MELT_EXTERN const int meltclasslen__CLASS_OBJGETARG; const int meltclasslen__CLASS_OBJGETARG = 3; MELT_EXTERN const int meltclasslen__CLASS_OBJGETARGREST; const int meltclasslen__CLASS_OBJGETARGREST = 4; MELT_EXTERN const int meltclasslen__CLASS_OBJGETNAMEDCOMMON; const int meltclasslen__CLASS_OBJGETNAMEDCOMMON = 2; MELT_EXTERN const int meltclasslen__CLASS_OBJGETNAMEDKEYWORD; const int meltclasslen__CLASS_OBJGETNAMEDKEYWORD = 2; MELT_EXTERN const int meltclasslen__CLASS_OBJGETNAMEDSYMBOL; const int meltclasslen__CLASS_OBJGETNAMEDSYMBOL = 2; MELT_EXTERN const int meltclasslen__CLASS_OBJGETSLOT; const int meltclasslen__CLASS_OBJGETSLOT = 4; MELT_EXTERN const int meltclasslen__CLASS_OBJGOTOINSTR; const int meltclasslen__CLASS_OBJGOTOINSTR = 3; MELT_EXTERN const int meltclasslen__CLASS_OBJINITBOXINTEGER; const int meltclasslen__CLASS_OBJINITBOXINTEGER = 5; MELT_EXTERN const int meltclasslen__CLASS_OBJINITCLOSURE; const int meltclasslen__CLASS_OBJINITCLOSURE = 6; MELT_EXTERN const int meltclasslen__CLASS_OBJINITELEM; const int meltclasslen__CLASS_OBJINITELEM = 5; MELT_EXTERN const int meltclasslen__CLASS_OBJINITLIST; const int meltclasslen__CLASS_OBJINITLIST = 5; MELT_EXTERN const int meltclasslen__CLASS_OBJINITMULTIPLE; const int meltclasslen__CLASS_OBJINITMULTIPLE = 6; MELT_EXTERN const int meltclasslen__CLASS_OBJINITOBJECT; const int meltclasslen__CLASS_OBJINITOBJECT = 7; MELT_EXTERN const int meltclasslen__CLASS_OBJINITPAIR; const int meltclasslen__CLASS_OBJINITPAIR = 5; MELT_EXTERN const int meltclasslen__CLASS_OBJINITROUTINE; const int meltclasslen__CLASS_OBJINITROUTINE = 6; MELT_EXTERN const int meltclasslen__CLASS_OBJINITSTRING; const int meltclasslen__CLASS_OBJINITSTRING = 5; MELT_EXTERN const int meltclasslen__CLASS_OBJINITUNIQUEOBJECT; const int meltclasslen__CLASS_OBJINITUNIQUEOBJECT = 7; MELT_EXTERN const int meltclasslen__CLASS_OBJINSTR; const int meltclasslen__CLASS_OBJINSTR = 1; MELT_EXTERN const int meltclasslen__CLASS_OBJINTERNCOMMON; const int meltclasslen__CLASS_OBJINTERNCOMMON = 2; MELT_EXTERN const int meltclasslen__CLASS_OBJINTERNKEYWORD; const int meltclasslen__CLASS_OBJINTERNKEYWORD = 2; MELT_EXTERN const int meltclasslen__CLASS_OBJINTERNSYMBOL; const int meltclasslen__CLASS_OBJINTERNSYMBOL = 2; MELT_EXTERN const int meltclasslen__CLASS_OBJLABELINSTR; const int meltclasslen__CLASS_OBJLABELINSTR = 3; MELT_EXTERN const int meltclasslen__CLASS_OBJLOCATEDEXPV; const int meltclasslen__CLASS_OBJLOCATEDEXPV = 3; MELT_EXTERN const int meltclasslen__CLASS_OBJLOCV; const int meltclasslen__CLASS_OBJLOCV = 4; MELT_EXTERN const int meltclasslen__CLASS_OBJLOOP; const int meltclasslen__CLASS_OBJLOOP = 5; MELT_EXTERN const int meltclasslen__CLASS_OBJMATCHFLAGBLOCK; const int meltclasslen__CLASS_OBJMATCHFLAGBLOCK = 4; MELT_EXTERN const int meltclasslen__CLASS_OBJMSEND; const int meltclasslen__CLASS_OBJMSEND = 5; MELT_EXTERN const int meltclasslen__CLASS_OBJMULTIALLOCBLOCK; const int meltclasslen__CLASS_OBJMULTIALLOCBLOCK = 5; MELT_EXTERN const int meltclasslen__CLASS_OBJMULTIAPPLY; const int meltclasslen__CLASS_OBJMULTIAPPLY = 5; MELT_EXTERN const int meltclasslen__CLASS_OBJMULTIBLOCK; const int meltclasslen__CLASS_OBJMULTIBLOCK = 4; MELT_EXTERN const int meltclasslen__CLASS_OBJMULTIMSEND; const int meltclasslen__CLASS_OBJMULTIMSEND = 6; MELT_EXTERN const int meltclasslen__CLASS_OBJNEWCLOSURE; const int meltclasslen__CLASS_OBJNEWCLOSURE = 5; MELT_EXTERN const int meltclasslen__CLASS_OBJNIL; const int meltclasslen__CLASS_OBJNIL = 1; MELT_EXTERN const int meltclasslen__CLASS_OBJPLAINBLOCK; const int meltclasslen__CLASS_OBJPLAINBLOCK = 3; MELT_EXTERN const int meltclasslen__CLASS_OBJPREDEF; const int meltclasslen__CLASS_OBJPREDEF = 2; MELT_EXTERN const int meltclasslen__CLASS_OBJPUREVALUE; const int meltclasslen__CLASS_OBJPUREVALUE = 1; MELT_EXTERN const int meltclasslen__CLASS_OBJPUTCLOSEDNOTNULLV; const int meltclasslen__CLASS_OBJPUTCLOSEDNOTNULLV = 4; MELT_EXTERN const int meltclasslen__CLASS_OBJPUTCLOSEDV; const int meltclasslen__CLASS_OBJPUTCLOSEDV = 4; MELT_EXTERN const int meltclasslen__CLASS_OBJPUTCLOSUROUT; const int meltclasslen__CLASS_OBJPUTCLOSUROUT = 3; MELT_EXTERN const int meltclasslen__CLASS_OBJPUTLIST; const int meltclasslen__CLASS_OBJPUTLIST = 4; MELT_EXTERN const int meltclasslen__CLASS_OBJPUTPAIR; const int meltclasslen__CLASS_OBJPUTPAIR = 2; MELT_EXTERN const int meltclasslen__CLASS_OBJPUTPAIRHEAD; const int meltclasslen__CLASS_OBJPUTPAIRHEAD = 3; MELT_EXTERN const int meltclasslen__CLASS_OBJPUTPAIRTAIL; const int meltclasslen__CLASS_OBJPUTPAIRTAIL = 3; MELT_EXTERN const int meltclasslen__CLASS_OBJPUTROUTCONST; const int meltclasslen__CLASS_OBJPUTROUTCONST = 4; MELT_EXTERN const int meltclasslen__CLASS_OBJPUTROUTCONSTNOTNULL; const int meltclasslen__CLASS_OBJPUTROUTCONSTNOTNULL = 4; MELT_EXTERN const int meltclasslen__CLASS_OBJPUTSLOT; const int meltclasslen__CLASS_OBJPUTSLOT = 5; MELT_EXTERN const int meltclasslen__CLASS_OBJPUTUPLE; const int meltclasslen__CLASS_OBJPUTUPLE = 4; MELT_EXTERN const int meltclasslen__CLASS_OBJPUTXTRARESULT; const int meltclasslen__CLASS_OBJPUTXTRARESULT = 3; MELT_EXTERN const int meltclasslen__CLASS_OBJRAWALLOCOBJ; const int meltclasslen__CLASS_OBJRAWALLOCOBJ = 5; MELT_EXTERN const int meltclasslen__CLASS_OBJSETPREDEF; const int meltclasslen__CLASS_OBJSETPREDEF = 3; MELT_EXTERN const int meltclasslen__CLASS_OBJTOUCH; const int meltclasslen__CLASS_OBJTOUCH = 3; MELT_EXTERN const int meltclasslen__CLASS_OBJVALUE; const int meltclasslen__CLASS_OBJVALUE = 1; MELT_EXTERN const int meltclasslen__CLASS_PROCROUTINEOBJ; const int meltclasslen__CLASS_PROCROUTINEOBJ = 15; MELT_EXTERN const int meltclasslen__CLASS_ROUTINEOBJ; const int meltclasslen__CLASS_ROUTINEOBJ = 10; MELT_EXTERN const int meltclasslen__CLASS_TESTERCOMPILCONTEXT; const int meltclasslen__CLASS_TESTERCOMPILCONTEXT = 4; /**** end of warmelt-genobj ****/