#include "opendylan/run-time.h"

/* Generated by Open Dylan 2014.1 for x86_64-linux */

/* Typedefs for referenced classes */

typedef struct {
  dylan_value wrapper;
  dylan_value instanceQ_iep_;
  dylan_value debug_name_;
  dylan_value class_implementation_class_;
  dylan_value class_subtype_bit_;
  dylan_value class_module_;
} _KLclassGVKd;

#define  define__KLmm_wrapperGVKi(nrepeated) \
  typedef struct { \
    dylan_value wrapper; \
    dylan_value mm_wrapper_implementation_class_; \
    dylan_value mm_wrapper_subtype_mask_; \
    DWORD mm_wrapper_fixed_part_; \
    DWORD mm_wrapper_variable_part_; \
    dylan_value mm_wrapper_number_patterns_; \
    DWORD mm_wrapper_pattern_element_[nrepeated+1]; \
  } _KLmm_wrapperGVKi_##nrepeated;
define__KLmm_wrapperGVKi(1);
define__KLmm_wrapperGVKi(0);

typedef struct {
  dylan_value wrapper;
} _KLobjectGVKd;

typedef struct {
  dylan_value wrapper;
} _KLunboundGVKe;

typedef struct {
  dylan_value wrapper;
} _KLbooleanGVKd;

typedef struct {
  dylan_value wrapper;
  dylan_value xep_;
  dylan_value function_signature_;
  dylan_value mep_;
} _KLsimple_methodGVKe;

typedef struct {
  dylan_value wrapper;
  dylan_value instanceQ_iep_;
  dylan_value debug_name_;
  dylan_value class_implementation_class_;
  dylan_value class_subtype_bit_;
  dylan_value class_module_;
} _KLfunction_classGVKi;

typedef struct {
  dylan_value wrapper;
  dylan_value signature_properties_;
  dylan_value signature_required_;
} _KLsignatureGVKe;

#define  define__KLsimple_object_vectorGVKd(nrepeated) \
  typedef struct { \
    dylan_value wrapper; \
    dylan_value size_; \
    dylan_value vector_element_[nrepeated+1]; \
  } _KLsimple_object_vectorGVKd_##nrepeated;
define__KLsimple_object_vectorGVKd(6);
define__KLsimple_object_vectorGVKd(256);
define__KLsimple_object_vectorGVKd(1);
define__KLsimple_object_vectorGVKd(2);
define__KLsimple_object_vectorGVKd(4);
define__KLsimple_object_vectorGVKd(0);
define__KLsimple_object_vectorGVKd(8);
define__KLsimple_object_vectorGVKd(16);

typedef struct {
  dylan_value wrapper;
} _KLsignature_specGVdfmc_definitions;

typedef struct {
  dylan_value wrapper;
  dylan_value head_;
  dylan_value tail_;
} _KLempty_listGVKd;

typedef struct {
  dylan_value wrapper;
  dylan_value symbol_name_;
} _KLsymbolGVKd;

#define  define__KLbyte_stringGVKd(nrepeated) \
  typedef struct { \
    dylan_value wrapper; \
    dylan_value size_; \
    char string_element_[nrepeated+1]; \
  } _KLbyte_stringGVKd_##nrepeated;
define__KLbyte_stringGVKd(22);
define__KLbyte_stringGVKd(17);
define__KLbyte_stringGVKd(7);
define__KLbyte_stringGVKd(23);
define__KLbyte_stringGVKd(13);
define__KLbyte_stringGVKd(15);
define__KLbyte_stringGVKd(32);
define__KLbyte_stringGVKd(27);
define__KLbyte_stringGVKd(29);
define__KLbyte_stringGVKd(24);

typedef struct {
  dylan_value wrapper;
  dylan_value xep_;
  dylan_value function_signature_;
  dylan_value Pgf_cache_;
  dylan_value debug_name_;
  dylan_value generic_function_methods_;
  dylan_value discriminator_;
  dylan_value incremental_gf_module_;
  dylan_value incremental_gf_domain_info_;
  dylan_value incremental_gf_method_libraries_;
  dylan_value incremental_gf_properties_;
} _KLincremental_generic_functionGVKe;

typedef struct {
  dylan_value wrapper;
  dylan_value xep_;
  dylan_value function_signature_;
  dylan_value Pgf_cache_;
  dylan_value debug_name_;
  dylan_value generic_function_methods_;
  dylan_value discriminator_;
} _KLsealed_generic_functionGVKe;

typedef struct {
  dylan_value wrapper;
  dylan_value private_spec_variable_name_;
} _KLrequired_variable_specGVdfmc_definitions;

typedef struct {
  dylan_value wrapper;
  dylan_value private_spec_variable_name_;
} _KLrest_variable_specGVdfmc_definitions;

typedef struct {
  dylan_value wrapper;
  dylan_value instanceQ_iep_;
  dylan_value union_type1_;
  dylan_value union_type2_;
} _KLunionGVKe;

typedef struct {
  dylan_value wrapper;
  dylan_value instanceQ_iep_;
  dylan_value singleton_object_;
} _KLsingletonGVKd;

typedef struct {
  dylan_value wrapper;
  dylan_value head_;
  dylan_value tail_;
} _KLpairGVKd;

typedef struct {
  dylan_value wrapper;
  dylan_value xep_;
  dylan_value function_signature_;
  dylan_value mep_;
  dylan_value iep_;
  dylan_value keyword_specifiers_;
} _KLkeyword_methodGVKe;

typedef struct {
  dylan_value wrapper;
  dylan_value class_properties_;
  dylan_value iclass_class_;
  dylan_value class_mm_wrapper_;
  dylan_value repeated_slot_descriptor_;
  dylan_value instance_slot_descriptors_;
  dylan_value iclass_dispatch_key_;
  dylan_value class_constructor_;
  dylan_value direct_superclasses_;
  dylan_value class_rcpl_vector_;
  dylan_value class_rcpl_position_;
  dylan_value class_rcpl_other_positions_;
  dylan_value class_known_joint_;
  dylan_value iclass_dependent_generics_;
  dylan_value iclass_subclass_dependent_generics_;
  dylan_value direct_subclasses_;
  dylan_value direct_methods_;
  dylan_value direct_slot_descriptors_;
  dylan_value slot_descriptors_;
  dylan_value direct_inherited_slot_descriptors_;
  dylan_value direct_initialization_argument_descriptors_;
  dylan_value class_slot_descriptors_;
  dylan_value defaulted_initialization_arguments_slot_;
  dylan_value class_slot_storage_;
} _KLimplementation_classGVKe;

typedef struct {
  dylan_value wrapper;
  dylan_value xep_;
} _KLfunctionGVKd;

typedef struct {
  dylan_value wrapper;
  dylan_value signature_properties_;
  dylan_value signature_required_;
  dylan_value signature_keys_;
  dylan_value signature_key_types_;
  dylan_value signature_values_;
} _KLkeyword_signatureAvaluesGVKi;

typedef struct {
  dylan_value wrapper;
  dylan_value slot_descriptor_properties_;
  dylan_value init_data_slot_;
  dylan_value slot_owner_;
  dylan_value init_keyword_;
  dylan_value slot_getter_;
  dylan_value slot_setter_;
  dylan_value slot_type_;
} _KLinstance_slot_descriptorGVKe;

typedef struct {
  dylan_value wrapper;
  dylan_value signature_properties_;
  dylan_value signature_required_;
} _KLobject_signatureGVKe;

typedef struct {
  dylan_value wrapper;
  dylan_value properties_;
  dylan_value engine_node_callback_;
  dylan_value engine_node_entry_point_;
} _KLabsent_engine_nodeGVKg;

typedef struct {
  dylan_value wrapper;
  dylan_value xep_;
  dylan_value method_slot_descriptor_;
} _KLgetter_methodGVKi;

typedef struct {
  dylan_value wrapper;
  dylan_value namespace_name_;
  dylan_value home_library_;
} _KLmoduleGVKe;


/* Typedefs for defined classes */

typedef struct {
  dylan_value wrapper;
  dylan_value primitive_emitter_;
} _KLprimitive_descriptorGVdfmc_modeling;


/* Referenced object declarations */

dylan_value KPadd_classVKeI (dylan_value);
extern _KLclassGVKd KLclassGVKd;
extern _KLmm_wrapperGVKi_0 KLclassGVKdW;
extern _KLclassGVKd KLmm_wrapperGVKi;
extern _KLmm_wrapperGVKi_1 KLmm_wrapperGVKiW;
extern _KLclassGVKd KLobjectGVKd;
extern _KLmm_wrapperGVKi_0 KLobjectGVKdW;
extern _KLunboundGVKe KPunboundVKi;
extern _KLclassGVKd KLunboundGVKe;
extern _KLmm_wrapperGVKi_0 KLunboundGVKeW;
extern _KLbooleanGVKd KPtrueVKi;
extern _KLclassGVKd KLbooleanGVKd;
extern _KLmm_wrapperGVKi_0 KLbooleanGVKdW;
extern _KLbooleanGVKd KPfalseVKi;
extern _KLfunction_classGVKi KLsimple_methodGVKe;
extern _KLclassGVKd KLfunction_classGVKi;
extern _KLmm_wrapperGVKi_0 KLfunction_classGVKiW;
extern _KLmm_wrapperGVKi_0 KLsimple_methodGVKeW;
extern _KLclassGVKd KLsignatureGVKe;
extern _KLmm_wrapperGVKi_0 KLsignatureGVKeW;
extern _KLsimple_object_vectorGVKd_16 KDsignature_Lsimple_object_vectorG_typesVKi;
extern _KLclassGVKd KLsimple_object_vectorGVKd;
extern _KLmm_wrapperGVKi_0 KLsimple_object_vectorGVKdW;
dylan_value KmakeVKdMdfmc_definitionsM20I (dylan_value, dylan_value, dylan_value, dylan_value, dylan_value, dylan_value);
extern _KLclassGVKd KLsignature_specGVdfmc_definitions;
extern _KLmm_wrapperGVKi_0 KLsignature_specGVdfmc_definitionsW;
extern _KLempty_listGVKd KPempty_listVKi;
extern _KLclassGVKd KLempty_listGVKd;
extern _KLmm_wrapperGVKi_0 KLempty_listGVKdW;
extern _KLclassGVKd KLsymbolGVKd;
extern _KLmm_wrapperGVKi_0 KLsymbolGVKdW;
extern _KLclassGVKd KLbyte_stringGVKd;
extern _KLmm_wrapperGVKi_0 KLbyte_stringGVKdW;
extern _KLincremental_generic_functionGVKe Kcollector_protocolYcollectorsVcollections;
extern _KLfunction_classGVKi KLincremental_generic_functionGVKe;
extern _KLmm_wrapperGVKi_0 KLincremental_generic_functionGVKeW;
extern _KLsimple_object_vectorGVKd_0 KPempty_vectorVKi;
dylan_value KelementVKdMM3I (dylan_value, dylan_value, dylan_value, dylan_value);
extern _KLsealed_generic_functionGVKe Kunsupplied_objectVKi;
extern _KLclassGVKd KLsealed_generic_functionGVKe;
extern _KLmm_wrapperGVKi_0 KLsealed_generic_functionGVKeW;
extern _KLincremental_generic_functionGVKe KasVKd;
extern _KLsealed_generic_functionGVKe Kmake_variable_name_fragmentVdfmc_common;
dylan_value KmakeVKdMdfmc_definitionsM18I (dylan_value, dylan_value, dylan_value, dylan_value);
extern _KLclassGVKd KLrequired_variable_specGVdfmc_definitions;
extern _KLmm_wrapperGVKi_0 KLrequired_variable_specGVdfmc_definitionsW;
dylan_value KLrest_variable_specGZ32ZconstructorVdfmc_definitionsMM0I (dylan_value, dylan_value, dylan_value);
extern _KLclassGVKd KLrest_variable_specGVdfmc_definitions;
extern _KLmm_wrapperGVKi_0 KLrest_variable_specGVdfmc_definitionsW;
extern _KLclassGVKd KLunionGVKe;
extern _KLmm_wrapperGVKi_0 KLunionGVKeW;
dylan_value Kunion_instanceQVKiI (dylan_value, dylan_value);
extern _KLclassGVKd KLsingletonGVKd;
extern _KLmm_wrapperGVKi_0 KLsingletonGVKdW;
dylan_value Ksingleton_pointer_idQ_instanceQVKiI (dylan_value, dylan_value);
extern _KLclassGVKd KLpairGVKd;
extern _KLmm_wrapperGVKi_0 KLpairGVKdW;
extern _KLkeyword_methodGVKe KmakeVKdMM48;
extern _KLfunction_classGVKi KLkeyword_methodGVKe;
extern _KLmm_wrapperGVKi_0 KLkeyword_methodGVKeW;
extern _KLclassGVKd KLimplementation_classGVKe;
extern _KLmm_wrapperGVKi_0 KLimplementation_classGVKeW;
dylan_value KerrorVKdMM1I (dylan_value, dylan_value);
extern _KLclassGVKd KLfunctionGVKd;
extern _KLmm_wrapperGVKi_0 KLfunctionGVKdW;
extern _KLincremental_generic_functionGVKe KinitializeVKd;
extern _KLclassGVKd KLkeyword_signatureAvaluesGVKi;
extern _KLmm_wrapperGVKi_0 KLkeyword_signatureAvaluesGVKiW;
extern _KLsimple_object_vectorGVKd_2 KDsignature_LclassG_typesVKi;
extern _KLsimple_object_vectorGVKd_256 KDsignature_LobjectG_typesVKi;
extern _KLclassGVKd KLinstance_slot_descriptorGVKe;
extern _KLmm_wrapperGVKi_0 KLinstance_slot_descriptorGVKeW;
extern _KLobject_signatureGVKe KDsignature_LobjectG_object_rest_value_1VKi;
extern _KLclassGVKd KLobject_signatureGVKe;
extern _KLmm_wrapperGVKi_0 KLobject_signatureGVKeW;
extern _KLabsent_engine_nodeGVKg RSINGULAR_Labsent_engine_nodeG;
extern _KLclassGVKd KLabsent_engine_nodeGVKg;
extern _KLmm_wrapperGVKi_0 KLabsent_engine_nodeGVKgW;
extern _KLclassGVKd KLgetter_methodGVKi;
extern _KLmm_wrapperGVKi_0 KLgetter_methodGVKiW;
dylan_value Kclass_instanceQ_rcpl_single_smallVKiI (dylan_value, dylan_value);
extern _KLmoduleGVKe Kdfmc_modeling_moduleYdylan_userVdfmc_modeling;
extern _KLclassGVKd KLmoduleGVKe;
extern _KLmm_wrapperGVKi_0 KLmoduleGVKeW;

/* Defined object declarations */

extern _KLclassGVKd KLprimitive_descriptorGVdfmc_modeling;
extern _KLmm_wrapperGVKi_0 KLprimitive_descriptorGVdfmc_modelingW;
dylan_value Kmake_primitive_sig_specVdfmc_modelingI (dylan_value, dylan_value);
extern _KLsimple_methodGVKe Kmake_primitive_sig_specVdfmc_modeling;
static _KLsignatureGVKe K5;
dylan_value Kmake_primitive_specsVdfmc_modelingI (dylan_value);
static _KLsymbolGVKd KJargument_required_variable_specs_;
static _KLsymbolGVKd KJargument_rest_variable_spec_;
static _KLsymbolGVKd KJvalue_required_variable_specs_;
static _KLsymbolGVKd KJvalue_rest_variable_spec_;
static _KLbyte_stringGVKd_24 K11;
static _KLbyte_stringGVKd_29 K12;
static _KLbyte_stringGVKd_27 K13;
static _KLbyte_stringGVKd_32 K14;
static _KLsymbolGVKd KJvariable_name_;
static _KLsymbolGVKd KJtype_expression_;
static _KLpairGVKd K17;
static _KLunionGVKe K18;
static _KLsingletonGVKd K19;
static _KLbyte_stringGVKd_15 K20;
static _KLbyte_stringGVKd_13 K21;
static _KLimplementation_classGVKe K22;
static _KLsimple_object_vectorGVKd_1 K23;
extern _KLkeyword_methodGVKe KLprimitive_descriptorGZ32ZconstructorVdfmc_modelingMM0;
dylan_value KLprimitive_descriptorGZ32ZconstructorVdfmc_modelingMM0I (dylan_value, dylan_value, dylan_value);
static _KLsimple_object_vectorGVKd_1 K26;
static _KLsimple_object_vectorGVKd_6 K27;
static _KLsymbolGVKd KJemitter_;
static _KLbyte_stringGVKd_23 K29;
static _KLbyte_stringGVKd_7 K30;
static _KLkeyword_signatureAvaluesGVKi K31;
static _KLsimple_object_vectorGVKd_2 K32;
static _KLsimple_object_vectorGVKd_1 K33;
static _KLsimple_object_vectorGVKd_1 K34;
extern _KLinstance_slot_descriptorGVKe Kprimitive_emitterVdfmc_modelingHLprimitive_descriptorG;
extern _KLsealed_generic_functionGVKe Kprimitive_emitterVdfmc_modeling;
extern _KLgetter_methodGVKi Kprimitive_emitterVdfmc_modelingMM0;
static _KLpairGVKd K38;
static _KLbyte_stringGVKd_17 K39;
static _KLbyte_stringGVKd_22 K40;

/* Indirection variables */

static dylan_value IKJargument_required_variable_specs_ = &KJargument_required_variable_specs_;
static dylan_value IKJargument_rest_variable_spec_ = &KJargument_rest_variable_spec_;
static dylan_value IKJvalue_required_variable_specs_ = &KJvalue_required_variable_specs_;
static dylan_value IKJvalue_rest_variable_spec_ = &KJvalue_rest_variable_spec_;
static dylan_value IKJvariable_name_ = &KJvariable_name_;
static dylan_value IKJtype_expression_ = &KJtype_expression_;
static dylan_value IKJemitter_ = &KJemitter_;

/* Variables */

dylan_value primitive_emitterVdfmc_modeling = &Kprimitive_emitterVdfmc_modeling;
dylan_value Lprimitive_descriptorGVdfmc_modeling = &KLprimitive_descriptorGVdfmc_modeling;
dylan_value make_primitive_sig_specVdfmc_modeling = &Kmake_primitive_sig_specVdfmc_modeling;

/* Objects */

_KLclassGVKd KLprimitive_descriptorGVdfmc_modeling = {
  &KLclassGVKdW /* wrapper */,
  &Kclass_instanceQ_rcpl_single_smallVKiI,
  &K40,
  &K22,
  (dylan_value) 1,
  &Kdfmc_modeling_moduleYdylan_userVdfmc_modeling
};

_KLmm_wrapperGVKi_0 KLprimitive_descriptorGVdfmc_modelingW = {
  &KLmm_wrapperGVKiW /* wrapper */,
  &K22,
  (dylan_value) 1,
  5,
  33554439,
  (dylan_value) 1
};

_KLsimple_methodGVKe Kmake_primitive_sig_specVdfmc_modeling = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_2,
  &K5,
  &Kmake_primitive_sig_specVdfmc_modelingI
};

static _KLsignatureGVKe K5 = {
  &KLsignatureGVKeW /* wrapper */,
  (dylan_value) 44040201,
  &KDsignature_Lsimple_object_vectorG_typesVKi
};

static _KLsymbolGVKd KJargument_required_variable_specs_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K14
};

static _KLsymbolGVKd KJargument_rest_variable_spec_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K13
};

static _KLsymbolGVKd KJvalue_required_variable_specs_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K12
};

static _KLsymbolGVKd KJvalue_rest_variable_spec_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K11
};

static _KLbyte_stringGVKd_24 K11 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 97,
  "value-rest-variable-spec"
};

static _KLbyte_stringGVKd_29 K12 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 117,
  "value-required-variable-specs"
};

static _KLbyte_stringGVKd_27 K13 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 109,
  "argument-rest-variable-spec"
};

static _KLbyte_stringGVKd_32 K14 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 129,
  "argument-required-variable-specs"
};

static _KLsymbolGVKd KJvariable_name_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K21
};

static _KLsymbolGVKd KJtype_expression_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K20
};

static _KLpairGVKd K17 = {
  &KLpairGVKdW /* wrapper */,
  &KmakeVKdMM48,
  &KPempty_listVKi
};

static _KLunionGVKe K18 = {
  &KLunionGVKeW /* wrapper */,
  &Kunion_instanceQVKiI,
  &K19,
  &KLrest_variable_specGVdfmc_definitions
};

static _KLsingletonGVKd K19 = {
  &KLsingletonGVKdW /* wrapper */,
  &Ksingleton_pointer_idQ_instanceQVKiI,
  &KPfalseVKi
};

static _KLbyte_stringGVKd_15 K20 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 61,
  "type-expression"
};

static _KLbyte_stringGVKd_13 K21 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 53,
  "variable-name"
};

static _KLimplementation_classGVKe K22 = {
  &KLimplementation_classGVKeW /* wrapper */,
  (dylan_value) 341835781,
  &KLprimitive_descriptorGVdfmc_modeling,
  &KLprimitive_descriptorGVdfmc_modelingW,
  &KPfalseVKi,
  &K23,
  (dylan_value) -3,
  &KLprimitive_descriptorGZ32ZconstructorVdfmc_modelingMM0,
  &K26,
  &K27,
  (dylan_value) 5,
  &KPempty_vectorVKi,
  &KPempty_vectorVKi,
  &KPempty_listVKi,
  &KPempty_listVKi,
  &KPempty_listVKi,
  &KPempty_vectorVKi,
  &K23,
  &K23,
  &KPempty_vectorVKi,
  &KPempty_vectorVKi,
  &KPempty_vectorVKi,
  &KPempty_vectorVKi,
  &KPempty_vectorVKi
};

static _KLsimple_object_vectorGVKd_1 K23 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (dylan_value) 5,
  &Kprimitive_emitterVdfmc_modelingHLprimitive_descriptorG
};

_KLkeyword_methodGVKe KLprimitive_descriptorGZ32ZconstructorVdfmc_modelingMM0 = {
  &KLkeyword_methodGVKeW /* wrapper */,
  &rest_key_xep_3,
  &K31,
  &key_mep_2,
  &KLprimitive_descriptorGZ32ZconstructorVdfmc_modelingMM0I,
  &K32
};

static _KLsimple_object_vectorGVKd_1 K26 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (dylan_value) 5,
  &KLobjectGVKd
};

static _KLsimple_object_vectorGVKd_6 K27 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (dylan_value) 25,
  &KLobjectGVKd,
  &KLprimitive_descriptorGVdfmc_modeling,
  &KPfalseVKi,
  &KPfalseVKi,
  &KPfalseVKi,
  &KPfalseVKi
};

static _KLsymbolGVKd KJemitter_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K30
};

static _KLbyte_stringGVKd_23 K29 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 93,
  "Missing init keyword %="
};

static _KLbyte_stringGVKd_7 K30 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 29,
  "emitter"
};

static _KLkeyword_signatureAvaluesGVKi K31 = {
  &KLkeyword_signatureAvaluesGVKiW /* wrapper */,
  (dylan_value) 35390469,
  &KDsignature_LclassG_typesVKi,
  &K33,
  &KDsignature_LobjectG_typesVKi,
  &K34
};

static _KLsimple_object_vectorGVKd_2 K32 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (dylan_value) 9,
  &KJemitter_,
  &KPunboundVKi
};

static _KLsimple_object_vectorGVKd_1 K33 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (dylan_value) 5,
  &KJemitter_
};

static _KLsimple_object_vectorGVKd_1 K34 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (dylan_value) 5,
  &KLprimitive_descriptorGVdfmc_modeling
};

_KLinstance_slot_descriptorGVKe Kprimitive_emitterVdfmc_modelingHLprimitive_descriptorG = {
  &KLinstance_slot_descriptorGVKeW /* wrapper */,
  (dylan_value) 193,
  &KPfalseVKi,
  &KLprimitive_descriptorGVdfmc_modeling,
  &KJemitter_,
  &Kprimitive_emitterVdfmc_modeling,
  &KPfalseVKi,
  &KLfunctionGVKd
};

_KLsealed_generic_functionGVKe Kprimitive_emitterVdfmc_modeling = {
  &KLsealed_generic_functionGVKeW /* wrapper */,
  &gf_xep_1,
  &KDsignature_LobjectG_object_rest_value_1VKi,
  &KPfalseVKi,
  &K39,
  &K38,
  &RSINGULAR_Labsent_engine_nodeG
};

_KLgetter_methodGVKi Kprimitive_emitterVdfmc_modelingMM0 = {
  &KLgetter_methodGVKiW /* wrapper */,
  &slotacc_single_q_instance_getter_xep,
  &Kprimitive_emitterVdfmc_modelingHLprimitive_descriptorG
};

static _KLpairGVKd K38 = {
  &KLpairGVKdW /* wrapper */,
  &Kprimitive_emitterVdfmc_modelingMM0,
  &KPempty_listVKi
};

static _KLbyte_stringGVKd_17 K39 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 69,
  "primitive-emitter"
};

static _KLbyte_stringGVKd_22 K40 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 89,
  "<primitive-descriptor>"
};

/* Code */

dylan_value Kmake_primitive_sig_specVdfmc_modelingI (dylan_value args_, dylan_value vals_) {
  dylan_value T2_0;
  dylan_value T2_1;
  dylan_value arg_reqs_;
  dylan_value arg_rest_;
  dylan_value T5_0;
  dylan_value T5_1;
  dylan_value val_reqs_;
  dylan_value val_rest_;
  _KLsimple_object_vectorGVKd_8 T8 = {&KLsimple_object_vectorGVKdW, (dylan_value) 33};
  dylan_value T9;

  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:56
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:58
  T2_0 = Kmake_primitive_specsVdfmc_modelingI(args_);
  T2_1 = MV_GET_ELT(1);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:58
  arg_reqs_ = T2_0;
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:58
  arg_rest_ = T2_1;
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:59
  T5_0 = Kmake_primitive_specsVdfmc_modelingI(vals_);
  T5_1 = MV_GET_ELT(1);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:59
  val_reqs_ = T5_0;
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:59
  val_rest_ = T5_1;
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:60
  T8.vector_element_[0] = IKJargument_required_variable_specs_;
  T8.vector_element_[1] = arg_reqs_;
  T8.vector_element_[2] = IKJargument_rest_variable_spec_;
  T8.vector_element_[3] = arg_rest_;
  T8.vector_element_[4] = IKJvalue_required_variable_specs_;
  T8.vector_element_[5] = val_reqs_;
  T8.vector_element_[6] = IKJvalue_rest_variable_spec_;
  T8.vector_element_[7] = val_rest_;
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:60
  T9 = KmakeVKdMdfmc_definitionsM20I(&KLsignature_specGVdfmc_definitions, &T8, arg_rest_, &KPfalseVKi, val_reqs_, val_rest_);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:56
  return(T9);
}

dylan_value Kmake_primitive_specsVdfmc_modelingI (dylan_value x_) {
  dylan_value T2_0;
  dylan_value T2_1;
  dylan_value T2_2;
  dylan_value T2_3;
  dylan_value T2_4;
  dylan_value T2_5;
  dylan_value Ucollector_collector_;
  dylan_value Ucollector_add_last_;
  dylan_value Ucollector_collection_;
  DWORD i_T, i_;
  dylan_value T7;
  dylan_value T8;
  dylan_value T9;
  dylan_value T10;
  dylan_value T11;
  dylan_value reqs_;
  dylan_value T13;
  dylan_value nameF14;
  dylan_value T15;
  dylan_value rest_;
  dylan_value T17_0;
  dylan_value T17_1;
  dylan_value T18;
  DWORD T19;
  DWORD T20;
  dylan_value T21;
  dylan_value T22;
  dylan_value nameF23;
  DWORD T24;
  dylan_value T25;
  dylan_value type_;
  _KLsimple_object_vectorGVKd_4 T27 = {&KLsimple_object_vectorGVKdW, (dylan_value) 17};
  dylan_value T28;
  DWORD T29;
  dylan_value T30;
  DWORD T31;
  dylan_value T32;
  dylan_value T33;
  dylan_value T34;
  dylan_value T35_0;
  _KLsimple_object_vectorGVKd_2 T36 = {&KLsimple_object_vectorGVKdW, (dylan_value) 9};
  dylan_value T37_0;
  dylan_value T37_1;

  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:34
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:38
  T18 = SLOT_VALUE_INITD(x_, 0);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:38
  T19 = primitive_cast_integer_as_raw(T18);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:38
  T20 = primitive_machine_word_logand(T19,0xFFFFFFFFFFFFFFF9L);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:40
  CONGRUENT_CALL_PROLOG(&Kcollector_protocolYcollectorsVcollections, 2);
  T2_0 = CONGRUENT_CALL2(&KLsimple_object_vectorGVKd, &KPempty_vectorVKi);
  T2_1 = MV_GET_ELT(1);
  T2_2 = MV_GET_ELT(2);
  T2_3 = MV_GET_ELT(3);
  T2_4 = MV_GET_ELT(4);
  T2_5 = MV_GET_ELT(5);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:40
  Ucollector_collector_ = T2_0;
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:40
  Ucollector_add_last_ = T2_2;
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:40
  Ucollector_collection_ = T2_5;
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:41
  i_T = 1;
L0: ;
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:41
    i_ = i_T;
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:41
    T22 = primitive_cast_raw_as_integer(i_);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:41
    T21 = primitive_machine_word_less_thanQ(i_,T20);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:41
    if (T21 != &KPfalseVKi) {
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:42
      nameF23 = KelementVKdMM3I(x_, T22, &KPempty_vectorVKi, &Kunsupplied_objectVKi);
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:43
      T24 = primitive_machine_word_add_signal_overflow(i_,4);
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:43
      T25 = primitive_cast_raw_as_integer(T24);
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:43
      type_ = KelementVKdMM3I(x_, T25, &KPempty_vectorVKi, &Kunsupplied_objectVKi);
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:45
      CONGRUENT_CALL_PROLOG(&KasVKd, 2);
      T7 = CONGRUENT_CALL2(&KLsymbolGVKd, nameF23);
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:45
      CONGRUENT_CALL_PROLOG(&Kmake_variable_name_fragmentVdfmc_common, 1);
      T8 = CONGRUENT_CALL1(T7);
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:46
      if (type_ != &KPfalseVKi) {
        // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:46
        CONGRUENT_CALL_PROLOG(&KasVKd, 2);
        T9 = CONGRUENT_CALL2(&KLsymbolGVKd, type_);
        // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:46
        CONGRUENT_CALL_PROLOG(&Kmake_variable_name_fragmentVdfmc_common, 1);
        T10 = CONGRUENT_CALL1(T9);
        T11 = T10;
      } else {
        T11 = &KPfalseVKi;
      }
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:46
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:44
      T27.vector_element_[0] = IKJvariable_name_;
      T27.vector_element_[1] = T8;
      T27.vector_element_[2] = IKJtype_expression_;
      T27.vector_element_[3] = T11;
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:44
      MIEP_CALL_PROLOG(&K17);
      T28 = KmakeVKdMdfmc_definitionsM18I(&KLrequired_variable_specGVdfmc_definitions, &T27, T8, T11);
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:44
      CALL2(Ucollector_add_last_, Ucollector_collector_, T28);
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:41
      T29 = primitive_machine_word_add_signal_overflow(i_,8);
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:41
      i_T = T29;
      goto L0;
    }
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:41
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:41
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:40
  reqs_ = CALL1(Ucollector_collection_, Ucollector_collector_);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:50
  T30 = primitive_machine_word_logbitQ(2,T19);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:50
  if (T30 != &KPfalseVKi) {
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:50
    T31 = primitive_machine_word_subtract_signal_overflow(T19,4);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:50
    T32 = primitive_cast_raw_as_integer(T31);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:50
    T33 = KelementVKdMM3I(x_, T32, &KPempty_vectorVKi, &Kunsupplied_objectVKi);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:50
    CONGRUENT_CALL_PROLOG(&KasVKd, 2);
    T13 = CONGRUENT_CALL2(&KLsymbolGVKd, T33);
    nameF14 = T13;
  } else {
    nameF14 = &KPfalseVKi;
  }
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:50
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:52
  if (nameF14 != &KPfalseVKi) {
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:52
    CONGRUENT_CALL_PROLOG(&Kmake_variable_name_fragmentVdfmc_common, 1);
    T15 = CONGRUENT_CALL1(nameF14);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:52
    T36.vector_element_[0] = IKJvariable_name_;
    T36.vector_element_[1] = T15;
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:52
    T35_0 = KLrest_variable_specGZ32ZconstructorVdfmc_definitionsMM0I(&KLrest_variable_specGVdfmc_definitions, &T36, T15);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:52
    T34 = T35_0;
    rest_ = T34;
  } else {
    rest_ = &KPfalseVKi;
  }
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:52
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:53
  T37_0 = reqs_;
  T37_1 = rest_;
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:34
  T17_0 = T37_0;
  T17_1 = T37_1;
  {
    MV_CHECK_TYPE_PROLOGUE(T37_0);
    primitive_type_check(T17_0, &KLsimple_object_vectorGVKd);
    primitive_type_check(T17_1, &K18);
    MV_CHECK_TYPE_EPILOGUE();
  }
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:34
  MV_SET_ELT(1, T17_1);
  MV_SET_COUNT(2);
  return(T17_0);
}

dylan_value KLprimitive_descriptorGZ32ZconstructorVdfmc_modelingMM0I (dylan_value class_, dylan_value init_args_, dylan_value Uunique_primitive_emitter_) {
  dylan_value T4;
  dylan_value Uunique_primitive_emitterF5;
  dylan_value T6;
  dylan_value Uunique_primitive_emitterF7;
  dylan_value T8_0;
  dylan_value T9;
  _KLsimple_object_vectorGVKd_1 T10 = {&KLsimple_object_vectorGVKdW, (dylan_value) 5};
  dylan_value T11;

  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:10
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:10
  T9 = primitive_idQ(Uunique_primitive_emitter_,&KPunboundVKi);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:10
  if (T9 != &KPfalseVKi) {
    T10.vector_element_[0] = IKJemitter_;
    T11 = KerrorVKdMM1I(&K29, &T10);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:10
    T4 = T11;
    Uunique_primitive_emitterF5 = T4;
  } else {
    Uunique_primitive_emitterF5 = Uunique_primitive_emitter_;
  }
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:10
  T6 = primitive_object_allocate_filled(2,&KLprimitive_descriptorGVdfmc_modelingW,1,&KPunboundVKi,0,0,&KPunboundVKi);
  primitive_type_check(Uunique_primitive_emitterF5, &KLfunctionGVKd);
  Uunique_primitive_emitterF7 = Uunique_primitive_emitterF5;
  SLOT_VALUE_SETTER(Uunique_primitive_emitterF7, T6, 0);
  APPLY2(&KinitializeVKd, T6, init_args_);
  T8_0 = T6;
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:10
  MV_SET_COUNT(1);
  return(T8_0);
}


/* SYSTEM INIT CODE */

void _Init_dfmc_modeling__X_primitive_macros_for_system () {
  extern dylan_value KPresolve_symbolVKiI(dylan_value);
  {
    dylan_value T0;

    T0 = KPresolve_symbolVKiI(&KJargument_required_variable_specs_);
    if (T0 != &KJargument_required_variable_specs_) {
      IKJargument_required_variable_specs_ = T0;
    }
  }
  {
    dylan_value T0;

    T0 = KPresolve_symbolVKiI(&KJargument_rest_variable_spec_);
    if (T0 != &KJargument_rest_variable_spec_) {
      IKJargument_rest_variable_spec_ = T0;
    }
  }
  {
    dylan_value T0;

    T0 = KPresolve_symbolVKiI(&KJvalue_required_variable_specs_);
    if (T0 != &KJvalue_required_variable_specs_) {
      IKJvalue_required_variable_specs_ = T0;
    }
  }
  {
    dylan_value T0;

    T0 = KPresolve_symbolVKiI(&KJvalue_rest_variable_spec_);
    if (T0 != &KJvalue_rest_variable_spec_) {
      IKJvalue_rest_variable_spec_ = T0;
    }
  }
  {
    dylan_value T0;

    T0 = KPresolve_symbolVKiI(&KJvariable_name_);
    if (T0 != &KJvariable_name_) {
      IKJvariable_name_ = T0;
    }
  }
  {
    dylan_value T0;

    T0 = KPresolve_symbolVKiI(&KJtype_expression_);
    if (T0 != &KJtype_expression_) {
      IKJtype_expression_ = T0;
    }
  }
  {
    dylan_value T0;

    T0 = KPresolve_symbolVKiI(&KJemitter_);
    if (T0 != &KJemitter_) {
      primitive_slot_value_setter(T0, &Kprimitive_emitterVdfmc_modelingHLprimitive_descriptorG, 3);
      primitive_repeated_slot_value_setter(T0, &K33, 1, 0);
      primitive_repeated_slot_value_setter(T0, &K32, 1, 0);
      IKJemitter_ = T0;
    }
  }
{
  dylan_value T0;

  // /home/bruce/Development/dylan/opendylan/sources/dfmc/modeling/primitive-macros.dylan:10
  T0 = KPadd_classVKeI(&KLprimitive_descriptorGVdfmc_modeling);
  goto I0;
}
I0:

  return;
}

/* USER INIT CODE */

void _Init_dfmc_modeling__X_primitive_macros_for_user () {
  return;
}


/* eof */
