#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 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;

#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(7);
define__KLsimple_object_vectorGVKd(14);
define__KLsimple_object_vectorGVKd(13);
define__KLsimple_object_vectorGVKd(15);
define__KLsimple_object_vectorGVKd(16);
define__KLsimple_object_vectorGVKd(3);
define__KLsimple_object_vectorGVKd(6);
define__KLsimple_object_vectorGVKd(256);
define__KLsimple_object_vectorGVKd(2);
define__KLsimple_object_vectorGVKd(1);
define__KLsimple_object_vectorGVKd(0);

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

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 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_;
} _KLvirtual_slot_descriptorGVKi;

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

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 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;

#define  define__KLbyte_stringGVKd(nrepeated) \
  typedef struct { \
    dylan_value wrapper; \
    dylan_value size_; \
    char string_element_[nrepeated+1]; \
  } _KLbyte_stringGVKd_##nrepeated;
define__KLbyte_stringGVKd(39);
define__KLbyte_stringGVKd(16);
define__KLbyte_stringGVKd(9);
define__KLbyte_stringGVKd(8);
define__KLbyte_stringGVKd(14);
define__KLbyte_stringGVKd(17);
define__KLbyte_stringGVKd(22);
define__KLbyte_stringGVKd(11);
define__KLbyte_stringGVKd(15);
define__KLbyte_stringGVKd(7);
define__KLbyte_stringGVKd(10);
define__KLbyte_stringGVKd(13);
define__KLbyte_stringGVKd(23);
define__KLbyte_stringGVKd(28);

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

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

typedef struct {
  dylan_value wrapper;
} _KLdood_mapped_objectGVdood;

typedef struct {
  dylan_value wrapper;
} _KLform_propertiesGVdfmc_common;

typedef struct {
  dylan_value wrapper;
  dylan_value private_shadowable_form_init_method_;
  dylan_value private_shadowable_form_system_init_method_;
  dylan_value shadowable_form_properties_flags_;
} _KLtop_level_form_propertiesGVdfmc_common;

typedef struct {
  dylan_value wrapper;
  dylan_value private_shadowable_form_init_method_;
  dylan_value private_shadowable_form_system_init_method_;
  dylan_value shadowable_form_properties_flags_;
} _KLinstallable_form_propertiesGVdfmc_common;

typedef struct {
  dylan_value wrapper;
  dylan_value private_shadowable_form_init_method_;
  dylan_value private_shadowable_form_system_init_method_;
  dylan_value shadowable_form_properties_flags_;
} _KLvariable_defining_form_propertiesGVdfmc_common;

typedef struct {
  dylan_value wrapper;
  dylan_value private_shadowable_form_init_method_;
  dylan_value private_shadowable_form_system_init_method_;
  dylan_value shadowable_form_properties_flags_;
  dylan_value form_compilation_record_;
  dylan_value private_form_source_location_;
  dylan_value private_form_parent_form_;
  dylan_value form_sequence_number_;
  dylan_value private_form_dependencies_;
  dylan_value private_form_referenced_variables_;
} _KLtop_level_formGVdfmc_common;

typedef struct {
  dylan_value wrapper;
  dylan_value private_shadowable_form_init_method_;
  dylan_value private_shadowable_form_system_init_method_;
  dylan_value shadowable_form_properties_flags_;
  dylan_value form_compilation_record_;
  dylan_value private_form_source_location_;
  dylan_value private_form_parent_form_;
  dylan_value form_sequence_number_;
  dylan_value private_form_dependencies_;
  dylan_value private_form_referenced_variables_;
  dylan_value booted_form_boot_id_;
} _KLcompiler_booted_formGVdfmc_definitions;

typedef struct {
  dylan_value wrapper;
  dylan_value private_shadowable_form_init_method_;
  dylan_value private_shadowable_form_system_init_method_;
  dylan_value shadowable_form_properties_flags_;
  dylan_value form_compilation_record_;
  dylan_value private_form_source_location_;
  dylan_value private_form_parent_form_;
  dylan_value form_sequence_number_;
  dylan_value private_form_dependencies_;
  dylan_value private_form_referenced_variables_;
  dylan_value private_form_adjectives_;
} _KLmodified_top_level_formGVdfmc_common;

typedef struct {
  dylan_value wrapper;
  dylan_value private_shadowable_form_init_method_;
  dylan_value private_shadowable_form_system_init_method_;
  dylan_value shadowable_form_properties_flags_;
  dylan_value form_compilation_record_;
  dylan_value private_form_source_location_;
  dylan_value private_form_parent_form_;
  dylan_value form_sequence_number_;
  dylan_value private_form_dependencies_;
  dylan_value private_form_referenced_variables_;
  dylan_value private_form_adjectives_;
} _KLdefining_formGVdfmc_common;

typedef struct {
  dylan_value wrapper;
  dylan_value private_shadowable_form_init_method_;
  dylan_value private_shadowable_form_system_init_method_;
  dylan_value shadowable_form_properties_flags_;
  dylan_value form_compilation_record_;
  dylan_value private_form_source_location_;
  dylan_value private_form_parent_form_;
  dylan_value form_sequence_number_;
  dylan_value private_form_dependencies_;
  dylan_value private_form_referenced_variables_;
  dylan_value private_form_adjectives_;
  dylan_value private_form_variable_name_or_names_;
  dylan_value form_properties_;
} _KLvariable_defining_formGVdfmc_common;

typedef struct {
  dylan_value wrapper;
  dylan_value private_shadowable_form_init_method_;
  dylan_value private_shadowable_form_system_init_method_;
  dylan_value shadowable_form_properties_flags_;
  dylan_value form_compilation_record_;
  dylan_value private_form_source_location_;
  dylan_value private_form_parent_form_;
  dylan_value form_sequence_number_;
  dylan_value private_form_dependencies_;
  dylan_value private_form_referenced_variables_;
  dylan_value private_form_adjectives_;
  dylan_value private_form_variable_name_or_names_;
  dylan_value form_properties_;
  dylan_value private_form_signature_;
} _KLfunction_defining_formGVdfmc_definitions;

typedef struct {
  dylan_value wrapper;
  dylan_value compilation_record_original_library_;
  dylan_value private_compilation_record_module_;
  dylan_value private_compilation_record_top_level_forms_;
  dylan_value compilation_record_definitions_installedQ_;
  dylan_value compilation_record_model_heap_;
  dylan_value private_compilation_record_heap_referenced_objects_;
  dylan_value compilation_record_needs_linkingQ_;
  dylan_value compilation_record_sequence_number_;
  dylan_value compilation_record_source_record_;
  dylan_value compilation_record_source_line_count_;
  dylan_value compilation_record_model_properties_;
  dylan_value private_compilation_record_dependency_table_;
  dylan_value private_compilation_record_dispatch_decisions_;
  dylan_value compilation_record_inline_only_table_;
  dylan_value private_compilation_record_back_end_data_;
  dylan_value compilation_record_approximate_model_heap_size_;
  dylan_value compilation_record_data_size_;
  dylan_value compilation_record_code_size_;
  dylan_value compilation_record_preceding_line_count_;
} _KLcompilation_recordGVdfmc_common;

typedef struct {
  dylan_value wrapper;
} _KLintegerGVKd;

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 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 instanceQ_iep_;
  dylan_value union_type1_;
  dylan_value union_type2_;
} _KLunionGVKe;

typedef struct {
  dylan_value wrapper;
  dylan_value object_dood_state_;
  dylan_value proxy_address_;
} _KLdood_slot_value_proxyGVdood;

typedef struct {
  dylan_value wrapper;
} _KLsequenceGVKd;

typedef struct {
  dylan_value wrapper;
} _KLvariable_nameGVdfmc_common;

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

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 namespace_name_;
  dylan_value home_library_;
} _KLmoduleGVKe;

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 mep_;
} _KLsimple_methodGVKe;

#define  define__KLsimple_closure_methodGVKi(nrepeated) \
  typedef struct { \
    dylan_value wrapper; \
    dylan_value xep_; \
    dylan_value function_signature_; \
    dylan_value mep_; \
    dylan_value environment_size_; \
    dylan_value environment_element_[nrepeated+1]; \
  } _KLsimple_closure_methodGVKi_##nrepeated;
define__KLsimple_closure_methodGVKi(0);

typedef struct {
  dylan_value wrapper;
} _KLsignature_specGVdfmc_definitions;

typedef struct {
  dylan_value wrapper;
  dylan_value object_dood_state_;
  dylan_value proxy_address_;
} _KLdood_address_proxyGVdood;

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

typedef struct {
  dylan_value wrapper;
  dylan_value signature_properties_;
  dylan_value signature_required_;
  dylan_value signature_values_;
} _KLsignatureAvaluesGVKi;

typedef struct {
  dylan_value wrapper;
  dylan_value namespace_name_;
  dylan_value library_major_version_;
  dylan_value library_minor_version_;
  dylan_value library_build_count_;
  dylan_value used_libraries_;
  dylan_value all_used_libraries_;
  dylan_value runtime_module_;
  dylan_value library_defined_generics_;
  dylan_value library_number_static_dispatches_;
  dylan_value library_number_dynamic_dispatches_;
} _KLlibraryGVKe;

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

typedef struct {
  dylan_value wrapper;
  dylan_value instanceQ_iep_;
  dylan_value subclass_class_;
} _KLsubclassGVKe;

typedef struct {
  dylan_value wrapper;
  dylan_value signature_properties_;
  dylan_value signature_required_;
  dylan_value signature_keys_;
  dylan_value signature_key_types_;
} _KLkeyword_signatureGVKe;


/* Typedefs for defined classes */

typedef struct {
  dylan_value wrapper;
  dylan_value private_shadowable_form_init_method_;
  dylan_value private_shadowable_form_system_init_method_;
  dylan_value shadowable_form_properties_flags_;
  dylan_value form_compilation_record_;
  dylan_value private_form_source_location_;
  dylan_value private_form_parent_form_;
  dylan_value form_sequence_number_;
  dylan_value private_form_dependencies_;
  dylan_value private_form_referenced_variables_;
  dylan_value booted_form_boot_id_;
  dylan_value private_form_adjectives_;
  dylan_value private_form_variable_name_or_names_;
  dylan_value form_properties_;
  dylan_value private_form_signature_;
  dylan_value private_form_primitive_value_;
} _KLprimitive_definitionGVdfmc_definitions;


/* Referenced object declarations */

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 _KLclassGVKd KLimplementation_classGVKe;
extern _KLmm_wrapperGVKi_0 KLimplementation_classGVKeW;
extern _KLsimple_object_vectorGVKd_0 KPempty_vectorVKi;
extern _KLclassGVKd KLsimple_object_vectorGVKd;
extern _KLmm_wrapperGVKi_0 KLsimple_object_vectorGVKdW;
extern _KLempty_listGVKd KPempty_listVKi;
extern _KLclassGVKd KLempty_listGVKd;
extern _KLmm_wrapperGVKi_0 KLempty_listGVKdW;
extern _KLinstance_slot_descriptorGVKe Kprivate_shadowable_form_init_methodVdfmc_commonHLtop_level_form_propertiesG;
extern _KLclassGVKd KLinstance_slot_descriptorGVKe;
extern _KLmm_wrapperGVKi_0 KLinstance_slot_descriptorGVKeW;
extern _KLinstance_slot_descriptorGVKe Kprivate_shadowable_form_system_init_methodVdfmc_commonHLtop_level_form_propertiesG;
extern _KLinstance_slot_descriptorGVKe Kshadowable_form_properties_flagsVdfmc_commonHLtop_level_form_propertiesG;
extern _KLinstance_slot_descriptorGVKe Kform_compilation_recordVdfmc_commonHLtop_level_formG;
extern _KLinstance_slot_descriptorGVKe Kprivate_form_source_locationVdfmc_commonHLtop_level_formG;
extern _KLinstance_slot_descriptorGVKe Kprivate_form_parent_formVdfmc_commonHLtop_level_formG;
extern _KLinstance_slot_descriptorGVKe Kform_sequence_numberVdfmc_commonHLtop_level_formG;
extern _KLinstance_slot_descriptorGVKe Kprivate_form_dependenciesVdfmc_commonHLtop_level_formG;
extern _KLinstance_slot_descriptorGVKe Kprivate_form_referenced_variablesVdfmc_commonHLtop_level_formG;
extern _KLinstance_slot_descriptorGVKe Kbooted_form_boot_idVdfmc_definitionsHLcompiler_booted_formG;
extern _KLinstance_slot_descriptorGVKe Kprivate_form_adjectivesVdfmc_commonHLmodified_top_level_formG;
extern _KLinstance_slot_descriptorGVKe Kprivate_form_variable_name_or_namesVdfmc_commonHLvariable_defining_formG;
extern _KLvirtual_slot_descriptorGVKi Kform_models_installedQVdfmc_commonHLvariable_defining_formG;
extern _KLclassGVKd KLvirtual_slot_descriptorGVKi;
extern _KLmm_wrapperGVKi_0 KLvirtual_slot_descriptorGVKiW;
extern _KLinstance_slot_descriptorGVKe Kform_propertiesVdfmc_commonHLvariable_defining_formG;
extern _KLinstance_slot_descriptorGVKe Kprivate_form_signatureVdfmc_definitionsHLfunction_defining_formG;
extern _KLsymbolGVKd KJvalue_;
extern _KLclassGVKd KLsymbolGVKd;
extern _KLmm_wrapperGVKi_0 KLsymbolGVKdW;
extern _KLclassGVKd KLsealed_generic_functionGVKe;
extern _KLmm_wrapperGVKi_0 KLsealed_generic_functionGVKeW;
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 KLbyte_stringGVKd;
extern _KLmm_wrapperGVKi_0 KLbyte_stringGVKdW;
extern _KLclassGVKd KLpairGVKd;
extern _KLmm_wrapperGVKi_0 KLpairGVKdW;
extern _KLclassGVKd KLgetter_methodGVKi;
extern _KLmm_wrapperGVKi_0 KLgetter_methodGVKiW;
extern _KLclassGVKd KLdood_mapped_objectGVdood;
extern _KLmm_wrapperGVKi_0 KLdood_mapped_objectGVdoodW;
extern _KLclassGVKd KLform_propertiesGVdfmc_common;
extern _KLmm_wrapperGVKi_0 KLform_propertiesGVdfmc_commonW;
extern _KLclassGVKd KLtop_level_form_propertiesGVdfmc_common;
extern _KLmm_wrapperGVKi_0 KLtop_level_form_propertiesGVdfmc_commonW;
extern _KLclassGVKd KLinstallable_form_propertiesGVdfmc_common;
extern _KLmm_wrapperGVKi_0 KLinstallable_form_propertiesGVdfmc_commonW;
extern _KLclassGVKd KLvariable_defining_form_propertiesGVdfmc_common;
extern _KLmm_wrapperGVKi_0 KLvariable_defining_form_propertiesGVdfmc_commonW;
extern _KLclassGVKd KLtop_level_formGVdfmc_common;
extern _KLmm_wrapperGVKi_0 KLtop_level_formGVdfmc_commonW;
extern _KLclassGVKd KLcompiler_booted_formGVdfmc_definitions;
extern _KLmm_wrapperGVKi_0 KLcompiler_booted_formGVdfmc_definitionsW;
extern _KLclassGVKd KLmodified_top_level_formGVdfmc_common;
extern _KLmm_wrapperGVKi_0 KLmodified_top_level_formGVdfmc_commonW;
extern _KLclassGVKd KLdefining_formGVdfmc_common;
extern _KLmm_wrapperGVKi_0 KLdefining_formGVdfmc_commonW;
extern _KLclassGVKd KLvariable_defining_formGVdfmc_common;
extern _KLmm_wrapperGVKi_0 KLvariable_defining_formGVdfmc_commonW;
extern _KLclassGVKd KLfunction_defining_formGVdfmc_definitions;
extern _KLmm_wrapperGVKi_0 KLfunction_defining_formGVdfmc_definitionsW;
dylan_value KerrorVKdMM1I (dylan_value, dylan_value);
extern _KLsymbolGVKd KJsignature_;
dylan_value Kcurrent_compilation_recordVdfmc_commonI ();
extern _KLclassGVKd KLcompilation_recordGVdfmc_common;
extern _KLmm_wrapperGVKi_0 KLcompilation_recordGVdfmc_commonW;
dylan_value Knext_form_sequence_numberVdfmc_commonI ();
extern _KLclassGVKd KLintegerGVKd;
extern _KLmm_wrapperGVKi_0 KLintegerGVKdW;
dylan_value KinitializeVKdMdfmc_commonM0I (dylan_value, dylan_value);
extern _KLkeyword_methodGVKe KinitializeVKdMM1;
extern _KLfunction_classGVKi KLkeyword_methodGVKe;
extern _KLclassGVKd KLfunction_classGVKi;
extern _KLmm_wrapperGVKi_0 KLfunction_classGVKiW;
extern _KLmm_wrapperGVKi_0 KLkeyword_methodGVKeW;
extern _KLclassGVKd KLunionGVKe;
extern _KLmm_wrapperGVKi_0 KLunionGVKeW;
dylan_value Kunion_instanceQVKiI (dylan_value, dylan_value);
extern _KLclassGVKd KLdood_slot_value_proxyGVdood;
extern _KLmm_wrapperGVKi_0 KLdood_slot_value_proxyGVdoodW;
extern _KLclassGVKd KLsequenceGVKd;
extern _KLmm_wrapperGVKi_0 KLsequenceGVKdW;
extern _KLclassGVKd KLvariable_nameGVdfmc_common;
extern _KLmm_wrapperGVKi_0 KLvariable_nameGVdfmc_commonW;
extern _KLclassGVKd KLsingletonGVKd;
extern _KLmm_wrapperGVKi_0 KLsingletonGVKdW;
dylan_value Ksingleton_pointer_idQ_instanceQVKiI (dylan_value, dylan_value);
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;
dylan_value Kclass_instanceQ_initialVKiI (dylan_value, dylan_value);
extern _KLmoduleGVKe Kdfmc_definitions_moduleYdylan_userVdfmc_definitions;
extern _KLclassGVKd KLmoduleGVKe;
extern _KLmm_wrapperGVKi_0 KLmoduleGVKeW;
extern _KLincremental_generic_functionGVKe KchooseVKd;
extern _KLfunction_classGVKi KLincremental_generic_functionGVKe;
extern _KLmm_wrapperGVKi_0 KLincremental_generic_functionGVKeW;
extern _KLincremental_generic_functionGVKe KemptyQVKd;
extern _KLincremental_generic_functionGVKe KmemberQVKd;
dylan_value KmemberQVKdMM4I (dylan_value, dylan_value, dylan_value, dylan_value);
extern _KLsimple_methodGVKe KEEVKd;
extern _KLfunction_classGVKi KLsimple_methodGVKe;
extern _KLmm_wrapperGVKi_0 KLsimple_methodGVKeW;
extern _KLfunction_classGVKi KLsimple_closure_methodGVKi;
extern _KLmm_wrapperGVKi_0 KLsimple_closure_methodGVKiW;
extern _KLclassGVKd KLsignature_specGVdfmc_definitions;
extern _KLmm_wrapperGVKi_0 KLsignature_specGVdfmc_definitionsW;
extern _KLclassGVKd KLdood_address_proxyGVdood;
extern _KLmm_wrapperGVKi_0 KLdood_address_proxyGVdoodW;
dylan_value Kobject_classVKdI (dylan_value);
extern _KLsealed_generic_functionGVKe Kproxy_slot_descriptorVdood;
extern _KLincremental_generic_functionGVKe KelementVKd;
extern _KLsealed_generic_functionGVKe Kslot_getterVKe;
dylan_value Kdepth_format_outVdoodI (dylan_value, dylan_value);
extern _KLincremental_generic_functionGVKe KAVKd;
extern _KLsimple_methodGVKe Kdood_force_slot_value_proxyVdood;
extern _KLsimple_methodGVKe Kwalker_slot_value_setterVwalker;
extern _KLincremental_generic_functionGVKe K_VKd;
extern _KLclassGVKd KLsignatureGVKe;
extern _KLmm_wrapperGVKi_0 KLsignatureGVKeW;
extern _KLclassGVKd KLsignatureAvaluesGVKi;
extern _KLmm_wrapperGVKi_0 KLsignatureAvaluesGVKiW;
extern _KLsimple_object_vectorGVKd_16 KDsignature_LbooleanG_typesVKi;
dylan_value KPadd_a_methodVKnI (dylan_value, dylan_value, dylan_value, dylan_value, dylan_value, dylan_value);
extern _KLsealed_generic_functionGVKe Kform_compile_stage_onlyQVdfmc_common;
extern _KLlibraryGVKe Kdfmc_definitions_libraryYdylan_userVdfmc_definitions;
extern _KLclassGVKd KLlibraryGVKe;
extern _KLmm_wrapperGVKi_0 KLlibraryGVKeW;
extern _KLincremental_generic_functionGVKe Kinitialize_packed_slotsVKe;
extern _KLincremental_generic_functionGVKe Kdood_lazy_gettersVdood;
dylan_value KlistVKdI (dylan_value);
extern _KLsealed_generic_functionGVKe KconcatenateVKd;
extern _KLclassGVKd KLlistGVKd;
extern _KLmm_wrapperGVKi_0 KLlistGVKdW;
extern _KLsimple_object_vectorGVKd_16 KDsignature_LlistG_typesVKi;
extern _KLclassGVKd KLsubclassGVKe;
extern _KLmm_wrapperGVKi_0 KLsubclassGVKeW;
dylan_value Ksubclass_instanceQVKiI (dylan_value, dylan_value);
dylan_value Kinitialize_packed_slotsVKeMdfmc_definitionsM5I (dylan_value, dylan_value);
extern _KLsealed_generic_functionGVKe Kunsupplied_objectVKi;
extern _KLkeyword_methodGVKe Kinitialize_packed_slotsVKeMM0;
extern _KLkeyword_methodGVKe Kinitialize_packed_slotsVKeMdfmc_commonM0;
extern _KLkeyword_methodGVKe Kinitialize_packed_slotsVKeMdfmc_commonM1;
extern _KLkeyword_methodGVKe Kinitialize_packed_slotsVKeMdfmc_commonM2;
extern _KLkeyword_methodGVKe Kinitialize_packed_slotsVKeMdfmc_commonM3;
extern _KLclassGVKd KLkeyword_signatureGVKe;
extern _KLmm_wrapperGVKi_0 KLkeyword_signatureGVKeW;
extern dylan_value Ttrace_allocationQTVdood;
extern dylan_value Tprint_depthTVdood;

/* Defined object declarations */

dylan_value Kparse_primitive_adjectivesVdfmc_definitionsI (dylan_value, dylan_value);
extern _KLclassGVKd KLprimitive_definitionGVdfmc_definitions;
extern _KLmm_wrapperGVKi_0 KLprimitive_definitionGVdfmc_definitionsW;
static _KLimplementation_classGVKe K3;
static _KLsimple_object_vectorGVKd_15 K4;
extern _KLkeyword_methodGVKe KLprimitive_definitionGZ32ZconstructorVdfmc_definitionsMM0;
dylan_value KLprimitive_definitionGZ32ZconstructorVdfmc_definitionsMM0I (dylan_value, dylan_value, dylan_value, dylan_value, dylan_value, dylan_value, dylan_value, dylan_value, dylan_value);
static _KLsimple_object_vectorGVKd_2 K7;
static _KLsimple_object_vectorGVKd_13 K8;
static _KLsimple_object_vectorGVKd_1 K9;
static _KLsimple_object_vectorGVKd_16 K10;
extern _KLinstance_slot_descriptorGVKe Kprivate_form_primitive_valueVdfmc_definitionsHLprimitive_definitionG;
extern _KLsealed_generic_functionGVKe Kprivate_form_primitive_valueVdfmc_definitions;
extern _KLgetter_methodGVKi Kprivate_form_primitive_valueVdfmc_definitionsMM0;
static _KLpairGVKd K14;
static _KLbyte_stringGVKd_28 K15;
static _KLsymbolGVKd KJsource_location_;
static _KLbyte_stringGVKd_23 K17;
static _KLsymbolGVKd KJboot_id_;
static _KLsymbolGVKd KJadjectives_;
static _KLsymbolGVKd KJvariable_name_;
static _KLunionGVKe K21;
static _KLunionGVKe K22;
static _KLunionGVKe K23;
static _KLpairGVKd K24;
static _KLunionGVKe K25;
static _KLunionGVKe K26;
static _KLsingletonGVKd K27;
static _KLunionGVKe K28;
static _KLbyte_stringGVKd_13 K29;
static _KLbyte_stringGVKd_10 K30;
static _KLbyte_stringGVKd_7 K31;
static _KLbyte_stringGVKd_15 K32;
static _KLkeyword_signatureAvaluesGVKi K33;
static _KLsimple_object_vectorGVKd_14 K34;
static _KLsymbolGVKd KJparent_form_;
static _KLbyte_stringGVKd_11 K36;
static _KLsimple_object_vectorGVKd_7 K37;
static _KLsimple_object_vectorGVKd_1 K38;
static _KLbyte_stringGVKd_22 K39;
static dylan_value Kverify_not_bothF69I (dylan_value, dylan_value, dylan_value, dylan_value);
static _KLsymbolGVKd KJside_effecting_;
static _KLsymbolGVKd KJside_effect_free_;
static _KLsymbolGVKd KJstateless_;
static _KLsymbolGVKd KJstateful_;
static _KLsymbolGVKd KJdynamic_extent_;
static _KLsymbolGVKd KJindefinite_extent_;
static _KLsimple_closure_methodGVKi_0 Kanonymous_of_parse_primitive_adjectivesF56;
static dylan_value Kanonymous_of_parse_primitive_adjectivesF56I (dylan_value);
static _KLbyte_stringGVKd_28 K49;
static _KLsymbolGVKd KJside_effectingQ_;
static _KLsymbolGVKd KJstatelessQ_;
static _KLsymbolGVKd KJdynamic_extentQ_;
static _KLbyte_stringGVKd_15 K53;
static _KLbyte_stringGVKd_10 K54;
static _KLbyte_stringGVKd_15 K55;
static _KLpairGVKd K57;
static _KLpairGVKd K58;
static _KLpairGVKd K59;
static _KLpairGVKd K60;
static _KLpairGVKd K61;
static _KLpairGVKd K62;
static _KLbyte_stringGVKd_17 K63;
static _KLbyte_stringGVKd_14 K64;
static _KLbyte_stringGVKd_8 K65;
static _KLbyte_stringGVKd_9 K66;
static _KLbyte_stringGVKd_16 K67;
static _KLbyte_stringGVKd_14 K68;
static _KLbyte_stringGVKd_39 K70;
extern _KLsimple_methodGVKe Kform_primitive_valueVdfmc_definitionsMM0;
dylan_value Kform_primitive_valueVdfmc_definitionsMM0I (dylan_value);
static _KLbyte_stringGVKd_14 K73;
static _KLsignatureGVKe K74;
extern _KLsimple_methodGVKe Kform_primitive_side_effectingQVdfmc_definitionsMM0;
dylan_value Kform_primitive_side_effectingQVdfmc_definitionsMM0I (dylan_value x_);
static _KLsignatureAvaluesGVKi K77;
extern _KLsimple_methodGVKe Kform_primitive_dynamic_extentQVdfmc_definitionsMM0;
dylan_value Kform_primitive_dynamic_extentQVdfmc_definitionsMM0I (dylan_value x_);
extern _KLsimple_methodGVKe Kform_primitive_statelessQVdfmc_definitionsMM0;
dylan_value Kform_primitive_statelessQVdfmc_definitionsMM0I (dylan_value x_);
extern _KLsimple_methodGVKe Kform_compile_stage_onlyQVdfmc_commonMdfmc_definitionsM5;
dylan_value Kform_compile_stage_onlyQVdfmc_commonMdfmc_definitionsM5I (dylan_value);
extern _KLkeyword_methodGVKe Kinitialize_packed_slotsVKeMdfmc_definitionsM10;
dylan_value Kinitialize_packed_slotsVKeMdfmc_definitionsM10I (dylan_value, dylan_value, dylan_value, dylan_value, dylan_value);
extern _KLsimple_methodGVKe Kdood_lazy_gettersVdoodMdfmc_definitionsM29;
dylan_value Kdood_lazy_gettersVdoodMdfmc_definitionsM29I (dylan_value);
static _KLbyte_stringGVKd_15 K91;
static _KLsignatureAvaluesGVKi K92;
static _KLsimple_object_vectorGVKd_1 K93;
static _KLsubclassGVKe K94;
static _KLpairGVKd K95;
static _KLpairGVKd K96;
static _KLpairGVKd K97;
static _KLpairGVKd K98;
static _KLpairGVKd K99;
extern _KLsimple_methodGVKe Kform_primitive_side_effectingQ_setterVdfmc_definitionsMM0;
dylan_value Kform_primitive_side_effectingQ_setterVdfmc_definitionsMM0I (dylan_value, dylan_value);
extern _KLsimple_methodGVKe Kform_primitive_dynamic_extentQ_setterVdfmc_definitionsMM0;
dylan_value Kform_primitive_dynamic_extentQ_setterVdfmc_definitionsMM0I (dylan_value, dylan_value);
extern _KLsimple_methodGVKe Kform_primitive_statelessQ_setterVdfmc_definitionsMM0;
dylan_value Kform_primitive_statelessQ_setterVdfmc_definitionsMM0I (dylan_value, dylan_value);
static _KLsignatureAvaluesGVKi K106;
static _KLsimple_object_vectorGVKd_2 K107;
static _KLkeyword_signatureGVKe K108;
static _KLsimple_object_vectorGVKd_6 K109;
static _KLsimple_object_vectorGVKd_3 K110;

/* Indirection variables */

static dylan_value IKJsource_location_ = &KJsource_location_;
static dylan_value IKJboot_id_ = &KJboot_id_;
static dylan_value IKJadjectives_ = &KJadjectives_;
static dylan_value IKJvariable_name_ = &KJvariable_name_;
static dylan_value IKJparent_form_ = &KJparent_form_;
static dylan_value IKJside_effecting_ = &KJside_effecting_;
static dylan_value IKJside_effect_free_ = &KJside_effect_free_;
static dylan_value IKJstateless_ = &KJstateless_;
static dylan_value IKJstateful_ = &KJstateful_;
static dylan_value IKJdynamic_extent_ = &KJdynamic_extent_;
static dylan_value IKJindefinite_extent_ = &KJindefinite_extent_;
static dylan_value IKJside_effectingQ_ = &KJside_effectingQ_;
static dylan_value IKJstatelessQ_ = &KJstatelessQ_;
static dylan_value IKJdynamic_extentQ_ = &KJdynamic_extentQ_;

/* Variables */

dylan_value form_primitive_statelessQVdfmc_definitions = &Kform_primitive_statelessQVdfmc_definitionsMM0;
dylan_value form_primitive_dynamic_extentQVdfmc_definitions = &Kform_primitive_dynamic_extentQVdfmc_definitionsMM0;
dylan_value form_primitive_side_effectingQVdfmc_definitions = &Kform_primitive_side_effectingQVdfmc_definitionsMM0;
dylan_value form_primitive_valueVdfmc_definitions = &Kform_primitive_valueVdfmc_definitionsMM0;
dylan_value Lprimitive_definitionGVdfmc_definitions = &KLprimitive_definitionGVdfmc_definitions;
dylan_value Lprimitive_signature_specGVdfmc_definitions = &KLsignature_specGVdfmc_definitions;

/* Objects */

_KLclassGVKd KLprimitive_definitionGVdfmc_definitions = {
  &KLclassGVKdW /* wrapper */,
  &Kclass_instanceQ_initialVKiI,
  &K39,
  &K3,
  (dylan_value) 1,
  &Kdfmc_definitions_moduleYdylan_userVdfmc_definitions
};

_KLmm_wrapperGVKi_0 KLprimitive_definitionGVdfmc_definitionsW = {
  &KLmm_wrapperGVKiW /* wrapper */,
  &K3,
  (dylan_value) 1,
  61,
  33554439,
  (dylan_value) 1
};

static _KLimplementation_classGVKe K3 = {
  &KLimplementation_classGVKeW /* wrapper */,
  (dylan_value) 527433789,
  &KLprimitive_definitionGVdfmc_definitions,
  &KLprimitive_definitionGVdfmc_definitionsW,
  &KPfalseVKi,
  &K4,
  (dylan_value) -3,
  &KLprimitive_definitionGZ32ZconstructorVdfmc_definitionsMM0,
  &K7,
  &K8,
  (dylan_value) 49,
  &KPempty_vectorVKi,
  &KPempty_vectorVKi,
  &KPempty_listVKi,
  &KPempty_listVKi,
  &KPempty_listVKi,
  &KPempty_vectorVKi,
  &K9,
  &K10,
  &KPempty_vectorVKi,
  &KPempty_vectorVKi,
  &KPempty_vectorVKi,
  &KPempty_vectorVKi,
  &KPempty_vectorVKi
};

static _KLsimple_object_vectorGVKd_15 K4 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (dylan_value) 61,
  &Kprivate_shadowable_form_init_methodVdfmc_commonHLtop_level_form_propertiesG,
  &Kprivate_shadowable_form_system_init_methodVdfmc_commonHLtop_level_form_propertiesG,
  &Kshadowable_form_properties_flagsVdfmc_commonHLtop_level_form_propertiesG,
  &Kform_compilation_recordVdfmc_commonHLtop_level_formG,
  &Kprivate_form_source_locationVdfmc_commonHLtop_level_formG,
  &Kprivate_form_parent_formVdfmc_commonHLtop_level_formG,
  &Kform_sequence_numberVdfmc_commonHLtop_level_formG,
  &Kprivate_form_dependenciesVdfmc_commonHLtop_level_formG,
  &Kprivate_form_referenced_variablesVdfmc_commonHLtop_level_formG,
  &Kbooted_form_boot_idVdfmc_definitionsHLcompiler_booted_formG,
  &Kprivate_form_adjectivesVdfmc_commonHLmodified_top_level_formG,
  &Kprivate_form_variable_name_or_namesVdfmc_commonHLvariable_defining_formG,
  &Kform_propertiesVdfmc_commonHLvariable_defining_formG,
  &Kprivate_form_signatureVdfmc_definitionsHLfunction_defining_formG,
  &Kprivate_form_primitive_valueVdfmc_definitionsHLprimitive_definitionG
};

_KLkeyword_methodGVKe KLprimitive_definitionGZ32ZconstructorVdfmc_definitionsMM0 = {
  &KLkeyword_methodGVKeW /* wrapper */,
  &rest_key_xep_9,
  &K33,
  &key_mep_2,
  &KLprimitive_definitionGZ32ZconstructorVdfmc_definitionsMM0I,
  &K34
};

static _KLsimple_object_vectorGVKd_2 K7 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (dylan_value) 9,
  &KLfunction_defining_formGVdfmc_definitions,
  &KLcompiler_booted_formGVdfmc_definitions
};

static _KLsimple_object_vectorGVKd_13 K8 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (dylan_value) 53,
  &KLobjectGVKd,
  &KLdood_mapped_objectGVdood,
  &KLform_propertiesGVdfmc_common,
  &KLtop_level_form_propertiesGVdfmc_common,
  &KLinstallable_form_propertiesGVdfmc_common,
  &KLvariable_defining_form_propertiesGVdfmc_common,
  &KLtop_level_formGVdfmc_common,
  &KLcompiler_booted_formGVdfmc_definitions,
  &KLmodified_top_level_formGVdfmc_common,
  &KLdefining_formGVdfmc_common,
  &KLvariable_defining_formGVdfmc_common,
  &KLfunction_defining_formGVdfmc_definitions,
  &KLprimitive_definitionGVdfmc_definitions
};

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

static _KLsimple_object_vectorGVKd_16 K10 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (dylan_value) 65,
  &Kprivate_shadowable_form_init_methodVdfmc_commonHLtop_level_form_propertiesG,
  &Kprivate_shadowable_form_system_init_methodVdfmc_commonHLtop_level_form_propertiesG,
  &Kshadowable_form_properties_flagsVdfmc_commonHLtop_level_form_propertiesG,
  &Kform_compilation_recordVdfmc_commonHLtop_level_formG,
  &Kprivate_form_source_locationVdfmc_commonHLtop_level_formG,
  &Kprivate_form_parent_formVdfmc_commonHLtop_level_formG,
  &Kform_sequence_numberVdfmc_commonHLtop_level_formG,
  &Kprivate_form_dependenciesVdfmc_commonHLtop_level_formG,
  &Kprivate_form_referenced_variablesVdfmc_commonHLtop_level_formG,
  &Kbooted_form_boot_idVdfmc_definitionsHLcompiler_booted_formG,
  &Kprivate_form_adjectivesVdfmc_commonHLmodified_top_level_formG,
  &Kprivate_form_variable_name_or_namesVdfmc_commonHLvariable_defining_formG,
  &Kform_models_installedQVdfmc_commonHLvariable_defining_formG,
  &Kform_propertiesVdfmc_commonHLvariable_defining_formG,
  &Kprivate_form_signatureVdfmc_definitionsHLfunction_defining_formG,
  &Kprivate_form_primitive_valueVdfmc_definitionsHLprimitive_definitionG
};

_KLinstance_slot_descriptorGVKe Kprivate_form_primitive_valueVdfmc_definitionsHLprimitive_definitionG = {
  &KLinstance_slot_descriptorGVKeW /* wrapper */,
  (dylan_value) 157,
  &KPfalseVKi,
  &KLprimitive_definitionGVdfmc_definitions,
  &KJvalue_,
  &Kprivate_form_primitive_valueVdfmc_definitions,
  &KPfalseVKi,
  &KLobjectGVKd
};

_KLsealed_generic_functionGVKe Kprivate_form_primitive_valueVdfmc_definitions = {
  &KLsealed_generic_functionGVKeW /* wrapper */,
  &gf_xep_1,
  &KDsignature_LobjectG_object_rest_value_1VKi,
  &KPfalseVKi,
  &K15,
  &K14,
  &RSINGULAR_Labsent_engine_nodeG
};

_KLgetter_methodGVKi Kprivate_form_primitive_valueVdfmc_definitionsMM0 = {
  &KLgetter_methodGVKiW /* wrapper */,
  &slotacc_single_q_instance_getter_xep,
  &Kprivate_form_primitive_valueVdfmc_definitionsHLprimitive_definitionG
};

static _KLpairGVKd K14 = {
  &KLpairGVKdW /* wrapper */,
  &Kprivate_form_primitive_valueVdfmc_definitionsMM0,
  &KPempty_listVKi
};

static _KLbyte_stringGVKd_28 K15 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 113,
  "private-form-primitive-value"
};

static _KLsymbolGVKd KJsource_location_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K32
};

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

static _KLsymbolGVKd KJboot_id_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K31
};

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

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

static _KLunionGVKe K21 = {
  &KLunionGVKeW /* wrapper */,
  &Kunion_instanceQVKiI,
  &KLdood_slot_value_proxyGVdood,
  &K28
};

static _KLunionGVKe K22 = {
  &KLunionGVKeW /* wrapper */,
  &Kunion_instanceQVKiI,
  &KLdood_slot_value_proxyGVdood,
  &K26
};

static _KLunionGVKe K23 = {
  &KLunionGVKeW /* wrapper */,
  &Kunion_instanceQVKiI,
  &KLdood_slot_value_proxyGVdood,
  &K25
};

static _KLpairGVKd K24 = {
  &KLpairGVKdW /* wrapper */,
  &KinitializeVKdMM1,
  &KPempty_listVKi
};

static _KLunionGVKe K25 = {
  &KLunionGVKeW /* wrapper */,
  &Kunion_instanceQVKiI,
  &KLsequenceGVKd,
  &KLvariable_nameGVdfmc_common
};

static _KLunionGVKe K26 = {
  &KLunionGVKeW /* wrapper */,
  &Kunion_instanceQVKiI,
  &K27,
  &KLsequenceGVKd
};

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

static _KLunionGVKe K28 = {
  &KLunionGVKeW /* wrapper */,
  &Kunion_instanceQVKiI,
  &K27,
  &KLtop_level_formGVdfmc_common
};

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

static _KLbyte_stringGVKd_10 K30 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 41,
  "adjectives"
};

static _KLbyte_stringGVKd_7 K31 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 29,
  "boot-id"
};

static _KLbyte_stringGVKd_15 K32 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 61,
  "source-location"
};

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

static _KLsimple_object_vectorGVKd_14 K34 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (dylan_value) 57,
  &KJsource_location_,
  &KPunboundVKi,
  &KJparent_form_,
  &KPfalseVKi,
  &KJboot_id_,
  &KPunboundVKi,
  &KJadjectives_,
  &KPunboundVKi,
  &KJvariable_name_,
  &KPunboundVKi,
  &KJsignature_,
  &KPunboundVKi,
  &KJvalue_,
  &KPfalseVKi
};

static _KLsymbolGVKd KJparent_form_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K36
};

static _KLbyte_stringGVKd_11 K36 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 45,
  "parent-form"
};

static _KLsimple_object_vectorGVKd_7 K37 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (dylan_value) 29,
  &KJsource_location_,
  &KJparent_form_,
  &KJboot_id_,
  &KJadjectives_,
  &KJvariable_name_,
  &KJsignature_,
  &KJvalue_
};

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

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

static _KLsymbolGVKd KJside_effecting_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K68
};

static _KLsymbolGVKd KJside_effect_free_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K67
};

static _KLsymbolGVKd KJstateless_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K66
};

static _KLsymbolGVKd KJstateful_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K65
};

static _KLsymbolGVKd KJdynamic_extent_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K64
};

static _KLsymbolGVKd KJindefinite_extent_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K63
};

static _KLsimple_closure_methodGVKi_0 Kanonymous_of_parse_primitive_adjectivesF56 = {
  &KLsimple_closure_methodGVKiW /* wrapper */,
  &xep_1,
  &KDsignature_LobjectG_object_rest_value_1VKi,
  &Kanonymous_of_parse_primitive_adjectivesF56I,
  (dylan_value) 1
};

static _KLbyte_stringGVKd_28 K49 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 113,
  "Unknown adjectives %s for %s"
};

static _KLsymbolGVKd KJside_effectingQ_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K55
};

static _KLsymbolGVKd KJstatelessQ_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K54
};

static _KLsymbolGVKd KJdynamic_extentQ_ = {
  &KLsymbolGVKdW /* wrapper */,
  &K53
};

static _KLbyte_stringGVKd_15 K53 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 61,
  "dynamic-extent?"
};

static _KLbyte_stringGVKd_10 K54 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 41,
  "stateless?"
};

static _KLbyte_stringGVKd_15 K55 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 61,
  "side-effecting?"
};

static _KLpairGVKd K57 = {
  &KLpairGVKdW /* wrapper */,
  &KJside_effecting_,
  &K58
};

static _KLpairGVKd K58 = {
  &KLpairGVKdW /* wrapper */,
  &KJside_effect_free_,
  &K59
};

static _KLpairGVKd K59 = {
  &KLpairGVKdW /* wrapper */,
  &KJstateless_,
  &K60
};

static _KLpairGVKd K60 = {
  &KLpairGVKdW /* wrapper */,
  &KJstateful_,
  &K61
};

static _KLpairGVKd K61 = {
  &KLpairGVKdW /* wrapper */,
  &KJdynamic_extent_,
  &K62
};

static _KLpairGVKd K62 = {
  &KLpairGVKdW /* wrapper */,
  &KJindefinite_extent_,
  &KPempty_listVKi
};

static _KLbyte_stringGVKd_17 K63 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 69,
  "indefinite-extent"
};

static _KLbyte_stringGVKd_14 K64 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 57,
  "dynamic-extent"
};

static _KLbyte_stringGVKd_8 K65 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 33,
  "stateful"
};

static _KLbyte_stringGVKd_9 K66 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 37,
  "stateless"
};

static _KLbyte_stringGVKd_16 K67 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 65,
  "side-effect-free"
};

static _KLbyte_stringGVKd_14 K68 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 57,
  "side-effecting"
};

static _KLbyte_stringGVKd_39 K70 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 157,
  "Conflicting adjectives %s and %s for %s"
};

_KLsimple_methodGVKe Kform_primitive_valueVdfmc_definitionsMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_1,
  &K74,
  &Kform_primitive_valueVdfmc_definitionsMM0I
};

static _KLbyte_stringGVKd_14 K73 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 57,
  "FORCING %= %=\n"
};

static _KLsignatureGVKe K74 = {
  &KLsignatureGVKeW /* wrapper */,
  (dylan_value) 41944069,
  &K38
};

_KLsimple_methodGVKe Kform_primitive_side_effectingQVdfmc_definitionsMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_1,
  &K77,
  &Kform_primitive_side_effectingQVdfmc_definitionsMM0I
};

static _KLsignatureAvaluesGVKi K77 = {
  &KLsignatureAvaluesGVKiW /* wrapper */,
  (dylan_value) 33555461,
  &K38,
  &KDsignature_LbooleanG_typesVKi
};

_KLsimple_methodGVKe Kform_primitive_dynamic_extentQVdfmc_definitionsMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_1,
  &K77,
  &Kform_primitive_dynamic_extentQVdfmc_definitionsMM0I
};

_KLsimple_methodGVKe Kform_primitive_statelessQVdfmc_definitionsMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_1,
  &K77,
  &Kform_primitive_statelessQVdfmc_definitionsMM0I
};

_KLsimple_methodGVKe Kform_compile_stage_onlyQVdfmc_commonMdfmc_definitionsM5 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_1,
  &K74,
  &Kform_compile_stage_onlyQVdfmc_commonMdfmc_definitionsM5I
};

_KLkeyword_methodGVKe Kinitialize_packed_slotsVKeMdfmc_definitionsM10 = {
  &KLkeyword_methodGVKeW /* wrapper */,
  &rest_key_xep_5,
  &K108,
  &key_mep_5,
  &Kinitialize_packed_slotsVKeMdfmc_definitionsM10I,
  &K109
};

_KLsimple_methodGVKe Kdood_lazy_gettersVdoodMdfmc_definitionsM29 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_1,
  &K92,
  &Kdood_lazy_gettersVdoodMdfmc_definitionsM29I
};

static _KLbyte_stringGVKd_15 K91 = {
  &KLbyte_stringGVKdW /* wrapper */,
  (dylan_value) 61,
  "No next method."
};

static _KLsignatureAvaluesGVKi K92 = {
  &KLsignatureAvaluesGVKiW /* wrapper */,
  (dylan_value) 37749765,
  &K93,
  &KDsignature_LlistG_typesVKi
};

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

static _KLsubclassGVKe K94 = {
  &KLsubclassGVKeW /* wrapper */,
  &Ksubclass_instanceQVKiI,
  &KLprimitive_definitionGVdfmc_definitions
};

static _KLpairGVKd K95 = {
  &KLpairGVKdW /* wrapper */,
  &Kinitialize_packed_slotsVKeMdfmc_commonM3,
  &K96
};

static _KLpairGVKd K96 = {
  &KLpairGVKdW /* wrapper */,
  &Kinitialize_packed_slotsVKeMdfmc_commonM2,
  &K97
};

static _KLpairGVKd K97 = {
  &KLpairGVKdW /* wrapper */,
  &Kinitialize_packed_slotsVKeMdfmc_commonM1,
  &K98
};

static _KLpairGVKd K98 = {
  &KLpairGVKdW /* wrapper */,
  &Kinitialize_packed_slotsVKeMdfmc_commonM0,
  &K99
};

static _KLpairGVKd K99 = {
  &KLpairGVKdW /* wrapper */,
  &Kinitialize_packed_slotsVKeMM0,
  &KPempty_listVKi
};

_KLsimple_methodGVKe Kform_primitive_side_effectingQ_setterVdfmc_definitionsMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_2,
  &K106,
  &Kform_primitive_side_effectingQ_setterVdfmc_definitionsMM0I
};

_KLsimple_methodGVKe Kform_primitive_dynamic_extentQ_setterVdfmc_definitionsMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_2,
  &K106,
  &Kform_primitive_dynamic_extentQ_setterVdfmc_definitionsMM0I
};

_KLsimple_methodGVKe Kform_primitive_statelessQ_setterVdfmc_definitionsMM0 = {
  &KLsimple_methodGVKeW /* wrapper */,
  &xep_2,
  &K106,
  &Kform_primitive_statelessQ_setterVdfmc_definitionsMM0I
};

static _KLsignatureAvaluesGVKi K106 = {
  &KLsignatureAvaluesGVKiW /* wrapper */,
  (dylan_value) 33555465,
  &K107,
  &KDsignature_LbooleanG_typesVKi
};

static _KLsimple_object_vectorGVKd_2 K107 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (dylan_value) 9,
  &KLbooleanGVKd,
  &KLprimitive_definitionGVdfmc_definitions
};

static _KLkeyword_signatureGVKe K108 = {
  &KLkeyword_signatureGVKeW /* wrapper */,
  (dylan_value) 49545221,
  &K38,
  &K110,
  &KDsignature_LobjectG_typesVKi
};

static _KLsimple_object_vectorGVKd_6 K109 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (dylan_value) 25,
  &KJside_effectingQ_,
  &Kunsupplied_objectVKi,
  &KJdynamic_extentQ_,
  &Kunsupplied_objectVKi,
  &KJstatelessQ_,
  &Kunsupplied_objectVKi
};

static _KLsimple_object_vectorGVKd_3 K110 = {
  &KLsimple_object_vectorGVKdW /* wrapper */,
  (dylan_value) 13,
  &KJside_effectingQ_,
  &KJdynamic_extentQ_,
  &KJstatelessQ_
};

/* Code */

dylan_value Kparse_primitive_adjectivesVdfmc_definitionsI (dylan_value name_, dylan_value adjectives_) {
  dylan_value unk_;
  dylan_value T4;
  dylan_value T5;
  dylan_value T6;
  dylan_value T7;
  _KLsimple_object_vectorGVKd_2 T8 = {&KLsimple_object_vectorGVKdW, (dylan_value) 9};
  dylan_value T9;
  dylan_value T10;
  _KLsimple_object_vectorGVKd_6 T11 = {&KLsimple_object_vectorGVKdW, (dylan_value) 25};
  dylan_value T12;
  dylan_value T13_0;

  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:32
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:38
  Kverify_not_bothF69I(adjectives_, name_, IKJside_effecting_, IKJside_effect_free_);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:39
  Kverify_not_bothF69I(adjectives_, name_, IKJstateless_, IKJstateful_);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:40
  Kverify_not_bothF69I(adjectives_, name_, IKJdynamic_extent_, IKJindefinite_extent_);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:41
  unk_ = CALL2(&KchooseVKd, &Kanonymous_of_parse_primitive_adjectivesF56, adjectives_);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:46
  CONGRUENT_CALL_PROLOG(&KemptyQVKd, 1);
  T4 = CONGRUENT_CALL1(unk_);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:46
  if (T4 == &KPfalseVKi) {
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:46
    T8.vector_element_[0] = unk_;
    T8.vector_element_[1] = name_;
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:46
    KerrorVKdMM1I(&K49, &T8);
  }
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:46
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:47
  T5 = CALL2(&KmemberQVKd, IKJside_effecting_, adjectives_);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:48
  T6 = CALL2(&KmemberQVKd, IKJstateful_, adjectives_);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:48
  T9 = primitive_not(T6);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:49
  T7 = CALL2(&KmemberQVKd, IKJindefinite_extent_, adjectives_);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:49
  T10 = primitive_not(T7);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:47
  T11.vector_element_[0] = IKJside_effectingQ_;
  T11.vector_element_[1] = T5;
  T11.vector_element_[2] = IKJstatelessQ_;
  T11.vector_element_[3] = T9;
  T11.vector_element_[4] = IKJdynamic_extentQ_;
  T11.vector_element_[5] = T10;
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:47
  T12 = primitive_copy_vector(&T11);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:47
  T13_0 = T12;
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:32
  MV_SET_COUNT(1);
  return(T13_0);
}

dylan_value KLprimitive_definitionGZ32ZconstructorVdfmc_definitionsMM0I (dylan_value class_, dylan_value init_args_, dylan_value Uunique_private_form_source_location_, dylan_value Uunique_private_form_parent_form_, dylan_value Uunique_booted_form_boot_id_, dylan_value Uunique_private_form_adjectives_, dylan_value Uunique_private_form_variable_name_or_names_, dylan_value Uunique_private_form_signature_, dylan_value Uunique_private_form_primitive_value_) {
  dylan_value T10;
  dylan_value Uunique_private_form_source_locationF11;
  dylan_value T12;
  dylan_value Uunique_booted_form_boot_idF13;
  dylan_value T14;
  dylan_value Uunique_private_form_adjectivesF15;
  dylan_value T16;
  dylan_value Uunique_private_form_variable_name_or_namesF17;
  dylan_value T18;
  dylan_value Uunique_private_form_signatureF19;
  dylan_value T20;
  dylan_value Uunique_private_form_parent_formF21;
  dylan_value Uunique_booted_form_boot_idF22;
  dylan_value Uunique_private_form_adjectivesF23;
  dylan_value Uunique_private_form_variable_name_or_namesF24;
  dylan_value T25_0;
  dylan_value T26;
  dylan_value T27;
  _KLsimple_object_vectorGVKd_1 T28 = {&KLsimple_object_vectorGVKdW, (dylan_value) 5};
  dylan_value T29;
  dylan_value T30;
  _KLsimple_object_vectorGVKd_1 T31 = {&KLsimple_object_vectorGVKdW, (dylan_value) 5};
  dylan_value T32;
  dylan_value T33;
  _KLsimple_object_vectorGVKd_1 T34 = {&KLsimple_object_vectorGVKdW, (dylan_value) 5};
  dylan_value T35;
  dylan_value T36;
  _KLsimple_object_vectorGVKd_1 T37 = {&KLsimple_object_vectorGVKdW, (dylan_value) 5};
  dylan_value T38;
  dylan_value T39;
  _KLsimple_object_vectorGVKd_1 T40 = {&KLsimple_object_vectorGVKdW, (dylan_value) 5};
  dylan_value T41;
  dylan_value T42;
  dylan_value init_valueF43;
  dylan_value T44;
  dylan_value init_valueF45;

  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
  T26 = primitive_copy_vector(init_args_);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
  T27 = primitive_idQ(Uunique_private_form_source_location_,&KPunboundVKi);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
  if (T27 != &KPfalseVKi) {
    T28.vector_element_[0] = IKJsource_location_;
    T29 = KerrorVKdMM1I(&K17, &T28);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
    T10 = T29;
    Uunique_private_form_source_locationF11 = T10;
  } else {
    Uunique_private_form_source_locationF11 = Uunique_private_form_source_location_;
  }
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
  T30 = primitive_idQ(Uunique_booted_form_boot_id_,&KPunboundVKi);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
  if (T30 != &KPfalseVKi) {
    T31.vector_element_[0] = IKJboot_id_;
    T32 = KerrorVKdMM1I(&K17, &T31);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
    T12 = T32;
    Uunique_booted_form_boot_idF13 = T12;
  } else {
    Uunique_booted_form_boot_idF13 = Uunique_booted_form_boot_id_;
  }
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
  T33 = primitive_idQ(Uunique_private_form_adjectives_,&KPunboundVKi);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
  if (T33 != &KPfalseVKi) {
    T34.vector_element_[0] = IKJadjectives_;
    T35 = KerrorVKdMM1I(&K17, &T34);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
    T14 = T35;
    Uunique_private_form_adjectivesF15 = T14;
  } else {
    Uunique_private_form_adjectivesF15 = Uunique_private_form_adjectives_;
  }
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
  T36 = primitive_idQ(Uunique_private_form_variable_name_or_names_,&KPunboundVKi);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
  if (T36 != &KPfalseVKi) {
    T37.vector_element_[0] = IKJvariable_name_;
    T38 = KerrorVKdMM1I(&K17, &T37);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
    T16 = T38;
    Uunique_private_form_variable_name_or_namesF17 = T16;
  } else {
    Uunique_private_form_variable_name_or_namesF17 = Uunique_private_form_variable_name_or_names_;
  }
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
  T39 = primitive_idQ(Uunique_private_form_signature_,&KPunboundVKi);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
  if (T39 != &KPfalseVKi) {
    T40.vector_element_[0] = &KJsignature_;
    T41 = KerrorVKdMM1I(&K17, &T40);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
    T18 = T41;
    Uunique_private_form_signatureF19 = T18;
  } else {
    Uunique_private_form_signatureF19 = Uunique_private_form_signature_;
  }
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
  T20 = primitive_object_allocate_filled(16,&KLprimitive_definitionGVdfmc_definitionsW,15,&KPunboundVKi,0,0,&KPunboundVKi);
  SLOT_VALUE_SETTER(&KPfalseVKi, T20, 0);
  SLOT_VALUE_SETTER(&KPfalseVKi, T20, 1);
  SLOT_VALUE_SETTER((dylan_value) 1, T20, 2);
  T42 = Kcurrent_compilation_recordVdfmc_commonI();
  primitive_type_check(T42, &KLcompilation_recordGVdfmc_common);
  init_valueF43 = T42;
  SLOT_VALUE_SETTER(init_valueF43, T20, 3);
  SLOT_VALUE_SETTER(Uunique_private_form_source_locationF11, T20, 4);
  primitive_type_check(Uunique_private_form_parent_form_, &K21);
  Uunique_private_form_parent_formF21 = Uunique_private_form_parent_form_;
  SLOT_VALUE_SETTER(Uunique_private_form_parent_formF21, T20, 5);
  T44 = Knext_form_sequence_numberVdfmc_commonI();
  primitive_type_check(T44, &KLintegerGVKd);
  init_valueF45 = T44;
  SLOT_VALUE_SETTER(init_valueF45, T20, 6);
  SLOT_VALUE_SETTER(&KPfalseVKi, T20, 7);
  SLOT_VALUE_SETTER(&KPfalseVKi, T20, 8);
  primitive_type_check(Uunique_booted_form_boot_idF13, &KLsymbolGVKd);
  Uunique_booted_form_boot_idF22 = Uunique_booted_form_boot_idF13;
  SLOT_VALUE_SETTER(Uunique_booted_form_boot_idF22, T20, 9);
  primitive_type_check(Uunique_private_form_adjectivesF15, &K22);
  Uunique_private_form_adjectivesF23 = Uunique_private_form_adjectivesF15;
  SLOT_VALUE_SETTER(Uunique_private_form_adjectivesF23, T20, 10);
  primitive_type_check(Uunique_private_form_variable_name_or_namesF17, &K23);
  Uunique_private_form_variable_name_or_namesF24 = Uunique_private_form_variable_name_or_namesF17;
  SLOT_VALUE_SETTER(Uunique_private_form_variable_name_or_namesF24, T20, 11);
  SLOT_VALUE_SETTER((dylan_value) 1, T20, 12);
  SLOT_VALUE_SETTER(Uunique_private_form_signatureF19, T20, 13);
  SLOT_VALUE_SETTER(Uunique_private_form_primitive_value_, T20, 14);
  MIEP_CALL_PROLOG(&K24);
  KinitializeVKdMdfmc_commonM0I(T20, T26);
  T25_0 = T20;
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
  MV_SET_COUNT(1);
  return(T25_0);
}

static dylan_value Kverify_not_bothF69I (dylan_value adjectives_, dylan_value name_, dylan_value adj1_, dylan_value adj2_) {
  dylan_value T4;
  dylan_value T5;
  dylan_value T6;
  dylan_value T7;
  dylan_value T8;
  _KLsimple_object_vectorGVKd_3 T9 = {&KLsimple_object_vectorGVKdW, (dylan_value) 13};
  dylan_value T10;

  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:33
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:34
  T4 = CALL2(&KmemberQVKd, adj1_, adjectives_);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:34
  if (T4 != &KPfalseVKi) {
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:34
    T5 = CALL2(&KmemberQVKd, adj2_, adjectives_);
    T6 = T5;
  } else {
    T6 = &KPfalseVKi;
  }
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:34
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:34
  if (T6 != &KPfalseVKi) {
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:35
    T9.vector_element_[0] = adj1_;
    T9.vector_element_[1] = adj2_;
    T9.vector_element_[2] = name_;
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:35
    T10 = KerrorVKdMM1I(&K70, &T9);
    T8 = T10;
  } else {
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:34
    T7 = &KPfalseVKi;
    MV_SET_ELT(0, &KPfalseVKi);
    MV_SET_COUNT(1);
    T8 = T7;
  }
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:34
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:33
  return(T8);
}

static dylan_value Kanonymous_of_parse_primitive_adjectivesF56I (dylan_value adj_) {
  dylan_value T1;
  dylan_value T2;
  dylan_value T3_0;

  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:41
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:42
  T1 = KmemberQVKdMM4I(adj_, &K57, &KPempty_vectorVKi, &KEEVKd);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:42
  T2 = primitive_not(T1);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:42
  T3_0 = T2;
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:41
  MV_SET_COUNT(1);
  return(T3_0);
}

dylan_value Kform_primitive_valueVdfmc_definitionsMM0I (dylan_value x_) {
  dylan_value T2;
  dylan_value T3;
  dylan_value T4;
  dylan_value T5;
  dylan_value T6;
  dylan_value T7;
  dylan_value T8;
  dylan_value T9;
  dylan_value T10;
  _KLsimple_object_vectorGVKd_2 T11 = {&KLsimple_object_vectorGVKdW, (dylan_value) 9};
  dylan_value T12;
  dylan_value T13;
  dylan_value value_;
  dylan_value T15;
  dylan_value T16;
  dylan_value T17;
  dylan_value T18;
  dylan_value T19_0;
  dylan_value T20_0;
  dylan_value T21_0;
  dylan_value T22;

  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
  T22 = SLOT_VALUE_INITD(x_, 14);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
  T2 = primitive_instanceQ(T22,&KLdood_address_proxyGVdood);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
  if (T2 != &KPfalseVKi) {
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
    T3 = Ttrace_allocationQTVdood;
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
    if (T3 != &KPfalseVKi) {
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
      T4 = Kobject_classVKdI(x_);
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
      T5 = SLOT_VALUE(T4, 2);
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
      T6 = SLOT_VALUE_INITD(T5, 17);
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
      T7 = Kobject_classVKdI(x_);
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
      T8 = CALL1(&Kproxy_slot_descriptorVdood, T22);
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
      CONGRUENT_CALL_PROLOG(&KelementVKd, 3);
      T9 = CONGRUENT_CALL3(T6, T8, &KPempty_vectorVKi);
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
      T10 = CALL1(&Kslot_getterVKe, T9);
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
      T11.vector_element_[0] = T7;
      T11.vector_element_[1] = T10;
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
      Kdepth_format_outVdoodI(&K73, &T11);
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
      T12 = primitive_read_thread_variable(Tprint_depthTVdood);
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
      CONGRUENT_CALL_PROLOG(&KAVKd, 2);
      T13 = CONGRUENT_CALL2(T12, (dylan_value) 5);
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
      primitive_write_thread_variable(Tprint_depthTVdood, T13);
    }
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
    value_ = CALL1(&Kdood_force_slot_value_proxyVdood, T22);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
    T15 = CALL1(&Kproxy_slot_descriptorVdood, T22);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
    CALL3(&Kwalker_slot_value_setterVwalker, value_, x_, T15);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
    T16 = Ttrace_allocationQTVdood;
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
    if (T16 != &KPfalseVKi) {
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
      T17 = primitive_read_thread_variable(Tprint_depthTVdood);
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
      CONGRUENT_CALL_PROLOG(&K_VKd, 2);
      T18 = CONGRUENT_CALL2(T17, (dylan_value) 5);
      // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
      primitive_write_thread_variable(Tprint_depthTVdood, T18);
    }
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
    T19_0 = value_;
    T21_0 = T19_0;
  } else {
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
    T20_0 = T22;
    T21_0 = T20_0;
  }
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
  MV_SET_COUNT(1);
  return(T21_0);
}

dylan_value Kform_primitive_side_effectingQVdfmc_definitionsMM0I (dylan_value x_) {
  dylan_value T2;
  DWORD T3;
  dylan_value T4;
  dylan_value T5_0;

  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  T2 = SLOT_VALUE_INITD(x_, 12);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  T3 = primitive_cast_integer_as_raw(T2);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  T4 = primitive_machine_word_logbitQ(10,T3);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  T5_0 = T4;
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  MV_SET_COUNT(1);
  return(T5_0);
}

dylan_value Kform_primitive_dynamic_extentQVdfmc_definitionsMM0I (dylan_value x_) {
  dylan_value T2;
  DWORD T3;
  dylan_value T4;
  dylan_value T5_0;

  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  T2 = SLOT_VALUE_INITD(x_, 12);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  T3 = primitive_cast_integer_as_raw(T2);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  T4 = primitive_machine_word_logbitQ(11,T3);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  T5_0 = T4;
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  MV_SET_COUNT(1);
  return(T5_0);
}

dylan_value Kform_primitive_statelessQVdfmc_definitionsMM0I (dylan_value x_) {
  dylan_value T2;
  DWORD T3;
  dylan_value T4;
  dylan_value T5_0;

  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  T2 = SLOT_VALUE_INITD(x_, 12);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  T3 = primitive_cast_integer_as_raw(T2);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  T4 = primitive_machine_word_logbitQ(12,T3);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  T5_0 = T4;
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  MV_SET_COUNT(1);
  return(T5_0);
}

dylan_value Kform_compile_stage_onlyQVdfmc_commonMdfmc_definitionsM5I (dylan_value form_) {
  dylan_value T2_0;

  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:25
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:27
  T2_0 = &KPtrueVKi;
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:25
  MV_SET_COUNT(1);
  return(T2_0);
}

dylan_value Kinitialize_packed_slotsVKeMdfmc_definitionsM10I (dylan_value x_, dylan_value all_keys_, dylan_value form_primitive_side_effectingQ_, dylan_value form_primitive_dynamic_extentQ_, dylan_value form_primitive_statelessQ_) {
  dylan_value T6;
  dylan_value T7;
  dylan_value T8;
  dylan_value T9;
  dylan_value T10;
  dylan_value T11;
  dylan_value T12;

  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  T9 = primitive_copy_vector(all_keys_);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  MIEP_CALL_PROLOG(&K95);
  Kinitialize_packed_slotsVKeMdfmc_definitionsM5I(x_, T9);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  T10 = primitive_idQ(form_primitive_side_effectingQ_,&Kunsupplied_objectVKi);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  if (T10 == &KPfalseVKi) {
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:17
    CALL2(&Kform_primitive_side_effectingQ_setterVdfmc_definitionsMM0, form_primitive_side_effectingQ_, x_);
  }
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  T11 = primitive_idQ(form_primitive_dynamic_extentQ_,&Kunsupplied_objectVKi);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  if (T11 == &KPfalseVKi) {
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:19
    CALL2(&Kform_primitive_dynamic_extentQ_setterVdfmc_definitionsMM0, form_primitive_dynamic_extentQ_, x_);
  }
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  T12 = primitive_idQ(form_primitive_statelessQ_,&Kunsupplied_objectVKi);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  if (T12 != &KPfalseVKi) {
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
    T7 = &KPfalseVKi;
    MV_SET_ELT(0, &KPfalseVKi);
    MV_SET_COUNT(1);
    T8 = T7;
  } else {
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:21
    CALL2(&Kform_primitive_statelessQ_setterVdfmc_definitionsMM0, form_primitive_statelessQ_, x_);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:21
    T6 = form_primitive_statelessQ_;
    MV_SET_ELT(0, form_primitive_statelessQ_);
    MV_SET_COUNT(1);
    T8 = T6;
  }
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  return(T8);
}

dylan_value Kdood_lazy_gettersVdoodMdfmc_definitionsM29I (dylan_value classU_) {
  dylan_value T2;
  dylan_value T3_0;
  dylan_value T4_0;
  dylan_value T5;
  dylan_value T6;
  dylan_value T7;
  dylan_value T8;
  dylan_value T9;
  dylan_value T10;
  dylan_value T11;
  dylan_value T12;
  dylan_value T13;
  _KLsimple_object_vectorGVKd_1 T14 = {&KLsimple_object_vectorGVKdW, (dylan_value) 5};

  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
  T5 = primitive_next_methods_parameter();
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
  T7 = primitive_idQ(T5,&KPempty_listVKi);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
  if (T7 != &KPfalseVKi) {
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
    T10 = KerrorVKdMM1I(&K91, &KPempty_vectorVKi);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
    T11 = T10;
    T13 = T11;
  } else {
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
    T8 = SLOT_VALUE_INITD(T5, 0);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
    T9 = SLOT_VALUE_INITD(T5, 1);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
    MEP_CALL_PROLOG(T8, T9, 1);
    T6 = MEP_CALL1(T8, classU_);
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
    T12 = T6;
    T13 = T12;
  }
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
  T14.vector_element_[0] = &Kprivate_form_primitive_valueVdfmc_definitions;
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
  T2 = KlistVKdI(&T14);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
  T3_0 = CALL2(&KconcatenateVKd, T13, T2);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
  T4_0 = T3_0;
  {
    MV_CHECK_TYPE_PROLOGUE(T3_0);
    primitive_type_check(T4_0, &KLlistGVKd);
    MV_CHECK_TYPE_EPILOGUE();
  }
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
  MV_SET_COUNT(1);
  return(T4_0);
}

dylan_value Kform_primitive_side_effectingQ_setterVdfmc_definitionsMM0I (dylan_value z_, dylan_value x_) {
  dylan_value T3_0;
  dylan_value T4;
  DWORD T5;
  DWORD T6;
  DWORD T7;
  DWORD T8;
  dylan_value T9;

  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  T4 = SLOT_VALUE_INITD(x_, 12);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  T5 = primitive_cast_integer_as_raw(T4);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  if (z_ != &KPfalseVKi) {
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
    T6 = primitive_machine_word_logbit_set(10,T5);
    T8 = T6;
  } else {
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
    T7 = primitive_machine_word_logbit_clear(10,T5);
    T8 = T7;
  }
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  T9 = primitive_cast_raw_as_integer(T8);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  SLOT_VALUE_SETTER(T9, x_, 12);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  T3_0 = z_;
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  MV_SET_COUNT(1);
  return(T3_0);
}

dylan_value Kform_primitive_dynamic_extentQ_setterVdfmc_definitionsMM0I (dylan_value z_, dylan_value x_) {
  dylan_value T3_0;
  dylan_value T4;
  DWORD T5;
  DWORD T6;
  DWORD T7;
  DWORD T8;
  dylan_value T9;

  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  T4 = SLOT_VALUE_INITD(x_, 12);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  T5 = primitive_cast_integer_as_raw(T4);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  if (z_ != &KPfalseVKi) {
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
    T6 = primitive_machine_word_logbit_set(11,T5);
    T8 = T6;
  } else {
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
    T7 = primitive_machine_word_logbit_clear(11,T5);
    T8 = T7;
  }
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  T9 = primitive_cast_raw_as_integer(T8);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  SLOT_VALUE_SETTER(T9, x_, 12);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  T3_0 = z_;
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  MV_SET_COUNT(1);
  return(T3_0);
}

dylan_value Kform_primitive_statelessQ_setterVdfmc_definitionsMM0I (dylan_value z_, dylan_value x_) {
  dylan_value T3_0;
  dylan_value T4;
  DWORD T5;
  DWORD T6;
  DWORD T7;
  DWORD T8;
  dylan_value T9;

  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  T4 = SLOT_VALUE_INITD(x_, 12);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  T5 = primitive_cast_integer_as_raw(T4);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  if (z_ != &KPfalseVKi) {
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
    T6 = primitive_machine_word_logbit_set(12,T5);
    T8 = T6;
  } else {
    // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
    T7 = primitive_machine_word_logbit_clear(12,T5);
    T8 = T7;
  }
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  T9 = primitive_cast_raw_as_integer(T8);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  SLOT_VALUE_SETTER(T9, x_, 12);
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  T3_0 = z_;
  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  MV_SET_COUNT(1);
  return(T3_0);
}


/* SYSTEM INIT CODE */

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

    T0 = KPresolve_symbolVKiI(&KJsource_location_);
    if (T0 != &KJsource_location_) {
      primitive_repeated_slot_value_setter(T0, &K37, 1, 0);
      primitive_repeated_slot_value_setter(T0, &K34, 1, 0);
      IKJsource_location_ = T0;
    }
  }
  {
    dylan_value T0;

    T0 = KPresolve_symbolVKiI(&KJboot_id_);
    if (T0 != &KJboot_id_) {
      primitive_repeated_slot_value_setter(T0, &K37, 1, 2);
      primitive_repeated_slot_value_setter(T0, &K34, 1, 4);
      IKJboot_id_ = T0;
    }
  }
  {
    dylan_value T0;

    T0 = KPresolve_symbolVKiI(&KJadjectives_);
    if (T0 != &KJadjectives_) {
      primitive_repeated_slot_value_setter(T0, &K37, 1, 3);
      primitive_repeated_slot_value_setter(T0, &K34, 1, 6);
      IKJadjectives_ = T0;
    }
  }
  {
    dylan_value T0;

    T0 = KPresolve_symbolVKiI(&KJvariable_name_);
    if (T0 != &KJvariable_name_) {
      primitive_repeated_slot_value_setter(T0, &K37, 1, 4);
      primitive_repeated_slot_value_setter(T0, &K34, 1, 8);
      IKJvariable_name_ = T0;
    }
  }
  {
    dylan_value T0;

    T0 = KPresolve_symbolVKiI(&KJparent_form_);
    if (T0 != &KJparent_form_) {
      primitive_repeated_slot_value_setter(T0, &K37, 1, 1);
      primitive_repeated_slot_value_setter(T0, &K34, 1, 2);
    }
  }
  {
    dylan_value T0;

    T0 = KPresolve_symbolVKiI(&KJside_effecting_);
    if (T0 != &KJside_effecting_) {
      primitive_slot_value_setter(T0, &K57, 0);
      IKJside_effecting_ = T0;
    }
  }
  {
    dylan_value T0;

    T0 = KPresolve_symbolVKiI(&KJside_effect_free_);
    if (T0 != &KJside_effect_free_) {
      primitive_slot_value_setter(T0, &K58, 0);
      IKJside_effect_free_ = T0;
    }
  }
  {
    dylan_value T0;

    T0 = KPresolve_symbolVKiI(&KJstateless_);
    if (T0 != &KJstateless_) {
      primitive_slot_value_setter(T0, &K59, 0);
      IKJstateless_ = T0;
    }
  }
  {
    dylan_value T0;

    T0 = KPresolve_symbolVKiI(&KJstateful_);
    if (T0 != &KJstateful_) {
      primitive_slot_value_setter(T0, &K60, 0);
      IKJstateful_ = T0;
    }
  }
  {
    dylan_value T0;

    T0 = KPresolve_symbolVKiI(&KJdynamic_extent_);
    if (T0 != &KJdynamic_extent_) {
      primitive_slot_value_setter(T0, &K61, 0);
      IKJdynamic_extent_ = T0;
    }
  }
  {
    dylan_value T0;

    T0 = KPresolve_symbolVKiI(&KJindefinite_extent_);
    if (T0 != &KJindefinite_extent_) {
      primitive_slot_value_setter(T0, &K62, 0);
      IKJindefinite_extent_ = T0;
    }
  }
  {
    dylan_value T0;

    T0 = KPresolve_symbolVKiI(&KJside_effectingQ_);
    if (T0 != &KJside_effectingQ_) {
      primitive_repeated_slot_value_setter(T0, &K110, 1, 0);
      primitive_repeated_slot_value_setter(T0, &K109, 1, 0);
      IKJside_effectingQ_ = T0;
    }
  }
  {
    dylan_value T0;

    T0 = KPresolve_symbolVKiI(&KJstatelessQ_);
    if (T0 != &KJstatelessQ_) {
      primitive_repeated_slot_value_setter(T0, &K110, 1, 2);
      primitive_repeated_slot_value_setter(T0, &K109, 1, 4);
      IKJstatelessQ_ = T0;
    }
  }
  {
    dylan_value T0;

    T0 = KPresolve_symbolVKiI(&KJdynamic_extentQ_);
    if (T0 != &KJdynamic_extentQ_) {
      primitive_repeated_slot_value_setter(T0, &K110, 1, 1);
      primitive_repeated_slot_value_setter(T0, &K109, 1, 2);
      IKJdynamic_extentQ_ = T0;
    }
  }
  return;
}

/* USER INIT CODE */

void _Init_dfmc_definitions__X_define_primitive_for_user () {
{
  dylan_value T0;

  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:9
  T0 = KPadd_a_methodVKnI(&Kdood_lazy_gettersVdood, &Kdood_lazy_gettersVdoodMdfmc_definitionsM29, &Kdfmc_definitions_libraryYdylan_userVdfmc_definitions, &KPfalseVKi, &KPfalseVKi, &KPfalseVKi);
  goto I90;
}
I90:

{
  dylan_value T0;

  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:15
  T0 = KPadd_a_methodVKnI(&Kinitialize_packed_slotsVKe, &Kinitialize_packed_slotsVKeMdfmc_definitionsM10, &Kdfmc_definitions_libraryYdylan_userVdfmc_definitions, &KPfalseVKi, &KPfalseVKi, &KPfalseVKi);
  goto I87;
}
I87:

{
  dylan_value T0;

  // /home/bruce/Development/dylan/opendylan/sources/dfmc/definitions/define-primitive.dylan:25
  T0 = KPadd_a_methodVKnI(&Kform_compile_stage_onlyQVdfmc_common, &Kform_compile_stage_onlyQVdfmc_commonMdfmc_definitionsM5, &Kdfmc_definitions_libraryYdylan_userVdfmc_definitions, &KPfalseVKi, &KPfalseVKi, &KPfalseVKi);
  goto I84;
}
I84:

  return;
}


/* eof */
